1 /* Test the GNU extensions in glob which allow the user to provide callbacks
2 for the filesystem access functions.
3 Copyright (C) 2001-2002, 2007, 2010 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, see
19 <http://www.gnu.org/licenses/>. */
34 # define PRINTF(fmt, args...) printf (fmt, ##args)
36 # define PRINTF(fmt, args...)
49 { "file1lev1", 1, DT_REG },
50 { "file2lev1", 1, DT_UNKNOWN },
51 { "dir1lev1", 1, DT_UNKNOWN },
54 { "file1lev2", 2, DT_REG },
55 { "dir1lev2", 2, DT_DIR },
58 { "dir2lev2", 2, DT_DIR },
61 { ".foo", 3, DT_REG },
62 { "dir1lev3", 3, DT_DIR },
65 { "file1lev4", 4, DT_REG },
66 { "file1lev3", 3, DT_REG },
67 { "file2lev3", 3, DT_REG },
68 { "file2lev2", 2, DT_REG },
69 { "file3lev2", 2, DT_REG },
70 { "dir3lev2", 2, DT_DIR },
73 { "file3lev3", 3, DT_REG },
74 { "file4lev3", 3, DT_REG },
75 { "dir2lev1", 1, DT_DIR },
78 { "dir1lev2", 2, DT_UNKNOWN },
81 { ".foo", 3, DT_REG },
82 { ".dir", 3, DT_DIR },
85 { "hidden", 4, DT_REG }
87 #define nfiles (sizeof (filesystem) / sizeof (filesystem[0]))
95 char room_for_dirent[NAME_MAX];
100 find_file (const char *s)
115 if (strcmp (s, ".") == 0)
118 if (s[0] == '.' && s[1] == '/')
123 char *endp = strchrnul (s, '/');
125 PRINTF ("looking for %.*s, level %d\n", (int) (endp - s), s, level);
127 while (idx < nfiles && filesystem[idx].level >= level)
129 if (filesystem[idx].level == level
130 && memcmp (s, filesystem[idx].name, endp - s) == 0
131 && filesystem[idx].name[endp - s] == '\0')
136 if (idx == nfiles || filesystem[idx].level < level)
145 if (filesystem[idx].type != DT_DIR
146 && (idx + 1 >= nfiles
147 || filesystem[idx].level >= filesystem[idx + 1].level))
165 my_opendir (const char *s)
167 long int idx = find_file (s);
173 PRINTF ("my_opendir(\"%s\") == NULL\n", s);
177 dir = (my_DIR *) malloc (sizeof (my_DIR));
179 error (EXIT_FAILURE, errno, "cannot allocate directory handle");
181 dir->level = filesystem[idx].level;
184 PRINTF ("my_opendir(\"%s\") == { level: %d, idx: %ld }\n",
185 s, filesystem[idx].level, idx);
191 static struct dirent *
192 my_readdir (void *gdir)
198 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = NULL\n",
199 dir->level, (long int) dir->idx);
203 while (dir->idx < nfiles && filesystem[dir->idx].level > dir->level)
206 if (dir->idx == nfiles || filesystem[dir->idx].level < dir->level)
209 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = NULL\n",
210 dir->level, (long int) dir->idx);
214 dir->d.d_ino = dir->idx;
216 #ifdef _DIRENT_HAVE_D_TYPE
217 dir->d.d_type = filesystem[dir->idx].type;
220 strcpy (dir->d.d_name, filesystem[dir->idx].name);
222 #ifdef _DIRENT_HAVE_D_TYPE
223 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = { d_ino: %ld, d_type: %d, d_name: \"%s\" }\n",
224 dir->level, (long int) dir->idx, dir->d.d_ino, dir->d.d_type,
227 PRINTF ("my_readdir ({ level: %d, idx: %ld }) = { d_ino: %ld, d_name: \"%s\" }\n",
228 dir->level, (long int) dir->idx, dir->d.d_ino,
239 my_closedir (void *dir)
241 PRINTF ("my_closedir ()\n");
246 /* We use this function for lstat as well since we don't have any. */
248 my_stat (const char *name, struct stat *st)
250 long int idx = find_file (name);
254 PRINTF ("my_stat (\"%s\", ...) = -1 (%s)\n", name, strerror (errno));
258 memset (st, '\0', sizeof (*st));
260 if (filesystem[idx].type == DT_UNKNOWN)
261 st->st_mode = DTTOIF (idx + 1 < nfiles
262 && filesystem[idx].level < filesystem[idx + 1].level
263 ? DT_DIR : DT_REG) | 0777;
265 st->st_mode = DTTOIF (filesystem[idx].type) | 0777;
267 PRINTF ("my_stat (\"%s\", { st_mode: %o }) = 0\n", name, st->st_mode);
273 static const char *glob_errstring[] =
275 [GLOB_NOSPACE] = "out of memory",
276 [GLOB_ABORTED] = "read error",
277 [GLOB_NOMATCH] = "no matches found"
279 #define nglob_errstring (sizeof (glob_errstring) / sizeof (glob_errstring[0]))
285 static const char *const strs[] =
287 "GLOB_ERR", "GLOB_MARK", "GLOB_NOSORT", "GLOB_DOOFSS", "GLOB_NOCHECK",
288 "GLOB_APPEND", "GLOB_NOESCAPE", "GLOB_PERIOD", "GLOB_MAGCHAR",
289 "GLOB_ALTDIRFUNC", "GLOB_BRACE", "GLOB_NOMAGIC", "GLOB_TILDE",
290 "GLOB_ONLYDIR", "GLOB_TILDECHECK"
292 #define nstrs (sizeof (strs) / sizeof (strs[0]))
293 static char buf[100];
297 for (cnt = 0; cnt < nstrs; ++cnt)
298 if (flags & (1 << cnt))
300 flags &= ~(1 << cnt);
303 cp = stpcpy (cp, strs[cnt]);
310 sprintf (cp, "%#x", flags);
321 static const char *const strs[] =
323 [GLOB_NOSPACE] = "GLOB_NOSPACE",
324 [GLOB_ABORTED] = "GLOB_ABORTED",
325 [GLOB_NOMATCH] = "GLOB_NOMATCH",
326 [GLOB_NOSYS] = "GLOB_NOSYS"
328 #define nstrs (sizeof (strs) / sizeof (strs[0]))
329 static char buf[100];
330 if (val < 0 || val >= nstrs || strs[val] == NULL)
332 snprintf (buf, sizeof (buf), "GLOB_??? (%d)", val);
341 test_result (const char *fmt, int flags, glob_t *gl, const char *str[])
346 printf ("results for glob (\"%s\", %s)\n", fmt, flagstr (flags));
347 for (cnt = 0; cnt < gl->gl_pathc && str[cnt] != NULL; ++cnt)
349 int ok = strcmp (gl->gl_pathv[cnt], str[cnt]) == 0;
350 const char *errstr = "";
356 for (inner = 0; str[inner] != NULL; ++inner)
357 if (strcmp (gl->gl_pathv[cnt], str[inner]) == 0)
360 if (str[inner] == NULL)
361 errstr = ok ? "" : " *** WRONG";
363 errstr = ok ? "" : " * wrong position";
368 printf (" %s%s\n", gl->gl_pathv[cnt], errstr);
372 if (str[cnt] != NULL || cnt < gl->gl_pathc)
374 puts (" *** incorrect number of entries");
393 memset (&gl, '\0', sizeof (gl));
395 gl.gl_closedir = my_closedir;
396 gl.gl_readdir = my_readdir;
397 gl.gl_opendir = my_opendir;
398 gl.gl_lstat = my_stat;
399 gl.gl_stat = my_stat;
401 #define test(a, b, r, c...) \
403 flags = GLOB_ALTDIRFUNC | b; \
404 errval = glob (fmt, flags, NULL, &gl); \
408 printf ("glob (\"%s\", %s) failed: %s\n", fmt, flagstr (flags), \
409 errval >= 0 && errval < nglob_errstring \
410 ? glob_errstring[errval] : "???"); \
412 printf ("glob (\"%s\", %s) did not fail\n", fmt, flagstr (flags)); \
416 result |= test_result (fmt, flags, &gl, (const char *[]) { c, NULL }); \
418 printf ("result for glob (\"%s\", %s) = %s\n\n", fmt, flagstr (flags), \
422 "dir1lev1/dir2lev2/dir1lev3",
423 "dir1lev1/dir2lev2/file1lev3",
424 "dir1lev1/dir2lev2/file2lev3",
425 "dir1lev1/dir3lev2/file3lev3",
426 "dir1lev1/dir3lev2/file4lev3");
428 test ("*/*/*", GLOB_PERIOD, 0,
429 "dir1lev1/dir1lev2/.",
430 "dir1lev1/dir1lev2/..",
431 "dir1lev1/dir2lev2/.",
432 "dir1lev1/dir2lev2/..",
433 "dir1lev1/dir2lev2/.foo",
434 "dir1lev1/dir2lev2/dir1lev3",
435 "dir1lev1/dir2lev2/file1lev3",
436 "dir1lev1/dir2lev2/file2lev3",
437 "dir1lev1/dir3lev2/.",
438 "dir1lev1/dir3lev2/..",
439 "dir1lev1/dir3lev2/file3lev3",
440 "dir1lev1/dir3lev2/file4lev3",
441 "dir2lev1/dir1lev2/.",
442 "dir2lev1/dir1lev2/..",
443 "dir2lev1/dir1lev2/.dir",
444 "dir2lev1/dir1lev2/.foo");
446 test ("*/*/.*", 0, 0,
447 "dir1lev1/dir1lev2/.",
448 "dir1lev1/dir1lev2/..",
449 "dir1lev1/dir2lev2/.",
450 "dir1lev1/dir2lev2/..",
451 "dir1lev1/dir2lev2/.foo",
452 "dir1lev1/dir3lev2/.",
453 "dir1lev1/dir3lev2/..",
454 "dir2lev1/dir1lev2/.",
455 "dir2lev1/dir1lev2/..",
456 "dir2lev1/dir1lev2/.dir",
457 "dir2lev1/dir1lev2/.foo");
459 test ("*1*/*2*/.*", 0, 0,
460 "dir1lev1/dir1lev2/.",
461 "dir1lev1/dir1lev2/..",
462 "dir1lev1/dir2lev2/.",
463 "dir1lev1/dir2lev2/..",
464 "dir1lev1/dir2lev2/.foo",
465 "dir1lev1/dir3lev2/.",
466 "dir1lev1/dir3lev2/..",
467 "dir2lev1/dir1lev2/.",
468 "dir2lev1/dir1lev2/..",
469 "dir2lev1/dir1lev2/.dir",
470 "dir2lev1/dir1lev2/.foo");
472 test ("*1*/*1*/.*", 0, 0,
473 "dir1lev1/dir1lev2/.",
474 "dir1lev1/dir1lev2/..",
475 "dir2lev1/dir1lev2/.",
476 "dir2lev1/dir1lev2/..",
477 "dir2lev1/dir1lev2/.dir",
478 "dir2lev1/dir1lev2/.foo");
486 test ("", 0, GLOB_NOMATCH, NULL);
488 test ("", GLOB_NOCHECK, 0, "");