Trailing-Edge
-
PDP-10 Archives
-
saio_sources
-
4sources/sercod.mac
There are 51 other files named sercod.mac in the archive. Click here to see a list.
;[USC-ISIB]<4.ISI-MONITOR>SERCOD.MAC.260, 31-Mar-81 13:37:56, Ed: DALE
;#26 Support IBM-3420 compatable Tape drives on SA10 channel
;#25 Support IBM-3330 compatable disks on SA10 channel.
;<4.MONITOR>SERCOD.MAC.6, 3-Jan-80 08:10:29, EDIT BY R.ACE
;UPDATE COPYRIGHT DATE
;<4.MONITOR>SERCOD.MAC.5, 11-Apr-79 15:58:53, Edit by LCAMPBELL
; Make offsets in KS halt status block contiguous
;<4.MONITOR>SERCOD.MAC.4, 11-Mar-79 12:56:05, EDIT BY KONEN
;UPDATE COPYRIGHT FOR RELEASE 4
;<4.MONITOR>SERCOD.MAC.3, 1-Feb-79 11:46:24, EDIT BY MILLER
;FIX DEFS FOR MOS PSEUDO SBSUS DIAGS
;<4.MONITOR>SERCOD.MAC.2, 3-Dec-78 11:40:01, EDIT BY R.ACE
;TCO 4.2102 - ADD SYMBOLS FOR CONFIGURATION-STATUS-CHANGE ENTRY
;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
; OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
;COPYRIGHT (C) 1976,1977,1978,1979,1980 BY DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
; SAIO Changes Copyright 1982, All Rights Reserved
; University of Southern California
UNIVERSAL SERCOD - CODES AND FIELDS FOR SYSERR FACILITY
SEARCH MACSYM ;NEED MACROS
SALL
;THIS FILE CONTAINS STRUCTURE INFORMATION FOR EACH OF THE SYSERR
;EVENTS. THE EVENT CODE FOR EACH EVENT IS FOLLOWED BY THE
;DESCRIPTION OF THE BLOCK WHICH RECORDS IT.
;***********************************
; SYSTEM RELOADED
;***********************************
SEC%RL==101 ;EVENT CODE
RL%SVN==0 ;SYSTEM NAME (ASCIZ PTR)
RL%STD==1 ;TIME OF SYSTEM BUILD (UNIVERSAL FMT)
RL%VER==2 ;SYSTEM VERSION NUMBER
RL%SER==3 ;APR SERIAL NUMBER
RL%OPR==4 ;OPERATOR ANSWER TO WHY RELOAD (ASC PTR)
RL%HLT==5 ;BUGHLT ADDRESS (IF AUTO RELOAD)
RL%FLG==6 ;FLAGS
RL%SIZ==7 ;SIZE OF DATA BLOCK
NSVNT==32 ;SIZE OF THE MONITOR NAME FIELD
.RLBSZ==20 ;SIZE OF THE "WHY RELOAD" ANSWER STRING
RL%LEN==RL%SIZ+NSVNT+.RLBSZ ;SIZE OF WHOLE BLOCK (INCL 2 STRINGS)
;*********************************
; BUGHLT/BUGCHK
;*********************************
SEC%BG==102 ;EVENT CODE
BG%SVN==0 ;SYSTEM NAME (ASCIZ)
BG%SER==1 ;APR SERIAL NUMBER
BG%VER==2 ;MONITOR VERSION
BG%SDT==3 ;TAD OF MONITOR BUILD
BG%FLG==4 ;FLAGS
BG%CHK==1 ;BUGCHK TYPE CODE
BG%INF==2 ;BUGINF TYPE CODE
BG%HLT==3 ;BUGHLT TYPE CODE
BG%ADR==5 ;ADDRESS OF HLT/CHK
BG%JOB==6 ;FORKX,,JOB NUMBER
BG%USR==7 ;USER NUMBER
BG%PNM==10 ;PROGRAM NAME (SIXBIT)
BG%MSG==11 ;MESSAGE (ASCIZ)
BG%ACS==12 ;ACS
BG%PIS==32 ;PI STATUS
BG%RCT==33 ;REGISTER COUNT
BG%REG==34 ;REGISTERS (MAXIMUM OF 4)
BG%NAM==40 ;SIXBIT NAME OF CHECK
BG%DAT==41 ;TIME AND DATE OF BUGHLT/BUGCHK
BG%CNT==42 ;NUMBER OF BUG CHECKS SINCE STARTUP
BG%APS==43 ;APR FLAGS (CONI APR,)
BG%PGS==44 ;PAGER FLAGS (CONI PAG,)
BG%PGD==45 ;PAGER DATA (DATAI PAG,)
BG%ERG==46 ;ERROR REGISTER
BG%SIZ==47 ;SIZE OF DATA BLOCK
BG%LEN==BG%SIZ+33 ;LENGTH OF TOTAL BLOCK, INCL 2 STRINGS
;***********************************
; FRONT END ERRORS
;***********************************
SEC%FE==130 ;EVENT CODE
FE%FJB==0 ;FORK NUMBER,,JOB NUMBER
FE%DIR==1 ;DIRECTORY NUMBERS
FE%ID==2 ;FRONT END SOFTWARE VERSION
FE%NAM==3 ;SIXBIT NAME OF PROGRAM
FE%DEV==4 ;PROTOCOL DEVICE CODE (1B0=UNKNOWN)
FE%PTR==5 ;-LENGTH OF DATA,,START OF DATA
FE%DTE==6 ;DTE NUMBER
FE%BYT==7 ;# OF -11 BYTES IN THE MESSAGE
FE%INF==10 ;START OF ERROR INFORMATION
FE%SIZ==10 ;SIZE OF DATA BLOCK(HEADER)
FE%LEN==FE%SIZ ;MINIMUM BLOCK TO ALLOCATE
;FRONT END RELOAD ENTRY. GIVES -11 REBOOT INFORMATION
SEC%11==131 ;-11 RELOAD
R1%NUM==0 ;-11 NUMBER
R1%STS==1 ;RELOAD STATUS BITS
.R1GTF==1B0 ;GTJFN FAILED FOR DUMP FILE
.R1OPF==1B1 ;OPENF FAILED FOR DUMP FILE
.R1DPF==1B2 ;DUMP FAILED
.R110E==1B3 ;TO -10 ERROR ON DUMP
.R111E==1B4 ;TO -11 ERROR ON BOOT
.R1ASF==1B5 ;ASGPAG FAILED ON DUMP
.R1RLF==1B6 ;RELOAD FAILED
.R1PDF==1B7 ;-11 DIDN'T POWER DOWN
.R1PUF==1B8 ;-11 DIDN'T POWER UP
.R1RMF==1B9 ;ROM DID NOT ACK THE -10
.R1BSF==1B10 ;-11 BOOT PROGRAM DIDN'T MAKE IT TO
; THE -11
.R1NRL==1B11 ;-11 TOOK MORE THAN 1 MINUTE TO RELOAD.
; WILL CAUSE A RETRY
.R1RTC==6B35 ;RETRY COUNT
R1%FNM==2 ;FILE NAME POINTER
R1%ERW==3 ;-11 ERROR WORDS AS FOLLOWS:
;BITS 2-17 FAULT CODE AS 3 RAD50 CHARACTERS
;BITS 20-35 PARITY REGISTER
;THIS FIELD IS VALID ONLY IF IT IS NON-ZERO
R1%SIZ==4 ;NUMBER OF ENTRIES
R1%LEN==R1%SIZ+^D20 ;ALLOW LONG STRING
;HALT STATUS BLOCK FOR KS10
HSBADR==400 ;PHYSICAL ADDRESS OF HSB
SEC%HS==133 ;EVENT CODE
HS%COD==0 ;HALT STATUS CODE - PHYSICAL LOCATON 0
HS%PC==1 ;PROGRAM COUNTER - PHYSICAL LOCATION 1
HS%PTR==2 ;HALT STATUS BLOCK OFFSET POINTER
CS%PTR==3 ;CLOK STOP BLOCK OFFSET POINTER (UNUSED)
HS%HDZ==4 ;SIZE OF HEADER
; HALT STATUS BLOCK
HS%NUL==0 ;MAGNITUDE
HS%PC==1 ;PC
HS%HR==2 ;CURRENT INSTRUCTION (HR)
HS%AR==3 ;AR
HS%ARX==4 ;ARX
HS%BR==5 ;BASE REGISTER
HS%BRX==6 ;BASE REGISTER EXTENSTION
HS%ONE==7 ;CONSTANT ONE
HS%EBR==10 ;EXEC BASE REGISTER
HS%UBR==11 ;USER BASE REGISTER
HS%MSK==12 ;MASK
HS%FLG==13 ;MICROCODE STATUS FLAGS
HS%PI==14 ;PI STATUS
HS%X1==15 ;1,,1
HS%T0==16 ;T0
HS%T1==17 ;T1
HS%VMA==20 ;VMA FLAGS,,VMA
HS%FE==21 ;FE,,SC
HS%HSZ==22 ;HALT STATUS SIZE
HS%LEN==HS%HSZ+HS%HDZ
;************************************
;PROCESSOR PARITY TRAP
;************************************
SEC%PT==160 ;EVENT CODE
PT%PFW==0 ;PAGE FAIL WORD
PT%BDW==1 ;BAD DATA WORD
PT%GDW==2 ;GOOD DATA WORD
PT%USR==3 ;USER NUMBER
PT%JOB==4 ;FORKX,,JOBN
PT%PGM==5 ;PROGRAM NAME (SIXBIT)
PT%PMA==6 ;PHYSICAL MEMORY ADDRESS
PT%TRY==7 ;FLAGS,,RETRY COUNT
PT%HRD==1B1 ;HARD ERROR
PT%CCF==1B2 ;CACHE FAILURE
PT%CCH==1B3 ;CACHE IN USE
PT%ESW==1B4 ;ERRORS ON SWEEP TO CORE
PT%SIZ==10 ;SIZE OF DATA BLOCK
PT%LEN==PT%SIZ ;LENGTH OF TOTAL BLOCK
;*************************************
;PROCESSOR PARITY INTERRUPT
;*************************************
SEC%PI==161 ;EVENT CODE
PI%CNI==0 ;CONI APR
PI%ERA==1 ;ERA
PI%FPC==2 ;PC
PI%SWP==3 ;NUMBER OF ERRORS THIS SWEEP
PI%AAD==4 ;LOGICAL AND OF BAD ADDRESSES
PI%OAD==5 ; " OR OF BAD ADDRESSES
PI%ADA==6 ; " AND OF BAD DATA
PI%ODA==7 ; " OR OF BAD DATA
PI%SBD==10 ; " SBUS DIAG FUNCTION DATA (11 WDS)
PI%NSD==^D10 ;NUMBER OF SBUS DIAG FN WORDS
PI%ADD==22 ;FIRST 10. BAD ADDRESSES
PI%DAT==34 ;FIRST 10. BAD DATA WORDS
PI%CDA==46 ;CORE REF OF FIRST 10. BAD ADDRESSES
PI%NBW==^D10 ;NUMBER OF BAD WORDS
PI%FFL==60 ;FLAGS
PI%SIZ==61 ;SIZE OF DATA BLOCK
PI%LEN==PI%SIZ ;LENGTH OF TOTAL BLOCK
PI%DMA==4 ;SBUS CONTROLLER # OF THE DMA
;*****************************************
;NEW PARITY FORMAT FOR EXTENSIBLE CONTROLLERS
;*****************************************
SEC%P1==162
PI%CN2==:0 ;CONI APR
PI%ER2==:1 ;ERA
PI%FL2==:2 ;FLAGS
PI%PC2==:3 ;PC
PI%ERC==:4 ;ERROR COUNT
PI%AA2==:5 ;LOGICAL AND OF BAD ADDRESSES
PI%OR2==:6 ;LOGICAL OR OF BAD ADDRESSES
PI%AD2==:7 ;LOGICAL AND OF BAD ADDRESSES
PI%OD2==:10 ;LOGICAL OR OF ABD ADDRESSES
PI%SB2==:11 ;-COUNT OF CONTROLLERS,,FIRST OFFSET
PI%BAD==:12 ;FIRST TEN BAD ADDRESSES
PI%FAT==:1B0 ;FLAG BIT IN PI%BAD TO SAY UNRECOVERABLE
.PIBAD=:<MASKB 6,35> ;ADDRESS FIELD WITHING PI%BAD
PI%DA2==:24 ;FIRST TEN BAD WORDS
PI%MDA==:36 ;MEM REFERENCES OF FIRST TEN WORDS
PI%NB2==:12 ;# OF BAD ADDRESSES
PI%SBA==:50 ;START OF SBDIAG DATA
PI%SZ2==:51 ;SIZE OF FIXED LENGTH BLOCK
PI%MXS==:40*2 ;MAX # OF SBDIAG'S
PI%LN2==:PI%SZ2+PI%MXS ;MAX SIZE OF BLOCK
;DEFINITIONS FOR MOS PSEUDO-SBUSDIAG FUNCTIONS
PI%MEA==:3 ;OFFSET FOR ERROR ADDRESS
PI%MBN==:4 ;OFFSET FOR BLOCK NUMBER
PI%MSB==:5 ;OFFSET FOR SPARE BIT NUMBER
PI%MSY==:6 ;OFFSET FOR SYNDROME
.PIMSZ==:4 ;SIZE OF MOS PSEUDO SBUS AREA
;STATUS BLOCK ENTRY GENERATED ON VARIOUS ERRORS
;*******************************
;STATUS BLOCK ENTRY
;***********************************
SB%BLK==:163 ;ENTRY TYPE
SB%API==:0 ;APRID
SB%APR==:1 ;CONI APR
SB%PIC==:2 ;CONI PI,
SB%PGD==:3 ;DATAI PAG,
SB%PGC==:4 ;CONI PAG,
SB%UP0==:5 ;UPT LOCS 424-427
SB%ERA==:11 ;RDERA
SB%RHC==:12 ;CONI RH20, FOR ALL 8 RH'S
SB%RHL==:^D8 ;LENGTH OF DATA
SB%DTC==:22 ;CONI DTEN,
SB%DTL==:4 ;# OF DTE ENTRIES
SB%EP0==:26 ;EPT LOCS 0-37
SB%EP1==:66 ;EPT LOCS 140-177
SB%UP1==:126 ;UPT LOCS 500-503
SB%6==:132 ;AC BLOCK 6 REGS 0-3
; FIVE REGS ARE 0-3 AND 12
SB%7==:137 ;AC BLOCK 7 REGS 0 AND 2
; 3 REGS ARE 0-2
SB%SBD==:142 ;START OF SBDIAG DATA
SB%SBL==:50 ;MAX # OF SBDIAGS WORDS TO USE
SB%MAX==:SB%SBD+1+SB%SBL ;MAX LENGTH OF THIS ENTRY
;***********************************
;CONFIGURATION STATUS CHANGE
;***********************************
;THIS ERROR IS LOGGED BY MTCON
SEC%CS==115 ;ENTRY TYPE
CS%OPW==0 ;WORD CONTAINING OPERATION CODE
CS%OPR==77B17 ;MASK FOR OPERATION CODE FIELD
CS%ADV==0 ;CODE FOR ATTACH DEVICE
CS%DDV==1 ;CODE FOR DETACH DEVICE
CS%HTP==1 ;HARDWARE TYPE INFORMATION
CS%CTP==37B17 ;CHANNEL TYPE
CS%UTP==37B35 ;UNIT TYPE
CS%DNM==2 ;SIXBIT LOGICAL DEVICE NAME
CS%ADS==3 ;DEVICE ADDRESS AND SERIAL NUMBER
;(FROM MTOPR .MOINF WORD .MOISN)
CS%RSW==4 ;WORD CONTAINING OFFSET TO REASON STRING
CS%RSN==0,,-1 ;OFFSET FROM CS%OPW TO ASCIZ REASON STRG
CS%SIZ==5 ;SIZE OF FIXED PORTION OF ENTRY
;***********************************
;MASSBUS DEVICE ERROR
;***********************************
SEC%MB==111 ;EVENT CODE
MB%NAM==0 ;DEVICE NAME (IF AVAILABLE)
MB%VID==1 ;VOLUME ID (SIXBIT)
MB%TYP==2 ;CHANNEL,,DEVICE TYPE - SEE PHYPAR
MB%LOC==3 ;LOCATION OF ERROR - SECTOR OR FILE,,RECORD
MB%FES==4 ;FINAL ERROR STATE - DEVICE DEPENDANT
MB%CNI==5 ;CONI INITIAL
MB%CIF==6 ;CONI FINAL
MB%SEK==7 ;NUMBER OF SEEKS
MB%RED==10 ;NUMBER OF BLOCKS/FRAMES READ
MB%WRT==11 ;NUMBER OF BLOCKS/FRAMES WRITTEN
MB%FIL==12 ;FILENAME (POINTER)
MB%USR==13 ;USER MAKING REQUEST (POINTER)
MB%PGM==14 ;PROGRAM RUNNING
MB%D1I==15 ;DATAI PTCR INITIAL
MB%D1F==16 ;DATAI PTCR FINAL
MB%D2I==17 ;DATAI PBAR INITIAL
MB%D2F==20 ;DATAI PBAR FINAL
MB%UDB==21 ;UNIT DATA BLOCK FOR JOB 0 BAT BLOCKS
MB%IRS==22 ;IORB STATUS WORD, IS.ERR IF HARD (SEE PHYPAR)
MB%SRE==23 ;SOFT READ ERRORS
MB%SWE==24 ;SOFT WRITE ERRORS
MB%HRE==25 ;HARD READ ERRORS
MB%HWE==26 ;HARD WRITE ERRORS
MB%PS1==27 ;POSITION, CYL IF DISK, FILE IF TAPE
MB%PS2==30 ;SURF/SEC OR RECORD
MB%CS0==31 ;CHANNEL LOGOUT 0
MB%CS1==32 ;CHANNEL LOGOUT 1
MB%CS2==33 ;CHANNEL LOGOUT 2
MB%CC1==34 ;FIRST CCW
MB%CC2==35 ;SECOND CCW
MB%MPE==36 ;COUNT OF MPE
MB%NXM==37 ;COUNT OF NXM
MB%FEC==40 ;FINAL ERROR COUNT
MB%CAD==41 ;CHANNEL ADDRESS
MB%UAD==42 ;UNIT ADDRESS
MB%SPE==43 ;SOFT POSITIONING ERRORS
MB%HPE==44 ;HARD POSITIONING ERRORS
MB%OVR==45 ;OVERRUNS
MB%ICR==46 ;INITIAL TCR
;THE FOLLOWING LOCATIONS ARE THE UNITS MASSBUSS REGISTERS IN ORDER
;FINAL CONTENTS,,INITIAL ERROR CONTENTS
MB%REG==47
;
;DX20 MASSBUS INFORMATION
;
DX%VER==MB%REG ;DX20 MICROCODE VERSION NUMBER
DX%MBI==DX%VER+1 ;LENGTH,,OFFSET OF MASSBUS REGISTERS
DX%ESI==DX%MBI+1 ;LENGTH,,OFFSET OF EXTENDED STATUS
DX%MBR==DX%ESI+1 ;DX20 MASSBUS REGISTERS
DX%ESR==DX%MBR+^D22 ;ROOM FOR 0-6,20-24,26-37
MB%SIZ==DX%ESR+^D20 ;SIZE OF DATA BLOCK
MB%LEN==MB%SIZ ;TOTAL LENGTH, CURRENTLY NO STRINGS REPORTED
;#25 ***********************************
;#25 SA10 Disk Error Event Code
;#25 ***********************************
SEC%SD==121 ;#25 SA10 disk error
;#25 most of entries parallel massbus error event (SEC%MB=111)
SD%IOW==MB%CC1 ;#25 IOW from transfer
SD%STS==MB%CC2 ;#25 device specific status bits
SD%ES1==MB%REG ;#25 error status (base+1)
SD%ES2==SD%ES1+1 ;#25 error status (base+2)
SD%SEN==SD%ES2+1 ;#25 sense bytes (6 words)
SD%SCP==SD%SEN+6 ;#25 Standard Channel Program pointer (CC1SCP)
SD%CCP==SD%SCP+1 ;#25 Current Channel Program pointer (CC1CCP)
SD%XCP==SD%CCP+1 ;#25 eXtra Channel Program pointer (CC1XCP)
SD%CP1==SD%XCP+1 ;#25 Channel Program (15 wds)
SD%CP2==SD%CP1+15 ;#25 eXtra Channel Program (15 wds)
SD%CPE==SD%CP2+15 ;#25 end of CP2 (0 WDS)
IFG SD%CPE-MB%LEN,<PRINTX SD%LEN too long> ;#25 .
;#26 ***********************************
;#26 SA10 Magtape Error Event Code
;#26 ***********************************
SEC%ST==122 ;#26 SA-10 magtape error
;#26 most of entries parallel massbus error event (SEC%MB=111)
ST%DVA==MB%REG ;#26 Device address for this operation
ST%ES1==MB%REG+1 ;#26 Error status (base+1)
ST%ES2==MB%REG+2 ;#26 Error status (base+2)
ST%SEN==MB%REG+3 ;#26 Sense bytes (6 words)
;***********************************
;DN64 EVENT CODE
;***********************************
SEC%6S==232 ;DN64 EVENT
END