2002-03-02 10:44:57 +00:00
|
|
|
|
<?php
|
|
|
|
|
|
// TODO: Add more encodings
|
|
|
|
|
|
|
|
|
|
|
|
//$debug=true;
|
|
|
|
|
|
ini_set('include_path','.');
|
2002-03-18 06:03:53 +00:00
|
|
|
|
include_once('common.inc');
|
2002-03-02 10:44:57 +00:00
|
|
|
|
|
|
|
|
|
|
// restore detect_order to 'auto'
|
|
|
|
|
|
mb_detect_order('auto');
|
|
|
|
|
|
|
|
|
|
|
|
// Test string
|
|
|
|
|
|
$euc_jp = '0123<32><33><EFBFBD><EFBFBD>ʸ<EFBFBD><CAB8><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ܸ<EFBFBD><DCB8>Ǥ<EFBFBD><C7A4><EFBFBD>EUC-JP<4A><50><EFBFBD>ȤäƤ<C3A4><C6A4>ޤ<EFBFBD><DEA4><EFBFBD>0123<32><33><EFBFBD>ܸ<EFBFBD><DCB8><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ݽ<EFBFBD><DDBD><EFBFBD><EFBFBD><EFBFBD>';
|
|
|
|
|
|
$ascii = 'abcdefghijklmnopqrstuvwxyz;]=#0123456789';
|
|
|
|
|
|
|
|
|
|
|
|
// ASCII
|
|
|
|
|
|
echo "== ASCII ==\n";
|
|
|
|
|
|
print strlen($ascii,'ASCII') . "\n";
|
|
|
|
|
|
print strlen($ascii) . "\n";
|
|
|
|
|
|
|
|
|
|
|
|
// EUC-JP
|
|
|
|
|
|
echo "== EUC-JP ==\n";
|
|
|
|
|
|
print strlen($euc_jp,'EUC-JP') . "\n";
|
|
|
|
|
|
mb_internal_encoding('EUC-JP') or print("mb_internal_encoding() failed\n");
|
|
|
|
|
|
print strlen($euc_jp) . "\n";
|
|
|
|
|
|
|
|
|
|
|
|
// SJIS
|
|
|
|
|
|
echo "== SJIS ==\n";
|
|
|
|
|
|
$sjis = mb_convert_encoding($euc_jp, 'SJIS');
|
|
|
|
|
|
print strlen($sjis,'SJIS') . "\n";
|
|
|
|
|
|
mb_internal_encoding('SJIS') or print("mb_internal_encoding() failed\n");
|
|
|
|
|
|
print strlen($sjis) . "\n";
|
|
|
|
|
|
|
|
|
|
|
|
// JIS
|
|
|
|
|
|
// Note: either convert_encoding or strlen has problem
|
|
|
|
|
|
echo "== JIS ==\n";
|
|
|
|
|
|
$jis = mb_convert_encoding($euc_jp, 'JIS');
|
|
|
|
|
|
print strlen($jis,'JIS') . "\n";
|
|
|
|
|
|
mb_internal_encoding('JIS') or print("mb_internal_encoding() failed\n");
|
|
|
|
|
|
print strlen($jis) . "\n";
|
|
|
|
|
|
|
|
|
|
|
|
// UTF-8
|
|
|
|
|
|
// Note: either convert_encoding or strlen has problem
|
|
|
|
|
|
echo "== UTF-8 ==\n";
|
|
|
|
|
|
$utf8 = mb_convert_encoding($euc_jp, 'UTF-8');
|
|
|
|
|
|
print strlen($utf8,'UTF-8') . "\n";
|
|
|
|
|
|
mb_internal_encoding('UTF-8') or print("mb_internal_encoding() failed\n");
|
|
|
|
|
|
print strlen($utf8) . "\n";
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// Wrong Parameters
|
|
|
|
|
|
echo "== WRONG PARAMETERS ==\n";
|
|
|
|
|
|
// Array
|
|
|
|
|
|
// Note: PHP Notice, but returns some value
|
|
|
|
|
|
$r = strlen($t_ary);
|
|
|
|
|
|
echo $r."\n";
|
|
|
|
|
|
// Object
|
|
|
|
|
|
// Note: PHP Notice, but returns some value
|
|
|
|
|
|
$r = strlen($t_obj);
|
|
|
|
|
|
echo $r."\n";
|
|
|
|
|
|
// Wrong encoding
|
|
|
|
|
|
mb_internal_encoding('EUC-JP');
|
|
|
|
|
|
$r = strlen($euc_jp, 'BAD_NAME');
|
|
|
|
|
|
echo $r."\n";
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
?>
|
