udhcpc: make DHCP packets to have at least 300 DHCP bytes
[oweals/busybox.git] / findutils / find.c
index 52ac7b0b3c78cb807857170bd8d44e6556a0297a..53d8239c72572e2f538fec656693d89f47264f54 100644 (file)
 //kbuild:lib-$(CONFIG_FIND) += find.o
 
 //usage:#define find_trivial_usage
-//usage:       "[PATH]... [OPTIONS] [ACTIONS]"
+//usage:       "[-HL] [PATH]... [OPTIONS] [ACTIONS]"
 //usage:#define find_full_usage "\n\n"
 //usage:       "Search for files and perform actions on them.\n"
 //usage:       "First failed action stops processing of current file.\n"
 //usage:       "Defaults: PATH is current directory, action is '-print'\n"
-//usage:     "\nOptions:"
-//usage:     "\n       -follow         Follow symlinks"
+//usage:     "\n       -L,-follow      Follow symlinks"
+//usage:     "\n       -H              ...on command line only"
 //usage:       IF_FEATURE_FIND_XDEV(
 //usage:     "\n       -xdev           Don't descend directories on other filesystems"
 //usage:       )
 //usage:     "\n       -iname PATTERN  Case insensitive -name"
 //usage:       IF_FEATURE_FIND_PATH(
 //usage:     "\n       -path PATTERN   Match path to PATTERN"
+//usage:     "\n       -ipath PATTERN  Case insensitive -path"
 //usage:       )
 //usage:       IF_FEATURE_FIND_REGEX(
 //usage:     "\n       -regex PATTERN  Match path to regex PATTERN"
 //usage:       )
 //usage:       IF_FEATURE_FIND_PERM(
 //usage:     "\n       -perm MASK      At least one mask bit (+MASK), all bits (-MASK),"
-//usage:     "\n                       or exactly MASK bits are set in mode bits"
+//usage:     "\n                       or exactly MASK bits are set in file's mode"
 //usage:       )
 //usage:       IF_FEATURE_FIND_MTIME(
-//usage:     "\n       -mtime DAYS     Modified time is greater than (+N), less than (-N),"
-//usage:     "\n                       or exactly N days"
+//usage:     "\n       -mtime DAYS     mtime is greater than (+N), less than (-N),"
+//usage:     "\n                       or exactly N days in the past"
 //usage:       )
 //usage:       IF_FEATURE_FIND_MMIN(
-//usage:     "\n       -mmin MINS      Modified time is greater than (+N), less than (-N),"
-//usage:     "\n                       or exactly N minutes"
+//usage:     "\n       -mmin MINS      mtime is greater than (+N), less than (-N),"
+//usage:     "\n                       or exactly N minutes in the past"
 //usage:       )
 //usage:       IF_FEATURE_FIND_NEWER(
-//usage:     "\n       -newer FILE     Modified time is more recent than FILE's"
+//usage:     "\n       -newer FILE     mtime is more recent than FILE's"
 //usage:       )
 //usage:       IF_FEATURE_FIND_INUM(
 //usage:     "\n       -inum N         File has inode number N"
 //usage:       )
 //usage:       IF_FEATURE_FIND_USER(
-//usage:     "\n       -user NAME      File is owned by user NAME (numeric user ID allowed)"
+//usage:     "\n       -user NAME/ID   File is owned by given user"
 //usage:       )
 //usage:       IF_FEATURE_FIND_GROUP(
-//usage:     "\n       -group NAME     File belongs to group NAME (numeric group ID allowed)"
+//usage:     "\n       -group NAME/ID  File is owned by given group"
 //usage:       )
 //usage:       IF_FEATURE_FIND_SIZE(
 //usage:     "\n       -size N[bck]    File size is N (c:bytes,k:kbytes,b:512 bytes(def.))"
 #include <fnmatch.h>
 #include "libbb.h"
 #if ENABLE_FEATURE_FIND_REGEX
-#include "xregex.h"
+# include "xregex.h"
 #endif
+/* GNUism: */
+#ifndef FNM_CASEFOLD
+# define FNM_CASEFOLD 0
+#endif
+
+#define dbg(...) ((void)0)
+/* #define dbg(...) bb_error_msg(__VA_ARGS__) */
 
 /* This is a NOEXEC applet. Be very careful! */
 
@@ -352,7 +360,7 @@ typedef struct {
 
                         ACTS(print)
                         ACTS(name,  const char *pattern; bool iname;)
-IF_FEATURE_FIND_PATH(   ACTS(path,  const char *pattern;))
+IF_FEATURE_FIND_PATH(   ACTS(path,  const char *pattern; bool ipath;))
 IF_FEATURE_FIND_REGEX(  ACTS(regex, regex_t compiled_pattern;))
 IF_FEATURE_FIND_PRINT0( ACTS(print0))
 IF_FEATURE_FIND_TYPE(   ACTS(type,  int type_mask;))
@@ -465,14 +473,32 @@ static int exec_actions(action ***appp, const char *fileName, const struct stat
 #if ENABLE_FEATURE_FIND_NOT
                        if (ap->invert) rc ^= TRUE;
 #endif
+                       dbg("grp %d action %d rc:0x%x", cur_group, cur_action, rc);
                        if (rc & TRUE) /* current group failed, try next */
                                break;
                }
        }
+       dbg("returning:0x%x", rc ^ TRUE);
        return rc ^ TRUE; /* restore TRUE bit */
 }
 
 
+#if !FNM_CASEFOLD
+static char *strcpy_upcase(char *dst, const char *src)
+{
+       char *d = dst;
+       while (1) {
+               unsigned char ch = *src++;
+               if (ch >= 'a' && ch <= 'z')
+                       ch -= ('a' - 'A');
+               *d++ = ch;
+               if (ch == '\0')
+                       break;
+       }
+       return dst;
+}
+#endif
+
 ACTF(name)
 {
        const char *tmp = bb_basename(fileName);
@@ -488,13 +514,25 @@ ACTF(name)
         * but somewhere between 4.1.20 and 4.4.0 GNU find stopped using it.
         * find -name '*foo' should match .foo too:
         */
+#if FNM_CASEFOLD
        return fnmatch(ap->pattern, tmp, (ap->iname ? FNM_CASEFOLD : 0)) == 0;
+#else
+       if (ap->iname)
+               tmp = strcpy_upcase(alloca(strlen(tmp) + 1), tmp);
+       return fnmatch(ap->pattern, tmp, 0) == 0;
+#endif
 }
 
 #if ENABLE_FEATURE_FIND_PATH
 ACTF(path)
 {
+# if FNM_CASEFOLD
+       return fnmatch(ap->pattern, fileName, (ap->ipath ? FNM_CASEFOLD : 0)) == 0;
+# else
+       if (ap->ipath)
+               fileName = strcpy_upcase(alloca(strlen(fileName) + 1), fileName);
        return fnmatch(ap->pattern, fileName, 0) == 0;
+# endif
 }
 #endif
 #if ENABLE_FEATURE_FIND_REGEX
@@ -691,10 +729,27 @@ static int FAST_FUNC fileAction(const char *fileName,
                int depth IF_NOT_FEATURE_FIND_MAXDEPTH(UNUSED_PARAM))
 {
        int r;
+       int same_fs = 1;
+
+#if ENABLE_FEATURE_FIND_XDEV
+       if (S_ISDIR(statbuf->st_mode) && G.xdev_count) {
+               int i;
+               for (i = 0; i < G.xdev_count; i++) {
+                       if (G.xdev_dev[i] == statbuf->st_dev)
+                               goto found;
+               }
+               //bb_error_msg("'%s': not same fs", fileName);
+               same_fs = 0;
+ found: ;
+       }
+#endif
 
 #if ENABLE_FEATURE_FIND_MAXDEPTH
-       if (depth < G.minmaxdepth[0])
-               return TRUE; /* skip this, continue recursing */
+       if (depth < G.minmaxdepth[0]) {
+               if (same_fs)
+                       return TRUE; /* skip this, continue recursing */
+               return SKIP; /* stop recursing */
+       }
        if (depth > G.minmaxdepth[1])
                return SKIP; /* stop recursing */
 #endif
@@ -710,21 +765,11 @@ static int FAST_FUNC fileAction(const char *fileName,
                        return SKIP;
        }
 #endif
-#if ENABLE_FEATURE_FIND_XDEV
        /* -xdev stops on mountpoints, but AFTER mountpoit itself
         * is processed as usual */
-       if (S_ISDIR(statbuf->st_mode)) {
-               if (G.xdev_count) {
-                       int i;
-                       for (i = 0; i < G.xdev_count; i++) {
-                               if (G.xdev_dev[i] == statbuf->st_dev)
-                                       goto found;
-                       }
-                       return SKIP;
- found: ;
-               }
+       if (!same_fs) {
+               return SKIP;
        }
-#endif
 
        /* Cannot return 0: our caller, recursive_action(),
         * will perror() and skip dirs (if called on dir) */
@@ -770,6 +815,31 @@ static const char* plus_minus_num(const char* str)
 }
 #endif
 
+/* Say no to GCCism */
+#define USE_NESTED_FUNCTION 0
+
+#if !USE_NESTED_FUNCTION
+struct pp_locals {
+       action*** appp;
+       unsigned cur_group;
+       unsigned cur_action;
+       IF_FEATURE_FIND_NOT( bool invert_flag; )
+};
+static action* alloc_action(struct pp_locals *ppl, int sizeof_struct, action_fp f)
+{
+       action *ap = xzalloc(sizeof_struct);
+       action **app;
+       action ***group = &ppl->appp[ppl->cur_group];
+       *group = app = xrealloc(*group, (ppl->cur_action+2) * sizeof(ppl->appp[0][0]));
+       app[ppl->cur_action++] = ap;
+       app[ppl->cur_action] = NULL;
+       ap->f = f;
+       IF_FEATURE_FIND_NOT( ap->invert = ppl->invert_flag; )
+       IF_FEATURE_FIND_NOT( ppl->invert_flag = 0; )
+       return ap;
+}
+#endif
+
 static action*** parse_params(char **argv)
 {
        enum {
@@ -794,6 +864,12 @@ static action*** parse_params(char **argv)
                                PARM_name      ,
                                PARM_iname     ,
        IF_FEATURE_FIND_PATH(   PARM_path      ,)
+#if ENABLE_DESKTOP
+       /* -wholename is a synonym for -path */
+       /* We support it because Linux kernel's "make tags" uses it */
+       IF_FEATURE_FIND_PATH(   PARM_wholename ,)
+#endif
+       IF_FEATURE_FIND_PATH(   PARM_ipath     ,)
        IF_FEATURE_FIND_REGEX(  PARM_regex     ,)
        IF_FEATURE_FIND_TYPE(   PARM_type      ,)
        IF_FEATURE_FIND_PERM(   PARM_perm      ,)
@@ -828,9 +904,13 @@ static action*** parse_params(char **argv)
        IF_FEATURE_FIND_EXEC(   "-exec\0"   )
        IF_FEATURE_FIND_PAREN(  "(\0"       )
        /* All options/actions starting from here require argument */
-                                "-name\0"
-                                "-iname\0"
+                               "-name\0"
+                               "-iname\0"
        IF_FEATURE_FIND_PATH(   "-path\0"   )
+#if ENABLE_DESKTOP
+       IF_FEATURE_FIND_PATH(   "-wholename\0")
+#endif
+       IF_FEATURE_FIND_PATH(   "-ipath\0"  )
        IF_FEATURE_FIND_REGEX(  "-regex\0"  )
        IF_FEATURE_FIND_TYPE(   "-type\0"   )
        IF_FEATURE_FIND_PERM(   "-perm\0"   )
@@ -846,10 +926,18 @@ static action*** parse_params(char **argv)
        IF_FEATURE_FIND_MAXDEPTH("-mindepth\0""-maxdepth\0")
        ;
 
+#if !USE_NESTED_FUNCTION
+       struct pp_locals ppl;
+#define appp        (ppl.appp       )
+#define cur_group   (ppl.cur_group  )
+#define cur_action  (ppl.cur_action )
+#define invert_flag (ppl.invert_flag)
+#define ALLOC_ACTION(name) (action_##name*)alloc_action(&ppl, sizeof(action_##name), (action_fp) func_##name)
+#else
        action*** appp;
-       unsigned cur_group = 0;
-       unsigned cur_action = 0;
-       IF_FEATURE_FIND_NOT( bool invert_flag = 0; )
+       unsigned cur_group;
+       unsigned cur_action;
+       IF_FEATURE_FIND_NOT( bool invert_flag; )
 
        /* This is the only place in busybox where we use nested function.
         * So far more standard alternatives were bigger. */
@@ -858,7 +946,7 @@ static action*** parse_params(char **argv)
        action* alloc_action(int sizeof_struct, action_fp f)
        {
                action *ap;
-               appp[cur_group] = xrealloc(appp[cur_group], (cur_action+2) * sizeof(*appp));
+               appp[cur_group] = xrealloc(appp[cur_group], (cur_action+2) * sizeof(appp[0][0]));
                appp[cur_group][cur_action++] = ap = xzalloc(sizeof_struct);
                appp[cur_group][cur_action] = NULL;
                ap->f = f;
@@ -866,9 +954,12 @@ static action*** parse_params(char **argv)
                IF_FEATURE_FIND_NOT( invert_flag = 0; )
                return ap;
        }
-
 #define ALLOC_ACTION(name) (action_##name*)alloc_action(sizeof(action_##name), (action_fp) func_##name)
+#endif
 
+       cur_group = 0;
+       cur_action = 0;
+       IF_FEATURE_FIND_NOT( invert_flag = 0; )
        appp = xzalloc(2 * sizeof(appp[0])); /* appp[0],[1] == NULL */
 
        while (*argv) {
@@ -876,6 +967,8 @@ static action*** parse_params(char **argv)
                int parm = index_in_strings(params, arg);
                const char *arg1 = argv[1];
 
+               dbg("arg:'%s' arg1:'%s' parm:%d PARM_type:%d", arg, arg1, parm, PARM_type);
+
                if (parm >= PARM_name) {
                        /* All options/actions starting from -name require argument */
                        if (!arg1)
@@ -891,18 +984,25 @@ static action*** parse_params(char **argv)
  * expression is reached.
  */
                /* Options */
+               if (parm == OPT_FOLLOW) {
+                       dbg("follow enabled: %d", __LINE__);
+                       G.recurse_flags |= ACTION_FOLLOWLINKS | ACTION_DANGLING_OK;
+               }
 #if ENABLE_FEATURE_FIND_XDEV
-               if (parm == OPT_XDEV) {
+               else if (parm == OPT_XDEV) {
+                       dbg("%d", __LINE__);
                        G.xdev_on = 1;
                }
 #endif
 #if ENABLE_FEATURE_FIND_MAXDEPTH
                else if (parm == OPT_MINDEPTH || parm == OPT_MINDEPTH + 1) {
+                       dbg("%d", __LINE__);
                        G.minmaxdepth[parm - OPT_MINDEPTH] = xatoi_positive(arg1);
                }
 #endif
 #if ENABLE_FEATURE_FIND_DEPTH
                else if (parm == OPT_DEPTH) {
+                       dbg("%d", __LINE__);
                        G.recurse_flags |= ACTION_DEPTHFIRST;
                }
 #endif
@@ -917,12 +1017,14 @@ static action*** parse_params(char **argv)
  */
                /* Operators */
                else if (parm == PARM_a IF_DESKTOP(|| parm == PARM_and)) {
+                       dbg("%d", __LINE__);
                        /* no further special handling required */
                }
                else if (parm == PARM_o IF_DESKTOP(|| parm == PARM_or)) {
+                       dbg("%d", __LINE__);
                        /* start new OR group */
                        cur_group++;
-                       appp = xrealloc(appp, (cur_group+2) * sizeof(*appp));
+                       appp = xrealloc(appp, (cur_group+2) * sizeof(appp[0]));
                        /*appp[cur_group] = NULL; - already NULL */
                        appp[cur_group+1] = NULL;
                        cur_action = 0;
@@ -931,26 +1033,31 @@ static action*** parse_params(char **argv)
                else if (parm == PARM_char_not IF_DESKTOP(|| parm == PARM_not)) {
                        /* also handles "find ! ! -name 'foo*'" */
                        invert_flag ^= 1;
+                       dbg("invert_flag:%d", invert_flag);
                }
 #endif
                /* Actions */
                else if (parm == PARM_print) {
+                       dbg("%d", __LINE__);
                        G.need_print = 0;
                        (void) ALLOC_ACTION(print);
                }
 #if ENABLE_FEATURE_FIND_PRINT0
                else if (parm == PARM_print0) {
+                       dbg("%d", __LINE__);
                        G.need_print = 0;
                        (void) ALLOC_ACTION(print0);
                }
 #endif
 #if ENABLE_FEATURE_FIND_PRUNE
                else if (parm == PARM_prune) {
+                       dbg("%d", __LINE__);
                        (void) ALLOC_ACTION(prune);
                }
 #endif
 #if ENABLE_FEATURE_FIND_DELETE
                else if (parm == PARM_delete) {
+                       dbg("%d", __LINE__);
                        G.need_print = 0;
                        G.recurse_flags |= ACTION_DEPTHFIRST;
                        (void) ALLOC_ACTION(delete);
@@ -960,6 +1067,7 @@ static action*** parse_params(char **argv)
                else if (parm == PARM_exec) {
                        int i;
                        action_exec *ap;
+                       dbg("%d", __LINE__);
                        G.need_print = 0;
                        ap = ALLOC_ACTION(exec);
                        ap->exec_argv = ++argv; /* first arg after -exec */
@@ -994,6 +1102,7 @@ static action*** parse_params(char **argv)
                        char **endarg;
                        unsigned nested = 1;
 
+                       dbg("%d", __LINE__);
                        endarg = argv;
                        while (1) {
                                if (!*++endarg)
@@ -1013,20 +1122,24 @@ static action*** parse_params(char **argv)
 #endif
                else if (parm == PARM_name || parm == PARM_iname) {
                        action_name *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(name);
                        ap->pattern = arg1;
                        ap->iname = (parm == PARM_iname);
                }
 #if ENABLE_FEATURE_FIND_PATH
-               else if (parm == PARM_path) {
+               else if (parm == PARM_path IF_DESKTOP(|| parm == PARM_wholename) || parm == PARM_ipath) {
                        action_path *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(path);
                        ap->pattern = arg1;
+                       ap->ipath = (parm == PARM_ipath);
                }
 #endif
 #if ENABLE_FEATURE_FIND_REGEX
                else if (parm == PARM_regex) {
                        action_regex *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(regex);
                        xregcomp(&ap->compiled_pattern, arg1, 0 /*cflags*/);
                }
@@ -1036,6 +1149,7 @@ static action*** parse_params(char **argv)
                        action_type *ap;
                        ap = ALLOC_ACTION(type);
                        ap->type_mask = find_type(arg1);
+                       dbg("created:type mask:%x", ap->type_mask);
                }
 #endif
 #if ENABLE_FEATURE_FIND_PERM
@@ -1046,6 +1160,7 @@ static action*** parse_params(char **argv)
  */
                else if (parm == PARM_perm) {
                        action_perm *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(perm);
                        ap->perm_char = arg1[0];
                        arg1 = plus_minus_num(arg1);
@@ -1057,6 +1172,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_MTIME
                else if (parm == PARM_mtime) {
                        action_mtime *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(mtime);
                        ap->mtime_char = arg1[0];
                        ap->mtime_days = xatoul(plus_minus_num(arg1));
@@ -1065,6 +1181,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_MMIN
                else if (parm == PARM_mmin) {
                        action_mmin *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(mmin);
                        ap->mmin_char = arg1[0];
                        ap->mmin_mins = xatoul(plus_minus_num(arg1));
@@ -1074,6 +1191,7 @@ static action*** parse_params(char **argv)
                else if (parm == PARM_newer) {
                        struct stat stat_newer;
                        action_newer *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(newer);
                        xstat(arg1, &stat_newer);
                        ap->newer_mtime = stat_newer.st_mtime;
@@ -1082,6 +1200,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_INUM
                else if (parm == PARM_inum) {
                        action_inum *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(inum);
                        ap->inode_num = xatoul(arg1);
                }
@@ -1089,6 +1208,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_USER
                else if (parm == PARM_user) {
                        action_user *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(user);
                        ap->uid = bb_strtou(arg1, NULL, 10);
                        if (errno)
@@ -1098,6 +1218,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_GROUP
                else if (parm == PARM_group) {
                        action_group *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(group);
                        ap->gid = bb_strtou(arg1, NULL, 10);
                        if (errno)
@@ -1126,6 +1247,7 @@ static action*** parse_params(char **argv)
                                { "", 0 }
                        };
                        action_size *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(size);
                        ap->size_char = arg1[0];
                        ap->size = XATOU_SFX(plus_minus_num(arg1), find_suffixes);
@@ -1134,6 +1256,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_CONTEXT
                else if (parm == PARM_context) {
                        action_context *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(context);
                        /*ap->context = NULL; - ALLOC_ACTION did it */
                        /* SELinux headers erroneously declare non-const parameter */
@@ -1144,6 +1267,7 @@ static action*** parse_params(char **argv)
 #if ENABLE_FEATURE_FIND_LINKS
                else if (parm == PARM_links) {
                        action_links *ap;
+                       dbg("%d", __LINE__);
                        ap = ALLOC_ACTION(links);
                        ap->links_char = arg1[0];
                        ap->links_count = xatoul(plus_minus_num(arg1));
@@ -1155,8 +1279,12 @@ static action*** parse_params(char **argv)
                }
                argv++;
        }
+       dbg("exiting %s", __func__);
        return appp;
 #undef ALLOC_ACTION
+#undef appp
+#undef cur_action
+#undef invert_flag
 }
 
 int find_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
@@ -1166,7 +1294,15 @@ int find_main(int argc UNUSED_PARAM, char **argv)
 
        INIT_G();
 
-       argv++;
+       /* "+": stop on first non-option */
+       i = getopt32(argv, "+HLP");
+       if (i & (1<<0))
+               G.recurse_flags |= ACTION_FOLLOWLINKS_L0 | ACTION_DANGLING_OK;
+       if (i & (1<<1))
+               G.recurse_flags |= ACTION_FOLLOWLINKS | ACTION_DANGLING_OK;
+       /* -P is default and is ignored */
+       argv += optind;
+
        for (firstopt = 0; argv[firstopt]; firstopt++) {
                if (argv[firstopt][0] == '-')
                        break;