#$@%#$%!

Ngiler SH3LL 360
: / opt / alt / tests / alt-php80-pecl-yaz_1.2.4-1.el8 / tests /

Information Server
MySQL : OFF Perl : OFF CURL : ON WGET : OFF PKEXEC : OFF

Directive	Local Value
IP Address	162.0.209.101
System	Linux premium169.web-hosting.com 4.18.0-553.50.1.lve.el8.x86_64 #1 SMP Thu Apr 17 19:10:24 UTC 2025 x86_64
User	luxeelil
PHP Version	8.0.30
Software	LiteSpeed
Doc root	Writable

Edit File : ccl.phpt \| Size : 1.06 KB
--TEST-- yaz_ccl_parse --SKIPIF-- <?php if (!extension_loaded("yaz")) print "skip"; ?> --FILE-- <?php $z = yaz_connect("z3950.indexdata.com/gils"); yaz_ccl_conf($z, array( "ti" => "u=4 s=pw t=l,r", "term" => "1=1016 s=al,pw t=z", )); if (yaz_ccl_parse($z, "a", $res)) { echo "rpn=" . $res['rpn'] . "\n"; } else { echo "errorcode=" . $res['errorcode'] . "\n"; echo "errorstring=" . $res['errorstring'] . "\n"; echo "errorpos=" . $res['errorpos'] . "\n"; } if (yaz_ccl_parse($z, "unknown=a", $res)) { echo "rpn=" . $res['rpn'] . "\n"; } else { echo "errorcode=" . $res['errorcode'] . "\n"; echo "errorstring=" . $res['errorstring'] . "\n"; echo "errorpos=" . $res['errorpos'] . "\n"; } if (yaz_ccl_parse($z, "ti=computer", $res)) { echo "rpn=" . $res['rpn'] . "\n"; } else { echo "errorcode=" . $res['errorcode'] . "\n"; echo "errorstring=" . $res['errorstring'] . "\n"; echo "errorpos=" . $res['errorpos'] . "\n"; } --EXPECT-- rpn=@attr 4=2 @attr 1=1016 a errorcode=6 errorstring=Unknown qualifier errorpos=0 rpn=@attr 4=2 @attr 1=4 computer Back

Edit File : ccl.phpt | Size : 1.06 KB

--TEST--
yaz_ccl_parse
--SKIPIF--
<?php if (!extension_loaded("yaz")) print "skip"; ?>
--FILE--
<?php
$z = yaz_connect("z3950.indexdata.com/gils");
yaz_ccl_conf($z, array(
 "ti" => "u=4 s=pw t=l,r",
 "term" => "1=1016 s=al,pw t=z",
 ));
if (yaz_ccl_parse($z, "a", $res)) {
   echo "rpn=" . $res['rpn'] . "\n";
} else {
   echo "errorcode=" . $res['errorcode'] . "\n";
   echo "errorstring=" . $res['errorstring'] . "\n";
   echo "errorpos=" . $res['errorpos'] . "\n";
}
if (yaz_ccl_parse($z, "unknown=a", $res)) {
   echo "rpn=" . $res['rpn'] . "\n";
} else {
   echo "errorcode=" . $res['errorcode'] . "\n";
   echo "errorstring=" . $res['errorstring'] . "\n";
   echo "errorpos=" . $res['errorpos'] . "\n";
}
if (yaz_ccl_parse($z, "ti=computer", $res)) {
   echo "rpn=" . $res['rpn'] . "\n";
} else {
   echo "errorcode=" . $res['errorcode'] . "\n";
   echo "errorstring=" . $res['errorstring'] . "\n";
   echo "errorpos=" . $res['errorpos'] . "\n";
}
--EXPECT--
rpn=@attr 4=2 @attr 1=1016 a 
errorcode=6
errorstring=Unknown qualifier
errorpos=0
rpn=@attr 4=2 @attr 1=4 computer

Back