]> Savannah Git Hosting - gnulib.git/commitdiff
c32srtombs: New module.
authorBruno Haible <bruno@clisp.org>
Thu, 9 Jan 2020 15:20:10 +0000 (16:20 +0100)
committerBruno Haible <bruno@clisp.org>
Thu, 9 Jan 2020 15:20:10 +0000 (16:20 +0100)
* lib/uchar.in.h (c32srtombs): New declaration.
* lib/wcsrtombs-impl.h: Parameterize: Use macros FUNC, SCHAR_T,
INTERNAL_STATE, WCRTOMB.
* lib/wcsrtombs.c (FUNC, SCHAR_T, INTERNAL_STATE, WCRTOMB): New macros.
* lib/c32srtombs.c: New file.
* lib/c32srtombs-state.c: New file, based on lib/wcsrtombs-state.c.
* m4/uchar.m4 (gl_UCHAR_H_DEFAULTS): Initialize GNULIB_C32SRTOMBS.
* modules/uchar (Makefile.am): Substitute GNULIB_C32SRTOMBS.
* modules/c32srtombs: New file.
* tests/test-uchar-c++.cc: Test the signature of c32srtombs.
* doc/posix-functions/wcsrtombs.texi: Mention the new module.

ChangeLog
doc/posix-functions/wcsrtombs.texi
lib/c32srtombs-state.c [new file with mode: 0644]
lib/c32srtombs.c [new file with mode: 0644]
lib/uchar.in.h
lib/wcsrtombs-impl.h
lib/wcsrtombs.c
m4/uchar.m4
modules/c32srtombs [new file with mode: 0644]
modules/uchar
tests/test-uchar-c++.cc

index 9c3f6032b50308303e62462451d40dd76abd7a3b..9d940e5134aee5f7486846d6e60c630f61620d4a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,18 @@
+2020-01-09  Bruno Haible  <bruno@clisp.org>
+
+       c32srtombs: New module.
+       * lib/uchar.in.h (c32srtombs): New declaration.
+       * lib/wcsrtombs-impl.h: Parameterize: Use macros FUNC, SCHAR_T,
+       INTERNAL_STATE, WCRTOMB.
+       * lib/wcsrtombs.c (FUNC, SCHAR_T, INTERNAL_STATE, WCRTOMB): New macros.
+       * lib/c32srtombs.c: New file.
+       * lib/c32srtombs-state.c: New file, based on lib/wcsrtombs-state.c.
+       * m4/uchar.m4 (gl_UCHAR_H_DEFAULTS): Initialize GNULIB_C32SRTOMBS.
+       * modules/uchar (Makefile.am): Substitute GNULIB_C32SRTOMBS.
+       * modules/c32srtombs: New file.
+       * tests/test-uchar-c++.cc: Test the signature of c32srtombs.
+       * doc/posix-functions/wcsrtombs.texi: Mention the new module.
+
 2020-01-08  Bruno Haible  <bruno@clisp.org>
 
        c32tob: Make consistent with mbrtoc32.
index 975d3179de7cfdd2399ac3400888daeb267c3414..5bb7d8c945465a0e1732ffb7aa495caa5b6d60c7 100644 (file)
@@ -22,6 +22,9 @@ HP-UX 11.
 Portability problems not fixed by Gnulib:
 @itemize
 @item
-On Windows and 32-bit AIX platforms, @code{wchar_t} is a 16-bit type and therefore cannot
-accommodate all Unicode characters.
+On Windows and 32-bit AIX platforms, @code{wchar_t} is a 16-bit type and
+therefore cannot accommodate all Unicode characters.
+However, the Gnulib function @code{c32srtombs}, provided by Gnulib module
+@code{c32srtombs}, operates on 32-bit wide characters and therefore does not
+have this limitation.
 @end itemize
diff --git a/lib/c32srtombs-state.c b/lib/c32srtombs-state.c
new file mode 100644 (file)
index 0000000..5491b9c
--- /dev/null
@@ -0,0 +1,37 @@
+/* Convert 32-bit wide string to string.
+   Copyright (C) 2008-2020 Free Software Foundation, Inc.
+   Written by Bruno Haible <bruno@clisp.org>, 2020.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+#include <config.h>
+
+#include <wchar.h>
+
+/* Internal state used by the functions c32srtombs() and c32snrtombs().  */
+mbstate_t _gl_c32srtombs_state
+/* The state must initially be in the "initial state"; so, zero-initialize it.
+   On most systems, putting it into BSS is sufficient.  Not so on Mac OS X 10.3,
+   see <https://lists.gnu.org/r/bug-gnulib/2009-01/msg00329.html>.
+   When it needs an initializer, use 0 or {0} as initializer? 0 only works
+   when mbstate_t is a scalar type (such as when gnulib defines it, or on
+   AIX, IRIX, mingw). {0} works as an initializer in all cases: for a struct
+   or union type, but also for a scalar type (ISO C 99, 6.7.8.(11)).  */
+#if defined __ELF__
+  /* On ELF systems, variables in BSS behave well.  */
+#else
+  /* Use braces, to be on the safe side.  */
+  = { 0 }
+#endif
+  ;
diff --git a/lib/c32srtombs.c b/lib/c32srtombs.c
new file mode 100644 (file)
index 0000000..a4e0840
--- /dev/null
@@ -0,0 +1,55 @@
+/* Convert 32-bit wide string to string.
+   Copyright (C) 2020 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+/* Written by Bruno Haible <bruno@clisp.org>, 2020.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include <uchar.h>
+
+#include <wchar.h>
+
+#if (HAVE_WORKING_MBRTOC32 && !defined __GLIBC__) || _GL_LARGE_CHAR32_T
+/* The char32_t encoding of a multibyte character may be different than its
+   wchar_t encoding, or char32_t is wider than wchar_t.  */
+
+# include <errno.h>
+# include <stdlib.h>
+# include <string.h>
+
+extern mbstate_t _gl_c32srtombs_state;
+
+# define FUNC c32srtombs
+# define SCHAR_T char32_t
+# define INTERNAL_STATE _gl_c32srtombs_state
+# define WCRTOMB c32rtomb
+# include "wcsrtombs-impl.h"
+
+#else
+/* char32_t and wchar_t are equivalent.  */
+
+# include "verify.h"
+
+verify (sizeof (char32_t) == sizeof (wchar_t));
+
+size_t
+c32srtombs (char *dest, const char32_t **srcp, size_t len, mbstate_t *ps)
+{
+  return wcsrtombs (dest, (const wchar_t **) srcp, len, ps);
+}
+
+#endif
index dbbfc30bc3a93bd312eb5d5e5586d9467018ac8b..75da254596f864aa6e939e615cea17e5a57e5ee9 100644 (file)
@@ -93,6 +93,18 @@ _GL_WARN_ON_USE (mbrtoc32, "c32rtomb is not portable - "
 #endif
 
 
+/* Convert a 32-bit wide string to a string.  */
+#if @GNULIB_C32SRTOMBS@
+_GL_FUNCDECL_SYS (c32srtombs, size_t,
+                  (char *dest, const char32_t **srcp, size_t len, mbstate_t *ps)
+                  _GL_ARG_NONNULL ((2)));
+_GL_CXXALIAS_SYS (c32srtombs, size_t,
+                  (char *dest, const char32_t **srcp, size_t len,
+                   mbstate_t *ps));
+_GL_CXXALIASWARN (c32srtombs);
+#endif
+
+
 /* Converts a 32-bit wide character to unibyte character.
    Returns the single-byte representation of WC if it exists,
    or EOF otherwise.  */
index 81a7a7f3445fb90825323cdef9fb70081fdd011f..d39af07d92a55f5245ab35f2846b2d9f64e2f3ee 100644 (file)
    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
 
 size_t
-wcsrtombs (char *dest, const wchar_t **srcp, size_t len, mbstate_t *ps)
+FUNC (char *dest, const SCHAR_T **srcp, size_t len, mbstate_t *ps)
 {
   if (ps == NULL)
-    ps = &_gl_wcsrtombs_state;
+    ps = &INTERNAL_STATE;
   {
-    const wchar_t *src = *srcp;
+    const SCHAR_T *src = *srcp;
     size_t cur_max = MB_CUR_MAX;
     char buf[64];
 
@@ -34,8 +34,8 @@ wcsrtombs (char *dest, const wchar_t **srcp, size_t len, mbstate_t *ps)
 
         for (; len > 0; src++)
           {
-            wchar_t wc = *src;
-            size_t ret = wcrtomb (len >= cur_max ? destptr : buf, wc, ps);
+            SCHAR_T wc = *src;
+            size_t ret = WCRTOMB (len >= cur_max ? destptr : buf, wc, ps);
 
             if (ret == (size_t)(-1))
               goto bad_input;
@@ -66,8 +66,8 @@ wcsrtombs (char *dest, const wchar_t **srcp, size_t len, mbstate_t *ps)
 
         for (;; src++)
           {
-            wchar_t wc = *src;
-            size_t ret = wcrtomb (buf, wc, &state);
+            SCHAR_T wc = *src;
+            size_t ret = WCRTOMB (buf, wc, &state);
 
             if (ret == (size_t)(-1))
               goto bad_input2;
index db8489b1ebba1a14efdee2ed45e5a6367eb59efd..307912ffda8e2002f4777e32d165b2a916ee3562 100644 (file)
@@ -51,6 +51,10 @@ rpl_wcsrtombs (char *dest, const wchar_t **srcp, size_t len, mbstate_t *ps)
 # include <stdlib.h>
 # include <string.h>
 
+# define FUNC wcsrtombs
+# define SCHAR_T wchar_t
+# define INTERNAL_STATE _gl_wcsrtombs_state
+# define WCRTOMB wcrtomb
 # include "wcsrtombs-impl.h"
 
 #endif
index be71196619ec08c2a2c5b4f7d4a110913188bf1b..4e9b16dc2d1fbce9792939b777854e0616900184 100644 (file)
@@ -1,4 +1,4 @@
-# uchar.m4 serial 9
+# uchar.m4 serial 10
 dnl Copyright (C) 2019-2020 Free Software Foundation, Inc.
 dnl This file is free software; the Free Software Foundation
 dnl gives unlimited permission to copy and/or distribute it,
@@ -49,6 +49,7 @@ AC_DEFUN([gl_UCHAR_H_DEFAULTS],
 [
   GNULIB_BTOC32=0;           AC_SUBST([GNULIB_BTOC32])
   GNULIB_C32RTOMB=0;         AC_SUBST([GNULIB_C32RTOMB])
+  GNULIB_C32SRTOMBS=0;       AC_SUBST([GNULIB_C32SRTOMBS])
   GNULIB_C32TOB=0;           AC_SUBST([GNULIB_C32TOB])
   GNULIB_MBRTOC32=0;         AC_SUBST([GNULIB_MBRTOC32])
   GNULIB_MBSNRTOC32S=0;      AC_SUBST([GNULIB_MBSNRTOC32S])
diff --git a/modules/c32srtombs b/modules/c32srtombs
new file mode 100644 (file)
index 0000000..1f36b6c
--- /dev/null
@@ -0,0 +1,31 @@
+Description:
+c32srtombs() function: convert 32-bit wide string to string.
+
+Files:
+lib/c32srtombs.c
+lib/wcsrtombs-impl.h
+lib/c32srtombs-state.c
+
+Depends-on:
+uchar
+wchar
+verify
+c32rtomb
+wcsrtombs       [test $SMALL_WCHAR_T = 0]
+
+configure.ac:
+AC_REQUIRE([gl_UCHAR_H])
+AC_LIBOBJ([c32srtombs-state])
+gl_UCHAR_MODULE_INDICATOR([c32srtombs])
+
+Makefile.am:
+lib_SOURCES += c32srtombs.c
+
+Include:
+<uchar.h>
+
+License:
+LGPL
+
+Maintainer:
+Bruno Haible
index cab45181a023fcf76393a0f1baff0a97e8c64f79..7124a675ec02d3ac0a15cf50afac66efaa56d610 100644 (file)
@@ -30,6 +30,7 @@ uchar.h: uchar.in.h $(top_builddir)/config.status $(CXXDEFS_H)
              -e 's|@''SMALL_WCHAR_T''@|$(SMALL_WCHAR_T)|g' \
              -e 's/@''GNULIB_BTOC32''@/$(GNULIB_BTOC32)/g' \
              -e 's/@''GNULIB_C32RTOMB''@/$(GNULIB_C32RTOMB)/g' \
+             -e 's/@''GNULIB_C32SRTOMBS''@/$(GNULIB_C32SRTOMBS)/g' \
              -e 's/@''GNULIB_C32TOB''@/$(GNULIB_C32TOB)/g' \
              -e 's/@''GNULIB_MBRTOC32''@/$(GNULIB_MBRTOC32)/g' \
              -e 's/@''GNULIB_MBSNRTOC32S''@/$(GNULIB_MBSNRTOC32S)/g' \
index ed45da2e83cf927e8fb96521e7b2e59aacc492b3..e202bbc1170ab4cf666dc5c1b815184e13087950 100644 (file)
@@ -33,6 +33,11 @@ SIGNATURE_CHECK (GNULIB_NAMESPACE::c32rtomb, size_t,
                  (char *, char32_t , mbstate_t *));
 #endif
 
+#if GNULIB_TEST_C32SRTOMBS
+SIGNATURE_CHECK (GNULIB_NAMESPACE::c32srtombs, size_t,
+                 (char *, const char32_t **, size_t, mbstate_t *));
+#endif
+
 #if GNULIB_TEST_C32TOB
 SIGNATURE_CHECK (GNULIB_NAMESPACE::c32tob, int, (wint_t));
 #endif