]> wirehaze git hosting - MS-DOS.git/blob - v4.0/src/CMD/RECOVER/RECMSG.INC

wirehaze git hosting

MZ is back!
[MS-DOS.git] / v4.0 / src / CMD / RECOVER / RECMSG.INC
1 data segment PUBLIC para 'DATA' ; AN000;bgb
2 ;
3 ;*****************************************************************************
4 ; Macro's
5 ;*****************************************************************************
6 Define_Msg macro Message_Name ; ;AN000;
7 ;
8 Create_Msg Message_Name,Message_Number,Handle,Sublist,Count,Class,Function,Input;AN000;
9 ;
10 endm ; ;AN000;
11
12 ;-----------------------------------------------------------------------------
13
14 Create_Msg macro Parm1,Parm2,Parm3,Parm4,Parm5,Parm6,Parm7,Parm8; ;AN000;
15
16 Public Parm1
17 Parm1 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
32 Format_Msg equ 'C'
33
34 N_A equ 0
35 Sublist_Length equ 11
36 None equ 0
37
38 Blank equ " "
39 No_Function equ 0
40 No_Replace equ 0
41
42 Msg_Ser_Class equ 0
43 Ext_Err_Class equ 1
44 Parse_Err_Class equ 2
45 Utility_Msg_Class equ 0FFh
46
47 Reserved 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 ;--------------------------- ;
60 Sublist_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 ;--------------------------- ;
72 Sublist_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 ;--------------------------- ;
84 ifdef fsexec ;an022;bgb
85 Sublist_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
95 endif ;an022;bgb
96 ;--------------------------- ;
97 Sublist_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 ;--------------------------- ;
109 Sublist_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 ;-----------------------------------------------------------------------
130 Drive_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
142 Sublist_msg_parserr label dword ; ;an031;bgb
143 ;an031;bgb
144 db Sublist_Length ;11 ;an031;bgb
145 db Reserved ;0 ;an031;bgb
146 public movsi
147 movsi 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 ;---------------------- ;
166 Message_Number = 2 ; AN000;SM
167 Handle = STDERR ; AN000;SM
168 Sublist = Sublist_Opnerr ; AN000;SM
169 Count = N_A ; AN000;SM
170 Class = EXT_ERR_CLASS ; AN000;SM
171 Function = NO_INPUT ; AN000;SM
172 Input = N_A ; AN000;SM
173 Define_Msg opnerr ; AN000;SM File not found - xxxxxx
174 ;---------------------- ;
175 Message_Number = 3 ; AN000;SM
176 Handle = STDERR ; AN000;SM
177 Sublist = None ; AN000;SM
178 Count = N_A ; AN000;SM
179 Class = Utility_Msg_Class ; AN000;SM
180 Function = NO_INPUT ; AN000;SM
181 Input = N_A ; AN000;SM
182 Define_Msg Substerr ; AN000;SM Can not recover SUBST or ASSIGNED drive
183 ;---------------------- ;
184 Message_Number = 4 ; AN000;SM
185 Handle = STDERR ; AN000;SM
186 Sublist = sublist_baddrv ; AN000;SM
187 Count = N_A ; AN000;SM
188 Class = UTILITY_MSG_CLASS ; AN000;SM
189 Function = NO_INPUT ; AN000;SM
190 Input = N_A ; AN000;SM
191 Define_Msg baddrv ; AN000;SM Invalid drive or file name ;AN000;
192 ;---------------------- ;
193 Message_Number = 5 ; AN000;SM
194 Handle = STDERR ; AN000;SM
195 Sublist = None ; AN000;SM
196 Count = N_A ; AN000;SM
197 Class = UTILITY_MSG_CLASS ; AN000;SM
198 Function = NO_INPUT ; AN000;SM
199 Input = N_A ; AN000;SM
200 Define_Msg dirmsg ; AN000;SM Warning - directory full ;AN000;
201 ;---------------------- ;
202 Message_Number = 6 ; AN000;SM
203 Handle = STDERR ; AN000;SM
204 Sublist = None ; AN000;SM
205 Count = N_A ; AN000;SM
206 Class = UTILITY_MSG_CLASS ; AN000;SM
207 Function = NO_INPUT ; AN000;SM
208 Input = N_A ; AN000;SM
209 Define_Msg NotNetM ; AN000;SM Cannot recover a Network drive ;AN000;
210 ;---------------------- ;
211 ifdef 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
220 endif ;an022;bgb
221 ;---------------------- ;
222 Message_Number = 8 ; AN000;SM
223 Handle = STDout ; AN007;bgb
224 Sublist = Sublist_msg_recmsg ; AN000;SM
225 Count = 1 ; AN000;SM
226 Class = UTILITY_MSG_CLASS ; AN000;SM
227 Function = NO_INPUT ; AN000;SM
228 Input = N_A ; AN000;SM
229 Define_Msg recmsg ; AN000;SM %1 file(s) recovered ;AN000;
230 ;---------------------- ;
231 Message_Number = 9 ; AN000;SM
232 Handle = STDout ; AN007;bgb
233 Sublist = Sublist_msg_ofmsg ; AN000;SM
234 Count = 2 ; AN000;SM
235 Class = UTILITY_MSG_CLASS ; AN000;SM
236 Function = NO_INPUT ; AN000;SM
237 Input = N_A ; AN000;SM
238 Define_Msg ofmsg_ptr ; AN000;SM %1 of %2 bytes recovered ;AN000;
239 ;---------------------- ;
240 Message_Number = 10 ; AN000;bgb
241 Handle = STDout ; AN007;bgb
242 Sublist = drive_sublist ; AN000;bgb
243 Count = 1 ; AN000;SM
244 Class = UTILITY_MSG_CLASS ; AN000;SM
245 Function = NO_INPUT ; AN000;SM
246 Input = N_A ; AN000;SM
247 Define_Msg askmsg ; AN000;SM Press any key... ;AN000;
248 ;---------------------- ;
249 Message_Number = 11 ; AN000;SM
250 Handle = STDERR ; AN000;SM
251 Sublist = None ; AN000;SM
252 Count = N_A ; AN000;SM
253 Class = Utility_Msg_Class ; AN000;SM
254 Function = NO_INPUT ; AN000;SM
255 Input = N_A ; AN000;SM
256 Define_Msg FATerrRead ; AN000;SM Can not read File allocation table(s)
257 ;---------------------- ;
258 Message_Number = 12 ; AN000;SM
259 Handle = STDERR ; AN000;SM
260 Sublist = None ; AN000;SM
261 Count = N_A ; AN000;SM
262 Class = Utility_Msg_Class ; AN000;SM
263 Function = NO_INPUT ; AN000;SM
264 Input = N_A ; AN000;SM
265 Define_Msg FATerrWrite ; AN000;SM Can not write file allocation table(s)
266 ;---------------------- ;
267 Message_Number = 13 ; AN000;MT
268 Handle = STDout ; AN000;MT
269 Sublist = None ; AN000;MT
270 Count = N_A ; AN000;MT
271 Class = Utility_Msg_Class ; AN000;MT
272 Function = NO_INPUT ; AN000;MT
273 Input = N_A ; AN000;MT
274 Define_Msg CRLF_Ptr ; AN000;MT CR,LF
275 ;--------------------------- ;
276 Message_Number = 0 ; ;AN000;
277 Handle = STDERR ; ;AN000;
278 Sublist = None ; ;AN000;
279 Count = N_A ; ;AN000;
280 Class = Ext_Err_Class ; ;AN000;
281 Function = No_Input ; ;AN000;
282 Input =N_A ; ;AN000;
283 Define_Msg Extended_Error_Msg ; ;AN000;
284 ;--------------------------- ;
285 ;----------------------- ;an000;bgb
286 Message_Number = 0 ; ;an000;bgb
287 Handle = STDERR ; ;an000;bgb;AN000;
288 Sublist = dg:sublist_msg_parserr ; ;an031;bgbbgb000;
289 Count = 1 ; ;an031;bgb;AN000;
290 Class = Parse_Err_Class ; ;an000;bgb;AN000;
291 Function = No_Function ; ;an000;bgb;AN000;
292 Input = N_A ; ;an000;bgb;AN000;
293 Define_Msg Parse_Error_Msg ; ;an000;bgb;AN000;
294 ;---------------------- ;
295 Message_Number = 14 ; AN013;bgb
296 Handle = STDERR ; AN013;bgb
297 Sublist = None ; AN013;bgb
298 Count = None ; AN013;bgb
299 Class = utility_msg_class ; AN013;bgb
300 Function = NO_INPUT ; AN013;bgb
301 Input = N_A ; AN013;bgb
302 Define_Msg no_mem_arg ; AN013;bgb insufficient memory
303
304
305 Data ends
306 ; extrn Drive_Letter_Msg:Byte
307 ; extrn FName_Buffer:Byte