source3/lib/replace/test/os2_delete.c

   1 /*
   2   test readdir/unlink pattern that OS/2 uses
   3   tridge@samba.org July 2005
   4 */
   5
   6 #include <stdio.h>
   7 #include <stdlib.h>
   8 #include <sys/stat.h>
   9 #include <unistd.h>
  10 #include <sys/types.h>
  11 #include <dirent.h>
  12 #include <errno.h>
  13 #include <string.h>
  14 #include <fcntl.h>
  15
  16 #define NUM_FILES 700
  17 #define READDIR_SIZE 100
  18 #define DELETE_SIZE 4
  19
  20 #define TESTDIR "test.dir"
  21
  22 static int test_readdir_os2_delete_ret;
  23 int test_readdir_os2_delete(void);
  24
  25 #define FAILED(d) (fprintf(stderr, "Failed for %s - %d = %s\n", d, errno, strerror(errno)), test_readdir_os2_delete_ret = 1, 1)
  26
  27 #ifndef MIN
  28 #define MIN(a,b) ((a)<(b)?(a):(b))
  29 #endif
  30
  31 static void cleanup(void)
  32 {
  33         /* I'm a lazy bastard */
  34         system("rm -rf " TESTDIR);
  35         mkdir(TESTDIR, 0700) == 0 || FAILED("mkdir");
  36 }
  37
  38 static void create_files(void)
  39 {
  40         int i;
  41         for (i=0;i<NUM_FILES;i++) {
  42                 char fname[40];
  43                 sprintf(fname, TESTDIR "/test%u.txt", i);
  44                 close(open(fname, O_CREAT|O_RDWR, 0600)) == 0 || FAILED("close");
  45         }
  46 }
  47
  48 static int os2_delete(DIR *d)
  49 {
  50         off_t offsets[READDIR_SIZE];
  51         int i, j;
  52         struct dirent *de;
  53         char names[READDIR_SIZE][30];
  54
  55         /* scan, remembering offsets */
  56         for (i=0, de=readdir(d);
  57              de && i < READDIR_SIZE;
  58              de=readdir(d), i++) {
  59                 offsets[i] = telldir(d);
  60                 strcpy(names[i], de->d_name);
  61         }
  62
  63         if (i == 0) {
  64                 return 0;
  65         }
  66
  67         /* delete the first few */
  68         for (j=0; j<MIN(i, DELETE_SIZE); j++) {
  69                 char fname[40];
  70                 sprintf(fname, TESTDIR "/%s", names[j]);
  71                 unlink(fname) == 0 || FAILED("unlink");
  72         }
  73
  74         /* seek to just after the deletion */
  75         seekdir(d, offsets[j-1]);
  76
  77         /* return number deleted */
  78         return j;
  79 }
  80
  81 int test_readdir_os2_delete(void)
  82 {
  83         int total_deleted = 0;
  84         DIR *d;
  85         struct dirent *de;
  86
  87         test_readdir_os2_delete_ret = 0;
  88
  89         cleanup();
  90         create_files();
  91
  92         d = opendir(TESTDIR "/test0.txt");
  93         if (d != NULL) FAILED("opendir() on file succeed");
  94         if (errno != ENOTDIR) FAILED("opendir() on file didn't give ENOTDIR");
  95
  96         d = opendir(TESTDIR);
  97
  98         /* skip past . and .. */
  99         de = readdir(d);
 100         strcmp(de->d_name, ".") == 0 || FAILED("match .");
 101         de = readdir(d);
 102         strcmp(de->d_name, "..") == 0 || FAILED("match ..");
 103
 104         while (1) {
 105                 int n = os2_delete(d);
 106                 if (n == 0) break;
 107                 total_deleted += n;
 108         }
 109         closedir(d);
 110
 111         printf("Deleted %d files of %d\n", total_deleted, NUM_FILES);
 112
 113         rmdir(TESTDIR) == 0 || FAILED("rmdir");
 114
 115         return test_readdir_os2_delete_ret;
 116 }