|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
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 0218 | | .CONST 0x0218 ; 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 8001 | | .CONST 0x8001 ; 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 0023 | # | .CONST 0x0023 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0005 | | .CONST 0x0005 ; Number of locals
001b INIT_0018:
001b 029f 003b | ;| Declare_Subprogram INIT_0038,For_Call
001d 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call
001f 029f 008b | | Declare_Subprogram INIT_0088,For_Call
0021 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
0023 BODY_0018:
0023 4801 |H | Short_Literal 0x1
0024 e002 | | Load 0x0,0x2
0025 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0026 8402 | | Call 0x2,0x2
0027 e003 | | Load 0x0,0x3
0028 180d | | Execute Package,Field_Execute,Field_Number 0xd
0029 6801 |h | Jump_Zero 0x2b
002a 8403 | | Call 0x2,0x3
002b e004 | | Load 0x0,0x4
002c 180d | | Execute Package,Field_Execute,Field_Number 0xd
002d 6801 |h | Jump_Zero 0x2f
002e 8404 | | Call 0x2,0x4
002f 8405 | | Call 0x2,0x5
0030 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0031 0000 0000 | | .BLANK 0000[0x7]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 004f | O | .CONST 0x004f ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 0092 00da | | Action Push_String_Extended,0xda ; "<PROFILE>"
003d 0092 00db | | Action Push_String_Extended,0xdb ; "Name => (Smooth Snapshots)"
003f 4800 |H | Short_Literal 0x0
0040 0092 00dc | | Action Push_String_Extended,0xdc ; "$"
0042 4800 |H | Short_Literal 0x0
0043 0092 00dd | | Action Push_String_Extended,0xdd ; "!Machine.Release.Current.Activity"
0045 00ea | | Load_Encached Null_String_Cache
0046 0092 00de | | Action Push_String_Extended,0xde ; "Smooth_Snapshots"
0048 0092 00df | | Action Push_String_Extended,0xdf ; "!Commands.System_Maintenance"
004a e005 | | Load 0x0,0x5
004b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
004c e005 | | Load 0x0,0x5
004d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
004e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
004f TRAP_0038:
004f 0007 | | Action Break_Optional
0050 4801 |H | Short_Literal 0x1
0051 4801 |H | Short_Literal 0x1
0052 e006 | | Load 0x0,0x6
0053 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0054 0092 00e0 | | Action Push_String_Extended,0xe0 ; "Unhandled_Exception"
0056 4802 |H | Short_Literal 0x2
0057 0092 00e1 | | Action Push_String_Extended,0xe1 ; "!Machine.Initialization.Servers.Smooth_Snapshots"
0059 e007 | | Load 0x0,0x7
005a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
005b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
005c 0000 0000 | | .BLANK 0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 006f | o | .CONST 0x006f ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 6018 |` | Indirect_Literal Discrete,0x7c,{0x00000000, 0x00028000}
0064 00ba | | Action Initiate_Delay
0065 e008 | | Load 0x0,0x8
0066 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0067 4801 |H | Short_Literal 0x1
0068 4806 |H | Short_Literal 0x6
0069 00e9 | | Load_Encached String_Cache
006a 0334 | 4 | Declare_Variable Array,With_Constraint
006b 5014 |P | Indirect_Literal Any,0x80,{0x7463702f, 0x69702020}
006c e009 | | Load 0x0,0x9
006d 180d | | Execute Package,Field_Execute,Field_Number 0xd
006e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
006f TRAP_0060:
006f 0007 | | Action Break_Optional
0070 4801 |H | Short_Literal 0x1
0071 4801 |H | Short_Literal 0x1
0072 e006 | | Load 0x0,0x6
0073 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0074 0092 00e0 | | Action Push_String_Extended,0xe0 ; "Unhandled_Exception"
0076 4802 |H | Short_Literal 0x2
0077 0092 00e2 | | Action Push_String_Extended,0xe2 ; "!Machine.Initialization.Servers.FTP"
0079 e007 | | Load 0x0,0x7
007a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
007b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
007c 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
0080 7463 702f |tcp/| .LITERAL {0x7463702f, 0x69702020}
0084 0000 0000 | | .BLANK 0000[0x4]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 009a | | .CONST 0x009a ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 601c |` | Indirect_Literal Discrete,0xa8,{0x00000000, 0x00078000}
008c 00ba | | Action Initiate_Delay
008d 0092 00da | | Action Push_String_Extended,0xda ; "<PROFILE>"
008f 0092 00e3 | | Action Push_String_Extended,0xe3 ; "Output => !Machine.Error_Logs.Archive_Server_Log,Name => (Archive Server), User=NETWORK_PUBLIC, Password=()Session=!Machine.Network_Public_Archive_Server_Sessions.Network_Public_Session_1"
0091 4800 |H | Short_Literal 0x0
0092 0092 00e4 | | Action Push_String_Extended,0xe4 ; "!Machine.Error_Logs"
0094 4800 |H | Short_Literal 0x0
0095 0092 00e5 | | Action Push_String_Extended,0xe5 ; "\x22!Commands\x22.Archive.Server"
0097 e005 | | Load 0x0,0x5
0098 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0099 4501 |E | Exit_Suprogram New_Top_Offset 0x1
009a TRAP_0088:
009a 0007 | | Action Break_Optional
009b 4801 |H | Short_Literal 0x1
009c 4801 |H | Short_Literal 0x1
009d e006 | | Load 0x0,0x6
009e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
009f 0092 00e0 | | Action Push_String_Extended,0xe0 ; "Unhandled_Exception"
00a1 4802 |H | Short_Literal 0x2
00a2 0092 00e6 | | Action Push_String_Extended,0xe6 ; "!Machine.Initialization.Servers.Archive"
00a4 e007 | | Load 0x0,0x7
00a5 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00a6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a7 0000 | | .XXX[0x1]
00a8 0000 0000 | | .LITERAL {0x00000000, 0x00078000}
00ac 0000 0000 | | .BLANK 0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 00cd | | .CONST 0x00cd ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 0092 00da | | Action Push_String_Extended,0xda ; "<PROFILE>"
00b5 0092 00e7 | | Action Push_String_Extended,0xe7 ; "Name => (Console Command Interpreter)"
00b7 4800 |H | Short_Literal 0x0
00b8 0092 00e4 | | Action Push_String_Extended,0xe4 ; "!Machine.Error_Logs"
00ba 4800 |H | Short_Literal 0x0
00bb 0092 00dd | | Action Push_String_Extended,0xdd ; "!Machine.Release.Current.Activity"
00bd 0092 00e8 | | Action Push_String_Extended,0xe8 ; "(Timeout => "
00bf e5ff | | Load 0x2,-0x1
00c0 01cc | | Execute Vector,Catenate
00c1 0092 00e9 | | Action Push_String_Extended,0xe9 ; ")"
00c3 01cc | | Execute Vector,Catenate
00c4 0092 00ea | | Action Push_String_Extended,0xea ; "CI.Login"
00c6 0092 00eb | | Action Push_String_Extended,0xeb ; "!Tools.CI"
00c8 e005 | | Load 0x0,0x5
00c9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00ca e005 | | Load 0x0,0x5
00cb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00cc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00cd TRAP_00b0:
00cd 0007 | | Action Break_Optional
00ce 4801 |H | Short_Literal 0x1
00cf 4801 |H | Short_Literal 0x1
00d0 e006 | | Load 0x0,0x6
00d1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00d2 0092 00e0 | | Action Push_String_Extended,0xe0 ; "Unhandled_Exception"
00d4 4802 |H | Short_Literal 0x2
00d5 0092 00ec | | Action Push_String_Extended,0xec ; "!Machine.Initialization.Servers.Ci"
00d7 e007 | | Load 0x0,0x7
00d8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00da ; --------------------------------------------------------------------------------------
00da ; STRING TABLE
00da ; --------------------------------------------------------------------------------------
00da 0028 | ( | .STRTAB 0x0028->0x00ee ; "<PROFILE>"
00db 002f | / | .STRTAB 0x002f->0x00f2 ; "Name => (Smooth Snapshots)"
00dc 0047 | G | .STRTAB 0x0047->0x00ff ; "$"
00dd 0046 | F | .STRTAB 0x0046->0x0100 ; "!Machine.Release.Current.Activity"
00de 0065 | e | .STRTAB 0x0065->0x0110 ; "Smooth_Snapshots"
00df 0073 | s | .STRTAB 0x0073->0x0118 ; "!Commands.System_Maintenance"
00e0 008d | | .STRTAB 0x008d->0x0126 ; "Unhandled_Exception"
00e1 009e | | .STRTAB 0x009e->0x0130 ; "!Machine.Initialization.Servers.Smooth_Snapshots"
00e2 00cc | | .STRTAB 0x00cc->0x0148 ; "!Machine.Initialization.Servers.FTP"
00e3 00ed | | .STRTAB 0x00ed->0x0159 ; "Output => !Machine.Error_Logs.Archive_Server_Log,Name => (Archive Server), User=NETWORK_PUBLIC, Password=()Session=!Machine.Network_Public_Archive_Server_Sessions.Network_Public_Session_1"
00e4 01a6 | | .STRTAB 0x01a6->0x01b7 ; "!Machine.Error_Logs"
00e5 01b7 | | .STRTAB 0x01b7->0x01c0 ; "\x22!Commands\x22.Archive.Server"
00e6 01cf | | .STRTAB 0x01cf->0x01cd ; "!Machine.Initialization.Servers.Archive"
00e7 01f4 | | .STRTAB 0x01f4->0x01e1 ; "Name => (Console Command Interpreter)"
00e8 0217 | | .STRTAB 0x0217->0x01f3 ; "(Timeout => "
00e9 0221 | ! | .STRTAB 0x0221->0x01f9 ; ")"
00ea 0220 | | .STRTAB 0x0220->0x01fa ; "CI.Login"
00eb 0226 | & | .STRTAB 0x0226->0x01fe ; "!Tools.CI"
00ec 022d | - | .STRTAB 0x022d->0x0202 ; "!Machine.Initialization.Servers.Ci"
00ed 024d | M | .STREND 0x024d->0x0213
00ee 3c50 524f |<PRO| .STRTAB_STRINGS
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; Debug Table
0218 ; --------------------------------------------------------------------------------------
0218 0004 0002 | | .DEBUG4 0x0004,0x0002,0x06d8,0x0000,0x0001,0x0000
021e 0000 0000 | | .BLANK 0000[0x1e2]