home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Usenet 1994 October
/
usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso
/
unix
/
volume11
/
mtools
/
part02
/
mmd.c
< prev
next >
Wrap
C/C++ Source or Header
|
1987-08-27
|
4KB
|
155 lines
/*
* Make a MSDOS sub directory
*
* Emmet P. Gray US Army, HQ III Corps & Fort Hood
* ...!ihnp4!uiucuxc!fthood!egray Attn: AFZF-DE-ENV
* Directorate of Engineering & Housing
* Environmental Management Office
* Fort Hood, TX 76544-5057
*/
#include <stdio.h>
#include "msdos.h"
int fd; /* the file descriptor for the floppy */
int dir_start; /* starting sector for directory */
int dir_len; /* length of directory (in sectors) */
int dir_entries; /* number of directory entries */
int dir_chain[25]; /* chain of sectors in directory */
int clus_size; /* cluster size (in sectors) */
int fat_len; /* length of FAT table (in sectors) */
int num_clus; /* number of available clusters */
unsigned char *fatbuf; /* the File Allocation Table */
char *mcwd; /* the Current Working Directory */
main(argc, argv)
int argc;
char *argv[];
{
int entry, slot, fat, dot, subdir();
char *filename, *newfile, *fixname(), *strncpy(), *unixname();
char *getpath(), *pathname, tname[9], text[4], *fixed;
void exit();
struct directory *dir, *search(), *mk_entry();
if (init(2)) {
fprintf(stderr, "mmd: Cannot initialize diskette\n");
exit(1);
}
/* only 1 directory ! */
if (argc != 2) {
fprintf(stderr, "Usage: mmd <MSDOS directory>\n");
exit(1);
}
fixed = fixname(argv[1]);
filename = unixname(fixed, fixed+8);
pathname = getpath(argv[1]);
if (strcmp(fixed+8, " ")) {
fprintf(stderr, "mmd: Directory names cannot have extensions\n");
exit(1);
}
if (subdir(pathname))
exit(1);
/* see if exists and get slot */
slot = -1;
dot = 0;
for (entry=0; entry<dir_entries; entry++) {
dir = search(entry);
/* if empty */
if (dir->name[0] == NULL) {
if (slot < 0)
slot = entry;
break;
}
/* if erased */
if (dir->name[0] == 0xe5) {
if (slot < 0)
slot = entry;
continue;
}
/* if not a directory */
if (!(dir->attr & 0x10))
continue;
strncpy(tname, dir->name, 8);
strncpy(text, dir->ext, 3);
newfile = unixname(tname, text);
/* save the 'dot' directory info */
if (!strcmp(".", newfile))
dot = dir->start[1]*0x100 + dir->start[0];
if (!strcmp(filename, newfile)) {
fprintf(stderr, "mmd: Directory '%s' already exists\n", filename);
exit(1);
}
}
/* no '.' entry means root directory */
if (dot == 0 && slot < 0) {
printf(stderr, "mmd: No directory slots\n");
exit(1);
}
/* make the directory grow */
if (dot && slot < 0) {
if (grow(dot)) {
fprintf(stderr, "mmd: Disk full\n");
exit(1);
}
/* first slot in 'new' directory */
slot = entry;
}
fat = nextfat(0);
if (fat == -1) {
fprintf(stderr, "mmd: Disk full\n");
exit(1);
}
/* make directory entry */
dir = mk_entry(fixed, 0x10, fat, 0);
if (dir != NULL) {
writedir(slot, dir);
/* write the cluster */
putfat(fat, 0xfff);
putcluster(fat, dot);
}
/* write FAT sectors */
writefat();
close(fd);
exit(0);
}
putcluster(dot, dot_dot) /* write the cluster */
int dot;
int dot_dot;
{
long start;
void exit(), perror();
int buflen;
static struct directory dirs[32];
struct directory *mk_entry();
start = (dot - 2)*clus_size + dir_start + dir_len;
move(start);
buflen = clus_size * MSECSIZ;
/* make the '.' and '..' entries */
dirs[0] = *mk_entry(". ", 0x10, dot, 0);
dirs[1] = *mk_entry(".. ", 0x10, dot_dot, 0);
if (write(fd, (char *) &dirs[0], buflen) != buflen) {
perror("putcluster: write");
exit(1);
}
return;
}
int
nextfat(last) /* returns next free cluster */
int last;
{
static int i;
for (i=last+1; i<num_clus+2; i++) {
if (!getfat(i))
return(i);
}
return(-1);
}