1 /* BEGIN INCLUDE FILE ... bos_dump.incl.pl1 ... */
  2 /* Modified 1 September 1976 */
  3 /* Modified 11/11/80 by J. A. Bush for the DPS8/70M CPU */
  4 /* Modified 6/12/81 by Rich Coppola to extend the dps8 extended fault reg to
  5    15 bits  */
  6 /* Modified 02/23/81, W. Olin Sibert, to describe old and new FDUMP styles */
  7 
  8 
  9 dcl  dumpptr ptr;                                           /* pointer to following structure */
 10 
 11 dcl 1 dump based (dumpptr) aligned,                         /* header of dump by fdump */
 12     2 dump_header aligned like dump_header,
 13 
 14     2 segs (1008),                                          /* segment array */
 15       3 segno bit (18) unal,                                /* segment number */
 16       3 length bit (18) unal,                               /* length of segment in sector sized blocks */
 17 
 18     2 amptwregs (0 : 63) bit (36),                          /* assoc. mem. page table word regs */
 19     2 amptwptrs (0 : 63) bit (36),                          /* assoc. mem. page table word pointers */
 20     2 amsdwregs (0 : 63) bit (72),                          /* assoc. mem. segment descriptor word registers */
 21     2 amsdwptrs (0 : 63) bit (36),                          /* assoc. mem. segment descriptor word pointers */
 22 
 23     2 ouhist (0 : 63) bit (72),                             /* operations unit history registers */
 24     2 cuhist (0 : 63) bit (72),                             /* control unit history registers */
 25     2 duhist (0 : 63) bit (72),                             /* decimal unit history registers */
 26     2 auhist (0 : 63) bit (72),                             /* appending unit history registers */
 27 
 28     2 prs (0 : 7) ptr,                                      /* pointer registers */
 29 
 30     2 regs aligned like dump_registers,                     /* assorted machine registers */
 31 
 32     2 low_order_port bit (3),                               /* from which clock is read */
 33     2 pad4 bit (36),
 34     2 mctime fixed bin (52),                                /* time conditions were taken */
 35     2 pad5 (0 : 3) bit (36),
 36 
 37     2 misc_registers like dump_misc_registers,              /* Assorted registers & processor data */
 38 
 39     2 ptrlen (0 : 7) bit (36),                              /* pointers and lengths for EIS */
 40 
 41     2 coreblocks (0 : 7),
 42       3 num_first bit (18) unal,                            /* first addr in coreblock */
 43       3 num_blocks bit (18) unal,                           /* number of blocks used */
 44     2 pad7 (112) fixed bin;
 45 
 46 
 47 dcl 1 dump_header aligned based,                            /* Standard header for FDUMP */
 48     2 words_dumped fixed bin (35),                          /* total words in dump */
 49     2 valid bit (1),                                        /* = 1 if there is a 6180 dump to be had */
 50     2 time fixed bin (71),                                  /* time of dump */
 51     2 erfno fixed bin (18),                                 /* Error Report Form Number */
 52     2 num_segs fixed bin,                                   /* number of segments dumped */
 53     2 valid_355 bit (1),                                    /* = 1 if there is a dn355 dump to be had */
 54     2 dumped_355s bit (4),                                  /* indicates which 355s were dumped */
 55     2 time_355 fixed bin (71),                              /* time of 355 dump */
 56     2 version fixed bin,                                    /* currently 2 */
 57     2 pad0 (5) fixed bin;                                   /* pad0 to 16 words */
 58 
 59 dcl 1 dump_registers aligned based,                         /* Standard (SREG) arrangement of registers in dump */
 60    (2 x (0 : 7) bit (18),                                   /* index registers */
 61     2 a bit (36),                                           /* the a register */
 62     2 q bit (36),                                           /* the q register */
 63     2 e bit (8),                                            /* the e register */
 64     2 pad2 bit (28),                                        /* pad */
 65     2 t bit (27),                                           /* timer register */
 66     2 pad3 bit (6),                                         /* pad */
 67     2 ralr bit (3)) unaligned;                              /* ring alarm register */
 68 
 69 dcl 1 dump_misc_registers aligned based,
 70     2 scu (0 : 7) bit (36),                                 /* from store control unit instr. */
 71     2 mcm (0 : 7) bit (72),                                 /* memory controller masks every 64 K */
 72     2 dbr bit (72),                                         /* descriptor segment base register */
 73     2 intrpts bit (36),                                     /* interrupts */
 74     2 bar bit (36),                                         /* base address register */
 75     2 modereg bit (36),                                     /* mode register */
 76     2 cmodereg bit (36),                                    /* cache mode register */
 77     2 faultreg bit (36),                                    /* fault register */
 78     2 ext_fault_reg bit (15) unaligned,                     /* DPS8 extended fault register */
 79     2 pad6 bit (21) unaligned;
 80 
 81 
 82 
 83 dcl 1 v1_dump aligned based (dumpptr),                      /* Old version of FDUMP (pre March, 1981) */
 84     2 dump_header aligned like dump_header,
 85 
 86     2 segs (688),                                           /* segment array */
 87       3 segno bit (18) unal,                                /* segment number */
 88       3 length bit (18) unal,                               /* length of segment in sector sized blocks */
 89 
 90     2 amsdwregs (0 : 15) bit (72),                          /* assoc. mem. segment descriptor word registers */
 91     2 amsdwptrs (0 : 15) bit (36),                          /* assoc. mem. segment descriptor word pointers */
 92     2 amptwregs (0 : 15) bit (36),                          /* assoc. mem. page table word regs */
 93     2 amptwptrs (0 : 15) bit (36),                          /* assoc. mem. page table word pointers */
 94     2 pad1 (0 : 15) bit (36),
 95 
 96     2 ouhist (0 : 15) bit (72),                             /* operations unit history registers */
 97     2 cuhist (0 : 15) bit (72),                             /* control unit history registers */
 98     2 auhist (0 : 15) bit (72),                             /* appending unit history registers */
 99     2 duhist (0 : 15) bit (72),                             /* decimal unit history registers */
100 
101     2 prs (0 : 7) ptr,                                      /* pointer registers */
102 
103     2 regs aligned like dump_registers,                     /* assorted machine registers */
104 
105     2 mctime fixed bin (52),                                /* time conditions were taken */
106     2 pad4 (0 : 5) bit (36),
107 
108     2 misc_registers aligned like dump_misc_registers,      /* Assorted registers */
109 
110     2 pad5 bit (36),
111     2 ptrlen (0 : 7) bit (36),                              /* pointers and lengths for EIS */
112     2 pad6 (15) bit (36),
113     2 low_order_port bit (3),                               /* from which clock was read */
114 
115     2 coreblocks (0 : 7),
116       3 num_first bit (18) unal,                            /* first addr in coreblock */
117       3 num_blocks bit (18) unal;                           /* number of blocks used */
118 
119 
120 dcl  DUMP_VERSION_1 fixed bin internal static options (constant) init (1);
121 dcl  DUMP_VERSION_2 fixed bin internal static options (constant) init (2);
122 
123 /* END INCLUDE FILE ... bos_dump.incl.pl1 ... */