Commit | Line | Data |
---|---|---|
0a46062b MD |
1 | /* |
2 | * BabelTrace - Float 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> | |
448d3cc7 | 22 | #include <babeltrace/types.h> |
0a46062b | 23 | |
bed864a7 MD |
24 | void float_copy(struct stream_pos *dest, const struct format *fdest, |
25 | struct stream_pos *src, const struct format *fsrc, | |
26 | const struct type_class *type_class) | |
0a46062b MD |
27 | { |
28 | struct type_class_float *float_class = | |
29 | container_of(type_class, struct type_class_float, p); | |
30 | ||
31 | if (fsrc->float_copy == fdest->float_copy) { | |
11d43b90 | 32 | fsrc->float_copy(dest, src, float_class); |
0a46062b MD |
33 | } else { |
34 | double v; | |
35 | ||
11d43b90 MD |
36 | v = fsrc->double_read(src, float_class); |
37 | fdest->double_write(dest, float_class, v); | |
0a46062b MD |
38 | } |
39 | } | |
40 | ||
90b676d7 MD |
41 | void float_type_free(struct type_class_float *float_class) |
42 | { | |
d06d03db MD |
43 | integer_type_free(float_class->exp); |
44 | integer_type_free(float_class->mantissa); | |
45 | integer_type_free(float_class->sign); | |
90b676d7 MD |
46 | g_free(float_class); |
47 | } | |
48 | ||
49 | static void _float_type_free(struct type_class *type_class) | |
50 | { | |
51 | struct type_class_float *float_class = | |
52 | container_of(type_class, struct type_class_float, p); | |
53 | float_type_free(float_class); | |
54 | } | |
55 | ||
0a46062b MD |
56 | struct type_class_float *float_type_new(const char *name, |
57 | size_t mantissa_len, | |
58 | size_t exp_len, int byte_order, | |
59 | size_t alignment) | |
60 | { | |
61 | struct type_class_float *float_class; | |
bed864a7 MD |
62 | struct type_class_integer *int_class; |
63 | struct type_class *type_class; | |
0a46062b MD |
64 | int ret; |
65 | ||
0a46062b | 66 | float_class = g_new(struct type_class_float, 1); |
bed864a7 MD |
67 | type_class = &float_class->p; |
68 | ||
69 | type_class->name = g_quark_from_string(name); | |
70 | type_class->alignment = alignment; | |
71 | type_class->copy = float_copy; | |
72 | type_class->free = _float_type_free; | |
0a46062b | 73 | float_class->byte_order = byte_order; |
bed864a7 | 74 | |
7fe00194 MD |
75 | float_class->sign = integer_type_new(NULL, 1, |
76 | byte_order, false, 1); | |
11d43b90 MD |
77 | if (!float_class->mantissa) |
78 | goto error_sign; | |
7fe00194 MD |
79 | float_class->mantissa = integer_type_new(NULL, mantissa_len - 1, |
80 | byte_order, false, 1); | |
bed864a7 MD |
81 | if (!float_class->mantissa) |
82 | goto error_mantissa; | |
7fe00194 MD |
83 | float_class->exp = integer_type_new(NULL, exp_len, |
84 | byte_order, true, 1); | |
bed864a7 MD |
85 | if (!float_class->exp) |
86 | goto error_exp; | |
87 | ||
0a46062b MD |
88 | if (float_class->p.name) { |
89 | ret = ctf_register_type(&float_class->p); | |
bed864a7 MD |
90 | if (ret) |
91 | goto error_register; | |
0a46062b MD |
92 | } |
93 | return float_class; | |
bed864a7 MD |
94 | |
95 | error_register: | |
7fe00194 | 96 | integer_type_free(float_class->exp); |
bed864a7 | 97 | error_exp: |
7fe00194 | 98 | integer_type_free(float_class->mantissa); |
bed864a7 | 99 | error_mantissa: |
7fe00194 | 100 | integer_type_free(float_class->sign); |
11d43b90 | 101 | error_sign: |
bed864a7 MD |
102 | g_free(float_class); |
103 | return NULL; | |
0a46062b | 104 | } |