Utilities/cmtar/filesystem.c

   1
   2
   3
   4 // First microsoft compilers
   5
   6 #include <windows.h>
   7 #include <io.h>
   8 #include <ctype.h>
   9 #include <fcntl.h>
  10 #include <stdio.h>
  11 #include <stdlib.h>
  12 #include <string.h>
  13 #include <sys/stat.h>
  14 #include <sys/types.h>
  15
  16 #include <libtarint/filesystem.h>
  17
  18
  19 kwDirectory * kwOpenDir(const char* name)
  20 {
  21 //  struct _KWDIR ssss;
  22   char* buf;
  23   size_t n = strlen(name);
  24   kwDirectory * dir = (kwDirectory *)malloc(sizeof (kwDirectory));
  25   if(dir==NULL)
  26     {
  27       return NULL;
  28     }
  29   dir->EOD=0; //not the end of directory
  30   if ( name[n - 1] == '/' )
  31     {
  32     buf = (char*) malloc(n + 1 + 1);
  33 //    buf = new char[n + 1 + 1];
  34     sprintf(buf, "%s*", name);
  35     }
  36   else
  37     {
  38     buf = (char*)malloc(n + 2 + 1);
  39 //    buf = new char[n + 2 + 1];
  40     sprintf(buf, "%s/*", name);
  41     }
  42
  43   // Now put them into the file array
  44   dir->SrchHandle = _findfirst(buf, &dir->Entry);
  45   free(buf);
  46
  47   if ( dir->SrchHandle == -1 )
  48     {
  49     free(dir);
  50     return NULL;
  51     }
  52   return dir;
  53 }
  54
  55 kwDirEntry * kwReadDir(kwDirectory * dir)
  56 {
  57   static kwDirEntry entry;
  58   if(!dir || dir->EOD ==1)
  59     {
  60     return NULL;
  61     }
  62   strncpy(entry.d_name,dir->Entry.name,TAR_MAXPATHLEN-1);
  63   if(_findnext(dir->SrchHandle, &dir->Entry) == -1)
  64     {
  65       dir->EOD=1;
  66     }
  67
  68   // It is both stupid and dangerous to return a pointer to a static like this.
  69   // This can only be called by one caller at a time: i.e., it's not thread safe.
  70   // On the other hand, it mimics the documented behavior of "readdir" which is
  71   // what it's implemented to replace for platforms that do not have readdir.
  72   // Memory leaks are also stupid and dangerous... perhaps this is less so.
  73   //
  74   return &entry;
  75 }
  76
  77 int kwCloseDir(kwDirectory * dir)
  78 {
  79   int r=-1;
  80   if(dir)
  81     {
  82     r=_findclose(dir->SrchHandle);
  83     free(dir);
  84     }
  85   if(r==-1) return 0;
  86   return 1;
  87 }