|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe
└─⟦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 0448 | H | .CONST 0x0448 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005e | ^ | .CONST 0x005e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 029a 0063 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0060
000d 029a 0073 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0070
000f 029a 007b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0078
0011 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
0013 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8
0015 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0
0017 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130
0019 029a 013b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0138
001b 029a 0143 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0140
001d 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
001f 00bf | | Action Accept_Activation
0020 00e3 | | Load_Encached Natural_Cache
0021 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0022 e002 | | Load 0x0,0x2
0023 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0024 0322 | " | Declare_Variable Record
0025 4828 |H( | Short_Literal 0x28
0026 e003 | | Load 0x0,0x3
0027 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0028 1c08 | | Execute_Immediate Run_Utility,0x8
0029 00d8 | | Load_Top At_Offset_0
002a 1c00 | | Execute_Immediate Run_Utility,0x0
002b e002 | | Load 0x0,0x2
002c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
002d 0322 | " | Declare_Variable Record
002e 4814 |H | Short_Literal 0x14
002f e003 | | Load 0x0,0x3
0030 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0031 1c08 | | Execute_Immediate Run_Utility,0x8
0032 00d8 | | Load_Top At_Offset_0
0033 1c00 | | Execute_Immediate Run_Utility,0x0
0034 00e1 | | Load_Encached Boolean_Cache
0035 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0036 00e1 | | Load_Encached Boolean_Cache
0037 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0038 029b 015b | [| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0158
003a e004 | | Load 0x0,0x4
003b e005 | | Load 0x0,0x5
003c 4861 |Ha | Short_Literal 0x61
003d 00e4 | | Load_Encached Positive_Cache
003e e006 | | Load 0x0,0x6
003f 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0040 e007 | | Load 0x0,0x7
0041 0387 | | Declare_Variable Package
0042 00d8 | | Load_Top At_Offset_0
0043 020f | | Execute Module,Activate
0044 00d8 | | Load_Top At_Offset_0
0045 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0046 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0047 00c7 | | Action Elaborate_Subprogram
0048 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0049 00c7 | | Action Elaborate_Subprogram
004a 1d0f | | Execute_Immediate Reference_Lex_1,0xf
004b 00c7 | | Action Elaborate_Subprogram
004c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
004d 00c7 | | Action Elaborate_Subprogram
004e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
004f 00c7 | | Action Elaborate_Subprogram
0050 029d 0163 | c| Declare_Subprogram For_Outer_Call,INIT_0160
0052 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0053 00c7 | | Action Elaborate_Subprogram
0054 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0055 00c7 | | Action Elaborate_Subprogram
0056 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0057 00c7 | | Action Elaborate_Subprogram
0058 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0059 00c7 | | Action Elaborate_Subprogram
005a 1d16 | | Execute_Immediate Reference_Lex_1,0x16
005b 00c7 | | Action Elaborate_Subprogram
005c 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
005d 00c7 | | Action Elaborate_Subprogram
005e BODY_0008:
005e 00bc | | Action Signal_Activated
005f 00bb | | Action Signal_Completion
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 4801 |H | Short_Literal 0x1
0064 a217 | | Store_Unchecked 0x1,0x17
0065 e21f | | Load 0x1,0x1f
0066 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0067 4861 |Ha | Short_Literal 0x61
0068 e21f | | Load 0x1,0x1f
0069 181a | | Execute Package,Field_Execute,Field_Number 0x1a
006a c220 | | Store 0x1,0x20
006b 4800 |H | Short_Literal 0x0
006c a21c | | Store_Unchecked 0x1,0x1c
006d 4800 |H | Short_Literal 0x0
006e a21d | | Store_Unchecked 0x1,0x1d
006f 4501 |E | Exit_Subprogram 0x1
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 820d | | Call 0x1,0xd
0074 4501 |E | Exit_Subprogram 0x1
0075 0000 0000 | | .XXX[0x3]
0077 0000 | |
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 4801 |H | Short_Literal 0x1
007c a21c | | Store_Unchecked 0x1,0x1c
007d e5ff | | Load 0x2,-0x1
007e e218 | | Load 0x1,0x18
007f 017d | } | Execute Record,Structure_Write
0080 4800 |H | Short_Literal 0x0
0081 a21d | | Store_Unchecked 0x1,0x1d
0082 4502 |E | Exit_Subprogram 0x2
0083 0000 0000 | | .BLANK 0000[0x5]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b e21c | | Load 0x1,0x1c
008c 6812 |h | Jump_Zero 0x9f
008d e21d | | Load 0x1,0x1d
008e 7010 |p | Jump_Nonzero 0x9f
008f e5ff | | Load 0x2,-0x1
0090 e21a | | Load 0x1,0x1a
0091 017d | } | Execute Record,Structure_Write
0092 e219 | | Load 0x1,0x19
0093 e5fe | | Load 0x2,-0x2
0094 e003 | | Load 0x0,0x3
0095 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0096 00d1 | | Pop_Control Pop_Count_1
0097 e21b | | Load 0x1,0x1b
0098 e5fd | | Load 0x2,-0x3
0099 e003 | | Load 0x0,0x3
009a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
009b 00d1 | | Pop_Control Pop_Count_1
009c 4801 |H | Short_Literal 0x1
009d a21d | | Store_Unchecked 0x1,0x1d
009e 4504 |E | Exit_Subprogram 0x4
009f 4800 |H | Short_Literal 0x0
00a0 a21c | | Store_Unchecked 0x1,0x1c
00a1 4800 |H | Short_Literal 0x0
00a2 a21d | | Store_Unchecked 0x1,0x1d
00a3 4504 |E | Exit_Subprogram 0x4
00a4 0000 0000 | | .BLANK 0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab e21d | | Load 0x1,0x1d
00ac 6828 |h( | Jump_Zero 0xd5
00ad e21c | | Load 0x1,0x1c
00ae 6826 |h& | Jump_Zero 0xd5
00af e220 | | Load 0x1,0x20
00b0 4800 |H | Short_Literal 0x0
00b1 e006 | | Load 0x0,0x6
00b2 0322 | " | Declare_Variable Record
00b3 00d8 | | Load_Top At_Offset_0
00b4 1c01 | | Execute_Immediate Run_Utility,0x1
00b5 e218 | | Load 0x1,0x18
00b6 e404 | | Load 0x2,0x4
00b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00b8 e219 | | Load 0x1,0x19
00b9 e404 | | Load 0x2,0x4
00ba 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00bb e21a | | Load 0x1,0x1a
00bc e404 | | Load 0x2,0x4
00bd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00be e5ff | | Load 0x2,-0x1
00bf e404 | | Load 0x2,0x4
00c0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00c1 e21b | | Load 0x1,0x1b
00c2 e404 | | Load 0x2,0x4
00c3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
00c4 e217 | | Load 0x1,0x17
00c5 00d8 | | Load_Top At_Offset_0
00c6 00e4 | | Load_Encached Positive_Cache
00c7 0260 | ` | Execute Discrete,In_Type
00c8 7001 |p | Jump_Nonzero 0xca
00c9 0801 | | Execute_Immediate Raise,0x1
00ca e21f | | Load 0x1,0x1f
00cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00cc c220 | | Store 0x1,0x20
00cd e217 | | Load 0x1,0x17
00ce 0a01 | | Execute_Immediate Plus,0x1
00cf c217 | | Store 0x1,0x17
00d0 4800 |H | Short_Literal 0x0
00d1 a21d | | Store_Unchecked 0x1,0x1d
00d2 4800 |H | Short_Literal 0x0
00d3 a21c | | Store_Unchecked 0x1,0x1c
00d4 4503 |E | Exit_Subprogram 0x3
00d5 4800 |H | Short_Literal 0x0
00d6 a21d | | Store_Unchecked 0x1,0x1d
00d7 4800 |H | Short_Literal 0x0
00d8 a21c | | Store_Unchecked 0x1,0x1c
00d9 4503 |E | Exit_Subprogram 0x3
00da 0000 0000 | | .BLANK 0000[0x6]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00f1 | | .CONST 0x00f1 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0004 | | .CONST 0x0004 ; Number of locals
00e3 INIT_00e0:
00e3 e008 | | Load 0x0,0x8
00e4 e009 | | Load 0x0,0x9
00e5 4804 |H | Short_Literal 0x4
00e6 0092 02b2 | | Action Push_String_Extended,0x2b2 ; " "
00e8 e00a | | Load 0x0,0xa
00e9 0387 | | Declare_Variable Package
00ea 00d8 | | Load_Top At_Offset_0
00eb 020f | | Execute Module,Activate
00ec e006 | | Load 0x0,0x6
00ed 0322 | " | Declare_Variable Record
00ee 00d8 | | Load_Top At_Offset_0
00ef 1c00 | | Execute_Immediate Run_Utility,0x0
00f0 00e2 | | Load_Encached Integer_Cache
00f1 BODY_00e0:
00f1 4801 |H | Short_Literal 0x1
00f2 e00b | | Load 0x0,0xb
00f3 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00f4 0092 02b3 | | Action Push_String_Extended,0x2b3 ; "List of mount requests for backup tapes. Includes the time"
00f6 e00b | | Load 0x0,0xb
00f7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00f8 0092 02b4 | | Action Push_String_Extended,0x2b4 ; "of the request, the elapsed time taken to mount the tape (HH:MM),"
00fa e00b | | Load 0x0,0xb
00fb 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00fc 0092 02b5 | | Action Push_String_Extended,0x2b5 ; "the elapsed time taken processing the tape (not including"
00fe e00b | | Load 0x0,0xb
00ff 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0100 0092 02b6 | | Action Push_String_Extended,0x2b6 ; "rewinding), the volume id of the tape, the tape density,"
0102 e00b | | Load 0x0,0xb
0103 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0104 0092 02b7 | | Action Push_String_Extended,0x2b7 ; "(though depending on the tape drive, this may not be"
0106 e00b | | Load 0x0,0xb
0107 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0108 0092 02b8 | | Action Push_String_Extended,0x2b8 ; "accurate), and any errors that occurred writing the tape."
010a e00b | | Load 0x0,0xb
010b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
010c 0092 02b9 | | Action Push_String_Extended,0x2b9 ; "Under Errors are up to 3 different types of error data. A"
010e e00b | | Load 0x0,0xb
010f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0110 0092 02ba | | Action Push_String_Extended,0x2ba ; "single number is the total number of errors. A triple number"
0112 e00b | | Load 0x0,0xb
0113 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0114 0092 02bb | | Action Push_String_Extended,0x2bb ; "is the number of consecutive write data retries failing, total"
0116 e00b | | Load 0x0,0xb
0117 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0118 0092 02bc | | Action Push_String_Extended,0x2bc ; "number of write data retries failing and total number of"
011a e00b | | Load 0x0,0xb
011b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
011c 0092 02bd | | Action Push_String_Extended,0x2bd ; "errors."
011e e00b | | Load 0x0,0xb
011f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0120 4801 |H | Short_Literal 0x1
0121 e00b | | Load 0x0,0xb
0122 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0123 0092 02be | | Action Push_String_Extended,0x2be ; "Please NOTE: a backup will abort when the number of consecutive"
0125 e00b | | Load 0x0,0xb
0126 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0127 0092 02bf | | Action Push_String_Extended,0x2bf ; "write data retry errors equal 12."
0129 e00b | | Load 0x0,0xb
012a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
012b 4803 |H | Short_Literal 0x3
012c e00b | | Load 0x0,0xb
012d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
012e 8221 | ! | Call 0x1,0x21
012f 4501 |E | Exit_Subprogram 0x1
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133 | 3 | .CONST 0x0133 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0001 | | .CONST 0x0001 ; Number of locals
0133 BODY_0130:
0133 INIT_0130:
0133 4801 |H | Short_Literal 0x1
0134 a5ff | | Store_Unchecked 0x2,-0x1
0135 4501 |E | Exit_Subprogram 0x1
0136 0000 0000 | | .XXX[0x2]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b e5ff | | Load 0x2,-0x1
013c 0a01 | | Execute_Immediate Plus,0x1
013d c5ff | | Store 0x2,-0x1
013e 4501 |E | Exit_Subprogram 0x1
013f 0000 | | .XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 e5ff | | Load 0x2,-0x1
0144 e217 | | Load 0x1,0x17
0145 027b | { | Execute Discrete,Greater_Equal
0146 4401 |D | Exit_Subprogram With_Result,0x1
0147 0000 | | .XXX[0x1]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b e5ff | | Load 0x2,-0x1
014c 00d8 | | Load_Top At_Offset_0
014d 00e4 | | Load_Encached Positive_Cache
014e 0260 | ` | Execute Discrete,In_Type
014f 7001 |p | Jump_Nonzero 0x151
0150 0801 | | Execute_Immediate Raise,0x1
0151 e220 | | Load 0x1,0x20
0152 e21f | | Load 0x1,0x1f
0153 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0154 4401 |D | Exit_Subprogram With_Result,0x1
0155 0000 0000 | | .XXX[0x3]
0157 0000 | |
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b e5ff | | Load 0x2,-0x1
015c 4401 |D | Exit_Subprogram With_Result,0x1
015d 0000 0000 | | .XXX[0x3]
015f 0000 | |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0188 | | .CONST 0x0188 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0011 | | .CONST 0x0011 ; Number of locals
0163 INIT_0160:
0163 e00c | | Load 0x0,0xc
0164 e00d | | Load 0x0,0xd
0165 4806 |H | Short_Literal 0x6
0166 0092 02c0 | | Action Push_String_Extended,0x2c0 ; " / "
0168 e00a | | Load 0x0,0xa
0169 0387 | | Declare_Variable Package
016a 00d8 | | Load_Top At_Offset_0
016b 020f | | Execute Module,Activate
016c e00e | | Load 0x0,0xe
016d 0322 | " | Declare_Variable Record
016e e00f | | Load 0x0,0xf
016f 0007 | | Action Break_Optional
0170 00e1 | | Load_Encached Boolean_Cache
0171 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0172 e006 | | Load 0x0,0x6
0173 0322 | " | Declare_Variable Record
0174 00d8 | | Load_Top At_Offset_0
0175 1c00 | | Execute_Immediate Run_Utility,0x0
0176 e010 | | Load 0x0,0x10
0177 0007 | | Action Break_Optional
0178 00e3 | | Load_Encached Natural_Cache
0179 00e3 | | Load_Encached Natural_Cache
017a 00e3 | | Load_Encached Natural_Cache
017b 00e3 | | Load_Encached Natural_Cache
017c 029f 024b | K| Declare_Subprogram For_Call,INIT_0248
017e 029f 025b | [| Declare_Subprogram For_Call,INIT_0258
0180 029f 026b | k| Declare_Subprogram For_Call,INIT_0268
0182 029f 0273 | s| Declare_Subprogram For_Call,INIT_0270
0184 029f 0283 | | Declare_Subprogram For_Call,INIT_0280
0186 029f 0293 | | Declare_Subprogram For_Call,INIT_0290
0188 BODY_0160:
0188 e00f | | Load 0x0,0xf
0189 8011 | | Call 0x0,0x11
018a c404 | | Store 0x2,0x4
018b e010 | | Load 0x0,0x10
018c 8012 | | Call 0x0,0x12
018d c407 | | Store 0x2,0x7
018e 00cf | | Action Mark_Auxiliary
018f 78a2 |x | Jump 0x232
0190 e407 | | Load 0x2,0x7
0191 8013 | | Call 0x0,0x13
0192 e406 | | Load 0x2,0x6
0193 017d | } | Execute Record,Structure_Write
0194 4800 |H | Short_Literal 0x0
0195 a408 | | Store_Unchecked 0x2,0x8
0196 4800 |H | Short_Literal 0x0
0197 a409 | | Store_Unchecked 0x2,0x9
0198 4800 |H | Short_Literal 0x0
0199 a40a | | Store_Unchecked 0x2,0xa
019a 4800 |H | Short_Literal 0x0
019b a40b | | Store_Unchecked 0x2,0xb
019c 00cf | | Action Mark_Auxiliary
019d 782f |x/ | Jump 0x1cd
019e e404 | | Load 0x2,0x4
019f 8014 | | Call 0x0,0x14
01a0 e403 | | Load 0x2,0x3
01a1 017d | } | Execute Record,Structure_Write
01a2 e406 | | Load 0x2,0x6
01a3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
01a4 e403 | | Load 0x2,0x3
01a5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01a6 840c | | Call 0x2,0xc
01a7 7028 |p( | Jump_Nonzero 0x1d0
01a8 e403 | | Load 0x2,0x3
01a9 840e | | Call 0x2,0xe
01aa e406 | | Load 0x2,0x6
01ab 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01ac e403 | | Load 0x2,0x3
01ad 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01ae 840c | | Call 0x2,0xc
01af 0279 | y | Execute Discrete,And
01b0 6818 |h | Jump_Zero 0x1c9
01b1 e403 | | Load 0x2,0x3
01b2 840f | | Call 0x2,0xf
01b3 6815 |h | Jump_Zero 0x1c9
01b4 e408 | | Load 0x2,0x8
01b5 0a01 | | Execute_Immediate Plus,0x1
01b6 c408 | | Store 0x2,0x8
01b7 e403 | | Load 0x2,0x3
01b8 8410 | | Call 0x2,0x10
01b9 6807 |h | Jump_Zero 0x1c1
01ba e409 | | Load 0x2,0x9
01bb 0a01 | | Execute_Immediate Plus,0x1
01bc c409 | | Store 0x2,0x9
01bd e40b | | Load 0x2,0xb
01be 0a01 | | Execute_Immediate Plus,0x1
01bf c40b | | Store 0x2,0xb
01c0 7808 |x | Jump 0x1c9
01c1 e409 | | Load 0x2,0x9
01c2 e40a | | Load 0x2,0xa
01c3 027d | } | Execute Discrete,Greater
01c4 6802 |h | Jump_Zero 0x1c7
01c5 e409 | | Load 0x2,0x9
01c6 a40a | | Store_Unchecked 0x2,0xa
01c7 4800 |H | Short_Literal 0x0
01c8 a409 | | Store_Unchecked 0x2,0x9
01c9 e404 | | Load 0x2,0x4
01ca 8015 | | Call 0x0,0x15
01cb c404 | | Store 0x2,0x4
01cc 00c9 | | Action Pop_Auxiliary_Loop
01cd e404 | | Load 0x2,0x4
01ce 8016 | | Call 0x0,0x16
01cf 6fce |o | Jump_Zero 0x19e
01d0 00ce | | Action Pop_Auxiliary
01d1 e409 | | Load 0x2,0x9
01d2 e40a | | Load 0x2,0xa
01d3 027d | } | Execute Discrete,Greater
01d4 6802 |h | Jump_Zero 0x1d7
01d5 e409 | | Load 0x2,0x9
01d6 a40a | | Store_Unchecked 0x2,0xa
01d7 e405 | | Load 0x2,0x5
01d8 7003 |p | Jump_Nonzero 0x1dc
01d9 8411 | | Call 0x2,0x11
01da 4801 |H | Short_Literal 0x1
01db a405 | | Store_Unchecked 0x2,0x5
01dc 4800 |H | Short_Literal 0x0
01dd 4802 |H | Short_Literal 0x2
01de 4803 |H | Short_Literal 0x3
01df e406 | | Load 0x2,0x6
01e0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01e1 e002 | | Load 0x0,0x2
01e2 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01e3 e402 | | Load 0x2,0x2
01e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e5 e406 | | Load 0x2,0x6
01e6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01e7 e406 | | Load 0x2,0x6
01e8 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
01e9 840d | | Call 0x2,0xd
01ea 8017 | | Call 0x0,0x17
01eb e402 | | Load 0x2,0x2
01ec 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ed e406 | | Load 0x2,0x6
01ee 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
01ef e406 | | Load 0x2,0x6
01f0 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
01f1 840d | | Call 0x2,0xd
01f2 8017 | | Call 0x0,0x17
01f3 e402 | | Load 0x2,0x2
01f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f5 e406 | | Load 0x2,0x6
01f6 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
01f7 e003 | | Load 0x0,0x3
01f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f9 e402 | | Load 0x2,0x2
01fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01fb e406 | | Load 0x2,0x6
01fc 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
01fd e003 | | Load 0x0,0x3
01fe 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01ff e402 | | Load 0x2,0x2
0200 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0201 e408 | | Load 0x2,0x8
0202 0c01 | | Execute_Immediate Greater_Equal,0x1
0203 6827 |h' | Jump_Zero 0x22b
0204 e40b | | Load 0x2,0xb
0205 0c01 | | Execute_Immediate Greater_Equal,0x1
0206 681b |h | Jump_Zero 0x222
0207 4820 |H | Short_Literal 0x20
0208 4800 |H | Short_Literal 0x0
0209 480a |H | Short_Literal 0xa
020a e40a | | Load 0x2,0xa
020b e018 | | Load 0x0,0x18
020c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
020d e402 | | Load 0x2,0x2
020e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
020f 4820 |H | Short_Literal 0x20
0210 4800 |H | Short_Literal 0x0
0211 480a |H | Short_Literal 0xa
0212 e40b | | Load 0x2,0xb
0213 e018 | | Load 0x0,0x18
0214 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0215 e402 | | Load 0x2,0x2
0216 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0217 4820 |H | Short_Literal 0x20
0218 4800 |H | Short_Literal 0x0
0219 480a |H | Short_Literal 0xa
021a e408 | | Load 0x2,0x8
021b e018 | | Load 0x0,0x18
021c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
021d e402 | | Load 0x2,0x2
021e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
021f e402 | | Load 0x2,0x2
0220 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0221 780c |x | Jump 0x22e
0222 4820 |H | Short_Literal 0x20
0223 4800 |H | Short_Literal 0x0
0224 480a |H | Short_Literal 0xa
0225 e408 | | Load 0x2,0x8
0226 e018 | | Load 0x0,0x18
0227 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0228 e402 | | Load 0x2,0x2
0229 1813 | | Execute Package,Field_Execute,Field_Number 0x13
022a 7803 |x | Jump 0x22e
022b 00ea | | Load_Encached Null_String_Cache
022c e402 | | Load 0x2,0x2
022d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
022e e407 | | Load 0x2,0x7
022f 8019 | | Call 0x0,0x19
0230 c407 | | Store 0x2,0x7
0231 00c9 | | Action Pop_Auxiliary_Loop
0232 e407 | | Load 0x2,0x7
0233 801a | | Call 0x0,0x1a
0234 6f5b |o[ | Jump_Zero 0x190
0235 00ce | | Action Pop_Auxiliary
0236 e405 | | Load 0x2,0x5
0237 680a |h | Jump_Zero 0x242
0238 4801 |H | Short_Literal 0x1
0239 e00b | | Load 0x0,0xb
023a 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
023b e00b | | Load 0x0,0xb
023c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
023d e402 | | Load 0x2,0x2
023e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
023f 4801 |H | Short_Literal 0x1
0240 e00b | | Load 0x0,0xb
0241 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0242 0092 02c1 | | Action Push_String_Extended,0x2c1 ; "\x0c"
0244 e00b | | Load 0x0,0xb
0245 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0246 4501 |E | Exit_Subprogram 0x1
0247 0000 | | .XXX[0x1]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b e7fe | | Load 0x3,-0x2
024c e002 | | Load 0x0,0x2
024d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
024e e7ff | | Load 0x3,-0x1
024f e002 | | Load 0x0,0x2
0250 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0251 e01b | | Load 0x0,0x1b
0252 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0253 4402 |D | Exit_Subprogram With_Result,0x2
0254 0000 0000 | | .BLANK 0000[0x4]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b e7fe | | Load 0x3,-0x2
025c e002 | | Load 0x0,0x2
025d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
025e e7ff | | Load 0x3,-0x1
025f e002 | | Load 0x0,0x2
0260 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0261 e01b | | Load 0x0,0x1b
0262 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0263 4402 |D | Exit_Subprogram With_Result,0x2
0264 0000 0000 | | .BLANK 0000[0x4]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b e7ff | | Load 0x3,-0x1
026c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
026d 0f01 | | Execute_Immediate Equal,0x1
026e 4401 |D | Exit_Subprogram With_Result,0x1
026f 0000 | | .XXX[0x1]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 4800 |H | Short_Literal 0x0
0274 e7ff | | Load 0x3,-0x1
0275 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0276 0217 | | Execute Heap_Access,All_Reference
0277 0092 02c2 | | Action Push_String_Extended,0x2c2 ; "ERROR"
0279 e018 | | Load 0x0,0x18
027a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
027b 0e00 | | Execute_Immediate Not_Equal,0x0
027c 4401 |D | Exit_Subprogram With_Result,0x1
027d 0000 0000 | | .XXX[0x3]
027f 0000 | |
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 4800 |H | Short_Literal 0x0
0284 e7ff | | Load 0x3,-0x1
0285 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0286 0217 | | Execute Heap_Access,All_Reference
0287 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "WRITE_DATA_RETRY"
0289 e018 | | Load 0x0,0x18
028a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
028b 0e00 | | Execute_Immediate Not_Equal,0x0
028c 4401 |D | Exit_Subprogram With_Result,0x1
028d 0000 0000 | | .XXX[0x3]
028f 0000 | |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 4801 |H | Short_Literal 0x1
0294 0092 02c4 | | Action Push_String_Extended,0x2c4 ; "Request Time"
0296 e402 | | Load 0x2,0x2
0297 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0298 4801 |H | Short_Literal 0x1
0299 0092 02c5 | | Action Push_String_Extended,0x2c5 ; "Mount Wait"
029b e402 | | Load 0x2,0x2
029c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
029d 4801 |H | Short_Literal 0x1
029e 0092 02c6 | | Action Push_String_Extended,0x2c6 ; "Processing"
02a0 e402 | | Load 0x2,0x2
02a1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02a2 4800 |H | Short_Literal 0x0
02a3 0092 02c7 | | Action Push_String_Extended,0x2c7 ; "Volume"
02a5 e402 | | Load 0x2,0x2
02a6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02a7 4800 |H | Short_Literal 0x0
02a8 0092 02c8 | | Action Push_String_Extended,0x2c8 ; "Density"
02aa e402 | | Load 0x2,0x2
02ab 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02ac 4801 |H | Short_Literal 0x1
02ad 0092 02c9 | | Action Push_String_Extended,0x2c9 ; "Errors"
02af e402 | | Load 0x2,0x2
02b0 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02b1 4501 |E | Exit_Subprogram 0x1
02b2 ; --------------------------------------------------------------------------------------
02b2 ; STRING TABLE
02b2 ; --------------------------------------------------------------------------------------
02b2 0032 | 2 | .STRTAB 0x0032->0x02cb ; " "
02b3 0031 | 1 | .STRTAB 0x0031->0x02cb ; "List of mount requests for backup tapes. Includes the time"
02b4 006a | j | .STRTAB 0x006a->0x02e9 ; "of the request, the elapsed time taken to mount the tape (HH:MM),"
02b5 00a9 | | .STRTAB 0x00a9->0x0309 ; "the elapsed time taken processing the tape (not including"
02b6 00e0 | | .STRTAB 0x00e0->0x0326 ; "rewinding), the volume id of the tape, the tape density,"
02b7 0116 | | .STRTAB 0x0116->0x0342 ; "(though depending on the tape drive, this may not be"
02b8 0148 | H | .STRTAB 0x0148->0x035c ; "accurate), and any errors that occurred writing the tape."
02b9 017f | | .STRTAB 0x017f->0x0378 ; "Under Errors are up to 3 different types of error data. A"
02ba 01b6 | | .STRTAB 0x01b6->0x0395 ; "single number is the total number of errors. A triple number"
02bb 01f0 | | .STRTAB 0x01f0->0x03b3 ; "is the number of consecutive write data retries failing, total"
02bc 022c | , | .STRTAB 0x022c->0x03d2 ; "number of write data retries failing and total number of"
02bd 0262 | b | .STRTAB 0x0262->0x03ee ; "errors."
02be 0267 | g | .STRTAB 0x0267->0x03f1 ; "Please NOTE: a backup will abort when the number of consecutive"
02bf 02a4 | | .STRTAB 0x02a4->0x0411 ; "write data retry errors equal 12."
02c0 02c3 | | .STRTAB 0x02c3->0x0421 ; " / "
02c1 02c4 | | .STRTAB 0x02c4->0x0423 ; "\x0c"
02c2 02c3 | | .STRTAB 0x02c3->0x0423 ; "ERROR"
02c3 02c6 | | .STRTAB 0x02c6->0x0426 ; "WRITE_DATA_RETRY"
02c4 02d4 | | .STRTAB 0x02d4->0x042e ; "Request Time"
02c5 02de | | .STRTAB 0x02de->0x0434 ; "Mount Wait"
02c6 02e6 | | .STRTAB 0x02e6->0x0439 ; "Processing"
02c7 02ee | | .STRTAB 0x02ee->0x043e ; "Volume"
02c8 02f2 | | .STRTAB 0x02f2->0x0441 ; "Density"
02c9 02f7 | | .STRTAB 0x02f7->0x0444 ; "Errors"
02ca 02fb | | .STREND 0x02fb->0x0447
02cb 204c 6973 | Lis| .STRTAB_STRINGS
0448 ; --------------------------------------------------------------------------------------
0448 ; Debug Table
0448 ; --------------------------------------------------------------------------------------
0448 0004 0011 | | .DEBUG4 0x0004,0x0011,0x9c89,0x0000,0x0001,0x0000
044e 0000 0000 | | .BLANK 0000[0x1b2]