/*
- * Mini grep implementation for busybox
+ * Mini grep implementation for busybox using libc regex.
*
- *
- * Copyright (C) 1999 by Lineo, inc.
- * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
+ * Copyright (C) 1999,2000 by Lineo, inc.
+ * Written by Mark Whitley <markw@lineo.com>, <markw@codepoet.org>
*
* 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 "internal.h"
#include <stdio.h>
-#include <dirent.h>
+#include <stdlib.h>
+#include <getopt.h>
+#include <regex.h>
+#include <string.h> /* for strerror() */
#include <errno.h>
-#include <fcntl.h>
-#include <signal.h>
-#include <time.h>
-#include <ctype.h>
-
+#include "busybox.h"
-static const char grep_usage[] =
-"grep [-ihn]... PATTERN [FILE]...\n"
-"Search for PATTERN in each FILE or standard input.\n\n"
-"\t-h\tsuppress the prefixing filename on output\n"
-"\t-i\tignore case distinctions\n"
-"\t-n\tprint line number with output lines\n\n"
-"This version of grep matches strings (not full regexps).\n";
+extern void xregcomp(regex_t *preg, const char *regex, int cflags);
+extern int optind; /* in unistd.h */
+extern int errno; /* for use with strerror() */
-/*
- * See if the specified needle is found in the specified haystack.
- */
-static int search (const char *haystack, const char *needle, int ignoreCase)
-{
+/* options */
+static int ignore_case = 0;
+static int print_filename = 0;
+static int print_line_num = 0;
+static int print_count_only = 0;
+static int be_quiet = 0;
+static int invert_search = 0;
+static int suppress_err_msgs = 0;
- if (ignoreCase == FALSE) {
- haystack = strstr (haystack, needle);
- if (haystack == NULL)
- return FALSE;
- return TRUE;
- } else {
- int i;
- char needle1[BUF_SIZE];
- char haystack1[BUF_SIZE];
-
- strncpy( haystack1, haystack, sizeof(haystack1));
- strncpy( needle1, needle, sizeof(needle1));
- for( i=0; i<sizeof(haystack1) && haystack1[i]; i++)
- haystack1[i]=tolower( haystack1[i]);
- for( i=0; i<sizeof(needle1) && needle1[i]; i++)
- needle1[i]=tolower( needle1[i]);
- haystack = strstr (haystack1, needle1);
- if (haystack == NULL)
- return FALSE;
- return TRUE;
- }
-}
+/* globals */
+static regex_t regex; /* storage space for compiled regular expression */
+static int matched; /* keeps track of whether we ever matched */
+static char *cur_file = NULL; /* the current file we are reading */
-extern int grep_main (int argc, char **argv)
+static void print_matched_line(char *line, int linenum)
{
- FILE *fp;
- const char *needle;
- const char *name;
- const char *cp;
- int tellName=TRUE;
- int ignoreCase=FALSE;
- int tellLine=FALSE;
- long line;
- char buf[BUF_SIZE];
-
- ignoreCase = FALSE;
- tellLine = FALSE;
-
- argc--;
- argv++;
- if (argc < 1) {
- usage(grep_usage);
- }
-
- if (**argv == '-') {
- argc--;
- cp = *argv++;
-
- while (*++cp)
- switch (*cp) {
- case 'i':
- ignoreCase = TRUE;
- break;
-
- case 'h':
- tellName = FALSE;
- break;
-
- case 'n':
- tellLine = TRUE;
- break;
-
- default:
- usage(grep_usage);
- }
- }
+ if (print_count_only)
+ return;
- needle = *argv++;
- argc--;
+ if (print_filename)
+ printf("%s:", cur_file);
+ if (print_line_num)
+ printf("%i:", linenum);
- while (argc-- > 0) {
- name = *argv++;
+ puts(line);
+}
- fp = fopen (name, "r");
- if (fp == NULL) {
- perror (name);
- continue;
+static void grep_file(FILE *file)
+{
+ char *line = NULL;
+ int ret;
+ int linenum = 0;
+ int nmatches = 0;
+
+ while ((line = get_line_from_file(file)) != NULL) {
+ if (line[strlen(line)-1] == '\n')
+ line[strlen(line)-1] = '\0';
+ linenum++;
+ ret = regexec(®ex, line, 0, NULL, 0);
+ if (ret == 0 && !invert_search) { /* match */
+
+ /* if we found a match but were told to be quiet, stop here and
+ * return success */
+ if (be_quiet) {
+ regfree(®ex);
+ exit(0);
+ }
+
+ nmatches++;
+ print_matched_line(line, linenum);
+
+ }
+ else if (ret == REG_NOMATCH && invert_search) {
+ if (be_quiet) {
+ regfree(®ex);
+ exit(0);
+ }
+
+ nmatches++;
+ print_matched_line(line, linenum);
+ }
+
+ free(line);
}
- line = 0;
-
- while (fgets (buf, sizeof (buf), fp)) {
- line++;
- cp = &buf[strlen (buf) - 1];
-
- if (*cp != '\n')
- fprintf (stderr, "%s: Line too long\n", name);
-
- if (search (buf, needle, ignoreCase)==TRUE) {
- if (tellName==TRUE)
- printf ("%s: ", name);
+ /* special-case post processing */
+ if (print_count_only) {
+ if (print_filename)
+ printf("%s:", cur_file);
+ printf("%i\n", nmatches);
+ }
- if (tellLine==TRUE)
- printf ("%ld: ", line);
+ /* record if we matched */
+ if (nmatches != 0)
+ matched = 1;
+}
- fputs (buf, stdout);
- }
+extern int grep_main(int argc, char **argv)
+{
+ int opt;
+ int reflags;
+
+ /* do normal option parsing */
+ while ((opt = getopt(argc, argv, "iHhnqvsc")) > 0) {
+ switch (opt) {
+ case 'i':
+ ignore_case++;
+ break;
+ case 'H':
+ print_filename++;
+ break;
+ case 'h':
+ print_filename--;
+ break;
+ case 'n':
+ print_line_num++;
+ break;
+ case 'q':
+ be_quiet++;
+ break;
+ case 'v':
+ invert_search++;
+ break;
+ case 's':
+ suppress_err_msgs++;
+ break;
+ case 'c':
+ print_count_only++;
+ break;
+ }
}
- if (ferror (fp))
- perror (name);
-
- fclose (fp);
- }
- exit( TRUE);
-}
+ /* argv[optind] should be the regex pattern; no pattern, no worky */
+ if (argv[optind] == NULL)
+ usage(grep_usage);
+ /* compile the regular expression
+ * we're not going to mess with sub-expressions, and we need to
+ * treat newlines right. */
+ reflags = REG_NOSUB;
+ if (ignore_case)
+ reflags |= REG_ICASE;
+ xregcomp(®ex, argv[optind], reflags);
+
+ /* argv[(optind+1)..(argc-1)] should be names of file to grep through. If
+ * there is more than one file to grep, we will print the filenames */
+ if ((argc-1) - (optind+1) > 0)
+ print_filename++;
+
+ /* If no files were specified, or '-' was specified, take input from
+ * stdin. Otherwise, we grep through all the files specified. */
+ if (argv[optind+1] == NULL || (strcmp(argv[optind+1], "-") == 0)) {
+ grep_file(stdin);
+ }
+ else {
+ int i;
+ FILE *file;
+ for (i = optind + 1; i < argc; i++) {
+ cur_file = argv[i];
+ file = fopen(cur_file, "r");
+ if (file == NULL) {
+ if (!suppress_err_msgs)
+ perror_msg("%s", cur_file);
+ }
+ else {
+ grep_file(file);
+ fclose(file);
+ }
+ }
+ }
-/* END CODE */
+ regfree(®ex);
+ if (!matched)
+ return 1;
+ return 0;
+}