summaryrefslogtreecommitdiff
path: root/support/dktools/dk4serf.c
diff options
context:
space:
mode:
Diffstat (limited to 'support/dktools/dk4serf.c')
-rw-r--r--support/dktools/dk4serf.c312
1 files changed, 0 insertions, 312 deletions
diff --git a/support/dktools/dk4serf.c b/support/dktools/dk4serf.c
deleted file mode 100644
index 4fb856bf74..0000000000
--- a/support/dktools/dk4serf.c
+++ /dev/null
@@ -1,312 +0,0 @@
-/*
-Copyright (C) 2016-2020, Dirk Krause
-SPDX-License-Identifier: BSD-3-Clause
-*/
-
-/*
- WARNING: This file was generated by the dkct program (see
- http://dktools.sourceforge.net/ for details).
- 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: dk4serf.ctr
-*/
-
-/** @file dk4serf.c The dk4serf module.
-*/
-
-
-#line 159 "dk4serf.ctr"
-
-#include "dk4conf.h"
-
-#if DK4_HAVE_ERRNO_H
-#ifndef ERRNO_H_INCLUDED
-#include <errno.h>
-#define ERRNO_H_INCLUDED 1
-#endif
-#endif
-
-#if DK4_HAVE_STRING_H
-#ifndef STRING_H_INCLUDED
-#include <string.h>
-#define STRING_H_INCLUDED 1
-#endif
-#endif
-
-#include "dk4serf.h"
-#include "dk4mem.h"
-#include "dk4mao8dbl.h"
-#include "dk4enc.h"
-#include "dk4maasz.h"
-#include "dk4rec03.h"
-#include "dk4rec05.h"
-#include "dk4rec12.h"
-#include "dk4rec18.h"
-
-#if DK4_HAVE_ASSERT_H
-#ifndef ASSERT_H_INCLUDED
-#include <assert.h>
-#define ASSERT_H_INCLUDED 1
-#endif
-#endif
-
-
-
-#line 194 "dk4serf.ctr"
-
-
-
-int
-dk4serialize_file_uint16_t(FILE *fipo, uint16_t u, dk4_er_t *erp)
-{
- unsigned char uc[4];
- int back = 0;
-
-#if DK4_USE_ASSERT
- assert(NULL != fipo);
-#endif
- if (NULL != fipo) {
- uc[0] = (unsigned char)((u >> 8) & 0x00FFU);
- uc[1] = (unsigned char)(u & 0x00FFU);
- errno = 0;
- if (2 == fwrite(uc, 1, 2, fipo)) {
- back = 1;
- } else {
- dk4error_set_idetails(erp, DK4_E_WRITE_FAILED, errno);
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-
-int
-dk4serialize_file_int16_t(FILE *fipo, int16_t i, dk4_er_t *erp)
-{
- unsigned char uc[4];
- int back = 0;
-
-#if DK4_USE_ASSERT
- assert(NULL != fipo);
-#endif
- if (NULL != fipo) {
- uc[0] = (unsigned char)((((uint16_t)i) >> 8) & 0x00FFU);
- uc[1] = (unsigned char)(((uint16_t)i) & 0x00FFU);
- errno = 0;
- if (2 == fwrite(uc, 1, 2, fipo)) {
- back = 1;
- } else {
- dk4error_set_idetails(erp, DK4_E_WRITE_FAILED, errno);
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-
-int
-dk4serialize_file_uint32_t(FILE *fipo, uint32_t u, dk4_er_t *erp)
-{
- unsigned char uc[4];
- int back = 0;
-
-#if DK4_USE_ASSERT
- assert(NULL != fipo);
-#endif
- if ((NULL != fipo) && (DK4_U32_MAX >= u)) {
- uc[0] = (unsigned char)((u >> 24) & 0x000000FFUL);
- uc[1] = (unsigned char)((u >> 16) & 0x000000FFUL);
- uc[2] = (unsigned char)((u >> 8) & 0x000000FFUL);
- uc[3] = (unsigned char)(u & 0x000000FFUL);
- errno = 0;
- if (4 == fwrite(uc, 1, 4, fipo)) {
- back = 1;
- } else {
- dk4error_set_idetails(erp, DK4_E_WRITE_FAILED, errno);
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-
-int
-dk4serialize_file_int32_t(FILE *fipo, int32_t i, dk4_er_t *erp)
-{
- unsigned char uc[4];
- int back = 0;
-
-#if DK4_USE_ASSERT
- assert(NULL != fipo);
-#endif
- if ((NULL != fipo) && (DK4_I32_MAX >= i) && (DK4_I32_MIN <= i)) {
- uc[0] = (unsigned char)((((uint32_t)i) >> 24) & 0x000000FFUL);
- uc[1] = (unsigned char)((((uint32_t)i) >> 16) & 0x000000FFUL);
- uc[2] = (unsigned char)((((uint32_t)i) >> 8) & 0x000000FFUL);
- uc[3] = (unsigned char)(((uint32_t)i) & 0x000000FFUL);
- errno = 0;
- if (4 == fwrite(uc, 1, 4, fipo)) {
- back = 1;
- } else {
- dk4error_set_idetails(erp, DK4_E_WRITE_FAILED, errno);
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-
-int
-dk4serialize_file_utf8_string(FILE *fipo, const char *str, dk4_er_t *erp)
-{
- dk4_er_t er;
- size_t sz;
- int back = 0;
- uint16_t usz;
-
-#if DK4_USE_ASSERT
- assert(NULL != fipo);
- assert(NULL != str);
-#endif
- if ((NULL != fipo) && (NULL != str)) {
- sz = strlen(str);
- dk4error_init(&er);
- sz = dk4ma_size_t_add(sz, 1, &er);
- if (DK4_E_NONE == er.ec) {
- if (((dk4_um_t)DK4_U16_MAX) >= ((dk4_um_t)sz)) {
- usz = (uint16_t)sz;
- if (0 != dk4serialize_file_uint16_t(fipo, usz, erp)) {
- errno = 0;
- if (fwrite(str, 1, usz, fipo) == usz) {
- back = 1;
- } else {
- dk4error_set_idetails(erp, DK4_E_WRITE_FAILED, errno);
- }
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_MATH_OVERFLOW);
- }
- } else {
- dk4error_copy(erp, &er);
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-
-int
-dk4serialize_file_double(FILE *fipo, double d, dk4_er_t *erp)
-{
-#if 64 > (2 * DK4_DBL_DIGITS)
- char buffer[64];
-#else
- char buffer[2 * DK4_DBL_DIGITS];
-#endif
- int back = 0;
-#if DK4_USE_ASSERT
- assert(NULL != fipo);
-#endif
- if (NULL != fipo) {
- if (0 != dk4ma_write_c8_double(buffer, sizeof(buffer), d, 1, 1, erp)) {
- back = dk4serialize_file_utf8_string(fipo, buffer, erp);
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-
-int
-dk4serialize_file_dk_string(FILE *fipo,const dkChar *str,int de,dk4_er_t *erp)
-{
- char *tmpbuf = NULL;
- size_t szbuf = 0;
- int back = 0;
-#if DK4_USE_ASSERT
- assert(NULL != str);
- assert(NULL != fipo);
-#endif
- if ((NULL != fipo) && (NULL != str)) {
- switch (de) {
-#if DK4_CHAR_SIZE > 1
-#if DK4_CHAR_SIZE > 2
- case DK4_ENCODING_32 : {
- szbuf = dk4recode_size_c32_to_utf8(str, erp);
- if (0 < szbuf) {
- tmpbuf = dk4mem_new(char,szbuf,erp);
- if (NULL != tmpbuf) {
- if (0 != dk4recode_c32_to_utf8(tmpbuf, szbuf, str, erp)) {
- back = dk4serialize_file_utf8_string(fipo, tmpbuf, erp);
- }
- dk4mem_free(tmpbuf);
- }
- }
- } break;
-#else
- case DK4_ENCODING_UTF16 : {
- szbuf = dk4recode_size_utf16_to_utf8(str, erp);
- if (0 < szbuf) {
- tmpbuf = dk4mem_new(char,szbuf,erp);
- if (NULL != tmpbuf) {
- if (0 != dk4recode_utf16_to_utf8(tmpbuf, szbuf, str, erp)) {
- back = dk4serialize_file_utf8_string(fipo, tmpbuf, erp);
- }
- dk4mem_free(tmpbuf);
- }
- }
- } break;
-#endif
-#else
- case DK4_ENCODING_PLAIN : {
- szbuf = dk4recode_size_ascii_to_utf8(str, erp);
- if (0 < szbuf) {
- tmpbuf = dk4mem_new(char,szbuf,erp);
- if (NULL != tmpbuf) {
- if (0 != dk4recode_ascii_to_utf8(tmpbuf, szbuf, str, erp)) {
- back = dk4serialize_file_utf8_string(fipo, tmpbuf, erp);
- }
- dk4mem_free(tmpbuf);
- }
- }
- } break;
- case DK4_ENCODING_WIN1252 : {
- szbuf = dk4recode_size_ansi_to_utf8(str, erp);
- if (0 < szbuf) {
- tmpbuf = dk4mem_new(char,szbuf,erp);
- if (NULL != tmpbuf) {
- if (0 != dk4recode_ansi_to_utf8(tmpbuf, szbuf, str, erp)) {
- back = dk4serialize_file_utf8_string(fipo, tmpbuf, erp);
- }
- dk4mem_free(tmpbuf);
- }
- }
- } break;
- case DK4_ENCODING_UTF8 : {
- back = dk4serialize_file_utf8_string(fipo, str, erp);
- } break;
-#endif
- default : {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- } break;
- }
- } else {
- dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
- }
- return back;
-}
-
-
-