| 36 |
*/ |
*/ |
| 37 |
|
|
| 38 |
|
|
| 39 |
|
#ifdef HAVE_CONFIG_H |
| 40 |
|
#include <config.h> |
| 41 |
|
#endif |
| 42 |
|
|
| 43 |
#include <ctype.h> |
#include <ctype.h> |
| 44 |
#include <stdio.h> |
#include <stdio.h> |
| 45 |
#include <string.h> |
#include <string.h> |
| 156 |
static int callout_extra; |
static int callout_extra; |
| 157 |
static int callout_fail_count; |
static int callout_fail_count; |
| 158 |
static int callout_fail_id; |
static int callout_fail_id; |
| 159 |
|
static int debug_lengths; |
| 160 |
static int first_callout; |
static int first_callout; |
| 161 |
static int locale_set = 0; |
static int locale_set = 0; |
| 162 |
static int show_malloc; |
static int show_malloc; |
| 664 |
|
|
| 665 |
|
|
| 666 |
/************************************************* |
/************************************************* |
| 667 |
|
* Case-independent strncmp() function * |
| 668 |
|
*************************************************/ |
| 669 |
|
|
| 670 |
|
/* |
| 671 |
|
Arguments: |
| 672 |
|
s first string |
| 673 |
|
t second string |
| 674 |
|
n number of characters to compare |
| 675 |
|
|
| 676 |
|
Returns: < 0, = 0, or > 0, according to the comparison |
| 677 |
|
*/ |
| 678 |
|
|
| 679 |
|
static int |
| 680 |
|
strncmpic(uschar *s, uschar *t, int n) |
| 681 |
|
{ |
| 682 |
|
while (n--) |
| 683 |
|
{ |
| 684 |
|
int c = tolower(*s++) - tolower(*t++); |
| 685 |
|
if (c) return c; |
| 686 |
|
} |
| 687 |
|
return 0; |
| 688 |
|
} |
| 689 |
|
|
| 690 |
|
|
| 691 |
|
|
| 692 |
|
/************************************************* |
| 693 |
* Check newline indicator * |
* Check newline indicator * |
| 694 |
*************************************************/ |
*************************************************/ |
| 695 |
|
|
| 707 |
static int |
static int |
| 708 |
check_newline(uschar *p, FILE *f) |
check_newline(uschar *p, FILE *f) |
| 709 |
{ |
{ |
| 710 |
if (strncmp((char *)p, "cr>", 3) == 0) return PCRE_NEWLINE_CR; |
if (strncmpic(p, (uschar *)"cr>", 3) == 0) return PCRE_NEWLINE_CR; |
| 711 |
if (strncmp((char *)p, "lf>", 3) == 0) return PCRE_NEWLINE_LF; |
if (strncmpic(p, (uschar *)"lf>", 3) == 0) return PCRE_NEWLINE_LF; |
| 712 |
if (strncmp((char *)p, "crlf>", 5) == 0) return PCRE_NEWLINE_CRLF; |
if (strncmpic(p, (uschar *)"crlf>", 5) == 0) return PCRE_NEWLINE_CRLF; |
| 713 |
if (strncmp((char *)p, "anycrlf>", 8) == 0) return PCRE_NEWLINE_ANYCRLF; |
if (strncmpic(p, (uschar *)"anycrlf>", 8) == 0) return PCRE_NEWLINE_ANYCRLF; |
| 714 |
if (strncmp((char *)p, "any>", 4) == 0) return PCRE_NEWLINE_ANY; |
if (strncmpic(p, (uschar *)"any>", 4) == 0) return PCRE_NEWLINE_ANY; |
| 715 |
fprintf(f, "Unknown newline type at: <%s\n", p); |
fprintf(f, "Unknown newline type at: <%s\n", p); |
| 716 |
return 0; |
return 0; |
| 717 |
} |
} |
| 981 |
size_t size, regex_gotten_store; |
size_t size, regex_gotten_store; |
| 982 |
int do_study = 0; |
int do_study = 0; |
| 983 |
int do_debug = debug; |
int do_debug = debug; |
|
int debug_lengths = 1; |
|
| 984 |
int do_G = 0; |
int do_G = 0; |
| 985 |
int do_g = 0; |
int do_g = 0; |
| 986 |
int do_showinfo = showinfo; |
int do_showinfo = showinfo; |
| 989 |
int erroroffset, len, delimiter, poffset; |
int erroroffset, len, delimiter, poffset; |
| 990 |
|
|
| 991 |
use_utf8 = 0; |
use_utf8 = 0; |
| 992 |
|
debug_lengths = 1; |
| 993 |
|
|
| 994 |
if (infile == stdin) printf(" re> "); |
if (infile == stdin) printf(" re> "); |
| 995 |
if (extend_inputline(infile, buffer) == NULL) break; |
if (extend_inputline(infile, buffer) == NULL) break; |
| 1383 |
#if !defined NOINFOCHECK |
#if !defined NOINFOCHECK |
| 1384 |
int old_first_char, old_options, old_count; |
int old_first_char, old_options, old_count; |
| 1385 |
#endif |
#endif |
| 1386 |
int count, backrefmax, first_char, need_char, okpartial, jchanged; |
int count, backrefmax, first_char, need_char, okpartial, jchanged, |
| 1387 |
|
hascrorlf; |
| 1388 |
int nameentrysize, namecount; |
int nameentrysize, namecount; |
| 1389 |
const uschar *nametable; |
const uschar *nametable; |
| 1390 |
|
|
| 1397 |
new_info(re, NULL, PCRE_INFO_NAMEENTRYSIZE, &nameentrysize); |
new_info(re, NULL, PCRE_INFO_NAMEENTRYSIZE, &nameentrysize); |
| 1398 |
new_info(re, NULL, PCRE_INFO_NAMECOUNT, &namecount); |
new_info(re, NULL, PCRE_INFO_NAMECOUNT, &namecount); |
| 1399 |
new_info(re, NULL, PCRE_INFO_NAMETABLE, (void *)&nametable); |
new_info(re, NULL, PCRE_INFO_NAMETABLE, (void *)&nametable); |
| 1400 |
new_info(re, NULL, PCRE_INFO_OKPARTIAL, &okpartial); |
new_info(re, NULL, PCRE_INFO_OKPARTIAL, &okpartial); |
| 1401 |
new_info(re, NULL, PCRE_INFO_JCHANGED, &jchanged); |
new_info(re, NULL, PCRE_INFO_JCHANGED, &jchanged); |
| 1402 |
|
new_info(re, NULL, PCRE_INFO_HASCRORLF, &hascrorlf); |
| 1403 |
|
|
| 1404 |
#if !defined NOINFOCHECK |
#if !defined NOINFOCHECK |
| 1405 |
old_count = pcre_info(re, &old_options, &old_first_char); |
old_count = pcre_info(re, &old_options, &old_first_char); |
| 1440 |
nametable += nameentrysize; |
nametable += nameentrysize; |
| 1441 |
} |
} |
| 1442 |
} |
} |
| 1443 |
|
|
| 1444 |
if (!okpartial) fprintf(outfile, "Partial matching not supported\n"); |
if (!okpartial) fprintf(outfile, "Partial matching not supported\n"); |
| 1445 |
|
if (hascrorlf) fprintf(outfile, "Contains explicit CR or LF match\n"); |
| 1446 |
|
|
| 1447 |
all_options = ((real_pcre *)re)->options; |
all_options = ((real_pcre *)re)->options; |
| 1448 |
if (do_flip) all_options = byteflip(all_options, sizeof(all_options)); |
if (do_flip) all_options = byteflip(all_options, sizeof(all_options)); |
| 1462 |
((get_options & PCRE_UTF8) != 0)? " utf8" : "", |
((get_options & PCRE_UTF8) != 0)? " utf8" : "", |
| 1463 |
((get_options & PCRE_NO_UTF8_CHECK) != 0)? " no_utf8_check" : "", |
((get_options & PCRE_NO_UTF8_CHECK) != 0)? " no_utf8_check" : "", |
| 1464 |
((get_options & PCRE_DUPNAMES) != 0)? " dupnames" : ""); |
((get_options & PCRE_DUPNAMES) != 0)? " dupnames" : ""); |
| 1465 |
|
|
| 1466 |
if (jchanged) fprintf(outfile, "Duplicate name status changes\n"); |
if (jchanged) fprintf(outfile, "Duplicate name status changes\n"); |
| 1467 |
|
|
| 1468 |
switch (get_options & PCRE_NEWLINE_BITS) |
switch (get_options & PCRE_NEWLINE_BITS) |