University Sunderland of high Sunderland a globe Welcome modern university international dynamic, Sunderland has an standards across with outlook and students to of the from http://welcome.sunderland.ac.uk/
live at Sunderland University Net Eye NetEye Sunderland. at live University the WebCam of http://www.sunderland.ac.uk/camera.html
BBC Sunderland Football My | | Club | SPORT happens all Sport audio BBC up-to-the-minute news, for results, stories. the news, Visit breaking as video, it and feature action http://news.bbc.co.uk/sport1/hi/football/teams/s/sunderland/default.stm
Sunderland Club Football UK Sport Yahoo! - Sunderland profile latest team Sport and all from UK. Sunderland news Football Yahoo! the Club http://uk.sports.yahoo.com/fo/sunderland/
College of City Sunderland City College. Sunderland of http://www.citysun.ac.uk/
& Museum Gardens Sunderland Welcome - Winter gardens hours collections, of plants. Details opening artefacts Art 1500 different ancient featuring of collection ways and and get history, to gallery, - http://www.twmuseums.org.uk/sunderland/
sunderland : Home University by of Students' Union. regulated published you of Union. the page Sunderland University This Sunderland is and If Students' wish to comment, - http://www.sunderlandsu.co.uk/
- Main OneSunderland.com OneSunderland.com is of to supporters for an and Sunderland AFC. news, up message date reports match board. fanzine the Contains online FTMforum http://www.onesunderland.com/
Sunderland of Port acre A harbour in-dock facilities estate industrial and providing riverside commercial interests. cargo for 250 and industrial and http://www.portofsunderland.org.uk/
SAFC.COM: THE OFFICIAL SUNDERLAND OF AFC WEBSITE the Home Club-SAFC, stadium
Football North East, Sunderland light. of The in Football of
http://www.safc.com/
0 and $resultid == 1 ) { echo " Featured Sites
";}
else {
if ( $resultset["FSCOUNT"] == $resultid-1) { echo " Web Results
";}
}
echo " ";
}
// handles the attributes for opening tags
// $attrs is a multidimensional array keyed by attribute
// name and having the value of that attribute
function startElement($parser, $name, $attrs=''){
global $currenttag, $parenttag, $title, $abstract, $redir, $url, $imgurl, $imgalt, $resultset, $resultid;
if ($currenttag == "") { $parenttag = $currenttag; }
$currenttag = $name;
if (count($attrs) > 0) {
foreach($attrs as $keys) {
// print ($keys);
if ($name == "RESULTSET") {
$resultset = $attrs;
}
if ($name == "RESULT") {
$resultid = $attrs["ID"]+1;
//print ($attrs["ID"]);
}
}
}
}
// $current_tag lets us know what tag we are currently
// dealing with - we use that later in the characterData
// function.
function endElement($parser, $name, $attrs=''){
global $currenttag, $parenttag, $title, $abstract, $redir, $url, $imgurl, $imgalt, $resultset, $resultid;
global $Atitle, $Aabstract, $Aredir, $Aurl, $Aimgurl, $Aimgalt;
if ($name == "RESULT") {
array_push($Atitle, $title);
array_push($Aabstract, $abstract);
array_push($Aredir, $redir);
array_push($Aurl, $url);
array_push($Aimgurl, $imgurl);
array_push($Aimgalt, $imgalt);
$title = "";
$abstract = "";
$redir = "";
$url = "";
$imgurl = "";
$imgalt = "";
}
$currenttag = "";
}
// this function is passed data between elements
function characterData($parser, $data){
global $currenttag, $parenttag, $title, $abstract, $redir, $url, $imgurl, $imgalt, $resultset, $resultid, $alttxt;
// $data =~ s/£/£/;
if (($currenttag == "ALT") && ($data != "\n")) { $alttxt = $data; }
if (($currenttag == "TITLE") && ($data != "\n")) { $title = $title . $data; }
if (($currenttag == "ABSTRACT") && ($data != "\n")) { $abstract = $abstract . $data; }
if (($currenttag == "URL") && ($data != "\n")) { $url = $url . $data; }
if (($currenttag == "REDIR") && ($data != "\n")) { $redir = $redir . $data; }
if (($currenttag == "IMGURL") && ($data != "\n")) { $imgurl = $imgurl . $data; }
if (($currenttag == "IMGALT") && ($data != "\n")) { $imgalt = $imgalt . $data; }
}
global $qry, $nres, $nfs, $offset, $details, $img, $filter;
global $ass, $fsonly, $ns, $hl, $alt, $alttxt;
global $querykey, $queryvar;
foreach($_REQUEST As $querykey => $queryvar) {
eval("\$$querykey = \"$queryvar\";");
}
$qry = stripslashes("Sunderland");
$nres == 0 ? $nres = 10 : 0;
$nfs == 0 ? $nfs = 0 : 0;
$offset == "" ? $offset = 0: 0;
$details == "" ? $details = 1 : 0;
$fsonly == "" ? $fsonly = 0: 0;
$hl == "" ? $hl = 0: 0;
$alt == "" ? $alt = 0: 0;
$img == "" ? $img = 0: 0;
$filter == "" ? $filter = 0: 0;
// $ns == "" ? $ns = 0: 0;
$Atitle = array();
$Aabstract = array();
$Aredir = array();
$Aurl = array();
$Aimgurl = array();
$Aimgalt = array();
$xml_feed = "http://www.mirago.co.uk/scripts/xmlhandler.aspx?";
$xml_feed .= "qry=" . urlencode($qry);
$xml_feed .= "&ip=" . getenv("REMOTE_ADDR");
// *** Insert your Associate Code Here
$xml_feed .= "&ass=1921";
$xml_feed .= "&details=". $details;
$xml_feed .= "&nres=" . $nres;
$xml_feed .= "&offset=" . $offset;
$xml_feed .= "&nfs=" . $nfs;
$xml_feed .= "&fsonly=" . $fsonly;
$xml_feed .= "&hl=" . $hl;
$xml_feed .= "&ns=" . $ns;
$xml_feed .= "&alt=" . $alt;
$xml_feed .= "&img=" . $img;
$xml_feed .= "&filter=" . $filter;
$pagelink = getenv("SCRIPT_NAME") . "?qry=" . urlencode($qry) . "&nres=$nres&details=$details&fsonly=$fsonly&hl=$hl&nfs=$nfs&ns=$ns&alt=$alt&img=$img&filter=$filter";
// what are we parsing?
$type = 'ISO-8859-1';
// create our parser
$xml_parser = xml_parser_create($type);
// set some parser options
xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, true);
xml_parser_set_option($xml_parser, XML_OPTION_TARGET_ENCODING, $type);
// this tells PHP what functions to call when it finds an element
// these funcitons also handle the element's attributes
xml_set_element_handler($xml_parser, 'startElement','endElement');
// this tells PHP what function to use on the character data
xml_set_character_data_handler($xml_parser, 'characterData');
if (!($fp = fopen($xml_feed, 'r'))) {
die("Could not open $xml_feed for parsing!\n");
}
// loop through the file and parse baby!
while ($data = fread ($fp, 4096)) {
// if (!($data = utf8_encode($data))) {
// echo 'ERROR'."\n";
// }
if (!xml_parse($xml_parser, $data, feof($fp))) {
die(sprintf( "XML error: %s at line %d\n\n",
xml_error_string(xml_get_error_code($xml_parser)),
xml_get_current_line_number($xml_parser)));
}
}
xml_parser_free($xml_parser);
if ($qry != "") echo "You searched for ". htmlspecialchars($qry) . " : ";
if ($resultset["NUMRESULTS"] != 0) {
echo "Showing Results " . ($offset+1) . " - " . ($offset + $resultset["NUMRESULTS"]);
} else {
If ($qry<>"") {echo "No results were returned";}
}
echo "
";
// This outputs the alternate search terms
if ($alttxt != "") {
global $altterms;
$altterms = explode(", ",$alttxt);
echo " Also Try The Following Searches: ";
foreach ($altterms as $alttxt) {
if ($altterms[0] != $alttxt) { echo", ";}
echo "".$alttxt."";
}
echo "
";
}
for ($i = 1; $i <= $resultset["NUMRESULTS"]; $i++) {
$title = array_shift($Atitle);
$abstract = array_shift($Aabstract);
$redir = array_shift($Aredir);
$url = array_shift($Aurl);
$imgurl = array_shift($Aimgurl);
$imgalt = array_shift($Aimgalt);
displayResult($i, $title, $abstract, $redir, $url, $imgurl, $imgalt);
}
if (($resultset["MORERESULTS"] == "True") || ($offset < "0")) {
echo "";
if ($offset != "0") { echo "<< Previous results "; }
if (($resultset["MORERESULTS"] == "True") && ($offset < (200 - $nres))) { echo "More results >>"; }
}
?>
|
|