examples/mixin/simple.c

   1 #include "Eobj.h"
   2 #include "mixin.h"
   3 #include "mixin2.h"
   4 #include "simple.h"
   5
   6 #include "config.h"
   7
   8 EAPI Eobj_Op SIMPLE_BASE_ID = 0;
   9
  10 typedef struct
  11 {
  12    int a;
  13    int b;
  14 } Private_Data;
  15
  16 static const Eobj_Class *_my_class = NULL;
  17
  18 #define _GET_SET_FUNC(name) \
  19 static void \
  20 _##name##_get(Eobj *obj __UNUSED__, void *class_data, va_list *list) \
  21 { \
  22    Private_Data *pd = class_data; \
  23    int *name; \
  24    name = va_arg(*list, int *); \
  25    *name = pd->name; \
  26    printf("%s %d\n", __func__, pd->name); \
  27 } \
  28 static void \
  29 _##name##_set(Eobj *obj __UNUSED__, void *class_data, va_list *list) \
  30 { \
  31    Private_Data *pd = class_data; \
  32    int name; \
  33    name = va_arg(*list, int); \
  34    pd->name = name; \
  35    printf("%s %d\n", __func__, pd->name); \
  36 }
  37
  38 _GET_SET_FUNC(a)
  39 _GET_SET_FUNC(b)
  40
  41 static void
  42 _class_constructor(Eobj_Class *klass)
  43 {
  44    const Eobj_Op_Func_Description func_desc[] = {
  45         EOBJ_OP_FUNC(SIMPLE_ID(SIMPLE_SUB_ID_A_SET), _a_set),
  46         EOBJ_OP_FUNC(SIMPLE_ID(SIMPLE_SUB_ID_A_GET), _a_get),
  47         EOBJ_OP_FUNC(SIMPLE_ID(SIMPLE_SUB_ID_B_SET), _b_set),
  48         EOBJ_OP_FUNC(SIMPLE_ID(SIMPLE_SUB_ID_B_GET), _b_get),
  49         EOBJ_OP_FUNC_SENTINEL
  50    };
  51
  52    eobj_class_funcs_set(klass, func_desc);
  53 }
  54
  55 const Eobj_Class *
  56 simple_class_get(void)
  57 {
  58    if (_my_class) return _my_class;
  59
  60    static const Eobj_Op_Description op_desc[] = {
  61         EOBJ_OP_DESCRIPTION(SIMPLE_SUB_ID_A_SET, "i", "Set property A"),
  62         EOBJ_OP_DESCRIPTION(SIMPLE_SUB_ID_A_GET, "i", "Get property A"),
  63         EOBJ_OP_DESCRIPTION(SIMPLE_SUB_ID_B_SET, "i", "Set property B"),
  64         EOBJ_OP_DESCRIPTION(SIMPLE_SUB_ID_B_GET, "i", "Get property B"),
  65         EOBJ_OP_DESCRIPTION_SENTINEL
  66    };
  67
  68    static const Eobj_Class_Description class_desc = {
  69         "Simple",
  70         EOBJ_CLASS_TYPE_REGULAR,
  71         EOBJ_CLASS_DESCRIPTION_OPS(&SIMPLE_BASE_ID, op_desc, SIMPLE_SUB_ID_LAST),
  72         NULL,
  73         sizeof(Private_Data),
  74         NULL,
  75         NULL,
  76         _class_constructor,
  77         NULL
  78    };
  79
  80    return _my_class = eobj_class_new(&class_desc, EOBJ_BASE_CLASS, MIXIN2_CLASS, NULL);
  81 }