437 lines
11 KiB
C
437 lines
11 KiB
C
/*
|
|
* File isodump.c - dump iso9660 directory information.
|
|
*
|
|
|
|
Written by Eric Youngdale (1993).
|
|
|
|
Copyright 1993 Yggdrasil Computing, Incorporated
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
|
|
|
#include "../config.h"
|
|
|
|
#include <stdio.h>
|
|
#ifdef USE_TERMIOS
|
|
#include <termios.h>
|
|
#include <sys/ioctl.h>
|
|
#else
|
|
#include <termio.h>
|
|
#endif
|
|
#include <signal.h>
|
|
|
|
FILE * infile;
|
|
int file_addr;
|
|
unsigned char buffer[2048];
|
|
unsigned char search[64];
|
|
|
|
#define PAGE sizeof(buffer)
|
|
|
|
#define ISODCL(from, to) (to - from + 1)
|
|
|
|
|
|
int
|
|
isonum_731 (char * p)
|
|
{
|
|
return ((p[0] & 0xff)
|
|
| ((p[1] & 0xff) << 8)
|
|
| ((p[2] & 0xff) << 16)
|
|
| ((p[3] & 0xff) << 24));
|
|
}
|
|
|
|
|
|
int
|
|
isonum_733 (unsigned char * p)
|
|
{
|
|
return (isonum_731 (p));
|
|
}
|
|
|
|
struct iso_primary_descriptor {
|
|
unsigned char type [ISODCL ( 1, 1)]; /* 711 */
|
|
unsigned char id [ISODCL ( 2, 6)];
|
|
unsigned char version [ISODCL ( 7, 7)]; /* 711 */
|
|
unsigned char unused1 [ISODCL ( 8, 8)];
|
|
unsigned char system_id [ISODCL ( 9, 40)]; /* aunsigned chars */
|
|
unsigned char volume_id [ISODCL ( 41, 72)]; /* dunsigned chars */
|
|
unsigned char unused2 [ISODCL ( 73, 80)];
|
|
unsigned char volume_space_size [ISODCL ( 81, 88)]; /* 733 */
|
|
unsigned char unused3 [ISODCL ( 89, 120)];
|
|
unsigned char volume_set_size [ISODCL (121, 124)]; /* 723 */
|
|
unsigned char volume_sequence_number [ISODCL (125, 128)]; /* 723 */
|
|
unsigned char logical_block_size [ISODCL (129, 132)]; /* 723 */
|
|
unsigned char path_table_size [ISODCL (133, 140)]; /* 733 */
|
|
unsigned char type_l_path_table [ISODCL (141, 144)]; /* 731 */
|
|
unsigned char opt_type_l_path_table [ISODCL (145, 148)]; /* 731 */
|
|
unsigned char type_m_path_table [ISODCL (149, 152)]; /* 732 */
|
|
unsigned char opt_type_m_path_table [ISODCL (153, 156)]; /* 732 */
|
|
unsigned char root_directory_record [ISODCL (157, 190)]; /* 9.1 */
|
|
unsigned char volume_set_id [ISODCL (191, 318)]; /* dunsigned chars */
|
|
unsigned char publisher_id [ISODCL (319, 446)]; /* achars */
|
|
unsigned char preparer_id [ISODCL (447, 574)]; /* achars */
|
|
unsigned char application_id [ISODCL (575, 702)]; /* achars */
|
|
unsigned char copyright_file_id [ISODCL (703, 739)]; /* 7.5 dchars */
|
|
unsigned char abstract_file_id [ISODCL (740, 776)]; /* 7.5 dchars */
|
|
unsigned char bibliographic_file_id [ISODCL (777, 813)]; /* 7.5 dchars */
|
|
unsigned char creation_date [ISODCL (814, 830)]; /* 8.4.26.1 */
|
|
unsigned char modification_date [ISODCL (831, 847)]; /* 8.4.26.1 */
|
|
unsigned char expiration_date [ISODCL (848, 864)]; /* 8.4.26.1 */
|
|
unsigned char effective_date [ISODCL (865, 881)]; /* 8.4.26.1 */
|
|
unsigned char file_structure_version [ISODCL (882, 882)]; /* 711 */
|
|
unsigned char unused4 [ISODCL (883, 883)];
|
|
unsigned char application_data [ISODCL (884, 1395)];
|
|
unsigned char unused5 [ISODCL (1396, 2048)];
|
|
};
|
|
|
|
struct iso_directory_record {
|
|
unsigned char length [ISODCL (1, 1)]; /* 711 */
|
|
unsigned char ext_attr_length [ISODCL (2, 2)]; /* 711 */
|
|
unsigned char extent [ISODCL (3, 10)]; /* 733 */
|
|
unsigned char size [ISODCL (11, 18)]; /* 733 */
|
|
unsigned char date [ISODCL (19, 25)]; /* 7 by 711 */
|
|
unsigned char flags [ISODCL (26, 26)];
|
|
unsigned char file_unit_size [ISODCL (27, 27)]; /* 711 */
|
|
unsigned char interleave [ISODCL (28, 28)]; /* 711 */
|
|
unsigned char volume_sequence_number [ISODCL (29, 32)]; /* 723 */
|
|
unsigned char name_len [ISODCL (33, 33)]; /* 711 */
|
|
unsigned char name [1];
|
|
};
|
|
|
|
#ifdef USE_TERMIOS
|
|
struct termios savetty;
|
|
struct termios newtty;
|
|
#else
|
|
struct termio savetty;
|
|
struct termio newtty;
|
|
#endif
|
|
|
|
reset_tty(){
|
|
#ifdef USE_TERMIOS
|
|
if(tcsetattr(0, TCSANOW, &savetty) == -1)
|
|
#else
|
|
if(ioctl(0, TCSETAF, &savetty)==-1)
|
|
#endif
|
|
{
|
|
printf("cannot put tty into normal mode\n");
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
set_tty(){
|
|
#ifdef USE_TERMIOS
|
|
if(tcsetattr(0, TCSANOW, &newtty) == -1)
|
|
#else
|
|
if(ioctl(0, TCSETAF, &newtty)==-1)
|
|
#endif
|
|
{
|
|
printf("cannot put tty into raw mode\n");
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
/* Come here when we get a suspend signal from the terminal */
|
|
|
|
onsusp ()
|
|
{
|
|
/* ignore SIGTTOU so we don't get stopped if csh grabs the tty */
|
|
signal(SIGTTOU, SIG_IGN);
|
|
reset_tty ();
|
|
fflush (stdout);
|
|
signal(SIGTTOU, SIG_DFL);
|
|
/* Send the TSTP signal to suspend our process group */
|
|
signal(SIGTSTP, SIG_DFL);
|
|
/* sigsetmask(0);*/
|
|
kill (0, SIGTSTP);
|
|
/* Pause for station break */
|
|
|
|
/* We're back */
|
|
signal (SIGTSTP, onsusp);
|
|
set_tty ();
|
|
}
|
|
|
|
|
|
|
|
crsr2(int row, int col){
|
|
printf("\033[%d;%dH",row,col);
|
|
}
|
|
|
|
int parse_rr(unsigned char * pnt, int len, int cont_flag)
|
|
{
|
|
int slen;
|
|
int ncount;
|
|
int extent;
|
|
int cont_extent, cont_offset, cont_size;
|
|
int flag1, flag2;
|
|
unsigned char *pnts;
|
|
char symlink[1024];
|
|
int goof;
|
|
/* printf(" RRlen=%d ", len); */
|
|
|
|
symlink[0] = 0;
|
|
|
|
cont_extent = cont_offset = cont_size = 0;
|
|
|
|
ncount = 0;
|
|
flag1 = flag2 = 0;
|
|
while(len >= 4){
|
|
if(ncount) printf(",");
|
|
else printf("[");
|
|
printf("%c%c", pnt[0], pnt[1]);
|
|
if(pnt[3] != 1) {
|
|
printf("**BAD RRVERSION");
|
|
return;
|
|
};
|
|
ncount++;
|
|
if(pnt[0] == 'R' && pnt[1] == 'R') flag1 = pnt[4] & 0xff;
|
|
if(strncmp(pnt, "PX", 2) == 0) flag2 |= 1;
|
|
if(strncmp(pnt, "PN", 2) == 0) flag2 |= 2;
|
|
if(strncmp(pnt, "SL", 2) == 0) flag2 |= 4;
|
|
if(strncmp(pnt, "NM", 2) == 0) flag2 |= 8;
|
|
if(strncmp(pnt, "CL", 2) == 0) flag2 |= 16;
|
|
if(strncmp(pnt, "PL", 2) == 0) flag2 |= 32;
|
|
if(strncmp(pnt, "RE", 2) == 0) flag2 |= 64;
|
|
if(strncmp(pnt, "TF", 2) == 0) flag2 |= 128;
|
|
|
|
if(strncmp(pnt, "PX", 2) == 0) {
|
|
extent = isonum_733(pnt+12);
|
|
printf("=%x", extent);
|
|
};
|
|
|
|
if(strncmp(pnt, "CE", 2) == 0) {
|
|
cont_extent = isonum_733(pnt+4);
|
|
cont_offset = isonum_733(pnt+12);
|
|
cont_size = isonum_733(pnt+20);
|
|
printf("=[%x,%x,%d]", cont_extent, cont_offset,
|
|
cont_size);
|
|
};
|
|
|
|
if(strncmp(pnt, "PL", 2) == 0 || strncmp(pnt, "CL", 2) == 0) {
|
|
extent = isonum_733(pnt+4);
|
|
printf("=%x", extent);
|
|
};
|
|
|
|
if(strncmp(pnt, "SL", 2) == 0) {
|
|
int cflag;
|
|
|
|
cflag = pnt[4];
|
|
pnts = pnt+5;
|
|
slen = pnt[2] - 5;
|
|
while(slen >= 1){
|
|
switch(pnts[0] & 0xfe){
|
|
case 0:
|
|
strncat(symlink, pnts+2, pnts[1]);
|
|
break;
|
|
case 2:
|
|
strcat (symlink, ".");
|
|
break;
|
|
case 4:
|
|
strcat (symlink, "..");
|
|
break;
|
|
case 8:
|
|
if((pnts[0] & 1) == 0)strcat (symlink, "/");
|
|
break;
|
|
case 16:
|
|
strcat(symlink,"/mnt");
|
|
printf("Warning - mount point requested");
|
|
break;
|
|
case 32:
|
|
strcat(symlink,"kafka");
|
|
printf("Warning - host_name requested");
|
|
break;
|
|
default:
|
|
printf("Reserved bit setting in symlink", goof++);
|
|
break;
|
|
};
|
|
if((pnts[0] & 0xfe) && pnts[1] != 0) {
|
|
printf("Incorrect length in symlink component");
|
|
};
|
|
if((pnts[0] & 1) == 0) strcat(symlink,"/");
|
|
|
|
slen -= (pnts[1] + 2);
|
|
pnts += (pnts[1] + 2);
|
|
|
|
};
|
|
if(cflag) printf("+");
|
|
printf("=%s", symlink);
|
|
symlink[0] = 0;
|
|
};
|
|
|
|
len -= pnt[2];
|
|
pnt += pnt[2];
|
|
if(len <= 3 && cont_extent) {
|
|
unsigned char sector[2048];
|
|
lseek(fileno(infile), cont_extent << 11, 0);
|
|
read(fileno(infile), sector, sizeof(sector));
|
|
flag2 |= parse_rr(§or[cont_offset], cont_size, 1);
|
|
};
|
|
};
|
|
if(ncount) printf("]");
|
|
if (!cont_flag && flag1 != flag2)
|
|
printf("Flag %x != %x", flag1, flag2, goof++);
|
|
return flag2;
|
|
}
|
|
|
|
int
|
|
dump_rr(struct iso_directory_record * idr)
|
|
{
|
|
int len;
|
|
unsigned char * pnt;
|
|
|
|
len = idr->length[0] & 0xff;
|
|
len -= sizeof(struct iso_directory_record);
|
|
len += sizeof(idr->name);
|
|
len -= idr->name_len[0];
|
|
pnt = (unsigned char *) idr;
|
|
pnt += sizeof(struct iso_directory_record);
|
|
pnt -= sizeof(idr->name);
|
|
pnt += idr->name_len[0];
|
|
if((idr->name_len[0] & 1) == 0){
|
|
pnt++;
|
|
len--;
|
|
};
|
|
parse_rr(pnt, len, 0);
|
|
}
|
|
|
|
|
|
showblock(int flag){
|
|
unsigned int k;
|
|
int i, j;
|
|
int line;
|
|
struct iso_directory_record * idr;
|
|
lseek(fileno(infile), file_addr, 0);
|
|
read(fileno(infile), buffer, sizeof(buffer));
|
|
for(i=0;i<60;i++) printf("\n");
|
|
fflush(stdout);
|
|
i = line = 0;
|
|
if(flag) {
|
|
while(1==1){
|
|
crsr2(line+3,1);
|
|
idr = (struct iso_directory_record *) &buffer[i];
|
|
if(idr->length[0] == 0) break;
|
|
printf("%3d ", idr->length[0]);
|
|
printf("[%2d] ", idr->volume_sequence_number[0]);
|
|
printf("%5x ", isonum_733(idr->extent));
|
|
printf("%8d ", isonum_733(idr->size));
|
|
printf ((idr->flags[0] & 2) ? "*" : " ");
|
|
if(idr->name_len[0] == 1 && idr->name[0] == 0)
|
|
printf(". ");
|
|
else if(idr->name_len[0] == 1 && idr->name[0] == 1)
|
|
printf(".. ");
|
|
else {
|
|
for(j=0; j<idr->name_len[0]; j++) printf("%c", idr->name[j]);
|
|
for(j=0; j<14 -idr->name_len[0]; j++) printf(" ");
|
|
};
|
|
dump_rr(idr);
|
|
printf("\n");
|
|
i += buffer[i];
|
|
if (i > 2048 - sizeof(struct iso_directory_record)) break;
|
|
line++;
|
|
};
|
|
};
|
|
printf("\n");
|
|
printf(" Zone, zone offset: %6x %4.4x ",file_addr>>11, file_addr & 0x7ff);
|
|
fflush(stdout);
|
|
}
|
|
|
|
getbyte()
|
|
{
|
|
char c1;
|
|
c1 = buffer[file_addr & (PAGE-1)];
|
|
file_addr++;
|
|
if ((file_addr & (PAGE-1)) == 0) showblock(0);
|
|
return c1;
|
|
}
|
|
|
|
main(int argc, char * argv[]){
|
|
char c;
|
|
char buffer[2048];
|
|
int nbyte;
|
|
int i,j;
|
|
struct iso_primary_descriptor ipd;
|
|
struct iso_directory_record * idr;
|
|
|
|
if(argc < 2) return 0;
|
|
infile = fopen(argv[1],"rb");
|
|
|
|
file_addr = 16 << 11;
|
|
lseek(fileno(infile), file_addr, 0);
|
|
read(fileno(infile), &ipd, sizeof(ipd));
|
|
|
|
idr = (struct iso_directory_record *) &ipd.root_directory_record;
|
|
|
|
file_addr = isonum_733(idr->extent);
|
|
|
|
file_addr = file_addr << 11;
|
|
|
|
/* Now setup the keyboard for single character input. */
|
|
#ifdef USE_TERMIOS
|
|
if(tcgetattr(0, &savetty) == -1)
|
|
#else
|
|
if(ioctl(0, TCGETA, &savetty) == -1)
|
|
#endif
|
|
{
|
|
printf("stdin must be a tty\n");
|
|
exit(1);
|
|
}
|
|
newtty=savetty;
|
|
newtty.c_lflag&=~ICANON;
|
|
newtty.c_lflag&=~ECHO;
|
|
newtty.c_cc[VMIN]=1;
|
|
set_tty();
|
|
signal(SIGTSTP, onsusp);
|
|
|
|
do{
|
|
if(file_addr < 0) file_addr = 0;
|
|
showblock(1);
|
|
read (0, &c, 1);
|
|
if (c == 'a') file_addr -= PAGE;
|
|
if (c == 'b') file_addr += PAGE;
|
|
if (c == 'g') {
|
|
crsr2(20,1);
|
|
printf("Enter new starting block (in hex):");
|
|
scanf("%x",&file_addr);
|
|
file_addr = file_addr << 11;
|
|
crsr2(20,1);
|
|
printf(" ");
|
|
};
|
|
if (c == 'f') {
|
|
crsr2(20,1);
|
|
printf("Enter new search string:");
|
|
fgets(search,sizeof(search),stdin);
|
|
while(search[strlen(search)-1] == '\n') search[strlen(search)-1] = 0;
|
|
crsr2(20,1);
|
|
printf(" ");
|
|
};
|
|
if (c == '+') {
|
|
while(1==1){
|
|
while(1==1){
|
|
c = getbyte(&file_addr);
|
|
if (c == search[0]) break;
|
|
};
|
|
for (j=1;j<strlen(search);j++)
|
|
if(search[j] != getbyte()) break;
|
|
if(j==strlen(search)) break;
|
|
};
|
|
file_addr &= ~(PAGE-1);
|
|
showblock(1);
|
|
};
|
|
if (c == 'q') break;
|
|
} while(1==1);
|
|
reset_tty();
|
|
fclose(infile);
|
|
}
|
|
|
|
|
|
|
|
|