tags/pcre-1.02/maketables.c

/*************************************************
*      Perl-Compatible Regular Expressions       *
*************************************************/

/*
PCRE is a library of functions to support regular expressions whose syntax
and semantics are as close as possible to those of the Perl 5 language.

Written by: Philip Hazel <ph10@cam.ac.uk>

           Copyright (c) 1997 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.
-----------------------------------------------------------------------------

See the file Tech.Notes for some information on the internals.
*/


/* This is a support program to generate the file chartables.c, containing
character tables of various kinds. They are built according to the local C
locale. */

#include <ctype.h>
#include <stdio.h>
#include <string.h>

#include "internal.h"

int main(void)
{
int i;
unsigned char cbits[cbit_length];

printf(
  "/*************************************************\n"
  "*      Perl-Compatible Regular Expressions       *\n"
  "*************************************************/\n\n"
  "/* This file is automatically written by the makechartables auxiliary \n"
  "program. If you edit it by hand, you might like to edit the Makefile to \n"
  "prevent its ever being regenerated. */\n\n"
  "/* This table is a lower casing table. */\n\n"
  "unsigned char pcre_lcc[] = {\n");

printf("  ");
for (i = 0; i < 256; i++)
  {
  if ((i & 7) == 0 && i != 0) printf("\n  ");
  printf("%3d", tolower(i));
  if (i != 255) printf(",");
  }
printf(" };\n\n");

printf(
  "/* This table is a case flipping table. */\n\n"
  "unsigned char pcre_fcc[] = {\n");

printf("  ");
for (i = 0; i < 256; i++)
  {
  if ((i & 7) == 0 && i != 0) printf("\n  ");
  printf("%3d", islower(i)? toupper(i) : tolower(i));
  if (i != 255) printf(",");
  }
printf(" };\n\n");

printf(
  "/* This table contains bit maps for digits, letters, 'word' chars, and\n"
  "white space. Each map is 32 bytes long and the bits run from the least\n"
  "significant end of each byte. */\n\n"
  "unsigned char pcre_cbits[] = {\n");

memset(cbits, 0, sizeof(cbits));

for (i = 0; i < 256; i++)
  {
  if (isdigit(i)) cbits[cbit_digit  + i/8] |= 1 << (i&7);
  if (isalpha(i)) cbits[cbit_letter + i/8] |= 1 << (i&7);
  if (isalnum(i) || i == '_')
                  cbits[cbit_word   + i/8] |= 1 << (i&7);
  if (isspace(i)) cbits[cbit_space  + i/8] |= 1 << (i&7);
  }

printf("  ");
for (i = 0; i < cbit_length; i++)
  {
  if ((i & 7) == 0 && i != 0)
    {
    if ((i & 31) == 0) printf("\n");
    printf("\n  ");
    }
  printf("0x%02x", cbits[i]);
  if (i != cbit_length - 1) printf(",");
  }
printf(" };\n\n");

printf(
  "/* This table identifies various classes of character by individual bits:\n"
  "  0x%02x   white space character\n"
  "  0x%02x   letter\n"
  "  0x%02x   decimal digit\n"
  "  0x%02x   hexadecimal digit\n"
  "  0x%02x   alphanumeric or '_'\n"
  "  0x%02x   regular expression metacharacter or binary zero\n*/\n\n",
  ctype_space, ctype_letter, ctype_digit, ctype_xdigit, ctype_word,
  ctype_meta);

printf("unsigned char pcre_ctypes[] = {\n");

printf("  ");
for (i = 0; i < 256; i++)
  {
  int x = 0;
  if (isspace(i)) x += ctype_space;
  if (isalpha(i)) x += ctype_letter;
  if (isdigit(i)) x += ctype_digit;
  if (isxdigit(i)) x += ctype_xdigit;
  if (isalnum(i) || i == '_') x += ctype_word;
  if (strchr("*+?{^.$|()[", i) != 0) x += ctype_meta;

  if ((i & 7) == 0 && i != 0)
    {
    printf(" /* ");
    if (isprint(i-8)) printf(" %c -", i-8);
      else printf("%3d-", i-8);
    if (isprint(i-1)) printf(" %c ", i-1);
      else printf("%3d", i-1);
    printf(" */\n  ");
    }
  printf("0x%02x", x);
  if (i != 255) printf(",");
  }

printf("};/* ");
if (isprint(i-8)) printf(" %c -", i-8);
  else printf("%3d-", i-8);
if (isprint(i-1)) printf(" %c ", i-1);
  else printf("%3d", i-1);
printf(" */\n\n/* End of chartables.c */\n");

return 0;
}

/* End of maketables.c */
1	nigel	3	/*************************************************
2			* Perl-Compatible Regular Expressions *
3			*************************************************/
4
5			/*
6			PCRE is a library of functions to support regular expressions whose syntax
7			and semantics are as close as possible to those of the Perl 5 language.
8
9			Written by: Philip Hazel <ph10@cam.ac.uk>
10
11			Copyright (c) 1997 University of Cambridge
12
13			-----------------------------------------------------------------------------
14			Permission is granted to anyone to use this software for any purpose on any
15			computer system, and to redistribute it freely, subject to the following
16			restrictions:
17
18			1. This software is distributed in the hope that it will be useful,
19			but WITHOUT ANY WARRANTY; without even the implied warranty of
20			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
21
22			2. The origin of this software must not be misrepresented, either by
23			explicit claim or by omission.
24
25			3. Altered versions must be plainly marked as such, and must not be
26			misrepresented as being the original software.
27			-----------------------------------------------------------------------------
28
29			See the file Tech.Notes for some information on the internals.
30			*/
31
32
33			/* This is a support program to generate the file chartables.c, containing
34			character tables of various kinds. They are built according to the local C
35			locale. */
36
37			#include <ctype.h>
38			#include <stdio.h>
39			#include <string.h>
40
41			#include "internal.h"
42
43			int main(void)
44			{
45			int i;
46			unsigned char cbits[cbit_length];
47
48			printf(
49			"/*************************************************\n"
50			"* Perl-Compatible Regular Expressions *\n"
51			"*************************************************/\n\n"
52			"/* This file is automatically written by the makechartables auxiliary \n"
53			"program. If you edit it by hand, you might like to edit the Makefile to \n"
54			"prevent its ever being regenerated. */\n\n"
55			"/* This table is a lower casing table. */\n\n"
56			"unsigned char pcre_lcc[] = {\n");
57
58			printf(" ");
59			for (i = 0; i < 256; i++)
60			{
61			if ((i & 7) == 0 && i != 0) printf("\n ");
62			printf("%3d", tolower(i));
63			if (i != 255) printf(",");
64			}
65			printf(" };\n\n");
66
67			printf(
68			"/* This table is a case flipping table. */\n\n"
69			"unsigned char pcre_fcc[] = {\n");
70
71			printf(" ");
72			for (i = 0; i < 256; i++)
73			{
74			if ((i & 7) == 0 && i != 0) printf("\n ");
75			printf("%3d", islower(i)? toupper(i) : tolower(i));
76			if (i != 255) printf(",");
77			}
78			printf(" };\n\n");
79
80			printf(
81			"/* This table contains bit maps for digits, letters, 'word' chars, and\n"
82			"white space. Each map is 32 bytes long and the bits run from the least\n"
83			"significant end of each byte. */\n\n"
84			"unsigned char pcre_cbits[] = {\n");
85
86			memset(cbits, 0, sizeof(cbits));
87
88			for (i = 0; i < 256; i++)
89			{
90			if (isdigit(i)) cbits[cbit_digit + i/8] \|= 1 << (i&7);
91			if (isalpha(i)) cbits[cbit_letter + i/8] \|= 1 << (i&7);
92			if (isalnum(i) \|\| i == '_')
93			cbits[cbit_word + i/8] \|= 1 << (i&7);
94			if (isspace(i)) cbits[cbit_space + i/8] \|= 1 << (i&7);
95			}
96
97			printf(" ");
98			for (i = 0; i < cbit_length; i++)
99			{
100			if ((i & 7) == 0 && i != 0)
101			{
102			if ((i & 31) == 0) printf("\n");
103			printf("\n ");
104			}
105			printf("0x%02x", cbits[i]);
106			if (i != cbit_length - 1) printf(",");
107			}
108			printf(" };\n\n");
109
110			printf(
111			"/* This table identifies various classes of character by individual bits:\n"
112			" 0x%02x white space character\n"
113			" 0x%02x letter\n"
114			" 0x%02x decimal digit\n"
115			" 0x%02x hexadecimal digit\n"
116			" 0x%02x alphanumeric or '_'\n"
117			" 0x%02x regular expression metacharacter or binary zero\n*/\n\n",
118			ctype_space, ctype_letter, ctype_digit, ctype_xdigit, ctype_word,
119			ctype_meta);
120
121			printf("unsigned char pcre_ctypes[] = {\n");
122
123			printf(" ");
124			for (i = 0; i < 256; i++)
125			{
126			int x = 0;
127			if (isspace(i)) x += ctype_space;
128			if (isalpha(i)) x += ctype_letter;
129			if (isdigit(i)) x += ctype_digit;
130			if (isxdigit(i)) x += ctype_xdigit;
131			if (isalnum(i) \|\| i == '_') x += ctype_word;
132			if (strchr("*+?{^.$\|()[", i) != 0) x += ctype_meta;
133
134			if ((i & 7) == 0 && i != 0)
135			{
136			printf(" /* ");
137			if (isprint(i-8)) printf(" %c -", i-8);
138			else printf("%3d-", i-8);
139			if (isprint(i-1)) printf(" %c ", i-1);
140			else printf("%3d", i-1);
141			printf(" */\n ");
142			}
143			printf("0x%02x", x);
144			if (i != 255) printf(",");
145			}
146
147			printf("};/* ");
148			if (isprint(i-8)) printf(" %c -", i-8);
149			else printf("%3d-", i-8);
150			if (isprint(i-1)) printf(" %c ", i-1);
151			else printf("%3d", i-1);
152			printf(" /\n\n/ End of chartables.c */\n");
153
154			return 0;
155			}
156
157			/* End of maketables.c */