PAL.C.T MINI SHELL
--TEST--
DBA CDB handler test (read only)
--SKIPIF--
<?php
$handler = 'cdb_make';
require_once dirname(__FILE__) .'/skipif.inc';
?>
--FILE--
<?php
echo "database handler: cdb\n";
$handler = 'cdb';
$db_file = dirname(__FILE__).'/test.cdb';
if (($db_file=dba_open($db_file, "r", $handler))!==FALSE) {
// read key sequence
$a = dba_firstkey($db_file);
$count= 0;
$keys = $a;
while($a) {
$a = dba_nextkey($db_file);
$keys .= $a;
$count++;
}
// display number of entries and key existence
echo $count;
for ($i=1; $i<8; $i++) {
echo dba_exists($i, $db_file) ? "Y" : "N";
}
echo "\n=";
echo dba_fetch(1, $db_file);
echo dba_fetch(2, $db_file);
echo dba_fetch(3, $db_file);
echo dba_fetch(4, $db_file);
echo "\n#";
echo dba_fetch(1, $db_file);
echo dba_fetch(1, $db_file);
echo dba_fetch(2, $db_file);
echo dba_fetch(2, $db_file);
echo "\n?".$keys;
// with skip = 0 dba_fetch must fetch the first result
echo "\n#";
$skip = array();
for ($i=0; $i < strlen($keys); $i++) {
$key = substr($keys, $i, 1);
$skip[$key] = 0;
echo dba_fetch($key, $db_file);
}
echo "\n=";
for ($i=0; $i < strlen($keys); $i++) {
$key = substr($keys, $i, 1);
echo dba_fetch($key, $skip[$key], $db_file);
$skip[$key]++;
}
dba_close($db_file);
} else {
echo "Error creating database\n";
}
?>
--EXPECT--
database handler: cdb
7YYYYNNN
=1234
#1122
?1212314
#1212314
=1231324
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`