From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- support/dktools/dk4strms.c | 218 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 218 insertions(+) create mode 100644 support/dktools/dk4strms.c (limited to 'support/dktools/dk4strms.c') diff --git a/support/dktools/dk4strms.c b/support/dktools/dk4strms.c new file mode 100644 index 0000000000..a96e3a350c --- /dev/null +++ b/support/dktools/dk4strms.c @@ -0,0 +1,218 @@ +/* + WARNING: This file was generated by dkct. + Changes you make here will be lost if dkct is run again! + You should modify the original source and run dkct on it. + Original source: dk4strms.ctr +*/ + +/* +Copyright (C) 2016-2017, Dirk Krause + +Redistribution and use in source and binary forms, with or without +modification, are permitted provided that the following conditions are met: + +* Redistributions of source code must retain the above copyright notice, + this list of conditions and the following disclaimer. +* Redistributions in binary form must reproduce the above opyright notice, + this list of conditions and the following disclaimer in the documentation + and/or other materials provided with the distribution. +* Neither the name of the author nor the names of contributors may be used + to endorse or promote products derived from this software without specific + prior written permission. + +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS IS'' +AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +ARE DISCLAIMED. +IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY +DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES +(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; +LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND +ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT +(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF +THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +*/ + +/** @file dk4strms.c The dk4strms module. +*/ + + +#line 226 "dk4strms.ctr" + + +#include "dk4conf.h" + +#if DK4_HAVE_STRING_H +#ifndef STRING_H_INCLUDED +#include +#define STRING_H_INCLUDED 1 +#endif +#endif + +#if DK4_HAVE_MATH_H +#ifndef MATH_H_INCLUDED +#include +#define MATH_H_INCLUDED 1 +#endif +#endif + +#include "dk4strms.h" +#include "dk4mao8dbl.h" + + +int +dk4stream_serialize_u32(dk4_stream_t *strm, uint32_t u32, dk4_er_t *erp) +{ + unsigned char buf[8]; + int back = 0; + + if (NULL != strm) { + buf[0] = (unsigned char)( u32 & 0x000000FFUL); + buf[1] = (unsigned char)((u32 >> 8) & 0x000000FFUL); + buf[2] = (unsigned char)((u32 >> 16) & 0x000000FFUL); + buf[3] = (unsigned char)((u32 >> 24) & 0x000000FFUL); + back = dk4stream_write(strm, buf, 4, erp); + } + else { + dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); + } + return back; +} + + + +int +dk4stream_serialize_i32(dk4_stream_t *strm, int32_t i32, dk4_er_t *erp) +{ + return ( dk4stream_serialize_u32(strm, (uint32_t)i32, erp) ); +} + + + +int +dk4stream_serialize_u16(dk4_stream_t *strm, uint16_t u16, dk4_er_t *erp) +{ + unsigned char buf[8]; + int back = 0; + + if (NULL != strm) { + buf[0] = (unsigned char)( u16 & 0x00FFU); + buf[1] = (unsigned char)((u16 >> 8) & 0x00FFU); + back = dk4stream_write(strm, buf, 2, erp); + } + else { + dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); + } + return back; +} + + + +int +dk4stream_serialize_i16(dk4_stream_t *strm, int16_t i16, dk4_er_t *erp) +{ + return ( dk4stream_serialize_u16(strm, (uint16_t)i16, erp) ); +} + + + +int +dk4stream_serialize_u8(dk4_stream_t *strm, uint8_t u8, dk4_er_t *erp) +{ + unsigned char uc; + int back = 0; + + if (NULL != strm) { + uc = (unsigned char)u8; + back = dk4stream_write(strm, &uc, 1, erp); + } + else { + dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); + } + return back; +} + + + +int +dk4stream_serialize_i8(dk4_stream_t *strm, int8_t i8, dk4_er_t *erp) +{ + return ( dk4stream_serialize_u8(strm, (uint8_t)i8, erp) ); +} + + + +int +dk4stream_serialize_string(dk4_stream_t *strm, const char *str, dk4_er_t *erp) +{ + size_t sl = 0; + int back = 0; + + if ((NULL != strm) && (NULL != str)) { + sl = strlen(str); + if (((size_t)0xFFFFU) > sl) { + sl++; + if (0 < dk4stream_serialize_u16(strm, (uint16_t)sl, erp)) { + back = dk4stream_write(strm, str, sl, erp); + } + else { + /* ERROR: Failed to serialize string length already reported */ + } + } + else { + dk4error_set_simple_error_code(erp, DK4_E_BUFFER_TOO_SMALL); + } + } + else { + dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); + } + return back; +} + + + +int +dk4stream_serialize_double(dk4_stream_t *strm,double d,double e,dk4_er_t *erp) +{ + char buf[16*sizeof(double)]; + size_t szbuf = sizeof(buf); + int back = 0; + if (NULL != strm) { + if (fabs(d) < e) { + back = dk4stream_serialize_u16(strm, (uint16_t)0U, erp); + } + else { + if (0 < dk4ma_write_c8_double(buf, szbuf, d, 1, 1, erp)) { + back = dk4stream_serialize_string(strm, buf, erp); + } + else { + /* ##### ERROR: Failed to write double to string */ + } + } + } + else { + dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); + } + return back; +} + + + +int +dk4stream_serialize_double_0(dk4_stream_t *strm, dk4_er_t *erp) +{ + int back = 0; + + if (NULL != strm) { + back = dk4stream_serialize_u16(strm, 0U, erp); + } + else { + dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); + } + return back; +} + + + +/* vim: set ai sw=4 ts=4 : */ + -- cgit v1.2.3