1 /* GLIB - Library of useful routines for C programming
3 * gconvert.c: Convert between character sets using iconv
4 * Copyright Red Hat Inc., 2000
5 * Authors: Havoc Pennington <hp@redhat.com>, Owen Taylor <otaylor@redhat.com
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the
19 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20 * Boston, MA 02111-1307, USA.
38 g_convert_error_quark()
42 quark = g_quark_from_static_string ("g_convert_error");
47 #if defined(USE_LIBICONV) && !defined (_LIBICONV_H)
48 #error libiconv in use but included iconv.h not from libiconv
50 #if !defined(USE_LIBICONV) && defined (_LIBICONV_H)
51 #error libiconv not in use but included iconv.h is from libiconv
55 g_iconv_open (const gchar *to_codeset,
56 const gchar *from_codeset)
58 iconv_t cd = iconv_open (to_codeset, from_codeset);
64 g_iconv (GIConv converter,
68 size_t *outbytes_left)
70 iconv_t cd = (iconv_t)converter;
72 return iconv (cd, inbuf, inbytes_left, outbuf, outbytes_left);
76 g_iconv_close (GIConv converter)
78 iconv_t cd = (iconv_t)converter;
80 return iconv_close (cd);
84 open_converter (const gchar *to_codeset,
85 const gchar *from_codeset,
88 GIConv cd = g_iconv_open (to_codeset, from_codeset);
90 if (cd == (iconv_t) -1)
92 /* Something went wrong. */
94 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_NO_CONVERSION,
95 _("Conversion from character set `%s' to `%s' is not suppo\rted"),
96 from_codeset, to_codeset);
98 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_FAILED,
99 _("Could not open converter from `%s' to `%s': %s"),
100 from_codeset, to_codeset, strerror (errno));
109 * @str: the string to convert
110 * @len: the length of the string
111 * @to_codeset: name of character set into which to convert @str
112 * @from_codeset: character set of @str.
113 * @bytes_read: location to store the number of bytes in the
114 * input string that were successfully converted, or %NULL.
115 * Even if the conversion was succesful, this may be
116 * less than len if there were partial characters
117 * at the end of the input. If the error
118 * G_CONVERT_ERROR_ILLEGAL_SEQUENCE occurs, the value
119 * stored will the byte fofset after the last valid
121 * @bytes_written: the stored in the output buffer (not including the
123 * @error: location to store the error occuring, or %NULL to ignore
124 * errors. Any of the errors in #GConvertError may occur.
126 * Convert a string from one character set to another.
128 * Return value: If the conversion was successful, a newly allocated
129 * NUL-terminated string, which must be freed with
130 * g_free. Otherwise %NULL and @error will be set.
133 g_convert (const gchar *str,
135 const gchar *to_codeset,
136 const gchar *from_codeset,
144 size_t inbytes_remaining;
145 size_t outbytes_remaining;
149 gboolean have_error = FALSE;
151 g_return_val_if_fail (str != NULL, NULL);
152 g_return_val_if_fail (to_codeset != NULL, NULL);
153 g_return_val_if_fail (from_codeset != NULL, NULL);
155 cd = open_converter (to_codeset, from_codeset, error);
157 if (cd == (GIConv) -1)
172 inbytes_remaining = len;
174 /* Due to a GLIBC bug, round outbuf_size up to a multiple of 4 */
175 /* + 1 for nul in case len == 1 */
176 outbuf_size = ((len + 3) & ~3) + 1;
178 outbytes_remaining = outbuf_size - 1; /* -1 for nul */
179 outp = dest = g_malloc (outbuf_size);
183 err = g_iconv (cd, (char **)&p, &inbytes_remaining, &outp, &outbytes_remaining);
185 if (err == (size_t) -1)
190 /* Incomplete text, do not report an error */
194 size_t used = outp - dest;
196 /* glibc's iconv can return E2BIG even if there is space
197 * remaining if an internal buffer is exhausted. The
198 * folllowing is a heuristic to catch this. The 16 is
201 if (used + 16 > outbuf_size)
203 outbuf_size = (outbuf_size - 1) * 2 + 1;
204 dest = g_realloc (dest, outbuf_size);
207 outbytes_remaining = outbuf_size - used - 1; /* -1 for nul */
213 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE,
214 _("Invalid byte sequence in conversion input"));
218 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_FAILED,
219 _("Error during conversion: %s"),
231 *bytes_read = p - str;
234 if ((p - str) != len)
236 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_PARTIAL_INPUT,
237 _("Partial character sequence at end of input"));
243 *bytes_written = outp - dest; /* Doesn't include '\0' */
255 * g_convert_with_fallback:
256 * @str: the string to convert
257 * @len: the length of the string
258 * @to_codeset: name of character set into which to convert @str
259 * @from_codeset: character set of @str.
260 * @fallback: UTF-8 string to use in place of character not
261 * present in the target encoding. (This must be
262 * in the target encoding), if %NULL, characters
263 * not in the target encoding will be represented
264 * as Unicode escapes \x{XXXX} or \x{XXXXXX}.
265 * @bytes_read: location to store the number of bytes in the
266 * input string that were successfully converted, or %NULL.
267 * Even if the conversion was succesful, this may be
268 * less than len if there were partial characters
269 * at the end of the input. If the error
270 * G_CONVERT_ERROR_ILLEGAL_SEQUENCE occurs, the value
271 * stored will the byte fofset after the last valid
273 * @bytes_written: the stored in the output buffer (not including the
275 * @error: location to store the error occuring, or %NULL to ignore
276 * errors. Any of the errors in #GConvertError may occur.
278 * Convert a string from one character set to another, possibly
279 * including fallback sequences for characters not representable
280 * in the output. Note that it is not guaranteed that the specification
281 * for the fallback sequences in @fallback will be honored. Some
282 * systems may do a approximate conversion from @from_codeset
283 * to @to_codeset in their iconv() functions, in which case GLib
284 * will simply return that approximate conversion.
286 * Return value: If the conversion was successful, a newly allocated
287 * NUL-terminated string, which must be freed with
288 * g_free. Otherwise %NULL and @error will be set.
291 g_convert_with_fallback (const gchar *str,
293 const gchar *to_codeset,
294 const gchar *from_codeset,
303 const gchar *insert_str = NULL;
305 int inbytes_remaining;
306 const gchar *save_p = NULL;
307 size_t save_inbytes = 0;
308 size_t outbytes_remaining;
312 gboolean have_error = FALSE;
313 gboolean done = FALSE;
315 GError *local_error = NULL;
317 g_return_val_if_fail (str != NULL, NULL);
318 g_return_val_if_fail (to_codeset != NULL, NULL);
319 g_return_val_if_fail (from_codeset != NULL, NULL);
324 /* Try an exact conversion; we only proceed if this fails
325 * due to an illegal sequence in the input string.
327 dest = g_convert (str, len, to_codeset, from_codeset,
328 bytes_read, bytes_written, &local_error);
332 if (!g_error_matches (local_error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE))
334 g_propagate_error (error, local_error);
338 g_error_free (local_error);
340 /* No go; to proceed, we need a converter from "UTF-8" to
341 * to_codeset, and the string as UTF-8.
343 cd = open_converter (to_codeset, "UTF-8", error);
344 if (cd == (GIConv) -1)
355 utf8 = g_convert (str, len, "UTF-8", from_codeset,
356 bytes_read, &inbytes_remaining, error);
360 /* Now the heart of the code. We loop through the UTF-8 string, and
361 * whenever we hit an offending character, we form fallback, convert
362 * the fallback to the target codeset, and then go back to
363 * converting the original string after finishing with the fallback.
365 * The variables save_p and save_inbytes store the input state
366 * for the original string while we are converting the fallback
369 /* Due to a GLIBC bug, round outbuf_size up to a multiple of 4 */
370 /* + 1 for nul in case len == 1 */
371 outbuf_size = ((len + 3) & ~3) + 1;
372 outbytes_remaining = outbuf_size - 1; /* -1 for nul */
373 outp = dest = g_malloc (outbuf_size);
375 while (!done && !have_error)
377 size_t inbytes_tmp = inbytes_remaining;
378 err = g_iconv (cd, (char **)&p, &inbytes_tmp, &outp, &outbytes_remaining);
379 inbytes_remaining = inbytes_tmp;
381 if (err == (size_t) -1)
386 g_assert_not_reached();
390 size_t used = outp - dest;
392 /* glibc's iconv can return E2BIG even if there is space
393 * remaining if an internal buffer is exhausted. The
394 * folllowing is a heuristic to catch this. The 16 is
397 if (used + 16 > outbuf_size)
399 outbuf_size = (outbuf_size - 1) * 2 + 1;
400 dest = g_realloc (dest, outbuf_size);
403 outbytes_remaining = outbuf_size - used - 1; /* -1 for nul */
411 /* Error converting fallback string - fatal
413 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_ILLEGAL_SEQUENCE,
414 _("Cannot convert fallback '%s' to codeset '%s'"),
415 insert_str, to_codeset);
423 gunichar ch = g_utf8_get_char (p);
424 insert_str = g_strdup_printf ("\\x{%0*X}",
425 (ch < 0x10000) ? 4 : 6,
429 insert_str = fallback;
431 save_p = g_utf8_next_char (p);
432 save_inbytes = inbytes_remaining - (save_p - p);
434 inbytes_remaining = strlen (p);
438 g_set_error (error, G_CONVERT_ERROR, G_CONVERT_ERROR_FAILED,
439 _("Error during conversion: %s"),
450 g_free ((gchar *)insert_str);
452 inbytes_remaining = save_inbytes;
467 *bytes_written = outp - str; /* Doesn't include '\0' */
473 if (save_p && !fallback)
474 g_free ((gchar *)insert_str);
490 * @opsysstring: a string in the encoding of the current locale
491 * @len: the length of the string, or -1 if the string is
493 * @bytes_read: location to store the number of bytes in the
494 * input string that were successfully converted, or %NULL.
495 * Even if the conversion was succesful, this may be
496 * less than len if there were partial characters
497 * at the end of the input. If the error
498 * G_CONVERT_ERROR_ILLEGAL_SEQUENCE occurs, the value
499 * stored will the byte fofset after the last valid
501 * @bytes_written: the stored in the output buffer (not including the
503 * @error: location to store the error occuring, or %NULL to ignore
504 * errors. Any of the errors in #GConvertError may occur.
506 * Converts a string which is in the encoding used for strings by
507 * the C runtime (usually the same as that used by the operating
508 * system) in the current locale into a UTF-8 string.
510 * Return value: The converted string, or %NULL on an error.
513 g_locale_to_utf8 (const gchar *opsysstring,
521 gint i, clen, total_len, wclen, first;
522 const gint len = len < 0 ? strlen (opsysstring) : len;
527 wcs = g_new (wchar_t, len);
528 wclen = MultiByteToWideChar (CP_ACP, 0, opsysstring, len, wcs, len);
532 for (i = 0; i < wclen; i++)
540 else if (wc < 0x10000)
542 else if (wc < 0x200000)
544 else if (wc < 0x4000000)
550 result = g_malloc (total_len + 1);
554 for (i = 0; i < wclen; i++)
568 else if (wc < 0x10000)
573 else if (wc < 0x200000)
578 else if (wc < 0x4000000)
592 case 6: bp[5] = (wc & 0x3f) | 0x80; wc >>= 6; /* Fall through */
593 case 5: bp[4] = (wc & 0x3f) | 0x80; wc >>= 6; /* Fall through */
594 case 4: bp[3] = (wc & 0x3f) | 0x80; wc >>= 6; /* Fall through */
595 case 3: bp[2] = (wc & 0x3f) | 0x80; wc >>= 6; /* Fall through */
596 case 2: bp[1] = (wc & 0x3f) | 0x80; wc >>= 6; /* Fall through */
597 case 1: bp[0] = wc | first;
609 *bytes_written = total_len;
617 if (g_get_charset (&charset))
618 return g_strdup (opsysstring);
620 str = g_convert (opsysstring, len,
621 "UTF-8", charset, bytes_read, bytes_written, error);
628 * g_locale_from_utf8:
629 * @utf8string: a UTF-8 encoded string
630 * @len: the length of the string, or -1 if the string is
632 * @bytes_read: location to store the number of bytes in the
633 * input string that were successfully converted, or %NULL.
634 * Even if the conversion was succesful, this may be
635 * less than len if there were partial characters
636 * at the end of the input. If the error
637 * G_CONVERT_ERROR_ILLEGAL_SEQUENCE occurs, the value
638 * stored will the byte fofset after the last valid
640 * @bytes_written: the stored in the output buffer (not including the
642 * @error: location to store the error occuring, or %NULL to ignore
643 * errors. Any of the errors in #GConvertError may occur.
645 * Converts a string from UTF-8 to the encoding used for strings by
646 * the C runtime (usually the same as that used by the operating
647 * system) in the current locale.
649 * Return value: The converted string, or %NULL on an error.
652 g_locale_from_utf8 (const gchar *utf8string,
660 gint i, mask, clen, mblen;
661 const gint len = len < 0 ? strlen (utf8string) : len;
667 /* First convert to wide chars */
668 cp = (guchar *) utf8string;
671 wcs = g_new (wchar_t, len + 1);
683 else if ((c & 0xe0) == 0xc0)
688 else if ((c & 0xf0) == 0xe0)
693 else if ((c & 0xf8) == 0xf0)
698 else if ((c & 0xfc) == 0xf8)
703 else if ((c & 0xfc) == 0xfc)
720 *wcp = (cp[0] & mask);
721 for (i = 1; i < clen; i++)
723 if ((cp[i] & 0xc0) != 0x80)
729 *wcp |= (cp[i] & 0x3f);
742 /* n is the number of wide chars constructed */
744 /* Convert to a string in the current ANSI codepage */
746 result = g_new (gchar, 3 * n + 1);
747 mblen = WideCharToMultiByte (CP_ACP, 0, wcs, n, result, 3*n, NULL, NULL);
754 *bytes_written = mblen;
760 gchar *charset, *str;
762 if (g_get_charset (&charset))
763 return g_strdup (utf8string);
765 str = g_convert (utf8string, strlen (utf8string),
766 charset, "UTF-8", bytes_read, bytes_written, error);
774 * g_filename_to_utf8:
775 * @opsysstring: a string in the encoding for filenames
776 * @len: the length of the string, or -1 if the string is
778 * @bytes_read: location to store the number of bytes in the
779 * input string that were successfully converted, or %NULL.
780 * Even if the conversion was succesful, this may be
781 * less than len if there were partial characters
782 * at the end of the input. If the error
783 * G_CONVERT_ERROR_ILLEGAL_SEQUENCE occurs, the value
784 * stored will the byte fofset after the last valid
786 * @bytes_written: the stored in the output buffer (not including the
788 * @error: location to store the error occuring, or %NULL to ignore
789 * errors. Any of the errors in #GConvertError may occur.
791 * Converts a string which is in the encoding used for filenames
792 * into a UTF-8 string.
794 * Return value: The converted string, or %NULL on an error.
797 g_filename_to_utf8 (const gchar *opsysstring,
804 return g_locale_to_utf8 (opsysstring, len,
805 bytes_read, bytes_written,
808 if (getenv ("G_BROKEN_FILENAMES"))
809 return g_locale_to_utf8 (opsysstring, len,
810 bytes_read, bytes_written,
813 if (bytes_read || bytes_written)
815 gint len = strlen (opsysstring);
820 *bytes_written = len;
824 return g_strdup (opsysstring);
826 return g_strndup (opsysstring, len);
831 * g_filename_from_utf8:
832 * @utf8string: a UTF-8 encoded string
833 * @len: the length of the string, or -1 if the string is
835 * @bytes_read: location to store the number of bytes in the
836 * input string that were successfully converted, or %NULL.
837 * Even if the conversion was succesful, this may be
838 * less than len if there were partial characters
839 * at the end of the input. If the error
840 * G_CONVERT_ERROR_ILLEGAL_SEQUENCE occurs, the value
841 * stored will the byte fofset after the last valid
843 * @bytes_written: the stored in the output buffer (not including the
845 * @error: location to store the error occuring, or %NULL to ignore
846 * errors. Any of the errors in #GConvertError may occur.
848 * Converts a string from UTF-8 to the encoding used for filenames.
850 * Return value: The converted string, or %NULL on an error.
853 g_filename_from_utf8 (const gchar *utf8string,
860 return g_locale_from_utf8 (utf8string, len,
861 bytes_read, bytes_written,
864 if (getenv ("G_BROKEN_FILENAMES"))
865 return g_locale_from_utf8 (utf8string, len,
866 bytes_read, bytes_written,
869 if (bytes_read || bytes_written)
871 gint len = strlen (utf8string);
876 *bytes_written = len;
880 return g_strdup (utf8string);
882 return g_strndup (utf8string, len);