1 /*
2 Copyright (C) 2016-2021, Dirk Krause
3 SPDX-License-Identifier: BSD-3-Clause
4 */
5
6 /*
7 WARNING: This file was generated by the dkct program (see
8 http://dktools.sourceforge.net/ for details).
9 Changes you make here will be lost if dkct is run again!
10 You should modify the original source and run dkct on it.
11 Original source: dk4strms.ctr
12 */
13
14 /** @file dk4strms.c The dk4strms module.
15 */
16
17
18
19 #include "dk4conf.h"
20
21 #if DK4_HAVE_STRING_H
22 #ifndef STRING_H_INCLUDED
23 #include <string.h>
24 #define STRING_H_INCLUDED 1
25 #endif
26 #endif
27
28 #if DK4_HAVE_MATH_H
29 #ifndef MATH_H_INCLUDED
30 #if DK4_ON_WINDOWS
31 #ifndef _USE_MATH_DEFINES
32 #define _USE_MATH_DEFINES 1
33 #endif
34 #endif
35 #include <math.h>
36 #define MATH_H_INCLUDED 1
37 #endif
38 #endif
39
40 #if DK4_HAVE_ASSERT_H
41 #ifndef ASSERT_H_INCLUDED
42 #include <assert.h>
43 #define ASSERT_H_INCLUDED 1
44 #endif
45 #endif
46
47 #include <libdk4c/dk4strms.h>
48 #include <libdk4maio8d/dk4mao8dbl.h>
49
50
51 int
dk4stream_serialize_u32(dk4_stream_t * strm,uint32_t u32,dk4_er_t * erp)52 dk4stream_serialize_u32(dk4_stream_t *strm, uint32_t u32, dk4_er_t *erp)
53 {
54 unsigned char buf[8];
55 int back = 0;
56 #if DK4_USE_ASSERT
57 assert(NULL != strm);
58 #endif
59 if (NULL != strm) {
60 buf[0] = (unsigned char)( u32 & 0x000000FFUL);
61 buf[1] = (unsigned char)((u32 >> 8) & 0x000000FFUL);
62 buf[2] = (unsigned char)((u32 >> 16) & 0x000000FFUL);
63 buf[3] = (unsigned char)((u32 >> 24) & 0x000000FFUL);
64 back = dk4stream_write(strm, buf, 4, erp);
65 }
66 else {
67 dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
68 }
69 return back;
70 }
71
72
73
74 int
dk4stream_serialize_i32(dk4_stream_t * strm,int32_t i32,dk4_er_t * erp)75 dk4stream_serialize_i32(dk4_stream_t *strm, int32_t i32, dk4_er_t *erp)
76 {
77 #if DK4_USE_ASSERT
78 assert(NULL != strm);
79 #endif
80 return ( dk4stream_serialize_u32(strm, (uint32_t)i32, erp) );
81 }
82
83
84
85 int
dk4stream_serialize_u16(dk4_stream_t * strm,uint16_t u16,dk4_er_t * erp)86 dk4stream_serialize_u16(dk4_stream_t *strm, uint16_t u16, dk4_er_t *erp)
87 {
88 unsigned char buf[8];
89 int back = 0;
90 #if DK4_USE_ASSERT
91 assert(NULL != strm);
92 #endif
93 if (NULL != strm) {
94 buf[0] = (unsigned char)( u16 & 0x00FFU);
95 buf[1] = (unsigned char)((u16 >> 8) & 0x00FFU);
96 back = dk4stream_write(strm, buf, 2, erp);
97 }
98 else {
99 dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
100 }
101 return back;
102 }
103
104
105
106 int
dk4stream_serialize_i16(dk4_stream_t * strm,int16_t i16,dk4_er_t * erp)107 dk4stream_serialize_i16(dk4_stream_t *strm, int16_t i16, dk4_er_t *erp)
108 {
109 #if DK4_USE_ASSERT
110 assert(NULL != strm);
111 #endif
112 return ( dk4stream_serialize_u16(strm, (uint16_t)i16, erp) );
113 }
114
115
116
117 int
dk4stream_serialize_u8(dk4_stream_t * strm,uint8_t u8,dk4_er_t * erp)118 dk4stream_serialize_u8(dk4_stream_t *strm, uint8_t u8, dk4_er_t *erp)
119 {
120 unsigned char uc;
121 int back = 0;
122 #if DK4_USE_ASSERT
123 assert(NULL != strm);
124 #endif
125 if (NULL != strm) {
126 uc = (unsigned char)u8;
127 back = dk4stream_write(strm, &uc, 1, erp);
128 }
129 else {
130 dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
131 }
132 return back;
133 }
134
135
136
137 int
dk4stream_serialize_i8(dk4_stream_t * strm,int8_t i8,dk4_er_t * erp)138 dk4stream_serialize_i8(dk4_stream_t *strm, int8_t i8, dk4_er_t *erp)
139 {
140 #if DK4_USE_ASSERT
141 assert(NULL != strm);
142 #endif
143 return ( dk4stream_serialize_u8(strm, (uint8_t)i8, erp) );
144 }
145
146
147
148 int
dk4stream_serialize_string(dk4_stream_t * strm,const char * str,dk4_er_t * erp)149 dk4stream_serialize_string(dk4_stream_t *strm, const char *str, dk4_er_t *erp)
150 {
151 size_t sl = 0;
152 int back = 0;
153 #if DK4_USE_ASSERT
154 assert(NULL != strm);
155 assert(NULL != str);
156 #endif
157 if ((NULL != strm) && (NULL != str)) {
158 sl = strlen(str);
159 if (((size_t)0xFFFFU) > sl) {
160 sl++;
161 if (0 < dk4stream_serialize_u16(strm, (uint16_t)sl, erp)) {
162 back = dk4stream_write(strm, str, sl, erp);
163 }
164 else {
165 /* ERROR: Failed to serialize string length already reported */
166 }
167 }
168 else {
169 dk4error_set_simple_error_code(erp, DK4_E_BUFFER_TOO_SMALL);
170 }
171 }
172 else {
173 dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
174 }
175 return back;
176 }
177
178
179
180 int
dk4stream_serialize_double(dk4_stream_t * strm,double d,double e,dk4_er_t * erp)181 dk4stream_serialize_double(dk4_stream_t *strm,double d,double e,dk4_er_t *erp)
182 {
183 char buf[16*sizeof(double)];
184 size_t szbuf = sizeof(buf);
185 int back = 0;
186 #if DK4_USE_ASSERT
187 assert(NULL != strm);
188 #endif
189 if (NULL != strm) {
190 if (fabs(d) < e) {
191 back = dk4stream_serialize_u16(strm, (uint16_t)0U, erp);
192 }
193 else {
194 if (0 < dk4ma_write_c8_double(buf, szbuf, d, 1, 1, erp)) {
195 back = dk4stream_serialize_string(strm, buf, erp);
196 }
197 else {
198 /* ##### ERROR: Failed to write double to string */
199 }
200 }
201 }
202 else {
203 dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
204 }
205 return back;
206 }
207
208
209
210 int
dk4stream_serialize_double_0(dk4_stream_t * strm,dk4_er_t * erp)211 dk4stream_serialize_double_0(dk4_stream_t *strm, dk4_er_t *erp)
212 {
213 int back = 0;
214
215 #if DK4_USE_ASSERT
216 assert(NULL != strm);
217 #endif
218 if (NULL != strm) {
219 back = dk4stream_serialize_u16(strm, 0U, erp);
220 }
221 else {
222 dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
223 }
224 return back;
225 }
226
227
228
229 /* vim: set ai sw=4 ts=4 : */
230
231