1
2
3 "BEGIN INCLUDE FILE toehold_save_dcls_.incl.alm
4
5
6 " HISTORY COMMENTS:
7 " 1) change83-08-01Margulies, approve, audit, install:
8 " Initial coding by Margulies and Loepere.
9 " 2) change85-01-09Fawcett, approve85-09-09MCR6979,
10 " audit86-01-31GDixon, install86-03-21MR12.0-1033:
11 " Support of FIPS 3380 cylinder size.
12 " END HISTORY COMMENTS
13
14
15 "Created 01/29/86 1201.9 mst Wed by convert_include_file,
16 " Version of 01/09/85 0754.4 mst Wed.
17
18 "Made from >dumps>old>dipper>audit_dipper>incl>toehold_save_dcls_.incl.pl1,
19 " modified 01/29/86 1201.6 mst Wed
20
21 "
22 " Structure toehold
23 "
24 equ toehold_size,2048
25
26
27 equ toehold.entry_sequences,0 " DOUBLE
28 equ toehold.flagbox,32
29 equ toehold.handler_mc,96 " LEVEL 2
30
31 equ toehold.paths,144 " LEVEL 2
32
33 equ toehold.n_paths_used,160
34 equ toehold.memory_state,161
35 equ toehold.bce_dbr,162 " DOUBLE
36 equ toehold.bce_mode_reg,164
37 equ toehold.bce_cache_mode_reg,165
38 equ toehold.esd_segnum,166
39
40 equ toehold.dcw_list_size,167 " UPPER
41 equ toehold.dcws_per_cyl,167 " LOWER
42
43 equ toehold.seeks_used,168
44 equ toehold.save_dcws,169
45 equ toehold.handler_dcws,429
46 equ toehold.handler_code,944 " DOUBLE
47 equ toehold.multics_state,1520 " LEVEL 2
48
49
50 "
51 " Structure dcw_list
52 "
53 equ dcw_list.seek_addresses,0
54 equ dcw_list.seek_idcw,1
55 equ dcw_list.seek_dcw,2
56 equ dcw_list.data_idcw,3
57 equ dcw_list.data_dcws,4
58
59 equ BCE_PART_LTH,2200 " MANIFEST
60 equ SAVED_IMAGE_RECORDX,0 " MANIFEST
61 equ CRASH_HANDLER_RECORDX,512 " MANIFEST
62 equ BCE_PAGING_AREA_RECORDX,1024 " MANIFEST
63 equ BCE_PAGING_AREA_LTH,128 " MANIFEST
64 equ MST_AREA_RECORDX,1152 " MANIFEST
65
66 "
67 " Structure toe_hold
68 "
69 equ toe_hold_size,2048
70
71 equ toe_hold.entry_sequences,0 " DOUBLE
72 equ toe_hold.flagbox,32
73 equ toe_hold.paths,144 " LEVEL 2
74
75 equ toe_hold.n_paths_used,160
76 equ toe_hold.memory_state,161
77 equ toe_hold.bce_dbr,162 " DOUBLE
78 equ toe_hold.multics_state,1520 " LEVEL 2
79
80
81 "
82 " Structure io_path
83 "
84 equ io_path_size,4
85
86 equ io_path.pcw,0 " DOUBLE
87
88 equ io_path.port_number_word,2
89 equ io_path.port_number_shift,33
90 bool io_path.port_number_mask,000007
91 equ io_path.iom_number_word,2
92 equ io_path.iom_number_shift,18
93 bool io_path.iom_number_mask,077777
94 equ io_path.channel_number,2 " LOWER
95
96 equ TOE_HOLD_CRASH_ENTRY,0 " MANIFEST
97 equ TOE_HOLD_ESD_ENTRY,1 " MANIFEST
98 equ TOE_HOLD_DUMP_ENTRY,2 " MANIFEST
99 equ TOE_HOLD_MULTICS_ENTRY,3 " MANIFEST
100 equ TOE_HOLD_RESTART_ENTRY,4 " MANIFEST
101 equ TOE_HOLD_BOOT_ENTRY,5 " MANIFEST
102 equ TOE_HOLD_BOS_ENTRY,12 " MANIFEST
103 equ TOE_HOLD_BOS_NO_SAVE_ENTRY,13 " MANIFEST
104 equ TOE_HOLD_BOS_MULTICS_ENTRY,14 " MANIFEST
105
106 "
107 " Structure mc_state
108 "
109 equ mc_state_size,528
110
111 equ mc_state.mc_,0 " LEVEL 2
112
113 equ mc_state.masks,48
114 equ mc_state.interrupt,64 " DOUBLE
115 equ mc_state.mode_reg,66
116 equ mc_state.cache_mode_reg,67
117 equ mc_state.dbr,68 " DOUBLE
118 equ mc_state.cfg,70 " DOUBLE
119 equ mc_state.bar,72
120 equ mc_state.old_memory_state,73
121 equ mc_state.ou_history_registers,80 " DOUBLE
122 equ mc_state.cu_history_registers,112 " DOUBLE
123 equ mc_state.du_history_registers,144 " DOUBLE
124 equ mc_state.apu_history_registers,176 " DOUBLE
125 equ mc_state.ptwam_ptrs,208
126 equ mc_state.ptwam_regs,272
127 equ mc_state.sdwam_ptrs,336
128 equ mc_state.sdwam_regs,400 " DOUBLE
129
130 equ Initial_undefined,0 " MANIFEST
131 equ At_bce__early,1 " MANIFEST
132 equ At_bce__boot,2 " MANIFEST
133 equ Multics,3 " MANIFEST
134 equ Undefined_saving_state,4 " MANIFEST
135 equ Undefined_reading_bce,5 " MANIFEST
136 equ At_bce__crash,6 " MANIFEST
137 equ At_bce__shutdown,7 " MANIFEST
138 equ Undefined_continue,8 " MANIFEST
139 equ Undefined_saving_mem,9 " MANIFEST
140
141 "
142 " Structure mc
143 "
144 equ mc_size,48
145
146 equ mc.prs,0
147
148 equ mc.regs_word,16
149 equ mc.regs_shift,858
150 equ mc.x,16 " UPPER
151
152 equ mc.a,20
153 equ mc.q,21
154
155 equ mc.e_word,22
156 equ mc.e_shift,28
157 bool mc.e_mask,000377
158
159 equ mc.t_word,23
160 equ mc.t_shift,9
161 equ mc.ralr_word,23
162 equ mc.ralr_shift,0
163 bool mc.ralr_mask,000007
164
165 equ mc.scu,24
166 equ mc.mask,32 " DOUBLE
167 equ mc.ips_temp,34
168
169 equ mc.errcode_word,35
170 equ mc.errcode_shift,0
171
172 equ mc.fim_temp_word,36
173 equ mc.fim_temp_shift,0
174 equ mc.unique_index,36 " UPPER
175 equ mc.resignal_word,36
176 bool mc.resignal,400000 " DL
177 equ mc.fcode_word,36
178 equ mc.fcode_shift,0
179 bool mc.fcode_mask,377777
180
181 equ mc.fault_reg,37
182
183 equ mc.cpu_type_word,38
184 equ mc.cpu_type_shift,33
185 bool mc.cpu_type_mask,000003
186 equ mc.ext_fault_reg_word,38
187 equ mc.ext_fault_reg_shift,18
188 bool mc.ext_fault_reg_mask,077777
189
190 equ mc.fault_time,38 " DOUBLE
191 equ mc.eis_info,40
192
193 equ apx,0 " MANIFEST
194 equ abx,1 " MANIFEST
195 equ bpx,2 " MANIFEST
196 equ bbx,3 " MANIFEST
197 equ lpx,4 " MANIFEST
198 equ lbx,5 " MANIFEST
199 equ spx,6 " MANIFEST
200 equ sbx,7 " MANIFEST
201
202 "
203 " Structure scu
204 "
205 equ scu_size,8
206
207 equ scu.ppr_word,0
208 equ scu.ppr_shift,17
209 equ scu.prr_shift,33
210 bool scu.prr_mask,000007
211 equ scu.psr_shift,18
212 bool scu.psr_mask,077777
213 bool scu.p,400000 " DL
214 equ scu.apu_word,0
215 equ scu.apu_shift,3
216 bool scu.apu_mask,037777
217 bool scu.xsf,200000 " DL
218 bool scu.sdwm,100000 " DL
219 bool scu.sd_on,040000 " DL
220 bool scu.ptwm,020000 " DL
221 bool scu.pt_on,010000 " DL
222 bool scu.pi_ap,004000 " DL
223 bool scu.dsptw,002000 " DL
224 bool scu.sdwnp,001000 " DL
225 bool scu.sdwp,000400 " DL
226 bool scu.ptw,000200 " DL
227 bool scu.ptw2,000100 " DL
228 bool scu.fap,000040 " DL
229 bool scu.fanp,000020 " DL
230 bool scu.fabs,000010 " DL
231 equ scu.fault_cntr_word,0
232 equ scu.fault_cntr_shift,0
233 bool scu.fault_cntr_mask,000007
234
235 equ scu.fd_word,1
236 equ scu.fd_shift,16
237 equ scu.iro_word,1
238 bool scu.iro,400000 " DU
239 equ scu.oeb_word,1
240 bool scu.oeb,200000 " DU
241 equ scu.e_off_word,1
242 bool scu.e_off,100000 " DU
243 equ scu.orb_word,1
244 bool scu.orb,040000 " DU
245 equ scu.r_off_word,1
246 bool scu.r_off,020000 " DU
247 equ scu.owb_word,1
248 bool scu.owb,010000 " DU
249 equ scu.w_off_word,1
250 bool scu.w_off,004000 " DU
251 equ scu.no_ga_word,1
252 bool scu.no_ga,002000 " DU
253 equ scu.ocb_word,1
254 bool scu.ocb,001000 " DU
255 equ scu.ocall_word,1
256 bool scu.ocall,000400 " DU
257 equ scu.boc_word,1
258 bool scu.boc,000200 " DU
259 equ scu.inret_word,1
260 bool scu.inret,000100 " DU
261 equ scu.crt_word,1
262 bool scu.crt,000040 " DU
263 equ scu.ralr_word,1
264 bool scu.ralr,000020 " DU
265 equ scu.am_er_word,1
266 bool scu.am_er,000010 " DU
267 equ scu.oosb_word,1
268 bool scu.oosb,000004 " DU
269 equ scu.paru_word,1
270 bool scu.paru,000002 " DU
271 equ scu.parl_word,1
272 bool scu.parl,000001 " DU
273 equ scu.onc_1_word,1
274 bool scu.onc_1,400000 " DL
275 equ scu.onc_2_word,1
276 bool scu.onc_2,200000 " DL
277 equ scu.port_stat_word,1
278 equ scu.port_stat_shift,6
279 bool scu.port_stat_mask,001777
280 equ scu.ial_word,1
281 equ scu.ial_shift,12
282 bool scu.ial_mask,000017
283 equ scu.iac_word,1
284 equ scu.iac_shift,9
285 bool scu.iac_mask,000007
286 equ scu.con_chan_word,1
287 equ scu.con_chan_shift,6
288 bool scu.con_chan_mask,000007
289 equ scu.fi_num_word,1
290 equ scu.fi_num_shift,1
291 bool scu.fi_num_mask,000037
292 equ scu.fi_flag_word,1
293 bool scu.fi_flag,000001 " DL
294
295 equ scu.tpr,2 " UPPER
296 equ scu.trr_word,2
297 equ scu.trr_shift,33
298 bool scu.trr_mask,000007
299 equ scu.tsr_word,2
300 equ scu.tsr_shift,18
301 bool scu.tsr_mask,077777
302 equ scu.cpu_no_word,2
303 equ scu.cpu_no_shift,6
304 bool scu.cpu_no_mask,000007
305 equ scu.delta_word,2
306 equ scu.delta_shift,0
307 bool scu.delta_mask,000077
308
309 equ scu.word3,3 " UPPER
310 equ scu.tsr_stat_word,3
311 equ scu.tsr_stat_shift,6
312 bool scu.tsr_stat_mask,007777
313 equ scu.tsna_word,3
314 equ scu.tsna_shift,14
315 bool scu.tsna_mask,000017
316 equ scu.tsnb_word,3
317 equ scu.tsnb_shift,10
318 bool scu.tsnb_mask,000017
319 equ scu.tsnc_word,3
320 equ scu.tsnc_shift,6
321 bool scu.tsnc_mask,000017
322 equ scu.tpr_tbr_word,3
323 equ scu.tpr_tbr_shift,0
324 bool scu.tpr_tbr_mask,000077
325
326 equ scu.ilc,4 " UPPER
327 equ scu.ir,4 " LOWER
328 equ scu.zero_word,4
329 bool scu.zero,400000 " DL
330 equ scu.neg_word,4
331 bool scu.neg,200000 " DL
332 equ scu.carry_word,4
333 bool scu.carry,100000 " DL
334 equ scu.ovfl_word,4
335 bool scu.ovfl,040000 " DL
336 equ scu.eovf_word,4
337 bool scu.eovf,020000 " DL
338 equ scu.eufl_word,4
339 bool scu.eufl,010000 " DL
340 equ scu.oflm_word,4
341 bool scu.oflm,004000 " DL
342 equ scu.tro_word,4
343 bool scu.tro,002000 " DL
344 equ scu.par_word,4
345 bool scu.par,001000 " DL
346 equ scu.parm_word,4
347 bool scu.parm,000400 " DL
348 equ scu.bm_word,4
349 bool scu.bm,000200 " DL
350 equ scu.tru_word,4
351 bool scu.tru,000100 " DL
352 equ scu.mif_word,4
353 bool scu.mif,000040 " DL
354 equ scu.abs_word,4
355 bool scu.abs,000020 " DL
356 equ scu.hex_word,4
357 bool scu.hex,000010 " DL
358
359 equ scu.ca,5 " UPPER
360 equ scu.cu_word,5
361 equ scu.cu_shift,6
362 bool scu.cu_mask,007777
363 equ scu.rf_word,5
364 bool scu.rf,400000 " DL
365 equ scu.rpt_word,5
366 bool scu.rpt,200000 " DL
367 equ scu.rd_word,5
368 bool scu.rd,100000 " DL
369 equ scu.rl_word,5
370 bool scu.rl,040000 " DL
371 equ scu.pot_word,5
372 bool scu.pot,020000 " DL
373 equ scu.pon_word,5
374 bool scu.pon,010000 " DL
375 equ scu.xde_word,5
376 bool scu.xde,004000 " DL
377 equ scu.xdo_word,5
378 bool scu.xdo,002000 " DL
379 equ scu.poa_word,5
380 bool scu.poa,001000 " DL
381 equ scu.rfi_word,5
382 bool scu.rfi,000400 " DL
383 equ scu.its_word,5
384 bool scu.its,000200 " DL
385 equ scu.if_word,5
386 bool scu.if,000100 " DL
387 equ scu.cpu_tag_word,5
388 equ scu.cpu_tag_shift,0
389 bool scu.cpu_tag_mask,000077
390
391 equ scu.even_inst,6
392 equ scu.odd_inst,7
393
394 "
395 " Structure scux
396 "
397 equ scux_size,8
398
399
400 equ scux.fd_word,1
401 equ scux.fd_shift,0
402 equ scux.isn_word,1
403 bool scux.isn,400000 " DU
404 equ scux.ioc_word,1
405 bool scux.ioc,200000 " DU
406 equ scux.ia_am_word,1
407 bool scux.ia_am,100000 " DU
408 equ scux.isp_word,1
409 bool scux.isp,040000 " DU
410 equ scux.ipr_word,1
411 bool scux.ipr,020000 " DU
412 equ scux.nea_word,1
413 bool scux.nea,010000 " DU
414 equ scux.oobb_word,1
415 bool scux.oobb,004000 " DU
416
417 equ scux.tsr_stat_word,3
418 equ scux.tsr_stat_shift,6
419 bool scux.tsr_stat_mask,007777
420
421 equ scux.instr,6
422
423 "END INCLUDE FILE toehold_save_dcls_.incl.alm