New module 'uniconv/u32-strconv-to-enc'.
[gnulib.git] / lib / uniconv / u-strconv-to-enc.h
1 /* Conversion from UTF-16/UTF-32 to legacy encodings.
2    Copyright (C) 2002, 2006-2007 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify it
5    under the terms of the GNU Library General Public License as published
6    by the Free Software Foundation; either version 2, or (at your option)
7    any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Library General Public License for more details.
13
14    You should have received a copy of the GNU Library General Public
15    License along with this program; if not, write to the Free Software
16    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
17    USA.  */
18
19 char *
20 FUNC (const UNIT *string,
21       const char *tocode,
22       enum iconv_ilseq_handler handler)
23 {
24 #if HAVE_UTF_NAME
25   char *result = NULL;
26   size_t length = 0;
27
28   if (mem_iconveha ((const char *) string, (U_STRLEN (string) + 1) * sizeof (UNIT),
29                     UTF_NAME, tocode,
30                     handler == iconveh_question_mark, handler,
31                     NULL, &result, &length) < 0)
32     return NULL;
33   /* Verify the result has exactly one NUL byte, at the end.  */
34   if (!(length > 0 && result[length-1] == '\0' && strlen (result) == length-1))
35     {
36       free (result);
37       errno = EILSEQ;
38       return NULL;
39     }
40   return result;
41 #else
42   uint8_t tmpbuf[4096];
43   size_t tmpbufsize = SIZEOF (tmpbuf);
44   uint8_t *utf8_string;
45   char *result;
46
47   utf8_string = U_TO_U8 (string, U_STRLEN (string) + 1, tmpbuf, &tmpbufsize);
48   if (utf8_string == NULL)
49     return NULL;
50   result = u8_strconv_to_encoding (utf8_string, tocode, handler);
51   if (result == NULL)
52     {
53       if (utf8_string != tmpbuf)
54         {
55           int saved_errno = errno;
56           free (utf8_string);
57           errno = saved_errno;
58         }
59       return NULL;
60     }
61   if (utf8_string != tmpbuf)
62     free (utf8_string);
63   return result;
64 #endif
65 }