In the latter case download http://".$SERVER_NAME.$PHP_SELF."?stylesheet.xsl and save it in the same place as the xml data file.
![\"\"](\"http://www.assoc-amazon.co.uk/e/ir?t=panmental03-21&l=ur2&o=2\")
.com![\"\"](\"http://www.assoc-amazon.com/e/ir?t=panmental-20&l=ur2&o=1\")
.de![\"\"](\"http://www.assoc-amazon.de/e/ir?t=panmental-21&l=ur2&o=3\")
)";
}
//this will take bibtex data (one entry a time) and return a fairly standard citation representation in html
function bibtex2html($texEntry,$internalNumber,$addlinks=true){
$ret=extractBib("text",$texEntry);
if(trim($ret)==""){
//begin there is no predefined text to show, we create some
$author=extractBib("author",$texEntry);
if($author==""){
$author=extractBib("editor",$texEntry);
$author=$author.", ed.";
}
$shortAuth=shortenAuthors($author);
$ret=$ret.$shortAuth;
$year=extractBib("year",$texEntry);
if($ret[strlen($ret)-1]!=".")
$ret=$ret.".";
$ret=$ret." ";
$title=extractBib("title",$texEntry);
if((trim($author)=="")||(trim($title)==""))
return "";
$texType=strtolower(extractBibType($texEntry));
if(($texType!="article")&&($texType!="inproceedings"))
$ret=$ret."$title";
else
$ret=$ret.$title;
if($title[strlen($title)-1]!=".")
$ret=$ret.".";
if($texType=="phdthesis"){
$ret=$ret." Ph.D. Thesis";
$school=extractBib("school",$texEntry);
if(trim($school)!="")
$ret=$ret.", ".$school;
$addrs=extractBib("address",$texEntry);
if(trim($addrs)!="")
$ret=$ret.", ".$addrs;
if(trim(strtolower($year))!="")
$ret=$ret.", ".$year;
$ret=$ret.".";
}
if($texType=="article"){
$journ=extractBib("journal",$texEntry);
if($journ=="") //might be a book chapter...
$journ=extractBib("book",$texEntry);
if(trim(strtolower($journ))!=""){
$ret=$ret." In ".$journ."";
$vol=extractBib("volume",$texEntry);
if(trim(strtolower($vol))!="")
$ret=$ret.", ".$vol;
$numb=extractBib("number",$texEntry);
if(trim(strtolower($numb))!="")
$ret=$ret." (".str_replace("--","-",$numb).")";
$pages=extractBib("pages",$texEntry);
if(trim(strtolower($pages))!="")
$ret=$ret.": ".str_replace("--","-",$pages);
if(trim(strtolower($year))!="")
$ret=$ret.", ".$year;
$ret=$ret.".";
}
}
if($texType=="inproceedings"){
$booktitle=extractBib("booktitle",$texEntry);
if(trim(strtolower($booktitle))!=""){
$ret=$ret." In ".$booktitle."";
$pages=extractBib("pages",$texEntry);
if(trim(strtolower($pages))!="")
$ret=$ret.", pages ".str_replace("--","-",$pages);
$publisher=extractBib("publisher",$texEntry);
if(trim(strtolower($publisher))!="")
$ret=$ret.", ".$publisher;
if(trim(strtolower($year))!="")
$ret=$ret.", ".$year;
$ret=$ret.".";
}
}
if($texType=="book"){
$publisher=extractBib("publisher",$texEntry);
if(trim(strtolower($publisher))!="")
$ret=$ret." ".$publisher;
$pubaddress=extractBib("address",$texEntry);
if(trim(strtolower($pubaddress))!="")
$ret=$ret.", ".$pubaddress;
if(trim(strtolower($year))!="")
$ret=$ret.", ".$year;
$ret=$ret.".";
}
}//end there is no predefined text to show, we create some
if($addlinks){
global $createJumpMarks;
global $addBreaksBeforeLinks;
if($createJumpMarks){//KNSQbioClockGRNs
$bibName=extractBibName($texEntry);
$ret="".$ret;
}
$tempdat=extractBib("url",$texEntry);
if($addBreaksBeforeLinks)
$ret=$ret.""; if($tempdat!="") $ret=$ret." (link) "; $tempdat=extractBib("EE",$texEntry); if($tempdat!="") $ret=$ret." (file) "; //link to show complete bibtex entry - specific to this script global $SCRNAME; global $sep; global $args; $ret=$ret." (bibtex)"; if($texType=="book"){ $authSplit=split(",",$shortAuth); $authorOne=trim($authSplit[0]); $keywordphrase=str_replace(" ","%20",$title)."%20$authorOne"; $ret=$ret.searchIt($keywordphrase); } } return "
".$ret."
";
}
function sel($i,$j){
if($i==$j)
return "selected";
return "";
}
//we are the upper part of frame
if($args[0]=="head"){
echo "";
echo "\r\n";
echo "\r\n";
echo "\r\n";
echo "\r\n";
die;
}
//begin read xml data file
function trustedFile($file)
{
// only trust local files owned by ourselves
if (!eregi("^([a-z]+)://", $file)
&& fileowner($file) == getmyuid()) {
return true;
}
return false;
}
function startElement($parser, $name, $attribs) //opening, i.e. Maybe the database file ".$filename." is missing?
It should be placed in the same directory as the script and contain at least:
".str_replace(">",">",str_replace("<","<",$libStart."