1 /* Test the GNU extensions in glob which allow the user to provide callbacks
2 for the filesystem access functions.
3 Copyright (C) 2001 Free Software Foundation, Inc.
4 This file is part of the GNU C Library.
5 Contributed by Ulrich Drepper <drepper@redhat.com>, 2001.
7 The GNU C Library is free software; you can redistribute it and/or
8 modify it under the terms of the GNU Lesser General Public
9 License as published by the Free Software Foundation; either
10 version 2.1 of the License, or (at your option) any later version.
12 The GNU C Library is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 Lesser General Public License for more details.
17 You should have received a copy of the GNU Lesser General Public
18 License along with the GNU C Library; if not, write to the Free
19 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
35 # define PRINTF(fmt, args...) printf (fmt, ##args)
37 # define PRINTF(fmt, args...)
50 { "file1lev1", 1, DT_REG },
51 { "file2lev1", 1, DT_UNKNOWN },
52 { "dir1lev1", 1, DT_UNKNOWN },
55 { "file1lev2", 2, DT_REG },
56 { "dir1lev2", 2, DT_DIR },
59 { "dir2lev2", 2, DT_DIR },
62 { ".foo", 3, DT_REG },
63 { "dir1lev3", 3, DT_DIR },
66 { "file1lev4", 4, DT_REG },
67 { "file1lev3", 3, DT_REG },
68 { "file2lev3", 3, DT_REG },
69 { "file2lev2", 2, DT_REG },
70 { "file3lev2", 2, DT_REG },
71 { "dir3lev2", 2, DT_DIR },
74 { "file3lev3", 3, DT_REG },
75 { "file4lev3", 3, DT_REG },
76 { "dir2lev1", 1, DT_DIR },
79 { "dir1lev2", 2, DT_UNKNOWN },
82 { ".foo", 3, DT_REG },
83 { ".dir", 3, DT_DIR },
86 { "hidden", 4, DT_REG }
88 #define nfiles (sizeof (filesystem) / sizeof (filesystem[0]))
100 find_file (const char *s)
105 if (strcmp (s, ".") == 0)
110 char *endp = strchrnul (s, '/');
112 PRINTF ("looking for %.*s, level %d\n", (int) (endp - s), s, level);
114 while (idx < nfiles && filesystem[idx].level >= level)
116 if (filesystem[idx].level == level
117 && memcmp (s, filesystem[idx].name, endp - s) == 0
118 && filesystem[idx].name[endp - s] == '\0')
123 if (idx == nfiles || filesystem[idx].level < level)
128 if (filesystem[idx].type != DT_DIR
129 && (idx + 1 >= nfiles
130 || filesystem[idx].level >= filesystem[idx + 1].level))
151 my_opendir (const char *s)
153 long int idx = find_file (s);
159 PRINTF ("my_opendir(\"%s\") == NULL\n", s);
163 dir = (my_DIR *) malloc (sizeof (my_DIR));
165 error (EXIT_FAILURE, errno, "cannot allocate directory handle");
167 dir->level = filesystem[idx].level;
170 PRINTF ("my_opendir(\"%s\") == { level: %d, idx: %ld }\n",
171 s, filesystem[idx].level, idx);
177 static struct dirent *
178 my_readdir (void *gdir)
184 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = NULL\n",
185 dir->level, (long int) dir->idx);
189 while (dir->idx < nfiles && filesystem[dir->idx].level > dir->level)
192 if (dir->idx == nfiles || filesystem[dir->idx].level < dir->level)
195 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = NULL\n",
196 dir->level, (long int) dir->idx);
200 dir->d.d_ino = dir->idx;
202 #ifdef _DIRENT_HAVE_D_TYPE
203 dir->d.d_type = filesystem[dir->idx].type;
206 strcpy (dir->d.d_name, filesystem[dir->idx].name);
208 #ifdef _DIRENT_HAVE_D_TYPE
209 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = { d_ino: %ld, d_type: %d, d_name: \"%s\" }\n",
210 dir->level, (long int) dir->idx, dir->d.d_ino, dir->d.d_type,
213 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = { d_ino: %ld, d_name: \"%s\" }\n",
214 dir->level, (long int) dir->idx, dir->d.d_ino,
225 my_closedir (void *dir)
227 PRINTF ("my_closedir ()\n");
232 /* We use this function for lstat as well since we don't have any. */
234 my_stat (const char *name, struct stat *st)
236 long int idx = find_file (name);
240 PRINTF ("my_stat (\"%s\", ...) = -1 (%s)\n", name, strerror (errno));
244 memset (st, '\0', sizeof (*st));
246 if (filesystem[idx].type == DT_UNKNOWN)
247 st->st_mode = DTTOIF (idx + 1 < nfiles
248 && filesystem[idx].level < filesystem[idx + 1].level
249 ? DT_DIR : DT_REG) | 0777;
251 st->st_mode = DTTOIF (filesystem[idx].type) | 0777;
253 PRINTF ("my_stat (\"%s\", { st_mode: %o }) = 0\n", name, st->st_mode);
259 static const char *glob_errstring[] =
261 [GLOB_NOSPACE] = "out of memory",
262 [GLOB_ABORTED] = "read error",
263 [GLOB_NOMATCH] = "no matches found"
265 #define nglob_errstring (sizeof (glob_errstring) / sizeof (glob_errstring[0]))
273 "GLOB_ERR", "GLOB_MARK", "GLOB_NOSORT", "GLOB_DOOFSS", "GLOB_NOCHECK",
274 "GLOB_APPEND", "GLOB_NOESCAPE", "GLOB_PERIOD", "GLOB_MAGCHAR",
275 "GLOB_ALTDIRFUNC", "GLOB_BRACE", "GLOB_NOMAGIC", "GLOB_TILDE",
276 "GLOB_ONLYDIR", "GLOB_TILDECHECK"
278 #define nstrs (sizeof (strs) / sizeof (strs[0]))
279 static char buf[100];
283 for (cnt = 0; cnt < nstrs; ++cnt)
284 if (flags & (1 << cnt))
286 flags &= ~(1 << cnt);
289 cp = stpcpy (cp, strs[cnt]);
296 sprintf (cp, "%#x", flags);
304 test_result (const char *fmt, int flags, glob_t *gl, const char *str[])
309 printf ("results for glob (\"%s\", %s)\n", fmt, flagstr (flags));
310 for (cnt = 0; cnt < gl->gl_pathc && str[cnt] != NULL; ++cnt)
312 int ok = strcmp (gl->gl_pathv[cnt], str[cnt]) == 0;
313 const char *errstr = "";
319 for (inner = 0; str[inner] != NULL; ++inner)
320 if (strcmp (gl->gl_pathv[cnt], str[inner]) == 0)
323 if (str[inner] == NULL)
324 errstr = ok ? "" : " *** WRONG";
326 errstr = ok ? "" : " * wrong position";
331 printf (" %s%s\n", gl->gl_pathv[cnt], errstr);
335 if (str[cnt] != NULL || cnt < gl->gl_pathc)
337 puts (" *** incorrect number of entries");
356 memset (&gl, '\0', sizeof (gl));
358 gl.gl_closedir = my_closedir;
359 gl.gl_readdir = my_readdir;
360 gl.gl_opendir = my_opendir;
361 gl.gl_lstat = my_stat;
362 gl.gl_stat = my_stat;
364 #define test(a, b, c...) \
367 errval = glob (fmt, flags, NULL, &gl); \
370 printf ("glob (\"%s\", %s) failed: %s\n", fmt, flagstr (flags), \
371 errval >= 0 && errval < nglob_errstring \
372 ? glob_errstring[errval] : "???"); \
376 result |= test_result (fmt, flags, &gl, (const char *[]) { c, NULL })
378 test ("*/*/*", GLOB_ALTDIRFUNC,
379 "dir1lev1/dir2lev2/dir1lev3",
380 "dir1lev1/dir2lev2/file1lev3",
381 "dir1lev1/dir2lev2/file2lev3",
382 "dir1lev1/dir3lev2/file3lev3",
383 "dir1lev1/dir3lev2/file4lev3");
385 test ("*/*/*", GLOB_ALTDIRFUNC | GLOB_PERIOD,
386 "dir1lev1/dir1lev2/.",
387 "dir1lev1/dir1lev2/..",
388 "dir1lev1/dir2lev2/.",
389 "dir1lev1/dir2lev2/..",
390 "dir1lev1/dir2lev2/.foo",
391 "dir1lev1/dir2lev2/dir1lev3",
392 "dir1lev1/dir2lev2/file1lev3",
393 "dir1lev1/dir2lev2/file2lev3",
394 "dir1lev1/dir3lev2/.",
395 "dir1lev1/dir3lev2/..",
396 "dir1lev1/dir3lev2/file3lev3",
397 "dir1lev1/dir3lev2/file4lev3",
398 "dir2lev1/dir1lev2/.",
399 "dir2lev1/dir1lev2/..",
400 "dir2lev1/dir1lev2/.dir",
401 "dir2lev1/dir1lev2/.foo");
403 test ("*/*/.*", GLOB_ALTDIRFUNC,
404 "dir1lev1/dir1lev2/.",
405 "dir1lev1/dir1lev2/..",
406 "dir1lev1/dir2lev2/.",
407 "dir1lev1/dir2lev2/..",
408 "dir1lev1/dir2lev2/.foo",
409 "dir1lev1/dir3lev2/.",
410 "dir1lev1/dir3lev2/..",
411 "dir2lev1/dir1lev2/.",
412 "dir2lev1/dir1lev2/..",
413 "dir2lev1/dir1lev2/.dir",
414 "dir2lev1/dir1lev2/.foo");
416 test ("*1*/*2*/.*", GLOB_ALTDIRFUNC,
417 "dir1lev1/dir1lev2/.",
418 "dir1lev1/dir1lev2/..",
419 "dir1lev1/dir2lev2/.",
420 "dir1lev1/dir2lev2/..",
421 "dir1lev1/dir2lev2/.foo",
422 "dir1lev1/dir3lev2/.",
423 "dir1lev1/dir3lev2/..",
424 "dir2lev1/dir1lev2/.",
425 "dir2lev1/dir1lev2/..",
426 "dir2lev1/dir1lev2/.dir",
427 "dir2lev1/dir1lev2/.foo");
429 test ("*1*/*1*/.*", GLOB_ALTDIRFUNC,
430 "dir1lev1/dir1lev2/.",
431 "dir1lev1/dir1lev2/..",
432 "dir2lev1/dir1lev2/.",
433 "dir2lev1/dir1lev2/..",
434 "dir2lev1/dir1lev2/.dir",
435 "dir2lev1/dir1lev2/.foo");