amxd_object_priv.h File Reference

#include <amxp/amxp_slot.h>
#include <amxp/amxp_expression.h>

Go to the source code of this file.

Data Structures
struct	_get_supported_args

Typedefs
typedef struct _get_supported_args	get_supported_args_t

Functions
PRIVATE void	amxd_object_free_func_it (amxc_llist_it_t *it)
PRIVATE const char *	amxd_object_template_get_alias (amxc_var_t *templ_params, amxc_var_t *values)
PRIVATE amxd_status_t	amxd_object_init (amxd_object_t *const object, const amxd_object_type_t type, const char *name, amxc_var_t *templ_params, amxc_var_t *values)
PRIVATE void	amxd_object_destroy_handlers (amxd_object_t *const object)
PRIVATE void	amxd_object_clean (amxd_object_t *const object)
PRIVATE amxd_object_t *	amxd_object_find_internal (amxd_object_t *const object, bool *key_path, amxd_path_t *path, amxd_status_t *status)
PRIVATE amxd_status_t	amxd_object_resolve_internal (amxd_object_t *const object, bool *key_path, amxc_llist_t *paths, amxd_path_t *path)
PRIVATE void	amxd_fetch_item (amxc_var_t *const full_data, const char *item, amxc_var_t *const data)
PRIVATE amxd_function_t *	amxd_object_get_self_func (const amxd_object_t *const object, const char *name)
PRIVATE amxd_status_t	amxd_object_copy_params (amxd_object_t *const dst, const amxd_object_t *const src)
PRIVATE amxd_status_t	amxd_object_copy_funcs (amxd_object_t *const dst, const amxd_object_t *const src)
PRIVATE amxd_status_t	amxd_object_copy_events (amxd_object_t *const dst, const amxd_object_t *const src)
PRIVATE amxd_status_t	amxd_object_copy_mib_names (amxd_object_t *const dst, const amxd_object_t *const src)
PRIVATE amxd_status_t	amxd_object_copy_children (amxd_object_t *const dst, const amxd_object_t *const src)
PRIVATE amxd_status_t	amxd_object_derive (amxd_object_t **object, amxd_object_t *const base, amxd_object_t *const parent)
PRIVATE amxd_status_t	amxd_object_build_key_expr (amxc_var_t *const templ_params, amxp_expr_t **expr, const amxc_htable_t *const data)

Typedef Documentation

get_supported_args_t

typedef struct _get_supported_args get_supported_args_t

Function Documentation

amxd_fetch_item()

PRIVATE void amxd_fetch_item	(	amxc_var_t *const	full_data,
		const char *	item,
		amxc_var_t *const	data
	)

Definition at line 193 of file amxd_object_priv.c.

                                             {
    amxc_var_t* item_data = amxc_var_get_path(full_data,
                                              item,
                                              AMXC_VAR_FLAG_DEFAULT);
 
    if(amxc_var_type_of(item_data) == AMXC_VAR_ID_LIST) {
        const amxc_llist_t* src_list = amxc_var_constcast(amxc_llist_t, item_data);
        amxc_var_set_type(data, AMXC_VAR_ID_LIST);
        amxc_llist_for_each(it, src_list) {
            amxc_llist_append(&data->data.vl, it);
        }
 
    } else if(amxc_var_type_of(item_data) == AMXC_VAR_ID_HTABLE) {
        const amxc_htable_t* src_table = amxc_var_constcast(amxc_htable_t, item_data);
        amxc_htable_it_t* it = NULL;
        amxc_var_set_type(data, AMXC_VAR_ID_HTABLE);
        it = amxc_htable_get_first(src_table);
        while(it) {
            const char* key = amxc_htable_it_get_key(it);
            amxc_htable_insert(&data->data.vm, key, it);
            it = amxc_htable_get_first(src_table);
        }
    }
}

amxd_object_build_key_expr()

PRIVATE amxd_status_t amxd_object_build_key_expr	(	amxc_var_t *const	templ_params,
		amxp_expr_t **	expr,
		const amxc_htable_t *const	data
	)

Definition at line 139 of file amxd_object_expression.c.

                                                                                  {
    amxd_status_t status = amxd_status_unknown_error;
    amxp_expr_status_t expr_status = amxp_expr_status_ok;
    amxc_string_t str_expr;
 
    amxc_string_init(&str_expr, 64);
 
    when_null(templ_params, exit);
    when_null(expr, exit);
 
    status = amxd_build_key_expr_string(templ_params, data, &str_expr);
 
    if((status == amxd_status_ok) &&
       !amxc_string_is_empty(&str_expr)) {
        expr_status = amxp_expr_new(expr, amxc_string_get(&str_expr, 0));
        when_true_status(expr_status != amxp_expr_status_ok,
                         exit,
                         status = amxd_status_invalid_value);
    }
 
exit:
    amxc_string_clean(&str_expr);
    return status;
}

amxd_object_clean()

PRIVATE void amxd_object_clean

(

amxd_object_t *const

object

)

Definition at line 165 of file amxd_object_priv.c.

                                                    {
    amxd_object_destroy_handlers(object);
    amxd_dm_llist_clean(&object->parameters, amxd_object_free_param_it);
    amxc_llist_it_take(&object->it);
 
    amxc_llist_clean(&object->functions, amxd_object_free_func_it);
    amxc_llist_clean(&object->cb_fns, amxd_object_free_cb_it);
    amxc_array_clean(&object->mib_names, NULL);
    amxc_var_clean(&object->events);
 
    if(amxc_llist_it_is_in_list(&object->derived_from)) {
        amxd_object_t* super = NULL;
        super = amxc_container_of(object->derived_from.llist,
                                  amxd_object_t,
                                  derived_objects);
        amxc_llist_it_take(&object->derived_from);
        if(amxc_llist_is_empty(&super->derived_objects) &&
           ( super->it.llist == NULL)) {
            amxd_object_free(&super);
        }
    }
 
    free(object->index_name);
    object->index_name = NULL;
    free(object->name);
    object->name = NULL;
}

amxd_object_copy_children()

PRIVATE amxd_status_t amxd_object_copy_children	(	amxd_object_t *const	dst,
		const amxd_object_t *const	src
	)

Definition at line 361 of file amxd_object_priv.c.

                                                                        {
    amxd_status_t retval = amxd_status_unknown_error;
    amxc_llist_for_each(it, (&src->objects)) {
        amxd_object_t* base = amxc_llist_it_get_data(it, amxd_object_t, it);
        amxd_object_t* derived = NULL;
        retval = amxd_object_derive(&derived, base, dst);
        when_failed(retval, exit);
        retval = amxd_object_copy_params(derived, base);
        when_failed(retval, exit);
        retval = amxd_object_copy_mib_names(derived, base);
        when_failed(retval, exit);
    }
 
    retval = amxd_status_ok;
exit:
    return retval;
}

amxd_object_copy_events()

PRIVATE amxd_status_t amxd_object_copy_events	(	amxd_object_t *const	dst,
		const amxd_object_t *const	src
	)

Definition at line 331 of file amxd_object_priv.c.

                                                                      {
    amxc_var_for_each(data, &src->events) {
        amxc_var_t* new_data = NULL;
        const char* name = amxc_var_key(data);
 
        amxc_var_new(&new_data);
        amxc_var_copy(new_data, data);
        amxd_object_add_event_ext(dst, name, new_data);
    }
 
    return amxd_status_ok;
}

amxd_object_copy_funcs()

PRIVATE amxd_status_t amxd_object_copy_funcs	(	amxd_object_t *const	dst,
		const amxd_object_t *const	src
	)

Definition at line 294 of file amxd_object_priv.c.

                                                                     {
    amxd_status_t retval = amxd_status_unknown_error;
    bool dst_is_inst = (amxd_object_get_type(dst) == amxd_object_instance);
    bool dst_is_templ = (amxd_object_get_type(dst) == amxd_object_template);
    bool src_is_mib = (amxd_object_get_type(src) == amxd_object_mib);
    amxc_llist_for_each(it, (&src->functions)) {
        amxd_function_t* base = amxc_llist_it_get_data(it, amxd_function_t, it);
        amxd_function_t* derived = NULL;
        if(!src_is_mib &&
           dst_is_inst &&
           !amxd_function_is_attr_set(base, amxd_fattr_instance)) {
            continue;
        }
        retval = amxd_function_copy(&derived, base);
        when_failed(retval, exit);
        if(src_is_mib && (dst_is_inst || dst_is_templ)) {
            uint32_t attrs = amxd_function_get_attrs(base);
            if(!IS_BIT_SET(attrs, amxd_fattr_instance) &&
               !IS_BIT_SET(attrs, amxd_fattr_template)) {
                amxd_function_set_attr(derived, amxd_fattr_instance, true);
            }
            if(dst_is_inst) {
                if(!amxd_function_is_attr_set(derived, amxd_fattr_instance)) {
                    amxd_function_delete(&derived);
                    continue;
                }
            }
        }
        amxc_llist_append(&dst->functions, &derived->it);
    }
 
    retval = amxd_status_ok;
exit:
    return retval;
}

amxd_object_copy_mib_names()

PRIVATE amxd_status_t amxd_object_copy_mib_names	(	amxd_object_t *const	dst,
		const amxd_object_t *const	src
	)

Definition at line 345 of file amxd_object_priv.c.

                                                                         {
    amxd_status_t retval = amxd_status_unknown_error;
    amxc_array_it_t* ait = amxc_array_get_first(&src->mib_names);
    while(ait != NULL) {
        const char* name = (const char*) amxc_array_it_get_data(ait);
        if(name != NULL) {
            amxc_array_append_data(&dst->mib_names, (void*) name);
        }
        ait = amxc_array_it_get_next(ait);
    }
 
    retval = amxd_status_ok;
    return retval;
}

amxd_object_copy_params()

PRIVATE amxd_status_t amxd_object_copy_params	(	amxd_object_t *const	dst,
		const amxd_object_t *const	src
	)

Definition at line 237 of file amxd_object_priv.c.

                                                                      {
    amxd_status_t retval = amxd_status_unknown_error;
    bool dst_is_inst = (amxd_object_get_type(dst) == amxd_object_instance);
    bool dst_is_templ = (amxd_object_get_type(dst) == amxd_object_template);
    bool src_is_mib = (amxd_object_get_type(src) == amxd_object_mib);
    amxc_llist_for_each(it, (&src->parameters)) {
        amxd_param_t* base = amxc_llist_it_get_data(it, amxd_param_t, it);
        amxd_param_t* derived = NULL;
        uint32_t attrs = amxd_param_get_attrs(base);
        if(!src_is_mib &&
           dst_is_inst &&
           !amxd_param_is_attr_set(base, amxd_pattr_instance)) {
            continue;
        }
        if(amxd_param_is_attr_set(base, amxd_pattr_counter) && !src_is_mib) {
            amxd_object_t* counted = amxd_object_get_child(dst, (char*) base->priv);
            retval = amxd_object_set_counter(counted, amxd_param_get_name(base));
            when_failed(retval, exit);
            derived = amxd_object_get_param_def(dst, amxd_param_get_name(base));
        } else {
            retval = amxd_param_copy(&derived, base);
            when_failed(retval, exit);
            if(src_is_mib) {
                amxc_llist_iterate(cb_it, (&base->cb_fns)) {
                    amxd_dm_cb_t* mib_cb = amxc_llist_it_get_data(cb_it, amxd_dm_cb_t, it);
                    if(mib_cb->reason == action_param_destroy) {
                        continue;
                    }
                    amxd_param_add_action_cb(derived,
                                             mib_cb->reason,
                                             mib_cb->fn,
                                             mib_cb->priv);
                }
                if(dst_is_inst || dst_is_templ) {
                    if(!IS_BIT_SET(attrs, amxd_pattr_instance) &&
                       !IS_BIT_SET(attrs, amxd_pattr_template)) {
                        amxd_param_set_attr(derived, amxd_pattr_instance, true);
                    }
                    if(dst_is_inst) {
                        if(!amxd_param_is_attr_set(derived, amxd_pattr_instance)) {
                            amxd_param_delete(&derived);
                            continue;
                        }
                    }
                }
            }
            amxc_llist_append(&dst->parameters, &derived->it);
        }
        amxd_param_set_attrs(derived, attrs, true);
    }
 
    retval = amxd_status_ok;
exit:
    return retval;
}

amxd_object_derive()

PRIVATE amxd_status_t amxd_object_derive	(	amxd_object_t **	object,
		amxd_object_t *const	base,
		amxd_object_t *const	parent
	)

Definition at line 380 of file amxd_object_priv.c.

                                                              {
    amxd_status_t retval = amxd_status_unknown_error;
    when_null(object, exit);
 
    *object = (amxd_object_t*) calloc(1, sizeof(amxd_object_t));
    when_null((*object), exit);
 
    (*object)->attr = base->attr;
    (*object)->type = base->type;
    amxc_llist_append(&base->derived_objects, &(*object)->derived_from);
    amxc_llist_append(&parent->objects, &(*object)->it);
 
    retval = amxd_object_copy_children((*object), base);
    when_failed(retval, exit);
 
exit:
    if((retval != amxd_status_ok) &&
       (object != NULL) &&
       (*object != NULL)) {
        amxd_object_clean(*object);
        free(*object);
        *object = NULL;
    }
    return retval;
}

amxd_object_destroy_handlers()

PRIVATE void amxd_object_destroy_handlers

(

amxd_object_t *const

object

)

Definition at line 160 of file amxd_object_priv.c.

                                                               {
    amxd_dm_llist_clean(&object->instances, amxd_object_free_object_it);
    amxd_dm_llist_clean(&object->objects, amxd_object_free_object_it);
}

amxd_object_find_internal()

PRIVATE amxd_object_t* amxd_object_find_internal	(	amxd_object_t *const	object,
		bool *	key_path,
		amxd_path_t *	path,
		amxd_status_t *	status
	)

Definition at line 364 of file amxd_object_search_priv.c.

                                                                {
    amxd_object_t* result = object;
    char* str_part = NULL;
 
    amxc_var_for_each(var, (&path->parts)) {
        str_part = amxc_var_take(cstring_t, var);
        switch(str_part[0]) {
        case '*':
            *status = amxd_status_invalid_path;
            result = NULL;
            break;
        case '{':
            if(amxd_object_get_type(result) != amxd_object_template) {
                *status = amxd_status_invalid_path;
                result = NULL;
            }
            break;
        case '[':
            if(amxd_object_get_type(result) != amxd_object_template) {
                *status = amxd_status_invalid_path;
                result = NULL;
            } else {
                result = amxd_template_find_instance(result, key_path, str_part, status);
            }
            break;
        case '.':
            break;
        case '^':
            result = amxd_object_get_parent(result);
            break;
        default:
            result = amxd_object_find(result, key_path, str_part, status);
            break;
        }
        amxc_var_push(cstring_t, var, str_part);
 
        when_null(result, exit);
    }
 
exit:
    return result;
}

amxd_object_free_func_it()

PRIVATE void amxd_object_free_func_it

(

amxc_llist_it_t *

it

)

Definition at line 105 of file amxd_object_priv.c.

                                                   {
    amxd_function_t* func = amxc_llist_it_get_data(it, amxd_function_t, it);
    amxd_function_delete(&func);
}

amxd_object_get_self_func()

PRIVATE amxd_function_t* amxd_object_get_self_func	(	const amxd_object_t *const	object,
		const char *	name
	)

Definition at line 220 of file amxd_object_priv.c.

                                                             {
    amxd_function_t* func = NULL;
 
    amxc_llist_for_each(it, (&object->functions)) {
        const char* func_name = NULL;
        func = amxc_llist_it_get_data(it, amxd_function_t, it);
        func_name = amxd_function_get_name(func);
        if(strcmp(func_name, name) == 0) {
            break;
        }
        func = NULL;
    }
 
    return func;
}

amxd_object_init()

PRIVATE amxd_status_t amxd_object_init	(	amxd_object_t *const	object,
		const amxd_object_type_t	type,
		const char *	name,
		amxc_var_t *	templ_params,
		amxc_var_t *	values
	)

Definition at line 130 of file amxd_object_priv.c.

                                                   {
    amxd_status_t retval = amxd_status_unknown_error;
 
    amxd_object_init_base(object, type);
 
    if(amxd_object_get_type(object) == amxd_object_instance) {
        const char* alias = amxd_object_template_get_alias(templ_params, values);
        if((alias != NULL) && (alias[0] != 0)) {
            object->name = strdup(alias);
            when_null(object->name, exit);
        }
    }
    if(object->name == NULL) {
        if((name != NULL) && (name[0] != 0)) {
            object->name = strdup(name);
            when_null(object->name, exit);
        }
    }
    amxd_dm_set_derived_from(object);
 
    retval = amxd_status_ok;
 
exit:
    return retval;
}

amxd_object_resolve_internal()

PRIVATE amxd_status_t amxd_object_resolve_internal	(	amxd_object_t *const	object,
		bool *	key_path,
		amxc_llist_t *	paths,
		amxd_path_t *	path
	)

Definition at line 410 of file amxd_object_search_priv.c.

                                                              {
    amxd_status_t status = amxd_status_ok;
    amxc_llist_it_t* path_part_it = NULL;
    const amxc_llist_t* lparts = NULL;
 
    lparts = amxc_var_constcast(amxc_llist_t, &path->parts);
    path_part_it = amxc_llist_get_first(lparts);
    if(path_part_it != NULL) {
        status = amxd_object_resolve_next(object, key_path, paths, path_part_it);
    } else {
        status = amxd_resolve_add_path_or_continue(object, key_path, paths, NULL);
    }
    when_failed(status, exit);
 
exit:
    if(status != amxd_status_ok) {
        amxc_llist_clean(paths, amxc_string_list_it_free);
    }
    return status;
}

amxd_object_template_get_alias()

PRIVATE const char* amxd_object_template_get_alias	(	amxc_var_t *	templ_params,
		amxc_var_t *	values
	)

Definition at line 110 of file amxd_object_priv.c.

                                                               {
    amxc_var_t* alias_def = GET_FIELD(templ_params, "Alias");
    amxc_var_t* alias_val = GET_FIELD(values, "Alias");
    const char* alias_name = NULL;
 
    when_null(alias_def, exit);
    when_true(!amxc_var_constcast(bool,
                                  GET_FIELD(alias_def, "attributes.key")),
              exit);
    when_true(!amxc_var_constcast(bool,
                                  GET_FIELD(alias_def, "attributes.unique")),
              exit);
 
    alias_name = amxc_var_constcast(cstring_t, alias_val);
 
exit:
    return alias_name;
}