types/integer.c

   1 /*
   2  * BabelTrace - Integer Type Converter
   3  *
   4  * Copyright (c) 2010 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  19  */
  20
  21 #include <babeltrace/compiler.h>
  22 #include <babeltrace/align.h>
  23 #include <babeltrace/types.h>
  24 #include <stdint.h>
  25
  26 size_t integer_copy(unsigned char *dest, const struct format *fdest,
  27                     const unsigned char *src, const struct format *fsrc,
  28                     const struct type_class *type_class)
  29 {
  30         struct type_class_integer *int_class =
  31                 container_of(type_class, struct type_class_integer, p);
  32
  33         if (fsrc->p.alignment)
  34                 src = PTR_ALIGN(src, fsrc->p.alignment / CHAR_BIT);
  35         if (fdest->p.alignment)
  36                 dest = PTR_ALIGN(dest, fdest->p.alignment / CHAR_BIT);
  37
  38         if (!int_class->signedness) {
  39                 uint64_t v;
  40
  41                 v = fsrc->uint_read(src, int_class->len, int_class->byte_order);
  42                 return fdest->uint_write(dest, int_class->len, int_class->byte_order, v);
  43         } else {
  44                 int64_t v;
  45
  46                 v = fsrc->int_read(src, int_class->len, int_class->byte_order);
  47                 return fdest->int_write(dest, int_class->len, int_class->byte_order, v);
  48         }
  49 }
  50
  51 void integer_type_free(struct type_class_integer *int_class)
  52 {
  53         g_free(int_class);
  54 }
  55
  56 static void _integer_type_free(struct type_class *type_class)
  57 {
  58         struct type_class_integer *int_class =
  59                 container_of(type_class, struct type_class_integer, p);
  60         integer_type_free(int_class);
  61 }
  62
  63 struct type_class_integer *integer_type_new(const char *name,
  64                                             size_t start_offset,
  65                                             size_t len, int byte_order,
  66                                             int signedness,
  67                                             size_t alignment)
  68 {
  69         struct type_class_integer *int_class;
  70         int ret;
  71
  72         int_class = g_new(struct type_class_integer, 1);
  73         int_class->p.name = g_quark_from_string(name);
  74         int_class->p.alignment = alignment;
  75         int_class->p.copy = integer_copy;
  76         int_class->p.free = _integer_type_free;
  77         int_class->len = len;
  78         int_class->byte_order = byte_order;
  79         int_class->signedness = signedness;
  80         if (int_class->p.name) {
  81                 ret = ctf_register_type(&int_class.p);
  82                 if (ret) {
  83                         g_free(int_class);
  84                         return NULL;
  85                 }
  86         }
  87         return int_class;
  88 }