php-src/ext/mbstring/tests/024.inc

25 lines
890 B
PHP
Raw Normal View History

2002-10-07 18:02:05 +00:00
<?php
$encs = array( 'EUC-JP', 'Shift_JIS', 'SJIS', 'UTF-8' );
function test_search( $test_enc, $str, $look_for, $opt, $in_enc = 'EUC-JP' ) {
mb_regex_encoding( $test_enc );
$str = mb_convert_encoding( $str, $test_enc, $in_enc );
$look_for = mb_convert_encoding( $look_for, $test_enc, $in_enc );
mb_ereg_search_init( $str, $look_for, $opt );
while ( mb_ereg_search_pos() ) {
$regs = mb_ereg_search_getregs();
array_shift( $regs );
printf( "(%s) (%d) %s\n", $test_enc, mb_ereg_search_getpos(), mb_convert_encoding( ( is_array( $regs ) ? implode( '-', $regs ): '' ), $in_enc, $test_enc ) );
}
}
function do_tests( $enc, $opt ) {
test_search( $enc, "<EFBFBD>ϡ<EFBFBD> <20><><EFBFBD><EFBFBD>\n", ' (<28><>?<3F>ϡ<EFBFBD>?)[[:space:]]', $opt );
test_search( $enc, 'abcde abdeabcf anvfabc odu abcd ', '(ab[a-z]+)', $opt );
}
foreach( $encs as $enc ) {
do_tests( $enc, '' );
do_tests( $enc, 'x' );
}
?>