Annotation of gpl/axl/babel/gen-table.c, revision 1.1
1.1 ! misho 1: #include <stdio.h>
! 2: #include <axl.h>
! 3:
! 4: int main (int argc, char ** argv)
! 5: {
! 6: FILE * file;
! 7: FILE * file2;
! 8: FILE * output;
! 9: char buffer[2];
! 10: char buffer2[4];
! 11: int iterator;
! 12: char * tolower_encoding;
! 13: char * toupper_encoding;
! 14: char * encoding;
! 15: char * string_aux;
! 16: int max_value;
! 17:
! 18: if (argc != 4) {
! 19: printf ("Please ejecute: ./gen-table ORIGINAL_FILE UTF8-TRANSLATE-FILE CODING-NAME\n");
! 20: return -1;
! 21: }
! 22:
! 23: file = fopen (argv[1], "r");
! 24: if (file == NULL) {
! 25: printf ("failed to open: %s..\n", argv[1]);
! 26: return -1;
! 27: }
! 28:
! 29: file2 = fopen (argv[2], "r");
! 30: if (file2 == NULL) {
! 31: printf ("failed to open: %s..\n", argv[2]);
! 32: return -1;
! 33: }
! 34:
! 35:
! 36: encoding = (char *) argv[3];
! 37: tolower_encoding = axl_stream_to_lower_copy (encoding);
! 38: axl_stream_remove (tolower_encoding, "-", axl_false);
! 39: axl_stream_remove (tolower_encoding, ".", axl_false);
! 40:
! 41: toupper_encoding = axl_stream_to_upper_copy (encoding);
! 42: axl_stream_remove (toupper_encoding, "-", axl_false);
! 43: axl_stream_remove (toupper_encoding, ".", axl_false);
! 44:
! 45: /* open output */
! 46: string_aux = axl_strdup_printf ("axl_babel_%s.c", tolower_encoding);
! 47: output = fopen (string_aux, "w");
! 48: if (output == NULL) {
! 49: printf ("failed to open output: %s..\n", string_aux);
! 50: axl_free (string_aux);
! 51: return -1;
! 52: }
! 53:
! 54:
! 55: fprintf (output, "/**\n");
! 56: fprintf (output, " * Axl Babel: encoding support for axl: %s coding\n", encoding);
! 57: fprintf (output, " * Copyright (C) 2008 Advanced Software Production Line, S.L.\n");
! 58: fprintf (output, " */\n\n");
! 59: fprintf (output, "/* include base header */\n");
! 60: fprintf (output, "#include <axl_babel_%s.h>\n\n", tolower_encoding);
! 61:
! 62: fprintf (output, "/**\n");
! 63: fprintf (output, " * @brief Creates the translation table for %s representation\n",
! 64: encoding);
! 65: fprintf (output, " * to move information from %s to utf-8 and viceversa.\n", encoding);
! 66: fprintf (output, " */\n");
! 67: fprintf (output, "axlBabelTable * axl_babel_build_%s_table (void) {\n\n", tolower_encoding);
! 68:
! 69: fprintf (output, "\taxlBabelTable * table;\n\n");
! 70:
! 71: /* foreach item at the original array do */
! 72: iterator = 0;
! 73: while (fread (buffer, 1, 1, file) == 1) {
! 74:
! 75: /* read the terminator */
! 76: if (fread (&(buffer[1]), 1, 1, file) != 1) {
! 77: break;
! 78: }
! 79: iterator++;
! 80: } /* end file */
! 81: fclose (file);
! 82:
! 83: /* record max value */
! 84: max_value = iterator;
! 85:
! 86: file = fopen (argv[1], "r");
! 87: if (file == NULL) {
! 88: printf ("failed to open: %s..\n", argv[1]);
! 89: return -1;
! 90: }
! 91:
! 92: fprintf (output, "\t/* create the table to hold information translate %s encoding */\n", encoding);
! 93: fprintf (output, "\ttable = axl_new (axlBabelTable, %d);\n\n", iterator);
! 94:
! 95: /* foreach item at the original array do */
! 96: iterator = 0;
! 97: while (fread (buffer, 1, 1, file) == 1) {
! 98:
! 99: /* read character from base file */
! 100: if (fread (&(buffer[1]), 1, 1, file) != 1) {
! 101: break;
! 102: }
! 103:
! 104: if (buffer[1] != '\n') {
! 105: printf ("ERROR (1): Expected to find new line character at=%d..\n", iterator);
! 106: return -1;
! 107: }
! 108:
! 109: /* check max value here */
! 110: if (iterator >= max_value) {
! 111: printf ("ERROR (2): Reached max value expected at the translated file. Translation table must have a 1:1 relation.\n");
! 112: return -1;
! 113: }
! 114:
! 115: /* read content from translated file */
! 116: if (fread (buffer2, 1, 1, file2) != 1) {
! 117: printf ("ERROR (3): failed to read utf-8 file at iterator=%d (while handling buffer[0]='%c' (%u)..\n",
! 118: iterator, buffer[0], (unsigned char) buffer[0]);
! 119: return -1;
! 120: } /* end if */
! 121:
! 122: if (buffer2[0] == '\n' && buffer[0] != '\n') {
! 123: printf ("WARN: found no definition for buffer[0]='%c' (%u), iterator=%d..\n",
! 124: buffer[0], (unsigned char) buffer[0], iterator);
! 125: fprintf (output, "\t/* store item associated to code %d */\n", iterator);
! 126: fprintf (output, "\ttable[%d].size = 1;\n", iterator);
! 127: fprintf (output, "\ttable[%d].buffer[0] = 0; /* unsupported translation */\n\n", iterator);
! 128: iterator++;
! 129: continue;
! 130: }
! 131:
! 132: if (fread (&(buffer2[1]), 1, 1, file2) != 1) {
! 133: printf ("ERROR (4): failed to read utf-8 file (while handling buffer[0]='%c'..\n", iterator);
! 134: return -1;
! 135: } /* end if */
! 136:
! 137: if (buffer2[1] == '\n') {
! 138: fprintf (output, "\t/* store item associated to code %d */\n", iterator);
! 139: fprintf (output, "\ttable[%d].size = 1;\n", iterator);
! 140: fprintf (output, "\ttable[%d].buffer[0] = (unsigned char) %d; /* 0x%x */\n\n", iterator, (unsigned char) iterator, (unsigned char) iterator);
! 141: iterator++;
! 142: continue;
! 143: }
! 144:
! 145: if (fread (&(buffer2[2]), 1, 1, file2) != 1) {
! 146: printf ("ERROR (5): failed to read utf-8 file (2 type unit)..\n");
! 147: return -1;
! 148: } /* end if */
! 149:
! 150: if (buffer2[2] == '\n') {
! 151: fprintf (output, "\t/* store item associated to code %d */\n", iterator);
! 152: fprintf (output, "\ttable[%d].size = 2;\n", iterator);
! 153: fprintf (output, "\ttable[%d].buffer[0] = (unsigned char) %u; /* 0x%x */\n", iterator, (unsigned char) buffer2[0], (unsigned char) buffer2[0]);
! 154: fprintf (output, "\ttable[%d].buffer[1] = (unsigned char) %u; /* 0x%x */\n\n", iterator, (unsigned char) buffer2[1], (unsigned char) buffer2[1]);
! 155: iterator++;
! 156: continue;
! 157: }
! 158:
! 159: if (fread (&(buffer2[3]), 1, 1, file2) != 1) {
! 160: printf ("ERROR (6): failed to read utf-8 file (3 type unit)..\n");
! 161: return -1;
! 162: } /* end if */
! 163:
! 164: fprintf (output, "\t/* store item associated to code %d */\n", iterator);
! 165: fprintf (output, "\ttable[%d].size = 3;\n", iterator);
! 166: fprintf (output, "\ttable[%d].buffer[0] = (unsigned char) %u; /* 0x%x */\n", iterator, (unsigned char) buffer2[0], (unsigned char) buffer2[0]);
! 167: fprintf (output, "\ttable[%d].buffer[1] = (unsigned char) %u; /* 0x%x */\n", iterator, (unsigned char) buffer2[1], (unsigned char) buffer2[1]);
! 168: fprintf (output, "\ttable[%d].buffer[2] = (unsigned char) %u; /* 0x%x */\n\n", iterator, (unsigned char) buffer2[2], (unsigned char) buffer2[2]);
! 169: iterator++;
! 170: continue;
! 171:
! 172: }
! 173: fclose (file);
! 174:
! 175: fprintf (output, "\t/* return table created */\n");
! 176: fprintf (output, "\treturn table;\n\n");
! 177:
! 178: fprintf (output, "} /* end axl_babel_build_%s_table */\n\n", tolower_encoding);
! 179:
! 180: /* close file */
! 181: fclose (output);
! 182: printf ("ok, result at: %s..\n", string_aux);
! 183: axl_free (string_aux);
! 184:
! 185: /* now write header */
! 186: string_aux = axl_strdup_printf ("axl_babel_%s.h", tolower_encoding);
! 187: output = fopen (string_aux, "w");
! 188: if (output == NULL) {
! 189: printf ("failed to open output: %s..\n", string_aux);
! 190: axl_free (string_aux);
! 191: return -1;
! 192: }
! 193:
! 194: fprintf (output, "/**\n");
! 195: fprintf (output, " * Axl Babel: encoding support for axl: %s coding\n", encoding);
! 196: fprintf (output, " * Copyright (C) 2008 Advanced Software Production Line, S.L.\n");
! 197: fprintf (output, " */\n\n");
! 198: fprintf (output, "/* include base header */\n");
! 199: fprintf (output, "#include <axl_babel.h>\n\n");
! 200:
! 201: fprintf (output, "#ifndef __AXL_BABEL_%s_H__\n", toupper_encoding);
! 202: fprintf (output, "#define __AXL_BABEL_%s_H__\n\n", toupper_encoding);
! 203:
! 204: fprintf (output, "/**\n");
! 205: fprintf (output, " * @brief Creates the translation table for %s representation to move information\n",
! 206: encoding);
! 207: fprintf (output, " * from %s to utf-8 and viceversa.\n", encoding);
! 208: fprintf (output, " */\n");
! 209: fprintf (output, "axlBabelTable * axl_babel_build_%s_table (void);\n", tolower_encoding);
! 210:
! 211: fprintf (output, "\n");
! 212: fprintf (output, "#endif /* end __AXL_BABEL_%s_H__ */\n\n", toupper_encoding);
! 213:
! 214: /* close file */
! 215: fclose (output);
! 216: printf ("ok, result at: %s..\n", string_aux);
! 217: axl_free (string_aux);
! 218:
! 219: /* free values */
! 220: axl_free (toupper_encoding);
! 221: axl_free (tolower_encoding);
! 222:
! 223: return 0;
! 224: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to gen-table.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / gpl / axl / babel