ui/common/document.c

/*
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
 *
 * Copyright 2014 Olaf Wintermann. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *   1. Redistributions of source code must retain the above copyright
 *      notice, this list of conditions and the following disclaimer.
 *
 *   2. Redistributions in binary form must reproduce the above copyright
 *      notice, this list of conditions and the following disclaimer in the
 *      documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "document.h"

static UcxMap *documents;

void uic_docmgr_init() {
    documents = ucx_map_new(32);
}

void ui_set_document(UiObject *obj, void *document) {
    UiContext *ctx = ucx_map_get(documents, ucx_key(&document, sizeof(void*)));
    if(!ctx) {
        return;
    }
    ctx->obj = obj;
    
    if(obj->document) {
        ui_detach_document(obj, obj->document);
    }
    obj->document = document;
    obj->ctx->document = document;
    
    UcxMapIterator i = ucx_map_iterator(ctx->vars);
    UiVar *var;
    UCX_MAP_FOREACH(key, var, i) {
        UiVar *v = ucx_map_get(obj->ctx->vars, key);
        if(v) {
            if(v->isextern) {
                fprintf(
                        stderr,
                        "UI Error: external variable cannot be moved\n");
                return;
            }
            // check type
            if(var->type != v->type) {
                fprintf(stderr, "UI Error: var has incompatible type.\n");
                return;
            }
            
            // copy value
            uic_move_var(v, var, 1);
            var->from = v->from;
            
            // TODO: free var struct
            ucx_map_remove(obj->ctx->vars, key);
        }
    }
    
}

void ui_detach_document(UiObject *obj, void *document) {
    UiContext *ctx = ucx_map_get(documents, ucx_key(&document, sizeof(void*)));
    if(!ctx) {
        fprintf(
                stderr,
                "UiError: ui_detach_document: document is not registered\n");
        return;
    }
    if(obj->document != document) {
        fprintf(stderr, "UiError: ui_detach_document: wrong document\n");
        return;
    }
    
    UcxMapIterator i = ucx_map_iterator(ctx->vars);
    UiVar *var;
    UCX_MAP_FOREACH(key, var, i) {
        if(var->from && var->from != ctx->vars) {
            // this var is bind to an outer widget, so we move it          
            UcxAllocator *a = var->from->allocator;
            UiVar *newvar = a->malloc(a->pool, sizeof(UiVar));
            newvar->value = uic_create_value(a, var->type);
            uic_move_var(var, newvar, 0);
            newvar->type = var->type;
            newvar->from = var->from;
            newvar->isextern = 0;
            
            ucx_map_put(var->from, key, newvar);
            
            //ucx_map_remove(doc->vars, key); // TODO: dont remove!
        }
    }
    
    ctx->obj->document = NULL;
    ctx->obj->ctx->document = NULL;
    
    ctx->obj = NULL;
}

void* ui_document_new(size_t size) {
    UcxMempool *mp = ucx_mempool_new(256);
    UiContext *ctx = ucx_mempool_malloc(mp, sizeof(UiContext));
    ctx->obj = NULL;
    ctx->mempool = mp;
    ctx->vars = ucx_map_new_a(mp->allocator, 16);
    //uidoc->subdocument = NULL;
    
    void *document = ucx_mempool_calloc(mp, 1, size);
    ucx_map_put(documents, ucx_key(&document, sizeof(void*)), ctx);
    return document;
}

void ui_document_destroy(void *doc) {
    // TODO
}

UiContext* ui_document_context(void *doc) {
    if(doc) {
        return ucx_map_get(documents, ucx_key(&doc, sizeof(void*)));
    } else {
        return NULL;
    }
}

void* ui_document_malloc(void *doc, size_t size) {
    UiContext *uidoc = ui_document_context(doc);
    return ucx_mempool_malloc(uidoc->mempool, size);
}

void* ui_document_calloc(void *doc, size_t nelem, size_t elsize) {
    UiContext *uidoc = ucx_map_get(documents, ucx_key(&doc, sizeof(void*)));
    return ucx_mempool_calloc(uidoc->mempool, nelem, elsize);
}

void  ui_document_free(void *doc, void *ptr) {
    UiContext *uidoc = ucx_map_get(documents, ucx_key(&doc, sizeof(void*)));
    ucx_mempool_free(uidoc->mempool, ptr);
}

void* ui_document_realloc(void *doc, void *ptr, size_t size) {
    UiContext *uidoc = ucx_map_get(documents, ucx_key(&doc, sizeof(void*)));
    return ucx_mempool_realloc(uidoc->mempool, ptr, size);
}

void uic_document_addvar(void *doc, char *name, int type, size_t vs) {
    // TODO: remove
    UiContext *ctx = ui_document_context(doc);
    if(ctx) {
        UiVar *newvar = ucx_mempool_malloc(ctx->mempool, sizeof(UiVar));
        newvar->isextern = 0;
        newvar->type = type;
        newvar->value = ucx_mempool_calloc(ctx->mempool, 1, vs);
        newvar->from = NULL;

        uic_add_var(ctx, name, newvar, type, vs);
    }
}

void ui_document_addint(void *doc, char *name) {
    uic_document_addvar(doc, name, UI_VAR_INTEGER, sizeof(UiInteger));
}


void ui_document_regint(void *doc, char *name, UiInteger *i) {
    UiContext *ctx = ui_document_context(doc);
    if(ctx) {
        uic_reg_var(ctx, name, UI_VAR_INTEGER, sizeof(UiInteger), i);
    }
}

void ui_document_regtext(void *doc, char *name, UiText *text) {
    UiContext *ctx = ui_document_context(doc);
    if(ctx) {
        uic_reg_var(doc, name, UI_VAR_TEXT, sizeof(UiText), text);
    }
}

void ui_document_reglist(void *doc, char *name, UiList *list) {
    UiContext *ctx = ui_document_context(doc);
    if(ctx) {
        UiListVar *lv = ui_document_malloc(doc, sizeof(UiListVar));
        UiListPtr *lp = ui_document_malloc(doc, sizeof(UiListPtr));
        lv->listptr = lp;
        lp->list = list;
        uic_reg_var(doc, name, UI_VAR_LIST, sizeof(UiListPtr), lv);
    }
}