variant_htable.c File Reference

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

Go to the source code of this file.

Functions
static int	variant_htable_init (amxc_var_t *const var)
void	variant_htable_it_free (UNUSED const char *key, amxc_htable_it_t *it)
static void	variant_htable_delete (amxc_var_t *var)
static int	variant_htable_copy_htable (amxc_var_t *const dest, const amxc_htable_t *const src_htable)
static int	variant_htable_copy (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_htable_move (amxc_var_t *const dest, amxc_var_t *const src)
static int	variant_htable_to_string (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_htable_to_number (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_htable_to_bool (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_htable_to_llist (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_htable_convert_to (amxc_var_t *const dest, const amxc_var_t *const src)
static amxc_var_t *	variant_htable_get_key (const amxc_var_t *const src, const char *const key, int flags)
static int	variant_htable_set_key (amxc_var_t *const dest, amxc_var_t *const src, const char *const key, int flags)
static amxc_var_t *	variant_htable_get_index (const amxc_var_t *const src, const int64_t index, int flags)
static int	variant_htable_compare (const amxc_var_t *const lval, const amxc_var_t *const rval, int *const result)
static CONSTRUCTOR void	amxc_var_htable_init (void)
static DESTRUCTOR void	amxc_var_htable_cleanup (void)
amxc_htable_t *	amxc_var_get_amxc_htable_t (const amxc_var_t *const var)
	Conversion helper function. More...
const amxc_htable_t *	amxc_var_get_const_amxc_htable_t (const amxc_var_t *const var)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_amxc_htable_t (amxc_var_t *const var, const amxc_htable_t *htable)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_key_amxc_htable_t (amxc_var_t *const var, const char *key, const amxc_htable_t *htable)
	Conversion helper function. More...

Variables
static amxc_var_type_t	amxc_variant_htable

Function Documentation

amxc_var_htable_cleanup()

static DESTRUCTOR void amxc_var_htable_cleanup ( void  )

static

Definition at line 413 of file variant_htable.c.

                                                     {
    amxc_var_remove_type(&amxc_variant_htable);
}

amxc_var_htable_init()

static CONSTRUCTOR void amxc_var_htable_init ( void  )

static

Definition at line 409 of file variant_htable.c.

                                                   {
    amxc_var_add_type(&amxc_variant_htable, AMXC_VAR_ID_HTABLE);
}

variant_htable_compare()

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

static

Definition at line 353 of file variant_htable.c.

                                                     {
    int ret = 0;
    amxc_array_t* keys_l = amxc_htable_get_sorted_keys(amxc_var_constcast(amxc_htable_t, lval));
    amxc_array_t* keys_r = amxc_htable_get_sorted_keys(amxc_var_constcast(amxc_htable_t, rval));
    size_t size_l = amxc_array_size(keys_l);
    size_t size_r = amxc_array_size(keys_r);
 
    if(size_l > size_r) {
        *result = 1;
        goto exit;
    } else if(size_l < size_r) {
        *result = -1;
        goto exit;
    }
 
    for(size_t i = 0; i < size_l; i++) {
        const char* key_l = (const char*) amxc_array_get_data_at(keys_l, i);
        const char* key_r = (const char*) amxc_array_get_data_at(keys_r, i);
 
        if((key_l == NULL) || (key_r == NULL)) {
            continue;
        }
        *result = strcmp(key_l, key_r);
        when_false(*result == 0, exit);
 
        ret = amxc_var_compare(amxc_var_get_key(lval, key_l, AMXC_VAR_FLAG_DEFAULT),
                               amxc_var_get_key(rval, key_r, AMXC_VAR_FLAG_DEFAULT),
                               result);
        when_false((ret == 0) && (*result == 0), exit);
    }
 
exit:
    amxc_array_delete(&keys_l, NULL);
    amxc_array_delete(&keys_r, NULL);
    return ret;
}

variant_htable_convert_to()

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

static

Definition at line 217 of file variant_htable.c.

                                                                  {
    int retval = -1;
 
    amxc_var_convert_fn_t convfn[AMXC_VAR_ID_CUSTOM_BASE] = {
        amxc_var_default_convert_to_null,
        variant_htable_to_string,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_number,
        variant_htable_to_bool,
        variant_htable_to_llist,
        variant_htable_copy,
        NULL,
        NULL,
        variant_htable_to_string,
        variant_htable_to_string,
        variant_htable_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_HTABLE);
        }
        retval = convfn[dest->type_id](dest, src);
    }
 
exit:
    return retval;
}

variant_htable_copy()

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

static

Definition at line 98 of file variant_htable.c.

                                                            {
    const amxc_htable_t* htable = &src->data.vm;
    return variant_htable_copy_htable(dest, htable);
}

variant_htable_copy_htable()

static int variant_htable_copy_htable ( amxc_var_t *const  dest, const amxc_htable_t *const  src_htable  )

static

Definition at line 75 of file variant_htable.c.

                                                                             {
    int retval = -1;
 
    amxc_htable_for_each(it, src_htable) {
        amxc_var_t* var = NULL;
        amxc_var_t* item = amxc_var_from_htable_it(it);
        const char* key = amxc_htable_it_get_key(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_htable_insert(&dest->data.vm, key, &var->hit);
    }
 
    retval = 0;
 
exit:
    return retval;
}

variant_htable_delete()

static void variant_htable_delete ( amxc_var_t *  var )

static

Definition at line 71 of file variant_htable.c.

                                                   {
    amxc_htable_clean(&var->data.vm, variant_htable_it_free);
}

variant_htable_get_index()

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

static

Definition at line 321 of file variant_htable.c.

                                                       {
    amxc_var_t* retval = NULL;
    const amxc_htable_t* htable = &src->data.vm;
    amxc_htable_it_t* found_hit = NULL;
    amxc_var_t* src_var = NULL;
    int64_t pos = 0;
 
    when_true(index < 0, exit);
    when_true(index > (int64_t) amxc_htable_size(htable), exit);
    amxc_htable_iterate(hit, htable) {
        if(pos == index) {
            found_hit = hit;
            break;
        }
        pos++;
    }
    when_null(found_hit, exit);
 
    src_var = amxc_var_from_htable_it(found_hit);
    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_htable_get_key()

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

static

Definition at line 259 of file variant_htable.c.

                                                     {
    amxc_var_t* retval = NULL;
    const amxc_htable_t* htable = &src->data.vm;
    amxc_htable_it_t* hit = amxc_htable_get(htable, key);
    amxc_var_t* src_var = NULL;
 
    when_null(hit, exit);
 
    src_var = amxc_htable_it_get_data(hit, amxc_var_t, hit);
    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_htable_init()

static int variant_htable_init ( amxc_var_t *const  var )

static

Definition at line 62 of file variant_htable.c.

                                                      {
    return amxc_htable_init(&var->data.vm, 10);
}

variant_htable_it_free()

void variant_htable_it_free	(	UNUSED const char *	key,
		amxc_htable_it_t *	it
	)

Definition at line 66 of file variant_htable.c.

                                                                          {
    amxc_var_t* var = amxc_var_from_htable_it(it);
    amxc_var_delete(&var);
}

variant_htable_move()

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

static

Definition at line 104 of file variant_htable.c.

                                                      {
    int retval = 0;
    amxc_htable_t* src_htable = &src->data.vm;
    amxc_htable_t* dst_htable = &dest->data.vm;
    retval = amxc_htable_move(dst_htable, src_htable);
    return retval;
}

variant_htable_set_key()

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

static

Definition at line 281 of file variant_htable.c.

                                             {
    int retval = -1;
    amxc_var_t* dest_var = NULL;
    amxc_htable_t* htable = &dest->data.vm;
    amxc_htable_it_t* current_hit = amxc_htable_take(htable, key);
 
    if((current_hit != NULL) &&
       ((flags & AMXC_VAR_FLAG_UPDATE) == 0)) {
        amxc_htable_insert(htable, key, current_hit);
        goto exit;
    }
 
    if((flags & AMXC_VAR_FLAG_COPY) == AMXC_VAR_FLAG_COPY) {
        if(current_hit != NULL) {
            dest_var = amxc_htable_it_get_data(current_hit, amxc_var_t, hit);
        } else {
            when_failed(amxc_var_new(&dest_var), exit);
        }
 
        when_failed(amxc_htable_insert(htable, key, &dest_var->hit), exit);
        when_failed(amxc_var_copy(dest_var, src), exit);
    } else {
        when_failed(amxc_htable_insert(htable, key, &src->hit), exit);
        if(current_hit != NULL) {
            amxc_htable_it_clean(current_hit, variant_htable_it_free);
        }
    }
 
    retval = 0;
 
exit:
    if((current_hit == NULL) && (retval != 0)) {
        amxc_var_delete(&dest_var);
    }
    return retval;
}

variant_htable_to_bool()

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

static

Definition at line 184 of file variant_htable.c.

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

variant_htable_to_llist()

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

static

Definition at line 191 of file variant_htable.c.

                                                                {
    int retval = -1;
    const amxc_htable_t* htable = &src->data.vm;
 
    amxc_htable_for_each(it, htable) {
        amxc_var_t* copy = NULL;
        amxc_var_t* item = amxc_var_from_htable_it(it);
 
        when_failed(amxc_var_new(&copy), exit);
        if(amxc_var_copy(copy, item) != 0) {
            amxc_var_delete(&copy);
            goto exit;
        }
        if(amxc_llist_append(&dest->data.vl, &copy->lit) != 0) {
            amxc_var_delete(&copy);
            goto exit;
        }
    }
 
    retval = 0;
 
exit:
    return retval;
}

variant_htable_to_number()

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

static

Definition at line 171 of file variant_htable.c.

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

variant_htable_to_string()

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

static

Definition at line 114 of file variant_htable.c.

                                                                 {
    int retval = -1;
    const amxc_htable_t* htable = &src->data.vm;
    amxc_string_t string;
    amxc_var_t intermediate;
    const char* sep = "";
 
    amxc_var_init(&intermediate);
    when_failed(amxc_string_init(&string, 100), exit);
 
    amxc_htable_for_each(it, htable) {
        amxc_var_t* item = amxc_var_from_htable_it(it);
        const char* key = amxc_htable_it_get_key(it);
        size_t length = 0;
        size_t key_length = 0;
        if(amxc_var_convert(&intermediate, item, AMXC_VAR_ID_CSTRING) != 0) {
            amxc_string_clean(&string);
            goto exit;
        }
        if(*sep != 0) {
            if(amxc_string_append(&string, sep, strlen(sep)) != 0) {
                amxc_string_clean(&string);
                goto exit;
            }
        }
        key_length = strlen(key);
        if(key_length != 0) {
            if(amxc_string_append(&string, key, key_length) != 0) {
                amxc_string_clean(&string);
                goto exit;
            }
        }
        if(amxc_string_append(&string, ":", 1) != 0) {
            amxc_string_clean(&string);
            goto exit;
        }
        length = intermediate.data.s == NULL ? 0 : strlen(intermediate.data.s);
        if(length == 0) {
            continue;
        }
        if(amxc_string_append(&string, intermediate.data.s, length) != 0) {
            amxc_string_clean(&string);
            goto exit;
        }
        sep = ",";
    }
 
    string.buffer[string.last_used] = 0;
    dest->data.s = string.buffer;
    retval = 0;
 
exit:
    amxc_var_clean(&intermediate);
    return retval;
}

Variable Documentation

amxc_variant_htable

amxc_var_type_t amxc_variant_htable

static

Initial value:

= {
    .init = variant_htable_init,
    .del = variant_htable_delete,
    .copy = variant_htable_copy,
    .move = variant_htable_move,
    .convert_from = NULL,
    .convert_to = variant_htable_convert_to,
    .compare = variant_htable_compare,
    .get_key = variant_htable_get_key,
    .set_key = variant_htable_set_key,
    .get_index = variant_htable_get_index,
    .set_index = NULL,
    .type_id = 0,
    .hit = { .ait = NULL, .key = NULL, .next = NULL },
    .name = AMXC_VAR_NAME_HTABLE
}

Definition at line 392 of file variant_htable.c.