home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / gnu / utils / bug / 1409 next >
Encoding:
Text File  |  1992-08-25  |  9.7 KB  |  368 lines
  1. Newsgroups: gnu.utils.bug
  2. Path: sparky!uunet!convex!darwin.sura.net!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!skipsun.UUCP!skip
  3. From: skip@skipsun.UUCP (Skip Gilbrech)
  4. Subject: Patches for find-3.7 to enable case-insensitive filename matching
  5. Message-ID: <9208250528.AA00424@skipsun.UUCP>
  6. Sender: gnulists@ai.mit.edu
  7. Organization: GNUs Not Usenet
  8. Distribution: gnu
  9. Date: Tue, 25 Aug 1992 05:28:11 GMT
  10. Approved: bug-gnu-utils@prep.ai.mit.edu
  11. Lines: 355
  12.  
  13. Following is a set of patches for find-3.7 which implement a -nocase
  14. option that allows case-insensitive shell pattern matching in
  15. conjunction with the -name, -lname, and -path predicates.
  16.  
  17. Case-insensitive matching could be done before, but only by explicitly
  18. specifying the upper/lower case letters to match ([Aa][Bb][Cc] ...).
  19.  
  20. Some systems apparently provide a `fnmatch()' call already, and
  21. lib/fnmatch.c had to be modified, and must be used, for this to work,
  22. so I changed configure to unconditionally include it in LIBOBJS.  The
  23. change probably should be made to `configure.in', but since I don't
  24. have `autoconf' (mentioned in INSTALL), I couldn't do that.
  25.  
  26. My hope was that these changes, or equivalent functionality, might be
  27. integrated into the base find distribution.  I've submitted similar
  28. patches for earlier versions (2.2 and 3.5) without that happening,
  29. though, and have received several requests for an update, so I'm
  30. providing these patches to enable those who like the -nocase option to
  31. implement it independently.
  32.  
  33. -Skip Gilbrech
  34.  
  35. ######################################################################
  36. Diffs follow:
  37.  
  38. *** configure-dist    Mon Jul 20 02:05:20 1992
  39. --- configure    Mon Aug 24 21:56:09 1992
  40. ***************
  41. *** 449,455 ****
  42.   fi
  43.   rm -f conftest*
  44.   
  45. ! for func in fnmatch memset stpcpy strdup strftime strspn strstr strtol
  46.   do
  47.   echo checking for ${func}
  48.   echo "
  49. --- 449,457 ----
  50.   fi
  51.   rm -f conftest*
  52.   
  53. ! LIBOBJS="fnmatch.o"
  54. ! 
  55. ! for func in memset stpcpy strdup strftime strspn strstr strtol
  56.   do
  57.   echo checking for ${func}
  58.   echo "
  59. *** lib/fnmatch.h-dist    Thu May 28 17:36:19 1992
  60. --- lib/fnmatch.h    Mon Aug 24 22:31:57 1992
  61. ***************
  62. *** 38,44 ****
  63.   #define    FNM_PATHNAME    (1 << 0)/* No wildcard can ever match `/'.  */
  64.   #define    FNM_NOESCAPE    (1 << 1)/* Backslashes don't quote special chars.  */
  65.   #define    FNM_PERIOD    (1 << 2)/* Leading `.' is matched only explicitly.  */
  66. ! #define    __FNM_FLAGS    (FNM_PATHNAME|FNM_NOESCAPE|FNM_PERIOD)
  67.   
  68.   #if !defined (_POSIX_C_SOURCE) || _POSIX_C_SOURCE < 2 || defined (_BSD_SOURCE)
  69.   #define    FNM_FILE_NAME    FNM_PATHNAME
  70. --- 38,45 ----
  71.   #define    FNM_PATHNAME    (1 << 0)/* No wildcard can ever match `/'.  */
  72.   #define    FNM_NOESCAPE    (1 << 1)/* Backslashes don't quote special chars.  */
  73.   #define    FNM_PERIOD    (1 << 2)/* Leading `.' is matched only explicitly.  */
  74. ! #define    FNM_ANYCASE    (1 << 3)/* Matches ignore case. */
  75. ! #define    __FNM_FLAGS    (FNM_PATHNAME|FNM_NOESCAPE|FNM_PERIOD|FNM_ANYCASE)
  76.   
  77.   #if !defined (_POSIX_C_SOURCE) || _POSIX_C_SOURCE < 2 || defined (_BSD_SOURCE)
  78.   #define    FNM_FILE_NAME    FNM_PATHNAME
  79. *** lib/fnmatch.c-dist    Wed Jun  3 19:51:40 1992
  80. --- lib/fnmatch.c    Mon Aug 24 22:26:28 1992
  81. ***************
  82. *** 26,31 ****
  83. --- 26,40 ----
  84.   #define const
  85.   #endif
  86.   
  87. + #include <ctype.h>
  88. + 
  89. + #define CHAR_SET_SIZE  256
  90. + static char ci_tbl[CHAR_SET_SIZE];
  91. + static int ci_tbl_initialized = 0;
  92. + 
  93. + #define CI_LOWER(c)    (ci_tbl[ (c) & (CHAR_SET_SIZE - 1) ])
  94. + #define CI_MATCH(c1,c2)    (CI_LOWER(c1) == CI_LOWER(c2))
  95. + 
  96.   /* Match STRING against the filename pattern PATTERN, returning zero if
  97.      it matches, nonzero if not.  */
  98.   int
  99. ***************
  100. *** 43,48 ****
  101. --- 52,68 ----
  102.         return -1;
  103.       }
  104.   
  105. +   if ((flags & FNM_ANYCASE) && ! ci_tbl_initialized)
  106. +   {
  107. +       unsigned count;
  108. +       
  109. +       /* Map uppercase characters to corresponding lowercase ones.  */
  110. +       for (count = 0; count < CHAR_SET_SIZE; ++count)
  111. +       ci_tbl[count] = isupper (count) ? tolower (count) : count;
  112. + 
  113. +       ci_tbl_initialized = 1;
  114. +   }
  115. + 
  116.     while ((c = *p++) != '\0')
  117.       {
  118.         switch (c)
  119. ***************
  120. *** 60,66 ****
  121.       case '\\':
  122.         if (!(flags & FNM_NOESCAPE))
  123.           c = *p++;
  124. !       if (*n != c)
  125.           return FNM_NOMATCH;
  126.         break;
  127.   
  128. --- 80,86 ----
  129.       case '\\':
  130.         if (!(flags & FNM_NOESCAPE))
  131.           c = *p++;
  132. !       if ((flags & FNM_ANYCASE) ? !CI_MATCH(*n, c) : *n != c)
  133.           return FNM_NOMATCH;
  134.         break;
  135.   
  136. ***************
  137. *** 80,86 ****
  138.         {
  139.           char c1 = (!(flags & FNM_NOESCAPE) && c == '\\') ? *p : c;
  140.           for (--p; *n != '\0'; ++n)
  141. !           if ((c == '[' || *n == c1) &&
  142.             fnmatch (p, n, flags & ~FNM_PERIOD) == 0)
  143.           return 0;
  144.           return FNM_NOMATCH;
  145. --- 100,107 ----
  146.         {
  147.           char c1 = (!(flags & FNM_NOESCAPE) && c == '\\') ? *p : c;
  148.           for (--p; *n != '\0'; ++n)
  149. !           if ((c == '[' ||
  150. !            ((flags & FNM_ANYCASE) ? CI_MATCH(*n, c1) : *n == c1)) &&
  151.             fnmatch (p, n, flags & ~FNM_PERIOD) == 0)
  152.           return 0;
  153.           return FNM_NOMATCH;
  154. ***************
  155. *** 130,136 ****
  156.               c = *p++;
  157.             }
  158.   
  159. !         if (*n >= cstart && *n <= cend)
  160.             goto matched;
  161.   
  162.           if (c == ']')
  163. --- 151,164 ----
  164.               c = *p++;
  165.             }
  166.   
  167. !         if (flags & FNM_ANYCASE)
  168. !           {
  169. !             if (CI_LOWER(*n) >= CI_LOWER(cstart) &&
  170. !             CI_LOWER(*n) <= CI_LOWER(cend))
  171. ! 
  172. !               goto matched;
  173. !           }
  174. !         else if (*n >= cstart && *n <= cend)
  175.             goto matched;
  176.   
  177.           if (c == ']')
  178. ***************
  179. *** 159,165 ****
  180.         break;
  181.   
  182.       default:
  183. !       if (c != *n)
  184.           return FNM_NOMATCH;
  185.       }
  186.   
  187. --- 187,193 ----
  188.         break;
  189.   
  190.       default:
  191. !       if ((flags & FNM_ANYCASE) ? !CI_MATCH(c, *n) : c != *n)
  192.           return FNM_NOMATCH;
  193.       }
  194.   
  195. *** find/pred.c-dist    Mon Jul 13 22:09:20 1992
  196. --- find/pred.c    Mon Aug 24 23:37:30 1992
  197. ***************
  198. *** 123,128 ****
  199. --- 123,129 ----
  200.   boolean pred_name ();
  201.   boolean pred_negate ();
  202.   boolean pred_newer ();
  203. + /* no pred_nocase */
  204.   /* no pred_noleaf */
  205.   boolean pred_nogroup ();
  206.   boolean pred_nouser ();
  207. ***************
  208. *** 872,878 ****
  209.         else
  210.       {
  211.         linkname[linklen] = '\0';
  212. !       if (fnmatch (pred_ptr->args.str, linkname, 0) == 0)
  213.           ret = true;
  214.       }
  215.         free (linkname);
  216. --- 873,880 ----
  217.         else
  218.       {
  219.         linkname[linklen] = '\0';
  220. !       if (fnmatch (pred_ptr->args.str, linkname,
  221. !                case_insensitive ? FNM_ANYCASE : 0) == 0)
  222.           ret = true;
  223.       }
  224.         free (linkname);
  225. ***************
  226. *** 951,957 ****
  227.     char *base;
  228.   
  229.     base = basename (pathname);
  230. !   if (fnmatch (pred_ptr->args.str, base, FNM_PERIOD) == 0)
  231.       return (true);
  232.     return (false);
  233.   }
  234. --- 953,960 ----
  235.     char *base;
  236.   
  237.     base = basename (pathname);
  238. !   if (fnmatch (pred_ptr->args.str, base,
  239. !            case_insensitive ? (FNM_ANYCASE|FNM_PERIOD) : FNM_PERIOD) == 0)
  240.       return (true);
  241.     return (false);
  242.   }
  243. ***************
  244. *** 1084,1090 ****
  245.        struct stat *stat_buf;
  246.        struct predicate *pred_ptr;
  247.   {
  248. !   if (fnmatch (pred_ptr->args.str, pathname, 0) == 0)
  249.       return (true);
  250.     return (false);
  251.   }
  252. --- 1087,1094 ----
  253.        struct stat *stat_buf;
  254.        struct predicate *pred_ptr;
  255.   {
  256. !   if (fnmatch (pred_ptr->args.str, pathname,
  257. !            case_insensitive ? FNM_ANYCASE : 0) == 0)
  258.       return (true);
  259.     return (false);
  260.   }
  261. *** find/find.c-dist    Fri Apr 24 02:55:34 1992
  262. --- find/find.c    Mon Aug 24 22:41:44 1992
  263. ***************
  264. *** 103,108 ****
  265. --- 103,112 ----
  266.   /* Pointer to the function used to stat files. */
  267.   int (*xstat) ();
  268.   
  269. + /* If true, enables case-insensitive filename searching.
  270. +    Set by -nocase. */
  271. + boolean case_insensitive;
  272. + 
  273.   #ifdef DEBUG_STAT
  274.   int
  275.   debug_stat (file, bufp)
  276. ***************
  277. *** 135,140 ****
  278. --- 139,145 ----
  279.     no_leaf_check = false;
  280.     stay_on_filesystem = false;
  281.     exit_status = 0;
  282. +   case_insensitive = false;
  283.   #ifdef DEBUG_STAT
  284.     xstat = debug_stat;
  285.   #else /* !DEBUG_STAT */
  286. *** find/defs.h-dist    Tue Jul 14 00:21:55 1992
  287. --- find/defs.h    Mon Aug 24 21:56:07 1992
  288. ***************
  289. *** 201,203 ****
  290. --- 201,204 ----
  291.   extern int exit_status;
  292.   extern int path_length;
  293.   extern int (*xstat) ();
  294. + extern boolean case_insensitive;
  295. *** find/parser.c-dist    Mon Jul 13 13:04:31 1992
  296. --- find/parser.c    Mon Aug 24 23:27:54 1992
  297. ***************
  298. *** 98,103 ****
  299. --- 98,104 ----
  300.   boolean parse_name ();
  301.   boolean parse_negate ();
  302.   boolean parse_newer ();
  303. + boolean parse_nocase ();
  304.   boolean parse_noleaf ();
  305.   boolean parse_nogroup ();
  306.   boolean parse_nouser ();
  307. ***************
  308. *** 153,158 ****
  309. --- 154,160 ----
  310.   boolean pred_name ();
  311.   boolean pred_negate ();
  312.   boolean pred_newer ();
  313. + /* no pred_nocase */
  314.   /* no pred_noleaf */
  315.   boolean pred_nogroup ();
  316.   boolean pred_nouser ();
  317. ***************
  318. *** 245,250 ****
  319. --- 247,253 ----
  320.     {"ncpio", parse_ncpio},    /* Unix */
  321.   #endif
  322.     {"newer", parse_newer},
  323. +   {"nocase", parse_nocase},    /* GNU (nocase patch - sg) */
  324.     {"noleaf", parse_noleaf},    /* GNU */
  325.     {"nogroup", parse_nogroup},
  326.     {"nouser", parse_nouser},
  327. ***************
  328. *** 768,773 ****
  329. --- 771,785 ----
  330.     our_pred->args.time = stat_newer.st_mtime;
  331.     (*arg_ptr)++;
  332.     return (true);
  333. + }
  334. + 
  335. + boolean
  336. + parse_nocase (argv, arg_ptr)
  337. +      char *argv[];
  338. +      int *arg_ptr;
  339. + {
  340. +   case_insensitive = true;
  341. +   return true;
  342.   }
  343.   
  344.   boolean
  345. *** man/find.1-dist    Tue May 12 04:43:31 1992
  346. --- man/find.1    Mon Aug 24 23:41:15 1992
  347. ***************
  348. *** 53,58 ****
  349. --- 53,61 ----
  350.   Do not apply any tests or actions at levels less than \fIlevels\fR (a
  351.   non-negative integer).  `\-mindepth 1' means process all files except
  352.   the command line arguments.
  353. + .IP \-nocase
  354. + Shell patterns used with \-name, \-lname, and \-path are matched without
  355. + regard to case.
  356.   .IP "\-noleaf"
  357.   Do not optimize by assuming that directories contain 2 fewer
  358.   subdirectories than their hard link count.  Each directory on a normal
  359.  
  360.  
  361. -- 
  362. Skip Gilbrech            email:    skip@fsg.com
  363. Fusion Systems Group            uupsi!fsg!skip
  364. 225 Broadway, 24th Floor        uupsi!skipnyc!skip
  365. New York, NY 10007        phones:    212-285-8001 (work)
  366.                     201-825-8732 (home)
  367.  
  368.