1 /*
2
3 /usr/src/ext2ed/file_com.c
4
5 A part of the extended file system 2 disk editor.
6
7 ----------------------------
8 Commands which handle a file
9 ----------------------------
10
11 First written on: April 18 1995
12
13 Copyright (C) 1995 Gadi Oxman
14
15 */
16
17 #include "config.h"
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include <string.h>
21
22 #include "ext2ed.h"
23
init_file_info(void)24 int init_file_info (void)
25
26 {
27 struct ext2_inode *ptr;
28
29 ptr=&type_data.u.t_ext2_inode;
30
31 file_info.inode_ptr=ptr;
32 file_info.inode_offset=device_offset;
33
34 file_info.global_block_num=ptr->i_block [0];
35 file_info.global_block_offset=ptr->i_block [0]*file_system_info.block_size;
36 file_info.block_num=0;
37 file_info.blocks_count=(ptr->i_size+file_system_info.block_size-1)/file_system_info.block_size;
38 file_info.file_offset=0;
39 file_info.file_length=ptr->i_size;
40 file_info.level=0;
41 file_info.offset_in_block=0;
42
43 file_info.display=HEX;
44
45 low_read (file_info.buffer,file_system_info.block_size,file_info.global_block_offset);
46
47 return (1);
48 }
49
50
type_file___inode(char * command_line)51 void type_file___inode (char *command_line)
52
53 {
54 dispatch ("settype ext2_inode");
55 }
56
type_file___show(char * command_line)57 void type_file___show (char *command_line)
58
59 {
60 if (file_info.display==HEX)
61 file_show_hex ();
62 if (file_info.display==TEXT)
63 file_show_text ();
64 }
65
type_file___nextblock(char * command_line)66 void type_file___nextblock (char *command_line)
67
68 {
69 long block_offset=1;
70 char *ptr,buffer [80];
71
72 ptr=parse_word (command_line,buffer);
73
74 if (*ptr!=0) {
75 ptr=parse_word (ptr,buffer);
76 block_offset*=atol (buffer);
77 }
78
79 if (file_info.block_num+block_offset >= file_info.blocks_count) {
80 wprintw (command_win,"Error - Block offset out of range\n");wrefresh (command_win);
81 return;
82 }
83
84 file_info.block_num+=block_offset;
85 file_info.global_block_num=file_block_to_global_block (file_info.block_num,&file_info);
86 file_info.global_block_offset=file_info.global_block_num*file_system_info.block_size;
87 file_info.file_offset=file_info.block_num*file_system_info.block_size;
88
89 low_read (file_info.buffer,file_system_info.block_size,file_info.global_block_offset);
90
91 strcpy (buffer,"show");dispatch (buffer);
92 }
93
type_file___next(char * command_line)94 void type_file___next (char *command_line)
95
96 {
97 int offset=1;
98 char *ptr,buffer [80];
99
100 ptr=parse_word (command_line,buffer);
101
102 if (*ptr!=0) {
103 ptr=parse_word (ptr,buffer);
104 offset*=atol (buffer);
105 }
106
107 if (file_info.offset_in_block+offset < file_system_info.block_size) {
108 file_info.offset_in_block+=offset;
109 sprintf (buffer,"show");dispatch (buffer);
110 }
111
112 else {
113 wprintw (command_win,"Error - Offset out of block\n");refresh_command_win ();
114 }
115 }
116
type_file___offset(char * command_line)117 void type_file___offset (char *command_line)
118
119 {
120 unsigned long offset;
121 char *ptr,buffer [80];
122
123 ptr=parse_word (command_line,buffer);
124
125 if (*ptr!=0) {
126 ptr=parse_word (ptr,buffer);
127 offset=atol (buffer);
128 }
129 else {
130 wprintw (command_win,"Error - Argument not specified\n");refresh_command_win ();
131 return;
132 }
133
134 if (offset < file_system_info.block_size) {
135 file_info.offset_in_block=offset;
136 sprintf (buffer,"show");dispatch (buffer);
137 }
138
139 else {
140 wprintw (command_win,"Error - Offset out of block\n");refresh_command_win ();
141 }
142 }
143
type_file___prev(char * command_line)144 void type_file___prev (char *command_line)
145
146 {
147 int offset=1;
148 char *ptr,buffer [80];
149
150 ptr=parse_word (command_line,buffer);
151
152 if (*ptr!=0) {
153 ptr=parse_word (ptr,buffer);
154 offset*=atol (buffer);
155 }
156
157 if (file_info.offset_in_block-offset >= 0) {
158 file_info.offset_in_block-=offset;
159 sprintf (buffer,"show");dispatch (buffer);
160 }
161
162 else {
163 wprintw (command_win,"Error - Offset out of block\n");refresh_command_win ();
164 }
165 }
166
type_file___prevblock(char * command_line)167 void type_file___prevblock (char *command_line)
168
169 {
170 long block_offset=1;
171 char *ptr,buffer [80];
172
173 ptr=parse_word (command_line,buffer);
174
175 if (*ptr!=0) {
176 ptr=parse_word (ptr,buffer);
177 block_offset*=atol (buffer);
178 }
179
180 if (file_info.block_num-block_offset < 0) {
181 wprintw (command_win,"Error - Block offset out of range\n");wrefresh (command_win);
182 return;
183 }
184
185 file_info.block_num-=block_offset;
186 file_info.global_block_num=file_block_to_global_block (file_info.block_num,&file_info);
187 file_info.global_block_offset=file_info.global_block_num*file_system_info.block_size;
188 file_info.file_offset=file_info.block_num*file_system_info.block_size;
189
190 low_read (file_info.buffer,file_system_info.block_size,file_info.global_block_offset);
191
192 strcpy (buffer,"show");dispatch (buffer);
193 }
194
type_file___block(char * command_line)195 void type_file___block (char *command_line)
196
197 {
198 long block_offset=1;
199 char *ptr,buffer [80];
200
201 ptr=parse_word (command_line,buffer);
202
203 if (*ptr==0) {
204 wprintw (command_win,"Error - Invalid arguments\n");wrefresh (command_win);
205 return;
206 }
207
208 ptr=parse_word (ptr,buffer);
209 block_offset=atol (buffer);
210
211 if (block_offset < 0 || block_offset >= file_info.blocks_count) {
212 wprintw (command_win,"Error - Block offset out of range\n");wrefresh (command_win);
213 return;
214 }
215
216 file_info.block_num=block_offset;
217 file_info.global_block_num=file_block_to_global_block (file_info.block_num,&file_info);
218 file_info.global_block_offset=file_info.global_block_num*file_system_info.block_size;
219 file_info.file_offset=file_info.block_num*file_system_info.block_size;
220
221 low_read (file_info.buffer,file_system_info.block_size,file_info.global_block_offset);
222
223 strcpy (buffer,"show");dispatch (buffer);
224 }
225
type_file___display(char * command_line)226 void type_file___display (char *command_line)
227
228 {
229 char *ptr,buffer [80];
230
231 ptr=parse_word (command_line,buffer);
232 if (*ptr==0)
233 strcpy (buffer,"hex");
234 else
235 ptr=parse_word (ptr,buffer);
236
237 if (strcasecmp (buffer,"hex")==0) {
238 wprintw (command_win,"Display set to hex\n");wrefresh (command_win);
239 file_info.display=HEX;
240 sprintf (buffer,"show");dispatch (buffer);
241 }
242
243 else if (strcasecmp (buffer,"text")==0) {
244 wprintw (command_win,"Display set to text\n");wrefresh (command_win);
245 file_info.display=TEXT;
246 sprintf (buffer,"show");dispatch (buffer);
247 }
248
249 else {
250 wprintw (command_win,"Error - Invalid arguments\n");wrefresh (command_win);
251 }
252 }
253
file_show_hex(void)254 void file_show_hex (void)
255
256 {
257 long offset=0,l,i;
258 unsigned char *ch_ptr;
259
260 /* device_offset and type_data points to the inode */
261
262 show_pad_info.line=0;
263
264 wmove (show_pad,0,0);
265 ch_ptr=file_info.buffer;
266 for (l=0;l<file_system_info.block_size/16;l++) {
267 if (file_info.file_offset+offset>file_info.file_length-1) break;
268 wprintw (show_pad,"%08ld : ",offset);
269 for (i=0;i<16;i++) {
270
271 if (file_info.file_offset+offset+i>file_info.file_length-1) {
272 wprintw (show_pad," ");
273 }
274
275 else {
276 if (file_info.offset_in_block==offset+i)
277 wattrset (show_pad,A_REVERSE);
278
279 if (ch_ptr [i]>=' ' && ch_ptr [i]<='z')
280 wprintw (show_pad,"%c",ch_ptr [i]);
281 else
282 wprintw (show_pad,".");
283
284 if (file_info.offset_in_block==offset+i)
285 wattrset (show_pad,A_NORMAL);
286 }
287 }
288
289 wprintw (show_pad," ");
290 for (i=0;i<16;i++) {
291 if (file_info.file_offset+offset+i>file_info.file_length-1) break;
292 if (file_info.offset_in_block==offset+i)
293 wattrset (show_pad,A_REVERSE);
294
295 wprintw (show_pad,"%02x",ch_ptr [i]);
296
297 if (file_info.offset_in_block==offset+i) {
298 wattrset (show_pad,A_NORMAL);
299 show_pad_info.line=l-l % show_pad_info.display_lines;
300 }
301
302 wprintw (show_pad," ");
303
304 }
305
306 wprintw (show_pad,"\n");
307 offset+=i;
308 ch_ptr+=i;
309 }
310
311 show_pad_info.max_line=l-1;
312
313 refresh_show_pad ();
314
315 show_status ();
316 }
317
file_show_text(void)318 void file_show_text (void)
319
320 {
321 long offset=0,last_offset,l=0,cols=0;
322 unsigned char *ch_ptr;
323
324 /* device_offset and type_data points to the inode */
325
326 show_pad_info.line=0;
327 wmove (show_pad,0,0);
328 ch_ptr=file_info.buffer;
329
330 last_offset=file_system_info.block_size-1;
331
332 if (file_info.file_offset+last_offset > file_info.file_length-1)
333 last_offset=file_info.file_length-1-file_info.file_offset;
334
335 while ( (offset <= last_offset) && l<SHOW_PAD_LINES) {
336
337 if (cols==SHOW_PAD_COLS-1) {
338 wprintw (show_pad,"\n");
339 l++;cols=0;
340 }
341
342
343 if (file_info.offset_in_block==offset)
344 wattrset (show_pad,A_REVERSE);
345
346 if (*ch_ptr >= ' ' && *ch_ptr <= 'z')
347 wprintw (show_pad,"%c",*ch_ptr);
348
349
350 else {
351 if (*ch_ptr == 0xa) {
352 wprintw (show_pad,"\n");
353 l++;cols=0;
354 }
355
356 else if (*ch_ptr == 0x9)
357 wprintw (show_pad," ");
358
359 else
360 wprintw (show_pad,".");
361 }
362
363 if (file_info.offset_in_block==offset) {
364 wattrset (show_pad,A_NORMAL);
365 show_pad_info.line=l-l % show_pad_info.display_lines;
366 }
367
368
369 offset++;cols++;ch_ptr++;
370 }
371
372 wprintw (show_pad,"\n");
373 show_pad_info.max_line=l;
374
375 refresh_show_pad ();
376
377 show_status ();
378 }
379
show_status(void)380 void show_status (void)
381
382 {
383 long inode_num;
384
385 werase (show_win);wmove (show_win,0,0);
386 wprintw (show_win,"File contents. Block %ld. ",file_info.global_block_num);
387 wprintw (show_win,"File block %ld of %ld. ",file_info.block_num,file_info.blocks_count-1);
388 wprintw (show_win,"File Offset %ld of %ld.",file_info.file_offset,file_info.file_length-1);
389
390 wmove (show_win,1,0);
391 inode_num=inode_offset_to_inode_num (file_info.inode_offset);
392 wprintw (show_win,"File inode %ld. Indirection level %ld.",inode_num,file_info.level);
393
394 refresh_show_win ();
395 }
396
type_file___remember(char * command_line)397 void type_file___remember (char *command_line)
398
399 {
400 int found=0;
401 long entry_num;
402 char *ptr,buffer [80];
403 struct struct_descriptor *descriptor_ptr;
404
405 ptr=parse_word (command_line,buffer);
406
407 if (*ptr==0) {
408 wprintw (command_win,"Error - Argument not specified\n");wrefresh (command_win);
409 return;
410 }
411
412 ptr=parse_word (ptr,buffer);
413
414 entry_num=remember_lifo.entries_count++;
415 if (entry_num>REMEMBER_COUNT-1) {
416 entry_num=0;
417 remember_lifo.entries_count--;
418 }
419
420 descriptor_ptr=first_type;
421 while (descriptor_ptr!=NULL && !found) {
422 if (strcmp (descriptor_ptr->name,"ext2_inode")==0)
423 found=1;
424 else
425 descriptor_ptr=descriptor_ptr->next;
426 }
427
428
429 remember_lifo.offset [entry_num]=device_offset;
430 remember_lifo.type [entry_num]=descriptor_ptr;
431 strcpy (remember_lifo.name [entry_num],buffer);
432
433 wprintw (command_win,"Object %s in Offset %ld remembered as %s\n",descriptor_ptr->name,device_offset,buffer);
434 wrefresh (command_win);
435 }
436
type_file___set(char * command_line)437 void type_file___set (char *command_line)
438
439 {
440 unsigned char tmp;
441 char *ptr,buffer [80],*ch_ptr;
442 int mode=HEX;
443
444 ptr=parse_word (command_line,buffer);
445 if (*ptr==0) {
446 wprintw (command_win,"Error - Argument not specified\n");refresh_command_win ();return;
447 }
448
449 ptr=parse_word (ptr,buffer);
450
451 if (strcasecmp (buffer,"text")==0) {
452 mode=TEXT;
453 strcpy (buffer,ptr);
454 }
455
456 else if (strcasecmp (buffer,"hex")==0) {
457 mode=HEX;
458 ptr=parse_word (ptr,buffer);
459 }
460
461 if (*buffer==0) {
462 wprintw (command_win,"Error - Data not specified\n");refresh_command_win ();return;
463 }
464
465 if (mode==HEX) {
466 do {
467 tmp=(unsigned char) strtol (buffer,NULL,16);
468 file_info.buffer [file_info.offset_in_block]=tmp;
469 file_info.offset_in_block++;
470 ptr=parse_word (ptr,buffer);
471 if (file_info.offset_in_block==file_system_info.block_size) {
472 if (*ptr) {
473 wprintw (command_win,"Error - Ending offset outside block, only partial string changed\n");
474 refresh_command_win ();
475 }
476 file_info.offset_in_block--;
477 }
478 } while (*buffer) ;
479 }
480
481 else {
482 ch_ptr=buffer;
483 while (*ch_ptr) {
484 tmp=(unsigned char) *ch_ptr++;
485 file_info.buffer [file_info.offset_in_block]=tmp;
486 file_info.offset_in_block++;
487 if (file_info.offset_in_block==file_system_info.block_size) {
488 if (*ch_ptr) {
489 wprintw (command_win,"Error - Ending offset outside block, only partial string changed\n");
490 refresh_command_win ();
491 }
492 file_info.offset_in_block--;
493 }
494 }
495 }
496
497 strcpy (buffer,"show");dispatch (buffer);
498 }
499
type_file___writedata(char * command_line)500 void type_file___writedata (char *command_line)
501
502 {
503 low_write (file_info.buffer,file_system_info.block_size,file_info.global_block_offset);
504 return;
505 }
506
file_block_to_global_block(long file_block,struct struct_file_info * file_info_ptr)507 long file_block_to_global_block (long file_block,struct struct_file_info *file_info_ptr)
508
509 {
510 long last_direct,last_indirect,last_dindirect;
511
512 last_direct=EXT2_NDIR_BLOCKS-1;
513 last_indirect=last_direct+file_system_info.block_size/4;
514 last_dindirect=last_indirect+(file_system_info.block_size/4)*(file_system_info.block_size/4);
515
516 if (file_block <= last_direct) {
517 file_info_ptr->level=0;
518 return (file_info_ptr->inode_ptr->i_block [file_block]);
519 }
520
521 if (file_block <= last_indirect) {
522 file_info_ptr->level=1;
523 file_block=file_block-last_direct-1;
524 return (return_indirect (file_info_ptr->inode_ptr->i_block [EXT2_IND_BLOCK],file_block));
525 }
526
527 if (file_block <= last_dindirect) {
528 file_info_ptr->level=2;
529 file_block=file_block-last_indirect-1;
530 return (return_dindirect (file_info_ptr->inode_ptr->i_block [EXT2_DIND_BLOCK],file_block));
531 }
532
533 file_info_ptr->level=3;
534 file_block=file_block-last_dindirect-1;
535 return (return_tindirect (file_info_ptr->inode_ptr->i_block [EXT2_TIND_BLOCK],file_block));
536 }
537
return_indirect(long table_block,long block_num)538 long return_indirect (long table_block,long block_num)
539
540 {
541 long block_table [EXT2_MAX_BLOCK_SIZE/4];
542
543 low_read ((char *) block_table,file_system_info.block_size,table_block*file_system_info.block_size);
544 return (block_table [block_num]);
545 }
546
return_dindirect(long table_block,long block_num)547 long return_dindirect (long table_block,long block_num)
548
549 {
550 long f_indirect;
551
552 f_indirect=block_num/(file_system_info.block_size/4);
553 f_indirect=return_indirect (table_block,f_indirect);
554 return (return_indirect (f_indirect,block_num%(file_system_info.block_size/4)));
555 }
556
return_tindirect(long table_block,long block_num)557 long return_tindirect (long table_block,long block_num)
558
559 {
560 long s_indirect;
561
562 s_indirect=block_num/((file_system_info.block_size/4)*(file_system_info.block_size/4));
563 s_indirect=return_indirect (table_block,s_indirect);
564 return (return_dindirect (s_indirect,block_num%((file_system_info.block_size/4)*(file_system_info.block_size/4))));
565 }
566