/[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 65 by nigel, Sat Feb 24 21:40:08 2007 UTC revision 199 by ph10, Tue Jul 31 14:39:09 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-2001 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. */
45  order to be consistent. */  
46    #ifdef HAVE_CONFIG_H
47    #include <config.h>
48    #endif
49    
50  #include <ctype.h>  #include <ctype.h>
51  #include <stdio.h>  #include <stdio.h>
52  #include <string.h>  #include <string.h>
53    #include <locale.h>
54    
55  #include "internal.h"  #include "pcre_internal.h"
56    
57  #define DFTABLES          /* maketables.c notices this */  #define DFTABLES          /* pcre_maketables.c notices this */
58  #include "maketables.c"  #include "pcre_maketables.c"
59    
60    
61  int main(void)  int main(int argc, char **argv)
62  {  {
63  int i;  FILE *f;
64  const unsigned char *tables = pcre_maketables();  int i = 1;
65    const unsigned char *tables;
66    const unsigned char *base_of_tables;
67    
68    /* By default, the default C locale is used rather than what the building user
69    happens to have set. However, if the -L option is given, set the locale from
70    the LC_xxx environment variables. */
71    
72    if (argc > 1 && strcmp(argv[1], "-L") == 0)
73      {
74      setlocale(LC_ALL, "");        /* Set from environment variables */
75      i++;
76      }
77    
78    if (argc < i + 1)
79      {
80      fprintf(stderr, "dftables: one filename argument is required\n");
81      return 1;
82      }
83    
84    tables = pcre_maketables();
85    base_of_tables = tables;
86    
87    f = fopen(argv[i], "wb");
88    if (f == NULL)
89      {
90      fprintf(stderr, "dftables: failed to open %s for writing\n", argv[1]);
91      return 1;
92      }
93    
94  /* There are two printf() calls here, because gcc in pedantic mode complains  /* There are several fprintf() calls here, because gcc in pedantic mode
95  about the very long string otherwise. */  complains about the very long string otherwise. */
96    
97  printf(  fprintf(f,
98    "/*************************************************\n"    "/*************************************************\n"
99    "*      Perl-Compatible Regular Expressions       *\n"    "*      Perl-Compatible Regular Expressions       *\n"
100    "*************************************************/\n\n"    "*************************************************/\n\n"
101    "/* This file is automatically written by the dftables auxiliary \n"    "/* This file was automatically written by the dftables auxiliary\n"
102    "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"
103    "prevent its ever being regenerated.\n\n");    "tables are passed to PCRE by the application that calls it. The tables\n"
104  printf(    "are used only for characters whose code values are less than 256.\n\n");
105    "This file is #included in the compilation of pcre.c to build the default\n"  fprintf(f,
106    "character tables which are used when no tables are passed to the compile\n"    "The following #includes are present because without them gcc 4.x may remove\n"
107    "function. */\n\n"    "the array definition from the final binary if PCRE is built into a static\n"
108    "static unsigned char pcre_default_tables[] = {\n\n"    "library and dead code stripping is activated. This leads to link errors.\n"
109      "Pulling in the header ensures that the array gets flagged as \"someone\n"
110      "outside this compilation unit might reference this\" and so it will always\n"
111      "be supplied to the linker. */\n\n"
112      "#ifdef HAVE_CONFIG_H"
113      "#include <config.h>"
114      "#endif"
115      "#include \"pcre_internal.h\"\n\n");
116    fprintf(f,
117      "const unsigned char _pcre_default_tables[] = {\n\n"
118    "/* This table is a lower casing table. */\n\n");    "/* This table is a lower casing table. */\n\n");
119    
120  printf("  ");  fprintf(f, "  ");
121  for (i = 0; i < 256; i++)  for (i = 0; i < 256; i++)
122    {    {
123    if ((i & 7) == 0 && i != 0) printf("\n  ");    if ((i & 7) == 0 && i != 0) fprintf(f, "\n  ");
124    printf("%3d", *tables++);    fprintf(f, "%3d", *tables++);
125    if (i != 255) printf(",");    if (i != 255) fprintf(f, ",");
126    }    }
127  printf(",\n\n");  fprintf(f, ",\n\n");
128    
129  printf("/* This table is a case flipping table. */\n\n");  fprintf(f, "/* This table is a case flipping table. */\n\n");
130    
131  printf("  ");  fprintf(f, "  ");
132  for (i = 0; i < 256; i++)  for (i = 0; i < 256; i++)
133    {    {
134    if ((i & 7) == 0 && i != 0) printf("\n  ");    if ((i & 7) == 0 && i != 0) fprintf(f, "\n  ");
135    printf("%3d", *tables++);    fprintf(f, "%3d", *tables++);
136    if (i != 255) printf(",");    if (i != 255) fprintf(f, ",");
137    }    }
138  printf(",\n\n");  fprintf(f, ",\n\n");
139    
140  printf(  fprintf(f,
141    "/* This table contains bit maps for various character classes.\n"    "/* This table contains bit maps for various character classes.\n"
142    "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"
143    "significant end of each byte. The classes that have their own\n"    "significant end of each byte. The classes that have their own\n"
144    "maps are: space, xdigit, digit, upper, lower, word, graph\n"    "maps are: space, xdigit, digit, upper, lower, word, graph\n"
145    "print, punct, and cntrl. Other classes are built from combinations. */\n\n");    "print, punct, and cntrl. Other classes are built from combinations. */\n\n");
146    
147  printf("  ");  fprintf(f, "  ");
148  for (i = 0; i < cbit_length; i++)  for (i = 0; i < cbit_length; i++)
149    {    {
150    if ((i & 7) == 0 && i != 0)    if ((i & 7) == 0 && i != 0)
151      {      {
152      if ((i & 31) == 0) printf("\n");      if ((i & 31) == 0) fprintf(f, "\n");
153      printf("\n  ");      fprintf(f, "\n  ");
154      }      }
155    printf("0x%02x", *tables++);    fprintf(f, "0x%02x", *tables++);
156    if (i != cbit_length - 1) printf(",");    if (i != cbit_length - 1) fprintf(f, ",");
157    }    }
158  printf(",\n\n");  fprintf(f, ",\n\n");
159    
160  printf(  fprintf(f,
161    "/* This table identifies various classes of character by individual bits:\n"    "/* This table identifies various classes of character by individual bits:\n"
162    "  0x%02x   white space character\n"    "  0x%02x   white space character\n"
163    "  0x%02x   letter\n"    "  0x%02x   letter\n"
# Line 123  printf( Line 168  printf(
168    ctype_space, ctype_letter, ctype_digit, ctype_xdigit, ctype_word,    ctype_space, ctype_letter, ctype_digit, ctype_xdigit, ctype_word,
169    ctype_meta);    ctype_meta);
170    
171  printf("  ");  fprintf(f, "  ");
172  for (i = 0; i < 256; i++)  for (i = 0; i < 256; i++)
173    {    {
174    if ((i & 7) == 0 && i != 0)    if ((i & 7) == 0 && i != 0)
175      {      {
176      printf(" /* ");      fprintf(f, " /* ");
177      if (isprint(i-8)) printf(" %c -", i-8);      if (isprint(i-8)) fprintf(f, " %c -", i-8);
178        else printf("%3d-", i-8);        else fprintf(f, "%3d-", i-8);
179      if (isprint(i-1)) printf(" %c ", i-1);      if (isprint(i-1)) fprintf(f, " %c ", i-1);
180        else printf("%3d", i-1);        else fprintf(f, "%3d", i-1);
181      printf(" */\n  ");      fprintf(f, " */\n  ");
182      }      }
183    printf("0x%02x", *tables++);    fprintf(f, "0x%02x", *tables++);
184    if (i != 255) printf(",");    if (i != 255) fprintf(f, ",");
185    }    }
186    
187  printf("};/* ");  fprintf(f, "};/* ");
188  if (isprint(i-8)) printf(" %c -", i-8);  if (isprint(i-8)) fprintf(f, " %c -", i-8);
189    else printf("%3d-", i-8);    else fprintf(f, "%3d-", i-8);
190  if (isprint(i-1)) printf(" %c ", i-1);  if (isprint(i-1)) fprintf(f, " %c ", i-1);
191    else printf("%3d", i-1);    else fprintf(f, "%3d", i-1);
192  printf(" */\n\n/* End of chartables.c */\n");  fprintf(f, " */\n\n/* End of pcre_chartables.c */\n");
193    
194    fclose(f);
195    free((void *)base_of_tables);
196  return 0;  return 0;
197  }  }
198    

Legend:
Removed from v.65  
changed lines
  Added in v.199

webmaster@exim.org
ViewVC Help
Powered by ViewVC 1.1.12