msdos.c

   1
   2 /*
   3  * Operating System specific function (DOS)
   4  *
   5  * $Header: msdos.c 1.0 95/07/21 $
   6  * $Log:        msdos.c,v $
   7  * Revision 1.0  95/07/21  xx:xx:xx  BB
   8  * Initial revision, based on winnt.c.
   9  *
  10  */
  11
  12 #include "spark.h"
  13 #include "date.h"
  14 #include <sys\stat.h>
  15 #include <dir.h>
  16 #include <time.h>
  17 #include <utime.h>
  18 #include <string.h>                             /* for memset */
  19 #include "os.h"
  20
  21 /*
  22  * return the length of a file
  23  */
  24 Word
  25 filesize(char *pathname)
  26 {
  27         struct stat statb;
  28
  29         if (stat(pathname, &statb) < 0)
  30                 return 0;
  31
  32         return (Word) statb.st_size;;
  33 }
  34
  35 /*
  36  * test for the existance of a file or directory
  37  */
  38 Ftype
  39 exist(char *pathname)
  40 {
  41         struct stat statb;
  42
  43         if (stat(pathname, &statb) < 0)
  44                 return NOEXIST;
  45
  46         if (statb.st_mode & S_IFDIR)
  47                 return ISDIR;
  48
  49         return (ISFILE);
  50 }
  51
  52 /*
  53  * make a directory
  54  */
  55 int
  56 makedir(char *pathname)
  57 {
  58         return mkdir(pathname);
  59 }
  60
  61 /*
  62  * stamp a file with date and time
  63  */
  64 int
  65 filestamp(Header *header, char *filename)
  66 {
  67         Date *date;
  68         struct tm tm;
  69         struct utimbuf utimbuf;
  70         time_t filetime;
  71
  72         /* BB: DOS utime() cannot stamp directories.
  73            It could be done by directly editing the directory entries
  74            (simulate a disc editor) but since e.g. pkunzip does not
  75            stamp extracted directories either, I did not bother and
  76            kept the next line from winnt.c.
  77            ``It is left as an exercice to the interested reader.''
  78            NB: Do not forget to stamp the . entry in the directory
  79            itself! */
  80         if (exist(filename) == ISDIR)
  81                 return (0);
  82
  83         if ((header->load & (Word) 0xfff00000UL) != (Word) 0xfff00000UL)
  84                 return (0);                             /* not a timestamp */
  85
  86         memset((char *) &tm, '\0', sizeof(tm));
  87
  88         /* Borland C/C++ 4 is `a bit fuzzy' about the next line 8-( */
  89         /* if (!(date = makedate(header))) */
  90         if ((date = makedate(header)) == 0)
  91                 return (-1);
  92
  93         tm.tm_sec = date->second;
  94         tm.tm_min = date->minute;
  95         tm.tm_hour = date->hour;
  96         tm.tm_mday = date->day;
  97         tm.tm_mon = date->month - 1;
  98         tm.tm_year = date->year;
  99         filetime = mktime(&tm);
 100
 101         utimbuf.actime = filetime;
 102         utimbuf.modtime = filetime;
 103         return (utime(filename, &utimbuf));
 104 }