/*
* Written by Jesper Juhl <jj@dif.dk> - released under the terms of the GPL
*
* Credit should be given to :
* R. Stevens author of "Advanced Programming in the UNIX Environment"
* since I have made heavy use of some of his example code.
*
*/
/* To compile the test code: gcc -DTEST_FTW ftw.c */
#include "ftw.h"
static int depth;
static char *path;
static int trawl(char *path, ftw_func *f, int d) {
int retval;
struct stat sb;
struct dirent *dir;
DIR *dp;
char *p;
if (depth == d)
return(0);
if (lstat(path, &sb) == -1)
return(f(path, &sb, FTW_NS));
if (!S_ISDIR(sb.st_mode))
return(f(path, &sb, FTW_F));
if ((retval = f(path, &sb, FTW_D)) != 0)
return(retval);
p = path + strlen(path);
*p++ = '/';
*p = '\0';
if ((dp = opendir(path)) == NULL)
return(f(path, &sb, FTW_DNR));
while ((dir = readdir(dp)) != NULL) {
if ((strncmp(dir->d_name, ".", 1) == 0) ||
(strncmp(dir->d_name, "..", 2) == 0))
continue;
strcpy(p, dir->d_name);
depth++;
if ((retval = trawl(path, f, d)) != 0)
break;
depth--;
}
p[-1] = '\0';
closedir(dp);
return(retval);
}
int ftw(const char *directory, ftw_func *f, int d) {
int retval;
if ((path = (char *)malloc(sysconf(_PC_PATH_MAX)+1)) == NULL)
return(-1);
strcpy(path, directory);
depth = 0;
retval = trawl(path, f, d);
free(path);
return(retval);
}
#ifdef TEST_FTW
int foo(const char *file, struct stat *sb, int flag) {
switch (flag) {
case FTW_F :
if (S_ISREG(sb->st_mode)) printf("%s is a regular file\n\n", file);
else if (S_ISBLK(sb->st_mode)) printf("%s is a block dev\n\n", file);
else if (S_ISCHR(sb->st_mode)) printf("%s is a char dev\n\n", file);
else if (S_ISFIFO(sb->st_mode)) printf("%s is a fifo\n\n", file);
else if (S_ISLNK(sb->st_mode)) printf("%s is a link\n\n", file);
break;
case FTW_D :
printf("%s is a directory\n\n", file);
break;
case FTW_NS :
printf("stat failed on %s\n\n", file);
break;
case FTW_DNR :
printf("%s is a directory which can't be read\n\n", file);
break;
default :
printf("%s is unknown\n\n", file);
break;
}
return(0);
}
int main(int argc, char *argv[]) {
if (argc == 2) {
ftw(argv[1], foo, 1);
exit(0);
} else if (argc > 2) {
ftw(argv[1], foo, atoi(argv[2]));
exit(0);
} else {
printf("usage %s <dirname> [depth]\n", argv[0]);
exit(1);
}
}
#endif
