/[pcre]/code/trunk/dftables.c
ViewVC logotype

Diff of /code/trunk/dftables.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 43 by nigel, Sat Feb 24 21:39:21 2007 UTC revision 128 by ph10, Tue Mar 20 11:46:50 2007 UTC
# Line 2  Line 2 
2  *      Perl-Compatible Regular Expressions       *  *      Perl-Compatible Regular Expressions       *
3  *************************************************/  *************************************************/
4    
5  /*  /* PCRE is a library of functions to support regular expressions whose syntax
 PCRE is a library of functions to support regular expressions whose syntax  
6  and semantics are as close as possible to those of the Perl 5 language.  and semantics are as close as possible to those of the Perl 5 language.
7    
8  Written by: Philip Hazel <ph10@cam.ac.uk>                         Written by Philip Hazel
9               Copyright (c) 1997-2007 University of Cambridge
10    
            Copyright (c) 1997-2000 University of Cambridge  
   
 -----------------------------------------------------------------------------  
 Permission is granted to anyone to use this software for any purpose on any  
 computer system, and to redistribute it freely, subject to the following  
 restrictions:  
   
 1. This software 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.  
   
 2. The origin of this software must not be misrepresented, either by  
    explicit claim or by omission.  
   
 3. Altered versions must be plainly marked as such, and must not be  
    misrepresented as being the original software.  
   
 4. If PCRE is embedded in any software that is released under the GNU  
    General Purpose Licence (GPL), then the terms of that licence shall  
    supersede any condition above with which it is incompatible.  
11  -----------------------------------------------------------------------------  -----------------------------------------------------------------------------
12    Redistribution and use in source and binary forms, with or without
13    modification, are permitted provided that the following conditions are met:
14    
15  See the file Tech.Notes for some information on the internals.      * Redistributions of source code must retain the above copyright notice,
16          this list of conditions and the following disclaimer.
17    
18        * Redistributions in binary form must reproduce the above copyright
19          notice, this list of conditions and the following disclaimer in the
20          documentation and/or other materials provided with the distribution.
21    
22        * Neither the name of the University of Cambridge nor the names of its
23          contributors may be used to endorse or promote products derived from
24          this software without specific prior written permission.
25    
26    THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
27    AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28    IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29    ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
30    LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31    CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32    SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33    INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34    CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35    ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36    POSSIBILITY OF SUCH DAMAGE.
37    -----------------------------------------------------------------------------
38  */  */
39    
40    
41  /* This is a support program to generate the file chartables.c, containing  /* This is a freestanding support program to generate a file containing
42  character tables of various kinds. They are built according to the default C  character tables for PCRE. The tables are built according to the current
43  locale and used as the default tables by PCRE. Now that pcre_maketables is  locale. Now that pcre_maketables is a function visible to the outside world, we
44  a function visible to the outside world, we make use of its code from here in  make use of its code from here in order to be consistent. */
 order to be consistent. */  
45    
46  #include <ctype.h>  #include <ctype.h>
47  #include <stdio.h>  #include <stdio.h>
48  #include <string.h>  #include <string.h>
49    #include <locale.h>
50    
51  #include "internal.h"  #include "pcre_internal.h"
52    
53  #define DFTABLES          /* maketables.c notices this */  #define DFTABLES          /* pcre_maketables.c notices this */
54  #include "maketables.c"  #include "pcre_maketables.c"
55    
56    
57  int main(void)  int main(int argc, char **argv)
58  {  {
59  int i;  FILE *f;
60  unsigned const char *tables = pcre_maketables();  int i = 1;
61    const unsigned char *tables;
62    const unsigned char *base_of_tables;
63    
64    /* By default, the default C locale is used rather than what the building user
65    happens to have set. However, if the -L option is given, set the locale from
66    the LC_xxx environment variables. */
67    
68    if (argc > 1 && strcmp(argv[1], "-L") == 0)
69      {
70      setlocale(LC_ALL, "");        /* Set from environment variables */
71      i++;
72      }
73    
74    if (argc < i + 1)
75      {
76      fprintf(stderr, "dftables: one filename argument is required\n");
77      return 1;
78      }
79    
80    tables = pcre_maketables();
81    base_of_tables = tables;
82    
83    f = fopen(argv[i], "wb");
84    if (f == NULL)
85      {
86      fprintf(stderr, "dftables: failed to open %s for writing\n", argv[1]);
87      return 1;
88      }
89    
90    /* There are several fprintf() calls here, because gcc in pedantic mode
91    complains about the very long string otherwise. */
92    
93  printf(  fprintf(f,
94    "/*************************************************\n"    "/*************************************************\n"
95    "*      Perl-Compatible Regular Expressions       *\n"    "*      Perl-Compatible Regular Expressions       *\n"
96    "*************************************************/\n\n"    "*************************************************/\n\n"
97    "/* This file is automatically written by the dftables auxiliary \n"    "/* This file was automatically written by the dftables auxiliary\n"
98    "program. If you edit it by hand, you might like to edit the Makefile to \n"    "program. It contains character tables that are used when no external\n"
99    "prevent its ever being regenerated.\n\n"    "tables are passed to PCRE by the application that calls it. The tables\n"
100    "This file is #included in the compilation of pcre.c to build the default\n"    "are used only for characters whose code values are less than 256.\n\n");
101    "character tables which are used when no tables are passed to the compile\n"  fprintf(f,
102    "function. */\n\n"    "The following #include is present because without it gcc 4.x may remove\n"
103    "static unsigned char pcre_default_tables[] = {\n\n"    "the array definition from the final binary if PCRE is built into a static\n"
104      "library and dead code stripping is activated. This leads to link errors.\n"
105      "Pulling in the header ensures that the array gets flagged as \"someone\n"
106      "outside this compilation unit might reference this\" and so it will always\n"
107      "be supplied to the linker. */\n\n"
108      "#include \"pcre_internal.h\"\n\n");
109    fprintf(f,
110      "const unsigned char _pcre_default_tables[] = {\n\n"
111    "/* This table is a lower casing table. */\n\n");    "/* This table is a lower casing table. */\n\n");
112    
113  printf("  ");  fprintf(f, "  ");
114  for (i = 0; i < 256; i++)  for (i = 0; i < 256; i++)
115    {    {
116    if ((i & 7) == 0 && i != 0) printf("\n  ");    if ((i & 7) == 0 && i != 0) fprintf(f, "\n  ");
117    printf("%3d", *tables++);    fprintf(f, "%3d", *tables++);
118    if (i != 255) printf(",");    if (i != 255) fprintf(f, ",");
119    }    }
120  printf(",\n\n");  fprintf(f, ",\n\n");
121    
122  printf("/* This table is a case flipping table. */\n\n");  fprintf(f, "/* This table is a case flipping table. */\n\n");
123    
124  printf("  ");  fprintf(f, "  ");
125  for (i = 0; i < 256; i++)  for (i = 0; i < 256; i++)
126    {    {
127    if ((i & 7) == 0 && i != 0) printf("\n  ");    if ((i & 7) == 0 && i != 0) fprintf(f, "\n  ");
128    printf("%3d", *tables++);    fprintf(f, "%3d", *tables++);
129    if (i != 255) printf(",");    if (i != 255) fprintf(f, ",");
130    }    }
131  printf(",\n\n");  fprintf(f, ",\n\n");
132    
133  printf(  fprintf(f,
134    "/* This table contains bit maps for various character classes.\n"    "/* This table contains bit maps for various character classes.\n"
135    "Each map is 32 bytes long and the bits run from the least\n"    "Each map is 32 bytes long and the bits run from the least\n"
136    "significant end of each byte. The classes that have their own\n"    "significant end of each byte. The classes that have their own\n"
137    "maps are: space, xdigit, digit, upper, lower, word, graph\n"    "maps are: space, xdigit, digit, upper, lower, word, graph\n"
138    "print, punct, and cntrl. Other classes are built from combinations. */\n\n");    "print, punct, and cntrl. Other classes are built from combinations. */\n\n");
139    
140  printf("  ");  fprintf(f, "  ");
141  for (i = 0; i < cbit_length; i++)  for (i = 0; i < cbit_length; i++)
142    {    {
143    if ((i & 7) == 0 && i != 0)    if ((i & 7) == 0 && i != 0)
144      {      {
145      if ((i & 31) == 0) printf("\n");      if ((i & 31) == 0) fprintf(f, "\n");
146      printf("\n  ");      fprintf(f, "\n  ");
147      }      }
148    printf("0x%02x", *tables++);    fprintf(f, "0x%02x", *tables++);
149    if (i != cbit_length - 1) printf(",");    if (i != cbit_length - 1) fprintf(f, ",");
150    }    }
151  printf(",\n\n");  fprintf(f, ",\n\n");
152    
153  printf(  fprintf(f,
154    "/* This table identifies various classes of character by individual bits:\n"    "/* This table identifies various classes of character by individual bits:\n"
155    "  0x%02x   white space character\n"    "  0x%02x   white space character\n"
156    "  0x%02x   letter\n"    "  0x%02x   letter\n"
# Line 119  printf( Line 161  printf(
161    ctype_space, ctype_letter, ctype_digit, ctype_xdigit, ctype_word,    ctype_space, ctype_letter, ctype_digit, ctype_xdigit, ctype_word,
162    ctype_meta);    ctype_meta);
163    
164  printf("  ");  fprintf(f, "  ");
165  for (i = 0; i < 256; i++)  for (i = 0; i < 256; i++)
166    {    {
167    if ((i & 7) == 0 && i != 0)    if ((i & 7) == 0 && i != 0)
168      {      {
169      printf(" /* ");      fprintf(f, " /* ");
170      if (isprint(i-8)) printf(" %c -", i-8);      if (isprint(i-8)) fprintf(f, " %c -", i-8);
171        else printf("%3d-", i-8);        else fprintf(f, "%3d-", i-8);
172      if (isprint(i-1)) printf(" %c ", i-1);      if (isprint(i-1)) fprintf(f, " %c ", i-1);
173        else printf("%3d", i-1);        else fprintf(f, "%3d", i-1);
174      printf(" */\n  ");      fprintf(f, " */\n  ");
175      }      }
176    printf("0x%02x", *tables++);    fprintf(f, "0x%02x", *tables++);
177    if (i != 255) printf(",");    if (i != 255) fprintf(f, ",");
178    }    }
179    
180  printf("};/* ");  fprintf(f, "};/* ");
181  if (isprint(i-8)) printf(" %c -", i-8);  if (isprint(i-8)) fprintf(f, " %c -", i-8);
182    else printf("%3d-", i-8);    else fprintf(f, "%3d-", i-8);
183  if (isprint(i-1)) printf(" %c ", i-1);  if (isprint(i-1)) fprintf(f, " %c ", i-1);
184    else printf("%3d", i-1);    else fprintf(f, "%3d", i-1);
185  printf(" */\n\n/* End of chartables.c */\n");  fprintf(f, " */\n\n/* End of pcre_chartables.c */\n");
186    
187    fclose(f);
188    free((void *)base_of_tables);
189  return 0;  return 0;
190  }  }
191    

Legend:
Removed from v.43  
changed lines
  Added in v.128

  ViewVC Help
Powered by ViewVC 1.1.5