static void read_contains_rules(pp_knowledge *k, const char *label, pp_rule **rules, int *nRules) { /* Reading the 'contains_one_rules' and reading the 'contains_none_rules' into their respective arrays */ int n_commas, n_tokens, i, r; const char *p; const char **tokens; if (!pp_lexer_set_label(k->lt, label)) { *nRules = 0; if (verbosity>0) printf("PP warning: Not using any %s rules\n", label); } else { n_commas = pp_lexer_count_commas_of_label(k->lt); *nRules = (n_commas + 1)/3; } *rules = (pp_rule*) xalloc ((1+*nRules)*sizeof(pp_rule)); for (r=0; r<*nRules; r++) { /* first read link */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens>1) { prt_error("Fatal Error: post_process: Invalid syntax in %s (rule %i)",label,r+1); exit(1); } (*rules)[r].selector = string_set_add(tokens[0], k->string_set); /* read link set */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); (*rules)[r].link_set = pp_linkset_open(n_tokens); (*rules)[r].link_set_size = n_tokens; (*rules)[r].link_array = (const char **) xalloc((1+n_tokens)*sizeof(const char*)); for (i=0; i<n_tokens; i++) { p = string_set_add(tokens[i], k->string_set); pp_linkset_add((*rules)[r].link_set, p); (*rules)[r].link_array[i] = p; } (*rules)[r].link_array[i]=0; /* NULL-terminator */ /* read error message */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens>1) { prt_error("Fatal Error: post_process: Invalid syntax in %s (rule %i)",label,r+1); exit(1); } (*rules)[r].msg = string_set_add(tokens[0], k->string_set); } /* sentinel entry */ (*rules)[*nRules].msg = 0; }
static bool read_form_a_cycle_rules(pp_knowledge *k, const char *label) { size_t n_commas, n_tokens; size_t r, i; pp_linkset *lsHandle; const char **tokens; if (!pp_lexer_set_label(k->lt, label)) { k->n_form_a_cycle_rules = 0; if (verbosity_level(+D_PPK)) prt_error("Warning: File %s: Not using any 'form a cycle' rules\n", k->path); } else { n_commas = pp_lexer_count_commas_of_label(k->lt); k->n_form_a_cycle_rules = (n_commas + 1)/2; } k->form_a_cycle_rules= (pp_rule*) malloc ((1+k->n_form_a_cycle_rules)*sizeof(pp_rule)); for (r=0; r<k->n_form_a_cycle_rules; r++) { /* read link set */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens <= 0) { prt_error("Error: File %s: Syntax error\n", k->path); return false; } lsHandle = pp_linkset_open(n_tokens); for (i=0; i<n_tokens; i++) pp_linkset_add(lsHandle,string_set_add(tokens[i], k->string_set)); k->form_a_cycle_rules[r].link_set = lsHandle; /* read error message */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens > 1) { prt_error("Error: File %s: Invalid syntax (rule %zu of %s)\n", k->path, r+1,label); return false; } k->form_a_cycle_rules[r].msg = string_set_add(tokens[0], k->string_set); k->form_a_cycle_rules[r].use_count = 0; } /* sentinel entry */ k->form_a_cycle_rules[k->n_form_a_cycle_rules].msg = 0; k->form_a_cycle_rules[k->n_form_a_cycle_rules].use_count = 0; return true; }
static bool read_bounded_rules(pp_knowledge *k, const char *label) { const char **tokens; size_t n_commas, n_tokens; size_t r; if (!pp_lexer_set_label(k->lt, label)) { k->n_bounded_rules = 0; if (verbosity_level(+D_PPK)) prt_error("Warning: File %s: Not using any 'bounded' rules\n", k->path); } else { n_commas = pp_lexer_count_commas_of_label(k->lt); k->n_bounded_rules = (n_commas + 1)/2; } k->bounded_rules = (pp_rule*) malloc ((1+k->n_bounded_rules)*sizeof(pp_rule)); for (r=0; r<k->n_bounded_rules; r++) { /* read domain */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens!=1) { prt_error("Error: File %s: Invalid syntax: rule %zu of %s\n", k->path, r+1,label); return false; } k->bounded_rules[r].domain = (int) tokens[0][0]; /* read error message */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens!=1) { prt_error("Error: File %s: Invalid syntax: rule %zu of %s\n", k->path, r+1,label); return false; } k->bounded_rules[r].msg = string_set_add(tokens[0], k->string_set); k->bounded_rules[r].use_count = 0; } /* sentinel entry */ k->bounded_rules[k->n_bounded_rules].msg = 0; k->bounded_rules[k->n_bounded_rules].use_count = 0; return true; }
static void read_form_a_cycle_rules(pp_knowledge *k, const char *label) { int n_commas, n_tokens, r, i; pp_linkset *lsHandle; const char **tokens; if (!pp_lexer_set_label(k->lt, label)) { k->n_form_a_cycle_rules = 0; if (verbosity>0) printf("PP warning: Not using any 'form a cycle' rules\n"); } else { n_commas = pp_lexer_count_commas_of_label(k->lt); k->n_form_a_cycle_rules = (n_commas + 1)/2; } k->form_a_cycle_rules= (pp_rule*) xalloc ((1+k->n_form_a_cycle_rules)*sizeof(pp_rule)); for (r=0; r<k->n_form_a_cycle_rules; r++) { /* read link set */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens <= 0) { prt_error("Fatal Error: syntax error in knowledge file"); exit(1); } lsHandle = pp_linkset_open(n_tokens); for (i=0; i<n_tokens; i++) pp_linkset_add(lsHandle,string_set_add(tokens[i], k->string_set)); k->form_a_cycle_rules[r].link_set=lsHandle; /* read error message */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens > 1) { prt_error("Fatal Error: post_process: Invalid syntax (rule %i of %s)",r+1,label); exit(1); } k->form_a_cycle_rules[r].msg=string_set_add(tokens[0],k->string_set); } /* sentinel entry */ k->form_a_cycle_rules[k->n_form_a_cycle_rules].msg = 0; }
static void read_bounded_rules(pp_knowledge *k, const char *label) { const char **tokens; int n_commas, n_tokens, r; if (!pp_lexer_set_label(k->lt, label)) { k->n_bounded_rules = 0; if (verbosity>0) printf("PP warning: Not using any 'bounded' rules\n"); } else { n_commas = pp_lexer_count_commas_of_label(k->lt); k->n_bounded_rules = (n_commas + 1)/2; } k->bounded_rules = (pp_rule*) xalloc ((1+k->n_bounded_rules)*sizeof(pp_rule)); for (r=0; r<k->n_bounded_rules; r++) { /* read domain */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens!=1) { prt_error("Fatal Error: post_process: Invalid syntax: rule %i of %s",r+1,label); exit(1); } k->bounded_rules[r].domain = (int) tokens[0][0]; /* read error message */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens!=1) { prt_error("Fatal Error: post_process: Invalid syntax: rule %i of %s",r+1,label); exit(1); } k->bounded_rules[r].msg = string_set_add(tokens[0], k->string_set); } /* sentinel entry */ k->bounded_rules[k->n_bounded_rules].msg = 0; }
static bool read_contains_rules(pp_knowledge *k, const char *label, pp_rule **rules, size_t *nRules) { /* Reading the 'contains_one_rules' and reading the 'contains_none_rules' into their respective arrays */ size_t n_tokens, i, r; int n_commas; const char *p; const char **tokens; if (!pp_lexer_set_label(k->lt, label)) { *nRules = 0; if (verbosity_level(+D_PPK)) prt_error("Warning: File %s: Not using any %s rules\n", k->path, label); } else { n_commas = pp_lexer_count_commas_of_label(k->lt); if (-1 == n_commas) return false; *nRules = (n_commas + 1)/3; } *rules = (pp_rule*) malloc ((1+*nRules)*sizeof(pp_rule)); for (r=0; r<*nRules; r++) { /* first read link */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens > 1) { prt_error("Error: File %s: Invalid syntax in %s (rule %zu)\n", k->path, label, r+1); return false; } (*rules)[r].selector = string_set_add(tokens[0], k->string_set); /* read link set */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); (*rules)[r].link_set = pp_linkset_open(n_tokens); (*rules)[r].link_set_size = n_tokens; (*rules)[r].link_array = (const char **) malloc((1+n_tokens)*sizeof(const char*)); for (i=0; i<n_tokens; i++) { p = string_set_add(tokens[i], k->string_set); pp_linkset_add((*rules)[r].link_set, p); (*rules)[r].link_array[i] = p; } (*rules)[r].link_array[i]=0; /* NULL-terminator */ /* read error message */ tokens = pp_lexer_get_next_group_of_tokens_of_label(k->lt, &n_tokens); if (n_tokens > 1) { prt_error("Error: File %s: Invalid syntax in %s (rule %zu)\n", k->path, label, r+1); return false; } (*rules)[r].msg = string_set_add(tokens[0], k->string_set); (*rules)[r].use_count = 0; } /* sentinel entry */ (*rules)[*nRules].msg = 0; (*rules)[*nRules].use_count = 0; return true; }