Google
 

Trailing-Edge - PDP-10 Archives - BB-M780C-SM - monitor-sources/sercod.mac
There are 51 other files named sercod.mac in the archive. Click here to see a list.
; UPD ID= 2187, SNARK:<6.1.MONITOR>SERCOD.MAC.17,   5-Jun-85 11:08:19 by MCCOLLUM
;TCO 6.1.1406  - Update copyright notice.
; UPD ID= 4892, SNARK:<6.MONITOR>SERCOD.MAC.16,   2-Oct-84 09:34:25 by GRANT
;Add definitions for KLIPA error-log packet (code 246)
; UPD ID= 4870, SNARK:<6.MONITOR>SERCOD.MAC.15,  24-Sep-84 16:15:14 by GRANT
;Add definitions for KLIPA statistics packet (code 241)
; UPD ID= 4534, SNARK:<6.MONITOR>SERCOD.MAC.14,  14-Jul-84 11:45:20 by PURRETTA
;Update copyright notice
; UPD ID= 3709, SNARK:<6.MONITOR>SERCOD.MAC.13,  21-Feb-84 09:10:40 by GRANT
;Add KP%CHN
; UPD ID= 3232, SNARK:<6.MONITOR>SERCOD.MAC.12,  29-Nov-83 20:08:34 by MCLEAN
;ADD CI%LOC AND CI%UDB
; UPD ID= 3221, SNARK:<6.MONITOR>SERCOD.MAC.11,  28-Nov-83 10:23:31 by GROSSMAN
;Add definitions of KP%PE0 and KP%PE1 (PCB error logouts)
; UPD ID= 3178, SNARK:<6.MONITOR>SERCOD.MAC.10,  16-Nov-83 22:27:08 by GROSSMAN
;Add bit KP%NI to KLIPA definitions (it means this entry concerns a KLNI)
; UPD ID= 2058, SNARK:<6.MONITOR>SERCOD.MAC.9,  22-Mar-83 08:06:23 by WACHS
;More TCO 6.1355
; UPD ID= 2003, SNARK:<6.MONITOR>SERCOD.MAC.8,  16-Mar-83 04:51:32 by WACHS
;More TCO 6.1355
; UPD ID= 1935, SNARK:<6.MONITOR>SERCOD.MAC.7,   7-Mar-83 23:09:59 by CDUNN
;More TCO 6.1127 Add EL%NOD to MSCP error packet
; UPD ID= 1761, SNARK:<6.MONITOR>SERCOD.MAC.6,   4-Feb-83 05:16:26 by WACHS
;TCO 6.1355 - Add KLIPA, MSCP error packets
; UPD ID= 312, SNARK:<6.MONITOR>SERCOD.MAC.5,  18-Jan-82 10:47:25 by PLATUKIS
;TCO 5.1677 - Add r1rtm and redefine r1dpf
; UPD ID= 1972, SNARK:<5.MONITOR>SERCOD.MAC.4,  11-May-81 10:09:55 by PAETZOLD
;TCO 5.1318 ADD NEW DATA WORDS TO PROCESSOR PARITY TRAP ENTRY
; UPD ID= 1828, SNARK:<5.MONITOR>SERCOD.MAC.3,  17-Apr-81 10:00:07 by WACHS
;TCO 5.1288 ADD STATISTICS DEFINITIONS
; UPD ID= 1366, SNARK:<5.MONITOR>SERCOD.MAC.2,  18-Dec-80 10:19:53 by WACHS
; TCO 5.1206 ADD DEFINITIONS FOR TM78
; UPD ID= 101, SNARK:<4.1.MONITOR>SERCOD.MAC.6,   6-Dec-79 10:40:17 by SCHMITT
; TCO 4.1.1050 - Increase BG%LEN to allow for maximum system name size
;<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  BE  USED
;OR COPIED ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
;COPYRIGHT  (C)  DIGITAL  EQUIPMENT  CORPORATION  1976, 1985.
;ALL RIGHTS RESERVED.


	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+42		;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
	.R1RTM==1B2		;OVERDUE TO-10 TRANSFER ABORTED
	.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		;OVERDUE TO-11 TRANSFER ABORTED
	.R1NRL==1B11		;-11 TOOK MORE THAN 1 MINUTE TO RELOAD.
				; WILL CAUSE A RETRY
	.R1DPF==1B12		;DUMP FAILED
	.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%EPA==10			;EPT OFFSET PHYSICAL ADDRESS
  PT%EPD==11			;EPT OFFSET DATA
  PT%UPA==12			;UPT OFFSET PHYSICAL ADDRESS
  PT%UPD==13			;UPT OFFSET DATA
PT%SIZ==14			;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			;BINARY UNIT NUMBER IF MAGTAPE, 0 IF DISK
  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

;TM78 MASSBUS INFORMATION
T8%REV==MB%REG+22		;ROM LEVELS (8 9-BIT FIELDS)
T8%XSN==T8%REV+2		;EXTENDED SENSE INFORMATION AT ERROR

MB%SIZ==DX%ESR+^D20		;SIZE OF DATA BLOCK
MB%LEN==MB%SIZ			;TOTAL LENGTH, CURRENTLY NO STRINGS REPORTED
;***********************************
;DISK/MAGTAPE STATISTICS
;***********************************

SEC%ST==114			;EVENT CODE
  ST%COD==0			;REASON FOR THIS RECORD
    ST%SHT==1			;SYSTEM SHUTDOWN
    ST%MNT==2			;(DISK) MOUNT
    ST%DMT==3			;(DISK) DISMOUNT
    ST%UNL==4			;(MAGTAPE) UNLOAD
  ST%NAM==1			;BINARY UNIT NUMBER IF MAGTAPE, 0 IF DISK
  ST%VID==2			;VOLUME ID (SIXBIT)
  ST%TYP==3			;DEVICE AND CHANNLE TYPE (SEE MB%TYP)
  ST%CAD==4			;CHANNEL ADDRESS
  ST%UAD==5			;UNIT ADDRESS
  ST%RED==6			;TOTAL READS ON THIS VOLUME
  ST%WRT==7			;TOTAL WRITES ON THIS VOLUME
  ST%SEK==10			;TOTAL SEEKS ON THIS VOLUME
  ST%RNR==11			;(MAGTAPE) FRAMES READ ON VOLUME IN NRZI
  ST%RPE==12			;(MAGTAPE) FRAMES READ ON VOLUME IN PE
  ST%RGC==13			;(MAGTAPE) FRAMES READ ON VOLUME IN GCR
  ST%WNR==14			;(MAGTAPE) FRAMES WRITTEN ON VOLUME IN NRZI
  ST%WPE==15			;(MAGTAPE) FRAMES WRITTEN ON VOLUME IN PE
  ST%WGC==16			;(MAGTAPE) FRAMES WRITTEN ON VOLUME IN GCR

ST%SIZ==ST%WGC+1		;SIZE OF DATA BLOCK
ST%LEN==ST%SIZ			;TOTAL LENGTH, NO STRINGS REPOORTED

;***********************************
;DN64 EVENT CODE
;***********************************

SEC%6S==232			;DN64 EVENT
;***********************************
;CI DISK/TAPE  ENDPACKET CODE
;***********************************

SEC%CI==242			;CI EVENT
  CI%NOD==0			;PORT NUMBER,,NODE NUMBER
  CI%VID==1			;VOLUME ID
  CI%RED==2			;BLOCKS/FRAMES READ
  CI%WRT==3			;BLOCKS/FRAMES WRITTEN
  CI%PS1==4			;POSITION 1
  CI%PS2==5			;POSITION 2
  CI%UDB==6			;REQUIRED FOR BAT BLOCK LOGIC
  CI%LOC==7			;LINEAR ADDRESS FROM ERROR BLOCK
  CI%PAK==10			;START OF PACKET WITH ERROR BIT ON
CI%SIZ==CI%PAK+^D9		;SIZE OF DATA BLOCK
CI%LEN==CI%SIZ			;TOTAL LENGTH, CURRENTLY NO STRINGS REPORTED



;***********************************
;CI DISK/TAPE  ERROR LOG CODE
;***********************************
SEC%EL==243			;MSCP ERROR LOG EVENT
  EL%NOD==0			;PORT,,NODE
  EL%PAK==1			;START OF THE PACKET
EL%SIZ==^D97			;SIZE OF DATA BLOCK
EL%LEN==EL%SIZ			;TOTAL LENGTH, CURRENTLY NO STRINGS REPORTED


;***********************************
;KLIPA ERROR CODE
;***********************************
SEC%KP==244			;KLIPA ERROR EVENT
  KP%CSR==0			;CONI STATUS
  KP%VER==1			;MICROCODE VERSION
	KP%NI==1B0		;SET IF THIS IS A KLNI
  	KP%CHN==7B17		;PORT'S RH20 CHANNEL
  KP%DSP==2			;ERROR DISPOSITION
  KP%CRA==3			;CRAM ADDRESS
  KP%CRD==4			;CRAM DATA (2 WORDS)
  KP%LG0==6			;LOGOUT WORD 0
  KP%LG1==7			;LOGOUT WORD 1
  KP%LG2==10			;LOGOUT WORD 2
  KP%ECW==11			;PORT'S ERROR WORD
  KP%PE0==12			;PORT'S ERROR LOGOUT WORD 0
  KP%PE1==13			;PORT'S ERROR LOGOUT WORD 1
KP%SIZ==14			;SIZE OF DATA BLOCK
KP%LEN==KP%SIZ			;TOTAL LENGTH, CURRENTLY NO STRINGS REPORTED
;***********************************
;KLIPA STATISTICS PACKET
;***********************************
SEC%KS==241			;KLIPA STATISTICS EVENT
  KS%OFF==0			;OFFSET TO COUNTERS
  KS%VER==1			;U-CODE VERSION WORD
  	KS%NI==1B0		;0=CI, 1=NI
	KS%RSN==17B14		;REASON FOR DOING READ-COUNTERS
				; 0=ILLEGAL
		KS%CPE==1	; CRAM PARITY ERROR
		KS%AGB==2	; WIRE A WENT FROM GOOD TO BAD
		KS%ABG==3	; WIRE A WENT FROM BAD TO GOOD
		KS%BGB==4	; WIRE B WENT FROM GOOD TO BAD
		KS%BBG==5	; WIRE B WENT FROM BAD TO GOOD
		KS%PER==6	; PERIODIC READING OF COUNTERS
		KS%GUC==7	; GET U-CODE VERSION
		KS%DIA==10	; DIAG% DID IT
	KS%CHN==7B17		;KLIPA CHANNEL #
	KS%VSN==777777B35	;U-CODE VERSION
KS%AAK==2			;PATH A ACKS
KS%ANK==3			;PATH A NACKS
KS%ANR==4			;PATH A NO-RESPONSES
KS%BAK==5			;PATH B ACKS
KS%BNK==6			;PATH B NACKS
KS%BNR==7			;PATH B NO-RESPONSES
KS%DGD==10			;DATAGRAMS DISCARDED
KS%PXM==11			;PACKETS TRANSMITTED
KS%PRC==12			;PACKETS RECEIVED
KS%DPT==13			;DESIGNATED PORT WORD
	KS%PRT==377B31		;DESIGNATED PORT
KS%CRC==14			;PACKETS RECEIVED WITH CRC ERRORS
KS%EW1==15			;ERROR WORD 1
	KS%MPE==777777B17	;MOVER PAR PRE ERRORS
	KS%CPE==777777B35	;CBUS PARITY ERRORS
KS%EW2==16			;ERROR WORD 2
	KS%RPE==777777B17	;REGISTER PLIPE ERRORS
	KS%DPE==777777B35	;DATA PLIPE ERROS
KS%EW3==17			;ERROR WORD 3
	KS%CHE==777777B17	;CHANNELS ERRORS
	KS%EPE==777777B35	;EBUS PARITY ERRORS
KS%EW4==20			;ERROR WORD 4
	KS%SCE==777777B17	;SPURIOUS CHANNEL ERRORS
	KS%CAT==777777B35	;CBUS AVAILABLE TIMEOUTS
KS%EW5==21			;ERROR WORD 5
	KS%SRA==777777B17	;SPURIOUS RECEIVE ATTENTIONS
	KS%STA==777777B35	;SPURIOUS TRANSMIT ATTENTIONS
KS%EW6==22			;ERROR WORD 6
	KS%TBP==777777B17	;TRANSMIT BUFFER PARITY ERRORS
	KS%TTM==777777B35	;TRANSMITTER TIMEOUTS
KS%SIZ==23			;SIZE OF EVENT BLOCK
KS%LEN==KS%SIZ			;NO ADDITIONAL STRINGS



;***********************************
;KLIPA ERROR-LOG PACKET (PPD BYTE 5 FROM HSC50)
;***********************************
SEC%KE==246			;KLIPA ERROR-LOG PACKET CODE
  KE%SRC==0			;SOURCE WORD
  	KE%CHN==7B17		;KLIPA CHANNEL #
	KE%NOD==17B35		;HSC50 NODE #
  KE%LEN==1			;LENGTH OF DATA AREA
  KE%ELG==1			;BEGINNING OF ERROR LOG INFO

	END