\n";
return $output;
}
function statistics_referer_internal() {
global $HTTP_HOST;
$output .= "
Most recent internal referers
\n";
$output .= statistics_table_1("SELECT url, timestamp FROM referer WHERE url LIKE '%". check_input($HTTP_HOST) ."%' ORDER BY timestamp DESC LIMIT 15");
$output .= "
Internal referers of the last ". format_interval(variable_get("referer_clear", 604800)) ."
\n";
$output .= statistics_table_2("SELECT url, COUNT(url) AS count FROM referer WHERE url LIKE '%". check_input($HTTP_HOST) ."%' GROUP BY url ORDER BY count DESC");
return $output;
}
function statistics_referer_external() {
global $HTTP_HOST;
$output .= "
Most recent external referers
\n";
$output .= statistics_table_1("SELECT url, timestamp FROM referer WHERE url NOT LIKE '%". check_input($HTTP_HOST) ."%' ORDER BY timestamp DESC LIMIT 15");
$output .= "
External referers of the last ". format_interval(variable_get("referer_clear", 604800)) ."
\n";
$output .= statistics_table_2("SELECT url, COUNT(url) AS count FROM referer WHERE url NOT LIKE '%". check_input($HTTP_HOST) ."%' GROUP BY url ORDER BY count DESC");
return $output;
}
function statistics_admin() {
global $type;
if (user_access("administer statistics")) {
print "internal referers | external referers\n";
switch ($type) {
case "internal referer":
print statistics_referer_internal();
break;
case "external referer":
// fall through:
default:
print statistics_referer_external();
}
}
}
?>