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 * ftw 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 (*ftw_userf)(const char*, const struct stat*, int);
31*b30d1939SAndy Fiddaman
32*b30d1939SAndy Fiddaman static int
ftw_user(Ftw_t * ftw)33*b30d1939SAndy Fiddaman ftw_user(Ftw_t* ftw)
34*b30d1939SAndy Fiddaman {
35*b30d1939SAndy Fiddaman register int n = ftw->info;
36*b30d1939SAndy Fiddaman
37*b30d1939SAndy Fiddaman if (n & (FTW_C|FTW_NX))
38*b30d1939SAndy Fiddaman n = FTW_DNR;
39*b30d1939SAndy Fiddaman else if (n & FTW_SL)
40*b30d1939SAndy Fiddaman n = FTW_NS;
41*b30d1939SAndy Fiddaman return (*ftw_userf)(ftw->path, &ftw->statb, n);
42*b30d1939SAndy Fiddaman }
43*b30d1939SAndy Fiddaman
44*b30d1939SAndy Fiddaman int
ftw(const char * path,int (* userf)(const char *,const struct stat *,int),int depth)45*b30d1939SAndy Fiddaman ftw(const char* path, int(*userf)(const char*, const struct stat*, int), int depth)
46*b30d1939SAndy Fiddaman {
47*b30d1939SAndy Fiddaman NoP(depth);
48*b30d1939SAndy Fiddaman ftw_userf = userf;
49*b30d1939SAndy Fiddaman return ftwalk(path, ftw_user, FTW_DOT, NiL);
50*b30d1939SAndy Fiddaman }
51