mirror of
https://github.com/MariaDB/server.git
synced 2025-01-26 08:44:33 +01:00
conf_to_src.c:
Getting closer strings/conf_to_src.c: Getting closer
This commit is contained in:
parent
307ed01440
commit
e528943fca
1 changed files with 99 additions and 151 deletions
|
@ -14,8 +14,6 @@
|
|||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
|
||||
|
||||
/* can't use -lmysys because this prog is used to create -lstrings */
|
||||
|
||||
#include <ctype.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
|
@ -32,94 +30,28 @@
|
|||
#define TO_LOWER_TABLE_SIZE 256
|
||||
#define TO_UPPER_TABLE_SIZE 256
|
||||
#define SORT_ORDER_TABLE_SIZE 256
|
||||
#define ROW_LEN 16
|
||||
|
||||
char *prog;
|
||||
char buf[1024], *p, *endptr;
|
||||
|
||||
|
||||
void
|
||||
print_array(FILE *f, const char *set, const char *name, int n)
|
||||
{
|
||||
int i;
|
||||
char val[100];
|
||||
|
||||
printf("uchar %s_%s[] = {\n", name, set);
|
||||
|
||||
p = buf;
|
||||
*buf = '\0';
|
||||
for (i = 0; i < n; ++i)
|
||||
{
|
||||
/* get a word from f */
|
||||
endptr = p;
|
||||
for (;;)
|
||||
{
|
||||
while (isspace((* (unsigned char*) endptr)))
|
||||
++endptr;
|
||||
if (*endptr && *endptr != '#') /* not comment */
|
||||
break;
|
||||
if ((fgets(buf, sizeof(buf), f)) == NULL)
|
||||
return; /* XXX: break silently */
|
||||
endptr = buf;
|
||||
}
|
||||
|
||||
p = val;
|
||||
while (!isspace((* (unsigned char*) endptr)))
|
||||
*p++ = *endptr++;
|
||||
*p = '\0';
|
||||
p = endptr;
|
||||
|
||||
/* write the value out */
|
||||
|
||||
if (i == 0 || i % ROW_LEN == n % ROW_LEN)
|
||||
printf(" ");
|
||||
|
||||
printf("%3d", (unsigned char) strtol(val, (char **) NULL, 16));
|
||||
|
||||
if (i < n - 1)
|
||||
printf(",");
|
||||
|
||||
if ((i+1) % ROW_LEN == n % ROW_LEN)
|
||||
printf("\n");
|
||||
}
|
||||
|
||||
printf("};\n\n");
|
||||
}
|
||||
|
||||
void
|
||||
print_arrays_for(char *set)
|
||||
{
|
||||
FILE *f;
|
||||
|
||||
sprintf(buf, "%s.conf", set);
|
||||
|
||||
if ((f = fopen(buf, "r")) == NULL) {
|
||||
fprintf(stderr, "%s: can't read conf file for charset %s\n", prog, set);
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
printf("\
|
||||
/* The %s character set. Generated automatically by\n\
|
||||
* the %s program\n\
|
||||
*/\n\n",
|
||||
set, prog);
|
||||
|
||||
/* it would be nice if this used the code in mysys/charset.c, but... */
|
||||
print_array(f, set, "ctype", CTYPE_TABLE_SIZE);
|
||||
print_array(f, set, "to_lower", TO_LOWER_TABLE_SIZE);
|
||||
print_array(f, set, "to_upper", TO_UPPER_TABLE_SIZE);
|
||||
print_array(f, set, "sort_order", SORT_ORDER_TABLE_SIZE);
|
||||
printf("\n");
|
||||
|
||||
fclose(f);
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
#define MAX_BUF 16*1024
|
||||
|
||||
static CHARSET_INFO all_charsets[256];
|
||||
|
||||
|
||||
void
|
||||
print_array(FILE *f, const char *set, const char *name, uchar *a, int n)
|
||||
{
|
||||
int i;
|
||||
|
||||
fprintf(f,"uchar %s_%s[] = {\n", name, set);
|
||||
|
||||
for (i=0 ;i<n ; i++)
|
||||
{
|
||||
fprintf(f,"0x%02X%s%s",a[i], (i+1<n) ? "," :"", i % 16 ? "" : "\n");
|
||||
}
|
||||
fprintf(f,"};\n\n");
|
||||
}
|
||||
|
||||
|
||||
|
||||
static int get_charset_number(const char *charset_name)
|
||||
{
|
||||
CHARSET_INFO *cs;
|
||||
|
@ -207,7 +139,7 @@ static int my_read_charset_file(const char *filename)
|
|||
|
||||
if ((fd=open(filename,O_RDONLY)) < 0)
|
||||
{
|
||||
printf("Can't open '%s'\n",filename);
|
||||
fprintf(stderr,"Can't open '%s'\n",filename);
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
@ -227,69 +159,69 @@ static int my_read_charset_file(const char *filename)
|
|||
return FALSE;
|
||||
}
|
||||
|
||||
void dispcset(CHARSET_INFO *cs)
|
||||
void dispcset(FILE *f,CHARSET_INFO *cs)
|
||||
{
|
||||
printf("{\n");
|
||||
printf(" %d,\n",cs->number);
|
||||
printf(" MY_CS_COMPILED,\n");
|
||||
fprintf(f,"{\n");
|
||||
fprintf(f," %d,\n",cs->number);
|
||||
fprintf(f," MY_CS_COMPILED,\n");
|
||||
|
||||
if (cs->name)
|
||||
{
|
||||
printf(" \"%s\",\n",cs->name);
|
||||
printf(" \"%s\",\n",cs->csname);
|
||||
printf(" \"\",\n");
|
||||
printf(" ctype_%s,\n",cs->name);
|
||||
printf(" to_lower_%s,\n",cs->name);
|
||||
printf(" to_upper_%s,\n",cs->name);
|
||||
printf(" sort_order_%s,\n",cs->name);
|
||||
printf(" to_uni_%s,\n",cs->name);
|
||||
printf(" from_uni_%s,\n",cs->name);
|
||||
fprintf(f," \"%s\",\n",cs->name);
|
||||
fprintf(f," \"%s\",\n",cs->csname);
|
||||
fprintf(f," \"\",\n");
|
||||
fprintf(f," ctype_%s,\n",cs->name);
|
||||
fprintf(f," to_lower_%s,\n",cs->name);
|
||||
fprintf(f," to_upper_%s,\n",cs->name);
|
||||
fprintf(f," sort_order_%s,\n",cs->name);
|
||||
fprintf(f," to_uni_%s,\n",cs->name);
|
||||
fprintf(f," from_uni_%s,\n",cs->name);
|
||||
}
|
||||
else
|
||||
{
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
}
|
||||
|
||||
printf(" %d,\n",cs->strxfrm_multiply);
|
||||
printf(" my_strnncoll_simple,\n");
|
||||
printf(" my_strnxfrm_simple,\n");
|
||||
printf(" my_like_range_simple,\n");
|
||||
printf(" my_wild_cmp_8bit,\n");
|
||||
printf(" %d,\n",cs->mbmaxlen);
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" NULL,\n");
|
||||
printf(" my_mb_wc_8bit,\n");
|
||||
printf(" my_wc_mb_8bit,\n");
|
||||
printf(" my_caseup_str_8bit,\n");
|
||||
printf(" my_casedn_str_8bit,\n");
|
||||
printf(" my_caseup_8bit,\n");
|
||||
printf(" my_casedn_8bit,\n");
|
||||
printf(" my_tosort_8bit,\n");
|
||||
printf(" my_strcasecmp_8bit,\n");
|
||||
printf(" my_strncasecmp_8bit,\n");
|
||||
printf(" my_hash_caseup_simple,\n");
|
||||
printf(" my_hash_sort_simple,\n");
|
||||
printf(" 0,\n");
|
||||
printf(" my_snprintf_8bit,\n");
|
||||
printf(" my_long10_to_str_8bit,\n");
|
||||
printf(" my_longlong10_to_str_8bit,\n");
|
||||
printf(" my_fill_8bit,\n");
|
||||
printf(" my_strntol_8bit,\n");
|
||||
printf(" my_strntoul_8bit,\n");
|
||||
printf(" my_strntoll_8bit,\n");
|
||||
printf(" my_strntoull_8bit,\n");
|
||||
printf(" my_strntod_8bit,\n");
|
||||
printf(" my_scan_8bit\n");
|
||||
printf("}\n");
|
||||
fprintf(f," %d,\n",cs->strxfrm_multiply);
|
||||
fprintf(f," my_strnncoll_simple,\n");
|
||||
fprintf(f," my_strnxfrm_simple,\n");
|
||||
fprintf(f," my_like_range_simple,\n");
|
||||
fprintf(f," my_wild_cmp_8bit,\n");
|
||||
fprintf(f," %d,\n",cs->mbmaxlen);
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," NULL,\n");
|
||||
fprintf(f," my_mb_wc_8bit,\n");
|
||||
fprintf(f," my_wc_mb_8bit,\n");
|
||||
fprintf(f," my_caseup_str_8bit,\n");
|
||||
fprintf(f," my_casedn_str_8bit,\n");
|
||||
fprintf(f," my_caseup_8bit,\n");
|
||||
fprintf(f," my_casedn_8bit,\n");
|
||||
fprintf(f," my_tosort_8bit,\n");
|
||||
fprintf(f," my_strcasecmp_8bit,\n");
|
||||
fprintf(f," my_strncasecmp_8bit,\n");
|
||||
fprintf(f," my_hash_caseup_simple,\n");
|
||||
fprintf(f," my_hash_sort_simple,\n");
|
||||
fprintf(f," 0,\n");
|
||||
fprintf(f," my_snprintf_8bit,\n");
|
||||
fprintf(f," my_long10_to_str_8bit,\n");
|
||||
fprintf(f," my_longlong10_to_str_8bit,\n");
|
||||
fprintf(f," my_fill_8bit,\n");
|
||||
fprintf(f," my_strntol_8bit,\n");
|
||||
fprintf(f," my_strntoul_8bit,\n");
|
||||
fprintf(f," my_strntoll_8bit,\n");
|
||||
fprintf(f," my_strntoull_8bit,\n");
|
||||
fprintf(f," my_strntod_8bit,\n");
|
||||
fprintf(f," my_scan_8bit\n");
|
||||
fprintf(f,"}\n");
|
||||
}
|
||||
|
||||
|
||||
|
@ -299,6 +231,7 @@ main(int argc, char **argv __attribute__((unused)))
|
|||
CHARSET_INFO ncs;
|
||||
CHARSET_INFO *cs;
|
||||
char filename[256];
|
||||
FILE *f= stdout;
|
||||
|
||||
if (argc < 2)
|
||||
{
|
||||
|
@ -312,7 +245,6 @@ main(int argc, char **argv __attribute__((unused)))
|
|||
sprintf(filename,"%s/%s",argv[1],"Index.xml");
|
||||
my_read_charset_file(filename);
|
||||
|
||||
printf("CHARSET_INFO compiled_charsets[] = {\n");
|
||||
for (cs=all_charsets; cs < all_charsets+256; cs++)
|
||||
{
|
||||
if (cs->number)
|
||||
|
@ -322,19 +254,35 @@ main(int argc, char **argv __attribute__((unused)))
|
|||
sprintf(filename,"%s/%s.xml",argv[1],cs->csname);
|
||||
my_read_charset_file(filename);
|
||||
}
|
||||
|
||||
if (simple_cs_is_full)
|
||||
{
|
||||
printf("#ifdef HAVE_CHARSET_%s\n",cs->csname);
|
||||
dispcset(cs);
|
||||
printf(",\n");
|
||||
printf("#endif\n");
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
dispcset(&ncs);
|
||||
printf("};\n");
|
||||
for (cs=all_charsets; cs < all_charsets+256; cs++)
|
||||
{
|
||||
if (simple_cs_is_full(cs))
|
||||
{
|
||||
print_array(f, cs->name, "ctype", cs->ctype, CTYPE_TABLE_SIZE);
|
||||
print_array(f, cs->name, "to_lower", cs->to_lower, TO_LOWER_TABLE_SIZE);
|
||||
print_array(f, cs->name, "to_upper", cs->to_upper, TO_UPPER_TABLE_SIZE);
|
||||
print_array(f, cs->name, "sort_order", cs->sort_order, SORT_ORDER_TABLE_SIZE);
|
||||
fprintf(f,"\n");
|
||||
}
|
||||
}
|
||||
|
||||
fprintf(f,"CHARSET_INFO compiled_charsets[] = {\n");
|
||||
for (cs=all_charsets; cs < all_charsets+256; cs++)
|
||||
{
|
||||
if (simple_cs_is_full(cs))
|
||||
{
|
||||
fprintf(f,"#ifdef HAVE_CHARSET_%s\n",cs->csname);
|
||||
dispcset(f,cs);
|
||||
fprintf(f,",\n");
|
||||
fprintf(f,"#endif\n");
|
||||
}
|
||||
}
|
||||
|
||||
dispcset(f,&ncs);
|
||||
fprintf(f,"};\n");
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue