da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/***********************************************************************
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* This software is part of the ast package *
3e14f97f673e8a630f076077de35afdd43dc1587Roger A. Faulkner* Copyright (c) 1985-2010 AT&T Intellectual Property *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* and is licensed under the *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Common Public License, Version 1.0 *
7c2fbfb345896881c631598ee3852ce9ce33fb07April Chin* by AT&T Intellectual Property *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* A copy of the License is available at *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* http://www.opensource.org/licenses/cpl1.0.txt *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Information and Software Systems Research *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* AT&T Research *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Florham Park NJ *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Glenn Fowler <gsf@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* David Korn <dgk@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* Phong Vo <kpv@research.att.com> *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin* *
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin***********************************************************************/
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#pragma prototyped
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin/*
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin * nftw implementation
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin */
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <ast.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin#include <ftw.h>
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstatic int nftw_flags;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstatic int (*nftw_userf)(const char*, const struct stat*, int, struct FTW*);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinstatic int
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinnftw_user(Ftw_t* ftw)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin register int n = ftw->info;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin struct FTW nftw;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin struct stat st;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (n & (FTW_C|FTW_NX))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = FTW_DNR;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else if ((n & FTW_SL) && (!(nftw_flags & FTW_PHYSICAL) || stat(ftw->path, &st)))
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = FTW_SLN;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin nftw.base = ftw->pathlen - ftw->namelen;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin nftw.level = ftw->level;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin nftw.quit = 0;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin n = (*nftw_userf)(ftw->path, &ftw->statb, n, &nftw);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin ftw->status = nftw.quit;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return n;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin}
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinint
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chinnftw(const char* path, int(*userf)(const char*, const struct stat*, int, struct FTW*), int depth, int flags)
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin{
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin NoP(depth);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin nftw_userf = userf;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin if (flags & FTW_CHDIR) flags &= ~FTW_DOT;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin else flags |= FTW_DOT;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin nftw_flags = flags;
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin return ftwalk(path, nftw_user, flags, NiL);
da2e3ebdc1edfbc5028edf1354e7dd2fa69a7968chin}