types/sequence.c

   1 /*
   2  * sequence.c
   3  *
   4  * BabelTrace - Sequence Type Converter
   5  *
   6  * Copyright 2010 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
   7  *
   8  * Permission is hereby granted, free of charge, to any person obtaining a copy
   9  * of this software and associated documentation files (the "Software"), to deal
  10  * in the Software without restriction, including without limitation the rights
  11  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  12  * copies of the Software, and to permit persons to whom the Software is
  13  * furnished to do so, subject to the following conditions:
  14  *
  15  * The above copyright notice and this permission notice shall be included in
  16  * all copies or substantial portions of the Software.
  17  */
  18
  19 #include <babeltrace/compiler.h>
  20 #include <babeltrace/format.h>
  21
  22 #ifndef max
  23 #define max(a, b)       ((a) < (b) ? (b) : (a))
  24 #endif
  25
  26 void sequence_copy(struct stream_pos *dest, const struct format *fdest,
  27                    struct stream_pos *src, const struct format *fsrc,
  28                    const struct type_class *type_class)
  29 {
  30         struct type_class_sequence *sequence_class =
  31                 container_of(type_class, struct type_class_sequence, p);
  32         unsigned int i;
  33         size_t len;
  34
  35         fsrc->sequence_begin(src, sequence_class);
  36         fdest->sequence_begin(dest, sequence_class);
  37
  38         len = fsrc->uint_read(src, sequence_class->len_class);
  39         fdest->uint_write(dest, sequence_class->len_class, len);
  40
  41         for (i = 0; i < len; i++) {
  42                 struct type_class *elem_class = sequence_class->elem;
  43                 elem_class->copy(dest, fdest, src, fsrc, elem_class);
  44         }
  45         fsrc->sequence_end(src, sequence_class);
  46         fdest->sequence_end(dest, sequence_class);
  47 }
  48
  49 void sequence_type_free(struct type_class_sequence *sequence_class)
  50 {
  51         sequence_class->elem->free(sequence_class->elem);
  52         type_unref(&sequence_class->len_class->p);
  53         type_unref(sequence_class->elem);
  54         g_free(sequence_class);
  55 }
  56
  57 static void _sequence_type_free(struct type_class *type_class)
  58 {
  59         struct type_class_sequence *sequence_class =
  60                 container_of(type_class, struct type_class_sequence, p);
  61         sequence_type_free(sequence_class);
  62 }
  63
  64 struct type_class_sequence *
  65 sequence_type_new(const char *name, struct type_class_integer *len_class,
  66                   struct type_class *elem)
  67 {
  68         struct type_class_sequence *sequence_class;
  69         struct type_class *type_class;
  70         int ret;
  71
  72         sequence_class = g_new(struct type_class_sequence, 1);
  73         type_class = &sequence_class->p;
  74
  75         assert(!len_class->signedness);
  76
  77         type_ref(&len_class->p);
  78         sequence_class->len_class = len_class;
  79         type_ref(elem);
  80         sequence_class->elem = elem;
  81         type_class->name = g_quark_from_string(name);
  82         type_class->alignment = max(len_class->p.alignment,
  83                                     elem->alignment);
  84         type_class->copy = sequence_copy;
  85         type_class->free = _sequence_type_free;
  86         type_class->ref = 1;
  87
  88         if (type_class->name) {
  89                 ret = register_type(type_class);
  90                 if (ret)
  91                         goto error_register;
  92         }
  93         return sequence_class;
  94
  95 error_register:
  96         type_unref(&len_class->p);
  97         type_unref(elem);
  98         g_free(sequence_class);
  99         return NULL;
 100 }