Category : C Source Code
Archive   : UNIXTOOL.ZIP
Filename : MV.C

 
Output of file : MV.C contained in archive : UNIXTOOL.ZIP
/*
* mv.c move (rename a file or files)
*/

#include /* Standard I/O definitions */
#include /* Msdos definitions */
#include /* error codes */
#include
#include
#include
#include

static char ID[]="## mv.c 1.0 K.van Houten 230987 ##";
struct stat statbuf;
int iflg=0;
int dflg=0;
int i;
int tmp=0;
char errbuf[100];
char nmbuf[100];
char *dp; /* points to dest. dir argv[argc-1] */
char *tp;

union REGS r;
struct SREGS s;

main (argc, argv)
int argc; /* Number of command line arguments */
char *argv[]; /* Array of pointers to arguments */
{
for (argc--,argv++; argc>0; argc--,argv++) {
if (**argv == '-') {
while (*++(*argv)) {
switch (**argv) {
case 'i':
iflg++;
printf("mv: -i not yet supported.\n");
exit(1);
break;
default:
usage: printf("Usage: mv [-i] file [file | [file...] directory]\n");
exit(1);
}
}
}

else
break;
}
/*
* NOW THE ARGV[0] CONTAINS THE FIRST NON-OPTION ARGUMENT,
* WHILE ARGC CONTAINS THE NUMBER OF ARGUMENTS LEFT.
* SO WE HAVE AVAILABLE ARGV[0] -- ARGV[ARGC-1].
*/
if (argc < 2)
goto usage;
dp = argv[argc-1];

if (strcmp(dp,"\\")==0 || strcmp(dp,"..")==0 ||
(dp[strlen(dp)]=='.' && dp[strlen(dp)-1]=='.' )) {
dflg++;
}
else {
if (stat(dp,&statbuf) == -1) {
if (argc>2) {
sprintf(errbuf,"mv: %s ",dp);
perror(errbuf);
exit(1);
}
}
else {
if ((statbuf.st_mode & S_IFDIR) == 0) {
if (argc > 2) {
fprintf(stderr,"mv: destination must be directory\n");
exit(1);
}
}
else
dflg++;
}
}
for (i=0; i< argc-1 ;i++) {
if (dflg) {
if ((tp=strrchr(argv[i],'\\'))==NULL)
tp=argv[i];
else
tp++;
strcpy(nmbuf,dp);
strcat(nmbuf,"/");
strcat(nmbuf,tp);
}
else {
strcpy(nmbuf,argv[1]);
}
rename(argv[i],nmbuf);
if (r.x.cflag) {
sprintf(errbuf,"mv: Error %d ",errno);
switch(errno) {
case 2:
fprintf(stderr,"mv: File not found.\n");
exit(1);
case 3:
fprintf(stderr,"mv: Path not found.\n");
exit(1);
case 5:
if (unlink(nmbuf) == -1) {
fprintf(stderr,"mv: %s write protect.\n",nmbuf);
exit(1);
}
rename(argv[i],nmbuf);
if (r.x.cflag) {
fprintf(stderr,"mv: Unexpected Error %d\n",errno);
exit(1);
}
break;
case 17:
fprintf(stderr,"mv: No cross device move\n");
exit(1);
default:
fprintf(stderr,"mv: Unexpected ERROR.\n");
exit(1);
}
}
}
exit(0);
}

rename(c1,c2)
char *c1, *c2;
{
segread(&s);
s.es = s.ds;
r.h.ah = 0x56; /* Rename function */
r.x.dx = (int)c1;
r.x.di = (int)c2;
errno = intdosx(&r, &r, &s);
}




  3 Responses to “Category : C Source Code
Archive   : UNIXTOOL.ZIP
Filename : MV.C
”

  1. Daniel says:
    January 27, 2013 at 3:59 pm

    Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. Joshie says:
    March 18, 2014 at 4:57 pm

    This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. DiskingRound says:
    January 14, 2015 at 10:57 pm

    But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/