|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0fe0f5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 0470 | p | .CONST 0x0470 ; 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 8002 | | .CONST 0x8002 ; 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 003d | = | .CONST 0x003d ; Address of begin
0019 0089 | | .CONST 0x0089 ; Address of exception handler
001a 0009 | | .CONST 0x0009 ; Number of locals
001b INIT_0018:
001b 0093 0000 | | push_full_address 0x0
001d 60d6 |` | Indirect_Literal Discrete,0xf4,{0x80000000, 0x00010000}
001e 0273 | s | Execute Discrete,Plus
001f 0093 0000 | | push_full_address 0x0
0021 60ce |` | Indirect_Literal Discrete,0xf0,{0x80000000, 0x00020000}
0022 0273 | s | Execute Discrete,Plus
0023 0093 0000 | | push_full_address 0x0
0025 60c6 |` | Indirect_Literal Discrete,0xec,{0x80000000, 0x00030000}
0026 0273 | s | Execute Discrete,Plus
0027 0007 | | Action Break_Optional
0028 00e1 | | Load_Encached Boolean_Cache
0029 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
002a 4801 |H | Short_Literal 0x1
002b 4806 |H | Short_Literal 0x6
002c 00e9 | | Load_Encached String_Cache
002d 0334 | 4 | Declare_Variable Array,With_Constraint
002e 50c9 |P | Indirect_Literal Any,0xf8,{0x7463702f, 0x69702020}
002f e002 | | Load 0x0,0x2
0030 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0031 e003 | | Load 0x0,0x3
0032 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0033 e004 | | Load 0x0,0x4
0034 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0035 e004 | | Load 0x0,0x4
0036 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0037 e003 | | Load 0x0,0x3
0038 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0039 029f 0103 | | Declare_Subprogram INIT_0100,For_Call
003b 029f 0113 | | Declare_Subprogram INIT_0110,For_Call
003d BODY_0018:
003d e5ff | | Load 0x2,-0x1
003e 0092 022e | .| Action Push_String_Extended,0x22e ; "<<Machine where to install .rhosts file>>"
0040 01df | | Execute Vector,Equal
0041 e5fe | | Load 0x2,-0x2
0042 0092 022f | /| Action Push_String_Extended,0x22f ; "<<Username to install .rhosts file>>"
0044 01df | | Execute Vector,Equal
0045 0278 | x | Execute Discrete,Or
0046 e5fd | | Load 0x2,-0x3
0047 0092 0230 | 0| Action Push_String_Extended,0x230 ; "<<Password of Username account>>"
0049 01df | | Execute Vector,Equal
004a 0278 | x | Execute Discrete,Or
004b 680b |h | Jump_Zero 0x57
004c e005 | | Load 0x0,0x5
004d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
004e 0092 0231 | 1| Action Push_String_Extended,0x231 ; "setup_rhosts"
0050 e006 | | Load 0x0,0x6
0051 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0052 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0053 4801 |H | Short_Literal 0x1
0054 e005 | | Load 0x0,0x5
0055 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0056 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0057 e007 | | Load 0x0,0x7
0058 180e | | Execute Package,Field_Execute,Field_Number 0xe
0059 4802 |H | Short_Literal 0x2
005a 0092 0232 | 2| Action Push_String_Extended,0x232 ; "Checking for Rshell privileges."
005c e008 | | Load 0x0,0x8
005d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
005e 0092 0233 | 3| Action Push_String_Extended,0x233 ; "<DEFAULT>"
0060 0092 0234 | 4| Action Push_String_Extended,0x234 ; "<NONE>"
0062 0092 0233 | 3| Action Push_String_Extended,0x233 ; "<DEFAULT>"
0064 00ea | | Load_Encached Null_String_Cache
0065 e5fe | | Load 0x2,-0x2
0066 e5ff | | Load 0x2,-0x1
0067 0092 0235 | 5| Action Push_String_Extended,0x235 ; "/bin/date"
0069 8009 | | Call 0x0,0x9
006a 681c |h | Jump_Zero 0x87
006b 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
006d e00a | | Load 0x0,0xa
006e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
006f 0092 0237 | 7| Action Push_String_Extended,0x237 ; "There is no need to modify your .rhosts file to run Rshell."
0071 e00a | | Load 0x0,0xa
0072 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0073 0092 0238 | 8| Action Push_String_Extended,0x238 ; "Therefore you do not need to modify your .rhosts file to run Insight."
0075 e00a | | Load 0x0,0xa
0076 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0077 0092 0239 | 9| Action Push_String_Extended,0x239 ; "Modify the .rhosts file anyway: [y] "
0079 8408 | | Call 0x2,0x8
007a a405 | | Store_Unchecked 0x2,0x5
007b e405 | | Load 0x2,0x5
007c 6802 |h | Jump_Zero 0x7f
007d 8409 | | Call 0x2,0x9
007e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
007f e007 | | Load 0x0,0x7
0080 180e | | Execute Package,Field_Execute,Field_Number 0xe
0081 4802 |H | Short_Literal 0x2
0082 0092 023a | :| Action Push_String_Extended,0x23a ; "Setup_Rhosts completed."
0084 e008 | | Load 0x0,0x8
0085 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0086 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0087 8409 | | Call 0x2,0x9
0088 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0089 TRAP_0018:
0089 e403 | | Load 0x2,0x3
008a 010f | | Execute Exception,Equal
008b 6827 |h' | Jump_Zero 0xb3
008c e007 | | Load 0x0,0x7
008d 180e | | Execute Package,Field_Execute,Field_Number 0xe
008e e00b | | Load 0x0,0xb
008f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0090 e007 | | Load 0x0,0x7
0091 180e | | Execute Package,Field_Execute,Field_Number 0xe
0092 4807 |H | Short_Literal 0x7
0093 0092 023b | ;| Action Push_String_Extended,0x23b ; "Problem modifying the .rhosts file."
0095 e008 | | Load 0x0,0x8
0096 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0097 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
0099 e00a | | Load 0x0,0xa
009a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
009b 0092 023c | <| Action Push_String_Extended,0x23c ; "Unable to transfer file. Please check and fix:"
009d e00a | | Load 0x0,0xa
009e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
009f 0092 023d | =| Action Push_String_Extended,0x23d ; "1) There is enough disk space."
00a1 e00a | | Load 0x0,0xa
00a2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00a3 0092 023e | >| Action Push_String_Extended,0x23e ; "2) There is write privileges for the .rhosts file."
00a5 e00a | | Load 0x0,0xa
00a6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00a7 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
00a9 e00a | | Load 0x0,0xa
00aa 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00ab e007 | | Load 0x0,0x7
00ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ad 4802 |H | Short_Literal 0x2
00ae 0092 023f | ?| Action Push_String_Extended,0x23f ; "Unable to complete changes to the .rhosts file, please take corrective action and rerun the setup program."
00b0 e008 | | Load 0x0,0x8
00b1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b2 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00b3 e402 | | Load 0x2,0x2
00b4 010f | | Execute Exception,Equal
00b5 6818 |h | Jump_Zero 0xce
00b6 e007 | | Load 0x0,0x7
00b7 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b8 4807 |H | Short_Literal 0x7
00b9 0092 0240 | @| Action Push_String_Extended,0x240 ; "Check login parameters. Exception name: "
00bb e008 | | Load 0x0,0x8
00bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00bd 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
00bf e00a | | Load 0x0,0xa
00c0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00c1 0092 0241 | A| Action Push_String_Extended,0x241 ; "Unable to log in. Please check the values entered in Remote_machine,"
00c3 e00a | | Load 0x0,0xa
00c4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00c5 0092 0242 | B| Action Push_String_Extended,0x242 ; "Remote_Username, and Remote_Password for validity."
00c7 e00a | | Load 0x0,0xa
00c8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00c9 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
00cb e00a | | Load 0x0,0xa
00cc 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00cd 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00ce e404 | | Load 0x2,0x4
00cf 010f | | Execute Exception,Equal
00d0 680c |h | Jump_Zero 0xdd
00d1 e007 | | Load 0x0,0x7
00d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d3 e00b | | Load 0x0,0xb
00d4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00d5 e007 | | Load 0x0,0x7
00d6 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d7 4802 |H | Short_Literal 0x2
00d8 0092 023f | ?| Action Push_String_Extended,0x23f ; "Unable to complete changes to the .rhosts file, please take corrective action and rerun the setup program."
00da e008 | | Load 0x0,0x8
00db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00dc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00dd e007 | | Load 0x0,0x7
00de 180e | | Execute Package,Field_Execute,Field_Number 0xe
00df e00b | | Load 0x0,0xb
00e0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00e1 e007 | | Load 0x0,0x7
00e2 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e3 4802 |H | Short_Literal 0x2
00e4 0092 023f | ?| Action Push_String_Extended,0x23f ; "Unable to complete changes to the .rhosts file, please take corrective action and rerun the setup program."
00e6 e008 | | Load 0x0,0x8
00e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00e8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00e9 0000 0000 | | .XXX[0x3]
00eb 0000 | |
00ec 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
00f0 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
00f4 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00f8 7463 702f |tcp/| .LITERAL {0x7463702f, 0x69702020}
00fc 0000 0000 | | .BLANK 0000[0x4]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105 | | .CONST 0x0105 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 029f 020b | | Declare_Subprogram INIT_0208,For_Call
0105 BODY_0100:
0105 00cf | | Action Mark_Auxiliary
0106 00ea | | Load_Encached Null_String_Cache
0107 e00a | | Load 0x0,0xa
0108 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0109 e7ff | | Load 0x3,-0x1
010a e00a | | Load 0x0,0xa
010b 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
010c 8602 | | Call 0x3,0x2
010d 00c9 | | Action Pop_Auxiliary_Loop
010e 7ff7 | | Jump 0x106
010f 0000 | | .XXX[0x1]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0123 | # | .CONST 0x0123 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0006 | | .CONST 0x0006 ; Number of locals
0113 INIT_0110:
0113 e00c | | Load 0x0,0xc
0114 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0115 02c7 | | Declare_Variable Any
0116 00d8 | | Load_Top At_Offset_0
0117 1c00 | | Execute_Immediate Run_Utility,0x0
0118 e00d | | Load 0x0,0xd
0119 1b17 | | Execute Package,Field_Read,Field_Number 0x17
011a e00d | | Load 0x0,0xd
011b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
011c e00e | | Load 0x0,0xe
011d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011e 02c7 | | Declare_Variable Any
011f 00d8 | | Load_Top At_Offset_0
0120 1c00 | | Execute_Immediate Run_Utility,0x0
0121 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call
0123 BODY_0110:
0123 00be | | Action Activate_Tasks
0124 e5fc | | Load 0x2,-0x4
0125 e007 | | Load 0x0,0x7
0126 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0127 4801 |H | Short_Literal 0x1
0128 4800 |H | Short_Literal 0x0
0129 4800 |H | Short_Literal 0x0
012a 4802 |H | Short_Literal 0x2
012b e00f | | Load 0x0,0xf
012c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
012d 00ea | | Load_Encached Null_String_Cache
012e 00ea | | Load_Encached Null_String_Cache
012f 00ea | | Load_Encached Null_String_Cache
0130 e5fd | | Load 0x2,-0x3
0131 e5fe | | Load 0x2,-0x2
0132 4801 |H | Short_Literal 0x1
0133 e5ff | | Load 0x2,-0x1
0134 e00b | | Load 0x0,0xb
0135 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0136 8606 | | Call 0x3,0x6
0137 0f01 | | Execute_Immediate Equal,0x1
0138 7002 |p | Jump_Nonzero 0x13b
0139 e402 | | Load 0x2,0x2
013a 0257 | W | Execute Discrete,Raise
013b 00ea | | Load_Encached Null_String_Cache
013c e00f | | Load 0x0,0xf
013d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
013e e007 | | Load 0x0,0x7
013f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0140 e007 | | Load 0x0,0x7
0141 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0142 e007 | | Load 0x0,0x7
0143 180e | | Execute Package,Field_Execute,Field_Number 0xe
0144 e007 | | Load 0x0,0x7
0145 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0146 e007 | | Load 0x0,0x7
0147 180e | | Execute Package,Field_Execute,Field_Number 0xe
0148 e007 | | Load 0x0,0x7
0149 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
014a e007 | | Load 0x0,0x7
014b 180e | | Execute Package,Field_Execute,Field_Number 0xe
014c e007 | | Load 0x0,0x7
014d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
014e e007 | | Load 0x0,0x7
014f 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0150 4802 |H | Short_Literal 0x2
0151 e007 | | Load 0x0,0x7
0152 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
0153 4800 |H | Short_Literal 0x0
0154 0092 0243 | C| Action Push_String_Extended,0x243 ; "!Machine.Temporary.Original_Rhosts"
0156 0092 0244 | D| Action Push_String_Extended,0x244 ; ".rhosts"
0158 e00b | | Load 0x0,0xb
0159 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
015a e00d | | Load 0x0,0xd
015b 1b18 | | Execute Package,Field_Read,Field_Number 0x18
015c e00b | | Load 0x0,0xb
015d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
015e e00c | | Load 0x0,0xc
015f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0160 005b | [ | Store_Top Discrete,At_Offset_3
0161 00da | | Load_Top At_Offset_2
0162 0f01 | | Execute_Immediate Equal,0x1
0163 6839 |h9 | Jump_Zero 0x19d
0164 00ea | | Load_Encached Null_String_Cache
0165 e00b | | Load 0x0,0xb
0166 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0167 e007 | | Load 0x0,0x7
0168 180e | | Execute Package,Field_Execute,Field_Number 0xe
0169 e007 | | Load 0x0,0x7
016a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
016b e007 | | Load 0x0,0x7
016c 180e | | Execute Package,Field_Execute,Field_Number 0xe
016d e007 | | Load 0x0,0x7
016e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
016f e007 | | Load 0x0,0x7
0170 180e | | Execute Package,Field_Execute,Field_Number 0xe
0171 e007 | | Load 0x0,0x7
0172 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0173 e007 | | Load 0x0,0x7
0174 180e | | Execute Package,Field_Execute,Field_Number 0xe
0175 e007 | | Load 0x0,0x7
0176 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0177 e007 | | Load 0x0,0x7
0178 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0179 4802 |H | Short_Literal 0x2
017a e007 | | Load 0x0,0x7
017b 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
017c 4800 |H | Short_Literal 0x0
017d 0092 0245 | E| Action Push_String_Extended,0x245 ; ".rhosts_original"
017f 0092 0243 | C| Action Push_String_Extended,0x243 ; "!Machine.Temporary.Original_Rhosts"
0181 e00b | | Load 0x0,0xb
0182 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0183 e00d | | Load 0x0,0xd
0184 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0185 e00b | | Load 0x0,0xb
0186 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0187 e00c | | Load 0x0,0xc
0188 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0189 005b | [ | Store_Top Discrete,At_Offset_3
018a 00da | | Load_Top At_Offset_2
018b 0f0b | | Execute_Immediate Equal,0xb
018c 6809 |h | Jump_Zero 0x196
018d e007 | | Load 0x0,0x7
018e 180e | | Execute Package,Field_Execute,Field_Number 0xe
018f 4807 |H | Short_Literal 0x7
0190 0092 0246 | F| Action Push_String_Extended,0x246 ; "Unable to save the original .rhosts file."
0192 e008 | | Load 0x0,0x8
0193 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0194 e404 | | Load 0x2,0x4
0195 0257 | W | Execute Discrete,Raise
0196 e007 | | Load 0x0,0x7
0197 180e | | Execute Package,Field_Execute,Field_Number 0xe
0198 4802 |H | Short_Literal 0x2
0199 0092 0247 | G| Action Push_String_Extended,0x247 ; "A copy of the original .rhosts file has been saved as .rhosts_original."
019b e008 | | Load 0x0,0x8
019c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
019d 00d9 | | Load_Top At_Offset_1
019e 00ea | | Load_Encached Null_String_Cache
019f 0092 0248 | H| Action Push_String_Extended,0x248 ; "!Machine.Temporary.Rhosts_file"
01a1 4801 |H | Short_Literal 0x1
01a2 e00e | | Load 0x0,0xe
01a3 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01a4 c605 | | Store 0x3,0x5
01a5 00ea | | Load_Encached Null_String_Cache
01a6 00da | | Load_Top At_Offset_2
01a7 e00e | | Load 0x0,0xe
01a8 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
01a9 e406 | | Load 0x2,0x6
01aa 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
01ac 01cc | | Execute Vector,Catenate
01ad e407 | | Load 0x2,0x7
01ae 01cc | | Execute Vector,Catenate
01af 00da | | Load_Top At_Offset_2
01b0 e00e | | Load 0x0,0xe
01b1 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
01b2 00d9 | | Load_Top At_Offset_1
01b3 e00e | | Load 0x0,0xe
01b4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01b5 c605 | | Store 0x3,0x5
01b6 00ea | | Load_Encached Null_String_Cache
01b7 e00b | | Load 0x0,0xb
01b8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01b9 e007 | | Load 0x0,0x7
01ba 180e | | Execute Package,Field_Execute,Field_Number 0xe
01bb e007 | | Load 0x0,0x7
01bc 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
01bd e007 | | Load 0x0,0x7
01be 180e | | Execute Package,Field_Execute,Field_Number 0xe
01bf e007 | | Load 0x0,0x7
01c0 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
01c1 e007 | | Load 0x0,0x7
01c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c3 e007 | | Load 0x0,0x7
01c4 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
01c5 e007 | | Load 0x0,0x7
01c6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01c7 e007 | | Load 0x0,0x7
01c8 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
01c9 e007 | | Load 0x0,0x7
01ca 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01cb 4802 |H | Short_Literal 0x2
01cc e007 | | Load 0x0,0x7
01cd 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
01ce 4801 |H | Short_Literal 0x1
01cf 0092 0244 | D| Action Push_String_Extended,0x244 ; ".rhosts"
01d1 0092 0248 | H| Action Push_String_Extended,0x248 ; "!Machine.Temporary.Rhosts_file"
01d3 e00b | | Load 0x0,0xb
01d4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01d5 e00d | | Load 0x0,0xd
01d6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01d7 e00b | | Load 0x0,0xb
01d8 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01d9 e00c | | Load 0x0,0xc
01da 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01db 005b | [ | Store_Top Discrete,At_Offset_3
01dc 00da | | Load_Top At_Offset_2
01dd 0f0b | | Execute_Immediate Equal,0xb
01de 00db | | Load_Top At_Offset_3
01df 0f09 | | Execute_Immediate Equal,0x9
01e0 0278 | x | Execute Discrete,Or
01e1 6809 |h | Jump_Zero 0x1eb
01e2 e007 | | Load 0x0,0x7
01e3 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e4 4807 |H | Short_Literal 0x7
01e5 0092 0249 | I| Action Push_String_Extended,0x249 ; "Unable to create new .rhosts file."
01e7 e008 | | Load 0x0,0x8
01e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e9 e404 | | Load 0x2,0x4
01ea 0257 | W | Execute Discrete,Raise
01eb e007 | | Load 0x0,0x7
01ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ed e00b | | Load 0x0,0xb
01ee 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01ef e007 | | Load 0x0,0x7
01f0 180e | | Execute Package,Field_Execute,Field_Number 0xe
01f1 4802 |H | Short_Literal 0x2
01f2 0092 024a | J| Action Push_String_Extended,0x24a ; "The entry ("
01f4 e406 | | Load 0x2,0x6
01f5 01cc | | Execute Vector,Catenate
01f6 0092 0236 | 6| Action Push_String_Extended,0x236 ; " "
01f8 01cc | | Execute Vector,Catenate
01f9 e407 | | Load 0x2,0x7
01fa 01cc | | Execute Vector,Catenate
01fb 0092 024b | K| Action Push_String_Extended,0x24b ; ") has been successfully added to the .rhosts file"
01fd 01cc | | Execute Vector,Catenate
01fe e008 | | Load 0x0,0x8
01ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0200 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0201 0000 0000 | | .BLANK 0000[0x7]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020d | | .CONST 0x020d ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0002 | | .CONST 0x0002 ; Number of locals
020b INIT_0208:
020b e00a | | Load 0x0,0xa
020c 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
020d BODY_0208:
020d 00d8 | | Load_Top At_Offset_0
020e 01db | | Execute Vector,Length
020f 680c |h | Jump_Zero 0x21c
0210 00d8 | | Load_Top At_Offset_0
0211 01dd | | Execute Vector,First
0212 00d9 | | Load_Top At_Offset_1
0213 01d7 | | Execute Vector,Field_Read
0214 0f79 | y | Execute_Immediate Equal,0x79
0215 00d9 | | Load_Top At_Offset_1
0216 01dd | | Execute Vector,First
0217 00da | | Load_Top At_Offset_2
0218 01d7 | | Execute Vector,Field_Read
0219 0f59 | Y | Execute_Immediate Equal,0x59
021a 0278 | x | Execute Discrete,Or
021b 7801 |x | Jump 0x21d
021c 4801 |H | Short_Literal 0x1
021d 00cb | | Action Pop_Block_With_Result
021e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
021f 0000 | | .XXX[0x1]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0225 | % | .CONST 0x0225 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0002 | | .CONST 0x0002 ; Number of locals
0223 INIT_0220:
0223 e00d | | Load 0x0,0xd
0224 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0225 BODY_0220:
0225 e00d | | Load 0x0,0xd
0226 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0227 e00b | | Load 0x0,0xb
0228 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0229 e00c | | Load 0x0,0xc
022a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022b 0059 | Y | Store_Top Discrete,At_Offset_1
022c 00d8 | | Load_Top At_Offset_0
022d 00ca | | Action Exit_Nullary_Function
022e ; --------------------------------------------------------------------------------------
022e ; STRING TABLE
022e ; --------------------------------------------------------------------------------------
022e 003e | > | .STRTAB 0x003e->0x024d ; "<<Machine where to install .rhosts file>>"
022f 0065 | e | .STRTAB 0x0065->0x0261 ; "<<Username to install .rhosts file>>"
0230 0087 | | .STRTAB 0x0087->0x0273 ; "<<Password of Username account>>"
0231 00a5 | | .STRTAB 0x00a5->0x0283 ; "setup_rhosts"
0232 00af | | .STRTAB 0x00af->0x0289 ; "Checking for Rshell privileges."
0233 00cc | | .STRTAB 0x00cc->0x0299 ; "<DEFAULT>"
0234 00d3 | | .STRTAB 0x00d3->0x029d ; "<NONE>"
0235 00d7 | | .STRTAB 0x00d7->0x02a0 ; "/bin/date"
0236 00de | | .STRTAB 0x00de->0x02a5 ; " "
0237 00dd | | .STRTAB 0x00dd->0x02a5 ; "There is no need to modify your .rhosts file to run Rshell."
0238 0116 | | .STRTAB 0x0116->0x02c3 ; "Therefore you do not need to modify your .rhosts file to run Insight."
0239 0159 | Y | .STRTAB 0x0159->0x02e5 ; "Modify the .rhosts file anyway: [y] "
023a 017b | { | .STRTAB 0x017b->0x02f7 ; "Setup_Rhosts completed."
023b 0190 | | .STRTAB 0x0190->0x0303 ; "Problem modifying the .rhosts file."
023c 01b1 | | .STRTAB 0x01b1->0x0314 ; "Unable to transfer file. Please check and fix:"
023d 01dd | | .STRTAB 0x01dd->0x032b ; "1) There is enough disk space."
023e 01f9 | | .STRTAB 0x01f9->0x033a ; "2) There is write privileges for the .rhosts file."
023f 0229 | ) | .STRTAB 0x0229->0x0353 ; "Unable to complete changes to the .rhosts file, please take corrective action and rerun the setup program."
0240 0291 | | .STRTAB 0x0291->0x0388 ; "Check login parameters. Exception name: "
0241 02b7 | | .STRTAB 0x02b7->0x039c ; "Unable to log in. Please check the values entered in Remote_machine,"
0242 02f9 | | .STRTAB 0x02f9->0x03be ; "Remote_Username, and Remote_Password for validity."
0243 0329 | ) | .STRTAB 0x0329->0x03d7 ; "!Machine.Temporary.Original_Rhosts"
0244 0349 | I | .STRTAB 0x0349->0x03e8 ; ".rhosts"
0245 034e | N | .STRTAB 0x034e->0x03ec ; ".rhosts_original"
0246 035c | \ | .STRTAB 0x035c->0x03f4 ; "Unable to save the original .rhosts file."
0247 0383 | | .STRTAB 0x0383->0x0408 ; "A copy of the original .rhosts file has been saved as .rhosts_original."
0248 03c8 | | .STRTAB 0x03c8->0x042c ; "!Machine.Temporary.Rhosts_file"
0249 03e4 | | .STRTAB 0x03e4->0x043b ; "Unable to create new .rhosts file."
024a 0404 | | .STRTAB 0x0404->0x044c ; "The entry ("
024b 040d | | .STRTAB 0x040d->0x0451 ; ") has been successfully added to the .rhosts file"
024c 043c | < | .STREND 0x043c->0x046a
024d 3c3c 4d61 |<<Ma| .STRTAB_STRINGS
046a 0000 0000 | | .BLANK 0000[0x6]
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug Table
0470 ; --------------------------------------------------------------------------------------
0470 0004 0006 | | .DEBUG4 0x0004,0x0006,0x47c5,0x0000,0x0001,0x0000
0476 fa40 1eff | @ | .XXX[0x18a]
0478 a250 1eff | P |
047a a240 4000 | @@ |
047c 6500 0095 |e |
047e d248 4080 | H@ |
0480 0240 1eff | @ |
0482 a100 009a | |
0484 5248 4080 |RH@ |
0486 0a07 1f80 | |
0488 2207 a000 |" |
048a 0207 0f80 | |
048c 2348 8881 |#H |
048e d207 0f80 | |
0490 2340 0881 |#@ |
0492 d277 8efe | w |
0494 0341 3981 | A9 |
0496 e202 4000 | @ |
0498 20ca 0000 | |
049a 2454 0007 |$T |
049c 844c 001a | L |
049e dc44 001a | D |
04a0 de40 488e | @H |
04a2 7648 498e |vHI |
04a4 c500 0141 | A|
04a6 1650 4083 | P@ |
04a8 0854 0007 | T |
04aa 844c 001a | L |
04ac de48 498e | HI |
04ae f250 4a84 | PJ |
04b0 5258 4000 |RX@ |
04b2 6500 0a2e |e .|
04b4 5240 4000 |R@@ |
04b6 6300 b981 |c |
04b8 e248 1eff | H |
04ba b1ff ffcc | |
04bc c240 4000 | @@ |
04be 6444 001a |dD |
04c0 df40 088a | @ |
04c2 1300 deff | |
04c4 904c 001b | L |
04c6 4f40 9eff |O@ |
04c8 a240 4000 | @@ |
04ca 6300 deff |c |
04cc 9900 0af3 | |
04ce 1b48 098f | H |
04d0 e202 4000 | @ |
04d2 200a 0000 | |
04d4 1804 0000 | |
04d6 0100 0aff | |
04d8 4640 4000 |F@@ |
04da 6042 0000 |`B |
04dc 16e8 4000 | @ |
04de 2100 0aff |! |
04e0 6640 4000 |f@@ |
04e2 62e8 4000 |b @ |
04e4 23e8 1d80 |# |
04e6 3340 5eff |3@^ |
04e8 b202 9d00 | |
04ea 2022 0000 | " |
04ec 504c 001b |PL |
04ee 4f48 098f |OH |
04f0 e100 0af2 | |
04f2 d240 4000 | @@ |
04f4 6202 4000 |b @ |
04f6 200a 0000 | |
04f8 1804 0000 | |
04fa 0100 0afe | |
04fc fe40 4000 | @@ |
04fe 6042 0000 |`B |
0500 1740 0880 | @ |
0502 3100 0aff |1 |
0504 1e40 4000 | @@ |
0506 6340 0880 |c@ |
0508 3348 5eff |3H^ |
050a b248 8800 | H |
050c 264c c980 |&L |
050e 0748 deff | H |
0510 904c 001b | L |
0512 4f48 098f |OH |
0514 e100 0af2 | |
0516 8a40 4000 | @@ |
0518 6202 4000 |b @ |
051a 200a 0000 | |
051c 1804 0000 | |
051e 0100 0afe | |
0520 b640 4000 | @@ |
0522 6042 0000 |`B |
0524 16e8 4000 | @ |
0526 2100 0afe |! |
0528 d640 4000 | @@ |
052a 62e8 4000 |b @ |
052c 23e8 1d80 |# |
052e 4340 5eff |C@^ |
0530 ba02 9d00 | |
0532 20a2 0000 | |
0534 5640 4000 |V@@ |
0536 644c 001b |dL |
0538 4f48 098f |OH |
053a e100 0af2 | |
053c 3e40 4000 |>@@ |
053e 6202 4000 |b @ |
0540 200a 0000 | |
0542 1804 0000 | |
0544 0100 0afe | |
0546 6a40 4000 |j@@ |
0548 6042 0000 |`B |
054a 1740 0880 | @ |
054c 4100 0afe |A |
054e 8a40 4000 | @@ |
0550 6340 0880 |c@ |
0552 4348 5eff |CH^ |
0554 ba48 8800 | H |
0556 264c c980 |&L |
0558 0748 deff | H |
055a 9a40 4000 | @@ |
055c 65ff ffca |e |
055e e648 1eff | H |
0560 9240 1eff | @ |
0562 9100 0081 | |
0564 2a48 4080 |*H@ |
0566 0854 001a | T |
0568 de50 4a8a | PJ |
056a 2348 0a80 |#H |
056c 0340 1eff | @ |
056e d348 8880 | H |
0570 1350 0a80 | P |
0572 1240 1eff | @ |
0574 e350 9eff | P |
0576 c100 0128 | (|
0578 5e48 4080 |^H@ |
057a 0207 1f80 | |
057c 2207 a000 |" |
057e 0277 8efe | w |
0580 204c 001a | L |
0582 de48 498f | HI |
0584 2300 9eff |# |
0586 f2e8 4080 | @ |
0588 0240 1eff | @ |
058a b348 9d00 | H |
058c 2240 1eff |"@ |
058e c248 1eff | H |
0590 a348 9d00 | H |
0592 22e8 4080 |" @ |
0594 044c 001a | L |
0596 de48 498f | HI |
0598 46e4 bd80 |F |
059a 0e40 1eff | @ |
059c b348 9c00 | H |
059e 2240 1eff |"@ |
05a0 c248 1eff | H |
05a2 f2e8 1d80 | |
05a4 0602 9d80 | |
05a6 0822 0000 | " |
05a8 2348 9c00 |#H |
05aa 204c 001a | L |
05ac dc44 001a | D |
05ae de40 488f | @H |
05b0 7648 498f |vHI |
05b2 bd00 013e | >|
05b4 fa50 4083 | P@ |
05b6 9648 4080 | H@ |
05b8 01ff ffd6 | |
05ba 9640 4000 | @@ |
05bc 6248 1eff |bH |
05be b100 0adf | |
05c0 e250 4000 | P@ |
05c2 7740 1eff |w@ |
05c4 f2e8 4080 | @ |
05c6 0202 4000 | @ |
05c8 20a2 0000 | |
05ca 504c 001a |PL |
05cc e348 1eff | H |
05ce a244 bd80 | D |
05d0 0b40 0900 | @ |
05d2 204c 001b | L |
05d4 1d00 0af1 | |
05d6 0b48 098a | H |
05d8 5202 4000 |R @ |
05da 208a 0000 | |
05dc 1b40 1eff | @ |
05de f2e4 bd80 | |
05e0 0be8 1eff | |
05e2 a042 0000 | B |
05e4 37e8 1d00 |7 |
05e6 72e8 1d80 |r |
05e8 0602 9d00 | |
05ea 20aa ffff | |
05ec cb48 1eff | H |
05ee a04c 001a | L |
05f0 e044 001a | D |
05f2 de40 488f | @H |
05f4 ea48 4980 | HI |
05f6 0100 013e | >|
05f8 7250 4083 |rP@ |
05fa bae8 4080 | @ |
05fc 0207 1f80 | |
05fe 2247 a000 |"G |