lib/base/data.c

   1 /*
   2  * Copyright (c) 2011 Kungliga Tekniska Högskolan
   3  * (Royal Institute of Technology, Stockholm, Sweden).
   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  *
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  *
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * 3. Neither the name of the Institute nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #include "baselocl.h"
  35 #include <string.h>
  36
  37 static void
  38 data_dealloc(void *ptr)
  39 {
  40     heim_data_t d = ptr;
  41     heim_octet_string *os = (heim_octet_string *)d;
  42     heim_data_free_f_t *deallocp;
  43     heim_data_free_f_t dealloc;
  44
  45     if (os->data == NULL)
  46         return;
  47
  48     /* Possible string ref */
  49     deallocp = _heim_get_isaextra(os, 0);
  50     dealloc = *deallocp;
  51     if (dealloc != NULL)
  52         dealloc(os->data);
  53 }
  54
  55 static int
  56 data_cmp(void *a, void *b)
  57 {
  58     heim_octet_string *osa = a, *osb = b;
  59     if (osa->length != osb->length)
  60         return osa->length - osb->length;
  61     return memcmp(osa->data, osb->data, osa->length);
  62 }
  63
  64 static unsigned long
  65 data_hash(void *ptr)
  66 {
  67     heim_octet_string *os = ptr;
  68     const unsigned char *s = os->data;
  69
  70     if (os->length < 4)
  71         return os->length;
  72     return s[0] | (s[1] << 8) |
  73         (s[os->length - 2] << 16) | (s[os->length - 1] << 24);
  74 }
  75
  76 struct heim_type_data _heim_data_object = {
  77     HEIM_TID_DATA,
  78     "data-object",
  79     NULL,
  80     data_dealloc,
  81     NULL,
  82     data_cmp,
  83     data_hash,
  84     NULL
  85 };
  86
  87 /**
  88  * Create a data object
  89  *
  90  * @param string the string to create, must be an utf8 string
  91  *
  92  * @return string object
  93  */
  94
  95 heim_data_t
  96 heim_data_create(const void *data, size_t length)
  97 {
  98     heim_octet_string *os;
  99
 100     os = _heim_alloc_object(&_heim_data_object, sizeof(*os) + length);
 101     if (os) {
 102         os->data = (uint8_t *)os + sizeof(*os);
 103         os->length = length;
 104         memcpy(os->data, data, length);
 105     }
 106     return (heim_data_t)os;
 107 }
 108
 109 heim_data_t
 110 heim_data_ref_create(const void *data, size_t length,
 111                      heim_data_free_f_t dealloc)
 112 {
 113     heim_octet_string *os;
 114     heim_data_free_f_t *deallocp;
 115
 116     os = _heim_alloc_object(&_heim_data_object, sizeof(*os) + length);
 117     if (os) {
 118         os->data = (void *)data;
 119         os->length = length;
 120         deallocp = _heim_get_isaextra(os, 0);
 121         *deallocp = dealloc;
 122     }
 123     return (heim_data_t)os;
 124 }
 125
 126
 127 /**
 128  * Return the type ID of data objects
 129  *
 130  * @return type id of data objects
 131  */
 132
 133 heim_tid_t
 134 heim_data_get_type_id(void)
 135 {
 136     return HEIM_TID_DATA;
 137 }
 138
 139 /**
 140  * Get the data value of the content.
 141  *
 142  * @param data the data object to get the value from
 143  *
 144  * @return a heim_octet_string
 145  */
 146
 147 const heim_octet_string *
 148 heim_data_get_data(heim_data_t data)
 149 {
 150     /* Note that this works for data and data_ref objects */
 151     return (const heim_octet_string *)data;
 152 }
 153
 154 const void *
 155 heim_data_get_ptr(heim_data_t data)
 156 {
 157     /* Note that this works for data and data_ref objects */
 158     return ((const heim_octet_string *)data)->data;
 159 }
 160
 161 size_t  heim_data_get_length(heim_data_t data)
 162 {
 163     /* Note that this works for data and data_ref objects */
 164     return ((const heim_octet_string *)data)->length;
 165 }