'ed text.
$res = str_replace("[;:]", "", $res);
$res = str_replace("[:;]", "", $res);
print $res;
}
// ----------------------------------------------------------------------------
// Compares the two values, used for sorting output results
// Results that match all search terms are put first, highest score
// ----------------------------------------------------------------------------
function SortCompare ($a, $b) {
if ($a[2] < $b[2])
return 1;
else
if ($a[2] > $b[2])
return -1;
else {
if ($a[1] < $b[1])
return 1;
else
if ($a[1] > $b[1])
return -1;
else
return 0;
}
}
// ----------------------------------------------------------------------------
// Translates a typical shell wildcard pattern ("zoo*" => "zoom" etc.)
// to a regular expression pattern. Supports only '*' and '?' characters.
// ----------------------------------------------------------------------------
function pattern2regexp($pattern) {
$i = 0;
$len = strlen($pattern);
// add "\b" to res before and after the pattern, to ensure a distinct match
// eg: no word stemming
$res = "/\b";
while ($i < $len) {
$c = $pattern[$i];
$i++;
if ($c == '*')
$res = $res . ".*";
else
if ($c == '?')
$res = $res . ".";
else
$res = $res . preg_quote($c, '/');
}
return $res . '\b/i';
}
// ----------------------------------------------------------------------------
// Main starts here
// ----------------------------------------------------------------------------
if ($Timing == 1) {
$mtime = explode(" ", microtime());
$starttime = doubleval($mtime[1]) + doubleval($mtime[0]);
}
//Open and print start of result page template
$template = file ($TemplateFilename);
$numtlines = count ($template); //Number of lines in the template
$line = 0;
while ($line < $numtlines) {
if (!stristr($template[$line], "")) {
echo $template[$line];
$line++;
}
else {
break;
}
}
$line++;
// Replace the key text with the following
if ($FormFormat > 0)
{
// Insert the form
print("\n");
}
// Give up early if no search words provided
if (empty($query))
{
// only display 'no query' line if no form is shown
if ($FormFormat == 0)
print("No search query entered.
");
PrintEndOfTemplate($template, $line);
return;
}
//Split search phrase into words
if ($WordSplit == 1)
$SearchWords = split ('[-_ +/=]', $query);
else
$SearchWords = split ('[ ]', $query);
// Load the entire pages file into an array, all URL's on the site
$urls = file ('zoom_pages.dat');
// Load the entire page titles file into an array
$titles = file ('zoom_titles.dat');
if ($OutputStyle == 1)
$descriptions = file ('zoom_descriptions.dat');
//Print heading
print "Suchergebnis \"$query\"";
//Open keywords file
$fpkeywords = fopen ("zoom_keywords.dat", "r");
if ($urls == FALSE || $titles == FALSE || $fpkeywords == FALSE) {
print("Can not find one or more of the Zoom index files.
Please make sure the generated index files are uploaded to the same path as this search script.
\n");
return;
}
//Loop through all search words
$numwords = count ($SearchWords);
$outputline = 0;
$UseWildCards = 1; // default as using wildcard
if ($Highlighting == 1) {
$matchwords = array();
$matchwords_num = 0;
}
for ($sw = 0; $sw < $numwords; $sw++) {
// check whether there are any wildcards used
if (strstr($SearchWords[$sw], "*") == FALSE && strstr($SearchWords[$sw], "?") == FALSE)
$UseWildCards = 0;
else
$pattern = pattern2regexp($SearchWords[$sw]);
//Read in a line at a time from the keywords files
while ($data = fgetcsv ($fpkeywords, $MaxKeyWordLineLen, ",")) {
// if we're not using wildcards, direct match
if ($UseWildCards == 0)
$result = strcasecmp($SearchWords[$sw], $data[0]);
else // if we have wildcards...
$result = !(preg_match($pattern, $data[0]));
if ($result == 0) {
//Keyword found, so include it in the output list
if ($Highlighting == 1) {
// Add to matched words list
if (!in_array($data[0], $matchwords)) {
$matchwords[$matchwords_num] = $data[0];
$matchwords_num++;
}
}
$num = count ($data);
for ($kw=1; $kw < $num; $kw +=2) {
//Check if page is already in output list
$pageexists = 0;
$ipage = $data[$kw];
for ($ol = 0; $ol < $outputline; $ol++) {
if ($output[$ol][0] == $ipage) {
//Page is already in output list, so add to count + extra
if ($output[$ol][1] > 10000) {
// take it easy if its too big (to prevent huge scores)
$output[$ol][1] += 1;
} else {
$output[$ol][1] += $data[$kw+1]; //Add in score
$output[$ol][1] *= 2; //Double Score as we have two words matching
}
$output[$ol][2] += 1; //Increase word match count
$pageexists = 1;
}
}
if ($pageexists == 0) {
//New page to add to list
$output[$outputline][0] = $ipage; //Page index
$output[$outputline][1] = $data[$kw+1]; //Score
$output[$outputline][2] = 1; //Single word match only so far
$outputline++;
}
}
if ($UseWildCards == 0)
break; //This search word was found, so skip to next
}
}
//Return to start of file
rewind ($fpkeywords);
}
//Close the files
fclose ($fpkeywords);
//Get number of pages matched
$matches = $outputline;
//Sort results in order of score, use the "SortCompare" function
if ($matches > 1)
usort ($output, "SortCompare");
//Count number of output lines that match ALL search terms
$oline = 0;
$fullmatches = 0;
while (($oline < $matches) && $numwords > 1) {
if ($output[$oline][2] == $numwords) {
$fullmatches++;
} else if ($and == 1) {
// AND search
// Remove the not-AND result
unset($output[$oline]);
}
$oline++;
}
if ($and == 1 && $numwords > 1) {
// we need to re-index the array
$output = array_values($output);
// and the matches now are only the number of fullmatches
$matches = count($output);
}
//Display search result information
print "";
if ($matches == 1)
print "<
Der Suchbegriff erzielte 1 Treffer.
";
else
if ($matches == 0)
print "
Leider keine Treffer gefunden.
";
else
if ($numwords > 1 && $and == 0) {
//OR
$SomeTermMatches = $matches - $fullmatches;
print "
$fullmatches Seiten wurden gefunden, die alle Suchbegriffe beinhalten. ";
if ($SomeTermMatches > 0)
print "
$SomeTermMatches Seiten wurden gefunden, die einige Suchbegriffe beinhalten.";
print "
";
}
else
if ($numwords > 1 && $and == 1) //AND
print "
$fullmatches Seiten wurden gefunden, die alle Suchbegriffe beinhalten.
";
else
print "
Der Suchbegriff erzielte $matches Treffer.
";
if ($matches < 3 && $and == 1 && $numwords > 1) {
print "
Sie können vielleicht mehr Treffer erzielen, wenn Sie mit allen Suchbegriffen suchen.
";
}
print "\n";
// Number of pages of results
$num_pages = ceil($matches / $per_page);
if ($num_pages > 1)
print "
Ergebnisse verteilt auf $num_pages Seiten.
\n";
// Determine current line of result from the $output array
if ($page == 1) {
$arrayline = 0;
} else {
$arrayline = (($page - 1) * $per_page);
}
// The last result to show on this page
$result_limit = $arrayline + $per_page;
// Display the results
while ($arrayline < $matches && $arrayline < $result_limit) {
$ipage = $output[$arrayline][0];
$score = $output[$arrayline][1];
if ($OutputStyle == 0) {
//Basic style
print ""."Page: ".rtrim($titles[$ipage])."
\n";
print "Score: " . $score ."
URL:".rtrim($urls[$ipage])."
\n";
}
else {
//Descriptive style
print "".($arrayline+1).". ".rtrim($titles[$ipage])."
";
if ($Highlighting == 1)
PrintHighlightDescription(rtrim($descriptions[$ipage]));
else
print rtrim($descriptions[$ipage]);
print "...
\n";
print "
Suchbegriff enthalten: ". $output[$arrayline][2]. " Score: " . $score ."
URL: ".rtrim($urls[$ipage])."
\n";
}
$arrayline++;
}
// Show links to other result pages
if ($num_pages > 1) {
print "Weitere Ergebnisse:
";
if ($page > 1)
print "<< zurück ";
for ($i = 1; $i <= $num_pages; $i++) {
if ($i == $page) {
print $page." ";
} else {
print "".$i." ";
}
}
if ($page != $num_pages)
print "weiter >> ";
}
if ($Timing == 1) {
$mtime = explode(" ", microtime());
$endtime = doubleval($mtime[1]) + doubleval($mtime[0]);
$difference = abs($starttime - $endtime);
print "
Die Suche dauerte: " . number_format($difference, 5, '.', '') . " Sekunden\n";
}
//Print out the end of the template
PrintEndOfTemplate($template, $line);
//Log the search words, if required
if ($Logging == 1) {
$LogString = Date("d-m-y, H:i:s") . ", " . $REMOTE_ADDR . ", " . " \"" .$query . "\"" . ", Matches = " . $matches;
if ($and == 1)
$LogString = $LogString . ", AND\n";
else
$LogString = $LogString . ", OR\n";
$fp = fopen ($LogFileName, "a");
if ($fp != false) {
fputs ($fp, $LogString);
fclose ($fp);
}
}
?>