--- code/trunk/maketables.c 2007/02/24 21:38:01 3 +++ code/trunk/maketables.c 2007/02/24 21:39:21 43 @@ -8,7 +8,7 @@ Written by: Philip Hazel - Copyright (c) 1997 University of Cambridge + Copyright (c) 1997-2000 University of Cambridge ----------------------------------------------------------------------------- Permission is granted to anyone to use this software for any purpose on any @@ -24,103 +24,96 @@ 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. ----------------------------------------------------------------------------- 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 -#include -#include +/* This file is compiled on its own as part of the PCRE library. However, +it is also included in the compilation of dftables.c, in which case the macro +DFTABLES is defined. */ +#ifndef DFTABLES #include "internal.h" +#endif + + + +/************************************************* +* Create PCRE character tables * +*************************************************/ + +/* This function builds a set of character tables for use by PCRE and returns +a pointer to them. They are build using the ctype functions, and consequently +their contents will depend upon the current locale setting. When compiled as +part of the library, the store is obtained via pcre_malloc(), but when compiled +inside dftables, use malloc(). + +Arguments: none +Returns: pointer to the contiguous block of data +*/ -int main(void) +unsigned const char * +pcre_maketables(void) { +unsigned char *yield, *p; 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"); +#ifndef DFTABLES +yield = (unsigned char*)(pcre_malloc)(tables_length); +#else +yield = (unsigned char*)malloc(tables_length); +#endif -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"); +if (yield == NULL) return NULL; +p = yield; -printf( - "/* This table is a case flipping table. */\n\n" - "unsigned char pcre_fcc[] = {\n"); +/* First comes the lower casing table */ -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"); +for (i = 0; i < 256; i++) *p++ = tolower(i); -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"); +/* Next the case-flipping table */ -memset(cbits, 0, sizeof(cbits)); +for (i = 0; i < 256; i++) *p++ = islower(i)? toupper(i) : tolower(i); -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); - } +/* Then the character class tables. Don't try to be clever and save effort +on exclusive ones - in some locales things may be different. */ -printf(" "); -for (i = 0; i < cbit_length; i++) +memset(p, 0, cbit_length); +for (i = 0; i < 256; i++) { - if ((i & 7) == 0 && i != 0) + if (isdigit(i)) { - if ((i & 31) == 0) printf("\n"); - printf("\n "); + p[cbit_digit + i/8] |= 1 << (i&7); + p[cbit_word + i/8] |= 1 << (i&7); } - printf("0x%02x", cbits[i]); - if (i != cbit_length - 1) printf(","); + if (isupper(i)) + { + p[cbit_upper + i/8] |= 1 << (i&7); + p[cbit_word + i/8] |= 1 << (i&7); + } + if (islower(i)) + { + p[cbit_lower + i/8] |= 1 << (i&7); + p[cbit_word + i/8] |= 1 << (i&7); + } + if (i == '_') p[cbit_word + i/8] |= 1 << (i&7); + if (isspace(i)) p[cbit_space + i/8] |= 1 << (i&7); + if (isxdigit(i))p[cbit_xdigit + i/8] |= 1 << (i&7); + if (isgraph(i)) p[cbit_graph + i/8] |= 1 << (i&7); + if (isprint(i)) p[cbit_print + i/8] |= 1 << (i&7); + if (ispunct(i)) p[cbit_punct + i/8] |= 1 << (i&7); + if (iscntrl(i)) p[cbit_cntrl + i/8] |= 1 << (i&7); } -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); +p += cbit_length; -printf("unsigned char pcre_ctypes[] = {\n"); +/* Finally, the character type table */ -printf(" "); for (i = 0; i < 256; i++) { int x = 0; @@ -130,28 +123,10 @@ 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(","); + *p++ = x; } -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; +return yield; } /* End of maketables.c */