106 lines
3.4 KiB
C++
106 lines
3.4 KiB
C++
|
/*
|
||
|
|
* Copyright (C) 2023 The C++ Plus Project.
|
||
|
|
* This file is part of the cppp-reiconv Library.
|
||
|
|
*
|
||
|
|
* The cppp-reiconv Library is free software; you can redistribute it
|
||
|
|
* and/or modify it under the terms of the GNU Lesser General Public
|
||
|
|
* License as published by the Free Software Foundation; either version 3
|
||
|
|
* of the License, or (at your option) any later version.
|
||
|
|
*
|
||
|
|
* The cppp-reiconv 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
|
||
|
|
* Lesser General Public License for more details.
|
||
|
|
*
|
||
|
|
* You should have received a copy of the GNU Lesser General Public
|
||
|
|
* License along with the cppp-reiconv Library; see the file COPYING.
|
||
|
|
* If not, see <https://www.gnu.org/licenses/>.
|
||
|
|
*/
|
||
|
|
|
||
|
|
/* Creates the aliases2.h table. */
|
||
|
|
|
||
|
|
#include <iostream>
|
||
|
|
|
||
|
|
static unsigned int counter = 0;
|
||
|
|
|
||
|
|
static void emit_alias(FILE* out, const char* tag, const char* alias, const char* c_name)
|
||
|
|
{
|
||
|
|
fprintf(out, " S(%s_%u, \"", tag, counter);
|
||
|
|
/* 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, out);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
fprintf(out, "\", ei_%s )\n", c_name);
|
||
|
|
counter++;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void emit_encoding(FILE* out, const char* tag, const char* const* names, size_t n, const char* c_name)
|
||
|
|
{
|
||
|
|
for (; n > 0; names++, n--)
|
||
|
|
emit_alias(out, tag, *names, c_name);
|
||
|
|
}
|
||
|
|
|
||
|
|
int main(int argc, char* argv[])
|
||
|
|
{
|
||
|
|
const char* tag;
|
||
|
|
char* aliases_file_name;
|
||
|
|
FILE* aliases_file;
|
||
|
|
|
||
|
|
if (argc != 3)
|
||
|
|
{
|
||
|
|
fprintf(stderr, "Usage: genaliases2 tag aliases.h\n");
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
tag = argv[1];
|
||
|
|
aliases_file_name = argv[2];
|
||
|
|
|
||
|
|
aliases_file = fopen(aliases_file_name, "w");
|
||
|
|
if (aliases_file == NULL)
|
||
|
|
{
|
||
|
|
fprintf(stderr, "Could not open '%s' for writing\n", aliases_file_name);
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
#define DEFENCODING(xxx_names, codepage, xxx, xxx_ifuncs1, xxx_ifuncs2, xxx_ofuncs1, xxx_ofuncs2) \
|
||
|
|
{ \
|
||
|
|
static const char* const names[] = BRACIFY xxx_names; \
|
||
|
|
emit_encoding(aliases_file, tag, names, sizeof(names) / sizeof(names[0]), #xxx); \
|
||
|
|
}
|
||
|
|
#define BRACIFY(...) \
|
||
|
|
{ \
|
||
|
|
__VA_ARGS__ \
|
||
|
|
}
|
||
|
|
#define DEFALIAS(xxx_alias, xxx) emit_alias(aliases_file, tag, xxx_alias, #xxx);
|
||
|
|
#ifdef USE_AIX
|
||
|
|
#include "encodings_aix.def"
|
||
|
|
#endif
|
||
|
|
#ifdef USE_OSF1
|
||
|
|
#include "encodings_osf1.def"
|
||
|
|
#endif
|
||
|
|
#ifdef USE_DOS
|
||
|
|
#include "encodings_dos.def"
|
||
|
|
#endif
|
||
|
|
#ifdef USE_ZOS
|
||
|
|
#include "encodings_zos.def"
|
||
|
|
#endif
|
||
|
|
#ifdef USE_EXTRA
|
||
|
|
#include "encodings_extra.def"
|
||
|
|
#endif
|
||
|
|
#undef DEFALIAS
|
||
|
|
#undef BRACIFY
|
||
|
|
#undef DEFENCODING
|
||
|
|
if (ferror(aliases_file) || fclose(aliases_file))
|
||
|
|
return 1;
|
||
|
|
return 0;
|
||
|
|
}
|