1 /* $FreeBSD: head/lib/libiconv_modules/mapper_646/citrus_mapper_646.c 219019 2011-02-25 00:04:39Z gabor $ */
2 /* $NetBSD: citrus_mapper_646.c,v 1.4 2003/07/14 11:37:49 tshiozak Exp $ */
5 * Copyright (c)2003 Citrus Project,
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/cdefs.h>
31 #include <sys/queue.h>
40 #include "citrus_namespace.h"
41 #include "citrus_types.h"
42 #include "citrus_bcs.h"
43 #include "citrus_module.h"
44 #include "citrus_region.h"
45 #include "citrus_memstream.h"
46 #include "citrus_mmap.h"
47 #include "citrus_hash.h"
48 #include "citrus_mapper.h"
49 #include "citrus_mapper_646.h"
51 /* ---------------------------------------------------------------------- */
53 _CITRUS_MAPPER_DECLS(mapper_646);
54 _CITRUS_MAPPER_DEF_OPS(mapper_646);
56 /* ---------------------------------------------------------------------- */
58 #define ILSEQ 0xFFFFFFFE
59 #define INVALID 0xFFFFFFFF
74 #define INDEX(x) INDEX_##x,
80 struct _citrus_mapper_646 {
81 _index_t m6_map[NUM_OF_SPECIALS];
86 _citrus_mapper_646_mapper_getops(struct _citrus_mapper_ops *ops)
89 memcpy(ops, &_citrus_mapper_646_mapper_ops,
90 sizeof(_citrus_mapper_646_mapper_ops));
97 parse_file(struct _citrus_mapper_646 *m6, const char *path)
107 ret = _map_file(&r, path);
110 _memstream_bind(&ms, &r);
111 for (i = 0; i < NUM_OF_SPECIALS; i++) {
113 p = _memstream_getln(&ms, &len);
118 p = _bcs_skip_ws_len(p, &len);
119 if (*p == T_COMM || len==0)
121 if (!_bcs_isdigit(*p)) {
125 snprintf(buf, sizeof(buf), "%.*s", (int)len, p);
126 pp = __DECONST(void *, p);
127 m6->m6_map[i] = strtoul(buf, (char **)&pp, 0);
128 p = _bcs_skip_ws(buf);
129 if (*p != T_COMM && !*p) {
140 parse_var(struct _citrus_mapper_646 *m6, struct _memstream *ms,
147 _memstream_skip_ws(ms);
148 /* whether backward */
149 if (_memstream_peek(ms) == '!') {
153 /* get description file path */
154 _memstream_getregion(ms, &r, _memstream_remainder(ms));
155 snprintf(path, sizeof(path), "%s/%.*s",
156 dir, (int)_region_size(&r), (char *)_region_head(&r));
157 /* remove trailing white spaces */
158 path[_bcs_skip_nonws(path)-path] = '\0';
159 return (parse_file(m6, path));
164 _citrus_mapper_646_mapper_init(struct _citrus_mapper_area *__restrict ma __unused,
165 struct _citrus_mapper * __restrict cm, const char * __restrict dir,
166 const void * __restrict var, size_t lenvar,
167 struct _citrus_mapper_traits * __restrict mt, size_t lenmt)
169 struct _citrus_mapper_646 *m6;
170 struct _memstream ms;
174 if (lenmt < sizeof(*mt))
177 m6 = malloc(sizeof(*m6));
181 _region_init(&r, __DECONST(void *, var), lenvar);
182 _memstream_bind(&ms, &r);
183 ret = parse_var(m6, &ms, dir);
190 mt->mt_src_max = mt->mt_dst_max = 1; /* 1:1 converter */
191 mt->mt_state_size = 0; /* stateless */
198 _citrus_mapper_646_mapper_uninit(struct _citrus_mapper *cm)
201 if (cm && cm->cm_closure)
202 free(cm->cm_closure);
207 _citrus_mapper_646_mapper_convert(struct _citrus_mapper * __restrict cm,
208 _index_t * __restrict dst, _index_t src, void * __restrict ps __unused)
210 struct _citrus_mapper_646 *m6;
213 if (m6->m6_forward) {
216 return (_MAPPER_CONVERT_ILSEQ);
219 if (m6->m6_map[INDEX_##x]==INVALID) \
220 return (_MAPPER_CONVERT_NONIDENTICAL); \
221 *dst = m6->m6_map[INDEX_##x]; \
228 #define BACKWARD(x) \
229 if (m6->m6_map[INDEX_##x] != INVALID && src == m6->m6_map[INDEX_##x]) { \
232 } else if (src == (x)) \
233 return (_MAPPER_CONVERT_ILSEQ); \
237 return (_MAPPER_CONVERT_NONIDENTICAL);
241 return (_MAPPER_CONVERT_SUCCESS);
246 _citrus_mapper_646_mapper_init_state(void)