Mercurial > gnulib

annotate lib/uniconv/u8-conv-from-enc.c @ 9307:ad8a75a45dc9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change copyright notice from LGPLv2.0+ to LGPLv3+.
author Bruno Haible <bruno@clisp.org>
date Sun, 07 Oct 2007 17:23:24 +0200
parents 5d2729421f67
children 62fc220f4e95
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7946
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
1 /* Conversion to UTF-8 from legacy encodings.
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
2 Copyright (C) 2002, 2006-2007 Free Software Foundation, Inc.
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
3
9307
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
4 This program is free software: you can redistribute it and/or modify it
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
5 under the terms of the GNU Lesser General Public License as published
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
6 by the Free Software Foundation; either version 3 of the License, or
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
7 (at your option) any later version.
7946
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
8
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
9 This program is distributed in the hope that it will be useful,
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
9307
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
12 Lesser General Public License for more details.
7946
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
13
9307
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
14 You should have received a copy of the GNU Lesser General Public License
ad8a75a45dc9 Change copyright notice from LGPLv2.0+ to LGPLv3+.
Bruno Haible <bruno@clisp.org>
parents: 8555
diff changeset
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
7946
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
16
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
17 /* Written by Bruno Haible <bruno@clisp.org>. */
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
18
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
19 #include <config.h>
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
20
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
21 /* Specification. */
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
22 #include "uniconv.h"
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
23
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
24 #include <errno.h>
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
25 #include <stdlib.h>
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
26 #include <string.h>
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
27
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
28 #include "c-strcaseeq.h"
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
29 #include "striconveha.h"
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
30 #include "unistr.h"
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
31
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
32 int
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
33 u8_conv_from_encoding (const char *fromcode,
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
34 enum iconv_ilseq_handler handler,
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
35 const char *src, size_t srclen,
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
36 size_t *offsets,
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
37 uint8_t **resultp, size_t *lengthp)
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
38 {
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
39 if (STRCASEEQ (fromcode, "UTF-8", 'U','T','F','-','8',0,0,0,0))
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
40 {
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
41 /* Conversion from UTF-8 to UTF-8. No need to go through iconv(). */
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
42 uint8_t *result;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
43
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
44 if (u8_check ((const uint8_t *) src, srclen))
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
45 {
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
46 errno = EILSEQ;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
47 return -1;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
48 }
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
49
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
50 if (offsets != NULL)
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
51 {
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
52 size_t i;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
53
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
54 for (i = 0; i < srclen; )
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
55 {
8555
5d2729421f67 Avoid compiler warnings.
Bruno Haible <bruno@clisp.org>
parents: 7946
diff changeset
56 int count = u8_mblen ((const uint8_t *) src + i, srclen - i);
7946
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
57 /* We can rely on count > 0 because of the previous u8_check. */
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
58 if (count <= 0)
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
59 abort ();
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
60 offsets[i] = i;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
61 i++;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
62 while (--count > 0)
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
63 offsets[i++] = (size_t)(-1);
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
64 }
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
65 }
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
66
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
67 /* Memory allocation. */
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
68 if (*resultp != NULL && *lengthp >= srclen)
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
69 result = *resultp;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
70 else
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
71 {
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
72 result = (uint8_t *) malloc (srclen);
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
73 if (result == NULL)
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
74 {
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
75 errno = ENOMEM;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
76 return -1;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
77 }
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
78 }
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
79
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
80 memcpy ((char *) result, src, srclen);
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
81 *resultp = result;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
82 *lengthp = srclen;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
83 return 0;
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
84 }
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
85 else
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
86 return mem_iconveha (src, srclen, fromcode, "UTF-8", true, handler,
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
87 offsets, (char **) resultp, lengthp);
a972bb402af3 New module 'uniconv/u8-conv-from-enc'.
Bruno Haible <bruno@clisp.org>
parents:
diff changeset
88 }