types/float.c

   1 /*
   2  * float.c
   3  *
   4  * BabelTrace - Float Type Converter
   5  *
   6  * Copyright 2010, 2011 - 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 static
  23 struct declaration *_float_declaration_new(struct type *type,
  24                                    struct declaration_scope *parent_scope);
  25 static
  26 void _float_declaration_free(struct declaration *declaration);
  27
  28 void float_copy(struct stream_pos *destp,
  29                 const struct format *fdest,
  30                 struct stream_pos *srcp,
  31                 const struct format *fsrc,
  32                 struct declaration *declaration)
  33 {
  34         struct declaration_float *_float =
  35                 container_of(declaration, struct declaration_float, p);
  36         struct type_float *float_type = _float->type;
  37
  38         if (fsrc->float_copy == fdest->float_copy) {
  39                 fsrc->float_copy(destp, srcp, float_type);
  40         } else {
  41                 double v;
  42
  43                 v = fsrc->double_read(srcp, float_type);
  44                 fdest->double_write(destp, float_type, v);
  45         }
  46 }
  47
  48 static
  49 void _float_type_free(struct type *type)
  50 {
  51         struct type_float *float_type =
  52                 container_of(type, struct type_float, p);
  53
  54         type_unref(&float_type->exp->p);
  55         type_unref(&float_type->mantissa->p);
  56         type_unref(&float_type->sign->p);
  57         g_free(float_type);
  58 }
  59
  60 struct type_float *
  61         float_type_new(const char *name, size_t mantissa_len,
  62                        size_t exp_len, int byte_order, size_t alignment)
  63 {
  64         struct type_float *float_type;
  65         struct type *type;
  66
  67         float_type = g_new(struct type_float, 1);
  68         type = &float_type->p;
  69         type->id = CTF_TYPE_FLOAT;
  70         type->name = g_quark_from_string(name);
  71         type->alignment = alignment;
  72         type->copy = float_copy;
  73         type->type_free = _float_type_free;
  74         type->declaration_new = _float_declaration_new;
  75         type->declaration_free = _float_declaration_free;
  76         type->ref = 1;
  77         float_type->byte_order = byte_order;
  78
  79         float_type->sign = integer_type_new(NULL, 1,
  80                                             byte_order, false, 1);
  81         float_type->mantissa = integer_type_new(NULL, mantissa_len - 1,
  82                                                 byte_order, false, 1);
  83         float_type->exp = integer_type_new(NULL, exp_len,
  84                                            byte_order, true, 1);
  85         return float_type;
  86 }
  87
  88 static
  89 struct declaration *
  90         _float_declaration_new(struct type *type,
  91                                struct declaration_scope *parent_scope)
  92 {
  93         struct type_float *float_type =
  94                 container_of(type, struct type_float, p);
  95         struct declaration_float *_float;
  96
  97         _float = g_new(struct declaration_float, 1);
  98         type_ref(&float_type->p);
  99         _float->p.type= type;
 100         _float->type= float_type;
 101         _float->p.ref = 1;
 102         _float->value = 0.0;
 103         return &_float->p;
 104 }
 105
 106 static
 107 void _float_declaration_free(struct declaration *declaration)
 108 {
 109         struct declaration_float *_float =
 110                 container_of(declaration, struct declaration_float, p);
 111
 112         type_unref(_float->p.type);
 113         g_free(_float);
 114 }