+/* vi: set sw=4 ts=4: */
/*
* Mini find implementation for busybox
*
- * Copyright (C) 1998 by Erik Andersen <andersee@debian.org>
+ * Copyright (C) 1999,2000 by Lineo, inc. and Erik Andersen
+ * Copyright (C) 1999,2000,2001 by Erik Andersen <andersee@debian.org>
+ *
+ * Reworked by David Douthitt <n9ubh@callsign.net> and
+ * Matt Kraai <kraai@alumni.carnegiemellon.edu>.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
#include <stdio.h>
#include <unistd.h>
#include <dirent.h>
-#include "internal.h"
+#include <string.h>
+#include <stdlib.h>
+#include <fnmatch.h>
+#include <time.h>
+#include <ctype.h>
+#include "busybox.h"
+
+static char *pattern;
-static char* pattern=NULL;
-static char* directory=NULL;
-static int dereferenceFlag=FALSE;
+#ifdef CONFIG_FEATURE_FIND_TYPE
+static int type_mask = 0;
+#endif
-static const char find_usage[] = "find [path...] [expression]\n"
-"default path is the current directory; default expression is -print\n"
-"expression may consist of:\n";
+#ifdef CONFIG_FEATURE_FIND_PERM
+static char perm_char = 0;
+static int perm_mask = 0;
+#endif
+#ifdef CONFIG_FEATURE_FIND_MTIME
+static char mtime_char;
+static int mtime_days;
+#endif
+#ifdef CONFIG_FEATURE_FIND_XDEV
+static dev_t *xdev_dev;
+static int xdev_count = 0;
+#endif
-static int fileAction(const char *fileName, struct stat* statbuf)
+
+static int fileAction(const char *fileName, struct stat *statbuf, void* junk)
{
- if (pattern==NULL)
- fprintf(stdout, "%s\n", fileName);
- else if (match(fileName, pattern) == TRUE)
- fprintf(stdout, "%s\n", fileName);
- return( TRUE);
+ if (pattern != NULL) {
+ const char *tmp = strrchr(fileName, '/');
+
+ if (tmp == NULL)
+ tmp = fileName;
+ else
+ tmp++;
+ if (!(fnmatch(pattern, tmp, FNM_PERIOD) == 0))
+ goto no_match;
+ }
+#ifdef CONFIG_FEATURE_FIND_TYPE
+ if (type_mask != 0) {
+ if (!((statbuf->st_mode & S_IFMT) == type_mask))
+ goto no_match;
+ }
+#endif
+#ifdef CONFIG_FEATURE_FIND_PERM
+ if (perm_mask != 0) {
+ if (!((isdigit(perm_char) && (statbuf->st_mode & 07777) == perm_mask) ||
+ (perm_char == '-' && (statbuf->st_mode & perm_mask) == perm_mask) ||
+ (perm_char == '+' && (statbuf->st_mode & perm_mask) != 0)))
+ goto no_match;
+ }
+#endif
+#ifdef CONFIG_FEATURE_FIND_MTIME
+ if (mtime_days != 0) {
+ time_t file_age = time(NULL) - statbuf->st_mtime;
+ time_t mtime_secs = mtime_days * 24 * 60 * 60;
+ if (!((isdigit(mtime_char) && mtime_secs >= file_age &&
+ mtime_secs < file_age + 24 * 60 * 60) ||
+ (mtime_char == '+' && mtime_secs >= file_age) ||
+ (mtime_char == '-' && mtime_secs < file_age)))
+ goto no_match;
+ }
+#endif
+#ifdef CONFIG_FEATURE_FIND_XDEV
+ if (xdev_count) {
+ int i;
+ for (i=0; i<xdev_count; i++) {
+ if (xdev_dev[i] == statbuf-> st_dev)
+ break;
+ }
+ if (i == xdev_count) {
+ if(S_ISDIR(statbuf->st_mode))
+ return SKIP;
+ else
+ goto no_match;
+ }
+ }
+#endif
+
+ puts(fileName);
+no_match:
+ return (TRUE);
}
-static int dirAction(const char *fileName, struct stat* statbuf)
+#ifdef CONFIG_FEATURE_FIND_TYPE
+static int find_type(char *type)
{
- DIR *dir;
- struct dirent *entry;
-
- if (pattern==NULL)
- fprintf(stdout, "%s\n", fileName);
- else if (match(fileName, pattern) == TRUE)
- fprintf(stdout, "%s\n", fileName);
-
- dir = opendir( fileName);
- if (!dir) {
- perror("Can't open directory");
- exit(FALSE);
- }
- while ((entry = readdir(dir)) != NULL) {
- char dirName[NAME_MAX];
- sprintf(dirName, "%s/%s", fileName, entry->d_name);
- recursiveAction( dirName, TRUE, dereferenceFlag, FALSE, fileAction, dirAction);
- }
- return( TRUE);
+ int mask = 0;
+
+ switch (type[0]) {
+ case 'b':
+ mask = S_IFBLK;
+ break;
+ case 'c':
+ mask = S_IFCHR;
+ break;
+ case 'd':
+ mask = S_IFDIR;
+ break;
+ case 'p':
+ mask = S_IFIFO;
+ break;
+ case 'f':
+ mask = S_IFREG;
+ break;
+ case 'l':
+ mask = S_IFLNK;
+ break;
+ case 's':
+ mask = S_IFSOCK;
+ break;
+ }
+
+ if (mask == 0 || type[1] != '\0')
+ error_msg_and_die("invalid argument `%s' to `-type'", type);
+
+ return mask;
}
+#endif
int find_main(int argc, char **argv)
{
- if (argc <= 1) {
- dirAction( ".", NULL);
- }
-
- /* peel off the "find" */
- argc--;
- argv++;
-
- if (**argv != '-') {
- directory=*argv;
- argc--;
- argv++;
- }
-
- /* Parse any options */
- while (**argv == '-') {
- int stopit=FALSE;
- while (*++(*argv) && stopit==FALSE) switch (**argv) {
- case 'f':
- if (strcmp(*argv, "follow")==0) {
- argc--;
- argv++;
- dereferenceFlag=TRUE;
- }
- break;
- case 'n':
- if (strcmp(*argv, "name")==0) {
- if (argc-- > 1) {
- pattern=*(++argv);
- stopit=-TRUE;
- } else {
- fprintf(stderr, "Usage: %s\n", find_usage);
- exit( FALSE);
- }
+ int dereference = FALSE;
+ int i, firstopt, status = EXIT_SUCCESS;
+
+ for (firstopt = 1; firstopt < argc; firstopt++) {
+ if (argv[firstopt][0] == '-')
+ break;
+ }
+
+ /* Parse any options */
+ for (i = firstopt; i < argc; i++) {
+ if (strcmp(argv[i], "-follow") == 0)
+ dereference = TRUE;
+ else if (strcmp(argv[i], "-print") == 0) {
+ ;
+ }
+ else if (strcmp(argv[i], "-name") == 0) {
+ if (++i == argc)
+ error_msg_and_die("option `-name' requires an argument");
+ pattern = argv[i];
+#ifdef CONFIG_FEATURE_FIND_TYPE
+ } else if (strcmp(argv[i], "-type") == 0) {
+ if (++i == argc)
+ error_msg_and_die("option `-type' requires an argument");
+ type_mask = find_type(argv[i]);
+#endif
+#ifdef CONFIG_FEATURE_FIND_PERM
+ } else if (strcmp(argv[i], "-perm") == 0) {
+ char *end;
+ if (++i == argc)
+ error_msg_and_die("option `-perm' requires an argument");
+ perm_mask = strtol(argv[i], &end, 8);
+ if (end[0] != '\0')
+ error_msg_and_die("invalid argument `%s' to `-perm'", argv[i]);
+ if (perm_mask > 07777)
+ error_msg_and_die("invalid argument `%s' to `-perm'", argv[i]);
+ if ((perm_char = argv[i][0]) == '-')
+ perm_mask = -perm_mask;
+#endif
+#ifdef CONFIG_FEATURE_FIND_MTIME
+ } else if (strcmp(argv[i], "-mtime") == 0) {
+ char *end;
+ if (++i == argc)
+ error_msg_and_die("option `-mtime' requires an argument");
+ mtime_days = strtol(argv[i], &end, 10);
+ if (end[0] != '\0')
+ error_msg_and_die("invalid argument `%s' to `-mtime'", argv[i]);
+ if ((mtime_char = argv[i][0]) == '-')
+ mtime_days = -mtime_days;
+#endif
+#ifdef CONFIG_FEATURE_FIND_XDEV
+ } else if (strcmp(argv[i], "-xdev") == 0) {
+ struct stat stbuf;
+
+ xdev_count = ( firstopt - 1 ) ? ( firstopt - 1 ) : 1;
+ xdev_dev = xmalloc ( xdev_count * sizeof( dev_t ));
+
+ if ( firstopt == 1 ) {
+ if ( stat ( ".", &stbuf ) < 0 )
+ error_msg_and_die("could not stat '.'" );
+ xdev_dev [0] = stbuf. st_dev;
+ }
+ else {
+
+ for (i = 1; i < firstopt; i++) {
+ if ( stat ( argv [i], &stbuf ) < 0 )
+ error_msg_and_die("could not stat '%s'", argv [i] );
+ xdev_dev [i-1] = stbuf. st_dev;
+ }
+ }
+#endif
+ } else
+ show_usage();
+ }
+
+ if (firstopt == 1) {
+ if (! recursive_action(".", TRUE, dereference, FALSE, fileAction,
+ fileAction, NULL))
+ status = EXIT_FAILURE;
+ } else {
+ for (i = 1; i < firstopt; i++) {
+ if (! recursive_action(argv[i], TRUE, dereference, FALSE, fileAction,
+ fileAction, NULL))
+ status = EXIT_FAILURE;
}
- break;
- case '-':
- /* Ignore all long options */
- break;
- default:
- fprintf(stderr, "Usage: %s\n", find_usage);
- exit( FALSE);
}
- if (argc-- > 1)
- argv++;
- if (**argv != '-')
- break;
- else
- break;
- }
-
- dirAction( directory, NULL);
- exit(TRUE);
+
+ return status;
}