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 };
  85
  86 /**
  87  * Create a data object
  88  *
  89  * @param string the string to create, must be an utf8 string
  90  *
  91  * @return string object
  92  */
  93
  94 heim_data_t
  95 heim_data_create(const void *data, size_t length)
  96 {
  97     heim_octet_string *os;
  98
  99     os = _heim_alloc_object(&_heim_data_object, sizeof(*os) + length);
 100     if (os) {
 101         os->data = (uint8_t *)os + sizeof(*os);
 102         os->length = length;
 103         memcpy(os->data, data, length);
 104     }
 105     return (heim_data_t)os;
 106 }
 107
 108 heim_data_t
 109 heim_data_ref_create(const void *data, size_t length,
 110                      heim_data_free_f_t dealloc)
 111 {
 112     heim_octet_string *os;
 113     heim_data_free_f_t *deallocp;
 114
 115     os = _heim_alloc_object(&_heim_data_object, sizeof(*os) + length);
 116     if (os) {
 117         os->data = (void *)data;
 118         os->length = length;
 119         deallocp = _heim_get_isaextra(os, 0);
 120         *deallocp = dealloc;
 121     }
 122     return (heim_data_t)os;
 123 }
 124
 125
 126 /**
 127  * Return the type ID of data objects
 128  *
 129  * @return type id of data objects
 130  */
 131
 132 heim_tid_t
 133 heim_data_get_type_id(void)
 134 {
 135     return HEIM_TID_DATA;
 136 }
 137
 138 /**
 139  * Get the data value of the content.
 140  *
 141  * @param data the data object to get the value from
 142  *
 143  * @return a heim_octet_string
 144  */
 145
 146 const heim_octet_string *
 147 heim_data_get_data(heim_data_t data)
 148 {
 149     /* Note that this works for data and data_ref objects */
 150     return (const heim_octet_string *)data;
 151 }
 152
 153 const void *
 154 heim_data_get_ptr(heim_data_t data)
 155 {
 156     /* Note that this works for data and data_ref objects */
 157     return ((const heim_octet_string *)data)->data;
 158 }
 159
 160 size_t  heim_data_get_length(heim_data_t data)
 161 {
 162     /* Note that this works for data and data_ref objects */
 163     return ((const heim_octet_string *)data)->length;
 164 }