diff --git a/dos33fs-utils/TODO b/dos33fs-utils/TODO new file mode 100644 index 00000000..c386fafd --- /dev/null +++ b/dos33fs-utils/TODO @@ -0,0 +1,2 @@ +getopt in dos33fs +BSAVE/BLOAD command in dos33fs, get rid of need for makeb diff --git a/dos33fs-utils/dos33.c b/dos33fs-utils/dos33.c index 418680ea..b3bbfc1f 100644 --- a/dos33fs-utils/dos33.c +++ b/dos33fs-utils/dos33.c @@ -10,33 +10,35 @@ #include "dos33.h" +static int debug=1; + static unsigned char sector_buffer[BYTES_PER_SECTOR]; static int ones_lookup[16]={ - /* 0x0 = 0000 */ 0, - /* 0x1 = 0001 */ 1, - /* 0x2 = 0010 */ 1, - /* 0x3 = 0011 */ 2, - /* 0x4 = 0100 */ 1, - /* 0x5 = 0101 */ 2, - /* 0x6 = 0110 */ 2, - /* 0x7 = 0111 */ 3, - /* 0x8 = 1000 */ 1, - /* 0x9 = 1001 */ 2, - /* 0xA = 1010 */ 2, - /* 0xB = 1011 */ 3, - /* 0xC = 1100 */ 2, - /* 0xd = 1101 */ 3, - /* 0xe = 1110 */ 3, - /* 0xf = 1111 */ 4, + /* 0x0 = 0000 */ 0, + /* 0x1 = 0001 */ 1, + /* 0x2 = 0010 */ 1, + /* 0x3 = 0011 */ 2, + /* 0x4 = 0100 */ 1, + /* 0x5 = 0101 */ 2, + /* 0x6 = 0110 */ 2, + /* 0x7 = 0111 */ 3, + /* 0x8 = 1000 */ 1, + /* 0x9 = 1001 */ 2, + /* 0xA = 1010 */ 2, + /* 0xB = 1011 */ 3, + /* 0xC = 1100 */ 2, + /* 0xd = 1101 */ 3, + /* 0xe = 1110 */ 3, + /* 0xf = 1111 */ 4, }; static unsigned char get_high_byte(int value) { - return (value>>8)&0xff; + return (value>>8)&0xff; } static unsigned char get_low_byte(int value) { - return (value&0xff); + return (value&0xff); } @@ -44,150 +46,151 @@ static unsigned char get_low_byte(int value) { #define FILE_DELETED 1 static unsigned char dos33_file_type(int value) { - - unsigned char result; - - switch(value&0x7f){ - case 0x0: result='T'; break; - case 0x1: result='I'; break; - case 0x2: result='A'; break; - case 0x4: result='B'; break; - case 0x8: result='S'; break; - case 0x10: result='R'; break; - case 0x20: result='N'; break; - case 0x40: result='L'; break; - default: result='?'; break; - } - return result; + + unsigned char result; + + switch(value&0x7f) { + case 0x0: result='T'; break; + case 0x1: result='I'; break; + case 0x2: result='A'; break; + case 0x4: result='B'; break; + case 0x8: result='S'; break; + case 0x10: result='R'; break; + case 0x20: result='N'; break; + case 0x40: result='L'; break; + default: result='?'; break; + } + return result; } static unsigned char dos33_char_to_type(char type,int lock) { - - unsigned char result,temp_type; - - temp_type=type; - /* Covert to upper case */ - if (temp_type>='a') temp_type=temp_type-0x20; - - switch(temp_type) { - case 'T': result=0x0; break; - case 'I': result=0x1; break; - case 'A': result=0x2; break; - case 'B': result=0x4; break; - case 'S': result=0x8; break; - case 'R': result=0x10; break; - case 'N': result=0x20; break; - case 'L': result=0x40; break; - default: result=0x0; - } - if (lock) result|=0x80; - return result; + + unsigned char result,temp_type; + + temp_type=type; + /* Covert to upper case */ + if (temp_type>='a') temp_type=temp_type-0x20; + + switch(temp_type) { + case 'T': result=0x0; break; + case 'I': result=0x1; break; + case 'A': result=0x2; break; + case 'B': result=0x4; break; + case 'S': result=0x8; break; + case 'R': result=0x10; break; + case 'N': result=0x20; break; + case 'L': result=0x40; break; + default: result=0x0; + } + if (lock) result|=0x80; + return result; } - /* dos33 filenames have top bit set on ascii chars */ - /* and are padded with spaces */ + /* dos33 filenames have top bit set on ascii chars */ + /* and are padded with spaces */ static char *dos33_filename_to_ascii(char *dest,unsigned char *src,int len) { - - int i=0,last_nonspace=0; - - for(i=0;i>4)&0xf]; - sectors_free+=ones_lookup[bitmap[1]&0xf]; - sectors_free+=ones_lookup[(bitmap[1]>>4)&0xf]; - } - - return sectors_free*BYTES_PER_SECTOR; + unsigned char bitmap[4]; + int i,sectors_free=0; + + /* Read Vtoc */ + dos33_read_vtoc(fd); + + for(i=0;i>4)&0xf]; + sectors_free+=ones_lookup[bitmap[1]&0xf]; + sectors_free+=ones_lookup[(bitmap[1]>>4)&0xf]; + } + + return sectors_free*BYTES_PER_SECTOR; } - /* Get a T/S value from a Catalog Sector */ + /* Get a T/S value from a Catalog Sector */ static int dos33_get_catalog_ts(int fd) { - dos33_read_vtoc(fd); - - return TS_TO_INT(sector_buffer[VTOC_CATALOG_T], - sector_buffer[VTOC_CATALOG_S]); + + dos33_read_vtoc(fd); + + return TS_TO_INT(sector_buffer[VTOC_CATALOG_T], + sector_buffer[VTOC_CATALOG_S]); } - /* returns the next valid catalog entry */ - /* after the one passed in */ + /* returns the next valid catalog entry */ + /* after the one passed in */ static int dos33_find_next_file(int fd,int catalog_tsf) { - - int catalog_track,catalog_sector,catalog_file; - int file_track,i; - int result; + int catalog_track,catalog_sector,catalog_file; + int file_track,i; + int result; - catalog_file=catalog_tsf>>16; - catalog_track=(catalog_tsf>>8)&0xff; - catalog_sector=(catalog_tsf&0xff); + catalog_file=catalog_tsf>>16; + catalog_track=(catalog_tsf>>8)&0xff; + catalog_sector=(catalog_tsf&0xff); catalog_loop: - - /* Read in Catalog Sector */ - lseek(fd,DISK_OFFSET(catalog_track,catalog_sector),SEEK_SET); - result=read(fd,sector_buffer,BYTES_PER_SECTOR); - - i=catalog_file; - while(i<7) { - - file_track=sector_buffer[CATALOG_FILE_LIST+(i*CATALOG_ENTRY_SIZE)]; - /* 0xff means file deleted */ - /* 0x0 means empty */ - if ((file_track!=0xff) && (file_track!=0x0)){ - return ((i<<16)+(catalog_track<<8)+catalog_sector); - } - i++; - } - catalog_track=sector_buffer[CATALOG_NEXT_T]; - catalog_sector=sector_buffer[CATALOG_NEXT_S]; - if (catalog_sector!=0) { - catalog_file=0; - goto catalog_loop; - } - if (result<0) fprintf(stderr,"Error on I/O\n"); - - return -1; + /* Read in Catalog Sector */ + lseek(fd,DISK_OFFSET(catalog_track,catalog_sector),SEEK_SET); + result=read(fd,sector_buffer,BYTES_PER_SECTOR); + + i=catalog_file; + while(i<7) { + + file_track=sector_buffer[CATALOG_FILE_LIST+ + (i*CATALOG_ENTRY_SIZE)]; + /* 0xff means file deleted */ + /* 0x0 means empty */ + if ((file_track!=0xff) && (file_track!=0x0)) { + return ((i<<16)+(catalog_track<<8)+catalog_sector); + } + i++; + } + catalog_track=sector_buffer[CATALOG_NEXT_T]; + catalog_sector=sector_buffer[CATALOG_NEXT_S]; + if (catalog_sector!=0) { + catalog_file=0; + goto catalog_loop; + } + + if (result<0) fprintf(stderr,"Error on I/O\n"); + + return -1; } static int dos33_print_file_info(int fd,int catalog_tsf) { @@ -421,89 +424,98 @@ found_one: return ((found_track<<8)+found_sector); } - /* creates file apple_filename on the image from local file filename */ - /* returns ?? */ +#define ERROR_INVALID_FILENAME 1 +#define ERROR_FILE_NOT_FOUND 2 +#define ERROR_NO_SPACE 3 +#define ERROR_IMAGE_NOT_FOUND 4 +#define ERROR_CATALOG_FULL 5 + + /* creates file apple_filename on the image from local file filename */ + /* returns ?? */ static int dos33_add_file(int fd,char type,char *filename, - char *apple_filename) { - - int free_space,file_size,needed_sectors; - struct stat file_info; - int size_in_sectors=0; - int initial_ts_list=0,ts_list=0,i,data_ts,x,bytes_read=0,old_ts_list; - int catalog_track,catalog_sector,sectors_used=0; - int input_fd; - int result; + char *apple_filename) { - if (apple_filename[0]<64) { - fprintf(stderr,"Error! First char of filename must be ASCII 64 or above!\n"); - exit(3); - } - { - int i; - - for(i=0;ifree_space) { - fprintf(stderr,"Error! Not enough free space on disk image (need %d have %d)\n", - needed_sectors*BYTES_PER_SECTOR,free_space); - exit(4); - } + if (apple_filename[0]<64) { + fprintf(stderr,"Error! First char of filename " + "must be ASCII 64 or above!\n"); + return ERROR_INVALID_FILENAME; + } - /* plus one because we need a sector for the tail */ - size_in_sectors=(file_size/BYTES_PER_SECTOR)+ - ((file_size%BYTES_PER_SECTOR)!=0); -// printf("Need to allocate %i data sectors\n",size_in_sectors); -// printf("Need to allocate %i total sectors\n",needed_sectors); - - /* Open the local file */ - input_fd=open(filename,O_RDONLY); - if (input_fd<0) { - fprintf(stderr,"Error! could not open %s\n",filename); - return -1; - } + /* Check for comma in filename */ + for(i=0;ifree_space) { + fprintf(stderr,"Error! Not enough free space " + "on disk image (need %d have %d)\n", + needed_sectors*BYTES_PER_SECTOR,free_space); + return ERROR_NO_SPACE; + } + + /* plus one because we need a sector for the tail */ + size_in_sectors=(file_size/BYTES_PER_SECTOR)+ + ((file_size%BYTES_PER_SECTOR)!=0); + if (debug) printf("Need to allocate %i data sectors\n",size_in_sectors); + if (debug) printf("Need to allocate %i total sectors\n",needed_sectors); + + /* Open the local file */ + input_fd=open(filename,O_RDONLY); + if (input_fd<0) { + fprintf(stderr,"Error! could not open %s\n",filename); + return ERROR_IMAGE_NOT_FOUND; + } + + i=0; + while (i>8)&0xff,ts_list&0xff),SEEK_SET); @@ -577,43 +589,50 @@ static int dos33_add_file(int fd,char type,char *filename, i++; } - - /* Add new file to Catalog */ - - /* read in vtoc */ - dos33_read_vtoc(fd); - - catalog_track=sector_buffer[VTOC_CATALOG_T]; - catalog_sector=sector_buffer[VTOC_CATALOG_S]; + + /* Add new file to Catalog */ + + /* read in vtoc */ + dos33_read_vtoc(fd); + + catalog_track=sector_buffer[VTOC_CATALOG_T]; + catalog_sector=sector_buffer[VTOC_CATALOG_S]; continue_parsing_catalog: - + /* Read in Catalog Sector */ - lseek(fd,DISK_OFFSET(catalog_track,catalog_sector),SEEK_SET); - result=read(fd,sector_buffer,BYTES_PER_SECTOR); - - /* Find empty directory entry */ - i=0; - while(i<7) { - if ((sector_buffer[CATALOG_FILE_LIST+(i*CATALOG_ENTRY_SIZE)]==0xff) || - (sector_buffer[CATALOG_FILE_LIST+(i*CATALOG_ENTRY_SIZE)]==0x00)) - goto got_a_dentry; - i++; - } - - if ((catalog_track=0x11) && (catalog_sector==1)) { - /* in theory can only have 105 files */ - /* if full, we have no recourse! */ - /* can we allocate new catalog sectors and point to them?? */ - fprintf(stderr,"Error! No more room for files!\n"); - return -1; - } + lseek(fd,DISK_OFFSET(catalog_track,catalog_sector),SEEK_SET); + result=read(fd,sector_buffer,BYTES_PER_SECTOR); - catalog_track=sector_buffer[CATALOG_NEXT_T]; - catalog_sector=sector_buffer[CATALOG_NEXT_S]; + /* Find empty directory entry */ + i=0; + while(i<7) { + /* for undelete purposes might want to skip 0xff */ + /* (deleted) files first and only use if no room */ + + if ((sector_buffer[CATALOG_FILE_LIST+ + (i*CATALOG_ENTRY_SIZE)]==0xff) || + (sector_buffer[CATALOG_FILE_LIST+ + (i*CATALOG_ENTRY_SIZE)]==0x00)) { + goto got_a_dentry; + } + i++; + } + + if ((catalog_track=0x11) && (catalog_sector==1)) { + /* in theory can only have 105 files */ + /* if full, we have no recourse! */ + /* can we allocate new catalog sectors */ + /* and point to them?? */ + fprintf(stderr,"Error! No more room for files!\n"); + return ERROR_CATALOG_FULL; + } + + catalog_track=sector_buffer[CATALOG_NEXT_T]; + catalog_sector=sector_buffer[CATALOG_NEXT_S]; + + goto continue_parsing_catalog; - goto continue_parsing_catalog; - got_a_dentry: // printf("Adding file at entry %i of catalog 0x%x:0x%x\n", // i,catalog_track,catalog_sector); @@ -1138,32 +1157,32 @@ int dos33_rename_hello(int fd, char *new_name) { return 0; } -int display_help(char *name) { - printf("\ndos33 version %s\n",VERSION); - printf("by Vince Weaver \n"); - printf("\n"); - printf("Usage: %s [-h] [-y] disk_image COMMAND [options]\n",name); - printf("\t-h : this help message\n"); - printf("\t-y : always answer yes for anying warning questions\n"); - printf("\n"); - printf(" Where disk_image is a valid dos3.3 disk image\n" - " and COMMAND is one of the following:\n"); - printf("\tCATALOG\n"); - printf("\tLOAD apple_file \n"); - printf("\tSAVE type local_file \n"); - printf("\tDELETE apple_file\n"); - printf("\tLOCK apple_file\n"); - printf("\tUNLOCK apple_file\n"); - printf("\tRENAME apple_file_old apple_file_new\n"); - printf("\tUNDELETE apple_file\n"); - printf("\tDUMP\n"); - printf("\tHELLO apple_file\n"); +static int display_help(char *name) { + printf("\ndos33 version %s\n",VERSION); + printf("by Vince Weaver \n"); + printf("\n"); + printf("Usage: %s [-h] [-y] disk_image COMMAND [options]\n",name); + printf("\t-h : this help message\n"); + printf("\t-y : always answer yes for anying warning questions\n"); + printf("\n"); + printf(" Where disk_image is a valid dos3.3 disk image\n" + " and COMMAND is one of the following:\n"); + printf("\tCATALOG\n"); + printf("\tLOAD apple_file \n"); + printf("\tSAVE type local_file \n"); + printf("\tDELETE apple_file\n"); + printf("\tLOCK apple_file\n"); + printf("\tUNLOCK apple_file\n"); + printf("\tRENAME apple_file_old apple_file_new\n"); + printf("\tUNDELETE apple_file\n"); + printf("\tDUMP\n"); + printf("\tHELLO apple_file\n"); #if 0 - printf("\tINIT\n"); - printf("\tCOPY\n"); -#endif - printf("\n"); - return 0; + printf("\tINIT\n"); + printf("\tCOPY\n"); +#endif + printf("\n"); + return 0; } #define COMMAND_UNKNOWN 0 @@ -1179,109 +1198,106 @@ int display_help(char *name) { #define COMMAND_COPY 10 #define COMMAND_DUMP 11 #define COMMAND_HELLO 12 +#define MAX_COMMAND 13 + +static struct command_type { + int type; + char name[32]; +} commands[MAX_COMMAND] = { + {COMMAND_LOAD,"LOAD"}, + {COMMAND_SAVE,"SAVE"}, + {COMMAND_CATALOG,"CATALOG"}, + {COMMAND_DELETE,"DELETE"}, + {COMMAND_UNDELETE,"UNDELETE"}, + {COMMAND_LOCK,"LOCK"}, + {COMMAND_UNLOCK,"UNLOCK"}, + {COMMAND_INIT,"INIT"}, + {COMMAND_RENAME,"RENAME"}, + {COMMAND_COPY,"COPY"}, + {COMMAND_DUMP,"DUMP"}, + {COMMAND_HELLO,"HELLO"}, +}; + +static int lookup_command(char *name) { + + int which=COMMAND_UNKNOWN,i; + + for(i=1;i0) { catalog_entry=dos33_find_next_file(dos_fd,catalog_entry); @@ -1332,35 +1348,36 @@ int main(int argc, char **argv) { } printf("\n"); break; - - case COMMAND_SAVE: - - /* argv3 == type == A,B,T,I,N,L etc */ - /* argv4 == name of local file */ - /* argv5 == optional name of file on disk image */ - - if (argc<5+extra_ops) { - fprintf(stderr,"Error! Need type and file_name\n"); - fprintf(stderr,"%s %s SAVE type file_name apple_filename\n", - argv[0],image); - goto exit_and_close; - } - - type=argv[firstarg+2][0]; - - if (argc==6+extra_ops) { - if (strlen(argv[firstarg+4])>30) { - fprintf(stderr, - "Warning! Truncating filename to 30 chars!\n"); - } - strncpy(apple_filename,argv[firstarg+4],30); - apple_filename[30]=0; - } - else { - /* If no filename specified for apple name */ - /* Then use the input name. Note, we strip */ - /* everything up to the last slash so useless */ - /* path info isn't used */ + + case COMMAND_SAVE: + /* argv3 == type == A,B,T,I,N,L etc */ + /* argv4 == name of local file */ + /* argv5 == optional name of file on disk image */ + + if (argc<5+extra_ops) { + fprintf(stderr,"Error! Need type and file_name\n"); + fprintf(stderr,"%s %s SAVE type " + "file_name apple_filename\n", + argv[0],image); + goto exit_and_close; + } + + type=argv[firstarg+2][0]; + + if (argc==6+extra_ops) { + if (strlen(argv[firstarg+4])>30) { + fprintf(stderr, + "Warning! Truncating filename " + "to 30 chars!\n"); + } + strncpy(apple_filename,argv[firstarg+4],30); + apple_filename[30]=0; + } + else { + /* If no filename specified for apple name */ + /* Then use the input name. Note, we strip */ + /* everything up to the last slash so useless */ + /* path info isn't used */ { char *temp; temp=argv[firstarg+3]+(strlen(argv[firstarg+3])-1); @@ -1400,9 +1417,9 @@ int main(int argc, char **argv) { dos33_delete_file(dos_fd,catalog_entry); } - dos33_add_file(dos_fd,type,argv[firstarg+3],apple_filename); - - break; + dos33_add_file(dos_fd,type,argv[firstarg+3],apple_filename); + + break; case COMMAND_DELETE: if (argc+extra_ops<4) { @@ -1534,24 +1551,20 @@ int main(int argc, char **argv) { if (catalog_entry<0) { fprintf(stderr, "Warning! File %s does not exist\n",argv[firstarg+2]); - } - - dos33_rename_hello(dos_fd,argv[firstarg+2]); - - break; - case COMMAND_INIT: - /* use common code from mkdos33fs? */ - case COMMAND_COPY: - /* use temp file? Walking a sector at a time seems a pain */ - default: - fprintf(stderr,"Sorry, unsupported command\n"); - goto exit_and_close; - } + } + dos33_rename_hello(dos_fd,argv[firstarg+2]); + break; + case COMMAND_INIT: + /* use common code from mkdos33fs? */ + case COMMAND_COPY: + /* use temp file? Walking a sector at a time seems a pain */ + default: + fprintf(stderr,"Sorry, unsupported command\n"); + goto exit_and_close; + } - exit_and_close: - close(dos_fd); + close(dos_fd); exit_program: - - return 0; + return 0; } diff --git a/dos33fs-utils/mkdos33fs.c b/dos33fs-utils/mkdos33fs.c index a509f10f..4e3a6784 100644 --- a/dos33fs-utils/mkdos33fs.c +++ b/dos33fs-utils/mkdos33fs.c @@ -7,45 +7,45 @@ #include "dos33.h" -void usage(char *binary,int help) { - - printf("\n%s - version %s\n",binary,VERSION); - printf("\tby Vince Weaver \n"); - printf("\thttp://www.deater.net/weave/vmwprod/apple/\n\n"); - if (help) { - printf("Usage:\t%s [-t track] [-s sector] [-b size] " - "[-d filename] [-f filename] device_name\n\n",binary); - printf("\t-t tracks : number of tracks in filesystem\n"); - printf("\t-s sectors : number of sectors in filesystem\n"); - printf("\t-b blocksize : size of sector, in bytes\n"); - printf("\t-d filename : file to copy first 3 tracks over from\n"); - printf("\t-f filename : name of BASIC file to autoboot. Default is HELLO\n"); - printf("\n\n"); - } - exit(0); - return; +static void usage(char *binary,int help) { + + printf("\n%s - version %s\n",binary,VERSION); + printf("\tby Vince Weaver \n"); + printf("\thttp://www.deater.net/weave/vmwprod/apple/\n\n"); + if (help) { + printf("Usage:\t%s [-t track] [-s sector] [-b size] " + "[-d filename] [-f filename] device_name\n\n",binary); + printf("\t-t tracks : number of tracks in filesystem\n"); + printf("\t-s sectors : number of sectors in filesystem\n"); + printf("\t-b blocksize : size of sector, in bytes\n"); + printf("\t-d filename : file to copy first 3 tracks over from\n"); + printf("\t-f filename : name of BASIC file to autoboot. Default is HELLO\n"); + printf("\n\n"); + } + exit(0); + return; } int main(int argc, char **argv) { - - int num_tracks=35,num_sectors=16,block_size=256; - int fd,dos_fd; - char device[BUFSIZ],dos_src[BUFSIZ]; - char *buffer,*endptr; - int i,c,copy_dos=0; - int result; - char boot_filename[30]="HELLO "; - - /* Parse Command Line Arguments */ - + int num_tracks=35,num_sectors=16,block_size=256; + int fd,dos_fd; + char device[BUFSIZ],dos_src[BUFSIZ]; + char *buffer,*endptr; + int i,c,copy_dos=0; + int result; + + char boot_filename[30]="HELLO "; + + /* Parse Command Line Arguments */ + while ((c = getopt (argc, argv,"t:s:b:d:f:hv"))!=-1) { switch (c) { - + case 't': num_tracks=strtol(optarg,&endptr,10); if ( endptr == optarg ) usage(argv[0], 1); break; - + case 's': num_sectors=strtol(optarg,&endptr,10); if ( endptr == optarg ) usage(argv[0], 1); break; @@ -56,7 +56,7 @@ int main(int argc, char **argv) { case 'd': copy_dos=1; strncpy(dos_src,optarg,BUFSIZ); break; - + case 'f': if (strlen(optarg)>30) { fprintf(stderr,"Auto boot filename too long!\n"); @@ -69,151 +69,159 @@ int main(int argc, char **argv) { case 'v': usage(argv[0],0); case 'h': usage(argv[0],1); - + } } - - if (optind==argc) { - printf("Error! Must include device name\n\n"); - goto end_of_program; - } - - strncpy(device,argv[optind],BUFSIZ); - - /* Sanity check values */ - - /* s 2->32 (limited by 4-byte bitfields) */ - if ((num_sectors<2) || (num_sectors>32)) { - printf("Number of sectors must be >2 and <=32\n\n"); - goto end_of_program; - } - /* t 17->(block_size-0x38)/2 */ - if ((num_tracks<18) || (num_tracks>(block_size-0x38)/2)) { - printf("Number of tracks must be >18 and <=%i (block_size-0x38)/2\n\n", - (block_size-0x38)/2); - goto end_of_program; - } - - /* sector_size 256->65536 (or 512 basedon one bye t/s size field?) */ - if ((block_size<256)||(block_size>65536)) { - printf("Block size must be >=256 and <65536\n\n"); - goto end_of_program; - } - - - buffer=calloc(1,sizeof(char)*block_size); - + if (optind==argc) { + printf("Error! Must include device name\n\n"); + goto end_of_program; + } + + strncpy(device,argv[optind],BUFSIZ); + + /* Sanity check values */ + + /* s 2->32 (limited by 4-byte bitfields) */ + if ((num_sectors<2) || (num_sectors>32)) { + printf("Number of sectors must be >2 and <=32\n\n"); + goto end_of_program; + } + + /* t 17->(block_size-0x38)/2 */ + if ((num_tracks<18) || (num_tracks>(block_size-0x38)/2)) { + printf("Number of tracks must be >18 and <=%i (block_size-0x38)/2\n\n", + (block_size-0x38)/2); + goto end_of_program; + } + + /* sector_size 256->65536 (or 512 basedon one bye t/s size field?) */ + if ((block_size<256)||(block_size>65536)) { + printf("Block size must be >=256 and <65536\n\n"); + goto end_of_program; + } + + buffer=calloc(1,sizeof(char)*block_size); + /* Open device */ - fd=open(device,O_RDWR|O_CREAT,0666); - if (fd<0) { - fprintf(stderr,"Error opening %s\n",device); - goto end_of_program; - } - - /* zero out file */ - for(i=0;i524 */ - buffer[VTOC_LAST_ALLOC_T]=18; /* last track space was allocated */ - /* Start at middle, work way out */ - buffer[VTOC_ALLOC_DIRECT]=1; /* Working our way outward */ - buffer[VTOC_NUM_TRACKS]=num_tracks; - buffer[VTOC_S_PER_TRACK]=num_sectors; - buffer[VTOC_BYTES_PER_SL]=block_size&0xff; - buffer[VTOC_BYTES_PER_SH]=(block_size>>8)&0xff; - - /* Set sector bitmap so whole disk is free */ - for(i=VTOC_FREE_BITMAPS;i16) { - buffer[i+2]=0xff; - buffer[i+3]=0xff; - } - } + /* Copy over OS from elsewhere, if desired */ + if (copy_dos) { + dos_fd=open(dos_src,O_RDONLY); + if (fd<0) { + fprintf(stderr,"Error opening %s\n",dos_src); + goto end_of_program; + } + lseek(fd,0,SEEK_SET); + /* copy first 3 sectors */ + for(i=0;i<3*(num_sectors);i++) { + result=read(dos_fd,buffer,block_size); + result=write(fd,buffer,block_size); + } + close(dos_fd); - /* reserve track 0 */ - /* No user data can be stored here as track=0 is special case */ - /* end of file indicator */ - buffer[VTOC_FREE_BITMAPS]=0x00; - buffer[VTOC_FREE_BITMAPS+1]=0x00; - buffer[VTOC_FREE_BITMAPS+2]=0x00; - buffer[VTOC_FREE_BITMAPS+3]=0x00; + /* Set boot filename */ - /* if copying dos reserve tracks 1 and 2 as well */ - if (copy_dos) { - buffer[VTOC_FREE_BITMAPS+4]=0x00; - buffer[VTOC_FREE_BITMAPS+5]=0x00; - buffer[VTOC_FREE_BITMAPS+6]=0x00; - buffer[VTOC_FREE_BITMAPS+7]=0x00; - buffer[VTOC_FREE_BITMAPS+8]=0x00; - buffer[VTOC_FREE_BITMAPS+9]=0x00; - buffer[VTOC_FREE_BITMAPS+10]=0x00; - buffer[VTOC_FREE_BITMAPS+11]=0x00; - } - - /* reserve track 17 */ - /* reserved for vtoc and catalog stuff */ - buffer[VTOC_FREE_BITMAPS+17*4]=0x00; - buffer[VTOC_FREE_BITMAPS+17*4+1]=0x00; - buffer[VTOC_FREE_BITMAPS+17*4+2]=0x00; - buffer[VTOC_FREE_BITMAPS+17*4+3]=0x00; - - /* Write out VTOC to disk */ - lseek(fd,((17*num_sectors)+0)*block_size,SEEK_SET); - result=write(fd,buffer,block_size); - - if (result<0) fprintf(stderr,"Error writing!\n"); + /* Track 1 sector 9 */ + lseek(fd,((1*num_sectors)+9)*block_size,SEEK_SET); + result=read(fd,buffer,block_size); + /* filename begins at offset 75 */ + for(i=0;i<30;i++) { + buffer[0x75+i]=boot_filename[i]|0x80; + } + lseek(fd,((1*num_sectors)+9)*block_size,SEEK_SET); + result=write(fd,buffer,block_size); + } - - close(fd); - -end_of_program: - - return 0; + /* clear buffer */ + for(i=0;i524 */ + buffer[VTOC_LAST_ALLOC_T]=0x12; /* last track space was allocated */ + /* Start at middle, work way out */ + buffer[VTOC_ALLOC_DIRECT]=1; /* Working our way outward */ + buffer[VTOC_NUM_TRACKS]=num_tracks; + buffer[VTOC_S_PER_TRACK]=num_sectors; + buffer[VTOC_BYTES_PER_SL]=block_size&0xff; + buffer[VTOC_BYTES_PER_SH]=(block_size>>8)&0xff; + + /* Set sector bitmap so whole disk is free */ + for(i=VTOC_FREE_BITMAPS;i16) { + buffer[i+2]=0xff; + buffer[i+3]=0xff; + } + } + + /* reserve track 0 */ + /* No user data can be stored here as track=0 is special case */ + /* end of file indicator */ + buffer[VTOC_FREE_BITMAPS]=0x00; + buffer[VTOC_FREE_BITMAPS+1]=0x00; + buffer[VTOC_FREE_BITMAPS+2]=0x00; + buffer[VTOC_FREE_BITMAPS+3]=0x00; + + /* if copying dos reserve tracks 1 and 2 as well */ + if (copy_dos) { + buffer[VTOC_FREE_BITMAPS+4]=0x00; + buffer[VTOC_FREE_BITMAPS+5]=0x00; + buffer[VTOC_FREE_BITMAPS+6]=0x00; + buffer[VTOC_FREE_BITMAPS+7]=0x00; + buffer[VTOC_FREE_BITMAPS+8]=0x00; + buffer[VTOC_FREE_BITMAPS+9]=0x00; + buffer[VTOC_FREE_BITMAPS+10]=0x00; + buffer[VTOC_FREE_BITMAPS+11]=0x00; + } + + /* reserve track 17 (0x11) */ + /* reserved for vtoc and catalog stuff */ + buffer[VTOC_FREE_BITMAPS+17*4]=0x00; + buffer[VTOC_FREE_BITMAPS+17*4+1]=0x00; + buffer[VTOC_FREE_BITMAPS+17*4+2]=0x00; + buffer[VTOC_FREE_BITMAPS+17*4+3]=0x00; + + /* Write out VTOC to disk */ + lseek(fd,((17*num_sectors)+0)*block_size,SEEK_SET); + + result=write(fd,buffer,block_size); + if (result<0) fprintf(stderr,"Error writing!\n"); + + /* clear buffer */ + for(i=0;i1;i--) { + buffer[1]=0x11; + buffer[2]=i-1; + + lseek(fd,((17*num_sectors)+i)*block_size,SEEK_SET); + result=write(fd,buffer,block_size); + if (result<0) fprintf(stderr,"Error writing!\n"); + } + + close(fd); + +end_of_program: + return 0; } diff --git a/dos33fs-utils/version.h b/dos33fs-utils/version.h index d3c0fd11..9468a8c1 100644 --- a/dos33fs-utils/version.h +++ b/dos33fs-utils/version.h @@ -1 +1 @@ -#define VERSION "0.0.11" +#define VERSION "0.0.12" diff --git a/ethernet/Makefile b/ethernet/Makefile index b0729559..a2f5259b 100644 --- a/ethernet/Makefile +++ b/ethernet/Makefile @@ -10,16 +10,32 @@ SETUP.BAS: setup.bas WEBSERVER.BAS: webserver.bas $(TXT2BAS) < webserver.bas > WEBSERVER.BAS +about.html: ./c/about.html + $(MAKEB) ./c/about.html about.html 0xc000 + +index.html: ./c/index.html + $(MAKEB) ./c/index.html index.html 0xc000 + +favicon.ico: ./c/favicon.ico + $(MAKEB) ./c/favicon.ico favicon.ico 0xc000 + +vmw_logo.png: ./c/vmw_logo.png + $(MAKEB) ./c/vmw_logo.png vmw_logo.png 0xc000 + R.TXT: request.txt $(MAKEB) request.txt R.TXT 0xc000 ethernet.dsk: SETUP.BAS \ WEBSERVER.BAS \ - R.TXT + R.TXT \ + about.html index.html favicon.ico vmw_logo.png $(DOS33) -y ethernet.dsk SAVE A SETUP.BAS $(DOS33) -y ethernet.dsk SAVE A WEBSERVER.BAS $(DOS33) -y ethernet.dsk SAVE B R.TXT - + $(DOS33) -y ethernet.dsk SAVE B about.html + $(DOS33) -y ethernet.dsk SAVE B index.html + $(DOS33) -y ethernet.dsk SAVE B favicon.ico + $(DOS33) -y ethernet.dsk SAVE B vmw_logo.png clean: rm -f *~ *.BAS R.TXT diff --git a/ethernet/ethernet.dsk b/ethernet/ethernet.dsk index 6d579431..f1b2d629 100644 Binary files a/ethernet/ethernet.dsk and b/ethernet/ethernet.dsk differ