|
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: 9216 (0x2400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6060f0
└─⟦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 1090 | | .CONST 0x1090 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00ad | | .CONST 0x00ad ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003e | > | .CONST 0x003e ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4802 |H | Short_Literal 0x2
000d 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
0027 c21b | | Store 0x1,0x1b
0028 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
002a c221 | ! | Store 0x1,0x21
002b 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
002d c21c | | Store 0x1,0x1c
002e 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
0030 c21d | | Store 0x1,0x1d
0031 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0033 c21e | | Store 0x1,0x1e
0034 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
0036 c212 | | Store 0x1,0x12
0037 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated
0039 c220 | | Store 0x1,0x20
003a 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated
003c c222 | " | Store 0x1,0x22
003d 00bf | | Action Accept_Activation
003e 0092 0c7b | {| Action Push_String_Extended,0xc7b ; "Remote_Passwords"
0040 e001 | | Load 0x0,0x1
0041 1915 | | Execute Package,Field_Reference,Field_Number 0x15
0042 0007 | | Action Break_Optional
0043 0092 0c7c | || Action Push_String_Extended,0xc7c ; "OTHERS"
0045 0092 0c7d | }| Action Push_String_Extended,0xc7d ; "Profile.Remote_Passwords"
0047 4800 |H | Short_Literal 0x0
0048 487f |H | Short_Literal 0x7f
0049 e002 | | Load 0x0,0x2
004a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004b 03f8 | | Declare_Type Discrete,Constrained
004c e20d | | Load 0x1,0xd
004d 0266 | f | Execute Discrete,Bounds
004e e003 | | Load 0x0,0x3
004f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0050 02a0 | | Declare_Subprogram Null_Subprogram
0051 4801 |H | Short_Literal 0x1
0052 035d | ] | Declare_Type Array,Defined
0053 00d8 | | Load_Top At_Offset_0
0054 0337 | 7 | Declare_Variable Array
0055 00d8 | | Load_Top At_Offset_0
0056 0335 | 5 | Declare_Variable Array,Duplicate
0057 00cd | | Action Spare6_Action
0058 4800 |H | Short_Literal 0x0
0059 4800 |H | Short_Literal 0x0
005a 00da | | Load_Top At_Offset_2
005b 01d6 | | Execute Vector,Field_Write
005c 4801 |H | Short_Literal 0x1
005d 4801 |H | Short_Literal 0x1
005e 00da | | Load_Top At_Offset_2
005f 01d6 | | Execute Vector,Field_Write
0060 4802 |H | Short_Literal 0x2
0061 4802 |H | Short_Literal 0x2
0062 00da | | Load_Top At_Offset_2
0063 01d6 | | Execute Vector,Field_Write
0064 00d9 | | Load_Top At_Offset_1
0065 01d4 | | Execute Vector,Structure_Write
0066 e001 | | Load 0x0,0x1
0067 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0068 e001 | | Load 0x0,0x1
0069 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006a e001 | | Load 0x0,0x1
006b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006c 02a0 | | Declare_Subprogram Null_Subprogram
006d 4803 |H | Short_Literal 0x3
006e 032d | - | Declare_Type Record,Defined
006f 00e4 | | Load_Encached Positive_Cache
0070 0266 | f | Execute Discrete,Bounds
0071 00da | | Load_Top At_Offset_2
0072 02a0 | | Declare_Subprogram Null_Subprogram
0073 4801 |H | Short_Literal 0x1
0074 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
0075 029b 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Unelaborated
0077 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0078 00c7 | | Action Elaborate_Subprogram
0079 029d 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call
007b 029d 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call
007d 029d 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call
007f 029d 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call
0081 029d 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call
0083 029d 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call
0085 029d 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call
0087 029d 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call
0089 029d 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call
008b 029d 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call
008d 029d 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call
008f 029d 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call
0091 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call
0093 029d 061b | | Declare_Subprogram INIT_0618,For_Outer_Call
0095 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call
0097 029d 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call
0099 029d 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call
009b 029d 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call
009d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
009e 00c7 | | Action Elaborate_Subprogram
009f 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00a0 00c7 | | Action Elaborate_Subprogram
00a1 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00a2 00c7 | | Action Elaborate_Subprogram
00a3 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00a4 00c7 | | Action Elaborate_Subprogram
00a5 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00a6 00c7 | | Action Elaborate_Subprogram
00a7 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00a8 00c7 | | Action Elaborate_Subprogram
00a9 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00aa 00c7 | | Action Elaborate_Subprogram
00ab 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00ac 00c7 | | Action Elaborate_Subprogram
00ad BODY_0008:
00ad 00bc | | Action Signal_Activated
00ae 00bb | | Action Signal_Completion
00af 0000 | | .XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 4607 |F | Jump_Case 0x8
00b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
00b5 7806 |x | Jump 0xbc ; case 0x1
00b6 7809 |x | Jump 0xc0 ; case 0x2
00b7 780d |x | Jump 0xc5 ; case 0x3
00b8 7810 |x | Jump 0xc9 ; case 0x4
00b9 7811 |x | Jump 0xcb ; case 0x5
00ba 7812 |x | Jump 0xcd ; case 0x6
00bb 7815 |x | Jump 0xd1 ; case 0x7
00bc 00da | | Load_Top At_Offset_2
00bd 0091 0c78 | x| Action Push_String_Extended_Indexed,0xc78 ; "NONE"
00bf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00c0 00db | | Load_Top At_Offset_3
00c1 00db | | Load_Top At_Offset_3
00c2 00e0 | | Load_Encached Standard_Cache
00c3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00c5 00da | | Load_Top At_Offset_2
00c6 00e0 | | Load_Encached Standard_Cache
00c7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00c8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00c9 00db | | Load_Top At_Offset_3
00ca 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00cb 00db | | Load_Top At_Offset_3
00cc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00cd e20d | | Load 0x1,0xd
00ce 00dc | | Load_Top At_Offset_4
00cf 0267 | g | Execute Discrete,Predecessor
00d0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00d1 e20d | | Load 0x1,0xd
00d2 00dc | | Load_Top At_Offset_4
00d3 0268 | h | Execute Discrete,Successor
00d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00d5 0000 0000 | | .XXX[0x3]
00d7 0000 | |
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 011d | | .CONST 0x011d ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0017 | | .CONST 0x0017 ; Number of locals
00db INIT_00d8:
00db 00e1 | | Load_Encached Boolean_Cache
00dc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00dd 03e9 | | Declare_Variable Discrete,Duplicate
00de e5fe | | Load 0x2,-0x2
00df 01db | | Execute Vector,Length
00e0 0e00 | | Execute_Immediate Not_Equal,0x0
00e1 0007 | | Action Break_Optional
00e2 0092 0c7e | ~| Action Push_String_Extended,0xc7e ; "source password"
00e4 e5fd | | Load 0x2,-0x3
00e5 00da | | Load_Top At_Offset_2
00e6 8234 | 4 | Call 0x1,0x34
00e7 e004 | | Load 0x0,0x4
00e8 e005 | | Load 0x0,0x5
00e9 e22a | * | Load 0x1,0x2a
00ea e22b | + | Load 0x1,0x2b
00eb 480a |H | Short_Literal 0xa
00ec e006 | | Load 0x0,0x6
00ed 0387 | | Declare_Variable Package
00ee 00d8 | | Load_Top At_Offset_0
00ef 020f | | Execute Module,Activate
00f0 00d8 | | Load_Top At_Offset_0
00f1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00f2 00d8 | | Load_Top At_Offset_0
00f3 e007 | | Load 0x0,0x7
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 e001 | | Load 0x0,0x1
00f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f7 029f 0743 | C| Declare_Subprogram INIT_0740,For_Call
00f9 4803 |H | Short_Literal 0x3
00fa 032d | - | Declare_Type Record,Defined
00fb 029f 0763 | c| Declare_Subprogram INIT_0760,For_Call
00fd 029f 077b | {| Declare_Subprogram INIT_0778,For_Call
00ff e008 | | Load 0x0,0x8
0100 190e | | Execute Package,Field_Reference,Field_Number 0xe
0101 00c6 | | Action Check_Subprogram_Elaborated
0102 00da | | Load_Top At_Offset_2
0103 480a |H | Short_Literal 0xa
0104 4802 |H | Short_Literal 0x2
0105 0099 | | Action Reference_Dynamic
0106 e009 | | Load 0x0,0x9
0107 e00a | | Load 0x0,0xa
0108 480f |H | Short_Literal 0xf
0109 0007 | | Action Break_Optional
010a 029f 07bb | | Declare_Subprogram INIT_07b8,For_Call
010c 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
010d 00c6 | | Action Check_Subprogram_Elaborated
010e 0092 0c7f | | Action Push_String_Extended,0xc7f ; "Create"
0110 4810 |H | Short_Literal 0x10
0111 4802 |H | Short_Literal 0x2
0112 0099 | | Action Reference_Dynamic
0113 4802 |H | Short_Literal 0x2
0114 4802 |H | Short_Literal 0x2
0115 0099 | | Action Reference_Dynamic
0116 4803 |H | Short_Literal 0x3
0117 4802 |H | Short_Literal 0x2
0118 0099 | | Action Reference_Dynamic
0119 e00b | | Load 0x0,0xb
011a e00c | | Load 0x0,0xc
011b 4817 |H | Short_Literal 0x17
011c 0007 | | Action Break_Optional
011d BODY_00d8:
011d e5fb | | Load 0x2,-0x5
011e 4822 |H" | Short_Literal 0x22
011f 0092 0c80 | | Action Push_String_Extended,0xc80 ; "New_File => \x22"
0121 e5ff | | Load 0x2,-0x1
0122 01cc | | Execute Vector,Catenate
0123 0092 0c81 | | Action Push_String_Extended,0xc81 ; "\x22, Source_File => \x22"
0125 01cc | | Execute Vector,Catenate
0126 e5fe | | Load 0x2,-0x2
0127 01cc | | Execute Vector,Catenate
0128 0092 0c82 | | Action Push_String_Extended,0xc82 ; "\x22, Encryption => "
012a 01cc | | Execute Vector,Catenate
012b e5fc | | Load 0x2,-0x4
012c e20d | | Load 0x1,0xd
012d 011c | | Execute Any,Convert_Unchecked
012e 1c01 | | Execute_Immediate Run_Utility,0x1
012f 01cc | | Execute Vector,Catenate
0130 0092 0c83 | | Action Push_String_Extended,0xc83 ; ", Response => \x22"
0132 01cc | | Execute Vector,Catenate
0133 e5fb | | Load 0x2,-0x5
0134 01cc | | Execute Vector,Catenate
0135 01cb | | Execute Vector,Append
0136 e411 | | Load 0x2,0x11
0137 4812 |H | Short_Literal 0x12
0138 4802 |H | Short_Literal 0x2
0139 0099 | | Action Reference_Dynamic
013a 4813 |H | Short_Literal 0x13
013b 4802 |H | Short_Literal 0x2
013c 0099 | | Action Reference_Dynamic
013d 4814 |H | Short_Literal 0x14
013e 4802 |H | Short_Literal 0x2
013f 0099 | | Action Reference_Dynamic
0140 4815 |H | Short_Literal 0x15
0141 4802 |H | Short_Literal 0x2
0142 0099 | | Action Reference_Dynamic
0143 822c | , | Call 0x1,0x2c
0144 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0145 0000 0000 | | .XXX[0x3]
0147 0000 | |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0161 | a | .CONST 0x0161 ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 000b | | .CONST 0x000b ; Number of locals
014b INIT_0148:
014b 00e1 | | Load_Encached Boolean_Cache
014c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
014d 03e9 | | Declare_Variable Discrete,Duplicate
014e 029f 0823 | #| Declare_Subprogram INIT_0820,For_Call
0150 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0151 00c6 | | Action Check_Subprogram_Elaborated
0152 0092 0c84 | | Action Push_String_Extended,0xc84 ; "Set_Default"
0154 4804 |H | Short_Literal 0x4
0155 4802 |H | Short_Literal 0x2
0156 0099 | | Action Reference_Dynamic
0157 4802 |H | Short_Literal 0x2
0158 4802 |H | Short_Literal 0x2
0159 0099 | | Action Reference_Dynamic
015a 4803 |H | Short_Literal 0x3
015b 4802 |H | Short_Literal 0x2
015c 0099 | | Action Reference_Dynamic
015d e00d | | Load 0x0,0xd
015e e00e | | Load 0x0,0xe
015f 480b |H | Short_Literal 0xb
0160 0007 | | Action Break_Optional
0161 BODY_0148:
0161 e5fd | | Load 0x2,-0x3
0162 4822 |H" | Short_Literal 0x22
0163 0092 0c85 | | Action Push_String_Extended,0xc85 ; "Existing_File => \x22"
0165 e5ff | | Load 0x2,-0x1
0166 01cc | | Execute Vector,Catenate
0167 0092 0c86 | | Action Push_String_Extended,0xc86 ; "\x22, For_Session => \x22"
0169 01cc | | Execute Vector,Catenate
016a e5fe | | Load 0x2,-0x2
016b 01cc | | Execute Vector,Catenate
016c 0092 0c87 | | Action Push_String_Extended,0xc87 ; "\x22, Response => \x22"
016e 01cc | | Execute Vector,Catenate
016f e5fd | | Load 0x2,-0x3
0170 01cc | | Execute Vector,Catenate
0171 01cb | | Execute Vector,Append
0172 e405 | | Load 0x2,0x5
0173 4806 |H | Short_Literal 0x6
0174 4802 |H | Short_Literal 0x2
0175 0099 | | Action Reference_Dynamic
0176 4807 |H | Short_Literal 0x7
0177 4802 |H | Short_Literal 0x2
0178 0099 | | Action Reference_Dynamic
0179 4808 |H | Short_Literal 0x8
017a 4802 |H | Short_Literal 0x2
017b 0099 | | Action Reference_Dynamic
017c 4809 |H | Short_Literal 0x9
017d 4802 |H | Short_Literal 0x2
017e 0099 | | Action Reference_Dynamic
017f 822c | , | Call 0x1,0x2c
0180 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0181 0000 0000 | | .BLANK 0000[0x7]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 01c7 | | .CONST 0x01c7 ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0016 | | .CONST 0x0016 ; Number of locals
018b INIT_0188:
018b 00e1 | | Load_Encached Boolean_Cache
018c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
018d 03e9 | | Declare_Variable Discrete,Duplicate
018e e5ff | | Load 0x2,-0x1
018f e008 | | Load 0x0,0x8
0190 180d | | Execute Package,Field_Execute,Field_Number 0xd
0191 e00f | | Load 0x0,0xf
0192 e010 | | Load 0x0,0x10
0193 e22a | * | Load 0x1,0x2a
0194 e22b | + | Load 0x1,0x2b
0195 480a |H | Short_Literal 0xa
0196 e006 | | Load 0x0,0x6
0197 0387 | | Declare_Variable Package
0198 00d8 | | Load_Top At_Offset_0
0199 020f | | Execute Module,Activate
019a 00d8 | | Load_Top At_Offset_0
019b 1b12 | | Execute Package,Field_Read,Field_Number 0x12
019c 00d8 | | Load_Top At_Offset_0
019d e007 | | Load 0x0,0x7
019e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019f e001 | | Load 0x0,0x1
01a0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a1 029f 086b | k| Declare_Subprogram INIT_0868,For_Call
01a3 4803 |H | Short_Literal 0x3
01a4 032d | - | Declare_Type Record,Defined
01a5 029f 088b | | Declare_Subprogram INIT_0888,For_Call
01a7 029f 08a3 | | Declare_Subprogram INIT_08a0,For_Call
01a9 e008 | | Load 0x0,0x8
01aa 190e | | Execute Package,Field_Reference,Field_Number 0xe
01ab 00c6 | | Action Check_Subprogram_Elaborated
01ac 00da | | Load_Top At_Offset_2
01ad 4809 |H | Short_Literal 0x9
01ae 4802 |H | Short_Literal 0x2
01af 0099 | | Action Reference_Dynamic
01b0 e011 | | Load 0x0,0x11
01b1 e012 | | Load 0x0,0x12
01b2 480e |H | Short_Literal 0xe
01b3 0007 | | Action Break_Optional
01b4 029f 08d3 | | Declare_Subprogram INIT_08d0,For_Call
01b6 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
01b7 00c6 | | Action Check_Subprogram_Elaborated
01b8 0092 0c88 | | Action Push_String_Extended,0xc88 ; "Add"
01ba 480f |H | Short_Literal 0xf
01bb 4802 |H | Short_Literal 0x2
01bc 0099 | | Action Reference_Dynamic
01bd 4802 |H | Short_Literal 0x2
01be 4802 |H | Short_Literal 0x2
01bf 0099 | | Action Reference_Dynamic
01c0 4803 |H | Short_Literal 0x3
01c1 4802 |H | Short_Literal 0x2
01c2 0099 | | Action Reference_Dynamic
01c3 e013 | | Load 0x0,0x13
01c4 e014 | | Load 0x0,0x14
01c5 4816 |H | Short_Literal 0x16
01c6 0007 | | Action Break_Optional
01c7 BODY_0188:
01c7 e5fa | | Load 0x2,-0x6
01c8 4822 |H" | Short_Literal 0x22
01c9 0092 0c89 | | Action Push_String_Extended,0xc89 ; "New_Hostname => \x22"
01cb e5ff | | Load 0x2,-0x1
01cc 01cc | | Execute Vector,Catenate
01cd 0092 0c86 | | Action Push_String_Extended,0xc86 ; "\x22, For_Session => \x22"
01cf 01cc | | Execute Vector,Catenate
01d0 e5fb | | Load 0x2,-0x5
01d1 01cc | | Execute Vector,Catenate
01d2 0092 0c87 | | Action Push_String_Extended,0xc87 ; "\x22, Response => \x22"
01d4 01cc | | Execute Vector,Catenate
01d5 e5fa | | Load 0x2,-0x6
01d6 01cc | | Execute Vector,Catenate
01d7 01cb | | Execute Vector,Append
01d8 e410 | | Load 0x2,0x10
01d9 4811 |H | Short_Literal 0x11
01da 4802 |H | Short_Literal 0x2
01db 0099 | | Action Reference_Dynamic
01dc 4812 |H | Short_Literal 0x12
01dd 4802 |H | Short_Literal 0x2
01de 0099 | | Action Reference_Dynamic
01df 4813 |H | Short_Literal 0x13
01e0 4802 |H | Short_Literal 0x2
01e1 0099 | | Action Reference_Dynamic
01e2 4814 |H | Short_Literal 0x14
01e3 4802 |H | Short_Literal 0x2
01e4 0099 | | Action Reference_Dynamic
01e5 822c | , | Call 0x1,0x2c
01e6 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01e7 0000 | | .XXX[0x1]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 0229 | ) | .CONST 0x0229 ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0017 | | .CONST 0x0017 ; Number of locals
01eb INIT_01e8:
01eb 00e1 | | Load_Encached Boolean_Cache
01ec 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ed 00e1 | | Load_Encached Boolean_Cache
01ee 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ef 03e9 | | Declare_Variable Discrete,Duplicate
01f0 e5ff | | Load 0x2,-0x1
01f1 e008 | | Load 0x0,0x8
01f2 180d | | Execute Package,Field_Execute,Field_Number 0xd
01f3 e015 | | Load 0x0,0x15
01f4 e016 | | Load 0x0,0x16
01f5 e22a | * | Load 0x1,0x2a
01f6 e22b | + | Load 0x1,0x2b
01f7 480a |H | Short_Literal 0xa
01f8 e006 | | Load 0x0,0x6
01f9 0387 | | Declare_Variable Package
01fa 00d8 | | Load_Top At_Offset_0
01fb 020f | | Execute Module,Activate
01fc 00d8 | | Load_Top At_Offset_0
01fd 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01fe 00d8 | | Load_Top At_Offset_0
01ff e007 | | Load 0x0,0x7
0200 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0201 e001 | | Load 0x0,0x1
0202 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0203 029f 0973 | s| Declare_Subprogram INIT_0970,For_Call
0205 4803 |H | Short_Literal 0x3
0206 032d | - | Declare_Type Record,Defined
0207 029f 0993 | | Declare_Subprogram INIT_0990,For_Call
0209 029f 09ab | | Declare_Subprogram INIT_09a8,For_Call
020b e008 | | Load 0x0,0x8
020c 190e | | Execute Package,Field_Reference,Field_Number 0xe
020d 00c6 | | Action Check_Subprogram_Elaborated
020e 00da | | Load_Top At_Offset_2
020f 480a |H | Short_Literal 0xa
0210 4802 |H | Short_Literal 0x2
0211 0099 | | Action Reference_Dynamic
0212 e017 | | Load 0x0,0x17
0213 e018 | | Load 0x0,0x18
0214 480f |H | Short_Literal 0xf
0215 0007 | | Action Break_Optional
0216 029f 09f3 | | Declare_Subprogram INIT_09f0,For_Call
0218 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0219 00c6 | | Action Check_Subprogram_Elaborated
021a 0092 0c8a | | Action Push_String_Extended,0xc8a ; "Change"
021c 4810 |H | Short_Literal 0x10
021d 4802 |H | Short_Literal 0x2
021e 0099 | | Action Reference_Dynamic
021f 4803 |H | Short_Literal 0x3
0220 4802 |H | Short_Literal 0x2
0221 0099 | | Action Reference_Dynamic
0222 4804 |H | Short_Literal 0x4
0223 4802 |H | Short_Literal 0x2
0224 0099 | | Action Reference_Dynamic
0225 e019 | | Load 0x0,0x19
0226 e01a | | Load 0x0,0x1a
0227 4817 |H | Short_Literal 0x17
0228 0007 | | Action Break_Optional
0229 BODY_01e8:
0229 e5fa | | Load 0x2,-0x6
022a 4822 |H" | Short_Literal 0x22
022b 0092 0c8b | | Action Push_String_Extended,0xc8b ; "Existing_Hostname => \x22"
022d e5ff | | Load 0x2,-0x1
022e 01cc | | Execute Vector,Catenate
022f 0092 0c86 | | Action Push_String_Extended,0xc86 ; "\x22, For_Session => \x22"
0231 01cc | | Execute Vector,Catenate
0232 e5fb | | Load 0x2,-0x5
0233 01cc | | Execute Vector,Catenate
0234 0092 0c87 | | Action Push_String_Extended,0xc87 ; "\x22, Response => \x22"
0236 01cc | | Execute Vector,Catenate
0237 e5fa | | Load 0x2,-0x6
0238 01cc | | Execute Vector,Catenate
0239 01cb | | Execute Vector,Append
023a e411 | | Load 0x2,0x11
023b 4812 |H | Short_Literal 0x12
023c 4802 |H | Short_Literal 0x2
023d 0099 | | Action Reference_Dynamic
023e 4813 |H | Short_Literal 0x13
023f 4802 |H | Short_Literal 0x2
0240 0099 | | Action Reference_Dynamic
0241 4814 |H | Short_Literal 0x14
0242 4802 |H | Short_Literal 0x2
0243 0099 | | Action Reference_Dynamic
0244 4815 |H | Short_Literal 0x15
0245 4802 |H | Short_Literal 0x2
0246 0099 | | Action Reference_Dynamic
0247 822c | , | Call 0x1,0x2c
0248 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0249 0000 0000 | | .BLANK 0000[0x7]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0291 | | .CONST 0x0291 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0017 | | .CONST 0x0017 ; Number of locals
0253 INIT_0250:
0253 00e1 | | Load_Encached Boolean_Cache
0254 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0255 00e1 | | Load_Encached Boolean_Cache
0256 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0257 03e9 | | Declare_Variable Discrete,Duplicate
0258 e5ff | | Load 0x2,-0x1
0259 e008 | | Load 0x0,0x8
025a 180d | | Execute Package,Field_Execute,Field_Number 0xd
025b e01b | | Load 0x0,0x1b
025c e01c | | Load 0x0,0x1c
025d e22a | * | Load 0x1,0x2a
025e e22b | + | Load 0x1,0x2b
025f 480a |H | Short_Literal 0xa
0260 e006 | | Load 0x0,0x6
0261 0387 | | Declare_Variable Package
0262 00d8 | | Load_Top At_Offset_0
0263 020f | | Execute Module,Activate
0264 00d8 | | Load_Top At_Offset_0
0265 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0266 00d8 | | Load_Top At_Offset_0
0267 e007 | | Load 0x0,0x7
0268 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0269 e001 | | Load 0x0,0x1
026a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
026b 029f 0a93 | | Declare_Subprogram INIT_0a90,For_Call
026d 4803 |H | Short_Literal 0x3
026e 032d | - | Declare_Type Record,Defined
026f 029f 0ab3 | | Declare_Subprogram INIT_0ab0,For_Call
0271 029f 0acb | | Declare_Subprogram INIT_0ac8,For_Call
0273 e008 | | Load 0x0,0x8
0274 190e | | Execute Package,Field_Reference,Field_Number 0xe
0275 00c6 | | Action Check_Subprogram_Elaborated
0276 00da | | Load_Top At_Offset_2
0277 480a |H | Short_Literal 0xa
0278 4802 |H | Short_Literal 0x2
0279 0099 | | Action Reference_Dynamic
027a e01d | | Load 0x0,0x1d
027b e01e | | Load 0x0,0x1e
027c 480f |H | Short_Literal 0xf
027d 0007 | | Action Break_Optional
027e 029f 0af3 | | Declare_Subprogram INIT_0af0,For_Call
0280 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0281 00c6 | | Action Check_Subprogram_Elaborated
0282 0092 0c8c | | Action Push_String_Extended,0xc8c ; "Delete"
0284 4810 |H | Short_Literal 0x10
0285 4802 |H | Short_Literal 0x2
0286 0099 | | Action Reference_Dynamic
0287 4803 |H | Short_Literal 0x3
0288 4802 |H | Short_Literal 0x2
0289 0099 | | Action Reference_Dynamic
028a 4804 |H | Short_Literal 0x4
028b 4802 |H | Short_Literal 0x2
028c 0099 | | Action Reference_Dynamic
028d e01f | | Load 0x0,0x1f
028e e020 | | Load 0x0,0x20
028f 4817 |H | Short_Literal 0x17
0290 0007 | | Action Break_Optional
0291 BODY_0250:
0291 e5fd | | Load 0x2,-0x3
0292 4822 |H" | Short_Literal 0x22
0293 0092 0c8b | | Action Push_String_Extended,0xc8b ; "Existing_Hostname => \x22"
0295 e5ff | | Load 0x2,-0x1
0296 01cc | | Execute Vector,Catenate
0297 0092 0c86 | | Action Push_String_Extended,0xc86 ; "\x22, For_Session => \x22"
0299 01cc | | Execute Vector,Catenate
029a e5fe | | Load 0x2,-0x2
029b 01cc | | Execute Vector,Catenate
029c 0092 0c87 | | Action Push_String_Extended,0xc87 ; "\x22, Response => \x22"
029e 01cc | | Execute Vector,Catenate
029f e5fd | | Load 0x2,-0x3
02a0 01cc | | Execute Vector,Catenate
02a1 01cb | | Execute Vector,Append
02a2 e411 | | Load 0x2,0x11
02a3 4812 |H | Short_Literal 0x12
02a4 4802 |H | Short_Literal 0x2
02a5 0099 | | Action Reference_Dynamic
02a6 4813 |H | Short_Literal 0x13
02a7 4802 |H | Short_Literal 0x2
02a8 0099 | | Action Reference_Dynamic
02a9 4814 |H | Short_Literal 0x14
02aa 4802 |H | Short_Literal 0x2
02ab 0099 | | Action Reference_Dynamic
02ac 4815 |H | Short_Literal 0x15
02ad 4802 |H | Short_Literal 0x2
02ae 0099 | | Action Reference_Dynamic
02af 822c | , | Call 0x1,0x2c
02b0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02b1 0000 0000 | | .BLANK 0000[0x7]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00db | | Load_Top At_Offset_3
02bc 0092 0c8d | | Action Push_String_Extended,0xc8d ; "password"
02be e5ff | | Load 0x2,-0x1
02bf e003 | | Load 0x0,0x3
02c0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02c1 8232 | 2 | Call 0x1,0x32
02c2 e007 | | Load 0x0,0x7
02c3 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
02c4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02c5 0000 0000 | | .XXX[0x3]
02c7 0000 | |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 0309 | | .CONST 0x0309 ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0016 | | .CONST 0x0016 ; Number of locals
02cb INIT_02c8:
02cb 00e1 | | Load_Encached Boolean_Cache
02cc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02cd 03e9 | | Declare_Variable Discrete,Duplicate
02ce 0092 0c8e | | Action Push_String_Extended,0xc8e ; "old password"
02d0 e5ff | | Load 0x2,-0x1
02d1 e003 | | Load 0x0,0x3
02d2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02d3 e021 | ! | Load 0x0,0x21
02d4 e022 | " | Load 0x0,0x22
02d5 e22a | * | Load 0x1,0x2a
02d6 e22b | + | Load 0x1,0x2b
02d7 480a |H | Short_Literal 0xa
02d8 e006 | | Load 0x0,0x6
02d9 0387 | | Declare_Variable Package
02da 00d8 | | Load_Top At_Offset_0
02db 020f | | Execute Module,Activate
02dc 00d8 | | Load_Top At_Offset_0
02dd 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02de 00d8 | | Load_Top At_Offset_0
02df e007 | | Load 0x0,0x7
02e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e1 e001 | | Load 0x0,0x1
02e2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e3 029f 0b73 | s| Declare_Subprogram INIT_0b70,For_Call
02e5 4803 |H | Short_Literal 0x3
02e6 032d | - | Declare_Type Record,Defined
02e7 029f 0b93 | | Declare_Subprogram INIT_0b90,For_Call
02e9 029f 0bab | | Declare_Subprogram INIT_0ba8,For_Call
02eb e008 | | Load 0x0,0x8
02ec 190e | | Execute Package,Field_Reference,Field_Number 0xe
02ed 00c6 | | Action Check_Subprogram_Elaborated
02ee 00da | | Load_Top At_Offset_2
02ef 4809 |H | Short_Literal 0x9
02f0 4802 |H | Short_Literal 0x2
02f1 0099 | | Action Reference_Dynamic
02f2 e023 | # | Load 0x0,0x23
02f3 e024 | $ | Load 0x0,0x24
02f4 480e |H | Short_Literal 0xe
02f5 0007 | | Action Break_Optional
02f6 029f 0beb | | Declare_Subprogram INIT_0be8,For_Call
02f8 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
02f9 00c6 | | Action Check_Subprogram_Elaborated
02fa 0092 0c8f | | Action Push_String_Extended,0xc8f ; "Update"
02fc 480f |H | Short_Literal 0xf
02fd 4802 |H | Short_Literal 0x2
02fe 0099 | | Action Reference_Dynamic
02ff 4802 |H | Short_Literal 0x2
0300 4802 |H | Short_Literal 0x2
0301 0099 | | Action Reference_Dynamic
0302 4803 |H | Short_Literal 0x3
0303 4802 |H | Short_Literal 0x2
0304 0099 | | Action Reference_Dynamic
0305 e025 | % | Load 0x0,0x25
0306 e026 | & | Load 0x0,0x26
0307 4816 |H | Short_Literal 0x16
0308 0007 | | Action Break_Optional
0309 BODY_02c8:
0309 e5fd | | Load 0x2,-0x3
030a 4822 |H" | Short_Literal 0x22
030b 0092 0c90 | | Action Push_String_Extended,0xc90 ; "For_Session => \x22"
030d e5fe | | Load 0x2,-0x2
030e 01cc | | Execute Vector,Catenate
030f 0092 0c87 | | Action Push_String_Extended,0xc87 ; "\x22, Response => \x22"
0311 01cc | | Execute Vector,Catenate
0312 e5fd | | Load 0x2,-0x3
0313 01cc | | Execute Vector,Catenate
0314 01cb | | Execute Vector,Append
0315 e410 | | Load 0x2,0x10
0316 4811 |H | Short_Literal 0x11
0317 4802 |H | Short_Literal 0x2
0318 0099 | | Action Reference_Dynamic
0319 4812 |H | Short_Literal 0x12
031a 4802 |H | Short_Literal 0x2
031b 0099 | | Action Reference_Dynamic
031c 4813 |H | Short_Literal 0x13
031d 4802 |H | Short_Literal 0x2
031e 0099 | | Action Reference_Dynamic
031f 4814 |H | Short_Literal 0x14
0320 4802 |H | Short_Literal 0x2
0321 0099 | | Action Reference_Dynamic
0322 822c | , | Call 0x1,0x2c
0323 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0324 0000 0000 | | .BLANK 0000[0x4]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0347 | G | .CONST 0x0347 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 000c | | .CONST 0x000c ; Number of locals
032b INIT_0328:
032b 00e1 | | Load_Encached Boolean_Cache
032c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
032d 03e9 | | Declare_Variable Discrete,Duplicate
032e e027 | ' | Load 0x0,0x27
032f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0330 02c7 | | Declare_Variable Any
0331 e027 | ' | Load 0x0,0x27
0332 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0333 a404 | | Store_Unchecked 0x2,0x4
0334 029f 0c53 | S| Declare_Subprogram INIT_0c50,For_Call
0336 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0337 00c6 | | Action Check_Subprogram_Elaborated
0338 0092 0c91 | | Action Push_String_Extended,0xc91 ; "Get_Default"
033a 4805 |H | Short_Literal 0x5
033b 4802 |H | Short_Literal 0x2
033c 0099 | | Action Reference_Dynamic
033d 4802 |H | Short_Literal 0x2
033e 4802 |H | Short_Literal 0x2
033f 0099 | | Action Reference_Dynamic
0340 4803 |H | Short_Literal 0x3
0341 4802 |H | Short_Literal 0x2
0342 0099 | | Action Reference_Dynamic
0343 e028 | ( | Load 0x0,0x28
0344 e029 | ) | Load 0x0,0x29
0345 480c |H | Short_Literal 0xc
0346 0007 | | Action Break_Optional
0347 BODY_0328:
0347 e5fe | | Load 0x2,-0x2
0348 4822 |H" | Short_Literal 0x22
0349 0092 0c90 | | Action Push_String_Extended,0xc90 ; "For_Session => \x22"
034b e5ff | | Load 0x2,-0x1
034c 01cc | | Execute Vector,Catenate
034d 0092 0c87 | | Action Push_String_Extended,0xc87 ; "\x22, Response => \x22"
034f 01cc | | Execute Vector,Catenate
0350 e5fe | | Load 0x2,-0x2
0351 01cc | | Execute Vector,Catenate
0352 01cb | | Execute Vector,Append
0353 e406 | | Load 0x2,0x6
0354 4807 |H | Short_Literal 0x7
0355 4802 |H | Short_Literal 0x2
0356 0099 | | Action Reference_Dynamic
0357 4808 |H | Short_Literal 0x8
0358 4802 |H | Short_Literal 0x2
0359 0099 | | Action Reference_Dynamic
035a 4809 |H | Short_Literal 0x9
035b 4802 |H | Short_Literal 0x2
035c 0099 | | Action Reference_Dynamic
035d 480a |H | Short_Literal 0xa
035e 4802 |H | Short_Literal 0x2
035f 0099 | | Action Reference_Dynamic
0360 822c | , | Call 0x1,0x2c
0361 e404 | | Load 0x2,0x4
0362 e027 | ' | Load 0x0,0x27
0363 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0364 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0365 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0366 0000 0000 | | .XXX[0x2]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 037c | | | .CONST 0x037c ; Address of begin
0369 03a8 | | .CONST 0x03a8 ; Address of exception handler
036a 0005 | | .CONST 0x0005 ; Number of locals
036b INIT_0368:
036b 0092 0c92 | | Action Push_String_Extended,0xc92 ; "Remote_Passwords."
036d e5fb | | Load 0x2,-0x5
036e 01cc | | Execute Vector,Catenate
036f 0007 | | Action Break_Optional
0370 e02a | * | Load 0x0,0x2a
0371 180e | | Execute Package,Field_Execute,Field_Number 0xe
0372 e02a | * | Load 0x0,0x2a
0373 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0374 011e | | Execute Any,Convert
0375 e02b | + | Load 0x0,0x2b
0376 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0377 02c7 | | Declare_Variable Any
0378 00d8 | | Load_Top At_Offset_0
0379 1c00 | | Execute_Immediate Run_Utility,0x0
037a 029f 0c63 | c| Declare_Subprogram INIT_0c60,For_Call
037c BODY_0368:
037c 00d9 | | Load_Top At_Offset_1
037d e5f9 | | Load 0x2,-0x7
037e e02a | * | Load 0x0,0x2a
037f 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0380 c404 | | Store 0x2,0x4
0381 e02a | * | Load 0x0,0x2a
0382 180e | | Execute Package,Field_Execute,Field_Number 0xe
0383 00da | | Load_Top At_Offset_2
0384 e02c | , | Load 0x0,0x2c
0385 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0386 e02a | * | Load 0x0,0x2a
0387 180e | | Execute Package,Field_Execute,Field_Number 0xe
0388 4800 |H | Short_Literal 0x0
0389 485b |H[ | Short_Literal 0x5b
038a e402 | | Load 0x2,0x2
038b 01ca | | Execute Vector,Prepend
038c 0092 0c93 | | Action Push_String_Extended,0xc93 ; " ("
038e 01cc | | Execute Vector,Catenate
038f e5fa | | Load 0x2,-0x6
0390 01cc | | Execute Vector,Catenate
0391 0092 0c94 | | Action Push_String_Extended,0xc94 ; ");]"
0393 01cc | | Execute Vector,Catenate
0394 e02c | , | Load 0x0,0x2c
0395 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0396 85fc | | Call 0x2,-0x4
0397 e5fd | | Load 0x2,-0x3
0398 6803 |h | Jump_Zero 0x39c
0399 e02a | * | Load 0x0,0x2a
039a 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
039b 0257 | W | Execute Discrete,Raise
039c e5fe | | Load 0x2,-0x2
039d 6805 |h | Jump_Zero 0x3a3
039e 4800 |H | Short_Literal 0x0
039f 0092 0c95 | | Action Push_String_Extended,0xc95 ; " has completed with warnings"
03a1 8405 | | Call 0x2,0x5
03a2 4508 |E | Exit_Suprogram New_Top_Offset 0x8
03a3 4800 |H | Short_Literal 0x0
03a4 0092 0c96 | | Action Push_String_Extended,0xc96 ; " has completed"
03a6 8405 | | Call 0x2,0x5
03a7 4508 |E | Exit_Suprogram New_Top_Offset 0x8
03a8 TRAP_0368:
03a8 e02a | * | Load 0x0,0x2a
03a9 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
03aa 010f | | Execute Exception,Equal
03ab 6808 |h | Jump_Zero 0x3b4
03ac e02a | * | Load 0x0,0x2a
03ad 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ae e02a | * | Load 0x0,0x2a
03af 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03b0 0092 0c97 | | Action Push_String_Extended,0xc97 ; " has terminated with errors"
03b2 8405 | | Call 0x2,0x5
03b3 4508 |E | Exit_Suprogram New_Top_Offset 0x8
03b4 e02a | * | Load 0x0,0x2a
03b5 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b6 4808 |H | Short_Literal 0x8
03b7 0092 0c98 | | Action Push_String_Extended,0xc98 ; "Unexpected "
03b9 e02d | - | Load 0x0,0x2d
03ba 180d | | Execute Package,Field_Execute,Field_Number 0xd
03bb 01cc | | Execute Vector,Catenate
03bc e02c | , | Load 0x0,0x2c
03bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03be e02a | * | Load 0x0,0x2a
03bf 180e | | Execute Package,Field_Execute,Field_Number 0xe
03c0 e02a | * | Load 0x0,0x2a
03c1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03c2 0092 0c99 | | Action Push_String_Extended,0xc99 ; " has terminated with an internal error"
03c4 8405 | | Call 0x2,0x5
03c5 4508 |E | Exit_Suprogram New_Top_Offset 0x8
03c6 0000 0000 | | .XXX[0x2]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 4801 |H | Short_Literal 0x1
03cc 00db | | Load_Top At_Offset_3
03cd e02b | + | Load 0x0,0x2b
03ce 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03cf 6807 |h | Jump_Zero 0x3d7
03d0 e02a | * | Load 0x0,0x2a
03d1 180e | | Execute Package,Field_Execute,Field_Number 0xe
03d2 00db | | Load_Top At_Offset_3
03d3 e02c | , | Load 0x0,0x2c
03d4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03d5 e02e | . | Load 0x0,0x2e
03d6 0257 | W | Execute Discrete,Raise
03d7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03e1 | | .CONST 0x03e1 ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0002 | | .CONST 0x0002 ; Number of locals
03db INIT_03d8:
03db 00da | | Load_Top At_Offset_2
03dc 01da | | Execute Vector,Bounds
03dd e002 | | Load 0x0,0x2
03de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03df 035b | [ | Declare_Type Array,Constrained
03e0 0337 | 7 | Declare_Variable Array
03e1 BODY_03d8:
03e1 00cf | | Action Mark_Auxiliary
03e2 e5ff | | Load 0x2,-0x1
03e3 01d9 | | Execute Vector,Reverse_Bounds
03e4 0263 | c | Execute Discrete,Above_Bound
03e5 7008 |p | Jump_Nonzero 0x3ee
03e6 00d8 | | Load_Top At_Offset_0
03e7 e5ff | | Load 0x2,-0x1
03e8 01d7 | | Execute Vector,Field_Read
03e9 00d9 | | Load_Top At_Offset_1
03ea e402 | | Load 0x2,0x2
03eb 01d6 | | Execute Vector,Field_Write
03ec 00c8 | | Action Pop_Auxiliary_Range
03ed 3ff8 |? | Loop_Increasing 0x3e6
03ee 00ce | | Action Pop_Auxiliary
03ef 00d8 | | Load_Top At_Offset_0
03f0 e02f | / | Load 0x0,0x2f
03f1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03f2 01c6 | | Execute Vector,Convert_To_Formal
03f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f4 0000 0000 | | .BLANK 0000[0x4]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0400 | | .CONST 0x0400 ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb 00da | | Load_Top At_Offset_2
03fc 01da | | Execute Vector,Bounds
03fd 00e9 | | Load_Encached String_Cache
03fe 035b | [ | Declare_Type Array,Constrained
03ff 0337 | 7 | Declare_Variable Array
0400 BODY_03f8:
0400 00cf | | Action Mark_Auxiliary
0401 e5ff | | Load 0x2,-0x1
0402 01d9 | | Execute Vector,Reverse_Bounds
0403 0263 | c | Execute Discrete,Above_Bound
0404 7016 |p | Jump_Nonzero 0x41b
0405 00d8 | | Load_Top At_Offset_0
0406 e5ff | | Load 0x2,-0x1
0407 01d7 | | Execute Vector,Field_Read
0408 e227 | ' | Load 0x1,0x27
0409 0260 | ` | Execute Discrete,In_Type
040a 680c |h | Jump_Zero 0x417
040b 00d8 | | Load_Top At_Offset_0
040c e5ff | | Load 0x2,-0x1
040d 01d7 | | Execute Vector,Field_Read
040e 00d8 | | Load_Top At_Offset_0
040f 00e8 | | Load_Encached Character_Cache
0410 0260 | ` | Execute Discrete,In_Type
0411 7001 |p | Jump_Nonzero 0x413
0412 0801 | | Execute_Immediate Raise,0x1
0413 00d9 | | Load_Top At_Offset_1
0414 e402 | | Load 0x2,0x2
0415 01d6 | | Execute Vector,Field_Write
0416 7802 |x | Jump 0x419
0417 e030 | 0 | Load 0x0,0x30
0418 0257 | W | Execute Discrete,Raise
0419 00c8 | | Action Pop_Auxiliary_Range
041a 3fea |? | Loop_Increasing 0x405
041b 00ce | | Action Pop_Auxiliary
041c 00d8 | | Load_Top At_Offset_0
041d 00e9 | | Load_Encached String_Cache
041e 01c6 | | Execute Vector,Convert_To_Formal
041f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423 | # | .CONST 0x0423 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0001 | | .CONST 0x0001 ; Number of locals
0423 BODY_0420:
0423 INIT_0420:
0423 00db | | Load_Top At_Offset_3
0424 00db | | Load_Top At_Offset_3
0425 e003 | | Load 0x0,0x3
0426 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0427 822f | / | Call 0x1,0x2f
0428 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0429 0000 0000 | | .BLANK 0000[0x7]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433 | 3 | .CONST 0x0433 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0001 | | .CONST 0x0001 ; Number of locals
0433 BODY_0430:
0433 INIT_0430:
0433 00db | | Load_Top At_Offset_3
0434 00db | | Load_Top At_Offset_3
0435 822e | . | Call 0x1,0x2e
0436 e003 | | Load 0x0,0x3
0437 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0438 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0439 0000 0000 | | .BLANK 0000[0x7]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443 | C | .CONST 0x0443 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0001 | | .CONST 0x0001 ; Number of locals
0443 BODY_0440:
0443 INIT_0440:
0443 00db | | Load_Top At_Offset_3
0444 e229 | ) | Load 0x1,0x29
0445 01d7 | | Execute Vector,Field_Read
0446 00db | | Load_Top At_Offset_3
0447 822e | . | Call 0x1,0x2e
0448 e003 | | Load 0x0,0x3
0449 181a | | Execute Package,Field_Execute,Field_Number 0x1a
044a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
044b 0000 0000 | | .BLANK 0000[0x5]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453 | S | .CONST 0x0453 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0001 | | .CONST 0x0001 ; Number of locals
0453 BODY_0450:
0453 INIT_0450:
0453 00db | | Load_Top At_Offset_3
0454 01db | | Execute Vector,Length
0455 6803 |h | Jump_Zero 0x459
0456 00da | | Load_Top At_Offset_2
0457 01db | | Execute Vector,Length
0458 7004 |p | Jump_Nonzero 0x45d
0459 00da | | Load_Top At_Offset_2
045a e5fe | | Load 0x2,-0x2
045b 01cc | | Execute Vector,Catenate
045c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
045d e5fd | | Load 0x2,-0x3
045e 00db | | Load_Top At_Offset_3
045f 01cb | | Execute Vector,Append
0460 e5fe | | Load 0x2,-0x2
0461 01cc | | Execute Vector,Catenate
0462 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0463 0000 0000 | | .BLANK 0000[0x5]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046b | k | .CONST 0x046b ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0001 | | .CONST 0x0001 ; Number of locals
046b BODY_0468:
046b INIT_0468:
046b 00da | | Load_Top At_Offset_2
046c 6805 |h | Jump_Zero 0x472
046d e5fd | | Load 0x2,-0x3
046e e5fe | | Load 0x2,-0x2
046f e003 | | Load 0x0,0x3
0470 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0471 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0472 00ea | | Load_Encached Null_String_Cache
0473 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0474 0000 0000 | | .BLANK 0000[0x4]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 0481 | | .CONST 0x0481 ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0002 | | .CONST 0x0002 ; Number of locals
047b INIT_0478:
047b 4820 |H | Short_Literal 0x20
047c 00db | | Load_Top At_Offset_3
047d e031 | 1 | Load 0x0,0x31
047e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
047f e031 | 1 | Load 0x0,0x31
0480 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0481 BODY_0478:
0481 00d8 | | Load_Top At_Offset_0
0482 0092 0c9a | | Action Push_String_Extended,0xc9a ; "<NIL>"
0484 01df | | Execute Vector,Equal
0485 7005 |p | Jump_Nonzero 0x48b
0486 00d8 | | Load_Top At_Offset_0
0487 0092 0c9b | | Action Push_String_Extended,0xc9b ; "<>"
0489 01df | | Execute Vector,Equal
048a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
048b 4801 |H | Short_Literal 0x1
048c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
048d 0000 0000 | | .XXX[0x3]
048f 0000 | |
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 049c | | .CONST 0x049c ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0003 | | .CONST 0x0003 ; Number of locals
0493 INIT_0490:
0493 e027 | ' | Load 0x0,0x27
0494 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0495 02c7 | | Declare_Variable Any
0496 e027 | ' | Load 0x0,0x27
0497 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0498 a402 | | Store_Unchecked 0x2,0x2
0499 e027 | ' | Load 0x0,0x27
049a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
049b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
049c BODY_0490:
049c e5ff | | Load 0x2,-0x1
049d 8235 | 5 | Call 0x1,0x35
049e 703a |p: | Jump_Nonzero 0x4d9
049f e027 | ' | Load 0x0,0x27
04a0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a2 00da | | Load_Top At_Offset_2
04a3 0120 | | Execute Any,Is_Value
04a4 6803 |h | Jump_Zero 0x4a8
04a5 e027 | ' | Load 0x0,0x27
04a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a7 7801 |x | Jump 0x4a9
04a8 00da | | Load_Top At_Offset_2
04a9 6032 |`2 | Indirect_Literal Discrete,0x4dc,{0x00000000, 0x00004000}
04aa e032 | 2 | Load 0x0,0x32
04ab 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04ac e033 | 3 | Load 0x0,0x33
04ad 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ae e027 | ' | Load 0x0,0x27
04af 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04b1 e5ff | | Load 0x2,-0x1
04b2 e027 | ' | Load 0x0,0x27
04b3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04b4 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04b5 c402 | | Store 0x2,0x2
04b6 0059 | Y | Store_Top Discrete,At_Offset_1
04b7 00d8 | | Load_Top At_Offset_0
04b8 6820 |h | Jump_Zero 0x4d9
04b9 e02a | * | Load 0x0,0x2a
04ba 180e | | Execute Package,Field_Execute,Field_Number 0xe
04bb 4807 |H | Short_Literal 0x7
04bc 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Unable to resolve remote passwords object \x22"
04be e5ff | | Load 0x2,-0x1
04bf 01cc | | Execute Vector,Catenate
04c0 0092 0c9d | | Action Push_String_Extended,0xc9d ; "\x22 because "
04c2 01cc | | Execute Vector,Catenate
04c3 6018 |` | Indirect_Literal Discrete,0x4dc,{0x00000000, 0x00004000}
04c4 e032 | 2 | Load 0x0,0x32
04c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04c6 e033 | 3 | Load 0x0,0x33
04c7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c8 e034 | 4 | Load 0x0,0x34
04c9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ca 4801 |H | Short_Literal 0x1
04cb 4800 |H | Short_Literal 0x0
04cc e033 | 3 | Load 0x0,0x33
04cd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ce e027 | ' | Load 0x0,0x27
04cf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04d0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04d1 e5ff | | Load 0x2,-0x1
04d2 e403 | | Load 0x2,0x3
04d3 e027 | ' | Load 0x0,0x27
04d4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04d5 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
04d6 01cc | | Execute Vector,Catenate
04d7 e02c | , | Load 0x0,0x2c
04d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04d9 00d9 | | Load_Top At_Offset_1
04da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04db 0000 | | .XXX[0x1]
04dc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04eb | | .CONST 0x04eb ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0003 | | .CONST 0x0003 ; Number of locals
04e3 INIT_04e0:
04e3 e027 | ' | Load 0x0,0x27
04e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04e5 02c7 | | Declare_Variable Any
04e6 00d8 | | Load_Top At_Offset_0
04e7 1c00 | | Execute_Immediate Run_Utility,0x0
04e8 e027 | ' | Load 0x0,0x27
04e9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ea 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04eb BODY_04e0:
04eb e027 | ' | Load 0x0,0x27
04ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04ee 00da | | Load_Top At_Offset_2
04ef 0120 | | Execute Any,Is_Value
04f0 6803 |h | Jump_Zero 0x4f4
04f1 e027 | ' | Load 0x0,0x27
04f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04f3 7801 |x | Jump 0x4f5
04f4 00da | | Load_Top At_Offset_2
04f5 67e6 |g | Indirect_Literal Discrete,0x4dc,{0x00000000, 0x00004000}
04f6 e032 | 2 | Load 0x0,0x32
04f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04f8 e033 | 3 | Load 0x0,0x33
04f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04fa e027 | ' | Load 0x0,0x27
04fb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04fc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04fd e5ff | | Load 0x2,-0x1
04fe e027 | ' | Load 0x0,0x27
04ff 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0500 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0501 c402 | | Store 0x2,0x2
0502 0059 | Y | Store_Top Discrete,At_Offset_1
0503 00d8 | | Load_Top At_Offset_0
0504 682b |h+ | Jump_Zero 0x530
0505 e02a | * | Load 0x0,0x2a
0506 180e | | Execute Package,Field_Execute,Field_Number 0xe
0507 4807 |H | Short_Literal 0x7
0508 0092 0c9e | | Action Push_String_Extended,0xc9e ; "Unable to resolve "
050a 4820 |H | Short_Literal 0x20
050b 0092 0c9f | | Action Push_String_Extended,0xc9f ; "object"
050d e5fe | | Load 0x2,-0x2
050e 8233 | 3 | Call 0x1,0x33
050f 01cc | | Execute Vector,Catenate
0510 0092 0ca0 | | Action Push_String_Extended,0xca0 ; " \x22"
0512 01cc | | Execute Vector,Catenate
0513 e5ff | | Load 0x2,-0x1
0514 01cc | | Execute Vector,Catenate
0515 0092 0c9d | | Action Push_String_Extended,0xc9d ; "\x22 because "
0517 01cc | | Execute Vector,Catenate
0518 67c3 |g | Indirect_Literal Discrete,0x4dc,{0x00000000, 0x00004000}
0519 e032 | 2 | Load 0x0,0x32
051a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051b e033 | 3 | Load 0x0,0x33
051c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
051d e034 | 4 | Load 0x0,0x34
051e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
051f 4801 |H | Short_Literal 0x1
0520 4800 |H | Short_Literal 0x0
0521 e033 | 3 | Load 0x0,0x33
0522 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0523 e027 | ' | Load 0x0,0x27
0524 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0525 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0526 e5ff | | Load 0x2,-0x1
0527 e403 | | Load 0x2,0x3
0528 e027 | ' | Load 0x0,0x27
0529 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
052a 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
052b 01cc | | Execute Vector,Catenate
052c e02c | , | Load 0x0,0x2c
052d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
052e e02e | . | Load 0x0,0x2e
052f 0257 | W | Execute Discrete,Raise
0530 00d9 | | Load_Top At_Offset_1
0531 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0532 0000 0000 | | .BLANK 0000[0x6]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 054d | M | .CONST 0x054d ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0005 | | .CONST 0x0005 ; Number of locals
053b INIT_0538:
053b e027 | ' | Load 0x0,0x27
053c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
053d e027 | ' | Load 0x0,0x27
053e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
053f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0540 e5ff | | Load 0x2,-0x1
0541 e027 | ' | Load 0x0,0x27
0542 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0543 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0544 0092 0ca1 | | Action Push_String_Extended,0xca1 ; "_SWITCHES"
0546 01cc | | Execute Vector,Catenate
0547 0007 | | Action Break_Optional
0548 e027 | ' | Load 0x0,0x27
0549 1b14 | | Execute Package,Field_Read,Field_Number 0x14
054a 02ff | | Declare_Variable Variant_Record
054b 00d8 | | Load_Top At_Offset_0
054c 1c00 | | Execute_Immediate Run_Utility,0x0
054d BODY_0538:
054d e027 | ' | Load 0x0,0x27
054e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
054f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0550 00d9 | | Load_Top At_Offset_1
0551 6086 |` | Indirect_Literal Discrete,0x5d8,{0x00000000, 0x00004000}
0552 e032 | 2 | Load 0x0,0x32
0553 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0554 4800 |H | Short_Literal 0x0
0555 e033 | 3 | Load 0x0,0x33
0556 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0557 e027 | ' | Load 0x0,0x27
0558 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0559 1816 | | Execute Package,Field_Execute,Field_Number 0x16
055a e404 | | Load 0x2,0x4
055b e027 | ' | Load 0x0,0x27
055c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
055d 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
055e 00d1 | | Pop_Control Pop_Count_1
055f 005b | [ | Store_Top Discrete,At_Offset_3
0560 00da | | Load_Top At_Offset_2
0561 6851 |hQ | Jump_Zero 0x5b3
0562 e5fd | | Load 0x2,-0x3
0563 682f |h/ | Jump_Zero 0x593
0564 e027 | ' | Load 0x0,0x27
0565 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0566 e5fc | | Load 0x2,-0x4
0567 00da | | Load_Top At_Offset_2
0568 4853 |HS | Short_Literal 0x53
0569 606e |`n | Indirect_Literal Discrete,0x5d8,{0x00000000, 0x00004000}
056a e032 | 2 | Load 0x0,0x32
056b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
056c e404 | | Load 0x2,0x4
056d e035 | 5 | Load 0x0,0x35
056e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
056f 00d1 | | Pop_Control Pop_Count_1
0570 c5fc | | Store 0x2,-0x4
0571 c402 | | Store 0x2,0x2
0572 00db | | Load_Top At_Offset_3
0573 700b |p | Jump_Nonzero 0x57f
0574 e02a | * | Load 0x0,0x2a
0575 180e | | Execute Package,Field_Execute,Field_Number 0xe
0576 4802 |H | Short_Literal 0x2
0577 e027 | ' | Load 0x0,0x27
0578 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0579 0092 0ca2 | | Action Push_String_Extended,0xca2 ; "Created session switch file <1>"
057b e405 | | Load 0x2,0x5
057c e02c | , | Load 0x0,0x2c
057d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
057e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
057f e02a | * | Load 0x0,0x2a
0580 180e | | Execute Package,Field_Execute,Field_Number 0xe
0581 4807 |H | Short_Literal 0x7
0582 e027 | ' | Load 0x0,0x27
0583 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0584 4829 |H) | Short_Literal 0x29
0585 0092 0ca3 | | Action Push_String_Extended,0xca3 ; "Unable to open session switch file for <1> ("
0587 e402 | | Load 0x2,0x2
0588 e027 | ' | Load 0x0,0x27
0589 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058a 011c | | Execute Any,Convert_Unchecked
058b 1c01 | | Execute_Immediate Run_Utility,0x1
058c 01cc | | Execute Vector,Catenate
058d 01cb | | Execute Vector,Append
058e e5ff | | Load 0x2,-0x1
058f e02c | , | Load 0x0,0x2c
0590 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0591 e02e | . | Load 0x0,0x2e
0592 0257 | W | Execute Discrete,Raise
0593 e02a | * | Load 0x0,0x2a
0594 180e | | Execute Package,Field_Execute,Field_Number 0xe
0595 4807 |H | Short_Literal 0x7
0596 e027 | ' | Load 0x0,0x27
0597 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0598 0092 0ca4 | | Action Push_String_Extended,0xca4 ; "Session switch file for <1> does not exist because "
059a 603d |`= | Indirect_Literal Discrete,0x5d8,{0x00000000, 0x00004000}
059b e032 | 2 | Load 0x0,0x32
059c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
059d e033 | 3 | Load 0x0,0x33
059e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
059f e034 | 4 | Load 0x0,0x34
05a0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05a1 4801 |H | Short_Literal 0x1
05a2 4800 |H | Short_Literal 0x0
05a3 e033 | 3 | Load 0x0,0x33
05a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05a5 e027 | ' | Load 0x0,0x27
05a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05a7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05a8 e404 | | Load 0x2,0x4
05a9 e403 | | Load 0x2,0x3
05aa e027 | ' | Load 0x0,0x27
05ab 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ac 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
05ad 01cc | | Execute Vector,Catenate
05ae e5ff | | Load 0x2,-0x1
05af e02c | , | Load 0x0,0x2c
05b0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
05b1 e02e | . | Load 0x0,0x2e
05b2 0257 | W | Execute Discrete,Raise
05b3 e036 | 6 | Load 0x0,0x36
05b4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
05b5 00d9 | | Load_Top At_Offset_1
05b6 e5fc | | Load 0x2,-0x4
05b7 4800 |H | Short_Literal 0x0
05b8 601f |` | Indirect_Literal Discrete,0x5d8,{0x00000000, 0x00004000}
05b9 e032 | 2 | Load 0x0,0x32
05ba 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05bb e5fe | | Load 0x2,-0x2
05bc e036 | 6 | Load 0x0,0x36
05bd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
05be c5fc | | Store 0x2,-0x4
05bf 00d1 | | Pop_Control Pop_Count_1
05c0 c402 | | Store 0x2,0x2
05c1 00db | | Load_Top At_Offset_3
05c2 6814 |h | Jump_Zero 0x5d7
05c3 e02a | * | Load 0x0,0x2a
05c4 180e | | Execute Package,Field_Execute,Field_Number 0xe
05c5 4807 |H | Short_Literal 0x7
05c6 e027 | ' | Load 0x0,0x27
05c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05c8 4829 |H) | Short_Literal 0x29
05c9 0092 0ca3 | | Action Push_String_Extended,0xca3 ; "Unable to open session switch file for <1> ("
05cb e402 | | Load 0x2,0x2
05cc e027 | ' | Load 0x0,0x27
05cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ce 011c | | Execute Any,Convert_Unchecked
05cf 1c01 | | Execute_Immediate Run_Utility,0x1
05d0 01cc | | Execute Vector,Catenate
05d1 01cb | | Execute Vector,Append
05d2 e5ff | | Load 0x2,-0x1
05d3 e02c | , | Load 0x0,0x2c
05d4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
05d5 e02e | . | Load 0x0,0x2e
05d6 0257 | W | Execute Discrete,Raise
05d7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05d8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
05dc 0000 0000 | | .BLANK 0000[0x4]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e8 | | .CONST 0x05e8 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0002 | | .CONST 0x0002 ; Number of locals
05e3 INIT_05e0:
05e3 e027 | ' | Load 0x0,0x27
05e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05e5 02c7 | | Declare_Variable Any
05e6 00d8 | | Load_Top At_Offset_0
05e7 1c00 | | Execute_Immediate Run_Utility,0x0
05e8 BODY_05e0:
05e8 00db | | Load_Top At_Offset_3
05e9 01db | | Execute Vector,Length
05ea 7006 |p | Jump_Nonzero 0x5f1
05eb e037 | 7 | Load 0x0,0x37
05ec 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05ed e037 | 7 | Load 0x0,0x37
05ee 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05ef c402 | | Store 0x2,0x2
05f0 7822 |x" | Jump 0x613
05f1 0092 0ca5 | | Action Push_String_Extended,0xca5 ; "specified session"
05f3 e5ff | | Load 0x2,-0x1
05f4 8237 | 7 | Call 0x1,0x37
05f5 c402 | | Store 0x2,0x2
05f6 00d8 | | Load_Top At_Offset_0
05f7 e027 | ' | Load 0x0,0x27
05f8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05f9 e038 | 8 | Load 0x0,0x38
05fa 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05fb 012f | / | Execute Any,Equal
05fc 7016 |p | Jump_Nonzero 0x613
05fd e02a | * | Load 0x0,0x2a
05fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
05ff 4807 |H | Short_Literal 0x7
0600 e027 | ' | Load 0x0,0x27
0601 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0602 0092 0ca6 | | Action Push_String_Extended,0xca6 ; "<1> is not an object of class Session; you must specify a naming expression like "
0604 e037 | 7 | Load 0x0,0x37
0605 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0606 e037 | 7 | Load 0x0,0x37
0607 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0608 e037 | 7 | Load 0x0,0x37
0609 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
060a 01cc | | Execute Vector,Catenate
060b 0092 0ca7 | | Action Push_String_Extended,0xca7 ; ".S_1"
060d 01cc | | Execute Vector,Catenate
060e e402 | | Load 0x2,0x2
060f e02c | , | Load 0x0,0x2c
0610 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0611 e02e | . | Load 0x0,0x2e
0612 0257 | W | Execute Discrete,Raise
0613 00d8 | | Load_Top At_Offset_0
0614 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0615 0000 0000 | | .XXX[0x3]
0617 0000 | |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0625 | % | .CONST 0x0625 ; Address of begin
0619 063a | : | .CONST 0x063a ; Address of exception handler
061a 0003 | | .CONST 0x0003 ; Number of locals
061b INIT_0618:
061b e027 | ' | Load 0x0,0x27
061c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
061d 02c7 | | Declare_Variable Any
061e 00d8 | | Load_Top At_Offset_0
061f 1c00 | | Execute_Immediate Run_Utility,0x0
0620 e035 | 5 | Load 0x0,0x35
0621 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0622 02c7 | | Declare_Variable Any
0623 00d8 | | Load_Top At_Offset_0
0624 1c00 | | Execute_Immediate Run_Utility,0x0
0625 BODY_0618:
0625 00be | | Action Activate_Tasks
0626 00d8 | | Load_Top At_Offset_0
0627 4800 |H | Short_Literal 0x0
0628 4800 |H | Short_Literal 0x0
0629 e5ff | | Load 0x2,-0x1
062a 8239 | 9 | Call 0x1,0x39
062b 8238 | 8 | Call 0x1,0x38
062c c403 | | Store 0x2,0x3
062d e226 | & | Load 0x1,0x26
062e 00d9 | | Load_Top At_Offset_1
062f e035 | 5 | Load 0x0,0x35
0630 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
0631 8236 | 6 | Call 0x1,0x36
0632 c402 | | Store 0x2,0x2
0633 00d8 | | Load_Top At_Offset_0
0634 e035 | 5 | Load 0x0,0x35
0635 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
0636 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0637 c403 | | Store 0x2,0x3
0638 00d9 | | Load_Top At_Offset_1
0639 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
063a TRAP_0618:
063a 0007 | | Action Break_Optional
063b 00d9 | | Load_Top At_Offset_1
063c e036 | 6 | Load 0x0,0x36
063d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
063e 6805 |h | Jump_Zero 0x644
063f 00d9 | | Load_Top At_Offset_1
0640 e035 | 5 | Load 0x0,0x35
0641 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
0642 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0643 c403 | | Store 0x2,0x3
0644 00d8 | | Load_Top At_Offset_0
0645 0101 | | Execute Exception,Reraise
0646 0000 0000 | | .XXX[0x2]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b | K | .CONST 0x064b ; Address of begin
0649 0004 | | .CONST 0x0004 ; Address of exception handler
064a 0001 | | .CONST 0x0001 ; Number of locals
064b BODY_0648:
064b INIT_0648:
064b 00da | | Load_Top At_Offset_2
064c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
064d e001 | | Load 0x0,0x1
064e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
064f e008 | | Load 0x0,0x8
0650 180d | | Execute Package,Field_Execute,Field_Number 0xd
0651 e225 | % | Load 0x1,0x25
0652 01df | | Execute Vector,Equal
0653 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0654 0000 0000 | | .BLANK 0000[0x4]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b | [ | .CONST 0x065b ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0001 | | .CONST 0x0001 ; Number of locals
065b BODY_0658:
065b INIT_0658:
065b 4820 |H | Short_Literal 0x20
065c 4820 |H | Short_Literal 0x20
065d e5fe | | Load 0x2,-0x2
065e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
065f e001 | | Load 0x0,0x1
0660 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0661 e5fe | | Load 0x2,-0x2
0662 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0663 e001 | | Load 0x0,0x1
0664 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0665 8233 | 3 | Call 0x1,0x33
0666 e5fe | | Load 0x2,-0x2
0667 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0668 e001 | | Load 0x0,0x1
0669 181b | | Execute Package,Field_Execute,Field_Number 0x1b
066a 8233 | 3 | Call 0x1,0x33
066b 00db | | Load_Top At_Offset_3
066c e007 | | Load 0x0,0x7
066d 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
066e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
066f 0000 | | .XXX[0x1]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 067a | z | .CONST 0x067a ; Address of begin
0671 06b1 | | .CONST 0x06b1 ; Address of exception handler
0672 0003 | | .CONST 0x0003 ; Number of locals
0673 INIT_0670:
0673 e007 | | Load 0x0,0x7
0674 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0675 02c7 | | Declare_Variable Any
0676 00d8 | | Load_Top At_Offset_0
0677 1c00 | | Execute_Immediate Run_Utility,0x0
0678 00e3 | | Load_Encached Natural_Cache
0679 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
067a BODY_0670:
067a 00d9 | | Load_Top At_Offset_1
067b e5fd | | Load 0x2,-0x3
067c 0092 0ca8 | | Action Push_String_Extended,0xca8 ; "SYNCHRONIZED"
067e e5fe | | Load 0x2,-0x2
067f 4801 |H | Short_Literal 0x1
0680 e007 | | Load 0x0,0x7
0681 1882 | | Execute Package,Field_Execute,Field_Number 0x82
0682 c402 | | Store 0x2,0x2
0683 e02a | * | Load 0x0,0x2a
0684 180e | | Execute Package,Field_Execute,Field_Number 0xe
0685 4802 |H | Short_Literal 0x2
0686 0092 0ca9 | | Action Push_String_Extended,0xca9 ; "Writing remote passwords to "
0688 e402 | | Load 0x2,0x2
0689 e007 | | Load 0x0,0x7
068a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
068b 01cc | | Execute Vector,Catenate
068c e02c | , | Load 0x0,0x2c
068d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
068e 00cf | | Action Mark_Auxiliary
068f e5ff | | Load 0x2,-0x1
0690 01d9 | | Execute Vector,Reverse_Bounds
0691 0263 | c | Execute Discrete,Above_Bound
0692 7011 |p | Jump_Nonzero 0x6a4
0693 00db | | Load_Top At_Offset_3
0694 7008 |p | Jump_Nonzero 0x69d
0695 00d8 | | Load_Top At_Offset_0
0696 e5ff | | Load 0x2,-0x1
0697 01d5 | | Execute Vector,Field_Reference
0698 823b | ; | Call 0x1,0x3b
0699 6803 |h | Jump_Zero 0x69d
069a 00d8 | | Load_Top At_Offset_0
069b a403 | | Store_Unchecked 0x2,0x3
069c 7805 |x | Jump 0x6a2
069d 00d8 | | Load_Top At_Offset_0
069e e5ff | | Load 0x2,-0x1
069f 01d5 | | Execute Vector,Field_Reference
06a0 e402 | | Load 0x2,0x2
06a1 823c | < | Call 0x1,0x3c
06a2 00c8 | | Action Pop_Auxiliary_Range
06a3 3fef |? | Loop_Increasing 0x693
06a4 00ce | | Action Pop_Auxiliary
06a5 00d8 | | Load_Top At_Offset_0
06a6 6805 |h | Jump_Zero 0x6ac
06a7 00d8 | | Load_Top At_Offset_0
06a8 e5ff | | Load 0x2,-0x1
06a9 01d5 | | Execute Vector,Field_Reference
06aa 00da | | Load_Top At_Offset_2
06ab 823c | < | Call 0x1,0x3c
06ac 00d9 | | Load_Top At_Offset_1
06ad e007 | | Load 0x0,0x7
06ae 181b | | Execute Package,Field_Execute,Field_Number 0x1b
06af c402 | | Store 0x2,0x2
06b0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06b1 TRAP_0670:
06b1 4922 |I" | Short_Literal 0x122
06b2 010f | | Execute Exception,Equal
06b3 7006 |p | Jump_Nonzero 0x6ba
06b4 4923 |I# | Short_Literal 0x123
06b5 010f | | Execute Exception,Equal
06b6 7003 |p | Jump_Nonzero 0x6ba
06b7 4924 |I$ | Short_Literal 0x124
06b8 010f | | Execute Exception,Equal
06b9 680a |h | Jump_Zero 0x6c4
06ba e5fc | | Load 0x2,-0x4
06bb 4802 |H | Short_Literal 0x2
06bc 0092 0caa | | Action Push_String_Extended,0xcaa ; "Remote_Passwords object does not exist; check your Profile.Remote_Passwords session switch"
06be 0092 0cab | | Action Push_String_Extended,0xcab ; "NONEXISTENT_OBJECT"
06c0 e02b | + | Load 0x0,0x2b
06c1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06c2 c5fc | | Store 0x2,-0x4
06c3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06c4 4931 |I1 | Short_Literal 0x131
06c5 010f | | Execute Exception,Equal
06c6 680f |h | Jump_Zero 0x6d6
06c7 e5fc | | Load 0x2,-0x4
06c8 4802 |H | Short_Literal 0x2
06c9 0092 0cac | | Action Push_String_Extended,0xcac ; "Insufficient privilege to access "
06cb e5fe | | Load 0x2,-0x2
06cc 01cc | | Execute Vector,Catenate
06cd 0092 0cad | | Action Push_String_Extended,0xcad ; "; check the ACLs on your Remote_Passwords file"
06cf 01cc | | Execute Vector,Catenate
06d0 0092 0cae | | Action Push_String_Extended,0xcae ; "ACCESS_ERROR"
06d2 e02b | + | Load 0x0,0x2b
06d3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06d4 c5fc | | Store 0x2,-0x4
06d5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06d6 4932 |I2 | Short_Literal 0x132
06d7 010f | | Execute Exception,Equal
06d8 6812 |h | Jump_Zero 0x6eb
06d9 e5fc | | Load 0x2,-0x4
06da 4802 |H | Short_Literal 0x2
06db 0092 0caf | | Action Push_String_Extended,0xcaf ; "Remote_Passwords file "
06dd e5fe | | Load 0x2,-0x2
06de 01cc | | Execute Vector,Catenate
06df 0092 0cb0 | | Action Push_String_Extended,0xcb0 ; " is not checked out; use Cmvc.Check_Out"
06e1 01cc | | Execute Vector,Catenate
06e2 0092 0cb1 | | Action Push_String_Extended,0xcb1 ; " before attempting this operation again"
06e4 01cc | | Execute Vector,Catenate
06e5 0092 0cb2 | | Action Push_String_Extended,0xcb2 ; "POLICY_ERROR"
06e7 e02b | + | Load 0x0,0x2b
06e8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06e9 c5fc | | Store 0x2,-0x4
06ea 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06eb 4934 |I4 | Short_Literal 0x134
06ec 010f | | Execute Exception,Equal
06ed 6812 |h | Jump_Zero 0x700
06ee e5fc | | Load 0x2,-0x4
06ef 4802 |H | Short_Literal 0x2
06f0 0092 0caf | | Action Push_String_Extended,0xcaf ; "Remote_Passwords file "
06f2 e5fe | | Load 0x2,-0x2
06f3 01cc | | Execute Vector,Catenate
06f4 0092 0cb3 | | Action Push_String_Extended,0xcb3 ; " is frozen; use Library.Unfreeze before attempting"
06f6 01cc | | Execute Vector,Catenate
06f7 0092 0cb4 | | Action Push_String_Extended,0xcb4 ; " this operation again"
06f9 01cc | | Execute Vector,Catenate
06fa 0092 0cb2 | | Action Push_String_Extended,0xcb2 ; "POLICY_ERROR"
06fc e02b | + | Load 0x0,0x2b
06fd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06fe c5fc | | Store 0x2,-0x4
06ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0700 4935 |I5 | Short_Literal 0x135
0701 010f | | Execute Exception,Equal
0702 6812 |h | Jump_Zero 0x715
0703 e5fc | | Load 0x2,-0x4
0704 4802 |H | Short_Literal 0x2
0705 0092 0caf | | Action Push_String_Extended,0xcaf ; "Remote_Passwords file "
0707 e5fe | | Load 0x2,-0x2
0708 01cc | | Execute Vector,Catenate
0709 0092 0cb5 | | Action Push_String_Extended,0xcb5 ; " is locked; use What.Locks to determine who is"
070b 01cc | | Execute Vector,Catenate
070c 0092 0cb6 | | Action Push_String_Extended,0xcb6 ; " holding the locks on this object"
070e 01cc | | Execute Vector,Catenate
070f 0092 0cb7 | | Action Push_String_Extended,0xcb7 ; "LOCK_ERROR"
0711 e02b | + | Load 0x0,0x2b
0712 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0713 c5fc | | Store 0x2,-0x4
0714 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0715 00da | | Load_Top At_Offset_2
0716 e007 | | Load 0x0,0x7
0717 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0718 6804 |h | Jump_Zero 0x71d
0719 00da | | Load_Top At_Offset_2
071a e007 | | Load 0x0,0x7
071b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
071c c402 | | Store 0x2,0x2
071d e5fc | | Load 0x2,-0x4
071e 4802 |H | Short_Literal 0x2
071f e02d | - | Load 0x0,0x2d
0720 180d | | Execute Package,Field_Execute,Field_Number 0xd
0721 0092 0cb8 | | Action Push_String_Extended,0xcb8 ; "UNHANDLED_EXCEPTION"
0723 e02b | + | Load 0x0,0x2b
0724 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0725 c5fc | | Store 0x2,-0x4
0726 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0727 0000 | | .XXX[0x1]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b | + | .CONST 0x072b ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0001 | | .CONST 0x0001 ; Number of locals
072b BODY_0728:
072b INIT_0728:
072b e5fc | | Load 0x2,-0x4
072c 0120 | | Execute Any,Is_Value
072d 6803 |h | Jump_Zero 0x731
072e e02b | + | Load 0x0,0x2b
072f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0730 7801 |x | Jump 0x732
0731 e5fc | | Load 0x2,-0x4
0732 e5fd | | Load 0x2,-0x3
0733 e5fe | | Load 0x2,-0x2
0734 e027 | ' | Load 0x0,0x27
0735 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0736 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0737 e5ff | | Load 0x2,-0x1
0738 823d | = | Call 0x1,0x3d
0739 c5fc | | Store 0x2,-0x4
073a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
073b 0000 0000 | | .BLANK 0000[0x5]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743 | C | .CONST 0x0743 ; Address of begin
0741 0004 | | .CONST 0x0004 ; Address of exception handler
0742 0001 | | .CONST 0x0001 ; Number of locals
0743 BODY_0740:
0743 INIT_0740:
0743 4608 |F | Jump_Case 0x9
0744 7808 |x | Jump 0x74d ; case 0x0
0745 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0746 7813 |x | Jump 0x75a ; case 0x2
0747 7812 |x | Jump 0x75a ; case 0x3
0748 7811 |x | Jump 0x75a ; case 0x4
0749 7810 |x | Jump 0x75a ; case 0x5
074a 780f |x | Jump 0x75a ; case 0x6
074b 780e |x | Jump 0x75a ; case 0x7
074c 780d |x | Jump 0x75a ; case 0x8
074d 00da | | Load_Top At_Offset_2
074e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
074f 0125 | % | Execute Any,Set_Constraint
0750 00da | | Load_Top At_Offset_2
0751 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0752 1c00 | | Execute_Immediate Run_Utility,0x0
0753 00da | | Load_Top At_Offset_2
0754 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0755 0125 | % | Execute Any,Set_Constraint
0756 00da | | Load_Top At_Offset_2
0757 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0758 1c00 | | Execute_Immediate Run_Utility,0x0
0759 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
075a 0869 | i | Execute_Immediate Raise,0x69
075b 0000 0000 | | .BLANK 0000[0x5]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763 | c | .CONST 0x0763 ; Address of begin
0761 0004 | | .CONST 0x0004 ; Address of exception handler
0762 0001 | | .CONST 0x0001 ; Number of locals
0763 BODY_0760:
0763 INIT_0760:
0763 00da | | Load_Top At_Offset_2
0764 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0765 e406 | | Load 0x2,0x6
0766 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0767 00db | | Load_Top At_Offset_3
0768 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0769 487f |H | Short_Literal 0x7f
076a e033 | 3 | Load 0x0,0x33
076b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
076c e034 | 4 | Load 0x0,0x34
076d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
076e e001 | | Load 0x0,0x1
076f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0770 00db | | Load_Top At_Offset_3
0771 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0772 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0773 0000 0000 | | .BLANK 0000[0x5]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077e | ~ | .CONST 0x077e ; Address of begin
0779 079b | | .CONST 0x079b ; Address of exception handler
077a 0002 | | .CONST 0x0002 ; Number of locals
077b INIT_0778:
077b e7fc | | Load 0x3,-0x4
077c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
077d 0007 | | Action Break_Optional
077e BODY_0778:
077e e22a | * | Load 0x1,0x2a
077f 0322 | " | Declare_Variable Record
0780 4800 |H | Short_Literal 0x0
0781 00da | | Load_Top At_Offset_2
0782 e7ff | | Load 0x3,-0x1
0783 8224 | $ | Call 0x1,0x24
0784 00d9 | | Load_Top At_Offset_1
0785 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0786 4800 |H | Short_Literal 0x0
0787 00da | | Load_Top At_Offset_2
0788 e7fe | | Load 0x3,-0x2
0789 8224 | $ | Call 0x1,0x24
078a 00d9 | | Load_Top At_Offset_1
078b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
078c 4800 |H | Short_Literal 0x0
078d 00da | | Load_Top At_Offset_2
078e e5fc | | Load 0x2,-0x4
078f e405 | | Load 0x2,0x5
0790 e7fd | | Load 0x3,-0x3
0791 8230 | 0 | Call 0x1,0x30
0792 8232 | 2 | Call 0x1,0x32
0793 8224 | $ | Call 0x1,0x24
0794 00d9 | | Load_Top At_Offset_1
0795 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0796 e7fc | | Load 0x3,-0x4
0797 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0798 e406 | | Load 0x2,0x6
0799 1816 | | Execute Package,Field_Execute,Field_Number 0x16
079a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
079b TRAP_0778:
079b e030 | 0 | Load 0x0,0x30
079c 010f | | Execute Exception,Equal
079d 6816 |h | Jump_Zero 0x7b4
079e e02a | * | Load 0x0,0x2a
079f 180e | | Execute Package,Field_Execute,Field_Number 0xe
07a0 4806 |H | Short_Literal 0x6
07a1 4822 |H" | Short_Literal 0x22
07a2 0092 0cb9 | | Action Push_String_Extended,0xcb9 ; "Unable to read source entry for hostname \x22"
07a4 e7ff | | Load 0x3,-0x1
07a5 01cc | | Execute Vector,Catenate
07a6 0092 0cba | | Action Push_String_Extended,0xcba ; "\x22 because Source_Password is invalid for this entry."
07a8 01cc | | Execute Vector,Catenate
07a9 0092 0cbb | | Action Push_String_Extended,0xcbb ; " This entry will not appear in the new file \x22"
07ab 01cc | | Execute Vector,Catenate
07ac e5ff | | Load 0x2,-0x1
07ad 01cc | | Execute Vector,Catenate
07ae 01cb | | Execute Vector,Append
07af e02c | , | Load 0x0,0x2c
07b0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07b1 4801 |H | Short_Literal 0x1
07b2 a403 | | Store_Unchecked 0x2,0x3
07b3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
07b4 0100 | | Execute Exception,Raise
07b5 0000 0000 | | .XXX[0x3]
07b7 0000 | |
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07ce | | .CONST 0x07ce ; Address of begin
07b9 0819 | | .CONST 0x0819 ; Address of exception handler
07ba 0005 | | .CONST 0x0005 ; Number of locals
07bb INIT_07b8:
07bb e032 | 2 | Load 0x0,0x32
07bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07bd 02c7 | | Declare_Variable Any
07be 00d8 | | Load_Top At_Offset_0
07bf 1c00 | | Execute_Immediate Run_Utility,0x0
07c0 e027 | ' | Load 0x0,0x27
07c1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07c2 02c7 | | Declare_Variable Any
07c3 00d8 | | Load_Top At_Offset_0
07c4 1c00 | | Execute_Immediate Run_Utility,0x0
07c5 e408 | | Load 0x2,0x8
07c6 0322 | " | Declare_Variable Record
07c7 00d8 | | Load_Top At_Offset_0
07c8 1c00 | | Execute_Immediate Run_Utility,0x0
07c9 e02b | + | Load 0x0,0x2b
07ca 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07cb 02c7 | | Declare_Variable Any
07cc 00d8 | | Load_Top At_Offset_0
07cd 1c00 | | Execute_Immediate Run_Utility,0x0
07ce BODY_07b8:
07ce 00d9 | | Load_Top At_Offset_1
07cf 8409 | | Call 0x2,0x9
07d0 00d1 | | Pop_Control Pop_Count_1
07d1 e404 | | Load 0x2,0x4
07d2 6825 |h% | Jump_Zero 0x7f8
07d3 0092 0cbc | | Action Push_String_Extended,0xcbc ; "specified source"
07d5 e5fe | | Load 0x2,-0x2
07d6 8237 | 7 | Call 0x1,0x37
07d7 c603 | | Store 0x3,0x3
07d8 e02a | * | Load 0x0,0x2a
07d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
07da 4802 |H | Short_Literal 0x2
07db e027 | ' | Load 0x0,0x27
07dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07dd 0092 0cbd | | Action Push_String_Extended,0xcbd ; "Reading remote password entries from <1>"
07df e603 | | Load 0x3,0x3
07e0 e02c | , | Load 0x0,0x2c
07e1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
07e2 00d8 | | Load_Top At_Offset_0
07e3 0120 | | Execute Any,Is_Value
07e4 6803 |h | Jump_Zero 0x7e8
07e5 e02b | + | Load 0x0,0x2b
07e6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07e7 7801 |x | Jump 0x7e9
07e8 00d8 | | Load_Top At_Offset_0
07e9 00da | | Load_Top At_Offset_2
07ea e603 | | Load 0x3,0x3
07eb e40b | | Load 0x2,0xb
07ec 480c |H | Short_Literal 0xc
07ed 4802 |H | Short_Literal 0x2
07ee 0099 | | Action Reference_Dynamic
07ef 480d |H | Short_Literal 0xd
07f0 4802 |H | Short_Literal 0x2
07f1 0099 | | Action Reference_Dynamic
07f2 e008 | | Load 0x0,0x8
07f3 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f4 00d1 | | Pop_Control Pop_Count_1
07f5 c605 | | Store 0x3,0x5
07f6 00d8 | | Load_Top At_Offset_0
07f7 822d | - | Call 0x1,0x2d
07f8 e039 | 9 | Load 0x0,0x39
07f9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07fa e032 | 2 | Load 0x0,0x32
07fb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07fc c602 | | Store 0x3,0x2
07fd 00d8 | | Load_Top At_Offset_0
07fe 0120 | | Execute Any,Is_Value
07ff 6803 |h | Jump_Zero 0x803
0800 e02b | + | Load 0x0,0x2b
0801 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0802 7801 |x | Jump 0x804
0803 00d8 | | Load_Top At_Offset_0
0804 e602 | | Load 0x3,0x2
0805 e5ff | | Load 0x2,-0x1
0806 e604 | | Load 0x3,0x4
0807 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0808 e406 | | Load 0x2,0x6
0809 1817 | | Execute Package,Field_Execute,Field_Number 0x17
080a 823d | = | Call 0x1,0x3d
080b c605 | | Store 0x3,0x5
080c 00db | | Load_Top At_Offset_3
080d 4801 |H | Short_Literal 0x1
080e 4801 |H | Short_Literal 0x1
080f 00db | | Load_Top At_Offset_3
0810 e02b | + | Load 0x0,0x2b
0811 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0812 0f00 | | Execute_Immediate Equal,0x0
0813 e032 | 2 | Load 0x0,0x32
0814 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0815 c602 | | Store 0x3,0x2
0816 00d8 | | Load_Top At_Offset_0
0817 822d | - | Call 0x1,0x2d
0818 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0819 TRAP_07b8:
0819 e02e | . | Load 0x0,0x2e
081a 010f | | Execute Exception,Equal
081b 6803 |h | Jump_Zero 0x81f
081c 4801 |H | Short_Literal 0x1
081d a402 | | Store_Unchecked 0x2,0x2
081e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
081f 0100 | | Execute Exception,Raise
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0832 | 2 | .CONST 0x0832 ; Address of begin
0821 0856 | V | .CONST 0x0856 ; Address of exception handler
0822 0004 | | .CONST 0x0004 ; Number of locals
0823 INIT_0820:
0823 e027 | ' | Load 0x0,0x27
0824 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0825 02c7 | | Declare_Variable Any
0826 00d8 | | Load_Top At_Offset_0
0827 1c00 | | Execute_Immediate Run_Utility,0x0
0828 e027 | ' | Load 0x0,0x27
0829 1b0f | | Execute Package,Field_Read,Field_Number 0xf
082a 02c7 | | Declare_Variable Any
082b 00d8 | | Load_Top At_Offset_0
082c 1c00 | | Execute_Immediate Run_Utility,0x0
082d e035 | 5 | Load 0x0,0x35
082e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
082f 02c7 | | Declare_Variable Any
0830 00d8 | | Load_Top At_Offset_0
0831 1c00 | | Execute_Immediate Run_Utility,0x0
0832 BODY_0820:
0832 00be | | Action Activate_Tasks
0833 e5ff | | Load 0x2,-0x1
0834 8236 | 6 | Call 0x1,0x36
0835 c602 | | Store 0x3,0x2
0836 e5fe | | Load 0x2,-0x2
0837 8239 | 9 | Call 0x1,0x39
0838 c603 | | Store 0x3,0x3
0839 00d8 | | Load_Top At_Offset_0
083a 4801 |H | Short_Literal 0x1
083b 4802 |H | Short_Literal 0x2
083c e603 | | Load 0x3,0x3
083d 8238 | 8 | Call 0x1,0x38
083e c604 | | Store 0x3,0x4
083f 00da | | Load_Top At_Offset_2
0840 e027 | ' | Load 0x0,0x27
0841 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0842 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0843 e226 | & | Load 0x1,0x26
0844 00da | | Load_Top At_Offset_2
0845 e035 | 5 | Load 0x0,0x35
0846 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0847 00d8 | | Load_Top At_Offset_0
0848 e035 | 5 | Load 0x0,0x35
0849 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
084a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
084b c604 | | Store 0x3,0x4
084c e02a | * | Load 0x0,0x2a
084d 180e | | Execute Package,Field_Execute,Field_Number 0xe
084e 4803 |H | Short_Literal 0x3
084f 00db | | Load_Top At_Offset_3
0850 0092 0cbe | | Action Push_String_Extended,0xcbe ; "<1> has been established as the default remote passwords file for session <2>"
0852 e602 | | Load 0x3,0x2
0853 e02c | , | Load 0x0,0x2c
0854 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0855 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0856 TRAP_0820:
0856 e02e | . | Load 0x0,0x2e
0857 010f | | Execute Exception,Equal
0858 680c |h | Jump_Zero 0x865
0859 4801 |H | Short_Literal 0x1
085a a402 | | Store_Unchecked 0x2,0x2
085b 00d9 | | Load_Top At_Offset_1
085c e036 | 6 | Load 0x0,0x36
085d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
085e 6805 |h | Jump_Zero 0x864
085f 00d9 | | Load_Top At_Offset_1
0860 e035 | 5 | Load 0x0,0x35
0861 1b50 | P | Execute Package,Field_Read,Field_Number 0x50
0862 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0863 c604 | | Store 0x3,0x4
0864 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0865 0100 | | Execute Exception,Raise
0866 0000 0000 | | .XXX[0x2]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 086b | k | .CONST 0x086b ; Address of begin
0869 0004 | | .CONST 0x0004 ; Address of exception handler
086a 0001 | | .CONST 0x0001 ; Number of locals
086b BODY_0868:
086b INIT_0868:
086b 4608 |F | Jump_Case 0x9
086c 7808 |x | Jump 0x875 ; case 0x0
086d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
086e 7813 |x | Jump 0x882 ; case 0x2
086f 7812 |x | Jump 0x882 ; case 0x3
0870 7811 |x | Jump 0x882 ; case 0x4
0871 7810 |x | Jump 0x882 ; case 0x5
0872 780f |x | Jump 0x882 ; case 0x6
0873 780e |x | Jump 0x882 ; case 0x7
0874 780d |x | Jump 0x882 ; case 0x8
0875 00da | | Load_Top At_Offset_2
0876 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0877 0125 | % | Execute Any,Set_Constraint
0878 00da | | Load_Top At_Offset_2
0879 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
087a 1c00 | | Execute_Immediate Run_Utility,0x0
087b 00da | | Load_Top At_Offset_2
087c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
087d 0125 | % | Execute Any,Set_Constraint
087e 00da | | Load_Top At_Offset_2
087f 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0880 1c00 | | Execute_Immediate Run_Utility,0x0
0881 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0882 0869 | i | Execute_Immediate Raise,0x69
0883 0000 0000 | | .BLANK 0000[0x5]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088b | | .CONST 0x088b ; Address of begin
0889 0004 | | .CONST 0x0004 ; Address of exception handler
088a 0001 | | .CONST 0x0001 ; Number of locals
088b BODY_0888:
088b INIT_0888:
088b 00da | | Load_Top At_Offset_2
088c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
088d e405 | | Load 0x2,0x5
088e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
088f 00db | | Load_Top At_Offset_3
0890 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0891 487f |H | Short_Literal 0x7f
0892 e033 | 3 | Load 0x0,0x33
0893 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0894 e034 | 4 | Load 0x0,0x34
0895 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0896 e001 | | Load 0x0,0x1
0897 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0898 00db | | Load_Top At_Offset_3
0899 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
089a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
089b 0000 0000 | | .BLANK 0000[0x5]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08a6 | | .CONST 0x08a6 ; Address of begin
08a1 0004 | | .CONST 0x0004 ; Address of exception handler
08a2 0002 | | .CONST 0x0002 ; Number of locals
08a3 INIT_08a0:
08a3 e7fc | | Load 0x3,-0x4
08a4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
08a5 0007 | | Action Break_Optional
08a6 BODY_08a0:
08a6 e404 | | Load 0x2,0x4
08a7 e7ff | | Load 0x3,-0x1
08a8 e008 | | Load 0x0,0x8
08a9 180d | | Execute Package,Field_Execute,Field_Number 0xd
08aa 01df | | Execute Vector,Equal
08ab a402 | | Store_Unchecked 0x2,0x2
08ac e402 | | Load 0x2,0x2
08ad 6803 |h | Jump_Zero 0x8b1
08ae 4800 |H | Short_Literal 0x0
08af a7fb | | Store_Unchecked 0x3,-0x5
08b0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
08b1 e22a | * | Load 0x1,0x2a
08b2 0322 | " | Declare_Variable Record
08b3 4800 |H | Short_Literal 0x0
08b4 00da | | Load_Top At_Offset_2
08b5 e7ff | | Load 0x3,-0x1
08b6 8224 | $ | Call 0x1,0x24
08b7 00d9 | | Load_Top At_Offset_1
08b8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
08b9 4800 |H | Short_Literal 0x0
08ba 00da | | Load_Top At_Offset_2
08bb e7fe | | Load 0x3,-0x2
08bc 8224 | $ | Call 0x1,0x24
08bd 00d9 | | Load_Top At_Offset_1
08be 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
08bf 4800 |H | Short_Literal 0x0
08c0 00da | | Load_Top At_Offset_2
08c1 e7fd | | Load 0x3,-0x3
08c2 8224 | $ | Call 0x1,0x24
08c3 00d9 | | Load_Top At_Offset_1
08c4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
08c5 e7fc | | Load 0x3,-0x4
08c6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08c7 e405 | | Load 0x2,0x5
08c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08c9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
08ca 0000 0000 | | .BLANK 0000[0x6]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08e9 | | .CONST 0x08e9 ; Address of begin
08d1 0968 | h | .CONST 0x0968 ; Address of exception handler
08d2 0006 | | .CONST 0x0006 ; Number of locals
08d3 INIT_08d0:
08d3 e032 | 2 | Load 0x0,0x32
08d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08d5 02c7 | | Declare_Variable Any
08d6 00d8 | | Load_Top At_Offset_0
08d7 1c00 | | Execute_Immediate Run_Utility,0x0
08d8 e027 | ' | Load 0x0,0x27
08d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08da 02c7 | | Declare_Variable Any
08db 00d8 | | Load_Top At_Offset_0
08dc 1c00 | | Execute_Immediate Run_Utility,0x0
08dd e407 | | Load 0x2,0x7
08de 0322 | " | Declare_Variable Record
08df 00d8 | | Load_Top At_Offset_0
08e0 1c00 | | Execute_Immediate Run_Utility,0x0
08e1 e02b | + | Load 0x0,0x2b
08e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08e3 02c7 | | Declare_Variable Any
08e4 00d8 | | Load_Top At_Offset_0
08e5 1c00 | | Execute_Immediate Run_Utility,0x0
08e6 00d9 | | Load_Top At_Offset_1
08e7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
08e8 0007 | | Action Break_Optional
08e9 BODY_08d0:
08e9 e5fb | | Load 0x2,-0x5
08ea 823a | : | Call 0x1,0x3a
08eb c603 | | Store 0x3,0x3
08ec 00da | | Load_Top At_Offset_2
08ed 8408 | | Call 0x2,0x8
08ee 00d1 | | Pop_Control Pop_Count_1
08ef 00d9 | | Load_Top At_Offset_1
08f0 0120 | | Execute Any,Is_Value
08f1 6803 |h | Jump_Zero 0x8f5
08f2 e02b | + | Load 0x0,0x2b
08f3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08f4 7801 |x | Jump 0x8f6
08f5 00d9 | | Load_Top At_Offset_1
08f6 00db | | Load_Top At_Offset_3
08f7 e603 | | Load 0x3,0x3
08f8 e40a | | Load 0x2,0xa
08f9 480b |H | Short_Literal 0xb
08fa 4802 |H | Short_Literal 0x2
08fb 0099 | | Action Reference_Dynamic
08fc 480c |H | Short_Literal 0xc
08fd 4802 |H | Short_Literal 0x2
08fe 0099 | | Action Reference_Dynamic
08ff e008 | | Load 0x0,0x8
0900 180e | | Execute Package,Field_Execute,Field_Number 0xe
0901 00d1 | | Pop_Control Pop_Count_1
0902 c605 | | Store 0x3,0x5
0903 00d9 | | Load_Top At_Offset_1
0904 822d | - | Call 0x1,0x2d
0905 e402 | | Load 0x2,0x2
0906 6813 |h | Jump_Zero 0x91a
0907 e02a | * | Load 0x0,0x2a
0908 180e | | Execute Package,Field_Execute,Field_Number 0xe
0909 4807 |H | Short_Literal 0x7
090a e027 | ' | Load 0x0,0x27
090b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
090c 0092 0cbf | | Action Push_String_Extended,0xcbf ; "Hostname \x22"
090e e404 | | Load 0x2,0x4
090f 01cc | | Execute Vector,Catenate
0910 0092 0cc0 | | Action Push_String_Extended,0xcc0 ; "\x22 already appears in <1>, use Change"
0912 01cc | | Execute Vector,Catenate
0913 0092 0cc1 | | Action Push_String_Extended,0xcc1 ; " if you want to modify the existing value"
0915 01cc | | Execute Vector,Catenate
0916 e603 | | Load 0x3,0x3
0917 e02c | , | Load 0x0,0x2c
0918 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0919 4501 |E | Exit_Suprogram New_Top_Offset 0x1
091a e22a | * | Load 0x1,0x2a
091b 0322 | " | Declare_Variable Record
091c 4800 |H | Short_Literal 0x0
091d 00da | | Load_Top At_Offset_2
091e e5ff | | Load 0x2,-0x1
091f 8224 | $ | Call 0x1,0x24
0920 00d9 | | Load_Top At_Offset_1
0921 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0922 4800 |H | Short_Literal 0x0
0923 00da | | Load_Top At_Offset_2
0924 e5fe | | Load 0x2,-0x2
0925 8224 | $ | Call 0x1,0x24
0926 00d9 | | Load_Top At_Offset_1
0927 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0928 4800 |H | Short_Literal 0x0
0929 00da | | Load_Top At_Offset_2
092a e5fc | | Load 0x2,-0x4
092b 0092 0cc2 | | Action Push_String_Extended,0xcc2 ; "new password"
092d e5fd | | Load 0x2,-0x3
092e e003 | | Load 0x0,0x3
092f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0930 8232 | 2 | Call 0x1,0x32
0931 8224 | $ | Call 0x1,0x24
0932 00d9 | | Load_Top At_Offset_1
0933 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0934 00db | | Load_Top At_Offset_3
0935 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0936 e405 | | Load 0x2,0x5
0937 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0938 e039 | 9 | Load 0x0,0x39
0939 1810 | | Execute Package,Field_Execute,Field_Number 0x10
093a e032 | 2 | Load 0x0,0x32
093b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
093c c602 | | Store 0x3,0x2
093d 00d9 | | Load_Top At_Offset_1
093e 0120 | | Execute Any,Is_Value
093f 6803 |h | Jump_Zero 0x943
0940 e02b | + | Load 0x0,0x2b
0941 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0942 7801 |x | Jump 0x944
0943 00d9 | | Load_Top At_Offset_1
0944 e602 | | Load 0x3,0x2
0945 e603 | | Load 0x3,0x3
0946 e604 | | Load 0x3,0x4
0947 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0948 e405 | | Load 0x2,0x5
0949 1817 | | Execute Package,Field_Execute,Field_Number 0x17
094a 823e | > | Call 0x1,0x3e
094b c605 | | Store 0x3,0x5
094c e602 | | Load 0x3,0x2
094d 4801 |H | Short_Literal 0x1
094e 4801 |H | Short_Literal 0x1
094f e605 | | Load 0x3,0x5
0950 e02b | + | Load 0x0,0x2b
0951 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0952 0f00 | | Execute_Immediate Equal,0x0
0953 e032 | 2 | Load 0x0,0x32
0954 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0955 c602 | | Store 0x3,0x2
0956 00d9 | | Load_Top At_Offset_1
0957 822d | - | Call 0x1,0x2d
0958 e02a | * | Load 0x0,0x2a
0959 180e | | Execute Package,Field_Execute,Field_Number 0xe
095a 4803 |H | Short_Literal 0x3
095b e027 | ' | Load 0x0,0x27
095c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
095d 0092 0cbf | | Action Push_String_Extended,0xcbf ; "Hostname \x22"
095f e404 | | Load 0x2,0x4
0960 01cc | | Execute Vector,Catenate
0961 0092 0cc3 | | Action Push_String_Extended,0xcc3 ; "\x22 has been successfully added to <1>"
0963 01cc | | Execute Vector,Catenate
0964 e603 | | Load 0x3,0x3
0965 e02c | , | Load 0x0,0x2c
0966 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0967 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0968 TRAP_08d0:
0968 e02e | . | Load 0x0,0x2e
0969 010f | | Execute Exception,Equal
096a 6803 |h | Jump_Zero 0x96e
096b 4801 |H | Short_Literal 0x1
096c a402 | | Store_Unchecked 0x2,0x2
096d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
096e 0100 | | Execute Exception,Raise
096f 0000 | | .XXX[0x1]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0973 | s | .CONST 0x0973 ; Address of begin
0971 0004 | | .CONST 0x0004 ; Address of exception handler
0972 0001 | | .CONST 0x0001 ; Number of locals
0973 BODY_0970:
0973 INIT_0970:
0973 4608 |F | Jump_Case 0x9
0974 7808 |x | Jump 0x97d ; case 0x0
0975 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0976 7813 |x | Jump 0x98a ; case 0x2
0977 7812 |x | Jump 0x98a ; case 0x3
0978 7811 |x | Jump 0x98a ; case 0x4
0979 7810 |x | Jump 0x98a ; case 0x5
097a 780f |x | Jump 0x98a ; case 0x6
097b 780e |x | Jump 0x98a ; case 0x7
097c 780d |x | Jump 0x98a ; case 0x8
097d 00da | | Load_Top At_Offset_2
097e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
097f 0125 | % | Execute Any,Set_Constraint
0980 00da | | Load_Top At_Offset_2
0981 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0982 1c00 | | Execute_Immediate Run_Utility,0x0
0983 00da | | Load_Top At_Offset_2
0984 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0985 0125 | % | Execute Any,Set_Constraint
0986 00da | | Load_Top At_Offset_2
0987 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0988 1c00 | | Execute_Immediate Run_Utility,0x0
0989 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
098a 0869 | i | Execute_Immediate Raise,0x69
098b 0000 0000 | | .BLANK 0000[0x5]
0990 ; --------------------------------------------------------------------------------------
0990 ; SUBPROGRAM
0990 ; --------------------------------------------------------------------------------------
0990 0993 | | .CONST 0x0993 ; Address of begin
0991 0004 | | .CONST 0x0004 ; Address of exception handler
0992 0001 | | .CONST 0x0001 ; Number of locals
0993 BODY_0990:
0993 INIT_0990:
0993 00da | | Load_Top At_Offset_2
0994 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0995 e406 | | Load 0x2,0x6
0996 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0997 00db | | Load_Top At_Offset_3
0998 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0999 487f |H | Short_Literal 0x7f
099a e033 | 3 | Load 0x0,0x33
099b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
099c e034 | 4 | Load 0x0,0x34
099d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
099e e001 | | Load 0x0,0x1
099f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09a0 00db | | Load_Top At_Offset_3
09a1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
09a2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09a3 0000 0000 | | .BLANK 0000[0x5]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09ae | | .CONST 0x09ae ; Address of begin
09a9 0004 | | .CONST 0x0004 ; Address of exception handler
09aa 0002 | | .CONST 0x0002 ; Number of locals
09ab INIT_09a8:
09ab e7fc | | Load 0x3,-0x4
09ac 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
09ad 0007 | | Action Break_Optional
09ae BODY_09a8:
09ae e405 | | Load 0x2,0x5
09af e7ff | | Load 0x3,-0x1
09b0 e008 | | Load 0x0,0x8
09b1 180d | | Execute Package,Field_Execute,Field_Number 0xd
09b2 01df | | Execute Vector,Equal
09b3 6821 |h! | Jump_Zero 0x9d5
09b4 4801 |H | Short_Literal 0x1
09b5 a402 | | Store_Unchecked 0x2,0x2
09b6 e22a | * | Load 0x1,0x2a
09b7 0322 | " | Declare_Variable Record
09b8 4800 |H | Short_Literal 0x0
09b9 00da | | Load_Top At_Offset_2
09ba e5ff | | Load 0x2,-0x1
09bb 8224 | $ | Call 0x1,0x24
09bc 00d9 | | Load_Top At_Offset_1
09bd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09be 4800 |H | Short_Literal 0x0
09bf 00da | | Load_Top At_Offset_2
09c0 e5fe | | Load 0x2,-0x2
09c1 8224 | $ | Call 0x1,0x24
09c2 00d9 | | Load_Top At_Offset_1
09c3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
09c4 4800 |H | Short_Literal 0x0
09c5 00da | | Load_Top At_Offset_2
09c6 e5fc | | Load 0x2,-0x4
09c7 0092 0cc2 | | Action Push_String_Extended,0xcc2 ; "new password"
09c9 e5fd | | Load 0x2,-0x3
09ca e003 | | Load 0x0,0x3
09cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
09cc 8232 | 2 | Call 0x1,0x32
09cd 8224 | $ | Call 0x1,0x24
09ce 00d9 | | Load_Top At_Offset_1
09cf 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
09d0 e7fc | | Load 0x3,-0x4
09d1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09d2 e406 | | Load 0x2,0x6
09d3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09d4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09d5 e22a | * | Load 0x1,0x2a
09d6 0322 | " | Declare_Variable Record
09d7 4800 |H | Short_Literal 0x0
09d8 00da | | Load_Top At_Offset_2
09d9 e7ff | | Load 0x3,-0x1
09da 8224 | $ | Call 0x1,0x24
09db 00d9 | | Load_Top At_Offset_1
09dc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09dd 4800 |H | Short_Literal 0x0
09de 00da | | Load_Top At_Offset_2
09df e7fe | | Load 0x3,-0x2
09e0 8224 | $ | Call 0x1,0x24
09e1 00d9 | | Load_Top At_Offset_1
09e2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
09e3 4800 |H | Short_Literal 0x0
09e4 00da | | Load_Top At_Offset_2
09e5 e7fd | | Load 0x3,-0x3
09e6 8224 | $ | Call 0x1,0x24
09e7 00d9 | | Load_Top At_Offset_1
09e8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
09e9 e7fc | | Load 0x3,-0x4
09ea 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09eb e406 | | Load 0x2,0x6
09ec 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09ed 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09ee 0000 0000 | | .XXX[0x2]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 0a09 | | .CONST 0x0a09 ; Address of begin
09f1 0a83 | | .CONST 0x0a83 ; Address of exception handler
09f2 0006 | | .CONST 0x0006 ; Number of locals
09f3 INIT_09f0:
09f3 e032 | 2 | Load 0x0,0x32
09f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09f5 02c7 | | Declare_Variable Any
09f6 00d8 | | Load_Top At_Offset_0
09f7 1c00 | | Execute_Immediate Run_Utility,0x0
09f8 e027 | ' | Load 0x0,0x27
09f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09fa 02c7 | | Declare_Variable Any
09fb 00d8 | | Load_Top At_Offset_0
09fc 1c00 | | Execute_Immediate Run_Utility,0x0
09fd e408 | | Load 0x2,0x8
09fe 0322 | " | Declare_Variable Record
09ff 00d8 | | Load_Top At_Offset_0
0a00 1c00 | | Execute_Immediate Run_Utility,0x0
0a01 e02b | + | Load 0x0,0x2b
0a02 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a03 02c7 | | Declare_Variable Any
0a04 00d8 | | Load_Top At_Offset_0
0a05 1c00 | | Execute_Immediate Run_Utility,0x0
0a06 00d9 | | Load_Top At_Offset_1
0a07 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0a08 0007 | | Action Break_Optional
0a09 BODY_09f0:
0a09 e5fb | | Load 0x2,-0x5
0a0a 823a | : | Call 0x1,0x3a
0a0b c603 | | Store 0x3,0x3
0a0c 00da | | Load_Top At_Offset_2
0a0d 8409 | | Call 0x2,0x9
0a0e 00d1 | | Pop_Control Pop_Count_1
0a0f 00d9 | | Load_Top At_Offset_1
0a10 0120 | | Execute Any,Is_Value
0a11 6803 |h | Jump_Zero 0xa15
0a12 e02b | + | Load 0x0,0x2b
0a13 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a14 7801 |x | Jump 0xa16
0a15 00d9 | | Load_Top At_Offset_1
0a16 00db | | Load_Top At_Offset_3
0a17 e603 | | Load 0x3,0x3
0a18 e40b | | Load 0x2,0xb
0a19 480c |H | Short_Literal 0xc
0a1a 4802 |H | Short_Literal 0x2
0a1b 0099 | | Action Reference_Dynamic
0a1c 480d |H | Short_Literal 0xd
0a1d 4802 |H | Short_Literal 0x2
0a1e 0099 | | Action Reference_Dynamic
0a1f e008 | | Load 0x0,0x8
0a20 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a21 00d1 | | Pop_Control Pop_Count_1
0a22 c605 | | Store 0x3,0x5
0a23 00d9 | | Load_Top At_Offset_1
0a24 822d | - | Call 0x1,0x2d
0a25 e402 | | Load 0x2,0x2
0a26 702d |p- | Jump_Nonzero 0xa54
0a27 e02a | * | Load 0x0,0x2a
0a28 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a29 4802 |H | Short_Literal 0x2
0a2a e027 | ' | Load 0x0,0x27
0a2b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a2c 0092 0cbf | | Action Push_String_Extended,0xcbf ; "Hostname \x22"
0a2e e405 | | Load 0x2,0x5
0a2f 01cc | | Execute Vector,Catenate
0a30 0092 0cc4 | | Action Push_String_Extended,0xcc4 ; "\x22 does not appear in <1>"
0a32 01cc | | Execute Vector,Catenate
0a33 e603 | | Load 0x3,0x3
0a34 e02c | , | Load 0x0,0x2c
0a35 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0a36 e22a | * | Load 0x1,0x2a
0a37 0322 | " | Declare_Variable Record
0a38 4800 |H | Short_Literal 0x0
0a39 00da | | Load_Top At_Offset_2
0a3a e5ff | | Load 0x2,-0x1
0a3b 8224 | $ | Call 0x1,0x24
0a3c 00d9 | | Load_Top At_Offset_1
0a3d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0a3e 4800 |H | Short_Literal 0x0
0a3f 00da | | Load_Top At_Offset_2
0a40 e5fe | | Load 0x2,-0x2
0a41 8224 | $ | Call 0x1,0x24
0a42 00d9 | | Load_Top At_Offset_1
0a43 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0a44 4800 |H | Short_Literal 0x0
0a45 00da | | Load_Top At_Offset_2
0a46 e5fc | | Load 0x2,-0x4
0a47 0092 0cc2 | | Action Push_String_Extended,0xcc2 ; "new password"
0a49 e5fd | | Load 0x2,-0x3
0a4a e003 | | Load 0x0,0x3
0a4b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a4c 8232 | 2 | Call 0x1,0x32
0a4d 8224 | $ | Call 0x1,0x24
0a4e 00d9 | | Load_Top At_Offset_1
0a4f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a50 00db | | Load_Top At_Offset_3
0a51 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a52 e406 | | Load 0x2,0x6
0a53 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a54 e039 | 9 | Load 0x0,0x39
0a55 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a56 e032 | 2 | Load 0x0,0x32
0a57 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a58 c602 | | Store 0x3,0x2
0a59 00d9 | | Load_Top At_Offset_1
0a5a 0120 | | Execute Any,Is_Value
0a5b 6803 |h | Jump_Zero 0xa5f
0a5c e02b | + | Load 0x0,0x2b
0a5d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a5e 7801 |x | Jump 0xa60
0a5f 00d9 | | Load_Top At_Offset_1
0a60 e602 | | Load 0x3,0x2
0a61 e603 | | Load 0x3,0x3
0a62 e604 | | Load 0x3,0x4
0a63 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a64 e406 | | Load 0x2,0x6
0a65 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a66 823e | > | Call 0x1,0x3e
0a67 c605 | | Store 0x3,0x5
0a68 e602 | | Load 0x3,0x2
0a69 4801 |H | Short_Literal 0x1
0a6a 4801 |H | Short_Literal 0x1
0a6b e605 | | Load 0x3,0x5
0a6c e02b | + | Load 0x0,0x2b
0a6d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0a6e 0f00 | | Execute_Immediate Equal,0x0
0a6f e032 | 2 | Load 0x0,0x32
0a70 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a71 c602 | | Store 0x3,0x2
0a72 00d9 | | Load_Top At_Offset_1
0a73 822d | - | Call 0x1,0x2d
0a74 e02a | * | Load 0x0,0x2a
0a75 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a76 4803 |H | Short_Literal 0x3
0a77 e027 | ' | Load 0x0,0x27
0a78 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a79 4822 |H" | Short_Literal 0x22
0a7a 0092 0cc5 | | Action Push_String_Extended,0xcc5 ; "<1> has been successfully modified for hostname \x22"
0a7c e405 | | Load 0x2,0x5
0a7d 01cc | | Execute Vector,Catenate
0a7e 01cb | | Execute Vector,Append
0a7f e603 | | Load 0x3,0x3
0a80 e02c | , | Load 0x0,0x2c
0a81 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0a82 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a83 TRAP_09f0:
0a83 e02e | . | Load 0x0,0x2e
0a84 010f | | Execute Exception,Equal
0a85 6803 |h | Jump_Zero 0xa89
0a86 4801 |H | Short_Literal 0x1
0a87 a403 | | Store_Unchecked 0x2,0x3
0a88 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a89 0100 | | Execute Exception,Raise
0a8a 0000 0000 | | .BLANK 0000[0x6]
0a90 ; --------------------------------------------------------------------------------------
0a90 ; SUBPROGRAM
0a90 ; --------------------------------------------------------------------------------------
0a90 0a93 | | .CONST 0x0a93 ; Address of begin
0a91 0004 | | .CONST 0x0004 ; Address of exception handler
0a92 0001 | | .CONST 0x0001 ; Number of locals
0a93 BODY_0a90:
0a93 INIT_0a90:
0a93 4608 |F | Jump_Case 0x9
0a94 7808 |x | Jump 0xa9d ; case 0x0
0a95 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0a96 7813 |x | Jump 0xaaa ; case 0x2
0a97 7812 |x | Jump 0xaaa ; case 0x3
0a98 7811 |x | Jump 0xaaa ; case 0x4
0a99 7810 |x | Jump 0xaaa ; case 0x5
0a9a 780f |x | Jump 0xaaa ; case 0x6
0a9b 780e |x | Jump 0xaaa ; case 0x7
0a9c 780d |x | Jump 0xaaa ; case 0x8
0a9d 00da | | Load_Top At_Offset_2
0a9e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0a9f 0125 | % | Execute Any,Set_Constraint
0aa0 00da | | Load_Top At_Offset_2
0aa1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0aa2 1c00 | | Execute_Immediate Run_Utility,0x0
0aa3 00da | | Load_Top At_Offset_2
0aa4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0aa5 0125 | % | Execute Any,Set_Constraint
0aa6 00da | | Load_Top At_Offset_2
0aa7 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0aa8 1c00 | | Execute_Immediate Run_Utility,0x0
0aa9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0aaa 0869 | i | Execute_Immediate Raise,0x69
0aab 0000 0000 | | .BLANK 0000[0x5]
0ab0 ; --------------------------------------------------------------------------------------
0ab0 ; SUBPROGRAM
0ab0 ; --------------------------------------------------------------------------------------
0ab0 0ab3 | | .CONST 0x0ab3 ; Address of begin
0ab1 0004 | | .CONST 0x0004 ; Address of exception handler
0ab2 0001 | | .CONST 0x0001 ; Number of locals
0ab3 BODY_0ab0:
0ab3 INIT_0ab0:
0ab3 00da | | Load_Top At_Offset_2
0ab4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ab5 e406 | | Load 0x2,0x6
0ab6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0ab7 00db | | Load_Top At_Offset_3
0ab8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0ab9 487f |H | Short_Literal 0x7f
0aba e033 | 3 | Load 0x0,0x33
0abb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0abc e034 | 4 | Load 0x0,0x34
0abd 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0abe e001 | | Load 0x0,0x1
0abf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ac0 00db | | Load_Top At_Offset_3
0ac1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ac2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ac3 0000 0000 | | .BLANK 0000[0x5]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0ace | | .CONST 0x0ace ; Address of begin
0ac9 0004 | | .CONST 0x0004 ; Address of exception handler
0aca 0002 | | .CONST 0x0002 ; Number of locals
0acb INIT_0ac8:
0acb e7fc | | Load 0x3,-0x4
0acc 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0acd 0007 | | Action Break_Optional
0ace BODY_0ac8:
0ace e405 | | Load 0x2,0x5
0acf e7ff | | Load 0x3,-0x1
0ad0 e008 | | Load 0x0,0x8
0ad1 180d | | Execute Package,Field_Execute,Field_Number 0xd
0ad2 01df | | Execute Vector,Equal
0ad3 6803 |h | Jump_Zero 0xad7
0ad4 4801 |H | Short_Literal 0x1
0ad5 a402 | | Store_Unchecked 0x2,0x2
0ad6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0ad7 e22a | * | Load 0x1,0x2a
0ad8 0322 | " | Declare_Variable Record
0ad9 4800 |H | Short_Literal 0x0
0ada 00da | | Load_Top At_Offset_2
0adb e7ff | | Load 0x3,-0x1
0adc 8224 | $ | Call 0x1,0x24
0add 00d9 | | Load_Top At_Offset_1
0ade 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0adf 4800 |H | Short_Literal 0x0
0ae0 00da | | Load_Top At_Offset_2
0ae1 e7fe | | Load 0x3,-0x2
0ae2 8224 | $ | Call 0x1,0x24
0ae3 00d9 | | Load_Top At_Offset_1
0ae4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0ae5 4800 |H | Short_Literal 0x0
0ae6 00da | | Load_Top At_Offset_2
0ae7 e7fd | | Load 0x3,-0x3
0ae8 8224 | $ | Call 0x1,0x24
0ae9 00d9 | | Load_Top At_Offset_1
0aea 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0aeb e7fc | | Load 0x3,-0x4
0aec 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0aed e406 | | Load 0x2,0x6
0aee 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0aef 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0b06 | | .CONST 0x0b06 ; Address of begin
0af1 0b66 | f | .CONST 0x0b66 ; Address of exception handler
0af2 0005 | | .CONST 0x0005 ; Number of locals
0af3 INIT_0af0:
0af3 e032 | 2 | Load 0x0,0x32
0af4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0af5 02c7 | | Declare_Variable Any
0af6 00d8 | | Load_Top At_Offset_0
0af7 1c00 | | Execute_Immediate Run_Utility,0x0
0af8 e027 | ' | Load 0x0,0x27
0af9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0afa 02c7 | | Declare_Variable Any
0afb 00d8 | | Load_Top At_Offset_0
0afc 1c00 | | Execute_Immediate Run_Utility,0x0
0afd e408 | | Load 0x2,0x8
0afe 0322 | " | Declare_Variable Record
0aff 00d8 | | Load_Top At_Offset_0
0b00 1c00 | | Execute_Immediate Run_Utility,0x0
0b01 e02b | + | Load 0x0,0x2b
0b02 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b03 02c7 | | Declare_Variable Any
0b04 00d8 | | Load_Top At_Offset_0
0b05 1c00 | | Execute_Immediate Run_Utility,0x0
0b06 BODY_0af0:
0b06 e5fe | | Load 0x2,-0x2
0b07 823a | : | Call 0x1,0x3a
0b08 c603 | | Store 0x3,0x3
0b09 00d9 | | Load_Top At_Offset_1
0b0a 8409 | | Call 0x2,0x9
0b0b 00d1 | | Pop_Control Pop_Count_1
0b0c 00d8 | | Load_Top At_Offset_0
0b0d 0120 | | Execute Any,Is_Value
0b0e 6803 |h | Jump_Zero 0xb12
0b0f e02b | + | Load 0x0,0x2b
0b10 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b11 7801 |x | Jump 0xb13
0b12 00d8 | | Load_Top At_Offset_0
0b13 00da | | Load_Top At_Offset_2
0b14 e603 | | Load 0x3,0x3
0b15 e40b | | Load 0x2,0xb
0b16 480c |H | Short_Literal 0xc
0b17 4802 |H | Short_Literal 0x2
0b18 0099 | | Action Reference_Dynamic
0b19 480d |H | Short_Literal 0xd
0b1a 4802 |H | Short_Literal 0x2
0b1b 0099 | | Action Reference_Dynamic
0b1c e008 | | Load 0x0,0x8
0b1d 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b1e 00d1 | | Pop_Control Pop_Count_1
0b1f c605 | | Store 0x3,0x5
0b20 00d8 | | Load_Top At_Offset_0
0b21 822d | - | Call 0x1,0x2d
0b22 e402 | | Load 0x2,0x2
0b23 6830 |h0 | Jump_Zero 0xb54
0b24 e039 | 9 | Load 0x0,0x39
0b25 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b26 e032 | 2 | Load 0x0,0x32
0b27 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b28 c602 | | Store 0x3,0x2
0b29 00d8 | | Load_Top At_Offset_0
0b2a 0120 | | Execute Any,Is_Value
0b2b 6803 |h | Jump_Zero 0xb2f
0b2c e02b | + | Load 0x0,0x2b
0b2d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b2e 7801 |x | Jump 0xb30
0b2f 00d8 | | Load_Top At_Offset_0
0b30 e602 | | Load 0x3,0x2
0b31 e603 | | Load 0x3,0x3
0b32 e604 | | Load 0x3,0x4
0b33 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b34 e406 | | Load 0x2,0x6
0b35 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b36 823e | > | Call 0x1,0x3e
0b37 c605 | | Store 0x3,0x5
0b38 00db | | Load_Top At_Offset_3
0b39 4801 |H | Short_Literal 0x1
0b3a 4801 |H | Short_Literal 0x1
0b3b 00db | | Load_Top At_Offset_3
0b3c e02b | + | Load 0x0,0x2b
0b3d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b3e 0f00 | | Execute_Immediate Equal,0x0
0b3f e032 | 2 | Load 0x0,0x32
0b40 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b41 c602 | | Store 0x3,0x2
0b42 00d8 | | Load_Top At_Offset_0
0b43 822d | - | Call 0x1,0x2d
0b44 e02a | * | Load 0x0,0x2a
0b45 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b46 4803 |H | Short_Literal 0x3
0b47 e027 | ' | Load 0x0,0x27
0b48 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b49 0092 0cbf | | Action Push_String_Extended,0xcbf ; "Hostname \x22"
0b4b e405 | | Load 0x2,0x5
0b4c 01cc | | Execute Vector,Catenate
0b4d 0092 0cc6 | | Action Push_String_Extended,0xcc6 ; "\x22 has been deleted from <1>"
0b4f 01cc | | Execute Vector,Catenate
0b50 e603 | | Load 0x3,0x3
0b51 e02c | , | Load 0x0,0x2c
0b52 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b53 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b54 4801 |H | Short_Literal 0x1
0b55 a404 | | Store_Unchecked 0x2,0x4
0b56 e02a | * | Load 0x0,0x2a
0b57 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b58 4806 |H | Short_Literal 0x6
0b59 e027 | ' | Load 0x0,0x27
0b5a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b5b 0092 0cbf | | Action Push_String_Extended,0xcbf ; "Hostname \x22"
0b5d e405 | | Load 0x2,0x5
0b5e 01cc | | Execute Vector,Catenate
0b5f 0092 0cc4 | | Action Push_String_Extended,0xcc4 ; "\x22 does not appear in <1>"
0b61 01cc | | Execute Vector,Catenate
0b62 e603 | | Load 0x3,0x3
0b63 e02c | , | Load 0x0,0x2c
0b64 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b65 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b66 TRAP_0af0:
0b66 e02e | . | Load 0x0,0x2e
0b67 010f | | Execute Exception,Equal
0b68 6803 |h | Jump_Zero 0xb6c
0b69 4801 |H | Short_Literal 0x1
0b6a a403 | | Store_Unchecked 0x2,0x3
0b6b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b6c 0100 | | Execute Exception,Raise
0b6d 0000 0000 | | .XXX[0x3]
0b6f 0000 | |
0b70 ; --------------------------------------------------------------------------------------
0b70 ; SUBPROGRAM
0b70 ; --------------------------------------------------------------------------------------
0b70 0b73 | s | .CONST 0x0b73 ; Address of begin
0b71 0004 | | .CONST 0x0004 ; Address of exception handler
0b72 0001 | | .CONST 0x0001 ; Number of locals
0b73 BODY_0b70:
0b73 INIT_0b70:
0b73 4608 |F | Jump_Case 0x9
0b74 7808 |x | Jump 0xb7d ; case 0x0
0b75 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0b76 7813 |x | Jump 0xb8a ; case 0x2
0b77 7812 |x | Jump 0xb8a ; case 0x3
0b78 7811 |x | Jump 0xb8a ; case 0x4
0b79 7810 |x | Jump 0xb8a ; case 0x5
0b7a 780f |x | Jump 0xb8a ; case 0x6
0b7b 780e |x | Jump 0xb8a ; case 0x7
0b7c 780d |x | Jump 0xb8a ; case 0x8
0b7d 00da | | Load_Top At_Offset_2
0b7e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0b7f 0125 | % | Execute Any,Set_Constraint
0b80 00da | | Load_Top At_Offset_2
0b81 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0b82 1c00 | | Execute_Immediate Run_Utility,0x0
0b83 00da | | Load_Top At_Offset_2
0b84 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0b85 0125 | % | Execute Any,Set_Constraint
0b86 00da | | Load_Top At_Offset_2
0b87 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0b88 1c00 | | Execute_Immediate Run_Utility,0x0
0b89 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0b8a 0869 | i | Execute_Immediate Raise,0x69
0b8b 0000 0000 | | .BLANK 0000[0x5]
0b90 ; --------------------------------------------------------------------------------------
0b90 ; SUBPROGRAM
0b90 ; --------------------------------------------------------------------------------------
0b90 0b93 | | .CONST 0x0b93 ; Address of begin
0b91 0004 | | .CONST 0x0004 ; Address of exception handler
0b92 0001 | | .CONST 0x0001 ; Number of locals
0b93 BODY_0b90:
0b93 INIT_0b90:
0b93 00da | | Load_Top At_Offset_2
0b94 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b95 e405 | | Load 0x2,0x5
0b96 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b97 00db | | Load_Top At_Offset_3
0b98 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b99 487f |H | Short_Literal 0x7f
0b9a e033 | 3 | Load 0x0,0x33
0b9b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b9c e034 | 4 | Load 0x0,0x34
0b9d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b9e e001 | | Load 0x0,0x1
0b9f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ba0 00db | | Load_Top At_Offset_3
0ba1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ba2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ba3 0000 0000 | | .BLANK 0000[0x5]
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; SUBPROGRAM
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0bb1 | | .CONST 0x0bb1 ; Address of begin
0ba9 0bce | | .CONST 0x0bce ; Address of exception handler
0baa 0003 | | .CONST 0x0003 ; Number of locals
0bab INIT_0ba8:
0bab e7fd | | Load 0x3,-0x3
0bac e003 | | Load 0x0,0x3
0bad 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0bae e7fc | | Load 0x3,-0x4
0baf 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0bb0 0007 | | Action Break_Optional
0bb1 BODY_0ba8:
0bb1 e22a | * | Load 0x1,0x2a
0bb2 0322 | " | Declare_Variable Record
0bb3 4800 |H | Short_Literal 0x0
0bb4 00da | | Load_Top At_Offset_2
0bb5 e7ff | | Load 0x3,-0x1
0bb6 8224 | $ | Call 0x1,0x24
0bb7 00d9 | | Load_Top At_Offset_1
0bb8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0bb9 4800 |H | Short_Literal 0x0
0bba 00da | | Load_Top At_Offset_2
0bbb e7fe | | Load 0x3,-0x2
0bbc 8224 | $ | Call 0x1,0x24
0bbd 00d9 | | Load_Top At_Offset_1
0bbe 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0bbf 4800 |H | Short_Literal 0x0
0bc0 00da | | Load_Top At_Offset_2
0bc1 e602 | | Load 0x3,0x2
0bc2 e404 | | Load 0x2,0x4
0bc3 e7fd | | Load 0x3,-0x3
0bc4 8230 | 0 | Call 0x1,0x30
0bc5 8231 | 1 | Call 0x1,0x31
0bc6 8224 | $ | Call 0x1,0x24
0bc7 00d9 | | Load_Top At_Offset_1
0bc8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0bc9 e7fc | | Load 0x3,-0x4
0bca 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0bcb e405 | | Load 0x2,0x5
0bcc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0bcd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0bce TRAP_0ba8:
0bce e030 | 0 | Load 0x0,0x30
0bcf 010f | | Execute Exception,Equal
0bd0 6810 |h | Jump_Zero 0xbe1
0bd1 e02a | * | Load 0x0,0x2a
0bd2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bd3 4807 |H | Short_Literal 0x7
0bd4 4822 |H" | Short_Literal 0x22
0bd5 0092 0cc7 | | Action Push_String_Extended,0xcc7 ; "A decryption error was detected while updating the entry for hostname \x22"
0bd7 e7ff | | Load 0x3,-0x1
0bd8 01cc | | Execute Vector,Catenate
0bd9 01cb | | Execute Vector,Append
0bda e02c | , | Load 0x0,0x2c
0bdb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bdc 4800 |H | Short_Literal 0x0
0bdd a7fb | | Store_Unchecked 0x3,-0x5
0bde 4801 |H | Short_Literal 0x1
0bdf a402 | | Store_Unchecked 0x2,0x2
0be0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0be1 0100 | | Execute Exception,Raise
0be2 0000 0000 | | .BLANK 0000[0x6]
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0bfe | | .CONST 0x0bfe ; Address of begin
0be9 0c48 | H | .CONST 0x0c48 ; Address of exception handler
0bea 0005 | | .CONST 0x0005 ; Number of locals
0beb INIT_0be8:
0beb e032 | 2 | Load 0x0,0x32
0bec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bed 02c7 | | Declare_Variable Any
0bee 00d8 | | Load_Top At_Offset_0
0bef 1c00 | | Execute_Immediate Run_Utility,0x0
0bf0 e027 | ' | Load 0x0,0x27
0bf1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bf2 02c7 | | Declare_Variable Any
0bf3 00d8 | | Load_Top At_Offset_0
0bf4 1c00 | | Execute_Immediate Run_Utility,0x0
0bf5 e407 | | Load 0x2,0x7
0bf6 0322 | " | Declare_Variable Record
0bf7 00d8 | | Load_Top At_Offset_0
0bf8 1c00 | | Execute_Immediate Run_Utility,0x0
0bf9 e02b | + | Load 0x0,0x2b
0bfa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bfb 02c7 | | Declare_Variable Any
0bfc 00d8 | | Load_Top At_Offset_0
0bfd 1c00 | | Execute_Immediate Run_Utility,0x0
0bfe BODY_0be8:
0bfe e5fe | | Load 0x2,-0x2
0bff 823a | : | Call 0x1,0x3a
0c00 c603 | | Store 0x3,0x3
0c01 00d9 | | Load_Top At_Offset_1
0c02 8408 | | Call 0x2,0x8
0c03 00d1 | | Pop_Control Pop_Count_1
0c04 00d8 | | Load_Top At_Offset_0
0c05 0120 | | Execute Any,Is_Value
0c06 6803 |h | Jump_Zero 0xc0a
0c07 e02b | + | Load 0x0,0x2b
0c08 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c09 7801 |x | Jump 0xc0b
0c0a 00d8 | | Load_Top At_Offset_0
0c0b 00da | | Load_Top At_Offset_2
0c0c e603 | | Load 0x3,0x3
0c0d e40a | | Load 0x2,0xa
0c0e 480b |H | Short_Literal 0xb
0c0f 4802 |H | Short_Literal 0x2
0c10 0099 | | Action Reference_Dynamic
0c11 480c |H | Short_Literal 0xc
0c12 4802 |H | Short_Literal 0x2
0c13 0099 | | Action Reference_Dynamic
0c14 e008 | | Load 0x0,0x8
0c15 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c16 00d1 | | Pop_Control Pop_Count_1
0c17 c605 | | Store 0x3,0x5
0c18 00d8 | | Load_Top At_Offset_0
0c19 822d | - | Call 0x1,0x2d
0c1a e402 | | Load 0x2,0x2
0c1b 7021 |p! | Jump_Nonzero 0xc3d
0c1c e039 | 9 | Load 0x0,0x39
0c1d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c1e e032 | 2 | Load 0x0,0x32
0c1f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0c20 c602 | | Store 0x3,0x2
0c21 00d8 | | Load_Top At_Offset_0
0c22 0120 | | Execute Any,Is_Value
0c23 6803 |h | Jump_Zero 0xc27
0c24 e02b | + | Load 0x0,0x2b
0c25 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c26 7801 |x | Jump 0xc28
0c27 00d8 | | Load_Top At_Offset_0
0c28 e602 | | Load 0x3,0x2
0c29 e603 | | Load 0x3,0x3
0c2a e604 | | Load 0x3,0x4
0c2b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c2c e405 | | Load 0x2,0x5
0c2d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c2e 823e | > | Call 0x1,0x3e
0c2f c605 | | Store 0x3,0x5
0c30 00db | | Load_Top At_Offset_3
0c31 4801 |H | Short_Literal 0x1
0c32 4801 |H | Short_Literal 0x1
0c33 00db | | Load_Top At_Offset_3
0c34 e02b | + | Load 0x0,0x2b
0c35 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c36 0f00 | | Execute_Immediate Equal,0x0
0c37 e032 | 2 | Load 0x0,0x32
0c38 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c39 c602 | | Store 0x3,0x2
0c3a 00d8 | | Load_Top At_Offset_0
0c3b 822d | - | Call 0x1,0x2d
0c3c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c3d e02a | * | Load 0x0,0x2a
0c3e 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c3f 4805 |H | Short_Literal 0x5
0c40 e027 | ' | Load 0x0,0x27
0c41 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c42 0092 0cc8 | | Action Push_String_Extended,0xcc8 ; "Old password is invalid, <1> was not updated"
0c44 e603 | | Load 0x3,0x3
0c45 e02c | , | Load 0x0,0x2c
0c46 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0c47 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c48 TRAP_0be8:
0c48 e02e | . | Load 0x0,0x2e
0c49 010f | | Execute Exception,Equal
0c4a 6803 |h | Jump_Zero 0xc4e
0c4b 4801 |H | Short_Literal 0x1
0c4c a402 | | Store_Unchecked 0x2,0x2
0c4d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c4e 0100 | | Execute Exception,Raise
0c4f 0000 | | .XXX[0x1]
0c50 ; --------------------------------------------------------------------------------------
0c50 ; SUBPROGRAM
0c50 ; --------------------------------------------------------------------------------------
0c50 0c53 | S | .CONST 0x0c53 ; Address of begin
0c51 0c57 | W | .CONST 0x0c57 ; Address of exception handler
0c52 0001 | | .CONST 0x0001 ; Number of locals
0c53 BODY_0c50:
0c53 INIT_0c50:
0c53 e5ff | | Load 0x2,-0x1
0c54 823a | : | Call 0x1,0x3a
0c55 c404 | | Store 0x2,0x4
0c56 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c57 TRAP_0c50:
0c57 e02e | . | Load 0x0,0x2e
0c58 010f | | Execute Exception,Equal
0c59 6803 |h | Jump_Zero 0xc5d
0c5a 4801 |H | Short_Literal 0x1
0c5b a402 | | Store_Unchecked 0x2,0x2
0c5c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c5d 0100 | | Execute Exception,Raise
0c5e 0000 0000 | | .XXX[0x2]
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63 | c | .CONST 0x0c63 ; Address of begin
0c61 0004 | | .CONST 0x0004 ; Address of exception handler
0c62 0001 | | .CONST 0x0001 ; Number of locals
0c63 BODY_0c60:
0c63 INIT_0c60:
0c63 e02a | * | Load 0x0,0x2a
0c64 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c65 4800 |H | Short_Literal 0x0
0c66 485d |H] | Short_Literal 0x5d
0c67 485b |H[ | Short_Literal 0x5b
0c68 e402 | | Load 0x2,0x2
0c69 01ca | | Execute Vector,Prepend
0c6a e7ff | | Load 0x3,-0x1
0c6b 01cc | | Execute Vector,Catenate
0c6c 01cb | | Execute Vector,Append
0c6d e02c | , | Load 0x0,0x2c
0c6e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c6f e403 | | Load 0x2,0x3
0c70 e02a | * | Load 0x0,0x2a
0c71 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c72 00db | | Load_Top At_Offset_3
0c73 6803 |h | Jump_Zero 0xc77
0c74 e02a | * | Load 0x0,0x2a
0c75 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0c76 0257 | W | Execute Discrete,Raise
0c77 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c78 ; --------------------------------------------------------------------------------------
0c78 ; STRING TABLE
0c78 ; --------------------------------------------------------------------------------------
0c78 00a4 | | .STRTAB 0x00a4->0x0cca ; "NONE"
0c79 00a6 | | .STRTAB 0x00a6->0x0ccc ; "HEX"
0c7a 00a7 | | .STRTAB 0x00a7->0x0ccd ; "DES"
0c7b 00a8 | | .STRTAB 0x00a8->0x0ccf ; "Remote_Passwords"
0c7c 00b6 | | .STRTAB 0x00b6->0x0cd7 ; "OTHERS"
0c7d 00ba | | .STRTAB 0x00ba->0x0cda ; "Profile.Remote_Passwords"
0c7e 00d0 | | .STRTAB 0x00d0->0x0ce6 ; "source password"
0c7f 00dd | | .STRTAB 0x00dd->0x0ced ; "Create"
0c80 00e1 | | .STRTAB 0x00e1->0x0cf0 ; "New_File => \x22"
0c81 00ec | | .STRTAB 0x00ec->0x0cf7 ; "\x22, Source_File => \x22"
0c82 00fd | | .STRTAB 0x00fd->0x0d00 ; "\x22, Encryption => "
0c83 010c | | .STRTAB 0x010c->0x0d09 ; ", Response => \x22"
0c84 0119 | | .STRTAB 0x0119->0x0d10 ; "Set_Default"
0c85 0122 | " | .STRTAB 0x0122->0x0d16 ; "Existing_File => \x22"
0c86 0132 | 2 | .STRTAB 0x0132->0x0d1f ; "\x22, For_Session => \x22"
0c87 0143 | C | .STRTAB 0x0143->0x0d28 ; "\x22, Response => \x22"
0c88 0151 | Q | .STRTAB 0x0151->0x0d30 ; "Add"
0c89 0152 | R | .STRTAB 0x0152->0x0d32 ; "New_Hostname => \x22"
0c8a 0161 | a | .STRTAB 0x0161->0x0d3a ; "Change"
0c8b 0165 | e | .STRTAB 0x0165->0x0d3d ; "Existing_Hostname => \x22"
0c8c 0179 | y | .STRTAB 0x0179->0x0d48 ; "Delete"
0c8d 017d | } | .STRTAB 0x017d->0x0d4b ; "password"
0c8e 0183 | | .STRTAB 0x0183->0x0d4f ; "old password"
0c8f 018d | | .STRTAB 0x018d->0x0d55 ; "Update"
0c90 0191 | | .STRTAB 0x0191->0x0d58 ; "For_Session => \x22"
0c91 019f | | .STRTAB 0x019f->0x0d60 ; "Get_Default"
0c92 01a8 | | .STRTAB 0x01a8->0x0d66 ; "Remote_Passwords."
0c93 01b7 | | .STRTAB 0x01b7->0x0d6e ; " ("
0c94 01b7 | | .STRTAB 0x01b7->0x0d6f ; ");]"
0c95 01b8 | | .STRTAB 0x01b8->0x0d71 ; " has completed with warnings"
0c96 01d2 | | .STRTAB 0x01d2->0x0d7f ; " has completed"
0c97 01de | | .STRTAB 0x01de->0x0d86 ; " has terminated with errors"
0c98 01f7 | | .STRTAB 0x01f7->0x0d93 ; "Unexpected "
0c99 0200 | | .STRTAB 0x0200->0x0d99 ; " has terminated with an internal error"
0c9a 0224 | $ | .STRTAB 0x0224->0x0dac ; "<NIL>"
0c9b 0227 | ' | .STRTAB 0x0227->0x0dae ; "<>"
0c9c 0227 | ' | .STRTAB 0x0227->0x0daf ; "Unable to resolve remote passwords object \x22"
0c9d 0250 | P | .STRTAB 0x0250->0x0dc5 ; "\x22 because "
0c9e 0258 | X | .STRTAB 0x0258->0x0dca ; "Unable to resolve "
0c9f 0268 | h | .STRTAB 0x0268->0x0dd3 ; "object"
0ca0 026c | l | .STRTAB 0x026c->0x0dd6 ; " \x22"
0ca1 026c | l | .STRTAB 0x026c->0x0dd7 ; "_SWITCHES"
0ca2 0273 | s | .STRTAB 0x0273->0x0ddb ; "Created session switch file <1>"
0ca3 0290 | | .STRTAB 0x0290->0x0deb ; "Unable to open session switch file for <1> ("
0ca4 02ba | | .STRTAB 0x02ba->0x0e01 ; "Session switch file for <1> does not exist because "
0ca5 02eb | | .STRTAB 0x02eb->0x0e1a ; "specified session"
0ca6 02fa | | .STRTAB 0x02fa->0x0e23 ; "<1> is not an object of class Session; you must specify a naming expression like "
0ca7 0349 | I | .STRTAB 0x0349->0x0e4b ; ".S_1"
0ca8 034b | K | .STRTAB 0x034b->0x0e4d ; "SYNCHRONIZED"
0ca9 0355 | U | .STRTAB 0x0355->0x0e53 ; "Writing remote passwords to "
0caa 036f | o | .STRTAB 0x036f->0x0e61 ; "Remote_Passwords object does not exist; check your Profile.Remote_Passwords session switch"
0cab 03c7 | | .STRTAB 0x03c7->0x0e8e ; "NONEXISTENT_OBJECT"
0cac 03d7 | | .STRTAB 0x03d7->0x0e97 ; "Insufficient privilege to access "
0cad 03f6 | | .STRTAB 0x03f6->0x0ea8 ; "; check the ACLs on your Remote_Passwords file"
0cae 0422 | " | .STRTAB 0x0422->0x0ebf ; "ACCESS_ERROR"
0caf 042c | , | .STRTAB 0x042c->0x0ec5 ; "Remote_Passwords file "
0cb0 0440 | @ | .STRTAB 0x0440->0x0ed0 ; " is not checked out; use Cmvc.Check_Out"
0cb1 0465 | e | .STRTAB 0x0465->0x0ee3 ; " before attempting this operation again"
0cb2 048a | | .STRTAB 0x048a->0x0ef7 ; "POLICY_ERROR"
0cb3 0494 | | .STRTAB 0x0494->0x0efd ; " is frozen; use Library.Unfreeze before attempting"
0cb4 04c4 | | .STRTAB 0x04c4->0x0f16 ; " this operation again"
0cb5 04d7 | | .STRTAB 0x04d7->0x0f20 ; " is locked; use What.Locks to determine who is"
0cb6 0503 | | .STRTAB 0x0503->0x0f37 ; " holding the locks on this object"
0cb7 0522 | " | .STRTAB 0x0522->0x0f48 ; "LOCK_ERROR"
0cb8 052a | * | .STRTAB 0x052a->0x0f4d ; "UNHANDLED_EXCEPTION"
0cb9 053b | ; | .STRTAB 0x053b->0x0f56 ; "Unable to read source entry for hostname \x22"
0cba 0563 | c | .STRTAB 0x0563->0x0f6b ; "\x22 because Source_Password is invalid for this entry."
0cbb 0595 | | .STRTAB 0x0595->0x0f85 ; " This entry will not appear in the new file \x22"
0cbc 05c1 | | .STRTAB 0x05c1->0x0f9c ; "specified source"
0cbd 05cf | | .STRTAB 0x05cf->0x0fa4 ; "Reading remote password entries from <1>"
0cbe 05f5 | | .STRTAB 0x05f5->0x0fb8 ; "<1> has been established as the default remote passwords file for session <2>"
0cbf 0640 | @ | .STRTAB 0x0640->0x0fdf ; "Hostname \x22"
0cc0 0648 | H | .STRTAB 0x0648->0x0fe4 ; "\x22 already appears in <1>, use Change"
0cc1 066a | j | .STRTAB 0x066a->0x0ff6 ; " if you want to modify the existing value"
0cc2 0691 | | .STRTAB 0x0691->0x100a ; "new password"
0cc3 069b | | .STRTAB 0x069b->0x1010 ; "\x22 has been successfully added to <1>"
0cc4 06bd | | .STRTAB 0x06bd->0x1022 ; "\x22 does not appear in <1>"
0cc5 06d3 | | .STRTAB 0x06d3->0x102e ; "<1> has been successfully modified for hostname \x22"
0cc6 0702 | | .STRTAB 0x0702->0x1047 ; "\x22 has been deleted from <1>"
0cc7 071b | | .STRTAB 0x071b->0x1054 ; "A decryption error was detected while updating the entry for hostname \x22"
0cc8 0760 | ` | .STRTAB 0x0760->0x1078 ; "Old password is invalid, <1> was not updated"
0cc9 078a | | .STREND 0x078a->0x108e
0cca 4e4f 4e45 |NONE| .STRTAB_STRINGS
108e 0000 0000 | | .XXX[0x2]
1090 ; --------------------------------------------------------------------------------------
1090 ; Debug Table
1090 ; --------------------------------------------------------------------------------------
1090 0004 000e | | .DEBUG4 0x0004,0x000e,0xf48b,0x0000,0x0001,0x0000
1096 0000 0000 | | .BLANK 0000[0x16a]