libreplace/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
  24 #define FAILED(d) (printf("failure: readdir [\nFailed for %s - %d = %s\n]\n", d, errno, strerror(errno)), test_readdir_os2_delete_ret = 1, 1)
  25
  26 #ifndef MIN
  27 #define MIN(a,b) ((a)<(b)?(a):(b))
  28 #endif
  29
  30 static void cleanup(void)
  31 {
  32         /* I'm a lazy bastard */
  33         if (system("rm -rf " TESTDIR)) {
  34                 FAILED("system");
  35         }
  36         mkdir(TESTDIR, 0700) == 0 || FAILED("mkdir");
  37 }
  38
  39 static void create_files(void)
  40 {
  41         int i;
  42         for (i=0;i<NUM_FILES;i++) {
  43                 char fname[40];
  44                 int fd;
  45                 sprintf(fname, TESTDIR "/test%u.txt", i);
  46                 fd = open(fname, O_CREAT|O_RDWR, 0600);
  47                 if (fd < 0) {
  48                         FAILED("open");
  49                 }
  50                 if (close(fd) != 0) {
  51                         FAILED("close");
  52                 }
  53         }
  54 }
  55
  56 static int os2_delete(DIR *d)
  57 {
  58         off_t offsets[READDIR_SIZE];
  59         int i, j;
  60         struct dirent *de;
  61         char names[READDIR_SIZE][30];
  62
  63         /* scan, remembering offsets */
  64         for (i=0, de=readdir(d);
  65              de && i < READDIR_SIZE;
  66              de=readdir(d), i++) {
  67                 offsets[i] = telldir(d);
  68                 strcpy(names[i], de->d_name);
  69         }
  70
  71         if (i == 0) {
  72                 return 0;
  73         }
  74
  75         /* delete the first few */
  76         for (j=0; j<MIN(i, DELETE_SIZE); j++) {
  77                 char fname[40];
  78                 sprintf(fname, TESTDIR "/%s", names[j]);
  79                 unlink(fname) == 0 || FAILED("unlink");
  80         }
  81
  82         /* seek to just after the deletion */
  83         seekdir(d, offsets[j-1]);
  84
  85         /* return number deleted */
  86         return j;
  87 }
  88
  89 int test_readdir_os2_delete(void)
  90 {
  91         int total_deleted = 0;
  92         DIR *d;
  93         struct dirent *de;
  94
  95         test_readdir_os2_delete_ret = 0;
  96
  97         cleanup();
  98         create_files();
  99
 100         d = opendir(TESTDIR "/test0.txt");
 101         if (d != NULL) FAILED("opendir() on file succeed");
 102         if (errno != ENOTDIR) FAILED("opendir() on file didn't give ENOTDIR");
 103
 104         d = opendir(TESTDIR);
 105
 106         /* skip past . and .. */
 107         de = readdir(d);
 108         strcmp(de->d_name, ".") == 0 || FAILED("match .");
 109         de = readdir(d);
 110         strcmp(de->d_name, "..") == 0 || FAILED("match ..");
 111
 112         while (1) {
 113                 int n = os2_delete(d);
 114                 if (n == 0) break;
 115                 total_deleted += n;
 116         }
 117         closedir(d);
 118
 119         fprintf(stderr, "Deleted %d files of %d\n", total_deleted, NUM_FILES);
 120
 121         rmdir(TESTDIR) == 0 || FAILED("rmdir");
 122
 123         if (system("rm -rf " TESTDIR) == -1) {
 124                 FAILED("system");
 125         }
 126
 127         return test_readdir_os2_delete_ret;
 128 }