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

⟦a9f506291⟧

    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 0090       |    |		.CONST	0x0090								; 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 001d       |    |		.CONST	0x001d								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0002       |    |		.CONST	0x0002								; Number of locals
001b			INIT_0018:
001b 029f 0033  |   3|		Declare_Subprogram	INIT_0030,For_Call
001d			BODY_0018:
001d 4801       |H   |		Short_Literal	0x1
001e 4806       |H   |		Short_Literal	0x6
001f 00e9       |    |		Load_Encached	String_Cache
0020 0334       | 4  |		Declare_Variable	Array,With_Constraint
0021 5006       |P   |		Indirect_Literal	Any,0x28,{0x5443502f, 0x49502020}
0022 e002       |    |		Load	0x0,0x2
0023 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0024 6801       |h   |		Jump_Zero	0x26
0025 8402       |    |		Call	0x2,0x2
0026 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0027 0000       |    |		.XXX[0x1]
0028 5443 502f  |TCP/|		.LITERAL	{0x5443502f, 0x49502020}
002c 0000 0000  |    |		.BLANK	0000[0x4]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033       | 3  |		.CONST	0x0033								; Address of begin
0031 003f       | ?  |		.CONST	0x003f								; Address of exception handler
0032 0001       |    |		.CONST	0x0001								; Number of locals
0033			BODY_0030:
0033			INIT_0030:
0033 4800       |H   |		Short_Literal	0x0
0034 4801       |H   |		Short_Literal	0x1
0035 0092 004c  |   L|		Action	Push_String_Extended,0x4c					; "!machine.ethernet_host_id"
0037 0092 004d  |   M|		Action	Push_String_Extended,0x4d					; "!machine.tcp_ip_host_id"
0039 0092 004e  |   N|		Action	Push_String_Extended,0x4e					; "!Tools.Networking."
003b 4801       |H   |		Short_Literal	0x1
003c 4801       |H   |		Short_Literal	0x1
003d 8003       |    |		Call	0x0,0x3
003e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
003f			TRAP_0030:
003f 0007       |    |		Action	Break_Optional
0040 4801       |H   |		Short_Literal	0x1
0041 4801       |H   |		Short_Literal	0x1
0042 e004       |    |		Load	0x0,0x4
0043 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0044 0092 004f  |   O|		Action	Push_String_Extended,0x4f					; "Unhandled_Exception"
0046 4802       |H   |		Short_Literal	0x2
0047 0092 0050  |   P|		Action	Push_String_Extended,0x50					; "!Machine.Initialize_Network.TCP_IP_Boot"
0049 e005       |    |		Load	0x0,0x5
004a 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
004b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
004c ; --------------------------------------------------------------------------------------
004c ; STRING TABLE
004c ; --------------------------------------------------------------------------------------
004c 000c       |    |		.STRTAB	0x000c->0x0052							; "!machine.ethernet_host_id"
004d 0023       | #  |		.STRTAB	0x0023->0x005e							; "!machine.tcp_ip_host_id"
004e 0038       | 8  |		.STRTAB	0x0038->0x006a							; "!Tools.Networking."
004f 0048       | H  |		.STRTAB	0x0048->0x0073							; "Unhandled_Exception"
0050 0059       | Y  |		.STRTAB	0x0059->0x007c							; "!Machine.Initialize_Network.TCP_IP_Boot"
0051 007e       | ~  |		.STREND 0x007e->0x0090
0052 216d 6163  |!mac|		.STRTAB_STRINGS
0090 ; --------------------------------------------------------------------------------------
0090 ; Debug Table
0090 ; --------------------------------------------------------------------------------------
0090 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x06d4,0x0000,0x0001,0x0000
0096 7d05 1105  |}   |		.XXX[0xec]
0098 7cc4 c17c  ||  ||
009a 01b0 2d49  |  -I|
009c 410d 7d41  |A }A|
009e 493d 1155  |I= U|
00a0 0d50 0018  | P  |
00a2 217d 0511  |!}  |
00a4 057c c4c5  | |  |
00a6 7c00 8029  ||  )|
00a8 4941 0d7d  |IA }|
00aa 4d15 4959  |M IY|
00ac 1548 0004  | H  |
00ae 217d 0511  |!}  |
00b0 057c c4c9  | |  |
00b2 7c00 3811  || 8 |
00b4 5149 5514  |QIU |
00b6 0020 1d09  |    |
00b8 3d3d 3115  |==1 |
00ba 0538 020c  | 8  |
00bc 1d55 4d15  | UM |
00be 7d05 4940  |} I@|
00c0 0210 4515  |  E |
00c2 3905 0931  |9  1|
00c4 157d 3125  | }1%|
00c6 392d 7d31  |9-}1|
00c8 1559 1530  | Y 0|
00ca 0194 4885  |  H |
00cc d1bd bdb1  |    |
00ce ccb9 b995  |    |
00d0 d1dd bdc9  |    |
00d2 ada5 b99c  |    |
00d4 b802 1419  |    |
00d6 4d51 4925  |MQI%|
00d8 391c 005c  |9  \|
00da 2d15 613d  |- a=|
00dc 4d7d 4149  |M}AI|
00de 1519 2560  |  %`|
00e0 0134 5c85  | 4\ |
00e2 b585 8da1  |    |
00e4 a5b9 94b9  |    |
00e6 d18d c17d  |   }|
00e8 a5c1 7da1  |  } |
00ea bdcd d17d  |   }|
00ec a590 0118  |    |
00ee 3121 3d4d  |1!=M|
00f0 517d 2511  |Q}% |
00f2 7d19 2531  |} %1|
00f4 1402 1864  |   d|
00f6 85b5 858d  |    |
00f8 a1a5 b994  |    |
00fa b995 d1a1  |    |
00fc 95c9 b995  |    |
00fe d17d a1bd  | }  |
0100 cdd1 7da5  |  } |
0102 9001 7435  |  t5|
0104 1551 2115  | Q! |
0106 497d 2511  |I}% |
0108 7d19 2531  |} %1|
010a 1401 cc35  |   5|
010c 554d 157d  |UM }|
010e 0d21 150d  | !  |
0110 2d4d 5535  |-MU5|
0112 4c00 6815  |L h |
0114 1905 314d  |  1M|
0116 1402 1c29  |   )|
0118 1125 051d  | %  |
011a 393d 4d51  |9=MQ|
011c 250c 0220  |%   |
011e 2d51 0d41  |-Q A|
0120 7d25 417d  |}%A}|
0122 093d 3d50  | ==P|
0124 01ec 217d  |  !}|
0126 0511 057c  |   ||
0128 c4cd 7c01  |  | |
012a e000 0224  |   $|
012c 2511 5535  |% U5|
012e 417d 1925  |A} %|
0130 3114 0148  |1  H|
0132 2d51 0d41  |-Q A|
0134 7d25 417d  |}%A}|
0136 1155 3540  | U5@|
0138 0228 217d  | (!}|
013a 0511 057c  |   ||
013c c4d1 7c00  |  | |
013e e439 5115  | 9Q |
0140 3139 1551  |19 Q|
0142 7d41 493d  |}AI=|
0144 1155 0d50  | U P|
0146 0048 217d  | H!}|
0148 0511 057c  |   ||
014a c4d5 7c02  |  | |
014c 2c39 5115  |,9Q |
014e 3139 1551  |19 Q|
0150 7d41 493d  |}AI=|
0152 1925 3114  | %1 |
0154 0230 217d  | 0!}|
0156 0511 057c  |   ||
0158 c4d9 7c01  |  | |
015a 0c41 5149  | AQI|
015c 0539 4d19  | 9M |
015e 1549 7d1d  | I} |
0160 1539 1549  | 9 I|
0162 250c 0234  |%  4|
0164 217d 0511  |!}  |
0166 057c c4dd  | |  |
0168 7c00 bc25  ||  %|
016a 5149 0539  |QI 9|
016c 4d41 3d49  |MA=I|
016e 5000 cc21  |P  !|
0170 7d05 1105  |}   |
0172 7cc4 e17c  ||  ||
0174 00e0 3951  |  9Q|
0176 4905 394d  |I 9M|
0178 413d 4951  |A=IQ|
017a 7d11 1519  |}   |
017c 4c02 3821  |L 8!|
017e 7d05 1105  |}   |
0180 7cc4 e57c  ||  ||
0182 0000 0000  |    |		.BLANK	0000[0x7e]