lib/libregex/regcomp.c

70 static bin_tree_t *parse (re_string_t *regexp, regex_t *preg,
72 static bin_tree_t *parse_reg_exp (re_string_t *regexp, regex_t *preg,
75 static bin_tree_t *parse_branch (re_string_t *regexp, regex_t *preg,
78 static bin_tree_t *parse_expression (re_string_t *regexp, regex_t *preg,
81 static bin_tree_t *parse_sub_exp (re_string_t *regexp, regex_t *preg,
84 static bin_tree_t *parse_dup_op (bin_tree_t *dup_elem, re_string_t *regexp,
87 static bin_tree_t *parse_bracket_exp (re_string_t *regexp, re_dfa_t *dfa,
91 					    re_string_t *regexp,
97 					  re_string_t *regexp,
269 /* Set by `re_set_syntax' to the current regexp syntax to recognize.  Can
755   re_string_t regexp;
795   err = re_string_construct (&regexp, pattern, length, preg->translate,
801       re_string_destruct (&regexp);
810   dfa->str_tree = parse (&regexp, preg, syntax, &err);
830   re_string_destruct (&regexp);
2131 parse (regexp, preg, syntax, err)
2132      re_string_t *regexp;
2141   fetch_token (&current_token, regexp, syntax | RE_CARET_ANCHORS_HERE);
2142   tree = parse_reg_exp (regexp, preg, &current_token, syntax, 0, err);
2168 parse_reg_exp (regexp, preg, token, syntax, nest, err)
2169      re_string_t *regexp;
2178   tree = parse_branch (regexp, preg, token, syntax, nest, err);
2184       fetch_token (token, regexp, syntax | RE_CARET_ANCHORS_HERE);
2188 	  branch = parse_branch (regexp, preg, token, syntax, nest, err);
2214 parse_branch (regexp, preg, token, syntax, nest, err)
2215      re_string_t *regexp;
2224   tree = parse_expression (regexp, preg, token, syntax, nest, err);
2231       exp = parse_expression (regexp, preg, token, syntax, nest, err);
2259 parse_expression (regexp, preg, token, syntax, nest, err)
2260      re_string_t *regexp;
2281 	  while (!re_string_eoi (regexp)
2282 		 && !re_string_first_byte (regexp, re_string_cur_idx (regexp)))
2285 	      fetch_token (token, regexp, syntax);
2298       tree = parse_sub_exp (regexp, preg, token, syntax, nest + 1, err);
2303       tree = parse_bracket_exp (regexp, dfa, token, syntax, err);
2340 	  fetch_token (token, regexp, syntax);
2341 	  return parse_expression (regexp, preg, token, syntax, nest, err);
2408       fetch_token (token, regexp, syntax);
2422       tree = build_charclass_op (dfa, regexp->trans,
2431       tree = build_charclass_op (dfa, regexp->trans,
2451   fetch_token (token, regexp, syntax);
2456       tree = parse_dup_op (tree, regexp, dfa, token, syntax, err);
2480 parse_sub_exp (regexp, preg, token, syntax, nest, err)
2481      re_string_t *regexp;
2493   fetch_token (token, regexp, syntax | RE_CARET_ANCHORS_HERE);
2500       tree = parse_reg_exp (regexp, preg, token, syntax, nest, err);
2521 parse_dup_op (elem, regexp, dfa, token, syntax, err)
2523      re_string_t *regexp;
2530   int i, start, end, start_idx = re_string_cur_idx (regexp);
2536       start = fetch_number (regexp, token, syntax);
2552 		    ? fetch_number (regexp, token, syntax) : -2));
2568 	  re_string_set_index (regexp, start_idx);
2589   fetch_token (token, regexp, syntax);
2811 parse_bracket_exp (regexp, dfa, token, syntax, err)
2812      re_string_t *regexp;
3118   token_len = peek_token_bracket (token, regexp, syntax);
3132       re_string_skip_bytes (regexp, token_len); /* Skip a token.  */
3133       token_len = peek_token_bracket (token, regexp, syntax);
3155       ret = parse_bracket_element (&start_elem, regexp, token, token_len, dfa,
3165       token_len = peek_token_bracket (token, regexp, syntax);
3177 	      re_string_skip_bytes (regexp, token_len); /* Skip '-'.  */
3178 	      token_len2 = peek_token_bracket (&token2, regexp, syntax);
3187 		  re_string_skip_bytes (regexp, -token_len);
3198 	  ret = parse_bracket_element (&end_elem, regexp, &token2, token_len2,
3206 	  token_len = peek_token_bracket (token, regexp, syntax);
3268 	      *err = build_charclass (regexp->trans, sbcset,
3290   re_string_skip_bytes (regexp, token_len); /* Skip a token.  */
3367 parse_bracket_element (elem, regexp, token, token_len, dfa, syntax,
3370      re_string_t *regexp;
3379   cur_char_size = re_string_char_size_at (regexp, re_string_cur_idx (regexp));
3383       elem->opr.wch = re_string_wchar_at (regexp, re_string_cur_idx (regexp));
3384       re_string_skip_bytes (regexp, cur_char_size);
3388   re_string_skip_bytes (regexp, token_len); /* Skip a token.  */
3391     return parse_bracket_symbol (elem, regexp, token);
3397       (void) peek_token_bracket (&token2, regexp, syntax);
3413 parse_bracket_symbol (elem, regexp, token)
3415      re_string_t *regexp;
3420   if (re_string_eoi(regexp))
3427 	ch = re_string_fetch_byte_case (regexp);
3429 	ch = re_string_fetch_byte (regexp);
3430       if (re_string_eoi(regexp))
3432       if (ch == delim && re_string_peek_byte (regexp, 0) == ']')
3436   re_string_skip_bytes (regexp, 1);