gnulib/lib/regcomp.c

59 static bin_tree_t *parse (re_string_t *regexp, regex_t *preg,
61 static bin_tree_t *parse_reg_exp (re_string_t *regexp, regex_t *preg,
64 static bin_tree_t *parse_branch (re_string_t *regexp, regex_t *preg,
67 static bin_tree_t *parse_expression (re_string_t *regexp, regex_t *preg,
70 static bin_tree_t *parse_sub_exp (re_string_t *regexp, regex_t *preg,
73 static bin_tree_t *parse_dup_op (bin_tree_t *dup_elem, re_string_t *regexp,
76 static bin_tree_t *parse_bracket_exp (re_string_t *regexp, re_dfa_t *dfa,
80 					    re_string_t *regexp,
86 					  re_string_t *regexp,
246 /* Set by `re_set_syntax' to the current regexp syntax to recognize.  Can
740   re_string_t regexp;
783   err = re_string_construct (&regexp, pattern, length, preg->translate,
789       re_string_destruct (&regexp);
798   dfa->str_tree = parse (&regexp, preg, syntax, &err);
818   re_string_destruct (&regexp);
2089 parse (re_string_t *regexp, regex_t *preg, reg_syntax_t syntax,
2096   fetch_token (&current_token, regexp, syntax | RE_CARET_ANCHORS_HERE);
2097   tree = parse_reg_exp (regexp, preg, &current_token, syntax, 0, err);
2123 parse_reg_exp (re_string_t *regexp, regex_t *preg, re_token_t *token,
2128   tree = parse_branch (regexp, preg, token, syntax, nest, err);
2134       fetch_token (token, regexp, syntax | RE_CARET_ANCHORS_HERE);
2138 	  branch = parse_branch (regexp, preg, token, syntax, nest, err);
2164 parse_branch (re_string_t *regexp, regex_t *preg, re_token_t *token,
2169   tree = parse_expression (regexp, preg, token, syntax, nest, err);
2176       expr = parse_expression (regexp, preg, token, syntax, nest, err);
2204 parse_expression (re_string_t *regexp, regex_t *preg, re_token_t *token,
2221 	  while (!re_string_eoi (regexp)
2222 		 && !re_string_first_byte (regexp, re_string_cur_idx (regexp)))
2225 	      fetch_token (token, regexp, syntax);
2238       tree = parse_sub_exp (regexp, preg, token, syntax, nest + 1, err);
2243       tree = parse_bracket_exp (regexp, dfa, token, syntax, err);
2280 	  fetch_token (token, regexp, syntax);
2281 	  return parse_expression (regexp, preg, token, syntax, nest, err);
2348       fetch_token (token, regexp, syntax);
2362       tree = build_charclass_op (dfa, regexp->trans,
2371       tree = build_charclass_op (dfa, regexp->trans,
2391   fetch_token (token, regexp, syntax);
2396       tree = parse_dup_op (tree, regexp, dfa, token, syntax, err);
2420 parse_sub_exp (re_string_t *regexp, regex_t *preg, re_token_t *token,
2428   fetch_token (token, regexp, syntax | RE_CARET_ANCHORS_HERE);
2435       tree = parse_reg_exp (regexp, preg, token, syntax, nest, err);
2458 parse_dup_op (bin_tree_t *elem, re_string_t *regexp, re_dfa_t *dfa,
2462   Idx i, start, end, start_idx = re_string_cur_idx (regexp);
2468       start = fetch_number (regexp, token, syntax);
2484 		    ? fetch_number (regexp, token, syntax) : REG_ERROR));
2500 	  re_string_set_index (regexp, start_idx);
2521   fetch_token (token, regexp, syntax);
2743 parse_bracket_exp (re_string_t *regexp, re_dfa_t *dfa, re_token_t *token,
3051   token_len = peek_token_bracket (token, regexp, syntax);
3065       re_string_skip_bytes (regexp, token_len); /* Skip a token.  */
3066       token_len = peek_token_bracket (token, regexp, syntax);
3089       ret = parse_bracket_element (&start_elem, regexp, token, token_len, dfa,
3099       token_len = peek_token_bracket (token, regexp, syntax);
3111 	      re_string_skip_bytes (regexp, token_len); /* Skip '-'.  */
3112 	      token_len2 = peek_token_bracket (&token2, regexp, syntax);
3121 		  re_string_skip_bytes (regexp, -token_len);
3132 	  ret = parse_bracket_element (&end_elem, regexp, &token2, token_len2,
3140 	  token_len = peek_token_bracket (token, regexp, syntax);
3202 	      *err = build_charclass (regexp->trans, sbcset,
3224   re_string_skip_bytes (regexp, token_len); /* Skip a token.  */
3301 parse_bracket_element (bracket_elem_t *elem, re_string_t *regexp,
3307   cur_char_size = re_string_char_size_at (regexp, re_string_cur_idx (regexp));
3311       elem->opr.wch = re_string_wchar_at (regexp, re_string_cur_idx (regexp));
3312       re_string_skip_bytes (regexp, cur_char_size);
3316   re_string_skip_bytes (regexp, token_len); /* Skip a token.  */
3319     return parse_bracket_symbol (elem, regexp, token);
3325       (void) peek_token_bracket (&token2, regexp, syntax);
3341 parse_bracket_symbol (bracket_elem_t *elem, re_string_t *regexp,
3346   if (re_string_eoi(regexp))
3353 	ch = re_string_fetch_byte_case (regexp);
3355 	ch = re_string_fetch_byte (regexp);
3356       if (re_string_eoi(regexp))
3358       if (ch == delim && re_string_peek_byte (regexp, 0) == ']')
3362   re_string_skip_bytes (regexp, 1);