summaryrefslogtreecommitdiff
path: root/support/dktools/dk4rec05.c
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /support/dktools/dk4rec05.c
Initial commit
Diffstat (limited to 'support/dktools/dk4rec05.c')
-rw-r--r--support/dktools/dk4rec05.c142
1 files changed, 142 insertions, 0 deletions
diff --git a/support/dktools/dk4rec05.c b/support/dktools/dk4rec05.c
new file mode 100644
index 0000000000..0788feedd6
--- /dev/null
+++ b/support/dktools/dk4rec05.c
@@ -0,0 +1,142 @@
+/*
+ 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: dk4rec05.ctr
+*/
+
+/*
+Copyright (C) 2015-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 dk4rec05.c The dk4rec05 module.
+*/
+
+
+#line 76 "dk4rec05.ctr"
+
+#include "dk4rec05.h"
+#include "dk4mem.h"
+#include "dk4ansi.h"
+#include "dk4utf8.h"
+
+
+
+size_t
+dk4recode_size_ansi_to_utf8(const char *src, dk4_er_t *erp)
+{
+ dk4_er_t er; /* Internal error report */
+ unsigned char buf[8]; /* Current character UTF-8 encoded */
+ size_t rdb = 0; /* Number of bytes read from input */
+ size_t back = 0; /* Function result */
+ size_t sz; /* Size of UTF-8 encoded current character */
+ dk4_c32_t c32; /* Current 32 bit character */
+ unsigned char uc; /* Current source character */
+
+ if (NULL != src) {
+ dk4error_init(&er);
+ while ('\0' != *src) {
+ uc = (unsigned char)(*(src++));
+ rdb++;
+ if (0 != dk4ansi_decode(&c32, uc)) {
+ sz = sizeof(buf);
+ if (0 != dk4utf8_encode(buf, &sz, c32, &er)) {
+ if ((SIZE_MAX - sz) < back) {
+ dk4error_set_simple_error_code(erp, DK4_E_MATH_OVERFLOW);
+ }
+ back += sz;
+ } else {
+ dk4error_set_elsize_nelem(&er, DK4_E_SYNTAX, 1, rdb);
+ }
+ } else {
+ dk4error_set_elsize_nelem(&er, DK4_E_SYNTAX, 1, rdb);
+ }
+ }
+ if (SIZE_MAX == back) {
+ dk4error_set_simple_error_code(erp, DK4_E_MATH_OVERFLOW);
+ }
+ back++;
+ 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_ansi_to_utf8(
+ char *dstb, size_t szdstb, const char *src, dk4_er_t *erp
+)
+{
+ unsigned char buf[8];
+ size_t sz;
+ size_t used = 0;
+ size_t rdb = 0;
+ dk4_c32_t c32 = dkC32(0);
+ int back = 0;
+
+ if ((NULL != dstb) && (NULL != src) && (0 < szdstb)) {
+ back = 1;
+ while (('\0' != *src) && (1 == back) && (used < szdstb)) {
+ if (0 != dk4ansi_decode(&c32, (unsigned char)(*(src++)))) {
+ sz = sizeof(buf);
+ if (0 != dk4utf8_encode(buf, &sz, c32, erp)) {
+ if ((szdstb - used) > sz) {
+ DK4_MEMCPY(&(dstb[used]),buf,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);
+ }
+ } else {
+ back = 0;
+ dk4error_set_elsize_nelem(erp, DK4_E_SYNTAX, 1, rdb);
+ }
+ if (0 != back) { rdb++; }
+ }
+ if (used < szdstb) {
+ dstb[used] = '\0';
+ } else {
+ dstb[szdstb - 1] = '\0';
+ back = 0;
+ dk4error_set_simple_error_code(erp, DK4_E_BUFFER_TOO_SMALL);
+ }
+ } else {
+ dk4error_set_simple_error_code(erp, DK4_E_INVALID_ARGUMENTS);
+ }
+ return back;
+}
+