123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757 |
- /*
- * libuci - Library for the Unified Configuration Interface
- * Copyright (C) 2008 Felix Fietkau <nbd@openwrt.org>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU Lesser General Public License version 2.1
- * as published by the Free Software Foundation
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU Lesser General Public License for more details.
- */
- static bool uci_list_set_pos(struct uci_list *head, struct uci_list *ptr, int pos)
- {
- struct uci_list *old_head = ptr->prev;
- struct uci_list *new_head = head;
- struct uci_element *p = NULL;
- uci_list_del(ptr);
- uci_foreach_element(head, p) {
- if (pos-- <= 0)
- break;
- new_head = &p->list;
- }
- uci_list_add(new_head->next, ptr);
- return (old_head != new_head);
- }
- /*
- * uci_alloc_generic allocates a new uci_element with payload
- * payload is appended to the struct to save memory and reduce fragmentation
- */
- __private struct uci_element *
- uci_alloc_generic(struct uci_context *ctx, int type, const char *name, int size)
- {
- struct uci_element *e;
- int datalen = size;
- void *ptr;
- ptr = uci_malloc(ctx, datalen);
- e = (struct uci_element *) ptr;
- e->type = type;
- if (name) {
- UCI_TRAP_SAVE(ctx, error);
- e->name = uci_strdup(ctx, name);
- UCI_TRAP_RESTORE(ctx);
- }
- uci_list_init(&e->list);
- goto done;
- error:
- free(ptr);
- UCI_THROW(ctx, ctx->err);
- done:
- return e;
- }
- __private void
- uci_free_element(struct uci_element *e)
- {
- free(e->name);
- if (!uci_list_empty(&e->list))
- uci_list_del(&e->list);
- free(e);
- }
- static struct uci_option *
- uci_alloc_option(struct uci_section *s, const char *name, const char *value, struct uci_list *after)
- {
- struct uci_package *p = s->package;
- struct uci_context *ctx = p->ctx;
- struct uci_option *o;
- o = uci_alloc_element(ctx, option, name, strlen(value) + 1);
- o->type = UCI_TYPE_STRING;
- o->v.string = uci_dataptr(o);
- o->section = s;
- strcpy(o->v.string, value);
- uci_list_insert(after ? after : s->options.prev, &o->e.list);
- return o;
- }
- static inline void
- uci_free_option(struct uci_option *o)
- {
- struct uci_element *e, *tmp;
- switch(o->type) {
- case UCI_TYPE_STRING:
- if ((o->v.string != uci_dataptr(o)) &&
- (o->v.string != NULL))
- free(o->v.string);
- break;
- case UCI_TYPE_LIST:
- uci_foreach_element_safe(&o->v.list, tmp, e) {
- uci_free_element(e);
- }
- break;
- default:
- break;
- }
- uci_free_element(&o->e);
- }
- static struct uci_option *
- uci_alloc_list(struct uci_section *s, const char *name, struct uci_list *after)
- {
- struct uci_package *p = s->package;
- struct uci_context *ctx = p->ctx;
- struct uci_option *o;
- o = uci_alloc_element(ctx, option, name, 0);
- o->type = UCI_TYPE_LIST;
- o->section = s;
- uci_list_init(&o->v.list);
- uci_list_insert(after ? after : s->options.prev, &o->e.list);
- return o;
- }
- /* Based on an efficient hash function published by D. J. Bernstein */
- static unsigned int djbhash(unsigned int hash, char *str)
- {
- int len = strlen(str);
- int i;
- /* initial value */
- if (hash == ~0U)
- hash = 5381;
- for(i = 0; i < len; i++) {
- hash = ((hash << 5) + hash) + str[i];
- }
- return (hash & 0x7FFFFFFF);
- }
- /* fix up an unnamed section, e.g. after adding options to it */
- static void uci_fixup_section(struct uci_context *ctx, struct uci_section *s)
- {
- unsigned int hash = ~0U;
- struct uci_element *e;
- char buf[16];
- if (!s || s->e.name)
- return;
- /*
- * Generate a name for unnamed sections. This is used as reference
- * when locating or updating the section from apps/scripts.
- * To make multiple concurrent versions somewhat safe for updating,
- * the name is generated from a hash of its type and name/value
- * pairs of its option, and it is prefixed by a counter value.
- * If the order of the unnamed sections changes for some reason,
- * updates to them will be rejected.
- */
- hash = djbhash(hash, s->type);
- uci_foreach_element(&s->options, e) {
- struct uci_option *o;
- hash = djbhash(hash, e->name);
- o = uci_to_option(e);
- switch(o->type) {
- case UCI_TYPE_STRING:
- hash = djbhash(hash, o->v.string);
- break;
- default:
- break;
- }
- }
- sprintf(buf, "cfg%02x%04x", s->package->n_section, hash % (1 << 16));
- s->e.name = uci_strdup(ctx, buf);
- }
- /* transfer options between two sections */
- static void uci_section_transfer_options(struct uci_section *dst, struct uci_section *src)
- {
- struct uci_element *e;
- /* transfer the option list by inserting the new list HEAD and removing the old */
- uci_list_insert(&src->options, &dst->options);
- uci_list_del(&src->options);
- /* update pointer to section in options */
- uci_foreach_element(&dst->options, e) {
- struct uci_option *o;
- o = uci_to_option(e);
- o->section = dst;
- }
- }
- static struct uci_section *
- uci_alloc_section(struct uci_package *p, const char *type, const char *name, struct uci_list *after)
- {
- struct uci_context *ctx = p->ctx;
- struct uci_section *s;
- if (name && !name[0])
- name = NULL;
- s = uci_alloc_element(ctx, section, name, strlen(type) + 1);
- uci_list_init(&s->options);
- s->type = uci_dataptr(s);
- s->package = p;
- strcpy(s->type, type);
- if (name == NULL)
- s->anonymous = true;
- p->n_section++;
- uci_list_insert(after ? after : p->sections.prev, &s->e.list);
- return s;
- }
- static void
- uci_free_section(struct uci_section *s)
- {
- struct uci_element *o, *tmp;
- uci_foreach_element_safe(&s->options, tmp, o) {
- uci_free_option(uci_to_option(o));
- }
- if ((s->type != uci_dataptr(s)) &&
- (s->type != NULL))
- free(s->type);
- uci_free_element(&s->e);
- }
- __private struct uci_package *
- uci_alloc_package(struct uci_context *ctx, const char *name)
- {
- struct uci_package *p;
- p = uci_alloc_element(ctx, package, name, 0);
- p->ctx = ctx;
- uci_list_init(&p->sections);
- uci_list_init(&p->delta);
- uci_list_init(&p->saved_delta);
- return p;
- }
- __private void
- uci_free_package(struct uci_package **package)
- {
- struct uci_element *e, *tmp;
- struct uci_package *p = *package;
- if(!p)
- return;
- free(p->path);
- uci_foreach_element_safe(&p->sections, tmp, e) {
- uci_free_section(uci_to_section(e));
- }
- uci_foreach_element_safe(&p->delta, tmp, e) {
- uci_free_delta(uci_to_delta(e));
- }
- uci_foreach_element_safe(&p->saved_delta, tmp, e) {
- uci_free_delta(uci_to_delta(e));
- }
- uci_free_element(&p->e);
- *package = NULL;
- }
- static void
- uci_free_any(struct uci_element **e)
- {
- switch((*e)->type) {
- case UCI_TYPE_SECTION:
- uci_free_section(uci_to_section(*e));
- break;
- case UCI_TYPE_OPTION:
- uci_free_option(uci_to_option(*e));
- break;
- default:
- break;
- }
- *e = NULL;
- }
- __private struct uci_element *
- uci_lookup_list(struct uci_list *list, const char *name)
- {
- struct uci_element *e;
- uci_foreach_element(list, e) {
- if (!strcmp(e->name, name))
- return e;
- }
- return NULL;
- }
- static struct uci_element *
- uci_lookup_ext_section(struct uci_context *ctx, struct uci_ptr *ptr)
- {
- char *idxstr, *t, *section, *name;
- struct uci_element *e = NULL;
- struct uci_section *s;
- int idx, c;
- section = uci_strdup(ctx, ptr->section);
- name = idxstr = section + 1;
- if (section[0] != '@')
- goto error;
- /* parse the section index part */
- idxstr = strchr(idxstr, '[');
- if (!idxstr)
- goto error;
- *idxstr = 0;
- idxstr++;
- t = strchr(idxstr, ']');
- if (!t)
- goto error;
- if (t[1] != 0)
- goto error;
- *t = 0;
- t = NULL;
- idx = strtol(idxstr, &t, 10);
- if (t && *t)
- goto error;
- if (!*name)
- name = NULL;
- else if (!uci_validate_type(name))
- goto error;
- /* if the given index is negative, it specifies the section number from
- * the end of the list */
- if (idx < 0) {
- c = 0;
- uci_foreach_element(&ptr->p->sections, e) {
- s = uci_to_section(e);
- if (name && (strcmp(s->type, name) != 0))
- continue;
- c++;
- }
- idx += c;
- }
- c = 0;
- uci_foreach_element(&ptr->p->sections, e) {
- s = uci_to_section(e);
- if (name && (strcmp(s->type, name) != 0))
- continue;
- if (idx == c)
- goto done;
- c++;
- }
- e = NULL;
- goto done;
- error:
- free(section);
- memset(ptr, 0, sizeof(struct uci_ptr));
- UCI_THROW(ctx, UCI_ERR_INVAL);
- done:
- free(section);
- if (e)
- ptr->section = e->name;
- return e;
- }
- int
- uci_lookup_next(struct uci_context *ctx, struct uci_element **e, struct uci_list *list, const char *name)
- {
- UCI_HANDLE_ERR(ctx);
- *e = uci_lookup_list(list, name);
- if (!*e)
- UCI_THROW(ctx, UCI_ERR_NOTFOUND);
- return 0;
- }
- int
- uci_lookup_ptr(struct uci_context *ctx, struct uci_ptr *ptr, char *str, bool extended)
- {
- struct uci_element *e;
- UCI_HANDLE_ERR(ctx);
- UCI_ASSERT(ctx, ptr != NULL);
- if (str)
- UCI_INTERNAL(uci_parse_ptr, ctx, ptr, str);
- ptr->flags |= UCI_LOOKUP_DONE;
- /* look up the package first */
- if (ptr->p)
- e = &ptr->p->e;
- else
- e = uci_lookup_list(&ctx->root, ptr->package);
- if (!e) {
- UCI_INTERNAL(uci_load, ctx, ptr->package, &ptr->p);
- if (!ptr->p)
- goto notfound;
- ptr->last = &ptr->p->e;
- } else {
- ptr->p = uci_to_package(e);
- ptr->last = e;
- }
- if (!ptr->section && !ptr->s)
- goto complete;
- /* if the section name validates as a regular name, pass through
- * to the regular uci_lookup function call */
- if (ptr->s) {
- e = &ptr->s->e;
- } else if (ptr->flags & UCI_LOOKUP_EXTENDED) {
- if (extended)
- e = uci_lookup_ext_section(ctx, ptr);
- else
- UCI_THROW(ctx, UCI_ERR_INVAL);
- } else {
- e = uci_lookup_list(&ptr->p->sections, ptr->section);
- }
- if (!e)
- goto abort;
- ptr->last = e;
- ptr->s = uci_to_section(e);
- if (ptr->option) {
- e = uci_lookup_list(&ptr->s->options, ptr->option);
- if (!e)
- goto abort;
- ptr->o = uci_to_option(e);
- ptr->last = e;
- }
- complete:
- ptr->flags |= UCI_LOOKUP_COMPLETE;
- abort:
- return UCI_OK;
- notfound:
- UCI_THROW(ctx, UCI_ERR_NOTFOUND);
- /* not a chance here */
- return UCI_ERR_NOTFOUND;
- }
- __private struct uci_element *
- uci_expand_ptr(struct uci_context *ctx, struct uci_ptr *ptr, bool complete)
- {
- UCI_ASSERT(ctx, ptr != NULL);
- if (!(ptr->flags & UCI_LOOKUP_DONE))
- UCI_INTERNAL(uci_lookup_ptr, ctx, ptr, NULL, 1);
- if (complete && !(ptr->flags & UCI_LOOKUP_COMPLETE))
- UCI_THROW(ctx, UCI_ERR_NOTFOUND);
- UCI_ASSERT(ctx, ptr->p != NULL);
- /* fill in missing string info */
- if (ptr->p && !ptr->package)
- ptr->package = ptr->p->e.name;
- if (ptr->s && !ptr->section)
- ptr->section = ptr->s->e.name;
- if (ptr->o && !ptr->option)
- ptr->option = ptr->o->e.name;
- if (ptr->o)
- return &ptr->o->e;
- if (ptr->s)
- return &ptr->s->e;
- if (ptr->p)
- return &ptr->p->e;
- else
- return NULL;
- }
- int uci_rename(struct uci_context *ctx, struct uci_ptr *ptr)
- {
- /* NB: UCI_INTERNAL use means without delta tracking */
- bool internal = ctx && ctx->internal;
- struct uci_element *e;
- struct uci_package *p;
- char *n;
- UCI_HANDLE_ERR(ctx);
- e = uci_expand_ptr(ctx, ptr, true);
- p = ptr->p;
- UCI_ASSERT(ctx, ptr->s);
- UCI_ASSERT(ctx, ptr->value);
- if (!internal && p->has_delta)
- uci_add_delta(ctx, &p->delta, UCI_CMD_RENAME, ptr->section, ptr->option, ptr->value);
- n = uci_strdup(ctx, ptr->value);
- free(e->name);
- e->name = n;
- if (e->type == UCI_TYPE_SECTION)
- uci_to_section(e)->anonymous = false;
- return 0;
- }
- int uci_reorder_section(struct uci_context *ctx, struct uci_section *s, int pos)
- {
- struct uci_package *p = s->package;
- bool internal = ctx && ctx->internal;
- bool changed = false;
- char order[32];
- UCI_HANDLE_ERR(ctx);
- changed = uci_list_set_pos(&s->package->sections, &s->e.list, pos);
- if (!internal && p->has_delta && changed) {
- sprintf(order, "%d", pos);
- uci_add_delta(ctx, &p->delta, UCI_CMD_REORDER, s->e.name, NULL, order);
- }
- return 0;
- }
- int uci_add_section(struct uci_context *ctx, struct uci_package *p, const char *type, struct uci_section **res)
- {
- bool internal = ctx && ctx->internal;
- struct uci_section *s;
- UCI_HANDLE_ERR(ctx);
- UCI_ASSERT(ctx, p != NULL);
- s = uci_alloc_section(p, type, NULL, NULL);
- if (s && s->anonymous)
- uci_fixup_section(ctx, s);
- *res = s;
- if (!internal && p->has_delta)
- uci_add_delta(ctx, &p->delta, UCI_CMD_ADD, s->e.name, NULL, type);
- return 0;
- }
- int uci_delete(struct uci_context *ctx, struct uci_ptr *ptr)
- {
- /* NB: pass on internal flag to uci_del_element */
- bool internal = ctx && ctx->internal;
- struct uci_package *p;
- struct uci_element *e1, *e2, *tmp;
- int index;
- UCI_HANDLE_ERR(ctx);
- e1 = uci_expand_ptr(ctx, ptr, true);
- p = ptr->p;
- UCI_ASSERT(ctx, ptr->s);
- if (ptr->o && ptr->o->type == UCI_TYPE_LIST && ptr->value && *ptr->value) {
- if (!sscanf(ptr->value, "%d", &index))
- return 1;
- uci_foreach_element_safe(&ptr->o->v.list, tmp, e2) {
- if (index == 0) {
- if (!internal && p->has_delta)
- uci_add_delta(ctx, &p->delta, UCI_CMD_REMOVE, ptr->section, ptr->option, ptr->value);
- uci_free_option(uci_to_option(e2));
- return 0;
- }
- index--;
- }
- return 0;
- }
- if (!internal && p->has_delta)
- uci_add_delta(ctx, &p->delta, UCI_CMD_REMOVE, ptr->section, ptr->option, NULL);
- uci_free_any(&e1);
- if (ptr->option)
- ptr->o = NULL;
- else if (ptr->section)
- ptr->s = NULL;
- return 0;
- }
- int uci_add_list(struct uci_context *ctx, struct uci_ptr *ptr)
- {
- /* NB: UCI_INTERNAL use means without delta tracking */
- bool internal = ctx && ctx->internal;
- struct uci_element *volatile e1 = NULL, *volatile e2 = NULL;
- UCI_HANDLE_ERR(ctx);
- uci_expand_ptr(ctx, ptr, false);
- UCI_ASSERT(ctx, ptr->s);
- UCI_ASSERT(ctx, ptr->value);
- if (ptr->o && ptr->o->type != UCI_TYPE_LIST && ptr->o->type != UCI_TYPE_STRING) {
- UCI_THROW(ctx, UCI_ERR_INVAL);
- }
- /* create new item */
- e1 = uci_alloc_generic(ctx, UCI_TYPE_ITEM, ptr->value, sizeof(struct uci_option));
- if (!ptr->o) {
- /* create new list */
- UCI_TRAP_SAVE(ctx, error);
- ptr->o = uci_alloc_list(ptr->s, ptr->option, NULL);
- UCI_TRAP_RESTORE(ctx);
- } else if (ptr->o->type == UCI_TYPE_STRING) {
- /* create new list and add old string value as item to list */
- struct uci_option *old = ptr->o;
- UCI_TRAP_SAVE(ctx, error);
- e2 = uci_alloc_generic(ctx, UCI_TYPE_ITEM, old->v.string, sizeof(struct uci_option));
- ptr->o = uci_alloc_list(ptr->s, ptr->option, &old->e.list);
- UCI_TRAP_RESTORE(ctx);
- uci_list_add(&ptr->o->v.list, &e2->list);
- /* remove old option */
- if (ptr->option == old->e.name)
- ptr->option = ptr->o->e.name;
- uci_free_option(old);
- }
- /* add new item to list */
- uci_list_add(&ptr->o->v.list, &e1->list);
- if (!internal && ptr->p->has_delta)
- uci_add_delta(ctx, &ptr->p->delta, UCI_CMD_LIST_ADD, ptr->section, ptr->option, ptr->value);
- return 0;
- error:
- if (e1 != NULL)
- uci_free_element(e1);
- if (e2 != NULL)
- uci_free_element(e2);
- UCI_THROW(ctx, ctx->err);
- }
- int uci_del_list(struct uci_context *ctx, struct uci_ptr *ptr)
- {
- /* NB: pass on internal flag to uci_del_element */
- bool internal = ctx && ctx->internal;
- struct uci_element *e, *tmp;
- struct uci_package *p;
- UCI_HANDLE_ERR(ctx);
- uci_expand_ptr(ctx, ptr, false);
- UCI_ASSERT(ctx, ptr->s);
- UCI_ASSERT(ctx, ptr->value);
- if (!(ptr->o && ptr->option))
- return 0;
- if ((ptr->o->type != UCI_TYPE_LIST))
- return 0;
- p = ptr->p;
- if (!internal && p->has_delta)
- uci_add_delta(ctx, &p->delta, UCI_CMD_LIST_DEL, ptr->section, ptr->option, ptr->value);
- uci_foreach_element_safe(&ptr->o->v.list, tmp, e) {
- if (!strcmp(ptr->value, uci_to_option(e)->e.name)) {
- uci_free_option(uci_to_option(e));
- }
- }
- return 0;
- }
- int uci_set(struct uci_context *ctx, struct uci_ptr *ptr)
- {
- /* NB: UCI_INTERNAL use means without delta tracking */
- bool internal = ctx && ctx->internal;
- UCI_HANDLE_ERR(ctx);
- uci_expand_ptr(ctx, ptr, false);
- UCI_ASSERT(ctx, ptr->value);
- UCI_ASSERT(ctx, ptr->s || (!ptr->option && ptr->section));
- if (!ptr->option && ptr->value[0]) {
- UCI_ASSERT(ctx, uci_validate_type(ptr->value));
- }
- if (!ptr->o && ptr->s && ptr->option) {
- struct uci_element *e;
- e = uci_lookup_list(&ptr->s->options, ptr->option);
- if (e)
- ptr->o = uci_to_option(e);
- }
- if (!ptr->value[0]) {
- /* if setting a nonexistant option/section to a nonexistant value,
- * exit without errors */
- if (!(ptr->flags & UCI_LOOKUP_COMPLETE))
- return 0;
- return uci_delete(ctx, ptr);
- } else if (!ptr->o && ptr->option) { /* new option */
- ptr->o = uci_alloc_option(ptr->s, ptr->option, ptr->value, NULL);
- } else if (!ptr->s && ptr->section) { /* new section */
- ptr->s = uci_alloc_section(ptr->p, ptr->value, ptr->section, NULL);
- } else if (ptr->o && ptr->option) { /* update option */
- if (ptr->o->type == UCI_TYPE_STRING && !strcmp(ptr->o->v.string, ptr->value))
- return 0;
- if (ptr->o->type == UCI_TYPE_STRING && strlen(ptr->o->v.string) == strlen(ptr->value)) {
- strcpy(ptr->o->v.string, ptr->value);
- } else {
- struct uci_option *old = ptr->o;
- ptr->o = uci_alloc_option(ptr->s, ptr->option, ptr->value, &old->e.list);
- if (ptr->option == old->e.name)
- ptr->option = ptr->o->e.name;
- uci_free_option(old);
- }
- } else if (ptr->s && ptr->section) { /* update section */
- if (!strcmp(ptr->s->type, ptr->value))
- return 0;
- if (strlen(ptr->s->type) == strlen(ptr->value)) {
- strcpy(ptr->s->type, ptr->value);
- } else {
- struct uci_section *old = ptr->s;
- ptr->s = uci_alloc_section(ptr->p, ptr->value, old->e.name, &old->e.list);
- uci_section_transfer_options(ptr->s, old);
- if (ptr->section == old->e.name)
- ptr->section = ptr->s->e.name;
- uci_free_section(old);
- ptr->s->package->n_section--;
- }
- } else {
- UCI_THROW(ctx, UCI_ERR_INVAL);
- }
- if (!internal && ptr->p->has_delta)
- uci_add_delta(ctx, &ptr->p->delta, UCI_CMD_CHANGE, ptr->section, ptr->option, ptr->value);
- return 0;
- }
- int uci_unload(struct uci_context *ctx, struct uci_package *p)
- {
- UCI_HANDLE_ERR(ctx);
- UCI_ASSERT(ctx, p != NULL);
- uci_free_package(&p);
- return 0;
- }
|