DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦116e07119⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0110       |    |		.CONST	0x0110								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 8000       |    |		.CONST	0x8000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 002c       | ,  |		.CONST	0x002c								; Address of begin
0019 0059       | Y  |		.CONST	0x0059								; Address of exception handler
001a 0008       |    |		.CONST	0x0008								; Number of locals
001b			INIT_0018:
001b 0092 0094  |    |		Action	Push_String_Extended,0x94					; "!Machine.Release.Current.Activity"
001d 0092 0095  |    |		Action	Push_String_Extended,0x95					; "!Tools.Dtia_Rpc_Mechanisms"
001f 0092 0096  |    |		Action	Push_String_Extended,0x96					; "Elaboration"
0021 0092 0097  |    |		Action	Push_String_Extended,0x97					; "!Machine.Initialization.Rational.Dtia"
0023 e002       |    |		Load	0x0,0x2
0024 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0025 e002       |    |		Load	0x0,0x2
0026 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0027 02c7       |    |		Declare_Variable	Any
0028 00d8       |    |		Load_Top	At_Offset_0
0029 1c00       |    |		Execute_Immediate	Run_Utility,0x0
002a 029f 006b  |   k|		Declare_Subprogram	INIT_0068,For_Call
002c			BODY_0018:
002c 0092 0098  |    |		Action	Push_String_Extended,0x98					; "<PROFILE>"
002e 0092 0099  |    |		Action	Push_String_Extended,0x99					; "$"
0030 0092 009a  |    |		Action	Push_String_Extended,0x9a					; "\x22!Commands\x22.Gateway_Class.Boot_Time_Initialization"
0032 e002       |    |		Load	0x0,0x2
0033 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0034 e403       |    |		Load	0x2,0x3
0035 8408       |    |		Call	0x2,0x8
0036 6821       |h!  |		Jump_Zero	0x58
0037 00d9       |    |		Load_Top	At_Offset_1
0038 e002       |    |		Load	0x0,0x2
0039 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003a 0092 0098  |    |		Action	Push_String_Extended,0x98					; "<PROFILE>"
003c 00ea       |    |		Load_Encached	Null_String_Cache
003d 4800       |H   |		Short_Literal	0x0
003e 0092 0099  |    |		Action	Push_String_Extended,0x99					; "$"
0040 4800       |H   |		Short_Literal	0x0
0041 e402       |    |		Load	0x2,0x2
0042 00ea       |    |		Load_Encached	Null_String_Cache
0043 e404       |    |		Load	0x2,0x4
0044 e403       |    |		Load	0x2,0x3
0045 e002       |    |		Load	0x0,0x2
0046 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0047 e002       |    |		Load	0x0,0x2
0048 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0049 c406       |    |		Store	0x2,0x6
004a c407       |    |		Store	0x2,0x7
004b 00d9       |    |		Load_Top	At_Offset_1
004c e002       |    |		Load	0x0,0x2
004d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
004e 7009       |p   |		Jump_Nonzero	0x58
004f 00d9       |    |		Load_Top	At_Offset_1
0050 e003       |    |		Load	0x0,0x3
0051 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0052 0092 009b  |    |		Action	Push_String_Extended,0x9b					; "Unable_To_Start_Dtia_Rpc_Server"
0054 4802       |H   |		Short_Literal	0x2
0055 e405       |    |		Load	0x2,0x5
0056 e004       |    |		Load	0x0,0x4
0057 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0058 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0059			TRAP_0018:
0059 0007       |    |		Action	Break_Optional
005a 4801       |H   |		Short_Literal	0x1
005b 4801       |H   |		Short_Literal	0x1
005c e005       |    |		Load	0x0,0x5
005d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
005e 0092 009c  |    |		Action	Push_String_Extended,0x9c					; "Unhandled_Exception"
0060 4802       |H   |		Short_Literal	0x2
0061 e405       |    |		Load	0x2,0x5
0062 e004       |    |		Load	0x0,0x4
0063 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0064 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0065 0000 0000  |    |		.XXX[0x3]
0067 0000       |    |
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0073       | s  |		.CONST	0x0073								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0003       |    |		.CONST	0x0003								; Number of locals
006b			INIT_0068:
006b e006       |    |		Load	0x0,0x6
006c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
006d 02c7       |    |		Declare_Variable	Any
006e 00d8       |    |		Load_Top	At_Offset_0
006f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0070 e006       |    |		Load	0x0,0x6
0071 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0072 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0073			BODY_0068:
0073 e006       |    |		Load	0x0,0x6
0074 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0075 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0076 00da       |    |		Load_Top	At_Offset_2
0077 0120       |    |		Execute	Any,Is_Value
0078 6803       |h   |		Jump_Zero	0x7c
0079 e006       |    |		Load	0x0,0x6
007a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
007b 7801       |x   |		Jump	0x7d
007c 00da       |    |		Load_Top	At_Offset_2
007d 6012       |`   |		Indirect_Literal	Discrete,0x90,{0x00000000, 0x00004000}
007e e007       |    |		Load	0x0,0x7
007f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0080 e008       |    |		Load	0x0,0x8
0081 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0082 e006       |    |		Load	0x0,0x6
0083 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0084 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0085 e7ff       |    |		Load	0x3,-0x1
0086 e006       |    |		Load	0x0,0x6
0087 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0088 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0089 c602       |    |		Store	0x3,0x2
008a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
008b 00d8       |    |		Load_Top	At_Offset_0
008c 0f00       |    |		Execute_Immediate	Equal,0x0
008d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
008e 0000 0000  |    |		.XXX[0x2]
0090 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0094 ; --------------------------------------------------------------------------------------
0094 ; STRING TABLE
0094 ; --------------------------------------------------------------------------------------
0094 0014       |    |		.STRTAB	0x0014->0x009e							; "!Machine.Release.Current.Activity"
0095 0033       | 3  |		.STRTAB	0x0033->0x00ae							; "!Tools.Dtia_Rpc_Mechanisms"
0096 004b       | K  |		.STRTAB	0x004b->0x00bb							; "Elaboration"
0097 0054       | T  |		.STRTAB	0x0054->0x00c1							; "!Machine.Initialization.Rational.Dtia"
0098 0077       | w  |		.STRTAB	0x0077->0x00d3							; "<PROFILE>"
0099 007e       | ~  |		.STRTAB	0x007e->0x00d8							; "$"
009a 007d       | }  |		.STRTAB	0x007d->0x00d8							; "\x22!Commands\x22.Gateway_Class.Boot_Time_Initialization"
009b 00ad       |    |		.STRTAB	0x00ad->0x00f1							; "Unable_To_Start_Dtia_Rpc_Server"
009c 00ca       |    |		.STRTAB	0x00ca->0x0101							; "Unhandled_Exception"
009d 00db       |    |		.STREND 0x00db->0x010a
009e 214d 6163  |!Mac|		.STRTAB_STRINGS
010b 0000 0000  |    |		.BLANK	0000[0x5]
0110 ; --------------------------------------------------------------------------------------
0110 ; Debug Table
0110 ; --------------------------------------------------------------------------------------
0110 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x06d2,0x0000,0x0001,0x0000
0116 0018 6c00  |  l |		.XXX[0x84]
0118 1000 0520  |    |
011a 2a08 5514  |* U |
011c 0400 0000  |    |
011e 0018 8c00  |    |
0120 1000 0520  |    |
0122 2a08 5520  |* U |
0124 3208 5514  |2 U |
0126 0418 ac18  |    |
0128 d400 0402  |    |
012a 4819 5788  |H W |
012c 3c07 3380  |< 3 |
012e 0461 7d20  | a} |
0130 0780 0461  |   a|
0132 0114 0400  |    |
0134 1d20 0390  |    |
0136 1408 5ce0  |  \ |
0138 0514 0400  |    |
013a 0000 0000  |    |
013c 0168 bf54  | h T|
013e 0400 0000  |    |
0140 0000 0010  |    |
0142 2400 0000  |$   |
0144 0000 0010  |    |
0146 0400 0000  |    |
0148 0001 6905  |  i |
014a 9400 5800  |  X |
014c 6400 9c00  |d   |
014e c000 f801  |    |
0150 1c01 6001  |  ` |
0152 8c01 a401  |    |
0154 e402 2935  |  )5|
0156 b1bd 8591  |    |
0158 15b1 8589  |    |
015a 7d05 cdb5  |}   |
015c 7d31 a5cd  |}1  |
015e d1a5 b99d  |    |
0160 05cd b57d  |   }|
0162 31a5 cdd1  |1   |
0164 a5b9 9d15  |    |
0166 b185 897d  |   }|
0168 4d95 9d7d  |M  }|
016a 31a5 cdd1  |1   |
016c a5b9 9d4d  |   M|
016e 959d 7d31  |  }1|
0170 a5cd d1a5  |    |
0172 b99d 1195  |    |
0174 89d5 9d7d  |   }|
0176 5185 89b1  |Q   |
0178 957d 31a5  | }1 |
017a cdd1 a5b9  |    |
017c 9d15 b185  |    |
017e 897d 4995  | }I |
0180 b17d 0dbd  | }  |
0182 9195 4995  |  I |
0184 b17d 0dbd  | }  |
0186 9195 15b1  |    |
0188 8589 7d3d  |  }=|
018a c991 95c9  |    |
018c 7d31 a5cd  |}1  |
018e d1a5 b99d  |    |
0190 2195 b1b1  |!   |
0192 bc81 99c9  |    |
0194 bdb4 81c1  |    |
0196 858d ad85  |    |
0198 9d94 8000  |    |
019a 0000 0000  |    |		.BLANK	0000[0x5]
019f 0c00 c000  |    |		.XXX[0x61]
01a1 2c20 8a00  |,   |
01a3 0000 0001  |    |
01a5 68bf 5400  |h T |
01a7 0000 3401  |  4 |
01a9 0421 5a00  | !Z |
01ab 0000 0001  |    |
01ad 6905 9400  |i   |
01af 0000 6402  |  d |
01b1 ac22 4000  | "@ |
01b3 0800 0001  |    |
01b5 68bf 5400  |h T |
01b7 0000 4802  |  H |
01b9 ec22 5000  | "P |
01bb 0800 0001  |    |
01bd 68bf 5400  |h T |
01bf 0000 5c03  |  \ |
01c1 0c22 6000  | "` |
01c3 0800 0001  |    |
01c5 68bf 5400  |h T |
01c7 0000 7003  |  p |
01c9 2c22 7000  |,"p |
01cb 0800 0001  |    |
01cd 68bf 5400  |h T |
01cf 0000 8403  |    |
01d1 4c22 8000  |L"  |
01d3 0800 0001  |    |
01d5 68bf 5400  |h T |
01d7 0000 9803  |    |
01d9 6c22 9000  |l"  |
01db 0800 0001  |    |
01dd 68bf 5400  |h T |
01df 0000 ac03  |    |
01e1 8c22 a000  | "  |
01e3 0800 0001  |    |
01e5 68bf 5400  |h T |
01e7 0000 c003  |    |
01e9 ac22 b000  | "  |
01eb 0800 0001  |    |
01ed 68bf 5400  |h T |
01ef 0000 d403  |    |
01f1 cc22 c000  | "  |
01f3 0800 0001  |    |
01f5 68bf 5400  |h T |
01f7 0000 e804  |    |
01f9 0c22 f000  | "  |
01fb 0800 0001  |    |
01fd 68bf 5400  |h T |
01ff 0000       |    |