1 /* $FreeBSD: head/lib/libc/iconv/citrus_lookup_factory.c 219019 2011-02-25 00:04:39Z gabor $ */ 2 /* $NetBSD: citrus_lookup_factory.c,v 1.4 2003/10/27 00:12:42 lukem Exp $ */ 3 4 /*- 5 * Copyright (c)2003 Citrus Project, 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 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. 16 * 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 27 * SUCH DAMAGE. 28 */ 29 30 #include <sys/cdefs.h> 31 32 #include <assert.h> 33 #include <ctype.h> 34 #include <errno.h> 35 #include <limits.h> 36 #include <stdio.h> 37 #include <stdlib.h> 38 #include <string.h> 39 40 #include "citrus_namespace.h" 41 #include "citrus_region.h" 42 #include "citrus_bcs.h" 43 #include "citrus_db_factory.h" 44 #include "citrus_db_hash.h" 45 #include "citrus_lookup_factory.h" 46 #include "citrus_lookup_file.h" 47 48 #define T_COMM '#' 49 static int 50 convert_line(struct _citrus_db_factory *df, const char *line, size_t len) 51 { 52 const char *p; 53 char data[LINE_MAX], key[LINE_MAX]; 54 55 /* cut off trailing comment */ 56 p = memchr(line, T_COMM, len); 57 if (p) 58 len = p - line; 59 60 /* key */ 61 line = _bcs_skip_ws_len(line, &len); 62 if (len == 0) 63 return (0); 64 p = _bcs_skip_nonws_len(line, &len); 65 if (p == line) 66 return (0); 67 snprintf(key, sizeof(key), "%.*s", (int)(p-line), line); 68 _bcs_convert_to_lower(key); 69 70 /* data */ 71 line = _bcs_skip_ws_len(p, &len); 72 _bcs_trunc_rws_len(line, &len); 73 snprintf(data, sizeof(data), "%.*s", (int)len, line); 74 75 return (_db_factory_addstr_by_s(df, key, data)); 76 } 77 78 static int 79 dump_db(struct _citrus_db_factory *df, struct _region *r) 80 { 81 void *ptr; 82 size_t size; 83 84 size = _db_factory_calc_size(df); 85 ptr = malloc(size); 86 if (ptr == NULL) 87 return (errno); 88 _region_init(r, ptr, size); 89 90 return (_db_factory_serialize(df, _CITRUS_LOOKUP_MAGIC, r)); 91 } 92 93 int 94 _citrus_lookup_factory_convert(FILE *out, FILE *in) 95 { 96 struct _citrus_db_factory *df; 97 struct _region r; 98 char *line; 99 size_t size; 100 int ret; 101 102 ret = _db_factory_create(&df, &_db_hash_std, NULL); 103 if (ret) 104 return (ret); 105 106 while ((line = fgetln(in, &size)) != NULL) 107 if ((ret = convert_line(df, line, size))) { 108 _db_factory_free(df); 109 return (ret); 110 } 111 112 ret = dump_db(df, &r); 113 _db_factory_free(df); 114 if (ret) 115 return (ret); 116 117 if (fwrite(_region_head(&r), _region_size(&r), 1, out) != 1) 118 return (errno); 119 120 return (0); 121 } 122