mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-10-31 09:16:03 +00:00
147 lines
2.9 KiB
C
147 lines
2.9 KiB
C
#include <stdio.h>
|
|
#include <errno.h>
|
|
#include <stdlib.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
/* usage: dos33_raw track sector file */
|
|
static void usage(char *exe_name) {
|
|
printf("Usage:\n");
|
|
printf("\t%s disk_image track sector file start count [max_track]\n\n",exe_name);
|
|
exit(1);
|
|
}
|
|
|
|
static int dos33_sector_map[16]={
|
|
0, 7, 14, 6, 13, 5, 12, 4, 11, 3, 10, 2, 9, 1, 8, 15
|
|
};
|
|
|
|
static int goto_dos_track_sector(int fd, int track, int sector) {
|
|
|
|
int result,translated_sector;
|
|
|
|
translated_sector=dos33_sector_map[sector%16];
|
|
|
|
result=lseek(fd,(translated_sector*256)+(track*16*256),SEEK_SET);
|
|
|
|
// printf("going to: T=%d S=%d (%d)\n",track,sector,translated_sector);
|
|
|
|
return result;
|
|
}
|
|
|
|
int main(int argc, char **argv) {
|
|
|
|
unsigned int track,sector,start,count,total,max_track,filesize;
|
|
unsigned int max_sector,check_max=0;
|
|
int disk_image_fd;
|
|
int file_fd;
|
|
unsigned char buffer[256];
|
|
int result,read_result;
|
|
struct stat statbuf;
|
|
|
|
if (argc<7) {
|
|
usage(argv[0]);
|
|
}
|
|
|
|
track=atoi(argv[2]);
|
|
sector=atoi(argv[3]);
|
|
start=atoi(argv[5]);
|
|
count=atoi(argv[6]);
|
|
|
|
if (argc>7) {
|
|
max_track=atoi(argv[7]);
|
|
check_max=1;
|
|
}
|
|
|
|
/* check filesize using stat */
|
|
result=stat(argv[4], &statbuf);
|
|
if (result<0) {
|
|
fprintf(stderr,"Error stating %s: %s\n",
|
|
argv[4],strerror(errno));
|
|
exit(1);
|
|
}
|
|
filesize=statbuf.st_size;
|
|
|
|
if (count==0) {
|
|
count=(filesize/256);
|
|
if ((filesize%256)!=0) count++;
|
|
}
|
|
|
|
/* sanity check we aren't going off the last track */
|
|
if (check_max) {
|
|
max_sector=((track*16)+sector+count);
|
|
if (max_sector >= max_track*16) {
|
|
fprintf(stderr,"Error, %d exceeds max_sector of %d\n",
|
|
max_sector,max_track*16);
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
if (track>34) {
|
|
fprintf(stderr,"Warning! Unusual track number %d\n",track);
|
|
}
|
|
|
|
if (sector>15) {
|
|
fprintf(stderr,"Warning! Unusual sector number %d\n",sector);
|
|
}
|
|
|
|
disk_image_fd=open(argv[1],O_RDWR);
|
|
if (disk_image_fd<0) {
|
|
fprintf(stderr,"Error opening %s: %s\n",
|
|
argv[1],strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
file_fd=open(argv[4],O_RDONLY);
|
|
if (file_fd<0) {
|
|
fprintf(stderr,"Error opening %s: %s\n",
|
|
argv[4],strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
result=lseek(file_fd,(start*256),SEEK_SET);
|
|
if (result<0) {
|
|
fprintf(stderr,"Error skipping: %s\n",strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
|
|
total=0;
|
|
/* write until out of space */
|
|
while(1) {
|
|
if (total>=count) break;
|
|
|
|
read_result=read(file_fd,buffer,256);
|
|
if (read_result<0) break; /* error */
|
|
if (read_result==0) break; /* done */
|
|
|
|
result=goto_dos_track_sector(disk_image_fd,track,sector);
|
|
if (result<0) {
|
|
fprintf(stderr,"Error seeking: %s\n",strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
result=write(disk_image_fd,buffer,read_result);
|
|
if (result<0) {
|
|
fprintf(stderr,"Error writing image: %s\n",
|
|
strerror(errno));
|
|
break;
|
|
}
|
|
total++;
|
|
sector++;
|
|
if (sector==16) {
|
|
sector=0;
|
|
track++;
|
|
}
|
|
}
|
|
|
|
close(file_fd);
|
|
close(disk_image_fd);
|
|
|
|
fprintf(stderr,"Wrote %d sectors\n",count);
|
|
|
|
return 0;
|
|
}
|