create the history savedir on uci_save() if it does not exist
[project/uci.git] / libuci.c
index ccf29b7..59e2ea9 100644 (file)
--- a/libuci.c
+++ b/libuci.c
  * This file contains some common code for the uci library
  */
 
+#define _GNU_SOURCE
 #include <sys/types.h>
 #include <stdbool.h>
 #include <string.h>
 #include <stdlib.h>
 #include <stdio.h>
+#include "uci.h"
 
-#include "libuci.h"
+static const char *uci_confdir = UCI_CONFDIR;
+static const char *uci_savedir = UCI_SAVEDIR;
 
-#define DEBUG
+static const char *uci_errstr[] = {
+       [UCI_OK] =            "Success",
+       [UCI_ERR_MEM] =       "Out of memory",
+       [UCI_ERR_INVAL] =     "Invalid argument",
+       [UCI_ERR_NOTFOUND] =  "Entry not found",
+       [UCI_ERR_IO] =        "I/O error",
+       [UCI_ERR_PARSE] =     "Parse error",
+       [UCI_ERR_DUPLICATE] = "Duplicate entry",
+       [UCI_ERR_UNKNOWN] =   "Unknown error",
+};
 
-#ifdef DEBUG
-#define DPRINTF(...) fprintf(stderr, __VA_ARGS__)
-#else
-#define DPRINTF(...)
-#endif
-/* 
- * throw an uci exception and store the error number
- * in the context.
- */
-#define UCI_THROW(ctx, err) do {       \
-       longjmp(ctx->trap, err);        \
-} while (0)
+static void uci_cleanup(struct uci_context *ctx);
 
-/*
- * store the return address for handling exceptions
- * needs to be called in every externally visible library function
- *
- * NB: this does not handle recursion at all. Calling externally visible
- * functions from other uci functions is only allowed at the end of the
- * calling function.
- */
-#define UCI_HANDLE_ERR(ctx) do {               \
-       int __val;                      \
-       if (!ctx)                       \
-               return UCI_ERR_INVAL;   \
-       __val = setjmp(ctx->trap);      \
-       if (__val) {                    \
-               ctx->errno = __val;     \
-               return __val;           \
-       }                               \
-} while (0)
+#include "uci_internal.h"
+#include "util.c"
+#include "list.c"
+#include "history.c"
+#include "file.c"
 
-/*
- * check the specified condition.
- * throw an invalid argument exception if it's false
- */
-#define UCI_ASSERT(ctx, expr) do {     \
-       if (!(expr)) {                  \
-               DPRINTF("[%s:%d] Assertion failed\n", __FILE__, __LINE__); \
-               UCI_THROW(ctx, UCI_ERR_INVAL);  \
-       }                               \
-} while (0)
-
-
-static char *uci_errstr[] = {
-       [UCI_OK] =           "Success",
-       [UCI_ERR_MEM] =      "Out of memory",
-       [UCI_ERR_INVAL] =    "Invalid argument",
-       [UCI_ERR_NOTFOUND] = "Entry not found",
-       [UCI_ERR_PARSE] =    "Parse error",
-       [UCI_ERR_UNKNOWN] =  "Unknown error",
-};
+/* exported functions */
+struct uci_context *uci_alloc_context(void)
+{
+       struct uci_context *ctx;
 
+       ctx = (struct uci_context *) malloc(sizeof(struct uci_context));
+       memset(ctx, 0, sizeof(struct uci_context));
+       uci_list_init(&ctx->root);
+       uci_list_init(&ctx->history_path);
+       uci_list_init(&ctx->backends);
+       ctx->flags = UCI_FLAG_STRICT;
 
-/*
- * UCI wrapper for malloc, which uses exception handling
- */
-static void *uci_malloc(struct uci_context *ctx, size_t size)
-{
-       void *ptr;
-       
-       ptr = malloc(size);
-       if (!ptr)
-               UCI_THROW(ctx, UCI_ERR_MEM);
-       memset(ptr, 0, size);
-
-       return ptr;
-}
+       ctx->confdir = (char *) uci_confdir;
+       ctx->savedir = (char *) uci_savedir;
 
-/*
- * UCI wrapper for realloc, which uses exception handling
- */
-static void *uci_realloc(struct uci_context *ctx, void *ptr, size_t size)
-{
-       ptr = realloc(ptr, size);
-       if (!ptr)
-               UCI_THROW(ctx, UCI_ERR_MEM);
+       uci_list_add(&ctx->backends, &uci_file_backend.e.list);
+       ctx->backend = &uci_file_backend;
 
-       return ptr;
+       return ctx;
 }
 
-#include "hash.c"
-#include "parse.c"
+void uci_free_context(struct uci_context *ctx)
+{
+       struct uci_element *e, *tmp;
+
+       if (ctx->confdir != uci_confdir)
+               free(ctx->confdir);
+       if (ctx->savedir != uci_savedir)
+               free(ctx->savedir);
 
-/* externally visible functions */
+       uci_cleanup(ctx);
+       UCI_TRAP_SAVE(ctx, ignore);
+       uci_foreach_element_safe(&ctx->root, tmp, e) {
+               struct uci_package *p = uci_to_package(e);
+               uci_free_package(&p);
+       }
+       uci_foreach_element_safe(&ctx->history_path, tmp, e) {
+               uci_free_element(e);
+       }
+       free(ctx);
+       UCI_TRAP_RESTORE(ctx);
 
-struct uci_context *uci_alloc(void)
-{
-       struct uci_context *ctx;
-       
-       ctx = (struct uci_context *) malloc(sizeof(struct uci_context));
-       memset(ctx, 0, sizeof(struct uci_context));
-       
-       return ctx;
+ignore:
+       return;
 }
 
-int uci_cleanup(struct uci_context *ctx)
+int uci_set_confdir(struct uci_context *ctx, const char *dir)
 {
+       char *cdir;
+
        UCI_HANDLE_ERR(ctx);
-       uci_parse_cleanup(ctx);
+       UCI_ASSERT(ctx, dir != NULL);
+
+       cdir = uci_strdup(ctx, dir);
+       if (ctx->confdir != uci_confdir)
+               free(ctx->confdir);
+       ctx->confdir = cdir;
        return 0;
 }
 
-void uci_perror(struct uci_context *ctx, const char *str)
+static void uci_cleanup(struct uci_context *ctx)
+{
+       struct uci_parse_context *pctx;
+
+       if (ctx->buf) {
+               free(ctx->buf);
+               ctx->buf = NULL;
+               ctx->bufsz = 0;
+       }
+
+       pctx = ctx->pctx;
+       if (!pctx)
+               return;
+
+       ctx->pctx = NULL;
+       if (pctx->package)
+               uci_free_package(&pctx->package);
+
+       if (pctx->buf)
+               free(pctx->buf);
+
+       free(pctx);
+}
+
+void uci_perror(struct uci_context *ctx, const char *prefix)
 {
        int err;
 
@@ -137,21 +138,120 @@ void uci_perror(struct uci_context *ctx, const char *str)
                err = UCI_ERR_INVAL;
        else
                err = ctx->errno;
-       
+
        if ((err < 0) || (err >= UCI_ERR_LAST))
                err = UCI_ERR_UNKNOWN;
 
+       if (prefix)
+               fprintf(stderr, "%s: ", prefix);
+       if (ctx->func)
+               fprintf(stderr, "%s: ", ctx->func);
+
        switch (err) {
        case UCI_ERR_PARSE:
                if (ctx->pctx) {
-                       fprintf(stderr, "%s: %s at line %d, byte %d\n", str, uci_errstr[err], ctx->pctx->line, ctx->pctx->byte);
+                       fprintf(stderr, "%s (%s) at line %d, byte %d\n", uci_errstr[err], (ctx->pctx->reason ? ctx->pctx->reason : "unknown"), ctx->pctx->line, ctx->pctx->byte);
                        break;
                }
                /* fall through */
        default:
-               fprintf(stderr, "%s: %s\n", str, uci_errstr[err]);
+               fprintf(stderr, "%s\n", uci_errstr[err]);
                break;
        }
 }
 
+int uci_list_configs(struct uci_context *ctx, char ***list)
+{
+       UCI_HANDLE_ERR(ctx);
+       UCI_ASSERT(ctx, list != NULL);
+       UCI_ASSERT(ctx, ctx->backend && ctx->backend->list_configs);
+       *list = ctx->backend->list_configs(ctx);
+       return 0;
+}
+
+int uci_commit(struct uci_context *ctx, struct uci_package **package, bool overwrite)
+{
+       struct uci_package *p;
+       UCI_HANDLE_ERR(ctx);
+       UCI_ASSERT(ctx, package != NULL);
+       p = *package;
+       UCI_ASSERT(ctx, p != NULL);
+       UCI_ASSERT(ctx, p->backend && p->backend->commit);
+       p->backend->commit(ctx, package, overwrite);
+       return 0;
+}
+
+int uci_load(struct uci_context *ctx, const char *name, struct uci_package **package)
+{
+       struct uci_package *p;
+       UCI_HANDLE_ERR(ctx);
+       UCI_ASSERT(ctx, ctx->backend && ctx->backend->load);
+       p = ctx->backend->load(ctx, name);
+       if (package)
+               *package = p;
+
+       return 0;
+}
+
+#ifdef UCI_PLUGIN_SUPPORT
+
+__plugin int uci_add_backend(struct uci_context *ctx, struct uci_backend *b)
+{
+       struct uci_element *e;
+       UCI_HANDLE_ERR(ctx);
+
+       e = uci_lookup_list(&ctx->backends, b->e.name);
+       if (e)
+               UCI_THROW(ctx, UCI_ERR_DUPLICATE);
+
+       e = uci_malloc(ctx, sizeof(struct uci_backend));
+       memcpy(e, b, sizeof(struct uci_backend));
+
+       uci_list_add(&ctx->backends, &e->list);
+       return 0;
+}
+
+__plugin int uci_del_backend(struct uci_context *ctx, struct uci_backend *b)
+{
+       struct uci_element *e, *tmp;
+
+       UCI_HANDLE_ERR(ctx);
+
+       e = uci_lookup_list(&ctx->backends, b->e.name);
+       if (!e || uci_to_backend(e)->ptr != b->ptr)
+               UCI_THROW(ctx, UCI_ERR_NOTFOUND);
+       b = uci_to_backend(e);
+
+       if (ctx->backend && ctx->backend->ptr == b->ptr)
+               ctx->backend = &uci_file_backend;
+
+       uci_foreach_element_safe(&ctx->root, tmp, e) {
+               struct uci_package *p = uci_to_package(e);
+
+               if (!p->backend)
+                       continue;
+
+               if (p->backend->ptr == b->ptr)
+                       UCI_INTERNAL(uci_unload, ctx, p);
+       }
+
+       uci_list_del(&b->e.list);
+       free(b);
+
+       return 0;
+}
+
+#endif
 
+int uci_set_backend(struct uci_context *ctx, const char *name)
+{
+       struct uci_element *e;
+
+       UCI_HANDLE_ERR(ctx);
+       UCI_ASSERT(ctx, name != NULL);
+       e = uci_lookup_list(&ctx->backends, name);
+       if (!e)
+               UCI_THROW(ctx, UCI_ERR_NOTFOUND);
+       ctx->backend = uci_to_backend(e);
+       return 0;
+}