fix file input for cli
[project/uci.git] / list.c
1 /*
2  * libuci - Library for the Unified Configuration Interface
3  * Copyright (C) 2008 Felix Fietkau <nbd@openwrt.org>
4  *
5  * this program is free software; you can redistribute it and/or modify
6  * it under the terms of the gnu lesser general public license version 2.1
7  * as published by the free software foundation
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  */
14
15 #include <glob.h>
16
17 /* initialize a list head/item */
18 static inline void uci_list_init(struct uci_list *ptr)
19 {
20         ptr->prev = ptr;
21         ptr->next = ptr;
22 }
23
24 /* inserts a new list entry after a given entry */
25 static inline void uci_list_insert(struct uci_list *list, struct uci_list *ptr)
26 {
27         list->next->prev = ptr;
28         ptr->prev = list;
29         ptr->next = list->next;
30         list->next = ptr;
31 }
32
33 /* inserts a new list entry at the tail of the list */
34 static inline void uci_list_add(struct uci_list *head, struct uci_list *ptr)
35 {
36         /* NB: head->prev points at the tail */
37         uci_list_insert(head->prev, ptr);
38 }
39
40 static inline void uci_list_del(struct uci_list *ptr)
41 {
42         struct uci_list *next, *prev;
43
44         next = ptr->next;
45         prev = ptr->prev;
46
47         prev->next = next;
48         next->prev = prev;
49
50         uci_list_init(ptr);
51 }
52
53 /* 
54  * uci_alloc_generic allocates a new uci_element with payload
55  * payload is appended to the struct to save memory and reduce fragmentation
56  */
57 static struct uci_element *
58 uci_alloc_generic(struct uci_context *ctx, int type, const char *name, int size)
59 {
60         struct uci_element *e;
61         int datalen = size;
62         void *ptr;
63
64         ptr = uci_malloc(ctx, datalen);
65         e = (struct uci_element *) ptr;
66         e->type = type;
67         if (name) {
68                 UCI_TRAP_SAVE(ctx, error);
69                 e->name = uci_strdup(ctx, name);
70                 UCI_TRAP_RESTORE(ctx);
71         }
72         uci_list_init(&e->list);
73         goto done;
74
75 error:
76         free(ptr);
77         UCI_THROW(ctx, ctx->errno);
78
79 done:
80         return e;
81 }
82
83 static void
84 uci_free_element(struct uci_element *e)
85 {
86         if (e->name)
87                 free(e->name);
88         if (!uci_list_empty(&e->list))
89                 uci_list_del(&e->list);
90         free(e);
91 }
92
93 static struct uci_option *
94 uci_alloc_option(struct uci_section *s, const char *name, const char *value)
95 {
96         struct uci_package *p = s->package;
97         struct uci_context *ctx = p->ctx;
98         struct uci_option *o;
99
100         o = uci_alloc_element(ctx, option, name, strlen(value) + 1);
101         o->value = uci_dataptr(o);
102         o->section = s;
103         strcpy(o->value, value);
104         uci_list_add(&s->options, &o->e.list);
105
106         return o;
107 }
108
109 static inline void
110 uci_free_option(struct uci_option *o)
111 {
112         if ((o->value != uci_dataptr(o)) &&
113                 (o->value != NULL))
114                 free(o->value);
115         uci_free_element(&o->e);
116 }
117
118 static struct uci_section *
119 uci_alloc_section(struct uci_package *p, const char *type, const char *name)
120 {
121         struct uci_context *ctx = p->ctx;
122         struct uci_section *s;
123
124         if (name && !name[0])
125                 name = NULL;
126
127         s = uci_alloc_element(ctx, section, name, strlen(type) + 1);
128         uci_list_init(&s->options);
129         s->type = uci_dataptr(s);
130         s->package = p;
131         strcpy(s->type, type);
132         if (name == NULL)
133                 s->anonymous = true;
134
135         uci_list_add(&p->sections, &s->e.list);
136
137         return s;
138 }
139
140 static void
141 uci_free_section(struct uci_section *s)
142 {
143         struct uci_element *o, *tmp;
144
145         uci_foreach_element_safe(&s->options, tmp, o) {
146                 uci_free_option(uci_to_option(o));
147         }
148         if ((s->type != uci_dataptr(s)) &&
149                 (s->type != NULL))
150                 free(s->type);
151         uci_free_element(&s->e);
152 }
153
154 /* record a change that was done to a package */
155 static void
156 uci_add_history(struct uci_context *ctx, struct uci_package *p, int cmd, char *section, char *option, char *value)
157 {
158         struct uci_history *h;
159         int size = strlen(section) + 1;
160         char *ptr;
161
162         if (!p->confdir)
163                 return;
164
165         if (value)
166                 size += strlen(section) + 1;
167
168         h = uci_alloc_element(ctx, history, option, size);
169         ptr = uci_dataptr(h);
170         h->cmd = cmd;
171         h->section = strcpy(ptr, section);
172         if (value) {
173                 ptr += strlen(ptr) + 1;
174                 h->value = strcpy(ptr, value);
175         }
176         uci_list_add(&p->history, &h->e.list);
177 }
178
179 static void
180 uci_free_history(struct uci_history *h)
181 {
182         if (!h)
183                 return;
184         if ((h->section != NULL) &&
185                 (h->section != uci_dataptr(h))) {
186                 free(h->section);
187                 free(h->value);
188         }
189         uci_free_element(&h->e);
190 }
191
192 static struct uci_package *
193 uci_alloc_package(struct uci_context *ctx, const char *name)
194 {
195         struct uci_package *p;
196
197         p = uci_alloc_element(ctx, package, name, 0);
198         p->ctx = ctx;
199         uci_list_init(&p->sections);
200         uci_list_init(&p->history);
201         return p;
202 }
203
204 static void
205 uci_free_package(struct uci_package **package)
206 {
207         struct uci_element *e, *tmp;
208         struct uci_package *p = *package;
209
210         if(!p)
211                 return;
212
213         if (p->path)
214                 free(p->path);
215         uci_foreach_element_safe(&p->sections, tmp, e) {
216                 uci_free_section(uci_to_section(e));
217         }
218         uci_foreach_element_safe(&p->history, tmp, e) {
219                 uci_free_history(uci_to_history(e));
220         }
221         uci_free_element(&p->e);
222         *package = NULL;
223 }
224
225 static struct uci_element *uci_lookup_list(struct uci_context *ctx, struct uci_list *list, const char *name)
226 {
227         struct uci_element *e;
228
229         uci_foreach_element(list, e) {
230                 if (!strcmp(e->name, name))
231                         return e;
232         }
233         return NULL;
234 }
235
236 int uci_lookup(struct uci_context *ctx, struct uci_element **res, struct uci_package *p, char *section, char *option)
237 {
238         struct uci_element *e;
239         struct uci_section *s;
240         struct uci_option *o;
241
242         UCI_HANDLE_ERR(ctx);
243         UCI_ASSERT(ctx, res != NULL);
244         UCI_ASSERT(ctx, p != NULL);
245         UCI_ASSERT(ctx, section != NULL);
246
247         e = uci_lookup_list(ctx, &p->sections, section);
248         if (!e)
249                 goto notfound;
250
251         if (option) {
252                 s = uci_to_section(e);
253                 e = uci_lookup_list(ctx, &s->options, option);
254         }
255
256         *res = e;
257         return 0;
258
259 notfound:
260         UCI_THROW(ctx, UCI_ERR_NOTFOUND);
261         return 0;
262 }
263
264 int uci_del_element(struct uci_context *ctx, struct uci_element *e)
265 {
266         /* NB: UCI_INTERNAL use means without history tracking */
267         bool internal = ctx->internal;
268         struct uci_package *p = NULL;
269         struct uci_section *s = NULL;
270         struct uci_option *o = NULL;
271         struct uci_element *i, *tmp;
272         char *option = NULL;
273
274         UCI_HANDLE_ERR(ctx);
275         UCI_ASSERT(ctx, e != NULL);
276
277         switch(e->type) {
278         case UCI_TYPE_SECTION:
279                 s = uci_to_section(e);
280                 uci_foreach_element_safe(&s->options, tmp, i) {
281                         uci_del_element(ctx, i);
282                 }
283                 break;
284         case UCI_TYPE_OPTION:
285                 o = uci_to_option(e);
286                 s = o->section;
287                 p = s->package;
288                 option = e->name;
289                 break;
290         default:
291                 UCI_THROW(ctx, UCI_ERR_INVAL);
292                 break;
293         }
294
295         p = s->package;
296         if (!internal)
297                 uci_add_history(ctx, p, UCI_CMD_REMOVE, s->e.name, option, NULL);
298
299         switch(e->type) {
300         case UCI_TYPE_SECTION:
301                 uci_free_section(s);
302                 break;
303         case UCI_TYPE_OPTION:
304                 uci_free_option(o);
305                 break;
306         default:
307                 break;
308         }
309         return 0;
310 }
311
312 int uci_set_element_value(struct uci_context *ctx, struct uci_element **element, char *value)
313 {
314         /* NB: UCI_INTERNAL use means without history tracking */
315         bool internal = ctx->internal;
316         struct uci_list *list;
317         struct uci_element *e;
318         struct uci_package *p;
319         struct uci_section *s;
320         char *section;
321         char *option;
322         char *str;
323         int size;
324
325         UCI_HANDLE_ERR(ctx);
326         UCI_ASSERT(ctx, value != NULL);
327         UCI_ASSERT(ctx, element != NULL);
328         UCI_ASSERT(ctx, *element != NULL);
329
330         /* what the 'value' of an element means depends on the type
331          * for a section, the 'value' means its type
332          * for an option, the 'value' means its value string
333          * when changing the value, shrink the element to its actual size
334          * (it may have been allocated with a bigger size, to include
335          *  its buffer)
336          * then duplicate the string passed on the command line and
337          * insert it into the structure.
338          */
339         e = *element;
340         list = e->list.prev;
341         switch(e->type) {
342         case UCI_TYPE_SECTION:
343                 size = sizeof(struct uci_section);
344                 s = uci_to_section(e);
345                 section = e->name;
346                 option = NULL;
347                 break;
348         case UCI_TYPE_OPTION:
349                 size = sizeof(struct uci_option);
350                 s = uci_to_option(e)->section;
351                 section = s->e.name;
352                 option = e->name;
353                 break;
354         default:
355                 UCI_THROW(ctx, UCI_ERR_INVAL);
356                 return 0;
357         }
358         p = s->package;
359         if (!internal)
360                 uci_add_history(ctx, p, UCI_CMD_CHANGE, section, option, value);
361
362         uci_list_del(&e->list);
363         e = uci_realloc(ctx, e, size);
364         str = uci_strdup(ctx, value);
365         uci_list_insert(list, &e->list);
366         *element = e;
367
368         switch(e->type) {
369         case UCI_TYPE_SECTION:
370                 uci_to_section(e)->type = str;
371                 break;
372         case UCI_TYPE_OPTION:
373                 uci_to_option(e)->value = str;
374                 break;
375         default:
376                 break;
377         }
378
379         return 0;
380 }
381
382 int uci_rename(struct uci_context *ctx, struct uci_package *p, char *section, char *option, char *name)
383 {
384         /* NB: UCI_INTERNAL use means without history tracking */
385         bool internal = ctx->internal;
386         struct uci_element *e;
387         struct uci_section *s = NULL;
388         struct uci_option *o = NULL;
389
390         UCI_HANDLE_ERR(ctx);
391         UCI_ASSERT(ctx, p != NULL);
392         UCI_ASSERT(ctx, section != NULL);
393
394         UCI_INTERNAL(uci_lookup, ctx, &e, p, section, option);
395
396         if (!internal)
397                 uci_add_history(ctx, p, UCI_CMD_RENAME, section, option, name);
398
399         name = uci_strdup(ctx, name);
400         if (e->name)
401                 free(e->name);
402         e->name = name;
403
404         return 0;
405 }
406
407
408 int uci_delete(struct uci_context *ctx, struct uci_package *p, char *section, char *option)
409 {
410         /* NB: pass on internal flag to uci_del_element */
411         bool internal = ctx->internal;
412         struct uci_element *e;
413         struct uci_section *s = NULL;
414         struct uci_option *o = NULL;
415
416         UCI_HANDLE_ERR(ctx);
417         UCI_ASSERT(ctx, p != NULL);
418         UCI_ASSERT(ctx, section != NULL);
419
420         UCI_INTERNAL(uci_lookup, ctx, &e, p, section, option);
421
422         if (!internal)
423                 return uci_del_element(ctx, e);
424         UCI_INTERNAL(uci_del_element, ctx, e);
425
426         return 0;
427 }
428
429 int uci_set(struct uci_context *ctx, struct uci_package *p, char *section, char *option, char *value)
430 {
431         /* NB: UCI_INTERNAL use means without history tracking */
432         bool internal = ctx->internal;
433         struct uci_element *e = NULL;
434         struct uci_section *s = NULL;
435         struct uci_option *o = NULL;
436         struct uci_history *h;
437
438         UCI_HANDLE_ERR(ctx);
439         UCI_ASSERT(ctx, p != NULL);
440         UCI_ASSERT(ctx, section != NULL);
441         UCI_ASSERT(ctx, value != NULL);
442
443         /*
444          * look up the package, section and option (if set)
445          * if the section/option is to be modified and it is not found
446          * create a new element in the appropriate list
447          */
448         e = uci_lookup_list(ctx, &p->sections, section);
449         if (!e)
450                 goto notfound;
451
452         s = uci_to_section(e);
453         if (ctx->pctx)
454                 ctx->pctx->section = s;
455
456         if (option) {
457                 e = uci_lookup_list(ctx, &s->options, option);
458                 if (!e)
459                         goto notfound;
460                 o = uci_to_option(e);
461         }
462
463         /* 
464          * no unknown element was supplied, assume that we can just update 
465          * an existing entry
466          */
467         if (o)
468                 e = &o->e;
469         else
470                 e = &s->e;
471
472         if (!internal)
473                 return uci_set_element_value(ctx, &e, value);
474
475         UCI_INTERNAL(uci_set_element_value, ctx, &e, value);
476         return 0;
477
478 notfound:
479         /* 
480          * the entry that we need to update was not found,
481          * check if the search failed prematurely.
482          * this can happen if the package was not found, or if
483          * an option was supplied, but the section wasn't found
484          */
485         if (!p || (!s && option))
486                 UCI_THROW(ctx, UCI_ERR_NOTFOUND);
487
488         /* now add the missing entry */
489         if (!internal)
490                 uci_add_history(ctx, p, UCI_CMD_ADD, section, option, value);
491         if (s)
492                 uci_alloc_option(s, option, value);
493         else {
494                 s = uci_alloc_section(p, value, section);
495                 if (ctx->pctx)
496                         ctx->pctx->section = s;
497         }
498
499         return 0;
500 }
501
502 int uci_unload(struct uci_context *ctx, struct uci_package *p)
503 {
504         struct uci_element *e;
505
506         UCI_HANDLE_ERR(ctx);
507         UCI_ASSERT(ctx, p != NULL);
508
509         uci_free_package(&p);
510         return 0;
511 }
512