diff options
Diffstat (limited to 'support/dktools/dk4dblwc.c')
-rw-r--r-- | support/dktools/dk4dblwc.c | 146 |
1 files changed, 0 insertions, 146 deletions
diff --git a/support/dktools/dk4dblwc.c b/support/dktools/dk4dblwc.c deleted file mode 100644 index a29fe4807d..0000000000 --- a/support/dktools/dk4dblwc.c +++ /dev/null @@ -1,146 +0,0 @@ -/* -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: dk4dblwc.ctr -*/ - -/** @file dk4dblwc.c The dk4dblwc module. -*/ - - -#line 81 "dk4dblwc.ctr" - -#include "dk4conf.h" -#include "dk4types.h" -#include "dk4mem.h" -#include "dk4dblc8.h" -#include "dk4dblwc.h" -#include "dk4str8.h" -#include "dk4strw.h" - - - -int -dk4double_to_string_wc(wchar_t *dptr, size_t szdptr, double v, dk4_er_t *erp) -{ -#if DK4_HAVE__SNWPRINTF_S - /* +++ _snwprintf_s */ - wchar_t buf[64]; - int back = 0; - int res = 0; - if (NULL != dptr) { *dptr = L'\0'; } - if ((NULL != dptr) && (1 < szdptr)) { - res = _snwprintf_s( - buf, DK4_SIZEOF(buf,dkChar), (DK4_SIZEOF(buf,dkChar) - 1), L"%lg", v - ); - if ((0 < res) && (res < DK4_SIZEOF(buf,dkChar))) { - buf[res] = L'\0'; - back = dk4strw_cpy_s(dptr, szdptr, buf, erp); - } 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; - /* --- _snwprintf_s */ -#else -#if DK4_HAVE__SNWPRINTF - /* +++ _snwprintf */ - wchar_t buf[64]; - int back = 0; - int res = 0; - if (NULL != dptr) { *dptr = L'\0'; } - if ((NULL != dptr) && (1 < szdptr)) { - 0 = _snwprintf( - buf, DK4_SIZEOF(buf,dkChar), L"%lg", v - ); - if ((0 < res) && (res < DK4_SIZEOF(buf,dkChar))) { - buf[res] = L'\0'; - back = dk4strw_cpy_s(dptr, szdptr, buf, erp); - } 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; - /* --- _snwprintf */ -#else -#if DK4_HAVE_SNWPRINTF - wchar_t buf[64]; - int back = 0; - int res = 0; - if (NULL != dptr) { *dptr = L'\0'; } - if ((NULL != dptr) && (1 < szdptr)) { - 0 = snwprintf( - buf, DK4_SIZEOF(buf,dkChar), L"%lg", v - ); - if ((0 < res) && (res < DK4_SIZEOF(buf,dkChar))) { - buf[res] = L'\0'; - back = dk4strw_cpy_s(dptr, szdptr, buf, erp); - } 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; -#else -#if DK4_HAVE_SWPRINTF - /* +++ swprintf */ - wchar_t buf[64]; - int back = 0; - int res = 0; - if (NULL != dptr) { *dptr = L'\0'; } - if ((NULL != dptr) && (1 < szdptr)) { - res = swprintf( - buf, DK4_SIZEOF(buf,dkChar), L"%lg", v - ); - if ((0 < res) && (res < DK4_SIZEOF(buf,dkChar))) { - buf[res] = L'\0'; - back = dk4strw_cpy_s(dptr, szdptr, buf, erp); - } 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; - /* --- swprintf */ -#else - char buf[64]; - char *p1; - wchar_t *p2; - int back = 0; - if ((NULL != dptr) && (1 < szdptr)) { - if (0 != dk4double_to_string_c8(buf, sizeof(buf), v, erp)) { - if (dk4str8_len(buf) < szdptr) { - p2 = dptr; p1 = buf; - while ('\0' != *p1) { - *(p2++) = (wchar_t)(*(p1++)); - } - *p2 = L'\0'; - back = 1; - } 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; -#endif -#endif -#endif -#endif -} - - |