2014-05-01 05:05:33 -07:00
|
|
|
#ifdef HAVE_CONFIG_H
|
|
|
|
# include <config.h>
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
#include<Eina.h>
|
|
|
|
#include "Eolian.h"
|
|
|
|
#include "eolian_suite.h"
|
|
|
|
|
2014-05-25 03:53:49 -07:00
|
|
|
START_TEST(eolian_namespaces)
|
|
|
|
{
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Class *class11, *class112, *class21, *class_no, *impl_class;
|
|
|
|
const Eolian_Function *fid;
|
2014-07-23 05:44:42 -07:00
|
|
|
Eina_Iterator *iter;
|
2014-05-25 03:53:49 -07:00
|
|
|
Eolian_Function_Type func_type;
|
2014-07-23 05:44:42 -07:00
|
|
|
const char *class_name, *val1, *val2;
|
|
|
|
const Eolian_Implement *impl;
|
|
|
|
void *dummy;
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/namespace.eo"));
|
|
|
|
|
|
|
|
/* Classes existence */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class11 = eolian_class_get_by_name("nmsp1.class1")));
|
|
|
|
fail_if(!(class112 = eolian_class_get_by_name("nmsp1.nmsp11.class2")));
|
|
|
|
fail_if(!(class21 = eolian_class_get_by_name("nmsp2.class1")));
|
|
|
|
fail_if(!(class_no = eolian_class_get_by_name("no_nmsp")));
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
/* Check names and namespaces*/
|
|
|
|
fail_if(strcmp(eolian_class_name_get(class11), "class1"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_namespaces_get(class11)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&val1)));
|
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
fail_if(strcmp(val1, "nmsp1"));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
fail_if(strcmp(eolian_class_name_get(class112), "class2"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_namespaces_get(class112)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&val1)));
|
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&val2)));
|
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
fail_if(strcmp(val1, "nmsp1"));
|
|
|
|
fail_if(strcmp(val2, "nmsp11"));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
fail_if(strcmp(eolian_class_name_get(class21), "class1"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_namespaces_get(class21)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&val1)));
|
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
fail_if(strcmp(val1, "nmsp2"));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
fail_if(strcmp(eolian_class_name_get(class_no), "no_nmsp"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(eolian_class_namespaces_get(class_no));
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
/* Inherits */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_inherits_get(class11)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&class_name)));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(eolian_class_get_by_name(class_name) != class112);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&class_name)));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(eolian_class_get_by_name(class_name) != class21);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&class_name)));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(eolian_class_get_by_name(class_name) != class_no);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
/* Implements */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_implements_get(class11)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&impl)));
|
|
|
|
fail_if(!eolian_implement_information_get(impl,
|
2014-05-29 04:42:16 -07:00
|
|
|
&impl_class, &fid, &func_type));
|
|
|
|
fail_if(impl_class != class112);
|
|
|
|
fail_if(strcmp(eolian_function_name_get(fid), "a"));
|
2014-05-25 03:53:49 -07:00
|
|
|
fail_if(func_type != EOLIAN_PROP_SET);
|
2014-05-29 04:42:16 -07:00
|
|
|
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&impl)));
|
|
|
|
fail_if(eolian_implement_information_get(impl,
|
2014-05-29 04:42:16 -07:00
|
|
|
&impl_class, &fid, &func_type));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&impl)));
|
|
|
|
fail_if(!eolian_implement_information_get(impl,
|
2014-05-29 04:42:16 -07:00
|
|
|
&impl_class, &fid, &func_type));
|
|
|
|
fail_if(impl_class != class_no);
|
|
|
|
fail_if(strcmp(eolian_function_name_get(fid), "foo"));
|
2014-05-25 03:53:49 -07:00
|
|
|
fail_if(func_type != EOLIAN_METHOD);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-25 03:53:49 -07:00
|
|
|
|
|
|
|
/* Virtual regression */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class112, "a", EOLIAN_UNRESOLVED)));
|
2014-05-25 03:53:49 -07:00
|
|
|
fail_if(!eolian_function_is_virtual_pure(fid, EOLIAN_PROP_SET));
|
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-05-23 07:38:39 -07:00
|
|
|
START_TEST(eolian_events)
|
|
|
|
{
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Class *class;
|
2014-07-23 05:44:42 -07:00
|
|
|
Eina_Iterator *iter;
|
2014-07-11 03:52:45 -07:00
|
|
|
const char *name, *comment, *type_name;
|
|
|
|
const Eolian_Type *type;
|
2014-07-23 05:44:42 -07:00
|
|
|
const Eolian_Event *ev;
|
|
|
|
void *dummy;
|
2014-05-23 07:38:39 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/events.eo"));
|
|
|
|
|
|
|
|
/* Class */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Events")));
|
2014-05-23 07:38:39 -07:00
|
|
|
|
|
|
|
/* Events */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_events_get(class)));
|
2014-05-23 07:38:39 -07:00
|
|
|
/* Clicked */
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&ev)));
|
|
|
|
fail_if(!eolian_class_event_information_get(ev, &name, &type, &comment));
|
2014-05-23 07:38:39 -07:00
|
|
|
fail_if(strcmp(name, "clicked"));
|
|
|
|
fail_if(type);
|
|
|
|
fail_if(strcmp(comment, "Comment for clicked"));
|
|
|
|
/* Clicked,double */
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&ev)));
|
|
|
|
fail_if(!eolian_class_event_information_get(ev, &name, &type, &comment));
|
2014-05-23 07:38:39 -07:00
|
|
|
fail_if(strcmp(name, "clicked,double"));
|
2014-07-11 03:52:45 -07:00
|
|
|
fail_if(!type);
|
|
|
|
type_name = eolian_type_name_get(type);
|
|
|
|
fail_if(strcmp(type_name, "Evas_Event_Clicked_Double_Info"));
|
|
|
|
eina_stringshare_del(type_name);
|
2014-05-23 07:38:39 -07:00
|
|
|
fail_if(comment);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-23 07:38:39 -07:00
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-05-21 03:56:31 -07:00
|
|
|
START_TEST(eolian_override)
|
|
|
|
{
|
2014-07-23 05:44:42 -07:00
|
|
|
Eina_Iterator *iter;
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Function *fid = NULL;
|
|
|
|
const Eolian_Class *impl_class = NULL;
|
|
|
|
const Eolian_Function *impl_func = NULL;
|
|
|
|
const Eolian_Class *class, *base;
|
2014-07-23 05:44:42 -07:00
|
|
|
const Eolian_Implement *impl;
|
2014-05-21 03:56:31 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_directory_scan(PACKAGE_DATA_DIR"/data"));
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/override.eo"));
|
|
|
|
|
|
|
|
/* Class */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Simple")));
|
|
|
|
fail_if(!(base = eolian_class_get_by_name("Base")));
|
2014-05-21 03:56:31 -07:00
|
|
|
|
|
|
|
/* Base ctor */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(base, "constructor", EOLIAN_UNRESOLVED)));
|
2014-05-21 03:56:31 -07:00
|
|
|
fail_if(!eolian_function_is_virtual_pure(fid, EOLIAN_UNRESOLVED));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_implements_get(class)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&impl)));
|
|
|
|
fail_if(!eolian_implement_information_get(impl, &impl_class, &impl_func, NULL));
|
2014-05-29 04:42:16 -07:00
|
|
|
fail_if(impl_class != base);
|
|
|
|
fail_if(strcmp(eolian_function_name_get(impl_func), "constructor"));
|
2014-07-23 05:44:42 -07:00
|
|
|
eina_iterator_free(iter);
|
2014-05-21 03:56:31 -07:00
|
|
|
|
|
|
|
/* Property */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "a", EOLIAN_PROPERTY)));
|
2014-05-21 03:56:31 -07:00
|
|
|
fail_if(!eolian_function_is_virtual_pure(fid, EOLIAN_PROP_SET));
|
|
|
|
fail_if(eolian_function_is_virtual_pure(fid, EOLIAN_PROP_GET));
|
|
|
|
|
|
|
|
/* Method */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD)));
|
2014-05-21 03:56:31 -07:00
|
|
|
fail_if(!eolian_function_is_virtual_pure(fid, EOLIAN_METHOD));
|
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-05-21 01:39:16 -07:00
|
|
|
START_TEST(eolian_consts)
|
|
|
|
{
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Function *fid = NULL;
|
|
|
|
const Eolian_Function_Parameter *param = NULL;
|
|
|
|
const Eolian_Class *class;
|
2014-05-21 01:39:16 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/consts.eo"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Const")));
|
2014-05-21 01:39:16 -07:00
|
|
|
|
|
|
|
/* Property */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "a", EOLIAN_PROPERTY)));
|
2014-05-21 01:39:16 -07:00
|
|
|
fail_if(!(param = eolian_function_parameter_get(fid, "buffer")));
|
|
|
|
fail_if(eolian_parameter_const_attribute_get(param, EINA_FALSE));
|
|
|
|
fail_if(!eolian_parameter_const_attribute_get(param, EINA_TRUE));
|
|
|
|
|
|
|
|
/* Method */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD)));
|
2014-05-21 01:39:16 -07:00
|
|
|
fail_if(EINA_FALSE == eolian_function_object_is_const(fid));
|
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-05-01 05:05:33 -07:00
|
|
|
START_TEST(eolian_ctor_dtor)
|
|
|
|
{
|
2014-07-23 05:44:42 -07:00
|
|
|
Eina_Iterator *iter;
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Class *impl_class = NULL;
|
|
|
|
const Eolian_Function *impl_func = NULL;
|
|
|
|
const Eolian_Class *class, *base;
|
2014-07-23 05:44:42 -07:00
|
|
|
const Eolian_Implement *impl;
|
|
|
|
void *dummy;
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_directory_scan(PACKAGE_DATA_DIR"/data"));
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/ctor_dtor.eo"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Ctor_Dtor")));
|
|
|
|
fail_if(!(base = eolian_class_get_by_name("Base")));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Class ctor/dtor */
|
2014-05-22 07:24:50 -07:00
|
|
|
fail_if(!eolian_class_ctor_enable_get(class));
|
|
|
|
fail_if(!eolian_class_dtor_enable_get(class));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Base ctor/dtor */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_class_implements_get(class)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&impl)));
|
|
|
|
fail_if(!eolian_implement_information_get(impl, &impl_class, &impl_func, NULL));
|
2014-05-29 04:42:16 -07:00
|
|
|
fail_if(impl_class != base);
|
|
|
|
fail_if(strcmp(eolian_function_name_get(impl_func), "constructor"));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)&impl)));
|
|
|
|
fail_if(!eolian_implement_information_get(impl, &impl_class, &impl_func, NULL));
|
2014-05-29 04:42:16 -07:00
|
|
|
fail_if(impl_class != base);
|
|
|
|
fail_if(strcmp(eolian_function_name_get(impl_func), "destructor"));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Custom ctors/dtors */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!eolian_class_function_get_by_name(base, "constructor", EOLIAN_CTOR));
|
|
|
|
fail_if(!eolian_class_function_get_by_name(base, "destructor", EOLIAN_METHOD));
|
|
|
|
fail_if(!eolian_class_function_get_by_name(class, "custom_constructor_1", EOLIAN_CTOR));
|
|
|
|
fail_if(!eolian_class_function_get_by_name(class, "custom_constructor_2", EOLIAN_CTOR));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
|
|
|
START_TEST(eolian_typedef)
|
|
|
|
{
|
2014-07-21 09:12:35 -07:00
|
|
|
const Eolian_Type *atype = NULL, *type = NULL;
|
2014-05-01 05:05:33 -07:00
|
|
|
const char *type_name = NULL;
|
2014-06-27 07:39:19 -07:00
|
|
|
Eina_Iterator *iter = NULL;
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Class *class;
|
2014-07-21 04:03:51 -07:00
|
|
|
const char *file;
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/typedef.eo"));
|
|
|
|
|
|
|
|
/* Check that the class Dummy is still readable */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Dummy")));
|
|
|
|
fail_if(!eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Basic type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(atype = eolian_type_alias_get_by_name("Evas.Coord")));
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(eolian_type_type_get(atype) != EOLIAN_TYPE_ALIAS);
|
|
|
|
fail_if(!(type_name = eolian_type_name_get(atype)));
|
|
|
|
fail_if(strcmp(type_name, "Coord"));
|
|
|
|
eina_stringshare_del(type_name);
|
2014-07-22 04:11:06 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(atype)));
|
|
|
|
fail_if(strcmp(type_name, "typedef int Evas_Coord"));
|
|
|
|
eina_stringshare_del(type_name);
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(!(type = eolian_type_base_type_get(atype)));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_name_get(type)));
|
|
|
|
fail_if(eolian_type_is_own(type));
|
|
|
|
fail_if(eolian_type_is_const(type));
|
|
|
|
fail_if(eolian_type_base_type_get(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "int"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
2014-05-01 05:05:33 -07:00
|
|
|
|
2014-07-21 04:03:51 -07:00
|
|
|
/* File */
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(!(file = eolian_type_file_get(atype)));
|
2014-07-21 04:03:51 -07:00
|
|
|
fail_if(strcmp(file, "typedef.eo"));
|
|
|
|
eina_stringshare_del(file);
|
|
|
|
|
2014-05-01 05:05:33 -07:00
|
|
|
/* Complex type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(atype = eolian_type_alias_get_by_name("List_Objects")));
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(!(type_name = eolian_type_name_get(atype)));
|
|
|
|
fail_if(strcmp(type_name, "List_Objects"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
fail_if(!(type = eolian_type_base_type_get(atype)));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(!eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eina_List *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_type_subtypes_get(type)));
|
2014-06-27 07:41:06 -07:00
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&type));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eo *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(eolian_type_is_own(type));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
|
2014-07-22 05:14:44 -07:00
|
|
|
/* List */
|
|
|
|
fail_if(!(iter = eolian_type_aliases_get_by_file("typedef.eo")));
|
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&atype));
|
|
|
|
fail_if(!(type_name = eolian_type_name_get(atype)));
|
|
|
|
fail_if(strcmp(type_name, "Coord"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&atype));
|
|
|
|
fail_if(!(type_name = eolian_type_name_get(atype)));
|
|
|
|
fail_if(strcmp(type_name, "List_Objects"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
fail_if(eina_iterator_next(iter, (void**)&atype));
|
|
|
|
|
2014-05-01 05:05:33 -07:00
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
|
|
|
START_TEST(eolian_complex_type)
|
|
|
|
{
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Function *fid = NULL;
|
|
|
|
const Eolian_Function_Parameter *param = NULL;
|
|
|
|
const Eolian_Type *type = NULL;
|
2014-05-01 05:05:33 -07:00
|
|
|
const char *type_name = NULL;
|
2014-06-27 07:39:19 -07:00
|
|
|
Eina_Iterator *iter = NULL;
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Class *class;
|
2014-07-23 05:44:42 -07:00
|
|
|
void *dummy;
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/complex_type.eo"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Complex_Type")));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Properties return type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "a", EOLIAN_PROPERTY)));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type = eolian_function_return_type_get(fid, EOLIAN_PROP_SET)));
|
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(!eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eina_List *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_type_subtypes_get(type)));
|
2014-06-27 07:41:06 -07:00
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&type));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eina_Array *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
eina_iterator_free(iter);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_type_subtypes_get(type)));
|
2014-06-27 07:41:06 -07:00
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&type));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(!eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eo **"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
/* Properties parameter type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_parameters_get(fid)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)¶m)));
|
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(eolian_parameter_name_get(param), "value"));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type = eolian_parameter_type_get(param)));
|
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(!eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eina_List *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_type_subtypes_get(type)));
|
2014-06-27 07:41:06 -07:00
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&type));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "int"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Methods return type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD)));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type = eolian_function_return_type_get(fid, EOLIAN_METHOD)));
|
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(!eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eina_List *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_type_subtypes_get(type)));
|
2014-06-27 07:41:06 -07:00
|
|
|
fail_if(!eina_iterator_next(iter, (void**)&type));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "Eina_Stringshare *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
/* Methods parameter type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_parameters_get(fid)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)¶m)));
|
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(eolian_parameter_name_get(param), "buf"));
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(!(type = eolian_parameter_type_get(param)));
|
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(type)));
|
|
|
|
fail_if(!eolian_type_is_own(type));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(type_name, "char *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(type_name);
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
|
|
|
START_TEST(eolian_scope)
|
|
|
|
{
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Function *fid = NULL;
|
|
|
|
const Eolian_Class *class;
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/scope.eo"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Simple")));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Property scope */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "a", EOLIAN_PROPERTY)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(eolian_function_scope_get(fid) != EOLIAN_SCOPE_PROTECTED);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "b", EOLIAN_PROPERTY)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(eolian_function_scope_get(fid) != EOLIAN_SCOPE_PUBLIC);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "c", EOLIAN_PROPERTY)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(eolian_function_scope_get(fid) != EOLIAN_SCOPE_PUBLIC);
|
|
|
|
|
|
|
|
/* Method scope */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(eolian_function_scope_get(fid) != EOLIAN_SCOPE_PUBLIC);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "bar", EOLIAN_METHOD)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(eolian_function_scope_get(fid) != EOLIAN_SCOPE_PROTECTED);
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "foobar", EOLIAN_METHOD)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(eolian_function_scope_get(fid) != EOLIAN_SCOPE_PUBLIC);
|
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
|
|
|
START_TEST(eolian_simple_parsing)
|
|
|
|
{
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Function *fid = NULL;
|
|
|
|
const Eolian_Type *ptypep = NULL;
|
2014-05-01 05:05:33 -07:00
|
|
|
const char *string = NULL, *ptype = NULL, *pname = NULL;
|
|
|
|
Eolian_Parameter_Dir dir = EOLIAN_IN_PARAM;
|
2014-07-11 03:52:45 -07:00
|
|
|
const Eolian_Function_Parameter *param = NULL;
|
|
|
|
const Eolian_Class *class;
|
|
|
|
const Eolian_Type *tp;
|
2014-07-23 05:44:42 -07:00
|
|
|
Eina_Iterator *iter;
|
|
|
|
void *dummy;
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/class_simple.eo"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Simple")));
|
|
|
|
fail_if(eolian_class_get_by_file(PACKAGE_DATA_DIR"/data/class_simple.eo") != class);
|
2014-05-22 07:24:50 -07:00
|
|
|
fail_if(strcmp(eolian_class_file_get(class), PACKAGE_DATA_DIR"/data/class_simple.eo"));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Class */
|
2014-05-22 07:24:50 -07:00
|
|
|
fail_if(eolian_class_type_get(class) != EOLIAN_CLASS_REGULAR);
|
|
|
|
string = eolian_class_description_get(class);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "Class Desc Simple"));
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(eolian_class_inherits_get(class) != NULL);
|
2014-05-22 07:24:50 -07:00
|
|
|
fail_if(strcmp(eolian_class_legacy_prefix_get(class), "evas_object_simple"));
|
|
|
|
fail_if(strcmp(eolian_class_eo_prefix_get(class), "evas_obj_simple"));
|
|
|
|
fail_if(strcmp(eolian_class_data_type_get(class), "Evas_Simple_Data"));
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
/* Property */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "a", EOLIAN_PROPERTY)));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(eolian_function_name_get(fid), "a"));
|
|
|
|
string = eolian_function_description_get(fid, EOLIAN_COMMENT_SET);
|
|
|
|
fail_if(!string);
|
2014-06-20 02:52:00 -07:00
|
|
|
fail_if(strcmp(string, "comment a.set"));
|
2014-05-01 05:05:33 -07:00
|
|
|
string = eolian_function_description_get(fid, EOLIAN_COMMENT_GET);
|
|
|
|
fail_if(string);
|
|
|
|
/* Set return */
|
2014-06-27 07:39:19 -07:00
|
|
|
tp = eolian_function_return_type_get(fid, EOLIAN_PROP_SET);
|
|
|
|
fail_if(!tp);
|
|
|
|
fail_if(strcmp(eolian_type_name_get(tp), "Eina_Bool"));
|
2014-07-11 06:30:22 -07:00
|
|
|
string = eolian_function_return_default_value_get(fid, EOLIAN_PROP_SET);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "EINA_TRUE"));
|
|
|
|
string = eolian_function_return_comment_get(fid, EOLIAN_PROP_SET);
|
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "comment for property set return"));
|
|
|
|
/* Get return */
|
2014-06-27 07:39:19 -07:00
|
|
|
tp = eolian_function_return_type_get(fid, EOLIAN_PROP_GET);
|
|
|
|
fail_if(tp);
|
2014-05-01 05:05:33 -07:00
|
|
|
string = eolian_function_return_comment_get(fid, EOLIAN_PROP_GET);
|
|
|
|
fail_if(string);
|
|
|
|
|
|
|
|
/* Function parameters */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(eolian_property_keys_get(fid) != NULL);
|
|
|
|
fail_if(!(iter = eolian_property_values_get(fid)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)¶m)));
|
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-06-27 07:39:19 -07:00
|
|
|
eolian_parameter_information_get(param, NULL, &ptypep, &pname, &string);
|
|
|
|
fail_if(strcmp(eolian_type_name_get(ptypep), "int"));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(pname, "value"));
|
|
|
|
fail_if(strcmp(string, "Value description"));
|
|
|
|
|
|
|
|
/* Method */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(fid = eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD)));
|
2014-05-01 05:05:33 -07:00
|
|
|
string = eolian_function_description_get(fid, EOLIAN_COMMENT);
|
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "comment foo"));
|
|
|
|
/* Function return */
|
2014-06-27 07:39:19 -07:00
|
|
|
tp = eolian_function_return_type_get(fid, EOLIAN_METHOD);
|
|
|
|
fail_if(!tp);
|
|
|
|
string = eolian_type_c_type_get(tp);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "char *"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(string);
|
2014-07-11 06:30:22 -07:00
|
|
|
string = eolian_function_return_default_value_get(fid, EOLIAN_METHOD);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "NULL"));
|
|
|
|
string = eolian_function_return_comment_get(fid, EOLIAN_METHOD);
|
|
|
|
fail_if(!string);
|
|
|
|
fail_if(strcmp(string, "comment for method return"));
|
|
|
|
|
|
|
|
/* Function parameters */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(iter = eolian_property_values_get(fid)));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)¶m)));
|
2014-06-27 07:39:19 -07:00
|
|
|
eolian_parameter_information_get(param, &dir, &ptypep, &pname, &string);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(dir != EOLIAN_IN_PARAM);
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(strcmp(eolian_type_name_get(ptypep), "int"));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(pname, "a"));
|
|
|
|
fail_if(!string || strcmp(string, "a"));
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)¶m)));
|
2014-06-27 07:39:19 -07:00
|
|
|
eolian_parameter_information_get(param, &dir, &ptypep, &pname, &string);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(dir != EOLIAN_INOUT_PARAM);
|
2014-07-08 06:15:36 -07:00
|
|
|
ptype = eolian_type_name_get(ptypep);
|
|
|
|
fail_if(strcmp(ptype, "char"));
|
2014-06-27 07:39:19 -07:00
|
|
|
eina_stringshare_del(ptype);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(pname, "b"));
|
|
|
|
fail_if(string);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(!(eina_iterator_next(iter, (void**)¶m)));
|
2014-06-27 07:39:19 -07:00
|
|
|
eolian_parameter_information_get(param, &dir, &ptypep, &pname, &string);
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(dir != EOLIAN_OUT_PARAM);
|
2014-06-27 07:39:19 -07:00
|
|
|
fail_if(strcmp(eolian_type_name_get(ptypep), "double"));
|
2014-05-01 05:05:33 -07:00
|
|
|
fail_if(strcmp(pname, "c"));
|
|
|
|
fail_if(string);
|
2014-07-23 05:44:42 -07:00
|
|
|
fail_if(eina_iterator_next(iter, &dummy));
|
|
|
|
eina_iterator_free(iter);
|
2014-05-01 05:05:33 -07:00
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-07-14 04:11:48 -07:00
|
|
|
START_TEST(eolian_struct)
|
|
|
|
{
|
2014-07-21 09:12:35 -07:00
|
|
|
const Eolian_Type *atype = NULL, *type = NULL, *field = NULL;
|
2014-07-14 04:11:48 -07:00
|
|
|
const Eolian_Class *class;
|
|
|
|
const char *type_name;
|
2014-07-21 04:03:51 -07:00
|
|
|
const char *file;
|
2014-07-14 04:11:48 -07:00
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/struct.eo"));
|
|
|
|
|
|
|
|
/* Check that the class Dummy is still readable */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Dummy")));
|
|
|
|
fail_if(!eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD));
|
2014-07-14 04:11:48 -07:00
|
|
|
|
|
|
|
/* named struct */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(type = eolian_type_struct_get_by_name("Named")));
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(!(type_name = eolian_type_name_get(type)));
|
2014-07-21 06:38:43 -07:00
|
|
|
fail_if(!(file = eolian_type_file_get(type)));
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(eolian_type_type_get(type) != EOLIAN_TYPE_STRUCT);
|
|
|
|
fail_if(eolian_type_is_own(type));
|
|
|
|
fail_if(eolian_type_is_const(type));
|
|
|
|
fail_if(strcmp(type_name, "Named"));
|
|
|
|
eina_stringshare_del(type_name);
|
2014-07-21 04:03:51 -07:00
|
|
|
fail_if(strcmp(file, "struct.eo"));
|
|
|
|
eina_stringshare_del(file);
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(!(field = eolian_type_struct_field_get(type, "field")));
|
|
|
|
fail_if(!(type_name = eolian_type_name_get(field)));
|
|
|
|
fail_if(strcmp(type_name, "int"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
fail_if(!(field = eolian_type_struct_field_get(type, "something")));
|
|
|
|
fail_if(!(type_name = eolian_type_c_type_get(field)));
|
|
|
|
fail_if(strcmp(type_name, "const char *"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
|
|
|
|
/* referencing */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(type = eolian_type_struct_get_by_name("Another")));
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(!(type_name = eolian_type_name_get(type)));
|
2014-07-21 06:38:43 -07:00
|
|
|
fail_if(!(file = eolian_type_file_get(type)));
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(eolian_type_type_get(type) != EOLIAN_TYPE_STRUCT);
|
|
|
|
fail_if(strcmp(type_name, "Another"));
|
|
|
|
eina_stringshare_del(type_name);
|
2014-07-21 04:03:51 -07:00
|
|
|
fail_if(strcmp(file, "struct.eo"));
|
|
|
|
eina_stringshare_del(file);
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(!(field = eolian_type_struct_field_get(type, "field")));
|
|
|
|
fail_if(!(type_name = eolian_type_name_get(field)));
|
|
|
|
fail_if(strcmp(type_name, "Named"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
fail_if(eolian_type_type_get(field) != EOLIAN_TYPE_REGULAR_STRUCT);
|
|
|
|
|
|
|
|
/* typedef */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(atype = eolian_type_alias_get_by_name("Foo")));
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(!(type = eolian_type_base_type_get(atype)));
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(!(type_name = eolian_type_name_get(type)));
|
|
|
|
fail_if(eolian_type_type_get(type) != EOLIAN_TYPE_STRUCT);
|
|
|
|
fail_if(strcmp(type_name, "_Foo"));
|
|
|
|
eina_stringshare_del(type_name);
|
|
|
|
|
|
|
|
/* typedef - anon */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(atype = eolian_type_alias_get_by_name("Bar")));
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(!(type = eolian_type_base_type_get(atype)));
|
2014-07-14 04:11:48 -07:00
|
|
|
fail_if(!!(type_name = eolian_type_name_get(type)));
|
|
|
|
fail_if(eolian_type_type_get(type) != EOLIAN_TYPE_STRUCT);
|
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-07-15 07:50:58 -07:00
|
|
|
START_TEST(eolian_extern)
|
|
|
|
{
|
|
|
|
const Eolian_Type *type = NULL;
|
|
|
|
const Eolian_Class *class;
|
|
|
|
|
|
|
|
eolian_init();
|
|
|
|
|
|
|
|
/* Parsing */
|
|
|
|
fail_if(!eolian_eo_file_parse(PACKAGE_DATA_DIR"/data/extern.eo"));
|
|
|
|
|
|
|
|
/* Check that the class Dummy is still readable */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(class = eolian_class_get_by_name("Dummy")));
|
|
|
|
fail_if(!eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD));
|
2014-07-15 07:50:58 -07:00
|
|
|
|
|
|
|
/* regular type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(type = eolian_type_alias_get_by_name("Foo")));
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(eolian_type_is_extern(type));
|
2014-07-15 07:50:58 -07:00
|
|
|
|
|
|
|
/* extern type */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(type = eolian_type_alias_get_by_name("Evas.Coord")));
|
2014-07-21 09:12:35 -07:00
|
|
|
fail_if(!eolian_type_is_extern(type));
|
2014-07-15 07:50:58 -07:00
|
|
|
|
|
|
|
/* regular struct */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(type = eolian_type_struct_get_by_name("X")));
|
2014-07-21 06:14:22 -07:00
|
|
|
fail_if(eolian_type_is_extern(type));
|
2014-07-15 07:50:58 -07:00
|
|
|
|
|
|
|
/* extern struct */
|
2014-07-23 06:13:21 -07:00
|
|
|
fail_if(!(type = eolian_type_struct_get_by_name("Y")));
|
2014-07-21 06:14:22 -07:00
|
|
|
fail_if(!eolian_type_is_extern(type));
|
2014-07-15 07:50:58 -07:00
|
|
|
|
|
|
|
eolian_shutdown();
|
|
|
|
}
|
|
|
|
END_TEST
|
|
|
|
|
2014-05-01 05:05:33 -07:00
|
|
|
void eolian_parsing_test(TCase *tc)
|
|
|
|
{
|
|
|
|
tcase_add_test(tc, eolian_simple_parsing);
|
|
|
|
tcase_add_test(tc, eolian_ctor_dtor);
|
|
|
|
tcase_add_test(tc, eolian_scope);
|
|
|
|
tcase_add_test(tc, eolian_complex_type);
|
|
|
|
tcase_add_test(tc, eolian_typedef);
|
2014-05-21 01:39:16 -07:00
|
|
|
tcase_add_test(tc, eolian_consts);
|
2014-05-21 03:56:31 -07:00
|
|
|
tcase_add_test(tc, eolian_override);
|
2014-05-23 07:38:39 -07:00
|
|
|
tcase_add_test(tc, eolian_events);
|
2014-05-25 03:53:49 -07:00
|
|
|
tcase_add_test(tc, eolian_namespaces);
|
2014-07-14 04:11:48 -07:00
|
|
|
tcase_add_test(tc, eolian_struct);
|
2014-07-15 07:50:58 -07:00
|
|
|
tcase_add_test(tc, eolian_extern);
|
2014-05-01 05:05:33 -07:00
|
|
|
}
|
|
|
|
|