src/core/object.c

   1 /*
   2  * SysDB - src/core/object.c
   3  * Copyright (C) 2012 Sebastian 'tokkee' Harl <sh@tokkee.org>
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  16  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  17  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  18  * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
  19  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  20  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  21  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  22  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  23  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  24  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  25  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 #include "core/object.h"
  29
  30 #include <assert.h>
  31
  32 #include <stdlib.h>
  33 #include <string.h>
  34
  35 /*
  36  * private types
  37  */
  38
  39 static int
  40 sdb_object_wrapper_init(sdb_object_t *obj, va_list ap)
  41 {
  42         void *data = va_arg(ap, void *);
  43         void (*destructor)(void *) = va_arg(ap, void (*)(void *));
  44
  45         assert(obj);
  46
  47         SDB_OBJ_WRAPPER(obj)->data = data;
  48         SDB_OBJ_WRAPPER(obj)->destructor = destructor;
  49         return 0;
  50 } /* sdb_object_wrapper_init */
  51
  52 static void
  53 sdb_object_wrapper_destroy(sdb_object_t *obj)
  54 {
  55         if (! obj)
  56                 return;
  57
  58         assert(obj->ref_cnt <= 0);
  59
  60         if (SDB_OBJ_WRAPPER(obj)->destructor && SDB_OBJ_WRAPPER(obj)->data)
  61                 SDB_OBJ_WRAPPER(obj)->destructor(SDB_OBJ_WRAPPER(obj)->data);
  62         SDB_OBJ_WRAPPER(obj)->data = NULL;
  63 } /* sdb_object_wrapper_destroy */
  64
  65 static sdb_type_t sdb_object_wrapper_type = {
  66         sizeof(sdb_object_wrapper_t),
  67
  68         sdb_object_wrapper_init,
  69         sdb_object_wrapper_destroy,
  70         /* clone = */ NULL
  71 };
  72
  73 /*
  74  * public API
  75  */
  76
  77 sdb_object_t *
  78 sdb_object_create(const char *name, sdb_type_t type, ...)
  79 {
  80         sdb_object_t *obj;
  81
  82         if (type.size <= sizeof(sdb_object_t))
  83                 return NULL;
  84
  85         obj = malloc(type.size);
  86         if (! obj)
  87                 return NULL;
  88         memset(obj, 0, type.size);
  89
  90         if (name) {
  91                 obj->name = strdup(name);
  92                 if (! obj->name) {
  93                         obj->ref_cnt = 1;
  94                         sdb_object_deref(obj);
  95                         return NULL;
  96                 }
  97         }
  98
  99         if (type.init) {
 100                 va_list ap;
 101                 va_start(ap, type);
 102
 103                 if (type.init(obj, ap)) {
 104                         obj->ref_cnt = 1;
 105                         sdb_object_deref(obj);
 106                         va_end(ap);
 107                         return NULL;
 108                 }
 109
 110                 va_end(ap);
 111         }
 112
 113         obj->type = type;
 114         obj->ref_cnt = 1;
 115         return obj;
 116 } /* sdb_object_create */
 117
 118 sdb_object_t *
 119 sdb_object_create_wrapper(const char *name,
 120                 void *data, void (*destructor)(void *))
 121 {
 122         return sdb_object_create(name, sdb_object_wrapper_type, data, destructor);
 123 } /* sdb_object_create_wrapper */
 124
 125 void
 126 sdb_object_deref(sdb_object_t *obj)
 127 {
 128         if (! obj)
 129                 return;
 130
 131         --obj->ref_cnt;
 132         if (obj->ref_cnt > 0)
 133                 return;
 134
 135         if (obj->type.destroy)
 136                 obj->type.destroy(obj);
 137
 138         if (obj->name)
 139                 free(obj->name);
 140         free(obj);
 141 } /* sdb_object_deref */
 142
 143 void
 144 sdb_object_ref(sdb_object_t *obj)
 145 {
 146         if (! obj)
 147                 return;
 148         assert(obj->ref_cnt > 0);
 149         ++obj->ref_cnt;
 150 } /* sdb_object_ref */
 151
 152 sdb_object_t *
 153 sdb_object_clone(const sdb_object_t *obj)
 154 {
 155         if ((! obj) || (! obj->type.clone))
 156                 return NULL;
 157         return obj->type.clone(obj);
 158 } /* sdb_object_clone */
 159
 160 int
 161 sdb_object_cmp_by_name(const sdb_object_t *o1, const sdb_object_t *o2)
 162 {
 163         if ((! o1) && (! o2))
 164                 return 0;
 165         else if (! o1)
 166                 return -1;
 167         else if (! o2)
 168                 return 1;
 169
 170         return strcasecmp(o1->name, o2->name);
 171 } /* sdb_object_cmp_by_name */
 172
 173 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */
 174