variant_list.c File Reference

#include <stdlib.h>
#include <string.h>
#include <amxc/amxc_string.h>
#include <amxc/amxc_string_join.h>
#include <amxc_variant_priv.h>

Go to the source code of this file.

Functions
static int	variant_list_init (amxc_var_t *const var)
void	variant_list_it_free (amxc_llist_it_t *it)
	Helper functions, can be used as delete function for linked lists. More...
static void	variant_list_delete (amxc_var_t *var)
static int	variant_list_copy_list (amxc_var_t *const dest, const amxc_llist_t *source_list)
static int	variant_list_copy (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_list_move (amxc_var_t *const dest, amxc_var_t *const src)
static int	variant_list_to_csv_string (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_list_to_ssv_string (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_list_to_number (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_list_to_bool (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_list_to_htable (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_list_convert_to (amxc_var_t *const dest, const amxc_var_t *const src)
static amxc_var_t *	variant_list_get_index (const amxc_var_t *const src, const int64_t index, int flags)
static int	variant_list_set_index (amxc_var_t *const dest, amxc_var_t *const src, const int64_t index, int flags)
static amxc_var_t *	variant_list_get_key (const amxc_var_t *const src, const char *const key, int flags)
static int	variant_list_set_key (amxc_var_t *const dest, amxc_var_t *const src, const char *const key, int flags)
static int	variant_list_compare (const amxc_var_t *const lval, const amxc_var_t *const rval, int *const result)
static CONSTRUCTOR void	amxc_var_list_init (void)
static DESTRUCTOR void	amxc_var_list_cleanup (void)
amxc_llist_t *	amxc_var_get_amxc_llist_t (const amxc_var_t *const var)
	Conversion helper function. More...
const amxc_llist_t *	amxc_var_get_const_amxc_llist_t (const amxc_var_t *const var)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_amxc_llist_t (amxc_var_t *const var, const amxc_llist_t *list)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_key_amxc_llist_t (amxc_var_t *const var, const char *key, const amxc_llist_t *list)
	Conversion helper function. More...

Variables
static amxc_var_type_t	amxc_variant_list

Function Documentation

amxc_var_list_cleanup()

static DESTRUCTOR void amxc_var_list_cleanup ( void  )

static

Definition at line 381 of file variant_list.c.

                                                   {
    amxc_var_remove_type(&amxc_variant_list);
}

amxc_var_list_init()

static CONSTRUCTOR void amxc_var_list_init ( void  )

static

Definition at line 377 of file variant_list.c.

                                                 {
    amxc_var_add_type(&amxc_variant_list, AMXC_VAR_ID_LIST);
}

variant_list_compare()

static int variant_list_compare ( const amxc_var_t *const  lval, const amxc_var_t *const  rval, int *const  result  )

static

Definition at line 335 of file variant_list.c.

                                                   {
    int ret = 0;
    amxc_llist_it_t* r_it = amxc_llist_get_first(amxc_var_constcast(amxc_llist_t, rval));
 
    amxc_llist_iterate(l_it, amxc_var_constcast(amxc_llist_t, lval)) {
        when_null_status(r_it, exit, *result = 1);
 
        ret = amxc_var_compare(amxc_llist_it_get_data(l_it, amxc_var_t, lit),
                               amxc_llist_it_get_data(r_it, amxc_var_t, lit),
                               result);
        when_false((ret == 0) && (*result == 0), exit);
 
        r_it = amxc_llist_it_get_next(r_it);
    }
 
    if(r_it != NULL) {
        *result = -1;
    }
 
exit:
    return ret;
}

variant_list_convert_to()

static int variant_list_convert_to ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 195 of file variant_list.c.

                                                                {
    int retval = -1;
 
    amxc_var_convert_fn_t convfn[AMXC_VAR_ID_CUSTOM_BASE] = {
        amxc_var_default_convert_to_null,
        variant_list_to_csv_string,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_number,
        variant_list_to_bool,
        variant_list_copy,
        variant_list_to_htable,
        NULL,
        NULL,
        variant_list_to_csv_string,
        variant_list_to_ssv_string,
        variant_list_copy,
    };
 
    if(dest->type_id >= AMXC_VAR_ID_CUSTOM_BASE) {
        goto exit;
    }
 
    if(convfn[dest->type_id] != NULL) {
        if(dest->type_id == AMXC_VAR_ID_ANY) {
            amxc_var_set_type(dest, AMXC_VAR_ID_LIST);
        }
        retval = convfn[dest->type_id](dest, src);
    }
 
exit:
    return retval;
}

variant_list_copy()

static int variant_list_copy ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 97 of file variant_list.c.

                                                          {
    const amxc_llist_t* list = &src->data.vl;
    return variant_list_copy_list(dest, list);
}

variant_list_copy_list()

static int variant_list_copy_list ( amxc_var_t *const  dest, const amxc_llist_t *  source_list  )

static

Definition at line 75 of file variant_list.c.

                                                                   {
    int retval = -1;
 
    amxc_llist_for_each(it, source_list) {
        amxc_var_t* var = NULL;
        amxc_var_t* item = amxc_var_from_llist_it(it);
        when_null(item, exit);
        when_failed(amxc_var_new(&var), exit);
        if(amxc_var_copy(var, item) != 0) {
            amxc_var_delete(&var);
            goto exit;
        }
        amxc_llist_append(&dest->data.vl, &var->lit);
    }
 
    retval = 0;
 
exit:
    return retval;
}

variant_list_delete()

static void variant_list_delete ( amxc_var_t *  var )

static

Definition at line 71 of file variant_list.c.

                                                 {
    amxc_llist_clean(&var->data.vl, variant_list_it_free);
}

variant_list_get_index()

static amxc_var_t* variant_list_get_index ( const amxc_var_t *const  src, const int64_t  index, int  flags  )

static

Definition at line 237 of file variant_list.c.

                                                     {
    amxc_var_t* retval = NULL;
    const amxc_llist_t* llist = &src->data.vl;
    amxc_llist_it_t* lit = NULL;
    amxc_var_t* src_var = NULL;
 
    when_true(index < 0, exit);
    lit = amxc_llist_get_at(llist, index);
    when_null(lit, exit);
 
    src_var = amxc_llist_it_get_data(lit, amxc_var_t, lit);
    if((flags & AMXC_VAR_FLAG_COPY) == AMXC_VAR_FLAG_COPY) {
        when_failed(amxc_var_new(&retval), exit);
        when_failed(amxc_var_copy(retval, src_var), exit);
    } else {
        retval = src_var;
    }
 
exit:
    return retval;
}

variant_list_get_key()

static amxc_var_t* variant_list_get_key ( const amxc_var_t *const  src, const char *const  key, int  flags  )

static

Definition at line 309 of file variant_list.c.

                                                   {
    char* endptr = NULL;
    int64_t index = strtoll(key, &endptr, 0);
    if(*endptr != 0) {
        return NULL;
    } else {
        return variant_list_get_index(src, index, flags);
    }
}

variant_list_init()

static int variant_list_init ( amxc_var_t *const  var )

static

Definition at line 62 of file variant_list.c.

                                                    {
    return amxc_llist_init(&var->data.vl);
}

variant_list_move()

static int variant_list_move ( amxc_var_t *const  dest, amxc_var_t *const  src  )

static

Definition at line 103 of file variant_list.c.

                                                    {
    amxc_llist_t* src_list = &src->data.vl;
    amxc_llist_t* dst_list = &dest->data.vl;
    return amxc_llist_move(dst_list, src_list);
}

variant_list_set_index()

static int variant_list_set_index ( amxc_var_t *const  dest, amxc_var_t *const  src, const int64_t  index, int  flags  )

static

Definition at line 261 of file variant_list.c.

                                             {
    int retval = -1;
    amxc_var_t* dest_var = NULL;
    amxc_llist_t* llist = &dest->data.vl;
    amxc_llist_it_t* current_lit = NULL;
 
    when_true(index > (int64_t) (amxc_llist_size(llist) + 1), exit);
    current_lit = amxc_llist_get_at(llist, index);
 
    if((flags & AMXC_VAR_FLAG_COPY) == AMXC_VAR_FLAG_COPY) {
        if(current_lit != NULL) {
            if((flags & AMXC_VAR_FLAG_UPDATE) == AMXC_VAR_FLAG_UPDATE) {
                dest_var = amxc_llist_it_get_data(current_lit, amxc_var_t, lit);
                when_failed(amxc_var_copy(dest_var, src), exit);
            } else {
                when_failed(amxc_var_new(&dest_var), exit);
                when_failed(amxc_var_copy(dest_var, src), exit);
                when_failed(amxc_llist_it_insert_before(current_lit, &dest_var->lit), exit);
            }
        } else {
            when_failed(amxc_var_new(&dest_var), exit);
            when_failed(amxc_var_copy(dest_var, src), exit);
            when_failed(amxc_llist_append(llist, &dest_var->lit), exit);
        }
    } else {
        if(current_lit != NULL) {
            if((flags & AMXC_VAR_FLAG_UPDATE) == AMXC_VAR_FLAG_UPDATE) {
                when_failed(amxc_llist_it_insert_before(current_lit, &src->lit), exit);
                amxc_llist_it_clean(current_lit, variant_list_it_free);
            } else {
                when_failed(amxc_llist_it_insert_before(current_lit, &src->lit), exit);
            }
        } else {
            when_failed(amxc_llist_append(llist, &src->lit), exit);
        }
    }
    retval = 0;
 
exit:
    if((current_lit == NULL) && (retval != 0)) {
        amxc_var_delete(&dest_var);
    }
    return retval;
}

variant_list_set_key()

static int variant_list_set_key ( amxc_var_t *const  dest, amxc_var_t *const  src, const char *const  key, int  flags  )

static

Definition at line 321 of file variant_list.c.

                                           {
    char* endptr = NULL;
    int64_t index = strtoll(key, &endptr, 0);
 
    if(*endptr != 0) {
        return -1;
    } else {
        return variant_list_set_index(dest, src, index, flags);
    }
}

variant_list_to_bool()

static int variant_list_to_bool ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 147 of file variant_list.c.

                                                             {
    dest->data.b = !amxc_llist_is_empty(&src->data.vl);
 
    return 0;
}

variant_list_to_csv_string()

static int variant_list_to_csv_string ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 110 of file variant_list.c.

                                                                   {
    int retval = -1;
    amxc_string_t string;
    amxc_string_init(&string, 0);
    retval = amxc_string_csv_join_var(&string, src);
    free(dest->data.s);
    dest->data.s = amxc_string_take_buffer(&string);
    amxc_string_clean(&string);
    return retval;
}

variant_list_to_htable()

static int variant_list_to_htable ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 154 of file variant_list.c.

                                                               {
    int retval = -1;
    amxc_var_t index;
    const amxc_llist_t* list = &src->data.vl;
 
    amxc_var_init(&index);
    index.type_id = AMXC_VAR_ID_UINT64;
    index.data.ui64 = 0;
 
    amxc_llist_for_each(it, list) {
        amxc_var_t* copy = NULL;
        amxc_var_t* item = amxc_var_from_llist_it(it);
        char* key = amxc_var_dyncast(cstring_t, &index);
        when_null(key, exit);
 
        if(amxc_var_new(&copy) != 0) {
            free(key);
            goto exit;
        }
        if(amxc_var_copy(copy, item) != 0) {
            amxc_var_delete(&copy);
            free(key);
            goto exit;
        }
        if(amxc_htable_insert(&dest->data.vm, key, &copy->hit) != 0) {
            amxc_var_delete(&copy);
            free(key);
            goto exit;
        }
        free(key);
        index.data.ui64++;
    }
 
    retval = 0;
 
exit:
    amxc_var_clean(&index);
    return retval;
}

variant_list_to_number()

static int variant_list_to_number ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 134 of file variant_list.c.

                                                               {
    int retval = -1;
 
    amxc_var_t intermediate;
    intermediate.type_id = AMXC_VAR_ID_UINT64;
    intermediate.data.ui64 = amxc_llist_size(&src->data.vl);
 
    retval = amxc_var_convert(dest, &intermediate, dest->type_id);
 
    return retval;
}

variant_list_to_ssv_string()

static int variant_list_to_ssv_string ( amxc_var_t *const  dest, const amxc_var_t *const  src  )

static

Definition at line 122 of file variant_list.c.

                                                                   {
    int retval = -1;
    amxc_string_t string;
    amxc_string_init(&string, 0);
    retval = amxc_string_ssv_join_var(&string, src);
    free(dest->data.s);
    dest->data.s = amxc_string_take_buffer(&string);
    amxc_string_clean(&string);
    return retval;
}

Variable Documentation

amxc_variant_list

amxc_var_type_t amxc_variant_list

static

Initial value:

= {
    .init = variant_list_init,
    .del = variant_list_delete,
    .copy = variant_list_copy,
    .move = variant_list_move,
    .convert_from = NULL,
    .convert_to = variant_list_convert_to,
    .compare = variant_list_compare,
    .get_key = variant_list_get_key,
    .set_key = variant_list_set_key,
    .get_index = variant_list_get_index,
    .set_index = variant_list_set_index,
    .type_id = 0,
    .hit = { .ait = NULL, .key = NULL, .next = NULL },
    .name = AMXC_VAR_NAME_LIST
}

Definition at line 360 of file variant_list.c.