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

⟦cef589c98⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 e001       |    |		Load	0x0,0x1
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 8002       |    |		Call	0x0,0x2
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 e003       |    |		Load	0x0,0x3
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 e004       |    |		Load	0x0,0x4
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 0000  |    |		.DEBUG4	0x0004,0x0000,0x76f6,0x0000,0x0001,0x0000
0096 00e2 0600  |    |		.XXX[0x53]
0098 e5fc 680e  |  h |
009a 4801 0051  |H  Q|
009c e5ff e005  |    |
009e 182b 4801  | +H |
00a0 0051 00db  | Q  |
00a2 e5fd 0279  |   y|
00a4 680d 4800  |h H |
00a6 0052 780a  | Rx |
00a8 e006 1859  |   Y|
00aa a402 e402  |    |
00ac e5ff e009  |    |
00ae 182f e5fe  | /  |
00b0 e00f 180d  |    |
00b2 e00c 1b14  |    |
00b4 0322 e5fd  | "  |
00b6 00d9 3801  |  8 |
00b8 00db 00d9  |    |
00ba 3800 e5fc  |8   |
00bc 00d9 3802  |  8 |
00be 00d9 00db  |    |
00c0 e006 1840  |   @|
00c2 e5fc 7003  |  p |
00c4 e402 e006  |    |
00c6 1842 e5ff  | B  |
00c8 e006 1872  |   r|
00ca 4801 e5ff  |H   |
00cc e004 1810  |    |
00ce 4505 0000  |E   |
00d0 02d3 0004  |    |
00d2 0001 00da  |    |
00d4 e009 188a  |    |
00d6 4401 0000  |D   |
00d8 02db 0004  |    |
00da 0001 00da  |    |
00dc e001 180d  |    |
00de 6802 4801  |h H |
00e0 4401 00da  |D   |
00e2 e010 180e  |    |
00e4 6802 4801  |h H |
00e6 4401 4800  |D H |
00e8 4401       |D   |
00e9 0000 0000  |    |		.BLANK	0000[0x7]
00f0 02f8 0004  |    |		.XXX[0x5c]
00f2 0002 00ec  |    |
00f4 00db e011  |    |
00f6 1812 0031  |   1|
00f8 00d8 4926  |  I&|
00fa e009 0096  |    |
00fc 6818 00d8  |h   |
00fe 4927 e009  |I'  |
0100 0096 e006  |    |
0102 182b e004  | +  |
0104 1832 680a  | 2h |
0106 00eb 1812  |    |
0108 4800 4800  |H H |
010a 608d 4800  |` H |
010c 48a1 4812  |H H |
010e e006 1843  |   C|
0110 4801 e5ff  |H   |
0112 e004 1810  |    |
0114 4503 4800  |E H |
0116 4800 e5fe  |H   |
0118 e5ff 8215  |    |
011a 00db 00d9  |    |
011c 4925 e009  |I%  |
011e 0096 4503  |  E |
0120 032f 0349  | / I|
0122 0005 00e1  |    |
0124 00e1 00eb  |    |
0126 1b96 0322  |   "|
0128 00d8 1c00  |    |
012a 00eb 1b96  |    |
012c 0322 00d8  | "  |
012e 1c00 00d8  |    |
0130 00da 00e1  |    |
0132 00e1 e5ff  |    |
0134 e012 1812  |    |
0136 c402 c403  |    |
0138 00d2 00db  |    |
013a 00db 0279  |   y|
013c 680a 00d8  |h   |
013e e00b 182a  |   *|
0140 00da e00b  |    |
0142 182a 0272  | * r|
0144 604b 027b  |`K {|
0146 4401 4800  |D H |
0148 4401 0007  |D   |
014a 4800 4401  |H D |
014c 0000 0000  |    |		.BLANK	0000[0x4]
0150 0353 0004  | S  |		.XXX[0x3e]
0152 0001 00da  |    |
0154 00eb 1814  |    |
0156 0f66 681c  | fh |
0158 00da 00eb  |    |
015a 18ba 00eb  |    |
015c 1813 6816  |  h |
015e 00da e013  |    |
0160 1817 7012  |  p |
0162 00da 00eb  |    |
0164 18d4 e005  |    |
0166 1817 00db  |    |
0168 6818 00eb  |h   |
016a 1812 4800  |  H |
016c 4800 602a  |H `*|
016e 4800 48a1  |H H |
0170 4812 e006  |H   |
0172 1843 780d  | Cx |
0174 00da e014  |    |
0176 180f 4805  |  H |
0178 e006 1827  |   '|
017a e00a 1b0d  |    |
017c 4803 e5fe  |H   |
017e 4800 e00a  |H   |
0180 181b 00da  |    |
0182 8219 6809  |  h |
0184 00da 00eb  |    |
0186 18ec 00eb  |    |
0188 18cf 0092  |    |
018a 0553 e00d  | S  |
018c 1821 4503  | !E |
018e 0000 0000  |    |		.BLANK	0000[0x4]
0192 0001 0000  |    |		.XXX[0xa]
0194 0000 0000  |    |
0196 4e35 b501  |N5  |
0198 0000 0000  |    |
019a 7fff ffff  |    |
019c 0000 0000  |    |		.BLANK	0000[0x4]
01a0 03a4 0004  |    |		.XXX[0x21]
01a2 0002 00ec  |    |
01a4 00db 00eb  |    |
01a6 1814 0f2f  |   /|
01a8 7002 4800  |p H |
01aa 4401 00db  |D   |
01ac 490b 00eb  |I   |
01ae 0096 00eb  |    |
01b0 18ec 0031  |   1|
01b2 00d8 00eb  |    |
01b4 18e8 00eb  |    |
01b6 1813 6807  |  h |
01b8 00db 00eb  |    |
01ba 18ec e008  |    |
01bc 1830 0f00  | 0  |
01be 4401 4800  |D H |
01c0 4401       |D   |
01c1 0000 0000  |    |		.BLANK	0000[0x7]
01c8 03e6 0004  |    |		.XXX[0x32]
01ca 000a 00ec  |    |
01cc 00db e00b  |    |
01ce 1827 0031  | ' 1|
01d0 00ef e5ff  |    |
01d2 e009 1872  |   r|
01d4 0031 029f  | 1  |
01d6 052b 029f  | +  |
01d8 053b e015  | ;  |
01da 190e 00c6  |    |
01dc 4804 4802  |H H |
01de 0099 4805  |  H |
01e0 4802 0099  |H   |
01e2 6169 6164  |aiad|
01e4 480a 0007  |H   |
01e6 4800 e403  |H   |
01e8 4975 00eb  |Iu  |
01ea 0098 1824  |   $|
01ec 00e3 025b  |   [|
01ee 4806 4802  |H H |
01f0 0099 4807  |  H |
01f2 4802 0099  |H   |
01f4 4808 4802  |H H |
01f6 0099 e015  |    |
01f8 180e 4502  |  E |
01fa 0000 0000  |    |		.BLANK	0000[0x6]