variant_char.c File Reference

#include <stdlib.h>
#include <string.h>
#include <limits.h>
#include <ctype.h>
#include <errno.h>
#include <amxc/amxc_string_split.h>
#include <amxc_variant_priv.h>

Go to the source code of this file.

Macros
#define	_GNU_SOURCE

Functions
static const char *	variant_char_validate_number (const amxc_var_t *const src, int *retval)
static int	variant_char_to_signed_int (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_unsigned_int (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_double (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_float (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_bool (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_list (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_htable (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_to_ts (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_copy (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_move (amxc_var_t *const dest, amxc_var_t *const src)
static void	variant_char_delete (amxc_var_t *const var)
static int	variant_char_auto_convert (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_convert_to (amxc_var_t *const dest, const amxc_var_t *const src)
static int	variant_char_compare (const amxc_var_t *const lval, const amxc_var_t *const rval, int *const result)
static CONSTRUCTOR void	amxc_var_char_init (void)
static DESTRUCTOR void	amxc_var_char_cleanup (void)
static int	amxc_var_set_data (amxc_var_t *const var, const char *const val)
int	amxc_var_set_cstring_t (amxc_var_t *const var, const char *const val)
	Setter helper function. More...
int	amxc_var_set_csv_string_t (amxc_var_t *const var, const char *const val)
	Setter helper function. More...
int	amxc_var_set_ssv_string_t (amxc_var_t *const var, const char *const val)
	Setter helper function. More...
cstring_t	amxc_var_get_cstring_t (const amxc_var_t *const var)
	Conversion helper function. More...
const cstring_t	amxc_var_get_const_cstring_t (const amxc_var_t *const var)
	Conversion helper function. More...
cstring_t	amxc_var_take_cstring_t (amxc_var_t *const var)
	Takes a value from a variant. More...
int	amxc_var_push_cstring_t (amxc_var_t *const var, char *val)
	Pushes a value in a variant. More...
int	amxc_var_push_csv_string_t (amxc_var_t *const var, char *val)
	Pushes a value in a variant. More...
int	amxc_var_push_ssv_string_t (amxc_var_t *const var, char *val)
	Pushes a value in a variant. More...
amxc_var_t *	amxc_var_add_new_cstring_t (amxc_var_t *const var, const char *const val)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_csv_string_t (amxc_var_t *const var, const char *const val)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_ssv_string_t (amxc_var_t *const var, const char *const val)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_key_cstring_t (amxc_var_t *const var, const char *key, const char *const val)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_key_csv_string_t (amxc_var_t *const var, const char *key, const char *const val)
	Conversion helper function. More...
amxc_var_t *	amxc_var_add_new_key_ssv_string_t (amxc_var_t *const var, const char *key, const char *const val)
	Conversion helper function. More...

Variables
static amxc_var_type_t	amxc_variant_char
static amxc_var_type_t	amxc_variant_csv_char
static amxc_var_type_t	amxc_variant_ssv_char

Macro Definition Documentation

_GNU_SOURCE

#define _GNU_SOURCE

Definition at line 56 of file variant_char.c.

Function Documentation

amxc_var_char_cleanup()

static DESTRUCTOR void amxc_var_char_cleanup ( void  )

static

Definition at line 526 of file variant_char.c.

                                                   {
    amxc_var_remove_type(&amxc_variant_char);
    amxc_var_remove_type(&amxc_variant_csv_char);
    amxc_var_remove_type(&amxc_variant_ssv_char);
}

amxc_var_char_init()

static CONSTRUCTOR void amxc_var_char_init ( void  )

static

Definition at line 520 of file variant_char.c.

                                                 {
    amxc_var_add_type(&amxc_variant_char, AMXC_VAR_ID_CSTRING);
    amxc_var_add_type(&amxc_variant_csv_char, AMXC_VAR_ID_CSV_STRING);
    amxc_var_add_type(&amxc_variant_ssv_char, AMXC_VAR_ID_SSV_STRING);
}

amxc_var_set_data()

static int amxc_var_set_data ( amxc_var_t *const  var, const char *const  val  )

static

Definition at line 532 of file variant_char.c.

                                                                           {
    int retval = -1;
    int length = 0;
 
    length = strlen(val) + 1;
    var->data.s = (char*) calloc(1, length);
    when_null(var->data.s, exit);
    memcpy(var->data.s, val, length);
    retval = 0;
 
exit:
    if(retval != 0) {
        amxc_var_set_type(var, AMXC_VAR_ID_NULL);
    }
    return retval;
}

variant_char_auto_convert()

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

static

Definition at line 351 of file variant_char.c.

                                                                  {
    const char* str_src = src->data.s;
    int retval = -1;
    int src_pos = 0;
    int src_len = 0;
    when_true(str_src == NULL, exit);
 
    src_len = strlen(str_src);
    if(src_len == 0) {
        retval = 0;
        dest->type_id = AMXC_VAR_ID_CSTRING;
        goto exit;
    }
 
    for(int i = 0; i < src_len; i++) {
        if(isspace(*(src->data.s + i)) == 0) {
            break;
        }
        // skip white spaces
        src_pos++;
    }
 
    switch(str_src[src_pos]) {
    case 't':
    case 'T':
    case 'y':
    case 'Y':
    case 'f':
    case 'F':
    case 'n':
    case 'N':
    case 'o':
    case 'O':
        dest->type_id = AMXC_VAR_ID_BOOL;
        retval = variant_char_to_bool(dest, src);
        break;
    case '+':
    case '-':
        dest->type_id = AMXC_VAR_ID_INT32;
        retval = variant_char_to_signed_int(dest, src);
        when_true(retval == 0, exit);
        dest->type_id = AMXC_VAR_ID_INT64;
        retval = variant_char_to_signed_int(dest, src);
        when_true(retval == 0, exit);
        dest->type_id = AMXC_VAR_ID_DOUBLE;
        retval = variant_char_to_double(dest, src);
        break;
    default:
        dest->type_id = AMXC_VAR_ID_UINT32;
        retval = variant_char_to_unsigned_int(dest, src);
        when_true(retval == 0, exit);
        dest->type_id = AMXC_VAR_ID_UINT64;
        retval = variant_char_to_unsigned_int(dest, src);
        when_true(retval == 0, exit);
        dest->type_id = AMXC_VAR_ID_DOUBLE;
        retval = variant_char_to_double(dest, src);
    }
    when_true(retval == 0, exit);
 
    dest->type_id = AMXC_VAR_ID_TIMESTAMP;
    retval = variant_char_to_ts(dest, src);
    when_true(retval == 0, exit);
 
    dest->type_id = AMXC_VAR_ID_CSTRING;
    retval = variant_char_copy(dest, src);
 
exit:
    return retval;
}

variant_char_compare()

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

static

Definition at line 461 of file variant_char.c.

                                                   {
    *result = strcmp(lval->data.s == NULL ? "" : lval->data.s,
                     rval->data.s == NULL ? "" : rval->data.s);
    return 0;
}

variant_char_convert_to()

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

static

Definition at line 422 of file variant_char.c.

                                                                {
    int retval = -1;
 
    amxc_var_convert_fn_t convfn[AMXC_VAR_ID_CUSTOM_BASE] = {
        amxc_var_default_convert_to_null,       // null
        variant_char_copy,                      // c string
        variant_char_to_signed_int,             // int8
        variant_char_to_signed_int,             // int16
        variant_char_to_signed_int,             // int32
        variant_char_to_signed_int,             // int64
        variant_char_to_unsigned_int,           // uint8
        variant_char_to_unsigned_int,           // uint16
        variant_char_to_unsigned_int,           // uint32
        variant_char_to_unsigned_int,           // uint64
        variant_char_to_float,                  // float
        variant_char_to_double,                 // double
        variant_char_to_bool,                   // bool
        variant_char_to_list,                   // linked list
        variant_char_to_htable,                 // hash table
        NULL,                                   // file descriptor
        variant_char_to_ts,                     // timestamp
        variant_char_copy,                      // comma separated values string
        variant_char_copy,                      // space separated values string
        variant_char_auto_convert,              // any type (auto detect)
    };
 
    if(dest->type_id >= AMXC_VAR_ID_CUSTOM_BASE) {
        goto exit;
    }
 
    if(convfn[dest->type_id] != NULL) {
        retval = convfn[dest->type_id](dest, src);
    }
 
exit:
    return retval;
}

variant_char_copy()

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

static

Definition at line 323 of file variant_char.c.

                                                          {
    int retval = -1;
    if(src->data.s != NULL) {
        int length = strlen(src->data.s) + 1;
        dest->data.s = (char*) calloc(1, length);
        when_null(dest->data.s, exit);
        memcpy(dest->data.s, src->data.s, length);
    }
    retval = 0;
 
exit:
    return retval;
}

variant_char_delete()

static void variant_char_delete ( amxc_var_t *const  var )

static

Definition at line 346 of file variant_char.c.

                                                       {
    free(var->data.s);
    var->data.s = NULL;
}

variant_char_move()

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

static

Definition at line 338 of file variant_char.c.

                                                    {
    dest->data.s = src->data.s;
    src->data.s = NULL;
 
    return 0;
}

variant_char_to_bool()

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

static

Definition at line 194 of file variant_char.c.

                                                             {
    int retval = -1;
    char* lower_src = NULL;
    int src_len = 0;
    int src_pos = 0;
    const char true_values[4][10] = { "true", "yes", "1", "on" };
    const char false_values[4][10] = { "false", "no", "0", "off" };
 
    when_true((src->data.s == NULL) || (*(src->data.s) == 0), exit);
 
    src_len = strlen(src->data.s) + 1;
    lower_src = (char*) calloc(1, src_len);
    when_null(lower_src, exit);
 
    for(int i = 0; i < src_len; i++) {
        if(isspace(*(src->data.s + i))) {
            // skip white spaces
            continue;
        }
        lower_src[src_pos] = tolower(*(src->data.s + i));
        src_pos++;
    }
 
    for(int index = 0; index < 4; index++) {
        if(strcmp(lower_src, true_values[index]) == 0) {
            dest->data.b = true;
            retval = 0;
            break;
        } else if(strcmp(lower_src, false_values[index]) == 0) {
            dest->data.b = false;
            retval = 0;
            break;
        }
    }
 
    free(lower_src);
 
exit:
    return retval;
}

variant_char_to_double()

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

static

Definition at line 142 of file variant_char.c.

                                                               {
    int retval = -1;
    const char* buffer = NULL;
    char* endptr = NULL;
 
    buffer = variant_char_validate_number(src, &retval);
    when_true(retval != 0, exit);
 
    retval = -1;
    errno = 0;
    dest->data.d = strtod(buffer, &endptr);
 
    if(((errno == ERANGE) && (dest->data.d == 0)) ||
       (( errno != 0) && ( dest->data.d == 0)) ||
       (endptr == buffer) ||
       (*endptr != '\0')) {
        goto exit;
    }
 
    retval = 0;
 
exit:
    return retval;
}

variant_char_to_float()

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

static

Definition at line 168 of file variant_char.c.

                                                              {
    int retval = -1;
    const char* buffer = NULL;
    char* endptr = NULL;
 
    buffer = variant_char_validate_number(src, &retval);
    when_true(retval != 0, exit);
 
    retval = -1;
    errno = 0;
    dest->data.f = strtof(buffer, &endptr);
 
    if(((errno == ERANGE) && (dest->data.f == 0)) ||
       (( errno != 0) && ( dest->data.f == 0)) ||
       (endptr == buffer) ||
       (*endptr != '\0')) {
        goto exit;
    }
 
    retval = 0;
 
exit:
    return retval;
}

variant_char_to_htable()

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

static

Definition at line 262 of file variant_char.c.

                                                               {
    char* temp = NULL;
    int retval = 0;
    char* element = NULL;
    int length = 0;
 
    amxc_var_set_type(dest, AMXC_VAR_ID_HTABLE);
    when_true(src->data.s == NULL || src->data.s == 0, exit);
 
    length = strlen(src->data.s) + 1;
    temp = (char*) calloc(1, length);
    when_null(temp, exit);
    memcpy(temp, src->data.s, length);
 
    element = strtok(temp, ",");
    while(element) {
        amxc_var_t* var = NULL;
        char* key = NULL;
        char* data = NULL;
        when_failed(amxc_var_new(&var), exit);
 
        var->type_id = AMXC_VAR_ID_CSTRING;
        key = element;
        while(*key) {
            if(*key == ':') {
                *key = 0;
                data = key + 1;
                break;
            }
            key++;
        }
        key = element;
        if(data != NULL) {
            length = strlen(data) + 1;
            var->data.s = (char*) calloc(1, length);
            if(var->data.s == NULL) {
                amxc_var_delete(&var);
                amxc_htable_clean(&dest->data.vm, variant_htable_it_free);
                goto exit;
            }
            memcpy(var->data.s, data, length);
        }
        amxc_htable_insert(&dest->data.vm, key, &var->hit);
        element = strtok(NULL, ",");
    }
 
    retval = 0;
 
exit:
    free(temp);
    return retval;
}

variant_char_to_list()

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

static

Definition at line 236 of file variant_char.c.

                                                             {
    amxc_string_t str;
    int retval = 0;
 
    amxc_string_init(&str, 0);
    amxc_var_set_type(dest, AMXC_VAR_ID_LIST);
    when_null(src->data.s, exit);
 
    if(*(src->data.s) != 0) {
        amxc_string_push_buffer(&str, src->data.s, strlen(src->data.s) + 1);
        if(src->type_id == AMXC_VAR_ID_SSV_STRING) {
            retval = amxc_string_ssv_to_var(&str, dest, NULL);
        } else {
            retval = amxc_string_csv_to_var(&str, dest, NULL);
        }
        amxc_string_take_buffer(&str);
    } else {
        retval = 0;
    }
 
exit:
    amxc_string_clean(&str);
    return retval;
}

variant_char_to_signed_int()

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

static

Definition at line 86 of file variant_char.c.

                                                                   {
    int retval = -1;
    amxc_var_t intermediate;
    const char* buffer = NULL;
    char* endptr = NULL;
 
    intermediate.type_id = AMXC_VAR_ID_INT64;
    intermediate.data.i64 = 0;
 
    buffer = variant_char_validate_number(src, &retval);
    when_true(retval != 0, exit);
 
    retval = -1;
    errno = 0;
    intermediate.data.i64 = strtoll(buffer, &endptr, 0);
 
    when_true((errno == ERANGE && (intermediate.data.i64 == LLONG_MIN ||
                                   intermediate.data.i64 == LLONG_MAX)) ||
              (errno != 0 && intermediate.data.i64 == 0), exit);
    when_true(endptr == buffer || *endptr != '\0', exit);
 
    retval = amxc_var_convert(dest, &intermediate, dest->type_id);
 
exit:
    return retval;
}

variant_char_to_ts()

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

static

Definition at line 316 of file variant_char.c.

                                                           {
 
    int retval = amxc_ts_parse(&dest->data.ts, src->data.s, strlen(src->data.s));
    return retval;
}

variant_char_to_unsigned_int()

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

static

Definition at line 114 of file variant_char.c.

                                                                     {
    int retval = -1;
    amxc_var_t intermediate;
    const char* buffer = NULL;
    char* endptr = NULL;
 
    intermediate.type_id = AMXC_VAR_ID_UINT64;
    intermediate.data.ui64 = 0;
 
    buffer = variant_char_validate_number(src, &retval);
    when_true(retval != 0, exit);
 
    retval = -1;
    errno = 0;
    intermediate.data.ui64 = llabs(strtoll(buffer, &endptr, 0));
 
    when_true((errno == ERANGE && (intermediate.data.ui64 == 0 ||
                                   intermediate.data.ui64 == ULLONG_MAX)) ||
              (errno != 0 && intermediate.data.ui64 == 0), exit);
    when_true(endptr == buffer || *endptr != '\0', exit);
 
    retval = amxc_var_convert(dest, &intermediate, dest->type_id);
 
exit:
    return retval;
}

variant_char_validate_number()

static const char* variant_char_validate_number ( const amxc_var_t *const  src, int *  retval  )

static

Definition at line 68 of file variant_char.c.

                                                                                          {
    const char* buffer = NULL;
    *retval = -1;
    when_true((src->data.s == NULL) || (*(src->data.s) == 0), exit);
 
    buffer = src->data.s;
    // skip whitespaces
    while(isspace(*buffer)) {
        buffer++;
    }
 
    when_true(!isdigit(*buffer) && *buffer != '+' && *buffer != '-', exit);
    *retval = 0;
 
exit:
    return buffer;
}

Variable Documentation

amxc_variant_char

amxc_var_type_t amxc_variant_char

static

Initial value:

= {
    .init = NULL,
    .del = variant_char_delete,
    .copy = variant_char_copy,
    .move = variant_char_move,
    .convert_from = NULL,
    .convert_to = variant_char_convert_to,
    .compare = variant_char_compare,
    .get_key = NULL,
    .set_key = NULL,
    .get_index = NULL,
    .set_index = NULL,
    .type_id = 0,
    .hit = { .ait = NULL, .key = NULL, .next = NULL },
    .name = AMXC_VAR_NAME_CSTRING
}

Definition at line 469 of file variant_char.c.

amxc_variant_csv_char

amxc_var_type_t amxc_variant_csv_char

static

Initial value:

= {
    .init = NULL,
    .del = variant_char_delete,
    .copy = variant_char_copy,
    .move = variant_char_move,
    .convert_from = NULL,
    .convert_to = variant_char_convert_to,
    .compare = variant_char_compare,
    .get_key = NULL,
    .set_key = NULL,
    .get_index = NULL,
    .set_index = NULL,
    .type_id = 0,
    .hit = { .ait = NULL, .key = NULL, .next = NULL },
    .name = AMXC_VAR_NAME_CSV_STRING
}

Definition at line 486 of file variant_char.c.

amxc_variant_ssv_char

amxc_var_type_t amxc_variant_ssv_char

static

Initial value:

= {
    .init = NULL,
    .del = variant_char_delete,
    .copy = variant_char_copy,
    .move = variant_char_move,
    .convert_from = NULL,
    .convert_to = variant_char_convert_to,
    .compare = variant_char_compare,
    .get_key = NULL,
    .set_key = NULL,
    .get_index = NULL,
    .set_index = NULL,
    .type_id = 0,
    .hit = { .ait = NULL, .key = NULL, .next = NULL },
    .name = AMXC_VAR_NAME_SSV_STRING
}

Definition at line 503 of file variant_char.c.