2 ;;; Copyright (c) 1999 Massachusetts Institute of Technology
4 ;;; This program is free software; you can redistribute it and/or
5 ;;; modify it under the terms of the GNU General Public License as
6 ;;; published by the Free Software Foundation; either version 3 of the
7 ;;; License, or (at your option) any later version.
9 ;;; This program is distributed in the hope that it will be useful,
10 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
11 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 ;;; General Public License for more details.
14 ;;; You should have received a copy of the GNU General Public License
15 ;;; along with this program; if not, write to the Free Software
16 ;;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 ; Canonical symbol definition macro, FOO==BAR with error check.
27 IFN Z-$$TEM1,.ERR Z MULTIPLY .QUOTE`.QUOTE/DEFINED/`
35 ; For now, must have a disk type defined to get the correct register
42 IFE RP06P+RM03P+RM80P,.FATAL No disk type specified in RH11 DEFS
43 IFN RP06P,IFN RM03P+RM80P,.FATAL RP/RM Register conflict in RH11 DEFS
46 ;;; Disk RH11 Interrupt vector:
47 DEFSYM PHVEC==254 ; Interrupts occur on level 6
48 ; (high priority) on UBA #1.
50 ;;; Disk RH11 Unibus register addresses:
52 DEFSYM %HRCS1=:776700 ;CTRL AND STATUS 1.
53 DEFSYM %HXSC== 1_15. ; Special Condition
54 DEFSYM %HXTRE==1_14. ; Transfer Error
55 DEFSYM %HXMCP==1_13. ; Mass I/O Control Bus Parity Error
56 DEFSYM %HXDVA==1_11. ; Drive Available
57 DEFSYM %HXPSE==1_10. ; Port Select
58 DEFSYM %HXA17==1_9. ; UB Address Extension Bit 17
59 DEFSYM %HXA16==1_8. ; UB Address Extension Bit 16
60 DEFSYM %HXRDY==1_7. ; Ready
61 DEFSYM %HXIE== 1_6. ; Interrupt Enable
62 DEFSYM $HXCMD==.BP 77 ; Bits 1-5 specify commands.
63 DEFSYM %HXGO== 1_0. ; GO bit
65 ;;; Commands with bit 0 (GO) included:
67 DEFSYM %HMNOP==0 ; No Operation
68 DEFSYM %HMUNL==3 ; Unload ("Standby" -- the pack doesn't fly off).
69 DEFSYM %HMREC==7 ; Recalibrate
70 DEFSYM %HMCLR==11 ; Drive clear (reset errors etc.)
71 DEFSYM %HMRLS==13 ; Drive release (dual port)
72 DEFSYM %HMSRC==31 ; Search (for r.p.s.)
73 DEFSYM %HMWCH==51 ; Write Check (?doesn't work)
74 DEFSYM %HMWCF==53 ; Write Check Format, Header and Data (?doesn't work)
75 DEFSYM %HMWRT==61 ; Write Data
76 DEFSYM %HMWHD==63 ; Write Header And Data (format the pack)
77 DEFSYM %HMRED==71 ; Read Data
78 DEFSYM %HMRHD==73 ; Read Header and Data
79 DEFSYM %HMSEK==5 ; Seek to Cylinder
80 DEFSYM %HMOFS==15 ; Offset Heads Slightly
81 DEFSYM %HMCEN==17 ; Return Heads To Centerline
82 DEFSYM %HMACK==23 ; Acknowledge mounting of pack (required before I/O)
83 DEFSYM %HMRDP==21 ; Read-In Preset
85 DEFSYM %HRWC=:776702 ;WORD COUNT.
87 DEFSYM %HRBA=:776704 ;UNIBUS ADDRESS.
89 DEFSYM %HRADR=:776706 ;DESIRED ADDRESS.
90 ; DEFSYM $HATRK==.BP 7700 ; Bits 12-8 are track.
91 ; DEFSYM $HASEC==.BP 0077 ; Bits 5-0 are sector.
92 DEFSYM $HATRK==.BP 17400 ; Track 0-22
93 DEFSYM $HASEC==.BP 37 ; Sector 0-23 (128 words each)
95 DEFSYM %HRCS2=:776710 ;CTRL AND STATUS 2.
96 DEFSYM %HYDLT==1_15. ; Data Late
97 DEFSYM %HYWCE==1_14. ; Write Check Error
98 DEFSYM %HYPE== 1_13. ; Parity Error
99 DEFSYM %HYNED==1_12. ; Non-existant Drive
100 DEFSYM %HYNEM==1_11. ; %HRBA is NXM during DMA
101 DEFSYM %HYPGE==1_10. ; Program Error
102 DEFSYM %HYMXF==1_9. ; Missed Transfer
103 DEFSYM %HYMDP==1_8. ; Mass Data Bus Parity Error
104 DEFSYM %HYOR== 1_7. ; Output Ready (for Silo buffer diag.)
105 DEFSYM %HYIR== 1_6. ; Input Ready (for Silo buffer diag.)
106 DEFSYM %HYCLR==1_5. ; Controller Clear
107 DEFSYM %HYPAT==1_4. ; Parity Test
108 DEFSYM %HYBAI==1_3. ; Unibus Address Increment Inhibit
109 DEFSYM $HYDSK==.BP 7 ; Bits 2-0 are the Unit Select.
111 DEFSYM %HRSTS=:776712 ;DRIVE STATUS.
112 DEFSYM %HSATN==1_15. ; Attention Active
113 DEFSYM %HSERR==1_14. ; Error
114 DEFSYM %HSPIP==1_13. ; Positioning In Progress
115 DEFSYM %HSMOL==1_12. ; Medium On-Line
116 DEFSYM %HSWRL==1_11. ; Write Locked
117 DEFSYM %HSLST==1_10. ; Last Sector Transferred
118 DEFSYM %HSPGM==1_9. ; Programmable
119 DEFSYM %HSDPR==1_8. ; Drive Present
120 DEFSYM %HSRDY==1_7. ; Drive Ready
121 DEFSYM %HSVV== 1_6. ; Volume Valid
122 ; These are RP04-only bits in %HRSTS
123 ; DEFSYM %HSDE1==1_5. ; Difference Equals 1
124 ; DEFSYM %HSL64==1_4. ; Difference Less Than 64
125 ; DEFSYM %HSGRV==1_3. ; Go Reverse
126 ; DEFSYM %HSDIG==1_2. ; Drive To Inner Guard Band
127 ; DEFSYM %HSF20==1_1. ; Drive Forward 20in/sec
128 ; DEFSYM %HSF5== 1_0. ; Drive Forward 5in/sec
130 DEFSYM %HRER1=:776714 ;ERROR 1.
131 DEFSYM %H1ECC==1_15. ; Data Check
132 DEFSYM %H1UNS==1_14. ; Unsafe
133 DEFSYM %H1OPI==1_13. ; Operation Incomplete
134 DEFSYM %H1DTE==1_12. ; Drive Timing Error
135 DEFSYM %H1WLK==1_11. ; Write Lock Error
136 DEFSYM %H1IAE==1_10. ; Invalid Address Error
137 DEFSYM %H1AOE==1_9. ; Address Overflow Error
138 DEFSYM %H1CRC==1_8. ; Header CRC Error
139 DEFSYM %H1HCE==1_7. ; Header Compare Error
140 DEFSYM %H1ECH==1_6. ; ECC Hard Error
141 DEFSYM %H1WCF==1_5. ; Write Lock Fail
142 DEFSYM %H1FER==1_4. ; Format Error
143 DEFSYM %H1PAR==1_3. ; Parity Error
144 DEFSYM %H1RMR==1_2. ; Register Modification Refused
145 DEFSYM %H1ILR==1_1. ; Illegal Register
146 DEFSYM %H1ILF==1_0. ; Illegal Function
148 DEFSYM %HRATN=:776716 ;ATTENTION SUMMARY.
149 ; Each bit 7-0 corresponds to a drive asserting ATA.
151 DEFSYM %HRLAH=:776720 ;LOOK AHEAD.
152 ; 2.2 - 1.7 Sector Count.
153 ; 1.6 - 1.5 Encoded Extension Field.
155 DEFSYM %HRBUF=:776722 ;DATA BUFFER.
157 DEFSYM %HRMNT=:776724 ;MAINTENANCE.
159 DEFSYM %HRTYP=:776726 ;DRIVE TYPE.
160 ; 2.7 NOT BLOCK ADDRESSED
162 ; 2.5 Moving Head (better be a 1!!)
163 ; 2.3 Drive Request Required
164 ; 1.9 - 1.1 Drive Type Number:
165 ; RP04 = 20, RP05 = 21,
166 ; RP06 = 22, RM03 = 24,
169 DEFSYM %HRSER=:776730 ;SERIAL NUMBER.
171 DEFSYM %HROFS=:776732 ;OFFSET.
173 ; 2.7 Sign Change (RP06 only)
174 ; 2.4 Format Bit (1=16, 0=18)
176 ; 2.2 Header Compare Inhibit
177 ; 2.1 Skip Sector Inhibit (RM 16bit only)
181 ; 1.8 - 1.1 Offset Info
188 ; Centerline 00000000
192 ; 1.8 Offset Direction
193 ; 0 - Away from spindle
194 ; 1 - Towards spindle
196 DEFSYM %HRCYL=:776734 ;DESIRED CYLINDER.
200 DEFSYM %HRCCY=:776736 ;CURRENT CYLINDER.
202 DEFSYM %HRER2=:776740 ;ERROR 2.
203 DEFSYM %H2NHS==1_10. ; No Head Selection
204 DEFSYM %H2WRU==1_8. ; Write Ready Unsafe
206 DEFSYM %HRER3=:776742 ;ERROR 3.
207 DEFSYM %H3OFC==1_15. ; Off Cylinder
208 DEFSYM %H3SKI==1_14. ; Seek Incomplete (also sets UNS+ATA+PIP+RDY)
209 DEFSYM %H3DCL==1_6. ; DC power low (or perhaps AC?)
210 DEFSYM %H3ACL==1_5. ; AC power low (or perhaps DC?)
211 ; (the documentation is confused about
216 ; RM has no Current Cylinder Register, the Error 2 Register is
217 ; in a different place with different bits, and there is no
220 DEFSYM %HRER2=:776742 ;ERROR 2.
221 DEFSYM %H2BSE==1_15. ; Bad Sector (sector marked bad on disk)
222 DEFSYM %H2SKI==1_14. ; Seek Incomplete (also sets UNS+ATA+PIP+RDY)
223 DEFSYM %H2OPE==1_13. ; Drive address plug was removed
224 DEFSYM %H2IVC==1_12. ; Invalid Command (really drive not valid)
225 DEFSYM %H2LSC==1_11. ; LSC Sucks
226 DEFSYM %H2LBC==1_10. ; Loss of Bitcheck (hardware lossage)
227 DEFSYM %H2DVC==1_7 ; Device Check (generic hardware lossage)
228 DEFSYM %H2SSE==1_5 ; Skip Sector found (can't happen in 18bit)
229 DEFSYM %H2DPE==1_3 ; Data Parity Error in controller
232 DEFSYM %HRPOS=:776744 ;ECC POSITION.
234 DEFSYM %HRPAT=:776746 ;ECC PATTERN.
236 IFN $$TEMP,EXPUNG DEFSYM