[GLUE] Rsync SAMBA_3_2_0 SVN r25598 in order to create the v3-2-test branch.
[samba.git] / source / tests / 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 #define FAILED(d) (fprintf(stderr, "Failed for %s - %s\n", d, strerror(errno)), exit(1), 1)
23
24 #ifndef MIN
25 #define MIN(a,b) ((a)<(b)?(a):(b))
26 #endif
27
28 static void cleanup(void)
29 {
30         /* I'm a lazy bastard */
31         system("rm -rf " TESTDIR);
32         mkdir(TESTDIR, 0700) == 0 || FAILED("mkdir");
33 }
34
35 static void create_files()
36 {
37         int i;
38         for (i=0;i<NUM_FILES;i++) {
39                 char fname[40];
40                 sprintf(fname, TESTDIR "/test%u.txt", i);
41                 close(open(fname, O_CREAT|O_RDWR, 0600)) == 0 || FAILED("close");
42         }
43 }
44
45 static int os2_delete(DIR *d)
46 {
47         off_t offsets[READDIR_SIZE];
48         int i, j;
49         struct dirent *de;
50         char names[READDIR_SIZE][30];
51
52         /* scan, remembering offsets */
53         for (i=0, de=readdir(d); 
54              de && i < READDIR_SIZE; 
55              de=readdir(d), i++) {
56                 offsets[i] = telldir(d);
57                 strcpy(names[i], de->d_name);
58         }
59
60         if (i == 0) {
61                 return 0;
62         }
63
64         /* delete the first few */
65         for (j=0; j<MIN(i, DELETE_SIZE); j++) {
66                 char fname[40];
67                 sprintf(fname, TESTDIR "/%s", names[j]);
68                 unlink(fname) == 0 || FAILED("unlink");
69         }
70
71         /* seek to just after the deletion */
72         seekdir(d, offsets[j-1]);
73
74         /* return number deleted */
75         return j;
76 }
77
78 int main(void)
79 {
80         int total_deleted = 0;
81         DIR *d;
82         struct dirent *de;
83
84         cleanup();
85         create_files();
86         
87         d = opendir(TESTDIR);
88
89         /* skip past . and .. */
90         de = readdir(d);
91         strcmp(de->d_name, ".") == 0 || FAILED("match .");
92         de = readdir(d);
93         strcmp(de->d_name, "..") == 0 || FAILED("match ..");
94
95         while (1) {
96                 int n = os2_delete(d);
97                 if (n == 0) break;
98                 total_deleted += n;
99         }
100         closedir(d);
101
102         printf("Deleted %d files of %d\n", total_deleted, NUM_FILES);
103
104         rmdir(TESTDIR) == 0 || FAILED("rmdir");
105
106         return 0;
107 }
108 /*
109   test readdir/unlink pattern that OS/2 uses
110   tridge@samba.org July 2005
111 */
112
113 #include <stdio.h>
114 #include <stdlib.h>
115 #include <sys/stat.h>
116 #include <unistd.h>
117 #include <sys/types.h>
118 #include <dirent.h>
119 #include <errno.h>
120 #include <string.h>
121 #include <fcntl.h>
122
123 #define NUM_FILES 700
124 #define READDIR_SIZE 100
125 #define DELETE_SIZE 4
126
127 #define TESTDIR "test.dir"
128
129 #define FAILED(d) (fprintf(stderr, "Failed for %s - %s\n", d, strerror(errno)), exit(1), 1)
130
131 #ifndef MIN
132 #define MIN(a,b) ((a)<(b)?(a):(b))
133 #endif
134
135 static void cleanup(void)
136 {
137         /* I'm a lazy bastard */
138         system("rm -rf " TESTDIR);
139         mkdir(TESTDIR, 0700) == 0 || FAILED("mkdir");
140 }
141
142 static void create_files()
143 {
144         int i;
145         for (i=0;i<NUM_FILES;i++) {
146                 char fname[40];
147                 sprintf(fname, TESTDIR "/test%u.txt", i);
148                 close(open(fname, O_CREAT|O_RDWR, 0600)) == 0 || FAILED("close");
149         }
150 }
151
152 static int os2_delete(DIR *d)
153 {
154         off_t offsets[READDIR_SIZE];
155         int i, j;
156         struct dirent *de;
157         char names[READDIR_SIZE][30];
158
159         /* scan, remembering offsets */
160         for (i=0, de=readdir(d); 
161              de && i < READDIR_SIZE; 
162              de=readdir(d), i++) {
163                 offsets[i] = telldir(d);
164                 strcpy(names[i], de->d_name);
165         }
166
167         if (i == 0) {
168                 return 0;
169         }
170
171         /* delete the first few */
172         for (j=0; j<MIN(i, DELETE_SIZE); j++) {
173                 char fname[40];
174                 sprintf(fname, TESTDIR "/%s", names[j]);
175                 unlink(fname) == 0 || FAILED("unlink");
176         }
177
178         /* seek to just after the deletion */
179         seekdir(d, offsets[j-1]);
180
181         /* return number deleted */
182         return j;
183 }
184
185 int main(void)
186 {
187         int total_deleted = 0;
188         DIR *d;
189         struct dirent *de;
190
191         cleanup();
192         create_files();
193         
194         d = opendir(TESTDIR);
195
196         /* skip past . and .. */
197         de = readdir(d);
198         strcmp(de->d_name, ".") == 0 || FAILED("match .");
199         de = readdir(d);
200         strcmp(de->d_name, "..") == 0 || FAILED("match ..");
201
202         while (1) {
203                 int n = os2_delete(d);
204                 if (n == 0) break;
205                 total_deleted += n;
206         }
207         closedir(d);
208
209         printf("Deleted %d files of %d\n", total_deleted, NUM_FILES);
210
211         rmdir(TESTDIR) == 0 || FAILED("rmdir");
212
213         return 0;
214 }