| Server IP : 180.180.241.3 / Your IP : 216.73.216.35 Web Server : Microsoft-IIS/7.5 System : Windows NT NETWORK-NHRC 6.1 build 7601 (Windows Server 2008 R2 Standard Edition Service Pack 1) i586 User : IUSR ( 0) PHP Version : 5.3.28 Disable Function : NONE MySQL : ON | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /AppServ/www/ULIB/_havester/ |
Upload File : |
<?
if (!function_exists("havester_formatkeyid")) {
function havester_formatkeyid($wh) {
global $newline;
//copy this part to run-relcheck.php too
//$wh=base64_decode($wh);
$a=explode(":--:",$wh);
$res="";
@reset($a);
$i=0;
while (list($k,$v)=each($a)) {
$i++;
$tmp=marc_getsubfields($v,"no");
if ($i==1) {
$res.=$tmp[c].":";
} else {
$res.=$tmp[a].":";
}
}
$wh=str_replace("\\","",$res);
$wh=str_replace("/","",$wh);
$wh=str_replace("'","",$wh);
$wh=str_replace("\"","",$wh);
$wh=str_replace("!","",$wh);
$wh=str_replace("?","",$wh);
$wh=str_replace(" ","",$wh);
$wh=str_replace(".","",$wh);
$wh=str_replace(",","",$wh);
$wh=str_replace("^a","",$wh);
$wh=str_replace("^b","",$wh);
$wh=str_replace("^c","",$wh);
$wh=str_replace("-","",$wh);
$wh=str_replace("_","",$wh);
$wh=str_replace("[","",$wh);
$wh=str_replace("]","",$wh);
$wh=str_replace("
","",$wh);
$wh=str_replace($newline,"",$wh);
$wh=str_replace(chr(13),"",$wh);
//end copy
return $wh;
}
}
?>