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