Code

Merge branch 'jc/blame' into jc/web-blame
[git.git] / grep.c
diff --git a/grep.c b/grep.c
index 61db6e199cfed45601dacc4e798f6eb7801620e5..c411ddd4d52e2aa68edd979733dd0b15f51d5f32 100644 (file)
--- a/grep.c
+++ b/grep.c
@@ -43,6 +43,8 @@ static struct grep_expr *compile_pattern_atom(struct grep_pat **list)
        p = *list;
        switch (p->token) {
        case GREP_PATTERN: /* atom */
+       case GREP_PATTERN_HEAD:
+       case GREP_PATTERN_BODY:
                x = xcalloc(1, sizeof (struct grep_expr));
                x->node = GREP_NODE_ATOM;
                x->u.atom = p;
@@ -136,15 +138,18 @@ void compile_grep_patterns(struct grep_opt *opt)
 {
        struct grep_pat *p;
 
-       if (opt->fixed)
-               return;
-
-       /* First compile regexps */
        for (p = opt->pattern_list; p; p = p->next) {
-               if (p->token == GREP_PATTERN)
-                       compile_regexp(p, opt);
-               else
+               switch (p->token) {
+               case GREP_PATTERN: /* atom */
+               case GREP_PATTERN_HEAD:
+               case GREP_PATTERN_BODY:
+                       if (!opt->fixed)
+                               compile_regexp(p, opt);
+                       break;
+               default:
                        opt->extended = 1;
+                       break;
+               }
        }
 
        if (!opt->extended)
@@ -159,6 +164,46 @@ void compile_grep_patterns(struct grep_opt *opt)
                die("incomplete pattern expression: %s", p->pattern);
 }
 
+static void free_pattern_expr(struct grep_expr *x)
+{
+       switch (x->node) {
+       case GREP_NODE_ATOM:
+               break;
+       case GREP_NODE_NOT:
+               free_pattern_expr(x->u.unary);
+               break;
+       case GREP_NODE_AND:
+       case GREP_NODE_OR:
+               free_pattern_expr(x->u.binary.left);
+               free_pattern_expr(x->u.binary.right);
+               break;
+       }
+       free(x);
+}
+
+void free_grep_patterns(struct grep_opt *opt)
+{
+       struct grep_pat *p, *n;
+
+       for (p = opt->pattern_list; p; p = n) {
+               n = p->next;
+               switch (p->token) {
+               case GREP_PATTERN: /* atom */
+               case GREP_PATTERN_HEAD:
+               case GREP_PATTERN_BODY:
+                       regfree(&p->regexp);
+                       break;
+               default:
+                       break;
+               }
+               free(p);
+       }
+
+       if (!opt->extended)
+               return;
+       free_pattern_expr(opt->pattern_expression);
+}
+
 static char *end_of_line(char *cp, unsigned long *left)
 {
        unsigned long l = *left;
@@ -210,12 +255,16 @@ static int fixmatch(const char *pattern, char *line, regmatch_t *match)
        }
 }
 
-static int match_one_pattern(struct grep_opt *opt, struct grep_pat *p, char *bol, char *eol)
+static int match_one_pattern(struct grep_opt *opt, struct grep_pat *p, char *bol, char *eol, enum grep_context ctx)
 {
        int hit = 0;
        int at_true_bol = 1;
        regmatch_t pmatch[10];
 
+       if ((p->token != GREP_PATTERN) &&
+           ((p->token == GREP_PATTERN_HEAD) != (ctx == GREP_CONTEXT_HEAD)))
+               return 0;
+
  again:
        if (!opt->fixed) {
                regex_t *exp = &p->regexp;
@@ -262,37 +311,40 @@ static int match_one_pattern(struct grep_opt *opt, struct grep_pat *p, char *bol
 
 static int match_expr_eval(struct grep_opt *opt,
                           struct grep_expr *x,
-                          char *bol, char *eol)
+                          char *bol, char *eol,
+                          enum grep_context ctx)
 {
        switch (x->node) {
        case GREP_NODE_ATOM:
-               return match_one_pattern(opt, x->u.atom, bol, eol);
+               return match_one_pattern(opt, x->u.atom, bol, eol, ctx);
                break;
        case GREP_NODE_NOT:
-               return !match_expr_eval(opt, x->u.unary, bol, eol);
+               return !match_expr_eval(opt, x->u.unary, bol, eol, ctx);
        case GREP_NODE_AND:
-               return (match_expr_eval(opt, x->u.binary.left, bol, eol) &&
-                       match_expr_eval(opt, x->u.binary.right, bol, eol));
+               return (match_expr_eval(opt, x->u.binary.left, bol, eol, ctx) &&
+                       match_expr_eval(opt, x->u.binary.right, bol, eol, ctx));
        case GREP_NODE_OR:
-               return (match_expr_eval(opt, x->u.binary.left, bol, eol) ||
-                       match_expr_eval(opt, x->u.binary.right, bol, eol));
+               return (match_expr_eval(opt, x->u.binary.left, bol, eol, ctx) ||
+                       match_expr_eval(opt, x->u.binary.right, bol, eol, ctx));
        }
        die("Unexpected node type (internal error) %d\n", x->node);
 }
 
-static int match_expr(struct grep_opt *opt, char *bol, char *eol)
+static int match_expr(struct grep_opt *opt, char *bol, char *eol,
+                     enum grep_context ctx)
 {
        struct grep_expr *x = opt->pattern_expression;
-       return match_expr_eval(opt, x, bol, eol);
+       return match_expr_eval(opt, x, bol, eol, ctx);
 }
 
-static int match_line(struct grep_opt *opt, char *bol, char *eol)
+static int match_line(struct grep_opt *opt, char *bol, char *eol,
+                     enum grep_context ctx)
 {
        struct grep_pat *p;
        if (opt->extended)
-               return match_expr(opt, bol, eol);
+               return match_expr(opt, bol, eol, ctx);
        for (p = opt->pattern_list; p; p = p->next) {
-               if (match_one_pattern(opt, p, bol, eol))
+               if (match_one_pattern(opt, p, bol, eol, ctx))
                        return 1;
        }
        return 0;
@@ -312,6 +364,7 @@ int grep_buffer(struct grep_opt *opt, const char *name, char *buf, unsigned long
        int binary_match_only = 0;
        const char *hunk_mark = "";
        unsigned count = 0;
+       enum grep_context ctx = GREP_CONTEXT_HEAD;
 
        if (buffer_is_binary(buf, size)) {
                switch (opt->binary) {
@@ -339,7 +392,10 @@ int grep_buffer(struct grep_opt *opt, const char *name, char *buf, unsigned long
                ch = *eol;
                *eol = 0;
 
-               hit = match_line(opt, bol, eol);
+               if ((ctx == GREP_CONTEXT_HEAD) && (eol == bol))
+                       ctx = GREP_CONTEXT_BODY;
+
+               hit = match_line(opt, bol, eol, ctx);
                *eol = ch;
 
                /* "grep -v -e foo -e bla" should list lines
@@ -420,6 +476,8 @@ int grep_buffer(struct grep_opt *opt, const char *name, char *buf, unsigned long
                lno++;
        }
 
+       free(prev);
+
        if (opt->status_only)
                return 0;
        if (opt->unmatch_name_only) {