Digital PDFs
Documents
Guest
Register
Log In
AC-E965G-MC
September 1982
26 pages
Original
1.4MB
view
download
Document:
CXRLAG0 RL
Order Number:
AC-E965G-MC
Revision:
0
Pages:
26
Original Filename:
http://bitsavers.org/pdf/dec/pdp11/xxdp/x11_listings/AC-E965G-MC_CXRLAG0_RL.pdf
OCR Text
I 1 ER " MACRO "'200 02-5EP-82 14:57 PAGE 2 DEC/_" SYSTEM E~ER5IZER MACRO DEFINITION "ODULE - IDENTIFICATION ~-----.------- PRODUCT CODE: PRODUCT NAME: PRODUCT DATE: MAINTAINER: AC-E965G-MC CXRLAGO RL11/RLV11/RLV12/RL01/RL02 JUNE 1982 DEC/X11 SUPPORT GROUP THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE AND SHOULD NOT IE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT NAY APPEAR IN THIS NANUAL. THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WJTH INCLUSION OF DIGITALS COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM. EXCEPT AS MAY OTHERUISE IE PROVIDED IN WRITING BY DIGITAL. DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL. COPYRIGHT ec) 1978.1982 DIGITAL EQUIPMENT CORPORATION 1. ABSTRACT -._.---. RLA IS AN IONODX THAT EXERCISES RL01/RL02 DiSk DRIVES ON RL11/RLV11/RLV12 CONTROLLERS. IT EXERCISES THE DRIVES BY DOING READ HEADERS, S~EkS. READS. WRITES AND IN-CORE COMPARISONS. SEO 1 C 1 ER " "ACRO "1200 02-SEP-82 14:57 PAGE 2-1 DEC/Xll SYSTEM E~ERSIZER MACRO DEFINITION MODULE All ERRORS DETECTED ARE REPORTED ON THE CONSOLE DEVICE. 2. seQ ;-] REQUIREMENTS -----------HARDWARE: 1 TO 4 RL01/RL02 DISK DRIVES (WITH SCRATCH PACKS). 1 RL11. RLVll. OR RLV12 DISk CONTROLLER. STORAGE:: RLA REQUIRES 1. r'" ~'.·,t WORDS: 1445 2. o,,! f\.. .JORDS: 2645 3. OCTAL BYTES: 5512 3. PASS DEFINITION --------------- ONE PASS OF THE RLA MODULE CONSISTS OF 20 X 100 CYCLES OF THE BASIC TEST SEQUENCE (READ HEADER. SEEk. READ HEADER, WRITE. WRITE CHEC(L READ). THE TEST SEQUENCE WRITES 1024 WORDS. REACS BACk THE FIKST 256. AND DATA CHECkS THE SAME. --_..---------ONE PASS OF RLA RUNNING ALONE ON A POP-ll/40 TAkES APPROXI"ATELY ONE MINUTE. 5. 6. CONFIGURATION REQUIREMENTS -------------------------DEFAULT PARAMETERS: DEVADR: 174400, VECTOR: 160. BR1: 5. DEVCNT: 1 DEVICE/OPTION SETUP ------------------- INSURE THAT ALL DRIVES UNDER TEST ARE POWERED uP, WRITE ENABLED, AND REAny -- AND OF COURSE. SCRATCH PACkS INSTALLED !!! IF MORE THAN 1 DRIVE. CHANGE DVID1: CLOC 14') ACCORDINGLY. IF RLV12 CONTROLLER, SET SR1: = 10 CLOC 16'. BIT 3). 7. SRl OPTIONAL SETUP ------_...-.--._. BIT 0 - DROP DRIVE ON ERROR BIT 1 - RANDOM SEEKS BIT 2 - DON'T PRINT SOFT ERRORS ,-----,---- D 1 ER M MACRO M'200 02-5EP-82 '4:57 PAGE 2-2 DEC/X" SYSTEM E~ER5IZER MACRO DEFINITION MODULE 81T 3 - CONTROLLER IS AN RLV12 8. SEa 3 ERROR REPORTING --------------ON ERROR ALL REGISTERS ARE PRINTED IN THE FOLLOWING ORDER: RL'l/RLVll RLCS RLBA RLDA RLMP DRIVE STATUS RLV12 RLCS RLBA RLDA RLMP RLBAE DRIVE STATUS •••• *•••••••••• *••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• •• ••• ••• •• •• •• • ••* •• REASON: ••• ''HNF'' ERRORS WERE BEING REPORTED AS '~PI'~ ••• G.PASQUINTONIO MY-81 2 CONTROLLER ERROR ON •• WRITE-CHECK CAUSED A TERMINAL TABLE SEARCH (ULTIMATELY TRAPPING TO 4). •• •• G.PASQUINTON!O MY-81 3 "DROP ON ERROR" OPTION (SR1<O» NOT IMPLEMENTED CORRECTLY. ••• 4 G.PASQUINTONIO MY-81 RLV12 22 BIT UPGRADE. • • 5 P. ANASTAS DEC-11 DATA CHECk ERRORS ON FLAGGED • JAD SPOTS ABOVE CYL. 177 •• 4 DECIMAL PATCH LOCATIONS •••••••••••••••••••••••••••••••••••••• *••••••• *•• ADDED. ***.*.***** ••• *•• ***.*.*** ••• **• EDIT: 1 BY: DATE: G.PASQUINTONIO MY-81 - L-_ _ _ _ _ _ _ _ _ _ _ _ _ _ _._ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ .________ .__ . _ - - - -... _- E 1 ER " NACRO "'200 02-SEP-12 14:57 PAGE 3 DEC/X" SYSTEM E_ERSIZER MACRO DEFINITION MODULE 00000o IOMODX <RLAG) 174400 160 5 0 0 20. 146.IUFIN 256 •• 1024. 00000o MODULE 150000,RLAG .1'4406.f66£~fO,6.20 •• 146.'UFIN.256 •• 1024 • •TITLE RLAG DtCIX11 SYSTEN EXENC StR NODULE ; DDXC~ VEASION 6.4 28-JAN-82 .LIST BIN .***************************************~******************************* iEGIN: 000000 101 MODN~: .ASCII IRLAG I ;MODULE NANE. 114 040 lS~ XFLAG: .BYTE OPEN ;USED TO KEEP TRACK OF WBUFF USAGE 174288 ADDR: 174400+0 :lST DEVICE ADDR. 000160 VECTOR: 160+0 :1ST DEVIce VECTOR. 240 8Rl: .IYTE PRTY5+0 ;lST BR LEVEL. ooooli BR2: .BYTE PRTYO+O :2ND BA LEVEL. 000014 DVID1: 0+1 :DEVICE INDICATOR 1. SAl: OPEN ;SWITCH REGISTER 1 SR2: OPEN : SWI TCH REGI STER 2 SR3: OPEN ;$WITCH REGISTER 3 SR4: OPEN :SWITCH REGISTER 4 00000o ;********************************************************************** 15 STAT: 150000 ;STATUS WORD. • t INIT: START ;NODULE START ADDR. • SPOINT: MODSP ;NODULE STACK POINTER. ~! 1 ~ PASCNT: 0 ;PASS COUNTER. t ICONT: ~o. :1 OF ITERATIONS PER PASS=20. ICOUNT: :LOC TO COUNT ITERATIONS SOFCNT: :LOC TO SAVE TOTAL S.OFT ERRORS HROCNT: ; LOC TO SAVE TOTAL HAAD EARORS SOFPAS: 0 :LOC TO SAVE SOFT ERROAS PER PASS HRDPAS: 0 :LOC TO SAVE HARD EARORS PEA PASS SYSCNT: 0 :1 OF SYS ERRORS ACCUMULATED RANNUM: 0 :HOLDS RANDOM' WHEN AAND MACRO IS CALLED J' CONFIG: :RESERVED FOR MONITOA USE RES1: :RESERVED FOR MONITOR USE RES2: ;AESERVED FOR MONITOR USE SVRO: OPEN ·LOC TO SAVE RO. SVR1 : OPEN LaC TO SAVE Rl. .. SVR2: OPEN LaC TO SAVE R2. SVAl: OPEN LOC TO SAVE A3. '!~ SVRIt: OPEN LOC TO SAVE R4. ~4 SVR5: OPEN LOC TO SAVE R5. 7h SVR6: OPEN LaC TO SAVE R6. t 11 I CSRA: OPEN ADDR OF CURRENT CSR. 1 1 ~ SBADR: ADDR OF GOOD DATA. OR ACSR: OPEN :CONTENTS OF CSR. 00000o ~ VASADR: ·ADDR OF BAD DATA. OR ASTAT: OPEN STATUS REG CONTENTS. 1 00000o ERRTYP: TYPE OF ERROR t ASI: OPEN EXPECTED DATA. 11 • t AVAS: OPEN ACTUAL DATA. • ASTRT: AESTRT AESTART ADDRESS AFTEA END OF PASS 1~. 11~ WOTO: OPEN ,WORDS TO MEMOAY PEA ITEAATION IJ II d ,. I ~ ~ ,. 8 , ... ,&: 1 i~ 16 y:~=; I ~I= IOU: 146 AIUFYA: aUFIN R8UFPA: OPEN ~~a'SI'~~AOJ~R~E:E~T'~l~~~ON :MODULE IDENTIF ICATION HUMER:146 :READ IUFFER VIATUAL ADDRESS :AEAO BUFFER PHYSICAL ADDRESS seQ 4 -------------------------------------------------------------------------------------------F 1 sea 5 ER " ~CRO "1200 02-SEP-82 14:57 PAGE 3-1 DEC/Xl1 SV:TE" E_ERSIZER ~CRO OEFINITION MODULE ;READ BUFFER EA BITS RBUFEA: OPEN :SI1E OF THE READ BUFFER RIUFS1: 256. ;WRITE BUFFER PHYSICAL ADDRESS "UFPA: OPEN :WRITE BUFFER EA BITS "UFEA: OPEN ;WRITE BUFFER SI1E REQUESTED "UFRD: 1024. ;WRITE BUFFER SI1E AVAILABLE "UFS1: OPEN 0001" 0001,. CDERCT: OPEN ;CDATA/DATCk ERROR COUNT 000146 CDWDCT: OPEN ;CDATA/DATCk WORD COUNT FREE: OPEN ;RESERVED FOR FUTURE USE 0 000150 000040S .REPT SPSIZ ;MODUlE STACk STARTS HERE. .NlIST •WORD o .lIST .ENDR MODSP: 000252 ;.***.*****.**.** •••••••• *•• ******************************************** 159 11024 •• WDFR 171636 START: NOV ;1024. WORDS FROM "E~/JTERATION 160 NOV 1256. ..oTO ;256 WORDS TO MEM/ITERATION 61 177626 ;5 INTERRUPTS/ITERATION 177624 NOV 15~IN f R 424 1164 =S~ :!~60~IVE 3316 :SET DRIVE SELECT o 3254 ;SETUP DRIVE SELECT MASk NOV 1' DRVNSk 000 10 ClR Dl f CNT ;CLEAR DATA LATE COUNT 74 P'\~~ :GO SET UP REGISTERS 167 00100 !~;~ 003274 ~: C$I:f;~ICE :COPY DRIVE SELECTION 4 1 ~tf 000041 31: ;WAS RL LOAD DEVICE? • 41 ~"r :N-BRANCH · Y-SEE IF LOAD UNIT SELECTED ;SET UP F6R MASk 000001 =S~ :l~8~R1 000040 ;GET lOAD UNIT :IF lERO GO MASk OUT UNIT lEa R'21 41: :SHIFT MASk 174 ASL 175 DEca Rl :DEC CUT [,; 176 INE 41 :kEEP CHECkING 51: alT R2.DVICE 003240 :WAS THAT DRIVE SELECTED? 177 178 BEa 71 :N-IRANCH: J-CONTINUE 2 BIC R2,DVICE :DELETE UNI FROM DEVICE MAP 179 110 . • 005474' "SGNI.IEGINJDROPlD :ASCII MESSAGE CALL WITH COMMON HEADER N~ 71: TST DVI~E :ANY DRIVES SELECTED? . INE RSTRT1 ~ 1~ iXI~I,carll~ CALL WITH COMMON HEADER 005424' MSGNI,IEGIN A80RT ~,~ :MESSAGE. DROP MODULE t 1 FIN 1.4 :~ 14 316 RESTRT: TST CNT :+ / SUPPORT in INE RSTRT1 :+ / FOR N~ :. / DT03 IR START w'~ RSTRT1: :+/ N'~ 000000' 000124' GETPAS,IEGIN, R8UFVA :GET PHYSICAL ADDRESS FROM 16-BIT RIUFVA ~:42 CHlCa 1 :SNIFT MASk FOR NEXT DRIVE 44 88&1~ 003114 LOOPL : C~~ JJX6~IVNSk :DRIVE MASk OVERSNIFT CHECk INE CHk ., :8R NCN IF MASk OIC :RESET DRIVE SELECT MASk 194 RRRRiJ RRflQ4 =S~ :ltD~k 195 :RESET DRIVE SELECT 003f2i NOV '-460.DRIVE CHICDRV: 1~ ENDITS,8EGIN 104413 000000' :SIGNAl END OF ITERATION. :MONJTOR SHALL TEST END OF PASS III 88814 1 I l21 1.2.52 121 9t lH 2288 1 888 '1 ~ m ~d m 11 ' 11 tft .. '~ 11 II ~I 11 n J" H ""00 G 1 SEa 6 ER " MACRO "'200 02-SEP-I2 14:57 PAGE 3-2 DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION NODULE ',98 99 200 I.·5,0606 12767 100 CHkDR1: 003112 11: ADD 206 INC N 1' 1 idtJ oo31~: 003102 ~ 88 514 5267 005067 205 . 534 540 005067 Io~ 208 209 000544 210 000550 000722 VO~J9 11°004 24 00.,7t7.,24, 0 , '0 100177 001 74 If"600 00 770 77100 88 764 200 730 100000 1 1 l' il,~ 888~U c 3 70 214 215 216 2',7 21 2j9 20 026 046 a 21 2. 2 5 2 23 J 4 i2Rttt I., ,l_o~ 000106 1 '400 .. 01 'VE NUNS ;NEXT DRIVE 'f! ~~k.OVICE :~lj':f~~1a~¥r~: IIOV T...... HOM CLR RWER ;READ WRITE ERROR FLAG CLR CNT ; COUNT ;WE HAVE A DRIVE, START TESTING ; JSR PC .. UTRDY ~C :~683¥',TAASk2 ~ISSUE DRIVE RESET .. CLEAR VOLUME IIIOV '77724, STBSC ;SET UP FOR RL01 NOV '77750&LSTISC NO~ "OO17r.MASk NOV '77600.LSTCYL NOV '77700.LSTTRk liT '200,T.M' ;TEST RL01 OR RL02 BEG 2S ;RL01 BRANCH 81e "00000. MASk :FIX FOR RL02 BIS "OOOOO,LS.TCYL BIS "00000.LSTTRK liS "OOOOO.LSTBSC BIC "2RR22.MASk2· BIS ,~~,FSTBSC' WD f~bp: ~X :S,Jt6t&R ;READ HEADER ON DISk So r~ 6 oo/~" 002706. :GET HEADER ~CHECk TO SEE IF RANDOM SEEk IS REQUESTED, BIT 1 OF SRl ;SET INDICATES A RANDOM SEEK OTERWISE SEEk IS INCREMENTAL I~. 000714 H· .. 2767 000002 177074 tAG: BIT 181T1,SR1 ;INCREMENTAL OR RANDOM SEEkS? 23 72 1446 BEO TAGl ; INCREMENtAL TAGl 234 14 2767 000177 002670 BIC "77.HDRWD :CLEAR HEAD AND SECTOR BITS 35 417 I i fL. 1"11 =DS,8EIA=U,RO ;STORE IT AWAY O ,~ 0 BNDIVC !A1kR1fRO ;SAVE A COpy 74 11630 n J ;CLEAR HEAD AND SECTOR ~ 15,9 1 7 650 NOV RO D FWD ;LET'S CALCULATE DIFFERENCE WORD ~ 7~ 642 002642 sua HDRWD,DIFWD :GET DIFFERENCE TO SEEk 219 20 21 ij9V\1' n n fH· "8' ,0 4 4 1 It t 4 1 002634 ti Jt 1 4 16 1 7 16~ 88226624f 6 21SS:: 20 002602 74 002566 3S: 11~ lfi IIFIIO R?l =A§2~~~UBRWD BIS '4,DIFWD BIS "At1FWD 81T "vu.R' lEO', AIS, O,DIFWD JMP II 8818:2 8t5~I~ ¥99~ 88I1~~ TAG1: =I~ TAG :IIAkE Olff ABSOlUTE ;5ET DIRECTION BIT ;SET MARkER ;TEST HEAD ~IF 0, DON'T SET HEAD IN DIFF ;5ET HEAD i~flA~X~I~J~R ~~~~ER :l~~&us~~RRwo i~E~=A~TO~ECTOR BITS &HEAD H 1 sea 7 ER M RACRO "'200 02-S£P-82 14:57 PAGE 3-3 DEC/X11 S'STE" E1CfRSIZER MCRO DEFINITION MODULE r 001E 8811 56 OOjft7 01 67 5 01 767 888~rs 88~~Jt 58 000440 259 1'072 ;'1)0 . 1074 002502 002520 11: 1 ~t~t~ 11 002510 ra26362 88"~ '~767 000200 1'~ o 767 '00 00~592 01 767 888221 00 46 ~H C011 zt1 00111 000004 002466 21: 2U 88ll 001404 000200 002454 i9001140 o 88'146 1&7 002444 31: 1150 002440 41: '156 7i 88 774 88'11'; H!767 002426 75 11 TAG2: 567 IJ28 5~ .1' r 'H! .ro 727 888Jtt 2~9 881182 00457 78 79 001 10 a5 IT~ t ~ 7 iit~2~ tlt~ ~~ ~2 88iti: 0023 3 II~~ .mm .. · U!tJ8· 1 56 1044 3 012767 000051 176614 001272 104405 000000' 005500' liil i~ 003416 002314 002310 002270 6S: 117312 1 002304 7S: 000000' 002264 BNE MOV MOV l'oo.HDRWD ,J05.DIFWD TAG2 LSTCYL.HDRWD 2S '2oo.HDRWD 1100.HDRWD BR BNE sua BIS MaV BR BIT BEQ ADD 8R sua BIT BEQ liS JSR JSR JSR NOV IIC CflIP TAG2 14.DIFWD 31 '200.HDRWD 41 ,200.HDRWD 120.(DIFWD TAGe 11 00, HORWD A5.StEIt PC.WTRDY R5.RDHDR T.:."P.CURADR ,,7.CURADR iVRADR.HDRWD =S~ :~f~s~f~~R C" lEI '221.~lFWD :NO GO CHECK FOR LAST CYLINDER :SE t NEXT ADDRESS=CYL 1 :DIF WD " ftARkER. SEEK IN. HS:O ;SET CURRtNT HD=O. SEEk IN CURRENT ADDRESS=LAST TRACK? NO. CONTINUE DIF WD " MARkER. SEEk OUT, HS:1 SET CURRtNT HD:1. SEEk OUT :SN SET IN DIF WORD :NO 31 :YES L CYL WILL INCRE"ENT :Skl" OVER :NO! CYL WILL DECREMENT ;HE"D SET? :NO, LEAVE EXPECTED ALONE :YE~; SET HEAD SELECT BIT :PER ORM SEEk :WAJT FOR SEEk TO FINISH :READ HEADER VERIFY CORRECT :SEEk :READ HEADER ;CLEAR OUT SECTOR BITS :WAS SEEk CORRECT? :YES CONTINUE :NO REPORT ERROR NOV IRLCS ASTAT "SGNS.8EGIN.16sEEk :ASCII MESSAGE CAU~ WITH COMaN HEADER NOV '51.ERRT" :IAD SEEk : •••••••••••••••••••••••••••••••••••• t . t t t . t . t t t t . t t •• tttttttttt HRDERS.BEGIN,TAILE :SEEk WAS BAD : •••• t •••••• t ••••••••••••••••••••••••••••••••••• t.ttttttttttt.tt MaV ~"r CURADR,HDRWD 'IRWD.LSTTRk J" TAG NOV RBUFSZ.WCNT2 NEG WCNT2 G"UFI. BEGIN ~X ~Uf'Z,WCNT1 JSR R5,WRITE TST RWtR BNE 51 JSR R5,WRCHk TST RWtR INE 5S JSR R5,READ :NAkE MISTAkE NEW HDRWD :ARE WE ON LAST TRACK :NO CONTINUE ;YE!, GO GET ANOTHER CAUSE ITS THE BAD SECTOR TRACK :GET BUFFER SIZE (READ) ;NEGATE FOR RLMP ;GET WRITE BUFFER INFORMATION :GET BUFFER SIZE (WRITE) :NEGATE FOR RL"P :WRITE DATA ; CONTROLLER ERROR ?? : SkIP READS IF so. • ERROR 11 : SKIP READS IF SO. :READ DATA I 1 fR " NACRO ~200 02-5EP-82 14:57 PAGE 3-4 OEC/X11 SYSTEM EXER51ZER NACRO DEFINITION NODULE TST RWEA ERROR 1? '0 00141 5767 002160 11 14 1005 BNE 51 SKIP DATA CHECK IF SO. ) 12 141 412 000000' 000126' REQUEST FOR MONiTOR TO CHECK DATA ~IATAI.aEGIN.AaUFPA 14 1422' IF ERROR. RETURN AT TAG 51 BR 41 BR IF NO DATA ERRORS. ;6P-3 l~ 03 000001 176366 51: BIT ,aITO.SA1 DROP ON ERROR ?? ;6P-3 BEQ 41 NO ;GP-3 15 14 00.1.404 JSR R5.DROP YES. DROP IT. ;GP-3 JlltP LOOPL ••• AND TRY ANOTHER. ;GP-3 1~36 ~lt~ Y9'~~ 41: ~18 001442 005067 002120 CLR RWER CNT INC ClltP "6 •• CNT ~~V2 00881:15 ii':~ 88~~8 002132 BEQ 31 14 8&402 JlltP LOOP 6 ; REITERATE 16 TIMES/DRIVE ••• JlltP LOOPL ; ••• THEN GET ANOTHER DRIVE. 881i ooolt~ t~~'l~ 31: 5 -;WAIT FOR DRIVE READY. DAOP DRIVE IF IT NEVER CONES UP. 001472 042777 001400 001032 WTRDY: BIC "400.IRLCS BIS DAIVE&IRLCS 001500 05t777 002122 80 024 077777 0 074 IItOV ,7777f.CLK ;SET UP TIMEOUT 8},~607~ 000001 002010 'I: elT ".IALCS ;DRIVE READY? BEQ 2S ; NOT YET 0014 1 ;6P-3 000207 RTS PC ; YES. RETURN TO CALLER. ;6P-3 2S: 334 001526 1044 7 RiRiR8: BREAKI.BEGIN ;TEMPORARY RETURN TO IItONITOR •••• 104407 BREAK .BEGIN ;THEN CONTJ~E AT NEXT INSTRUCTION. 35 005367 002046 DEC CLK ;CHECK TIMEOUT INE 1S ; LOOP TIL TIMER EXPIRES. 000006 176334 NOV '6.ERRTYP ;DRIVE NOT READY ;**************************************************.************ 001552 104405 OOuOOO' 003532' HRDERS.BEGIN.RLCS :DRIVE NOT READY ;*************************************************************** 9 JSR R5~DAOP ;CLEAR DRIVE (DROP) FRON LIST. OOO04 ·~I 000006 ~1122 gg 5 TST (Sr)+ ; FIX THE STACk ••• 161 176652 JMP LOOPL ; ••• AND GO FOR ANOTHER. 001566 -;DROP CURRENT DRIVE. DAOP MODULE IF NO DRIVES LEFT. 6ROP: MSGNS.BEGIN.DAOP"S ;ASCII "ESSAGE CALL WITH COMMON HEADER 88~~~~' BIC DRVNSk.DVICE :ClEAR THIS DRIVE BIT. 346 001600 R!t BEQ ,. ; DROP MODULE IF NO MDRE. ; GP-3 OOO~05 RTS R5 ; OTHERWISE. RETURN TO CALLER. ;6P-3 ~9 161 11: 3 000000' 005420' MSGNS.8EGIN t NOLEFT ;ASCII "ESSAGE CALL WITH COMMON HEADER TST (Sp,+ ; FIX STACk. FINI: 51 ~ 104410 000000' END',BEGIN ;DROP THE MODULE • ;ROUTINE TO SET UP Rl11 REGISTEAS. VECTOR AND BR LEVEL AETUP: MOV ADDA.RO -GET BASE ADDRESS MaV ROjRLCS ;CONTROL REGISTER 8816§t TST (Ru)+ ;INCREMENT FOR NEXT MOV RO,RL8A 88til8 8?G069 001670 ;8US ADDRESS . l! 719 J19 0 1 IIIJ29 f 3"J)I 88U r 881i.2! BUI SYlm8 In 881til J U tj S~ 2Rm~ 1CM~OJ8, 88Y9gg' H, 12 ii ~ J! t2 8tl9l9 A~tlJ~ SEa 8 J 1 RLAG DEC/X11 SYSTEM EXERCISER MMACRO "'200 02-5EP-82 14:57 PAGE 3-5 DEC/Xl1 SYSTEM EXERSIZER MACRO DEFINITION MODULE TST (RO)+ ;INCREMENT FOR NEXT 881~t 8V~.~ 001664 ~¥ '~6~~DA iYA~~EAI£1E,gR NEXT 5729 NOV RO RLMP ;DATA IUffER ~l 001660 399t7 GP-4 lIT 'lfT3,SRl ;TEST If AN RLV12 CONTROLER 88A8t8 176130 IEQ ,. ;IR IF NOT GP-4 TST (RO)+ ;INCREMENT FOR NEXT GP-4 5 8811'8 ooI~1& GP-4 NOV RO,RLIAE ;IUS EXTENDED ADDRESS REGISTER 7 008816~1 gl~~ 881~~~, 003604 GP-4 NOV 'T.IAE,TABLEY ;FIX ERROR REPORT 6P-4 NOV 'T.STAT,TAILEZ: FOR RlV12 CONTROLLER 361 1704 0127H 003562' 003600 MOV VECTOR,RO i6ET VECTOR ADDRESS 36'1'712 0167 176072 11: 370 1716 01272 000252' =S~8 '~f~?:6~RO)+ ~~IJ ~~f~~f?Y 371 1722 116710 176064 RTS PC ; RETURN 372 0017i~ 000207 • ; SUBROUTINE TO SET 18 OR 22 BIT IUS ADDRESS IN CONTROLLER. 33Jl : THIS ENTIRE SUBROUTINE IS NEW. i6P-4 375 • 76 SETWBA: NOV waUFPA,PA18 i 6ET 18 BIT WRITE BUFFER ADDRESS. i77 001730 016767 NOV waUFEA,EA18 378 001736 016767 1~t~92 888A9i BR SETCMN 379 001744 000406 ; GET 18 BIT READ READ BUFFER ADDRESS. o 1746 016767 1~61~4 88tt SETRSA: NOV RBUFPA,PA18 1 1754 0,16767 SETCMH: =S~ =IV',E:'~A18 : SET IA<15:0> ••• 17 alc '60 RLCS : ••• AND BA<17:16> IN CSR<5:4>. lIS EA1t.IRLCS BIT III ~,SR1 ; ARE WE RLV12 11 91~tit : aR IF NOT. aEG 11 2m 9i'411 _t GET 22-BIT ADDR FROM 18-BIT ADDR MAP221, aEI~N,PA18 ~ 2R'4 oY~~JJ ~O' 88'~32' NOV PA, RLIA : LOAD ~<15:0> ••• 001504 389 88~oii 016777 NOV EA ,IRLIAE i ••• AND BA<21:16>. 11: RTS PC 390 2036 000207 PA18: : 18 lIT IA<15:0> ••• i ••• AND EA<17:16> IN IITS <5:4>. EA11: ; 22 BIT BA<15:0> ••• PA22: 88~046 888888 : ••• AND EA<21:16> IN BITS <5:0>. EA22: o • :DRIVERS (INTERRUPT) i WRITE-CHECK ••• 001542 'RCHK: ~~ 1102,FUNC : ••• OR ••• : ••• WRITE FUNCTION. 401 RRlllf WRITE: A8~ =~~'f~¥=f"p : WORD COUNT : DISK ADDRESS 001434 NOV NDRWDflRLDA JSR PC SE WlA : WRITE IUFFER ADDRESS ; GP-4 4Ri 1 : READ FUNCTION RillY! READ I ; WORD COUNT : DISk ADDRESS 001404 NOV NDRWDflRLDA : READ BUFFER ADDRESS ~09 :GP-4 JSR PC~SE RIA 410 1 e~ EX C :SEEk FUNCTION SEEk: AD :,1FS6~~=fDA :DIFFERENCE WORD lIS I IRLDA ;SET MARkER lIT RDNDR: lav s't~,FUNC :READ HEADER FUNCTION tli Jl3 881til D 11 ~ 8U~ Iht 81m If8 95 819m 88 .1t '88iJ!~ i;s I til 11 I~ II!~ 88 8~2 8t2 il ?~ tli il~ lit !f!~~~H1fMP 5fQ~ Ie 1 RLAG DEC/X11 SYSTeM EXERCISER" MACRO M1200 02-SEP-82 14:57 PAGE 3-6 OEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE BR EXEC 000003 001334 GSTAT: 4NOV '],aRLOA ;GET STATUS ••• ~1' 88~l~i 403 ; ••• OR ••• 403 418 !!!!2~8i ,,3, aRLOA ; ••• RESET AND 6ET STATUS. 000013 001324 DRVRTS: NOV MOV "0,,FUNC ;GET STATUS FUNCTION. ~1~ 000104 001400 ~~X 001212 421 EXEC: BIC "4'6.IRLCS ; CLEAR THE OLD... ;6P-4 042777 BIS DRIVE,IRLes ; ••• AND INSERT NEW DRIVE... ;6P-4 056777 881iJ2 881J9~ 001]60 001270 BIS FUNC,aRLCS ; ••• AND OPCODE BITS. ;6P-4 MOV 'INTSRV,IVECTOR ;SfT UP INTERRUPT VECTOR... ;6P-4 425 002242 8~9~~~ 002262' 175540 BIC '200.aRLCS ; ••• AND EXECUTE. ;6P-4 042777 000200 001254 EXITS.BEGIN ;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 104400 000000' ~I' 8811~2 • 428 : CONTINUE HERE ON RL INTERRUPT. 429 • 430 iNTSRV: 431 002262 ---------_._.._--_._------_.-._-.--_._._------------------------PIRQS.BEGIN,1S : QUEUE UP TO CONTINUE AT 11 AND RTI 002262 -------._.----_._._------------------------------_.-------------ClR T.STAT 1,32 002270 :LOAD ADDR OF CSR ~~ :~f~sef~~~R :LOAD CONTENTS OF CSR 435 00 310 436 00 316 =~ IRlDA.T.DA aif:A.i~iA MaV :Y¥ :I\~;:IR~P :TEST IF RLVI2 CONTROLLER ;6P-4 BEQ 20. :BR IF NOT : GP-4 NOV IRlBAE,T.BAE :GET EA IliS ; GP-4 ~~V TST T.es :ANY ERRORS :YES, CONTINUE TO CHECk 8MI 11' ~:~ 2~it CLR RETRY 444 RTS R5 :NO, RETURN CALL+4 SkIP RETRV 445 2 449 1,.: INC RWER R2'170 ~V 'NULLX,HTYPE :SETUP FOR NULL PRINT J~ OX~~· :DRIVE ERROR BIT '2IIT14,T.cs BEO ; NOfBRANCH NOV , ,IRlDA ;GE STATUS 451 4U ooRoOSl 8880111 ~ 45i 42 NOV 'D4Rf~"EPT"P 1172 1110 1104 001060 lAe T"P,IRlCS ~~4 ~ 99.: 455 444 :TEMPORARY RETURN TO MONITOR •••• 444 BREAKI,BEGIN :THEN CONTINUE AT NEXT INSTRUCTION. 450 BREAK .BUIN 001050 BIT , o,aRLtS lEO :~, :~5~ 458 4 0010!R iR'070 ~XNS,BE=~~~CR~EI~AT :ASCII MESSAGE CALL WITH COMMON HE~OER 459 42 888806' 17J~~t· MaV '6.tRRTYP :DRIVE ERROR 460 0 500 ..61 002506 104405 000000' 005500' l····················································· ......... . "RDERI.BEGIN,TAllE : i!····*****·****······································ .......... ..,V '13,IRLDA MOV T"P.IRLCS 885IJI 8ti~~~ 88Y8Ja 88t8A~ 98S: BREAKS,BEGIN :TEMPORARY RETURN TO MONITOR •••• 104407 000000' BmJ 81 ' m li1 Bill ~ti 88lt~.~ liim IHa ruB :~312~. 88fVit a a: :11 881510 seQ 10 L 1 SEQ 11 RLAG DEC/X" SYSTEN EXERCISER" "ACRO "1200 02-SEP-82 14:57 PAGE 3-7 DEC/X" SYSTEM EXERSIZER MACRO DEFINITION MODULE 465 S821~~ 466 00 S46 467 00 51· 461 B~S5 469 5· ~~i 00 ~9~ 47288572 473 600 ~~~.I OO~t?~ 476 477 ~6'6 60 ~Jt 88 t 480 002, 481 002 0 482 002 6 483 002650 484 002656 485002tt2 ~1'881 881~ 4 002674 ~33 12702 491 2710 492 2712 493 002720 494 002726 A~~'9~ 888~88' 000764 00'770 000522 032767 020000 000770 2S: 001404 ~~t~ 005400' 002672 032767 002000 000750 21S: 001423 I ~, yAtI8 5~ 50. ,2 10 'I , 'I ~n 04$ t~ 16 11 18 003042 BEQ BR BIT BEQ :RV BIT BEQ 98S NORPT I8IT13.T.CS 21. ~~:=p~TYPE IIIT10.T.CS 4S :THEN CONTINUE AT NEKT INSTRUCTION. ;NX" SET ."OPJ SET :NO CHECK DCRC .DCK j 81~~t~ 88i~~~' 88~'i~ :y¥ :3~'fV!~~~s ~~~R~~AL SET FOR OPI 001404 005373' 002634 BEQ 3S "NHOC~CIREANRROCHR 012767 "OV IHCRC,HTYPE " ~JgJ 010000 000712 3S: I'T ~"'~.T.CS ~£~D BAD SECTOR 001472 BEQ HRDRPT NO, REPORT AS REPOPT "OPI" ;GP-1 1m2?67 005367' 002614 NOV IHNF.NTYPE HNF ERROR 75 IR FNDISC GO CHECK BAD SECTOR FILE 03 767 004000 000672 4S: BIT IIITll,T.CS DCk1 001.406 BEQ 5S NO,,.,ST IE DLT 005367 000670 DEC T.DA .BACk UP TO SECTOR THAT WAS BAD 8li!2~ 005363' 002570 :~V '~~IS~TYPE iS~kC~=~~RIAD SECTOR FILE 012167 005357' 002560 5S: MOV IDLT.NTYPE :SeTUP DLT ERROR g2767 000004 175106 RPTERR: BIT 'BIT2,SR1 ;PRINTING SOFTERRORS ?1 1011 INE 55S ;NO, SkiP PRINT 04403 008°00' 005460' NSGNS,BEGIN,SOFT .-ASCII NESSAGE CALL WITH COMMON HEADER 012767 00 001 175160 MOV 11,ERRTYP :DATA ERROR ;*********************** ••• ** •• ** ••••• ******.******* ••• ********** 104406 000000' 005500' SOFERS,BEGIN,TABLE : ;******.**.*****.*** •• *••• ********.**** •• *••• ** •• **** •• ********** 6767 000566 000566 55S: CMP RETRY.LIMIT ;RETRY EXHAUSTED 1405 IEQ 6S ;YES. NO MORE RETRIES 5267 000556 INC RETRY 162705 000004 SUB 14,R5 ; ADJUST RETURN PC ••• 000205 RTS R5 ; ••• AND TRY AGAIN. 016700 000636 6S: IImV FUNC J RO : GE T FUNC TION CODE... : GP-2 042700 177761 IIC '-Clo RO 6· ••• STRIP IT... "GP-2 216.06.67 004730' 002434 IImV FNCLS t (RO).EXCEE ; ••• AND GET APPORPRIATE TEXT. : GP-2 7 • • °8~i~0. A¥~S,8EUI~~~A~gRl iilllfR=~=sI~~ECALL WITH CONNON HEADER I. • 80~438· MSGNS,BEGINtEXCEED ;ASCII MESSAGE CALL WITH COMMON HEADER , NORPT: CLR RE.TNY 5 RTS R5 48~ 88~~a5· 881~18. HRDRPT: A2¥Ns,BEUI~~~A,gR1 :ASCIJ MESSAGE CALL WITH COMMON HEADER o 166 SR NORt'T •• :ERROR WAS HCRC OR HNF OR OCK, POSITION TO LAST TRACK AND RECOVER :BAD SECTOR FJLES. IF DCK/HNf CHECK WHOLE ~A, IF HeRC CHECk IF :WE WERE DOING A RDNDR IF READ HDR THEN CHECk ONLY TRACk AND :CYLINOER. • LSTCYL,R1 :LAST TRACK 016701 000534 'NOBSC: NOV 02 1 ~:t 2~52 495 0027134 496 42 497 i7454 :"AkS.BS~AB.IRLCS " sea 12 1 RLAG DEt/X" SYSTEM EXERCISER" MACRO "'200 02-SEP-82 14:57 PAGE 3-8 DEC/X" SYSTEM EXERSIZER MACRO DEFINITION MODULE ;PRESENT POSITION HDRWD,RO MOV ·CLEAR OUT HEAD IIC ',00 RO r.:ti.OO RO,R 1 ;CALC SEEK DIFFERENCE SUB ;LOAD seEK DIFFERENCE Rl IRLDA MOV 5 ~ 00.· 58 ~,8Y97 000452 lIS '2~,aRLDA ;SET HEAD " SEEK IN J 3 00 52777 OOOO~5 g00444 ;SELECT DRIVE. (MFLG UESD) DRIVE,MFLG MOV ;SET UP SEEK lIS '6,MFLG 5 ~ 88 100 !t~t~ 88~d g88~t~ ;SEEK MOV MFLGflRLCS ~29 8~~~~ Y9gis2 00416 PC,W RDY ;WAIT FOR SEEK TO FINISH JSR 528 ;NOW SITTING ON LAST TRACK, RECOVER lAD SECTOR FilES AND CO~PARE ~i3 MaV lSTTRk,RO STARTING SECTOR 0 531 0031~0 016700 000460 ClR MFLG SWITCH TO TELL US MANUF OR FIELD FILE CLR FND FLAG TO INDICATE HEADER FOUND IN lIST ~18311 88~B~ MOV RO,IRLDA LOAD SECTOR TO READ ~35 881140 81.~7~ OOO,97lff 000372 2S: MOV '-~56.t"LMP TWO SECTOR READ ; GP-4 ~I! 83i~~ 176~1t 000356 ;GP-4 ~X ~~~~E';~iS :5:'Ei~=:ss. ;GP-4 als DRAVE,IRLCS INSERT DRIV[ ~39 3174 8!t~7~ 88841~0 888Ji~ ~l~ ~~,efl~~CS :wl~'C~~~ "iVE 540 ftftL761 176 72 TST aRLCS ;READ SUCCESSFUL?? 541 003.200 005777 000 26 IPl 41 ;YES. GO CHECK FOR SECTOR 54 003204 100023 j rgI st 888l~ 88 l?t aFt d 8811tt 11122 Ih54, lIR,I". 00 ;6 88J~~ 828~2~ ~'t 88112 oot~ 000350 ~~O 003226 ~51 88J~J2 ~~g~ V~2i~~' 005450' ;ij 003240 000167 11J200 55~ 00~1~~ 8~t~i? 00032~ 881252 000765 551 3254 114644 It. 559 560 ~~, 3260 64 StiR ~ P. ~I 65 ,~t~ t~ ~ lH~ ~1 14 000010 000176 991: MSGNI,IEGIN.NOSEC JSR R5.DROP JMP LOOPL CM' LSTBSC,RO 31: ==E ill 41: Fxt,R1 :g~ MaV ',2&.,R2 MaV (R1)+,R3 441: 8MJ 88S MaV (R1)+.R4 SWAB RR] RORI 3 :PAOOS ASR RR] ROR 3 "H » sd oLI ~~L=O INE]I CMP FST8SC.RO INE 21 8i'012 Ilfl :~68!R4 ~AJ :~~Rf~~TYPE IEQ 51: INE CMP ~a2fc=E~~ II~'Y=G. MANUF OR FIELD ;FIELD COMPARE AGAINST 77150 ;MANUFACTURING, AT END ~NO, GO lACK AND READ NEXT :ASCIJ MESSAGE CALL WITH COMMON HEADER ;AT END OF FJELD aAD i~gs ~8 e:s~ DRIVE :GET WHERt WE READ ;SkJP PAS 1.0. ETC •••••• ;ONLY 126 ENTRIES :GETCYLINDER :"INUS WE'RE DONE ;GET TRACK AND SECTOR :AlIGN PROPERLY 5S 6S ,,10.FUNC ;IS ERROR HCRC? ;NO GO LOOk FOR lAD SECTOR :we'RE WE DOING READ HEADER :PA005 :PA005 N 1 SEQ 13 PAGE 3-9 .77 000 52 000174 000202 IfH aNE alc CMP aEG aR CMP IN! INC BR DEC BNE TST aNE INC MaV aR t'7.P3 R3.HDRWD 71 81 61: R3.T.DA 81 71: FNO 91 81: R2 441 88S: MFLG 9S MFLG FSTIse.RO 2. 9.: HDRVD.RO MaV MaV lSTfi YL 6R1 lIe "0 RO.R fR SUB R1.IRLDA MaV lIS " BRLDA ,,6 .HDRtlD alT BEQ 10S IZO.IRLDA ORIVE,"FLG 'os: SIS '6,"FLG NOV M'LGtl.lCS PC WROY ~I~ FN6 11. INE RPTERR J'" NORPT J"", ',S: • :LOCATJONS USED ay MODULE • 'eTRY: .WOA. LIIIIT: .ao RLeS: •WORD RLIA: • ILDA: ;NO GO LOOK FOR BAD SECTOR ;YE S• CLEAR seETOR BITS ;BAD SECTOR ;IS THIS ONE IT??????? ;NO :CHECKED WHOLE FILE :NO ;WHICH WE DOING ;FIELD " WE'RE DONE ;NANUFACT. THEN SET UP FJELD ue I. ~; I .... .=B 1 w. il ,<, ~,. !c llKlK [lK AL": ALIAE : TIIP: T.es: r.&A: T.DA: • WOlD • WORD ...... .... ._g I I fi !][lI( :J'IJ'I : RLV12 SAE : rERlllNATOR • ; GP-4 : AL.V12 aA! ; GP-4 .... '.IIP: T.IAE: • WORD ....0 ~GI It: .WORB .WaR T.srAT: .WORD IlKlK Y~7m 7777 : SEEK. ,.: '80 DAWlSIe:. B 'STlse: .WOR I ------"'-_.j 8 2 RLAG DEC/X" SYSTE" EXERCISER MMACRO M1200 02-SEP-82 14:57 PAGE 3-10 DEC/X'1 SYSTEM EXERSIZER MACRO DEFINITION MODULE LST8SC: •WORD 0 632 00)176 000000 633 00 00 000000 MASk: •WORD 0 634 003602 000000 LSTCYL: .WOAD 0 635 003604 000000 lSTTRk: •WOAD 0 MASk2: •WOAD 0 6D 003606 000000 Clk: •WORD 0 63 883610 000000 CNT: • WORD 0 611 3612 ~oo MUlDRV: •WORD 0 6 9 003614 000 DlTCNT: •WORD 0 NUNBER OF DATA lATE ERRORS 640 003616 000000 FUNCTION TO BE PEAFORMED FUNC: •WOAD 0 641 003620 00000o HEADER WOAD (RDHDR A/W) HDAWD •WOAD 0 642 003622 000000 DIFFEAENCE WOAD (S eEk) DIFWD •WORD 0 643 003624 880000 DAIVE UNDER TEST (BITS 8,9) • WOAD 0 DRIVE 644 003628 00000 WOAklNG "DVID1" DVICE •WOAD 0 645 00363 000000 WOAD COUNT (WAITE) WCNTl •WOAD 0 646 003632 000000 ,WOAD COUNT (READ) WCNT2 •WOAD 0 647003634 000000 BUFIN •BLkW 256 • 648003636 8SECBF: .BLkW 25. :BAD SECTOR LIST 649 004636 0 CURMSG: • WORD 000000 650 88:720 CURADR: •WORD 0 651 722 000000 NXTADR: •WORD 0 652 004724 000000 NUMB: •WORD 0 653 0047~ FNCLST: NUlLX : OPCODE 0 UNUSED. 654 0047 MESSA 655 004732 005073' : 1 = WAT CHk. : 2 = RESET OR GET STATUS. 005107' "ES9 656 : 3 = SEEk. "ESt ; 4 = READ HEADER. "ES 2~' 88:74· Hi8~~: : 5 = WAITE. 659 004742 o 5065' "ESS : 6 = READ. 660 004744 005060' "ES7 NUlLX : 7 = READ NO-HEADEA (UNUSED). 661 004746 005404' 662 040 MES1: .ASCIZ 'NO DRIVES PRESENT S' 663 004750 116 111 004753 104 1'172 105 123 004756 126 004761 040 122 120 105 004764 123 105 040 124 004767 116 045 00477l 009 116 11 040 "ES2: .ASCIZ 'NO DRIVES LEFT .' 664 00477 111 004777 104 122 105 123 126 00~OO2 114 040 lD5 00 005 040 124 106 005010 045 005013 OO~ 111 "ES3: .ASCIZ 'DRIVE ' 12 665 005015 040 105 oo~o~ 104 122 MES4: .ASCIZ ' DROPPED .' 040 120 12 666 1'7 04 as 104 045 101 "ES5: .ASCIl 'READ HEADER' V8~ 122 667 8858f7 110 4 104 15 10~ 668 li3 o 05 V8~ "ES6: .ASCIZ 'SEEk' 800m2, 004H8 filh 18~ 1D 88' i IDi UJOl6 '8 8 m '8 SEQ 14 ;GP-2 ; GP-2 ; GP-2 I I I II i _o________________,.__ JI C 2 RlAG DEC'X11 SYSTEM EXERCISER" MACRO "1200 02-S£P-82 14:57 PAGE 3-11 DEC/Xll SYSTEM EXERSIZER ~CRD DEFINITION MODULE 101 MES7: .ASCIl 'READ' 122 105 104 000 127 ~~A "ES8: .ASCIl 'WAITE' 124 l~~ 111 MES8A: .ASCIl 'WAITE-CHECK' 127 122 055 105 124 103 105 110 000 l~! lBl ," MES9: .ASCIZ 'DAIVE AESET' 105 040 126 105 123 122 000 105 124 lOS MES10: .ASCIZ 'AETAY lIMIT EXCEEDEDI' 122 131 ~2 l~~ 111 040 115 111 105 1~~ 105 V3i 104 ~H ~~e 105 MES11: .ASCIZ 'ISEEK TO WAONG CYLINDERI' 045 040 105 113 117 124 V~~ 122 127 040 107 114 SEQ 15 ; GP-2 181 1'1 lY~ I 101 045 1~4 la, m ~2~ 101 040 124 000 til 124 M£S12: .ASCIl 'DATA LATEI' 114 105 111 MES13: .ASCIZ 'OAIVE EAAOAI' V~Q 045 lOt MES14: HiVV4 114 'V4 10J .ASCIl 'SOFT EAAOA • ~10 lU "ES15: .ASCJZ 'RlX LOAD UNIT DROPPED' Q3 t h! 104 619 680 il 8, tgJ "ES16: .ASCIZ 'HARD EAROA • ~10 116 NlDSC: .ASCIZ 'CANT RECOVER BAD SECTOR FilES' L..-._ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _.,____•__ ,..------------------------------------_._---D 2 SEQ 16 RLAG OECIXll ~YS'E" EXERCISER" MACRO "'200 02-S£P-82 14:57 PAGE 3-12 DECIXll SYSTE EXERSIZER NACRO DEFINITION MODULE I~rft 05 88J ' 885137 5 42 005345 OOSJ'i 681 005 5 682 005 57 005 S 684 1 0051 683 0051 885 . 685 0056 881~ 686 005400 005403 ~ 0054~ 0054 124 ~~Z 040 104 lOS 117 106 105 17 104 000 104 000 000 110 m ~8 103 116 000 040 045 = t:j 11m Y9mJ: t 9 945416 885414 &~~S' 695 885 f , . ,22 m~~~' 00'41 ;oo,d 6. 17 09t 1 77JO' g' g"B 777754 • ~ ,6 ~ g5440 o • 10 I:~f f1? 5446 ~~ 105 10~ 04 103 122 111 045 120 114 103 116 .' ~03 000 000 m 101 123 124 040 114 000 111 124 113 106 122 115 OPl: .ASCIZ 'OPI' DLT: .ASCII 'DLT' OCt(: .ASCII 'DCk' HNF: .ASCIZ 'HNF' HCRC: .ASCII 'HCRC' NXM: .ASCIZ 'NK'" NULLX: .ASCIZ • • CA: .ASCIZ 'I' .EVEN DAOP"S: MES3 NUNS MES4 177777 HOLEFT: ",,2 1 777 ABORT: ",51 1 7777 EXCEED: .W~AD 0 "E 10 ~'7777 HARD: TEA1: 77 fll 881t1~ Y9JJJJ' ~! BBttI1 ¥9"~J' ~fiHU .: "ES16 •WORD ~'7777 HOSEC: 0 W"S7 DAVERR: M,,'3 1 777 SOFT: MES14 HTYPE: •WORD 0 ~'7777 E 2 SEa 17 RLAG DEC/X1' SYSTEM EXERCISER .. MACRO ..1200 02-SEP-82 14:57 PAGE 3-13 DEC/X', SYSTE.. EXERSIZEft MCAO DEFINITION MODULE 3 885470 00.5152' 77145472 177777 75 76005474 005251' ~ , OOS476 177777 79 o ~ ~ 8S1~SS 881;~~: 733 005504 003554' 734 005506 OOJS56 , ~Jl 88J~l~ Y9,J~" UI 005514 177777 ~39 005516 000030 740 ~~l 743 744 000001 8DSEEk: "ES11 177777 DAOPLD: MES1S _ 177777 ;REGJSTERS OF RL11 · WORD T.CS tABLE: ••wORD T.BA •WORD T.DA •WORD T.MP TABLEY: .WORD T.STAT TABLEZ: .WORD 177777 •WORD 177777 PATCH: .REPT 24. .NLIST •WORD o .LIST .ENDR .END ;CONTROL AND STATUS REGISTER ;BUS ADDRESS REGISTER ;DISk ADDRESS REGISTER ;DISk DATA BUFFER ADDRFSS ;T.BAE ;HAS STATUS ON DRIVE ERROR ;T.STAT t-TER"INATOR ;TER"INA OR :24 DECIMAL PATCH LO(ATIONS : GP-4 ; GP-4 :PA005 ! '---------------------------------------_._--------------------" I ____ . J --------------------------------------------_._-_._----_._F 2 RLAG DEC/Xl1 SYSTEM EXERCISER" MCRO "1200 02-SEP-12 14:57 PAGE 3-14 SYfIBOL TABLE PDP44 = 100000 ABORT oo5424R LOOPL 00D44R PDP60 : 004000 gl~WD 88~'~~= ACSR ooo102R LSTBse 08 576R PDP70 : 010000 LSTCYL 0 02R ADDR 000006R DLTCNT 013616R PIRQI = 000004 LSTTRI( 003604R POPSP : 005726 MAP22S: 104416 8=~E ~t~~= =¥~I: 8&~ MSIC 003600R POPSP2= 022626 DROPLD 005474R ASI ooolO6R PRtltSS= 000002 MASIC2 003606R DR.,.S 005410R AS TAT 000104.R PRTY : 000000 "ESl 004750R AUTO : 000010 DRVERR 005454it PRTYO = 000000 "ES10 005123R AWAS ooo110R DRWlSIC 803572R PRTYl = 000040 DRVRTS 02204R "ES11 005152R BDSEEk oo5470R PRTY2 = 000100 "ES12 005203R DvtCE 003630R BEGIN OOOOOOR PRTY3 : 000140 MES13 005216R 81TO : 000001 DVID1 000014R PRTY4 : 000200 "ES14 005233R EAll 002042R 81Tl : 000002 PRTY5 = 000240 MES15 005251R 81Tl0 : 002000 EA22 082046R PRTY6 = 000300 "ES16 005277R ECCNE": 0 0100 PRTY7 : 000340 MES2 004774R ENDI'S: 104413 ~ PS = 177776 ENDS : 104410 "ES3 005015R BtT13 : 020000 PSW : 177776 ..ES4 005024R ERRTYP 000106R BIT14 : 040000 PUSH : 005746 "ES5 005037R EXCEED 005430R 81T15 : 100000 ~ES6 005053R PUSH2 = 02464G EXEC 002220R 81T2 : 000004 PWAFLG: 000002 EXITS : 104400 "ES7 005060R BIT3 :: 000010 ...tSI 005065R Q....22= 000010 FINI oo1622R 81T4 = 000020 RANDI = 104417 FNCLST 004730R "ESIA 005073R 81T5 = 000040 RANNlIt 000054R MES9 005107R FND 003570R BIT6 = 000100 RIUFEA 000130R "FLG 003564R FNDBSC ~3042R 81T7 = 000200 RIUFPA 888126R MODNM RBUFSl 132R NODSP 80000~R 0025 R ~~~Ise ~8eIJ2= RIUFVA 000124R "SGHS : 10440 fUNC 00362~R 000010441tR RDHDR 002164R ..SGSI = 104402 •IREAICS= Rl READ 002110R "SGS :: 104401 BR2 00001 R ~m'" ~i~4A REStRT 000424R ..,LDRV 803614R ISEC8F 0046nR ~=~FS: ~~4!~R RES1 000056R NlDSC 05315R 8TOOS :: 10441 RES2 000060R HCRe 005373R NePUOP= 000020 BUflN 0036 R RETRY 8035261 CAPRES: 000004 NOAPTY: 00m2 HDRWD 00H2JR RH70 = 01000 NOLEFT 0054 OR CDATAS. 104412 RLBA 003534R CDERCT 000144R ='CNT NORPT 1030 6R HADERS. 104405 NOSEC 05450R RLBAE 803542R HRDPAS 000050R RLCS 01532R ~=i~ 888~3t: NULL : 054 OOOH NULLX R CHICDR1 ooo506R RLDA 88 536R HRDRPT 124R RLMP 540R CICHNGItt 1 HTYPE 54t2R MIll 0478R NX.. 0540 R RPTERR 802702R CLie 10R RSTRT 00112R NXTADR Cl4724R I~=T 48: CLICPR!: ~ OPEN : 00000 RSTRT1 000434R IDd 000i2R ~~'SP$. 1~4f2R OPI 5353R RWER 93566R lMOOX.: o~ OTGAS: ~4 4~O R6 =1 0006 CONFIG ~ 56R IN.DP.AR- O~ .4 PARPRE= ,~ H'" R7 =1 0087 INIT 01 R PAseNT tLR SIADR 0001 2R ~2RA HJl' g 06: H R SEEI( 082140R CURADR ~ 2 RR PATi 8~il204 ~~ R 1=I~R.v I( TPRE 5: p-jl 0 PAl SETC..,. 81762R CU""SG ~ 2 SETRIA 01746R PA2 2044R ICTXTND: '4 i~O OATCICS· J4 411 SETUP 001626R PDPF11= 00002 DATERS· 1 J4. 40.. t~~T 88b70~: PDPLSI: 020000 OCI( 005363R 8 Kill : 8r'0888 IHO : 88¥2B roaO!4: E I 18 : • ASS. _ 88V ERRORS DETECTeD: 0 VIRTUAL MEMORY USED: 8 .-.--' ---~ SEa 18 i SETWBA 001730R SOFCNT 000042R SOFERI:.: 104406 SOFPAS 000046R SOFT 005460R SPOINT 000032R SPSll : 000040 SRl 000016R SR2 000020t\ SR3 000022R SR4 000024R START 000252R STAT 000026R SVRO 000062R SVRl 000064R SVR2 000066R SVR3 000070R SVR4 000072R SVR5 000074R SVR6 000076R SYSCNT 000052R TABLE 005500R TABLEY 005510R TABLEl 005512R TAG 000714R TAGl 801040R TAG2 01174R TERl 005442R TMP 003546R TRPDFD: 000023 T.SA 003552R T.IAE 003560R T.CS 003550R T.DA 003554R T.. 003556R T.STAT oo3562R USTACIC= 000001 VECTOR 000010R WASADR 000lO4R WBUFEA 000136R wauFPA 000134R WBUFRQ 000140R WBUFSl 000142R weNT1 003632R weNT2 oo3634R WOFR 000116R WOTO 000114R WRCHIC 002050R WRITE 002060R WTRDY 001472R XFLAG 000005R I, 13111 WORDS (52 PAGES) i I ! 1..-_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _._________________ --"- II - --------------l G 2 sea 19 I I RLAG DEt/X11 S'STE" EXERCISER MMACRO M'200 02-SEP-82 14:57 PAGE 3-15 SV.... TAILE DVNAf'lC fllEMORY: 19748 WORDS (75 PAGES) ELAPSED TlfIIE: 00:00:34 XRLAGO,XRLAGO/CR/-SP=DDXCON,XRLAGO I I '---------------------------------------,._----_.,--, -------- -._•. ..-,-- .. .. " .. - . ... , ,----------------------------_._------------_._-H 2 sea 20 PAGE 1 CREF VOl *3-286 Ifllo 81Tll =000001 :=~ gyaooo 81T3 81T4 = . 10 = 20 = 81TO 13-723 3-180 -334 -455 -506 3-314 232 -472 . -475 -419 -468 3-449 3-490 3-363 liit! ~ = ' I~ . • . IIIl .. aIrs alT6 8111 81 T8 j 3-183 3-334 3-455 3-510 1 3-483 3-287 3-351 3-464 3-464 3-464 3-385 3-439 3-334 3-455 3-455 3-321 3-720 3-292 13-638 1 = UUUfII,VU EIAkt • WH I aseCIF 0046. A 3-334 3-311 8TODI 1044 • .~ /Ut: '3-648 3-312 11 R 124 R ~~frs == eDA AI == J4 14 j4i = R == R 3-193 *3-335 '3-198 '3-637 I~~~I ,. R *3-205 *3-320 ::1 rl't *~~i~ - 81 "J ~t~= : CNT R i.i' CaN'IG ID eR R CSRA (UIlADR eUMSG 3-235 3-349 3-464 == 0002 00 •. 1 cue 3-197 3-345 3-461 == 11T9 CDEICT cMeT CHICORY CHICO.1 CkHNGI 3-189 3-338 3-459 3-550 I ~m =R 3-290 3-387 3-492 3-300 3-427 3-494 I 2 SEa 21 PAGE 2 CREF V01 HNf HltDSIT HIID,,"' ..OPAS HlDItPT HTYPe ICONT I COUNT ID.... -3-240 3-412 *3-242 13-643 *3-244 *3-199 '3-345 3-329 3-551 3-423 3-192 *3-194 3-181 '3-393 3-201 3-201 *3-337 ']-702 ]-414 *3-460 3-416 *3-493 13-422 3-605 3-487 3-547 *3-406 :1:t'X '3-707 '3-685 3-240 *3-269 3-577 3-338 '3-509 *3-474 *3-248 3-453 3-524 *3-264 3-538 3-601 3-424 3-501 3-574 '3-630 '3-645 3-589 *3-411 13-631 *3-415 *3-249 *3-271 3-592 *3-250 *3-274 3-598 *3-253 3-281 '3-642 3-254 *3-292 *3-256 3-294 3-260 3-403 *3-481 *3-486 *3-488 3-504 3-509 3-461 *3-477 J XR~ CREAT!D.Y MACRO SY~ CROSS REFERENCE f~.. ~~ INDPAR =000l4O INIT INTR IN1SRV kTPRES kTXTND LINIT LOOP lOOPL lStBsC l5T(Yl lSTTRk MAP221 MASk MASk2 MES1 , -15. , -'58 1-425 , -15. , -15. 3-495 '3-226 '3-191 '3-213 *3-215 '3-216 '3-158. *3-214 *3-211 '3-613 3-323 3-202 *3-222 *3-220 *3-221 3-387 *3-219 *3-223 88ltll = ·.II.~. t :J::~ J:~~J 120 004. SO R ;1.·.1.·.11 II. =. iIIJJt = 11111 IssIi .fE. (II "07 R 003564 R 1-656 • -_652'. , :t~13 -5 , -15 ~= =104401 ~V : _se HCPUOP NDAPTY •• ,Itt,! 88ft,s R R ~~t NOsec I ~ = NULL X • NULL !.I:I~ 'I.:tJl sl:Hi 3-6P 88i8U., 885893 !R I.·. St;S9 13-663 881. Rli R ggslll =. R sea PAGE 3 eREF V01 3-300 ,'1!"INCE5 -15 m30 R R 00226 R =0004 = 04 003 30 R 000702 R 000444 R 00357.6 R 003602 R 003604 R ='116 ... R 003.06 R ;IllY "IS NFlG MODNAN ~SP NSINS ON 2-5£P-82 AT 14:57 2 .3-162 '3-431 3-699 3-317 3-554 3-260 3-294 3-238 3-250 3-324 '3-632 I:~l' 3-341 3-593 '3-635 3-552 '3-634 3-545 3-586 3-345 3-349 '3-633 '3-636 J:~t~ 32ft! :tl} f -667 l:Iti J-6S5 ! :II -51 i" :':111,.,° , -, 51 '3-611 '3-672 *3-525 '3-627 -180 -5'0 '1-'58 il:~~ * :19a iJ:6Xi -44 3-183 3-550 3-287 3-511 3-608 3-112 :Iii' -'5 I 3-526 J-t'4 '3-687 '3-653 3-692 3-459 *3-601 '3-602 3-492 3-;05 221 k JCRLAGO CREAT!D a, MACRO ON 2-SEP-82 AT 14: 57 SYNIQL CROSSAE'ERENCE SYlIIQl v~ R FE,NCES NXlADR ~ A , -61 OPEN =. -1 158 SI GO!i]53 A OlOAS = 104420 PARPRE = 002n2 PASCNT 0000· A PAlCH· 005516 R PA1. R PA2l ... 4 R OPI Dr PDP'" =. . 2 POPO PIRQS POPS,. =: .... =: ..... 6 =1' : V0000 r ,-'58 -'5' -158 -158 -474 , -15. , .1)8 , -7 9 .3-)77 ,J:,g 15 , -151' "m"iIB It. ~'=i =&1 "E 'j-l' ' 5. ,'tt'l .. 'I ' -15 PRTY PRtYi 15 ,~J-1J -1 PRTY PRTV PRT'Y PRTY4 PAtYS PRT', PRTV PI psw PUSH = = . 0 =: a a .. ·· •. a 4 "1'28 = m 000 =1.76 :: 177776 a 005746 PUSH2=. Mf~G . . 2 11" 18 lAND = 1 417 ItANtUI .54 R ItIUfIA . 30 It fllllfPA SZ 12A R 124 R READ AOHCIII R RISTRT ~. ItR l'f .VA III AE~Y I' ~ A 8H A • I! r.' A ItL. ij;4~ R RLes 53. R , .15. *3-380 '3-394 CREF SEa 23 V01 i-3-158 158 158 1-3-158 158 3-158 3-158 3-382 3-387 '3-392 *3-507 13-615 3-329 3-15~ 15 J-15 1 3-158 3-158 158 J-158 3-158 3-158 3-158 3-158 3-158 3-158 3-338 *3-356 3-383 'J- I '3- 1 '3-158 1S '3J-15 , -15 3-431 '3-158 -158 '-1~1 ' -t '-1'8 , - 58 , -118 '1-1 • '3-15' , -15 , -15 , -15 :3:111 '3-158 3-2J5 '·'1 I:J,i Tn I-I, -18 3-380 3-558 '3-415 ;:q *3-444 3-495 *3-497 III * -at 1:1' - 4 -215 -441 -286 '8 - 28 '02: , :1'1 "'~8 - 58 - 58 , -681 PAGE 4 2 :IP , - 5 27 , J--4ft7 '3-18 ria ,r'36-t '3-612 3-331 L 2 XILAGO . CREATEO IY MCRO ON 2-SEP-82 AT 14:57 sv... CROSS REFERENCE RI!§I1NCES SYMaOL VALUE RLDA RLMP IPTERR ASTRT ASTln1 Mt R6 003536 R 003J~0 R IU! -I . 17 =mR 17 SlMR .12 00 140 R R SEEk SETC.. SETllA 1146 A SETUP SETUIA sa,effT SO'EII =1 06 sa, PAl =6R SO'T 54tO R SPOINT SPSll ==~R SR1 , .... 2 R SA2 R R START StAT SVRO . .. ·1A 1'762 • '1· um= 1'8 .. r .~0 '3-4 "-158 .I:lti '3-158 '3-158 '3-157t SVlll SVII~ SVA a ... R A SVA4 SVR6 SYSCNT TI:l T . IY T_EZ TAG 7 R SVAS if. R ~51 =R fAG} fAI fl 1 ,lIP == 4U 54! R 1 2 -46 :~~i -402 -607 3-186 304 K'5 Pi].4~ PAGE 5 CAE' VOl l4 r 1:~j6 -52 3-407 -5 6 -412 4 -51 -4 8 3-411 3-596 3-458 3-433 3-539 3-417 J-5J7 -5 5 J-434 -541 3-419 3-600 '3-617 '3-188 3-307 3-310 ·3-319 .3-447 '3-628 3-385 3-439 3-490 '3-411 '3-382 409 , -355 3-404 3-494 '3-718 158 -232 3-314 3-363 '3-160 3-187 3-310 3-494 '3-131 1- 3-454 3-603 3-437 '3-616 3-456 '3-614 3-451 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-537 :lJ8 , -158 1-15 '~151 1-158 ' -151 1 51 RR :~~ 88Y714 R 1~O R -42~ r"-lSI r' i- -379 , -310 -197 '-3 7 13-15 "-158 , -15 , -28 '3-158 '3-158 O:UI 2~ = ER III 1APO'0 ..J, -463 SEQ 24 rr it.IR *r~51 - 04 • ..51 S:U , -15 ,, .'J -1 , -15 1 , -15 , -7 5 '-7 6 ,J:~Jt -i59 ·* --1541i' -15 -15 -15 -15 -15 -15 , -4 4 :'f , -1 a -1 8 :111 L -151 -15 -158 3-273 , J-463 -158 , - 151 ' -15 15 -15 15 -15 ,, 1 , 1 ,'3-215 :t13 -158 -1J8 :t51 -158 r.151 'r S8 -158 -15 15 1-15 '3-158 '3-158 S8 , -158 , -158 , -158 . 2 IRLAGO CREAtED 8Y *CRO ON 2-5£P-82 AT 14:51 ~= CROSS REFERENCE S T.SA T .IAE T.CS VA~. '52 R 00 0 R 005 R T.GA T ... T.SlAT USTAC~ VECTOR WAIAGR WlUfEA WlUFPA =1Hz . R :=I''fMZ weNt VCNT2 WDfR YOlO IIRCHIC WRITE WTROY .FLAG ~ 't8 001'54 . . 556 R R 1 .10 R · 104 R 000112 R 0001 R -I'~ ~'IRENCES •• 3 '-622 • -4 5 ·1-441 -442 .I:l -17 *3-'1' -2 1 I-~H , -1 I .~ 2 '1-'58 3-)78 3- 17 '3-15 ')-158 , -151 1'·'H0 -15 iii"! ')-1rp ~ R R 88··· R ... R ·A' R R , -158 R -3 -2 9 , -158 0050 R 0 R 1m R , '1-}58 * - 01 *j-2U 3-369 )-301 * -302 *3-299 .J-160 * -161 '3-399 '3-401 3-216 SEQ 25 PAGE 6 CREF V01 13 , J-6252 3-449 )-580 -279 ·3-458 3-425 3-468 63 '3*3-4 i 8 '3-626 3-402 3-407 '3-646 '3-647 13-328 3-527 3-472 733 , -6i4 3-7 5 3-475 1- 3-734 3-540 3-604 3-479 3-483 13-621 __________________________________________________________________ u _ _._ _ _ _ _ __ N 2 XRLAGO CREATeD IY "ACRO ON 2-SEP-82 AT 14:57 PAGE 7 CREF V01 MCRO NAME REFERENCES IKIIIOD 11-'~4 IREAK 3-334 3-455 3-464 11-~ 2 alOb 1'- 46 CItDATA 11-282 3-312 ClltSP 1,-149 DATACK "-291 DAlERR ,'-'75 DFSEVN 3-158 3-158 3-158 3-158 1'-314 3-158 3-158 3-158 DSEVNl 3-158 3-158 3-158 3-158 "-324 END 3-351 "-2'2 ENDIT 3-197 "-203 ENDNOO "-j~8 EQUAlS J-158 ',EXIT 11-1570 -427 GETPA J-189 "-~7J GWlUFF -300 HlF8RIC 1'-2 7 HRDER 3-290 3-338 3-461 "-1~5 IOIIIOD 1'-1 0 IOMDP 1'-144 IONOOR 11-140 IOMOOX 3-158 "-136 JllAP22 11-277 3-387 ftOOULE 3-158 1'-29 1'-191 195 180 3-183 3-287 3-345 -510 -550 "SGS "-199 1,-132 NlIeMOD OTGA "-23~ PIRQ 3-431 "-216 RAND 3-235 "-161 5• • "-128 $OfEI 3-494 "-181 SEQ 26 ~CRO CROSS REFERENCE 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-158 3-349 3-459 3-492 3-505 3-506 ,,- !' =8,. '1- 1- ~------------------------------------------------------------------------
Home
Privacy and Data
Site structure and layout ©2025 Majenko Technologies