home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c072 / 1.ddi / PRG5_5.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-09-19  |  2.4 KB  |  95 lines
  1. /*Program 5_5 - Change Disk and Directory
  2.    by Stephen R. Davis, 1987
  3.  
  4.   Change disk and directory at the same time.  Both disk and directory
  5.   are optional.  If either is missing, the current disk or directory
  6.   is assumed.  If both are missing, the value of the environment
  7.   label DEFAULT is used.
  8. */
  9.  
  10. #include <stdio.h>
  11. #include <stdlib.h>
  12. #include <dir.h>
  13. #include <process.h>
  14. #include <ctype.h>
  15.  
  16. #define MAXDISK 5
  17.  
  18. /*prototype definitions*/
  19. void main (unsigned, char **);
  20. unsigned parse (char *);
  21.  
  22. /*global variables*/
  23. unsigned disk;
  24. char *directory;
  25. char defaultdir [132];
  26.  
  27. /*Main - load up default fcb, then parse the input argument and
  28.          finally set the disk and directory*/
  29. void main (argc, argv)
  30.      unsigned argc;
  31.      char *argv[];
  32. {
  33.      /*check the number of arguments*/
  34.      if (argc > 2) {
  35.           printf ("Wrong number of arguments\n"
  36.                   "  try '%s [pathname]'\n",
  37.                   argv [0]);
  38.           exit (1);
  39.      }
  40.  
  41.      /*if no argument provided, get the argument from the environment*/
  42.      if (argc == 1)
  43.           if (argv [1] = getenv ("DEFAULT"))
  44.                printf ("Using default directory\n");
  45.  
  46.      /*if no argument present, just display the defaults*/
  47.      if (!argv [1]) {
  48.           disk = getdisk ();
  49.           getcurdir (disk + 1, defaultdir);
  50.           printf ("%c:%s", (char)(disk + 'A'), defaultdir);
  51.      } else {
  52.  
  53.            /*if present, parse the input argument into drive and directory*/
  54.           if (parse (argv [1])) {
  55.                printf ("Illegal input: %s\n", argv [1]);
  56.                exit (1);
  57.           }
  58.  
  59.           /*now set the disk and directory*/
  60.           setdisk (disk);
  61.           if (chdir (directory)) {
  62.                printf ("Directory %s does not exist\n", directory);
  63.                exit (1);
  64.          }
  65.      }
  66.  
  67.      /*exit normally*/
  68.      exit (0);
  69. }
  70.  
  71. /*Parse - parse out the disk from the file name*/
  72. unsigned parse (ptr)
  73.      char *ptr;
  74. {
  75.      /*first check for the presence of a disk*/
  76.      if (ptr [1] == ':') {
  77.           disk = (unsigned)(toupper (ptr [0]) - 'A');
  78.           if (disk > MAXDISK)
  79.                return -1;
  80.           directory = ptr + 2;
  81.      }
  82.      else {
  83.           disk = getdisk ();
  84.           directory = ptr;
  85.      }
  86.  
  87.      /*if no directory present, change to '.'*/
  88.      if (*directory == '\0') {
  89.           directory = ".";
  90.      }
  91.  
  92.      /*return success*/
  93.      return 0;
  94. }
  95.