- Fix test

This commit is contained in:
Marcus Boerger 2006-08-06 12:49:43 +00:00
parent 9beb75da15
commit 73d7f02ddc

View File

@ -13,6 +13,7 @@ $phar = new Phar($fname);
$phar->setFileClass('SplFileObject'); $phar->setFileClass('SplFileObject');
$f = $phar['a.csv']; $f = $phar['a.csv'];
echo "===1===\n";
foreach($f as $k => $v) foreach($f as $k => $v)
{ {
echo "$k=>$v\n"; echo "$k=>$v\n";
@ -20,6 +21,7 @@ foreach($f as $k => $v)
$f->setFlags(SplFileObject::DROP_NEW_LINE); $f->setFlags(SplFileObject::DROP_NEW_LINE);
echo "===2===\n";
foreach($f as $k => $v) foreach($f as $k => $v)
{ {
echo "$k=>$v\n"; echo "$k=>$v\n";
@ -36,11 +38,21 @@ class MyCSVFile extends SplFileObject
$phar->setFileClass('MyCSVFile'); $phar->setFileClass('MyCSVFile');
$v = $phar['a.csv']; $v = $phar['a.csv'];
echo "===3===\n";
while(!$v->eof()) while(!$v->eof())
{ {
echo $v->key() . "=>" . join('|',$v->fgetcsv()) . "\n"; echo $v->key() . "=>" . join('|',$v->fgetcsv()) . "\n";
} }
echo "===4===\n";
$v->rewind();
while(!$v->eof())
{
$l = $v->fgetcsv();
echo $v->key() . "=>" . join('|',$l) . "\n";
}
echo "===5===\n";
foreach($v as $k => $d) foreach($v as $k => $d)
{ {
echo "$k=>" . join('|',$d) . "\n"; echo "$k=>" . join('|',$d) . "\n";
@ -58,6 +70,7 @@ class MyCSVFile2 extends SplFileObject
$phar->setFileClass('MyCSVFile2'); $phar->setFileClass('MyCSVFile2');
$v = $phar['a.csv']; $v = $phar['a.csv'];
echo "===6===\n";
foreach($v as $k => $d) foreach($v as $k => $d)
{ {
echo "$k=>" . join('|',$d) . "\n"; echo "$k=>" . join('|',$d) . "\n";
@ -71,20 +84,29 @@ unlink(dirname(__FILE__) . '/phar_oo_test.phar.php');
__halt_compiler(); __halt_compiler();
?> ?>
--EXPECTF-- --EXPECTF--
===1===
0=>1,2,3 0=>1,2,3
1=>2,a,b 1=>2,a,b
2=>3,"c","'e'" 2=>3,"c","'e'"
===2===
0=>1,2,3 0=>1,2,3
1=>2,a,b 1=>2,a,b
2=>3,"c","'e'" 2=>3,"c","'e'"
===3===
0=>1|2|3
0=>2|a|b
1=>3|c|'e'
===4===
0=>1|2|3 0=>1|2|3
1=>2|a|b 1=>2|a|b
2=>3|c|'e' 2=>3|c|'e'
1=>1|2|3 ===5===
3=>2|a|b 0=>1|2|3
5=>3|c|'e' 1=>2|a|b
2=>3|c|'e'
===6===
MyCSVFile2::getCurrentLine MyCSVFile2::getCurrentLine
1=>1|2|3 1=>1|2|3
MyCSVFile2::getCurrentLine MyCSVFile2::getCurrentLine