1 /***********************************************************************
2 * *
3 * This software is part of the ast package *
4 * Copyright (c) 1985-2011 AT&T Intellectual Property *
5 * and is licensed under the *
6 * Eclipse Public License, Version 1.0 *
7 * by AT&T Intellectual Property *
8 * *
9 * A copy of the License is available at *
10 * http://www.eclipse.org/org/documents/epl-v10.html *
11 * (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12 * *
13 * Information and Software Systems Research *
14 * AT&T Research *
15 * Florham Park NJ *
16 * *
17 * Glenn Fowler <gsf@research.att.com> *
18 * David Korn <dgk@research.att.com> *
19 * Phong Vo <kpv@research.att.com> *
20 * *
21 ***********************************************************************/
22 #pragma prototyped
23 /*
24 * nftw implementation
25 */
26
27 #include <ast.h>
28 #include <ftw.h>
29
30 static int nftw_flags;
31 static int (*nftw_userf)(const char*, const struct stat*, int, struct FTW*);
32
33 static int
nftw_user(Ftw_t * ftw)34 nftw_user(Ftw_t* ftw)
35 {
36 register int n = ftw->info;
37 struct FTW nftw;
38 struct stat st;
39
40 if (n & (FTW_C|FTW_NX))
41 n = FTW_DNR;
42 else if ((n & FTW_SL) && (!(nftw_flags & FTW_PHYSICAL) || stat(ftw->path, &st)))
43 n = FTW_SLN;
44 nftw.base = ftw->pathlen - ftw->namelen;
45 nftw.level = ftw->level;
46 nftw.quit = 0;
47 n = (*nftw_userf)(ftw->path, &ftw->statb, n, &nftw);
48 ftw->status = nftw.quit;
49 return n;
50 }
51
52 int
nftw(const char * path,int (* userf)(const char *,const struct stat *,int,struct FTW *),int depth,int flags)53 nftw(const char* path, int(*userf)(const char*, const struct stat*, int, struct FTW*), int depth, int flags)
54 {
55 NoP(depth);
56 nftw_userf = userf;
57 if (flags & FTW_CHDIR) flags &= ~FTW_DOT;
58 else flags |= FTW_DOT;
59 nftw_flags = flags;
60 return ftwalk(path, nftw_user, flags, NiL);
61 }
62