/* Copyright (C) 2015-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: dk4rec11.ctr */ /** @file dk4rec11.c The dk4rec11 module. */ #line 88 "dk4rec11.ctr" #include "dk4conf.h" #include "dk4rec11.h" #include "dk4mem.h" #include "dk4utf8.h" #include "dk4utf16.h" #if DK4_HAVE_ASSERT_H #ifndef ASSERT_H_INCLUDED #include #define ASSERT_H_INCLUDED 1 #endif #endif #line 104 "dk4rec11.ctr" size_t dk4recode_size_utf8_to_utf16(const char *src, dk4_er_t *erp) { dk4_er_t er; dk4_utf8_decoder_t dec; dk4_c16_t c16[4]; size_t rdb = 0; size_t back = 0; size_t sz; dk4_c32_t c32; #if DK4_USE_ASSERT assert(NULL != src); #endif if (NULL != src) { /* Initialize data structures. */ dk4error_init(&er); dk4utf8_init(&dec); /* Process source string. */ while ('\0' != *src) { rdb++; switch(dk4utf8_add(&dec, (unsigned char)(*(src++)))) { case DK4_EDSTM_FINISHED: { c32 = dk4utf8_get(&dec); dk4utf8_init(&dec); sz = DK4_SIZEOF(c16,dk4_c16_t); if (0 != dk4utf16_encode(c16, &sz, c32, &er)) { if ((SIZE_MAX - sz) >= back) { back += sz; } else { dk4error_set_simple_error_code(&er, DK4_E_MATH_OVERFLOW); } } else { dk4error_set_elsize_nelem(&er, DK4_E_SYNTAX, 1, rdb); } } break; case DK4_EDSTM_ERROR: { dk4error_set_elsize_nelem(&er, DK4_E_SYNTAX, 1, rdb); } break; } } if (0 == dk4utf8_is_empty(&dec)) { dk4error_set_elsize_nelem(&er, DK4_E_SYNTAX, 1, rdb); } /* Add one for the finalizer. */ if (SIZE_MAX == back) { dk4error_set_simple_error_code(&er, DK4_E_MATH_OVERFLOW); } else { back++; } /* On error return 0 and pass error code. */ if (DK4_E_NONE != er.ec) { back = 0; dk4error_copy(erp, &er); } } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; } int dk4recode_utf8_to_utf16( dk4_c16_t *dstb, size_t szdstb, const char *src, dk4_er_t *erp ) { dk4_c16_t buf[8]; dk4_utf8_decoder_t dec; size_t sz; size_t used = 0; size_t rdb = 0; dk4_c32_t c32 = dkC32(0); int back = 0; #if DK4_USE_ASSERT assert(NULL != dstb); assert(0 < szdstb); assert(NULL != src); #endif if ((NULL != dstb) && (NULL != src) && (0 < szdstb)) { back = 1; dk4utf8_init(&dec); while(('\0' != *src) && (1 == back) && (used < szdstb)) { switch(dk4utf8_add(&dec, (unsigned char)(*(src++)))) { case DK4_EDSTM_FINISHED: { c32 = dk4utf8_get(&dec); dk4utf8_init(&dec); sz = DK4_SIZEOF(buf,dk4_c16_t); if (0 != dk4utf16_encode(buf, &sz, c32, erp)) { if ((szdstb - used) > sz) { DK4_MEMCPY(&(dstb[used]),buf,(2 * sz)); used += sz; } else { back = 0; dk4error_set_simple_error_code(erp, DK4_E_BUFFER_TOO_SMALL); } } else { back = 0; dk4error_set_elsize_nelem(erp, DK4_E_SYNTAX, 1, rdb); } } break; case DK4_EDSTM_ERROR: { back = 0; dk4error_set_elsize_nelem(erp, DK4_E_SYNTAX, 1, rdb); } break; } if(back) { rdb++; } } if (used < szdstb) { dstb[used] = (dk4_c16_t)0U; } else { dstb[szdstb - 1] = (dk4_c16_t)0U; back = 0; dk4error_set_simple_error_code(erp, DK4_E_BUFFER_TOO_SMALL); } if (0 == dk4utf8_is_empty(&dec)) { back = 0; dk4error_set_elsize_nelem(erp, DK4_E_SYNTAX, 1, rdb); } } else { dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS); } return back; }