| #include <string.h> |
| #include <stdio.h> |
| #include <stdlib.h> |
| |
| #include "array.h" |
| |
| static data_unset *data_config_copy(const data_unset *s) { |
| data_config *src = (data_config *)s; |
| data_config *ds = data_config_init(); |
| |
| buffer_copy_string_buffer(ds->key, src->key); |
| buffer_copy_string_buffer(ds->comp_key, src->comp_key); |
| array_free(ds->value); |
| ds->value = array_init_array(src->value); |
| return (data_unset *)ds; |
| } |
| |
| static void data_config_free(data_unset *d) { |
| data_config *ds = (data_config *)d; |
| |
| buffer_free(ds->key); |
| buffer_free(ds->op); |
| buffer_free(ds->comp_key); |
| |
| array_free(ds->value); |
| array_free(ds->childs); |
| |
| if (ds->string) buffer_free(ds->string); |
| #ifdef HAVE_PCRE_H |
| if (ds->regex) pcre_free(ds->regex); |
| if (ds->regex_study) pcre_free(ds->regex_study); |
| #endif |
| |
| free(d); |
| } |
| |
| static void data_config_reset(data_unset *d) { |
| data_config *ds = (data_config *)d; |
| |
| /* reused array elements */ |
| buffer_reset(ds->key); |
| buffer_reset(ds->comp_key); |
| array_reset(ds->value); |
| } |
| |
| static int data_config_insert_dup(data_unset *dst, data_unset *src) { |
| UNUSED(dst); |
| |
| src->free(src); |
| |
| return 0; |
| } |
| |
| static void data_config_print(const data_unset *d, int depth) { |
| data_config *ds = (data_config *)d; |
| array *a = (array *)ds->value; |
| size_t i; |
| size_t maxlen; |
| |
| if (0 == ds->context_ndx) { |
| fprintf(stdout, "config {\n"); |
| } |
| else { |
| fprintf(stdout, "$%s %s \"%s\" {\n", |
| ds->comp_key->ptr, ds->op->ptr, ds->string->ptr); |
| array_print_indent(depth + 1); |
| fprintf(stdout, "# block %d\n", ds->context_ndx); |
| } |
| depth ++; |
| |
| maxlen = array_get_max_key_length(a); |
| for (i = 0; i < a->used; i ++) { |
| data_unset *du = a->data[i]; |
| size_t len = strlen(du->key->ptr); |
| size_t j; |
| |
| array_print_indent(depth); |
| fprintf(stdout, "%s", du->key->ptr); |
| for (j = maxlen - len; j > 0; j --) { |
| fprintf(stdout, " "); |
| } |
| fprintf(stdout, " = "); |
| du->print(du, depth); |
| fprintf(stdout, "\n"); |
| } |
| |
| if (ds->childs) { |
| fprintf(stdout, "\n"); |
| for (i = 0; i < ds->childs->used; i ++) { |
| data_unset *du = ds->childs->data[i]; |
| |
| /* only the 1st block of chaining */ |
| if (NULL == ((data_config *)du)->prev) { |
| fprintf(stdout, "\n"); |
| array_print_indent(depth); |
| du->print(du, depth); |
| fprintf(stdout, "\n"); |
| } |
| } |
| } |
| |
| depth --; |
| array_print_indent(depth); |
| fprintf(stdout, "}"); |
| if (0 != ds->context_ndx) { |
| fprintf(stdout, " # end of $%s %s \"%s\"", |
| ds->comp_key->ptr, ds->op->ptr, ds->string->ptr); |
| } |
| |
| if (ds->next) { |
| fprintf(stdout, "\n"); |
| array_print_indent(depth); |
| fprintf(stdout, "else "); |
| ds->next->print((data_unset *)ds->next, depth); |
| } |
| } |
| |
| data_config *data_config_init(void) { |
| data_config *ds; |
| |
| ds = calloc(1, sizeof(*ds)); |
| |
| ds->key = buffer_init(); |
| ds->op = buffer_init(); |
| ds->comp_key = buffer_init(); |
| ds->value = array_init(); |
| ds->childs = array_init(); |
| ds->childs->is_weakref = 1; |
| |
| ds->copy = data_config_copy; |
| ds->free = data_config_free; |
| ds->reset = data_config_reset; |
| ds->insert_dup = data_config_insert_dup; |
| ds->print = data_config_print; |
| ds->type = TYPE_CONFIG; |
| |
| return ds; |
| } |