i18npool/source/indexentry/genindex_data.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include <stdio.h>
  22 #include <string.h>
  23 #include <stdlib.h>
  24 #include <errno.h>
  25 #include <sal/main.h>
  26 #include <sal/types.h>
  27 #include <rtl/ustring.hxx>
  28
  29 #define MAX_ADDRESS 0x30000
  30 #define MAX_INDEX MAX_ADDRESS/0x100
  31
  32 using namespace ::rtl;
  33
  34 /* Main Procedure */
  35
  36 SAL_IMPLEMENT_MAIN_WITH_ARGS(argc, argv)
  37 {
  38     FILE *fp;
  39
  40     if (argc < 4) exit(-1);
  41
  42     fp = fopen(argv[1], "rb");  // open the source file for read;
  43     if (fp == NULL) {
  44         fprintf(stderr, "Opening the rule source file %s for reading failed: %s\n", argv[1], strerror(errno));
  45         exit(1);
  46     }
  47
  48
  49     sal_Int32 i, j, k;
  50     sal_Int32 address[MAX_ADDRESS];
  51     for (i=0; i<MAX_ADDRESS; i++) address[i]=-1;
  52     OUString sep=OUString(sal_Unicode('|'));
  53     OUString result=sep;
  54     sal_Int32 max=0;
  55
  56     sal_Char str[1024];
  57     while (fgets(str, 1024, fp)) {
  58         // don't convert last new line character to Ostr.
  59         sal_Int32 len = strlen(str) - 1;
  60         // skip comment line
  61         if (len == 0 || str[0] == '#')
  62             continue;
  63
  64         // input file is in UTF-8 encoding
  65         OUString Ostr = OUString((const sal_Char *)str, len, RTL_TEXTENCODING_UTF8);
  66         len = Ostr.getLength();
  67         if (len == 0)
  68             continue; // skip empty line.
  69
  70         sal_Int32 nPos=0;
  71         sal_uInt32 nChar = Ostr.iterateCodePoints(&nPos, 2);
  72         if (nChar >= MAX_ADDRESS) {
  73             printf("Code point 0x%lx exceeds MAX_ADDRESS 0x%x, Please increase MAX_ADDRESS", static_cast<long unsigned int>(nChar), MAX_ADDRESS);
  74             exit(1);
  75         }
  76         OUString key=Ostr.copy(nPos)+sep;
  77         sal_Int32 idx = result.indexOf(key);
  78         if (key.getLength() > max) max=key.getLength();
  79         if (idx >= 0) {
  80             address[nChar]=idx;
  81         } else {
  82             address[nChar]=result.getLength();
  83             result+=key;
  84         }
  85     }
  86     fclose(fp);
  87
  88     fp = fopen(argv[2], "wb");
  89     if (fp == NULL) {
  90         fprintf(stderr, "Opening %s for writing failed: %s\n", argv[2], strerror(errno));
  91         exit(1);
  92     }
  93
  94     fprintf(fp, "/*\n");
  95     fprintf(fp, " * Copyright(c) 1999 - 2006, Sun Microsystems, Inc.\n");
  96     fprintf(fp, " * All Rights Reserved.\n");
  97     fprintf(fp, " */\n\n");
  98     fprintf(fp, "/* !!!The file is generated automatically. DONOT edit the file manually!!! */\n\n");
  99     fprintf(fp, "#include <sal/types.h>\n");
 100     fprintf(fp, "\nextern \"C\" {\n");
 101
 102     sal_Int32 index[MAX_INDEX];
 103     sal_Int32 max_index=0;
 104     for (i=k=0; i<MAX_INDEX; i++) {
 105         index[i] = 0xFFFF;
 106         for (j=0; j<0x100; j++) {
 107             if (address[i*0x100+j] >=0) {
 108                 max_index=i;
 109                 index[i]=0x100*k++;
 110                 break;
 111             }
 112         }
 113     }
 114
 115     fprintf(fp, "\nstatic const sal_uInt16 idx1[] = {");
 116     for (i = k = 0; i <= max_index;  i++) {
 117         if (k++ % 16 == 0) fprintf(fp, "\n\t");
 118         fprintf(
 119             fp, "0x%04lx, ", sal::static_int_cast< unsigned long >(index[i]));
 120     }
 121     fprintf(fp, "\n};\n\n");
 122
 123     sal_Int32 len=result.getLength();
 124     const sal_Unicode *ustr=result.getStr();
 125     fprintf(fp, "\nstatic const sal_uInt16 idx2[] = {");
 126     for (i = k = 0; i <= max_index; i++) {
 127         if (index[i] != 0xFFFF) {
 128             for (j = 0; j<0x100; j++) {
 129                 if (k++ % 16 == 0) fprintf(fp, "\n\t");
 130                 sal_Int32 ad=address[i*0x100+j];
 131                 fprintf(
 132                     fp, "0x%04lx, ",
 133                     sal::static_int_cast< unsigned long >(
 134                         ad == -1 ? 0 : max == 2 ? ustr[ad] : ad));
 135             }
 136             fprintf(fp, "\n\t");
 137         }
 138     }
 139     fprintf(fp, "\n};\n\n");
 140
 141     if (max == 2) {
 142         fprintf(fp, "\nstatic const sal_uInt16 *idx3 = NULL;\n\n");
 143     } else {
 144         fprintf(fp, "\nstatic const sal_uInt16 idx3[] = {");
 145         for (i = k = 0; i < len;  i++) {
 146             if (k++ % 16 == 0) fprintf(fp, "\n\t");
 147             fprintf(fp, "0x%04x, ", (sep.toChar() == ustr[i]) ? 0 : ustr[i]);
 148         }
 149         fprintf(fp, "\n};\n\n");
 150     }
 151
 152     fprintf(fp, "const sal_uInt16** get_%s(sal_Int16 &max_index)\n{\n\tstatic const sal_uInt16 *idx[]={idx1, idx2, idx3};\n\tmax_index=0x%x;\n\treturn idx;\n}\n\n", argv[3], static_cast<unsigned int>(max_index));
 153     fprintf (fp, "}\n");
 154
 155     fclose(fp);
 156     return 0;
 157 }   // End of main
 158
 159 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */