From fcbf63e62c627deae76c1b8cb8c0876c536ed811 Mon Sep 17 00:00:00 2001 From: Jari Vetoniemi Date: Mon, 16 Mar 2020 18:49:26 +0900 Subject: Fresh start --- jni/iconv/lib/genaliases.c | 104 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 104 insertions(+) create mode 100644 jni/iconv/lib/genaliases.c (limited to 'jni/iconv/lib/genaliases.c') diff --git a/jni/iconv/lib/genaliases.c b/jni/iconv/lib/genaliases.c new file mode 100644 index 0000000..b54b97d --- /dev/null +++ b/jni/iconv/lib/genaliases.c @@ -0,0 +1,104 @@ +/* Copyright (C) 1999-2001, 2003, 2005, 2008 Free Software Foundation, Inc. + This file is part of the GNU LIBICONV Library. + + The GNU LIBICONV Library is free software; you can redistribute it + and/or modify it under the terms of the GNU Library General Public + License as published by the Free Software Foundation; either version 2 + of the License, or (at your option) any later version. + + The GNU LIBICONV Library is distributed in the hope that it will be + useful, but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with the GNU LIBICONV Library; see the file COPYING.LIB. + If not, write to the Free Software Foundation, Inc., 51 Franklin Street, + Fifth Floor, Boston, MA 02110-1301, USA. */ + +/* Creates the aliases.gperf table. */ + +#include +#include + +static void emit_alias (FILE* out1, const char* alias, const char* c_name) +{ + /* Output alias in upper case. */ + const char* s = alias; + for (; *s; s++) { + unsigned char c = * (unsigned char *) s; + if (c >= 0x80) + exit(1); + if (c >= 'a' && c <= 'z') + c -= 'a'-'A'; + putc(c, out1); + } + fprintf(out1,", ei_%s\n", c_name); +} + +static void emit_encoding (FILE* out1, FILE* out2, const char* const* names, size_t n, const char* c_name) +{ + fprintf(out2,"grep 'sizeof(\""); + /* Output *names in upper case. */ + { + const char* s = *names; + for (; *s; s++) { + unsigned char c = * (unsigned char *) s; + if (c >= 0x80) + exit(1); + if (c >= 'a' && c <= 'z') + c -= 'a'-'A'; + putc(c, out2); + } + } + fprintf(out2,"\")' tmp.h | sed -e 's|^.*\\(stringpool_str[0-9]*\\).*$| (int)(long)\\&((struct stringpool_t *)0)->\\1,|'\n"); + for (; n > 0; names++, n--) + emit_alias(out1, *names, c_name); +} + +int main () +{ + FILE* stdout2; + + printf("struct alias { int name; unsigned int encoding_index; };\n"); + printf("%%struct-type\n"); + printf("%%language=ANSI-C\n"); + printf("%%define hash-function-name aliases_hash\n"); + printf("%%define lookup-function-name aliases_lookup\n"); + printf("%%7bit\n"); + printf("%%readonly-tables\n"); + printf("%%global-table\n"); + printf("%%define word-array-name aliases\n"); + printf("%%pic\n"); + printf("%%%%\n"); + +#define DEFENCODING(xxx_names,xxx,xxx_ifuncs1,xxx_ifuncs2,xxx_ofuncs1,xxx_ofuncs2) \ + { \ + static const char* const names[] = BRACIFY xxx_names; \ + emit_encoding(stdout,stdout2,names,sizeof(names)/sizeof(names[0]),#xxx); \ + } +#define BRACIFY(...) { __VA_ARGS__ } +#define DEFALIAS(xxx_alias,xxx) emit_alias(stdout,xxx_alias,#xxx); + + stdout2 = fdopen(3, "w"); + if (stdout2 == NULL) + exit(1); +#include "encodings.def" + if (fclose(stdout2)) + exit(1); + + stdout2 = fdopen(4, "w"); + if (stdout2 == NULL) + exit(1); +#include "encodings_local.def" + if (fclose(stdout2)) + exit(1); + +#undef DEFALIAS +#undef BRACIFY +#undef DEFENCODING + + if (ferror(stdout) || fclose(stdout)) + exit(1); + exit(0); +} -- cgit v1.2.3