| 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 |
|
if (strncmpic(p, (uschar *)"bsr_anycrlf>", 12) == 0) return PCRE_BSR_ANYCRLF; |
| 716 |
|
if (strncmpic(p, (uschar *)"bsr_unicode>", 12) == 0) return PCRE_BSR_UNICODE; |
| 717 |
fprintf(f, "Unknown newline type at: <%s\n", p); |
fprintf(f, "Unknown newline type at: <%s\n", p); |
| 718 |
return 0; |
return 0; |
| 719 |
} |
} |
| 887 |
(rc == '\n')? "LF" : (rc == ('\r'<<8 | '\n'))? "CRLF" : |
(rc == '\n')? "LF" : (rc == ('\r'<<8 | '\n'))? "CRLF" : |
| 888 |
(rc == -2)? "ANYCRLF" : |
(rc == -2)? "ANYCRLF" : |
| 889 |
(rc == -1)? "ANY" : "???"); |
(rc == -1)? "ANY" : "???"); |
| 890 |
|
(void)pcre_config(PCRE_CONFIG_BSR, &rc); |
| 891 |
|
printf(" \\R matches %s\n", rc? "CR, LF, or CRLF only" : |
| 892 |
|
"all Unicode newlines"); |
| 893 |
(void)pcre_config(PCRE_CONFIG_LINK_SIZE, &rc); |
(void)pcre_config(PCRE_CONFIG_LINK_SIZE, &rc); |
| 894 |
printf(" Internal link size = %d\n", rc); |
printf(" Internal link size = %d\n", rc); |
| 895 |
(void)pcre_config(PCRE_CONFIG_POSIX_MALLOC_THRESHOLD, &rc); |
(void)pcre_config(PCRE_CONFIG_POSIX_MALLOC_THRESHOLD, &rc); |
| 1354 |
rre->magic_number = byteflip(rre->magic_number, sizeof(rre->magic_number)); |
rre->magic_number = byteflip(rre->magic_number, sizeof(rre->magic_number)); |
| 1355 |
rre->size = byteflip(rre->size, sizeof(rre->size)); |
rre->size = byteflip(rre->size, sizeof(rre->size)); |
| 1356 |
rre->options = byteflip(rre->options, sizeof(rre->options)); |
rre->options = byteflip(rre->options, sizeof(rre->options)); |
| 1357 |
|
rre->flags = byteflip(rre->flags, sizeof(rre->flags)); |
| 1358 |
rre->top_bracket = byteflip(rre->top_bracket, sizeof(rre->top_bracket)); |
rre->top_bracket = byteflip(rre->top_bracket, sizeof(rre->top_bracket)); |
| 1359 |
rre->top_backref = byteflip(rre->top_backref, sizeof(rre->top_backref)); |
rre->top_backref = byteflip(rre->top_backref, sizeof(rre->top_backref)); |
| 1360 |
rre->first_byte = byteflip(rre->first_byte, sizeof(rre->first_byte)); |
rre->first_byte = byteflip(rre->first_byte, sizeof(rre->first_byte)); |
| 1389 |
#if !defined NOINFOCHECK |
#if !defined NOINFOCHECK |
| 1390 |
int old_first_char, old_options, old_count; |
int old_first_char, old_options, old_count; |
| 1391 |
#endif |
#endif |
| 1392 |
int count, backrefmax, first_char, need_char, okpartial, jchanged; |
int count, backrefmax, first_char, need_char, okpartial, jchanged, |
| 1393 |
|
hascrorlf; |
| 1394 |
int nameentrysize, namecount; |
int nameentrysize, namecount; |
| 1395 |
const uschar *nametable; |
const uschar *nametable; |
| 1396 |
|
|
| 1405 |
new_info(re, NULL, PCRE_INFO_NAMETABLE, (void *)&nametable); |
new_info(re, NULL, PCRE_INFO_NAMETABLE, (void *)&nametable); |
| 1406 |
new_info(re, NULL, PCRE_INFO_OKPARTIAL, &okpartial); |
new_info(re, NULL, PCRE_INFO_OKPARTIAL, &okpartial); |
| 1407 |
new_info(re, NULL, PCRE_INFO_JCHANGED, &jchanged); |
new_info(re, NULL, PCRE_INFO_JCHANGED, &jchanged); |
| 1408 |
|
new_info(re, NULL, PCRE_INFO_HASCRORLF, &hascrorlf); |
| 1409 |
|
|
| 1410 |
#if !defined NOINFOCHECK |
#if !defined NOINFOCHECK |
| 1411 |
old_count = pcre_info(re, &old_options, &old_first_char); |
old_count = pcre_info(re, &old_options, &old_first_char); |
| 1448 |
} |
} |
| 1449 |
|
|
| 1450 |
if (!okpartial) fprintf(outfile, "Partial matching not supported\n"); |
if (!okpartial) fprintf(outfile, "Partial matching not supported\n"); |
| 1451 |
|
if (hascrorlf) fprintf(outfile, "Contains explicit CR or LF match\n"); |
| 1452 |
|
|
| 1453 |
all_options = ((real_pcre *)re)->options; |
all_options = ((real_pcre *)re)->options; |
| 1454 |
if (do_flip) all_options = byteflip(all_options, sizeof(all_options)); |
if (do_flip) all_options = byteflip(all_options, sizeof(all_options)); |
| 1455 |
|
|
| 1456 |
if (get_options == 0) fprintf(outfile, "No options\n"); |
if (get_options == 0) fprintf(outfile, "No options\n"); |
| 1457 |
else fprintf(outfile, "Options:%s%s%s%s%s%s%s%s%s%s%s%s%s\n", |
else fprintf(outfile, "Options:%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s\n", |
| 1458 |
((get_options & PCRE_ANCHORED) != 0)? " anchored" : "", |
((get_options & PCRE_ANCHORED) != 0)? " anchored" : "", |
| 1459 |
((get_options & PCRE_CASELESS) != 0)? " caseless" : "", |
((get_options & PCRE_CASELESS) != 0)? " caseless" : "", |
| 1460 |
((get_options & PCRE_EXTENDED) != 0)? " extended" : "", |
((get_options & PCRE_EXTENDED) != 0)? " extended" : "", |
| 1461 |
((get_options & PCRE_MULTILINE) != 0)? " multiline" : "", |
((get_options & PCRE_MULTILINE) != 0)? " multiline" : "", |
| 1462 |
((get_options & PCRE_FIRSTLINE) != 0)? " firstline" : "", |
((get_options & PCRE_FIRSTLINE) != 0)? " firstline" : "", |
| 1463 |
((get_options & PCRE_DOTALL) != 0)? " dotall" : "", |
((get_options & PCRE_DOTALL) != 0)? " dotall" : "", |
| 1464 |
|
((get_options & PCRE_BSR_ANYCRLF) != 0)? " bsr_anycrlf" : "", |
| 1465 |
|
((get_options & PCRE_BSR_UNICODE) != 0)? " bsr_unicode" : "", |
| 1466 |
((get_options & PCRE_DOLLAR_ENDONLY) != 0)? " dollar_endonly" : "", |
((get_options & PCRE_DOLLAR_ENDONLY) != 0)? " dollar_endonly" : "", |
| 1467 |
((get_options & PCRE_EXTRA) != 0)? " extra" : "", |
((get_options & PCRE_EXTRA) != 0)? " extra" : "", |
| 1468 |
((get_options & PCRE_UNGREEDY) != 0)? " ungreedy" : "", |
((get_options & PCRE_UNGREEDY) != 0)? " ungreedy" : "", |