开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 磁盘/存储 > SCSI/ASPI > 查看源码
isodump.c
资源名称：cdrecord-1.8.tar.gz　[点击查看]
上传用户：xiejiait
上传日期：2007-01-06
资源大小：881k
文件大小：14k
源码类别：

SCSI/ASPI

开发平台：

MultiPlatform

isodump.c：源码内容
  1. /*
  2.  * File isodump.c - dump iso9660 directory information.
  3.  *
  5.    Written by Eric Youngdale (1993).
  7.    Copyright 1993 Yggdrasil Computing, Incorporated
  9.    This program is free software; you can redistribute it and/or modify
  10.    it under the terms of the GNU General Public License as published by
  11.    the Free Software Foundation; either version 2, or (at your option)
  12.    any later version.
  14.    This program is distributed in the hope that it will be useful,
  15.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17.    GNU General Public License for more details.
  19.    You should have received a copy of the GNU General Public License
  20.    along with this program; if not, write to the Free Software
  21.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  23. static char rcsid[] ="$Id: isodump.c,v 1.3 1999/03/02 03:41:36 eric Exp $";
  25. #include "../config.h"
  27. #include <stdxlib.h>
  28. #include <unixstd.h>
  29. #include <strdefs.h>
  31. #include <stdio.h>
  32. #include <standard.h>
  33. #ifdef HAVE_TERMIOS_H
  34. #include <termios.h>
  35. #include <sys/ioctl.h>
  36. #else
  37. #include <termio.h>
  38. #endif
  39. #include <signal.h>
  41. FILE * infile;
  42. int file_addr;
  43. unsigned char buffer[2048];
  44. unsigned char search[64];
  45. int blocksize;
  47. #define PAGE sizeof(buffer)
  49. #define ISODCL(from, to) (to - from + 1)
  51. struct iso_primary_descriptor {
  52. unsigned char type [ISODCL (  1,   1)]; /* 711 */
  53. unsigned char id [ISODCL (  2,   6)];
  54. unsigned char version [ISODCL (  7,   7)]; /* 711 */
  55. unsigned char unused1 [ISODCL (  8,   8)];
  56. unsigned char system_id [ISODCL (  9,  40)]; /* aunsigned chars */
  57. unsigned char volume_id [ISODCL ( 41,  72)]; /* dunsigned chars */
  58. unsigned char unused2 [ISODCL ( 73,  80)];
  59. unsigned char volume_space_size [ISODCL ( 81,  88)]; /* 733 */
  60. unsigned char unused3 [ISODCL ( 89, 120)];
  61. unsigned char volume_set_size [ISODCL (121, 124)]; /* 723 */
  62. unsigned char volume_sequence_number [ISODCL (125, 128)]; /* 723 */
  63. unsigned char logical_block_size [ISODCL (129, 132)]; /* 723 */
  64. unsigned char path_table_size [ISODCL (133, 140)]; /* 733 */
  65. unsigned char type_l_path_table [ISODCL (141, 144)]; /* 731 */
  66. unsigned char opt_type_l_path_table [ISODCL (145, 148)]; /* 731 */
  67. unsigned char type_m_path_table [ISODCL (149, 152)]; /* 732 */
  68. unsigned char opt_type_m_path_table [ISODCL (153, 156)]; /* 732 */
  69. unsigned char root_directory_record [ISODCL (157, 190)]; /* 9.1 */
  70. unsigned char volume_set_id [ISODCL (191, 318)]; /* dunsigned chars */
  71. unsigned char publisher_id [ISODCL (319, 446)]; /* achars */
  72. unsigned char preparer_id [ISODCL (447, 574)]; /* achars */
  73. unsigned char application_id [ISODCL (575, 702)]; /* achars */
  74. unsigned char copyright_file_id [ISODCL (703, 739)]; /* 7.5 dchars */
  75. unsigned char abstract_file_id [ISODCL (740, 776)]; /* 7.5 dchars */
  76. unsigned char bibliographic_file_id [ISODCL (777, 813)]; /* 7.5 dchars */
  77. unsigned char creation_date [ISODCL (814, 830)]; /* 8.4.26.1 */
  78. unsigned char modification_date [ISODCL (831, 847)]; /* 8.4.26.1 */
  79. unsigned char expiration_date [ISODCL (848, 864)]; /* 8.4.26.1 */
  80. unsigned char effective_date [ISODCL (865, 881)]; /* 8.4.26.1 */
  81. unsigned char file_structure_version [ISODCL (882, 882)]; /* 711 */
  82. unsigned char unused4 [ISODCL (883, 883)];
  83. unsigned char application_data [ISODCL (884, 1395)];
  84. unsigned char unused5 [ISODCL (1396, 2048)];
  85. };
  87. struct iso_directory_record {
  88. unsigned char length [ISODCL (1, 1)]; /* 711 */
  89. unsigned char ext_attr_length [ISODCL (2, 2)]; /* 711 */
  90. unsigned char extent [ISODCL (3, 10)]; /* 733 */
  91. unsigned char size [ISODCL (11, 18)]; /* 733 */
  92. unsigned char date [ISODCL (19, 25)]; /* 7 by 711 */
  93. unsigned char flags [ISODCL (26, 26)];
  94. unsigned char file_unit_size [ISODCL (27, 27)]; /* 711 */
  95. unsigned char interleave [ISODCL (28, 28)]; /* 711 */
  96. unsigned char volume_sequence_number [ISODCL (29, 32)]; /* 723 */
  97. unsigned char name_len [ISODCL (33, 33)]; /* 711 */
  98. unsigned char name [1];
  99. };
  101. int isonum_731 __PR((char * p));
  102. int isonum_721 __PR((char * p));
  103. int isonum_723 __PR((char * p));
  104. int isonum_733 __PR((unsigned char * p));
  105. void reset_tty __PR((void));
  106. void set_tty __PR((void));
  107. void onsusp __PR((int signo));
  108. void crsr2 __PR((int row, int col));
  109. int parse_rr __PR((unsigned char * pnt, int len, int cont_flag));
  110. void dump_rr __PR((struct iso_directory_record * idr));
  111. void showblock __PR((int flag));
  112. int getbyte __PR((void));
  113. void usage __PR((int excode));
  114. int main __PR((int argc, char *argv[]));
  116. int
  117. isonum_731 (p)
  118. char *p;
  119. {
  120. return ((p[0] & 0xff)
  121. | ((p[1] & 0xff) << 8)
  122. | ((p[2] & 0xff) << 16)
  123. | ((p[3] & 0xff) << 24));
  124. }
  126. int
  127. isonum_721 (p)
  128. char *p;
  129. {
  130. return ((p[0] & 0xff) | ((p[1] & 0xff) << 8));
  131. }
  133. int
  134. isonum_723 (p)
  135. char *p;
  136. {
  137. #if 0
  138. if (p[0] != p[3] || p[1] != p[2]) {
  139. #ifdef USE_LIBSCHILY
  140. comerrno(EX_BAD, "invalid format 7.2.3 numbern");
  141. #else
  142. fprintf (stderr, "invalid format 7.2.3 numbern");
  143. exit (1);
  144. #endif
  145. }
  146. #endif
  147. return (isonum_721 (p));
  148. }
  151. int
  152. isonum_733 (p)
  153. unsigned char *p;
  154. {
  155. return (isonum_731 ((char *)p));
  156. }
  158. #ifdef HAVE_TERMIOS_H
  159. struct termios savetty;
  160. struct termios newtty;
  161. #else
  162. struct termio savetty;
  163. struct termio newtty;
  164. #endif
  166. void
  167. reset_tty()
  168. {
  169. #ifdef HAVE_TERMIOS_H
  170.   if(tcsetattr(0, TCSANOW, &savetty) == -1)
  171. #else
  172.   if(ioctl(0, TCSETAF, &savetty)==-1)
  173. #endif
  174.     {
  175. #ifdef USE_LIBSCHILY
  176.       comerr("Cannot put tty into normal moden");
  177. #else
  178.       printf("Cannot put tty into normal moden");
  179.       exit(1);
  180. #endif
  181.     }
  182. }
  184. void
  185. set_tty()
  186. {
  187. #ifdef HAVE_TERMIOS_H
  188.   if(tcsetattr(0, TCSANOW, &newtty) == -1)
  189. #else
  190.   if(ioctl(0, TCSETAF, &newtty)==-1)
  191. #endif
  192.     {
  193. #ifdef USE_LIBSCHILY
  194.       comerr("Cannot put tty into raw moden");
  195. #else
  196.       printf("Cannot put tty into raw moden");
  197.       exit(1);
  198. #endif
  199.     }
  200. }
  202. /* Come here when we get a suspend signal from the terminal */
  204. void
  205. onsusp (signo)
  206. int signo;
  207. {
  208. #ifdef SIGTTOU
  209.     /* ignore SIGTTOU so we don't get stopped if csh grabs the tty */
  210.     signal(SIGTTOU, SIG_IGN);
  211. #endif
  212.     reset_tty ();
  213.     fflush (stdout);
  214. #ifdef SIGTTOU
  215.     signal(SIGTTOU, SIG_DFL);
  216.     /* Send the TSTP signal to suspend our process group */
  217.     signal(SIGTSTP, SIG_DFL);
  218. /*    sigsetmask(0);*/
  219.     kill (0, SIGTSTP);
  220.     /* Pause for station break */
  222.     /* We're back */
  223.     signal (SIGTSTP, onsusp);
  224. #endif
  225.     set_tty ();
  226. }
  230. void
  231. crsr2(row, col)
  232. int row;
  233. int col;
  234. {
  235.   printf("33[%d;%dH",row,col);
  236. }
  238. int parse_rr(pnt, len, cont_flag)
  239. unsigned char *pnt;
  240. int len;
  241. int cont_flag;
  242. {
  243. int slen;
  244. int ncount;
  245. int extent;
  246. int cont_extent, cont_offset, cont_size;
  247. int flag1, flag2;
  248. unsigned char *pnts;
  249. char symlinkname[1024];
  250. char name[1024];
  251. int goof;
  252. /* printf(" RRlen=%d ", len); */
  254. symlinkname[0] = 0;
  256. cont_extent = cont_offset = cont_size = 0;
  258. ncount = 0;
  259. flag1 = flag2 = 0;
  260. while(len >= 4){
  261. if(ncount) printf(",");
  262. else printf("[");
  263. printf("%c%c", pnt[0], pnt[1]);
  264. if(pnt[3] != 1 && pnt[3] != 2) {
  265.   printf("**BAD RRVERSION (%d) for %c%cn", pnt[3], pnt[0], pnt[1]);
  266.   return 0; /* JS ??? Is this right ??? */
  267. } else if (pnt[0] == 'R' && pnt[1] == 'R') {
  268. printf("=%d", pnt[3]);
  269. }
  270. ncount++;
  271. if(pnt[0] == 'R' && pnt[1] == 'R') flag1 = pnt[4] & 0xff;
  272. if(strncmp((char *)pnt, "PX", 2) == 0) flag2 |= 1;
  273. if(strncmp((char *)pnt, "PN", 2) == 0) flag2 |= 2;
  274. if(strncmp((char *)pnt, "SL", 2) == 0) flag2 |= 4;
  275. if(strncmp((char *)pnt, "NM", 2) == 0) {
  276.   slen = pnt[2] - 5;
  277.   pnts = pnt+5;
  278.   if( (pnt[4] & 6) != 0 )
  279.     {
  280.       printf("*");
  281.     }
  282.   memset(name, 0, sizeof(name));
  283.   memcpy(name, pnts, slen);
  284.   printf("=%s", name);
  285.   flag2 |= 8;
  286. }
  287. if(strncmp((char *)pnt, "CL", 2) == 0) flag2 |= 16;
  288. if(strncmp((char *)pnt, "PL", 2) == 0) flag2 |= 32;
  289. if(strncmp((char *)pnt, "RE", 2) == 0) flag2 |= 64;
  290. if(strncmp((char *)pnt, "TF", 2) == 0) flag2 |= 128;
  292. if(strncmp((char *)pnt, "PX", 2) == 0) {
  293. extent = isonum_733(pnt+12);
  294. printf("=%x", extent);
  295. };
  297. if(strncmp((char *)pnt, "CE", 2) == 0) {
  298. cont_extent = isonum_733(pnt+4);
  299. cont_offset = isonum_733(pnt+12);
  300. cont_size = isonum_733(pnt+20);
  301. printf("=[%x,%x,%d]", cont_extent, cont_offset, 
  302.        cont_size);
  303. };
  305. if(strncmp((char *)pnt, "PL", 2) == 0 || strncmp((char *)pnt, "CL", 2) == 0) {
  306. extent = isonum_733(pnt+4);
  307. printf("=%x", extent);
  308. };
  310. if(strncmp((char *)pnt, "SL", 2) == 0) {
  311.         int cflag;
  313. cflag = pnt[4];
  314. pnts = pnt+5;
  315. slen = pnt[2] - 5;
  316. while(slen >= 1){
  317. switch(pnts[0] & 0xfe){
  318. case 0:
  319. strncat(symlinkname, (char *)(pnts+2), pnts[1]);
  320. break;
  321. case 2:
  322. strcat (symlinkname, ".");
  323. break;
  324. case 4:
  325. strcat (symlinkname, "..");
  326. break;
  327. case 8:
  328. if((pnts[0] & 1) == 0)strcat (symlinkname, "/");
  329. break;
  330. case 16:
  331. strcat(symlinkname,"/mnt");
  332. printf("Warning - mount point requested");
  333. break;
  334. case 32:
  335. strcat(symlinkname,"kafka");
  336. printf("Warning - host_name requested");
  337. break;
  338. default:
  339. printf("Reserved bit setting in symlink");
  340. goof++;
  341. break;
  342. };
  343. if((pnts[0] & 0xfe) && pnts[1] != 0) {
  344. printf("Incorrect length in symlink component");
  345. };
  346. if((pnts[0] & 1) == 0) strcat(symlinkname,"/");
  348. slen -= (pnts[1] + 2);
  349. pnts += (pnts[1] + 2);
  351.        };
  352. if(cflag) strcat(symlinkname, "+");
  353. printf("=%s", symlinkname);
  354. symlinkname[0] = 0;
  355. };
  357. len -= pnt[2];
  358. pnt += pnt[2];
  359. if(len <= 3 && cont_extent) {
  360.   unsigned char sector[2048];
  361.   lseek(fileno(infile), cont_extent * blocksize, 0);
  362.   read(fileno(infile), sector, sizeof(sector));
  363.   flag2 |= parse_rr(&sector[cont_offset], cont_size, 1);
  364. };
  365. };
  366. if(ncount) printf("]");
  367. if (!cont_flag && flag1 != flag2) {
  368.   printf("Flag %x != %x", flag1, flag2);
  369.   goof++;
  370. }
  371. return flag2;
  372. }
  374. void
  375. dump_rr(idr)
  376. struct iso_directory_record *idr;
  377. {
  378. int len;
  379. unsigned char * pnt;
  381. len = idr->length[0] & 0xff;
  382. len -= sizeof(struct iso_directory_record);
  383. len += sizeof(idr->name);
  384. len -= idr->name_len[0];
  385. pnt = (unsigned char *) idr;
  386. pnt += sizeof(struct iso_directory_record);
  387. pnt -= sizeof(idr->name);
  388. pnt += idr->name_len[0];
  389. if((idr->name_len[0] & 1) == 0){
  390. pnt++;
  391. len--;
  392. };
  393. parse_rr(pnt, len, 0);
  394. }
  397. void
  398. showblock(flag)
  399. int flag;
  400. {
  401.   int i, j;
  402.   int line;
  403.   struct iso_directory_record * idr;
  404.   lseek(fileno(infile), file_addr, 0);
  405.   read(fileno(infile), buffer, sizeof(buffer));
  406.   for(i=0;i<60;i++) printf("n");
  407.   fflush(stdout);
  408.   i = line = 0;
  409.   if(flag) {
  410.   while(1==1){
  411.   crsr2(line+3,1);
  412.   idr = (struct iso_directory_record *) &buffer[i];
  413.   if(idr->length[0] == 0) break;
  414.   printf("%3d ", idr->length[0]);
  415.   printf("[%2d] ", idr->volume_sequence_number[0]);
  416.   printf("%5x ", isonum_733(idr->extent));
  417.   printf("%8d ", isonum_733(idr->size));
  418.   printf("%02x/", idr->flags[0]);
  419.   printf ((idr->flags[0] & 2) ? "*" : " "); 
  420.   if(idr->name_len[0] == 1 && idr->name[0] == 0)
  421.   printf(".             ");
  422.   else if(idr->name_len[0] == 1 && idr->name[0] == 1)
  423.   printf("..            ");
  424.   else {
  425.   for(j=0; j<idr->name_len[0]; j++) printf("%c", idr->name[j]);
  426.   for(j=0; j<14 -idr->name_len[0]; j++) printf(" ");
  427.   };
  428.   dump_rr(idr);
  429.   printf("n");
  430.   i += buffer[i];
  431.   if (i > 2048 - sizeof(struct iso_directory_record)) break;
  432.   line++;
  433.   };
  434.   };
  435.   printf("n");
  436.   printf(" Zone, zone offset: %6x %4.4x  ",file_addr / blocksize, 
  437.  file_addr & (blocksize - 1));
  438.   fflush(stdout);
  439. }
  441. int
  442. getbyte()
  443. {
  444.   char c1;
  445.   c1 = buffer[file_addr & (blocksize-1)];
  446.   file_addr++;
  447.   if ((file_addr & (blocksize-1)) == 0) showblock(0);
  448.   return c1;
  449. }
  451. void
  452. usage(excode)
  453. int excode;
  454. {
  455. errmsgno(EX_BAD, "Usage: %s [options] imagen",
  456.                 get_progname());
  458. error("Options:n");
  459. exit(excode);
  460. }
  462. int
  463. main(argc, argv)
  464. int argc;
  465. char *argv[];
  466. {
  467.   char c;
  468.   int i;
  469.   struct iso_primary_descriptor ipd;
  470.   struct iso_directory_record * idr;
  472. save_args(argc, argv);
  474.   if(argc < 2)
  475. usage(EX_BAD);
  476.   infile = fopen(argv[1],"rb");
  477.   if (infile == NULL) {
  478. #ifdef USE_LIBSCHILY
  479. comerr("Cannot open '%s'.n", argv[1]);
  480. #else
  481. printf("Cannot open '%s'.n", argv[1]);
  482. exit(1);
  483. #endif
  484.   }
  486.   file_addr = 16 << 11;
  487.   lseek(fileno(infile), file_addr, 0);
  488.   read(fileno(infile), &ipd, sizeof(ipd));
  490.   idr = (struct iso_directory_record *)ipd.root_directory_record;
  492.   blocksize = isonum_723((char *)ipd.logical_block_size);
  493.   if( blocksize != 512 && blocksize != 1024 && blocksize != 2048 )
  494.     {
  495.       blocksize = 2048;
  496.     }
  498.   file_addr = isonum_733(idr->extent);
  500.   file_addr = file_addr * blocksize;
  502. /* Now setup the keyboard for single character input. */
  503. #ifdef HAVE_TERMIOS_H 
  504. if(tcgetattr(0, &savetty) == -1)
  505. #else
  506. if(ioctl(0, TCGETA, &savetty) == -1)
  507. #endif
  508.   {
  509. #ifdef USE_LIBSCHILY
  510.     comerr("Stdin must be a ttyn");
  511. #else
  512.     printf("Stdin must be a ttyn");
  513.     exit(1);
  514. #endif
  515.   }
  516. newtty=savetty;
  517. newtty.c_lflag&=~ICANON;
  518. newtty.c_lflag&=~ECHO;
  519. newtty.c_cc[VMIN]=1;
  520.    set_tty();
  521. #ifdef SIGTSTP
  522. signal(SIGTSTP, onsusp);
  523. #endif
  525.   do{
  526.     if(file_addr < 0) file_addr = 0;
  527.     showblock(1);
  528.     read (0, &c, 1);
  529.     if (c == 'a') file_addr -= blocksize;
  530.     if (c == 'b') file_addr += blocksize;
  531.     if (c == 'g') {
  532.       crsr2(20,1);
  533.       printf("Enter new starting block (in hex):");
  534.       scanf("%x",&file_addr);
  535.       file_addr = file_addr * blocksize;
  536.       crsr2(20,1);
  537.       printf("                                     ");
  538.     };
  539.     if (c == 'f') {
  540.       crsr2(20,1);
  541.       printf("Enter new search string:");
  542.       fgets((char *)search,sizeof(search),stdin);
  543.       while(search[strlen((char *)search)-1] == 'n') search[strlen((char *)search)-1] = 0;
  544.       crsr2(20,1);
  545.       printf("                                     ");
  546.     };
  547.     if (c == '+') {
  548.       while(1==1){
  549. while(1==1){
  550.   c = getbyte();
  551.   if (c == search[0]) break;
  552. };
  553. for (i=1;i<strlen((char *)search);i++) 
  554.   if(search[i] != getbyte()) break;
  555. if(i==strlen((char *)search)) break;
  556.       };
  557.       file_addr &= ~(blocksize-1);
  558.       showblock(1);
  559.     };
  560.     if (c == 'q') break;
  561.   } while(1==1);
  562.   reset_tty();
  563.   fclose(infile);
  564.   return (0);
  565. }