summaryrefslogtreecommitdiff
path: root/v4.0/src/CMD/RECOVER/RECMSG.INC
diff options
context:
space:
mode:
Diffstat (limited to 'v4.0/src/CMD/RECOVER/RECMSG.INC')
-rw-r--r--v4.0/src/CMD/RECOVER/RECMSG.INC307
1 files changed, 307 insertions, 0 deletions
diff --git a/v4.0/src/CMD/RECOVER/RECMSG.INC b/v4.0/src/CMD/RECOVER/RECMSG.INC
new file mode 100644
index 0000000..ff44206
--- /dev/null
+++ b/v4.0/src/CMD/RECOVER/RECMSG.INC
@@ -0,0 +1,307 @@
1data segment PUBLIC para 'DATA' ; AN000;bgb
2;
3;*****************************************************************************
4; Macro's
5;*****************************************************************************
6Define_Msg macro Message_Name ; ;AN000;
7 ;
8Create_Msg Message_Name,Message_Number,Handle,Sublist,Count,Class,Function,Input;AN000;
9 ;
10 endm ; ;AN000;
11
12;-----------------------------------------------------------------------------
13
14Create_Msg macro Parm1,Parm2,Parm3,Parm4,Parm5,Parm6,Parm7,Parm8; ;AN000;
15
16Public Parm1
17Parm1 label word ; ;AN000;
18 dw Parm2 ; ;AN000;
19 dw Parm3 ; ;AN000;
20 dw Parm4 ; ;AN000;
21 dw Parm5 ; ;AN000;
22 db Parm6 ; ;AN000;
23 db Parm7 ; ;AN000;
24 dw Parm8 ; ;AN000;
25 endm ; ;AN000;
26
27;
28;*****************************************************************************
29; Message Retriever equates
30;*****************************************************************************
31
32Format_Msg equ 'C'
33
34N_A equ 0
35Sublist_Length equ 11
36None equ 0
37
38Blank equ " "
39No_Function equ 0
40No_Replace equ 0
41
42Msg_Ser_Class equ 0
43Ext_Err_Class equ 1
44Parse_Err_Class equ 2
45Utility_Msg_Class equ 0FFh
46
47Reserved equ 0
48
49;
50;*****************************************************************************
51; Message Sublist Tables
52;*****************************************************************************
53;
54;The following control blocks are used for messages with
55;replaceable paramters. These control blocks are used by the
56;SysDispMsg routine.
57;
58
59;--------------------------- ;
60Sublist_opnerr label byte ; AN000;SM
61 ;
62 db Sublist_Length ; AN000;SM
63 db Reserved ; AN000;SM
64 dw dg:fname_buffer ; AN000;bgb
65 dw Dg ; AN000;SM
66 db 0 ; AN000;SM
67 db Left_Align+Char_Field_ASCIIZ ; AN000;SM
68 db 14 ; AN000;SM
69 db 1 ; AN000;SM
70 db Blank ; AN000;SM
71;--------------------------- ;
72Sublist_Baddrv label byte ; AN000;SM
73 ;
74 db Sublist_Length ; AN000;SM
75 db Reserved ; AN000;SM
76 dw dg:Drive_Letter_Msg ; AN000;bgb
77 dw Dg ; AN000;SM
78 db 0 ; AN000;SM
79 db Left_Align+Char_Field_ASCIIZ ; AN000;SM
80 db 4 ; AN000;SM
81 db 4 ; AN000;SM
82 db Blank ; AN000;SM
83;--------------------------- ;
84ifdef fsexec ;an022;bgb
85Sublist_msg_EXECFailure label byte ; AN000;SM ;an022;bgb
86 db Sublist_Length ; AN000;SM ;an022;bgb
87 db Reserved ; AN000;SM ;an022;bgb
88 dw dg:Drive_Letter_Msg ; AN000;bgb ;an022;bgb
89 dw Dg ; AN000;SM ;an022;bgb
90 db 1 ; AN000;SM ;an022;bgb
91 db Left_Align+Char_Field_ASCIIZ ; AN000;SM ;an022;bgb
92 db 2 ; AN000;SM ;an022;bgb
93 db 2 ; AN000;SM ;an022;bgb
94 db Blank ; AN000;SM ;an022;bgb
95endif ;an022;bgb
96;--------------------------- ;
97Sublist_msg_recmsg label byte ; AN000;SM
98 ;
99 db Sublist_Length ; AN000;SM
100 db Reserved ; AN000;SM
101 dw dg:rec_num ; AN000;bgb
102 dw Dg ; AN000;SM
103 db 1 ; AN000;SM
104 db Left_Align+Unsgn_Bin_Word ; AN000;SM
105 db 5 ; AN000;SM
106 db 1 ; AN000;SM
107 db Blank ; AN000;SM
108;--------------------------- ;
109Sublist_msg_ofmsg label byte ; AN000;SM
110 ;
111 db Sublist_Length ; AN000;SM
112 db Reserved ; AN000;SM
113 dw dg:x_value_lo ; AN000;bgb
114 dw Dg ; AN000;SM
115 db 1 ; AN000;SM
116 db Left_Align+Unsgn_Bin_DWord ; AN000;SM
117 db 10 ; AN000;SM
118 db 1 ; AN000;SM
119 db Blank ; AN000;SM
120 db Sublist_Length ; AN000;bgb
121 db Reserved ; AN000;SM
122 dw y_value_lo ; AN000;SM
123 dw Dg ; AN000;SM
124 db 2 ; AN000;SM
125 db Left_Align+Unsgn_Bin_DWord ; AN000;SM
126 db 10 ; AN000;SM
127 db 1 ; AN000;SM
128 db Blank ; AN000;SM
129;-----------------------------------------------------------------------
130Drive_sublist label byte ;AN000;bgb
131
132 db 11 ; sublist size ;AN000;bgb
133 db 0 ;reserved ;AN000;bgb
134 dw dg:driveletter ;offset of data ;AN000;bgb
135 dw dg ;seg of data ;AN000;bgb
136 db 1 ; 1st replaceable parm ;AN000;bgb
137 db char_field_asciiz ; type = char ;AN000;bgb
138 db 2 ; max field width ;AN000;bgb
139 db 2 ; min field width ;AN000;bgb
140 db ' ' ; pad char (unused) ;AN000;bgb
141;--------------------------- ; ;an031;bgb
142Sublist_msg_parserr label dword ; ;an031;bgb
143 ;an031;bgb
144 db Sublist_Length ;11 ;an031;bgb
145 db Reserved ;0 ;an031;bgb
146public movsi
147movsi dw dg:command_line_buffer ;off ;an031;bgb
148 dw dg ;seg ;an031;bgb
149 db 0 ;USE PERCENT ZERO ;an031;bgb
150 db Left_Align+Char_Field_ASCIIZ ;type of data ;an031;bgb
151 db 128 ;max width ;an031;bgb
152 db 1 ;min width ;an031;bgb
153 db Blank ;pad char ;an031;bgb
154;--------------------------- ; ;an031;bgb
155; ;an000;bgb
156
157
158
159;
160;*****************************************************************************
161; Message Description Tables
162;*****************************************************************************
163;
164
165;---------------------- ;
166Message_Number = 2 ; AN000;SM
167Handle = STDERR ; AN000;SM
168Sublist = Sublist_Opnerr ; AN000;SM
169Count = N_A ; AN000;SM
170Class = EXT_ERR_CLASS ; AN000;SM
171Function = NO_INPUT ; AN000;SM
172Input = N_A ; AN000;SM
173 Define_Msg opnerr ; AN000;SM File not found - xxxxxx
174;---------------------- ;
175Message_Number = 3 ; AN000;SM
176Handle = STDERR ; AN000;SM
177Sublist = None ; AN000;SM
178Count = N_A ; AN000;SM
179Class = Utility_Msg_Class ; AN000;SM
180Function = NO_INPUT ; AN000;SM
181Input = N_A ; AN000;SM
182 Define_Msg Substerr ; AN000;SM Can not recover SUBST or ASSIGNED drive
183;---------------------- ;
184Message_Number = 4 ; AN000;SM
185Handle = STDERR ; AN000;SM
186Sublist = sublist_baddrv ; AN000;SM
187Count = N_A ; AN000;SM
188Class = UTILITY_MSG_CLASS ; AN000;SM
189Function = NO_INPUT ; AN000;SM
190Input = N_A ; AN000;SM
191 Define_Msg baddrv ; AN000;SM Invalid drive or file name ;AN000;
192;---------------------- ;
193Message_Number = 5 ; AN000;SM
194Handle = STDERR ; AN000;SM
195Sublist = None ; AN000;SM
196Count = N_A ; AN000;SM
197Class = UTILITY_MSG_CLASS ; AN000;SM
198Function = NO_INPUT ; AN000;SM
199Input = N_A ; AN000;SM
200 Define_Msg dirmsg ; AN000;SM Warning - directory full ;AN000;
201;---------------------- ;
202Message_Number = 6 ; AN000;SM
203Handle = STDERR ; AN000;SM
204Sublist = None ; AN000;SM
205Count = N_A ; AN000;SM
206Class = UTILITY_MSG_CLASS ; AN000;SM
207Function = NO_INPUT ; AN000;SM
208Input = N_A ; AN000;SM
209 Define_Msg NotNetM ; AN000;SM Cannot recover a Network drive ;AN000;
210;---------------------- ;
211ifdef fsexec ;an022;bgb
212 Message_Number = 7 ; ;an022;bgb
213 Handle = STDERR ; ;an022;bgb
214 Sublist = Sublist_msg_EXECFailure ; ;an022;bgb
215 Count = 1 ; ;an022;bgb
216 Class = UTILITY_MSG_CLASS ; ;an022;bgb
217 Function = NO_INPUT ; ;an022;bgb
218 Input = N_A ; ;an022;bgb
219 Define_Msg MsgEXECFailure ;RECOVER not avail. on drive %1 ;AN022;bgb
220endif ;an022;bgb
221;---------------------- ;
222Message_Number = 8 ; AN000;SM
223Handle = STDout ; AN007;bgb
224Sublist = Sublist_msg_recmsg ; AN000;SM
225Count = 1 ; AN000;SM
226Class = UTILITY_MSG_CLASS ; AN000;SM
227Function = NO_INPUT ; AN000;SM
228Input = N_A ; AN000;SM
229 Define_Msg recmsg ; AN000;SM %1 file(s) recovered ;AN000;
230;---------------------- ;
231Message_Number = 9 ; AN000;SM
232Handle = STDout ; AN007;bgb
233Sublist = Sublist_msg_ofmsg ; AN000;SM
234Count = 2 ; AN000;SM
235Class = UTILITY_MSG_CLASS ; AN000;SM
236Function = NO_INPUT ; AN000;SM
237Input = N_A ; AN000;SM
238 Define_Msg ofmsg_ptr ; AN000;SM %1 of %2 bytes recovered ;AN000;
239;---------------------- ;
240Message_Number = 10 ; AN000;bgb
241Handle = STDout ; AN007;bgb
242Sublist = drive_sublist ; AN000;bgb
243Count = 1 ; AN000;SM
244Class = UTILITY_MSG_CLASS ; AN000;SM
245Function = NO_INPUT ; AN000;SM
246Input = N_A ; AN000;SM
247 Define_Msg askmsg ; AN000;SM Press any key... ;AN000;
248;---------------------- ;
249Message_Number = 11 ; AN000;SM
250Handle = STDERR ; AN000;SM
251Sublist = None ; AN000;SM
252Count = N_A ; AN000;SM
253Class = Utility_Msg_Class ; AN000;SM
254Function = NO_INPUT ; AN000;SM
255Input = N_A ; AN000;SM
256 Define_Msg FATerrRead ; AN000;SM Can not read File allocation table(s)
257;---------------------- ;
258Message_Number = 12 ; AN000;SM
259Handle = STDERR ; AN000;SM
260Sublist = None ; AN000;SM
261Count = N_A ; AN000;SM
262Class = Utility_Msg_Class ; AN000;SM
263Function = NO_INPUT ; AN000;SM
264Input = N_A ; AN000;SM
265 Define_Msg FATerrWrite ; AN000;SM Can not write file allocation table(s)
266;---------------------- ;
267Message_Number = 13 ; AN000;MT
268Handle = STDout ; AN000;MT
269Sublist = None ; AN000;MT
270Count = N_A ; AN000;MT
271Class = Utility_Msg_Class ; AN000;MT
272Function = NO_INPUT ; AN000;MT
273Input = N_A ; AN000;MT
274 Define_Msg CRLF_Ptr ; AN000;MT CR,LF
275;--------------------------- ;
276Message_Number = 0 ; ;AN000;
277Handle = STDERR ; ;AN000;
278Sublist = None ; ;AN000;
279Count = N_A ; ;AN000;
280Class = Ext_Err_Class ; ;AN000;
281Function = No_Input ; ;AN000;
282Input =N_A ; ;AN000;
283 Define_Msg Extended_Error_Msg ; ;AN000;
284;--------------------------- ;
285;----------------------- ;an000;bgb
286Message_Number = 0 ; ;an000;bgb
287Handle = STDERR ; ;an000;bgb;AN000;
288Sublist = dg:sublist_msg_parserr ; ;an031;bgbbgb000;
289Count = 1 ; ;an031;bgb;AN000;
290Class = Parse_Err_Class ; ;an000;bgb;AN000;
291Function = No_Function ; ;an000;bgb;AN000;
292Input = N_A ; ;an000;bgb;AN000;
293 Define_Msg Parse_Error_Msg ; ;an000;bgb;AN000;
294;---------------------- ;
295Message_Number = 14 ; AN013;bgb
296Handle = STDERR ; AN013;bgb
297Sublist = None ; AN013;bgb
298Count = None ; AN013;bgb
299Class = utility_msg_class ; AN013;bgb
300Function = NO_INPUT ; AN013;bgb
301Input = N_A ; AN013;bgb
302 Define_Msg no_mem_arg ; AN013;bgb insufficient memory
303
304
305Data ends
306; extrn Drive_Letter_Msg:Byte
307; extrn FName_Buffer:Byte
HIC SVNT DRACONES