From 43db9cf86fdfba736117cda501c6eb1d31d04693 Mon Sep 17 00:00:00 2001
From: Dries Buytaert <dries@buytaert.net>
Date: Tue, 3 Jul 2001 19:16:20 +0000
Subject: - common.inc:    + Made '$na' translatable on popular demand.

- node.module:
   + replaced a confusing configuration description, as suggested by
     Remco.

- statistics.module:
   + Added a 'most recent referers'-table sorted by timestamp.

- drupal.module:
   + Small update of the links.
---
 modules/statistics/statistics.module | 38 ++++++++++++++++++++++++++----------
 1 file changed, 28 insertions(+), 10 deletions(-)

(limited to 'modules/statistics/statistics.module')

diff --git a/modules/statistics/statistics.module b/modules/statistics/statistics.module
index d23e7b22c..f5acfaacc 100644
--- a/modules/statistics/statistics.module
+++ b/modules/statistics/statistics.module
@@ -29,25 +29,21 @@ function statistics_conf_options() {
   return $output;
 }
 
-function statistics_referer_internal() {
-  $result = db_query("SELECT url, COUNT(url) AS count FROM referer WHERE url LIKE '". path_uri() ."%' GROUP BY url ORDER BY count DESC");
-
-  $output .= "<P>Internal referers of the last ". format_interval(variable_get("referer_clear", 604800)) .":</P>\n";
+function statistics_table_1($query) {
+  $result = db_query($query);
 
   $output .= "<TABLE BORDER=\"1\" CELLPADDING=\"3\" CELLSPACING=\"0\">\n";
-  $output .= " <TR><TH>URL</TH><TH>number</TH></TR>\n";
+  $output .= " <TR><TH>URL</TH><TH>date</TH></TR>\n";
   while ($referer = db_fetch_object($result)) {
-    $output .= "<TR><TD><A HREF=\"". check_output($referer->url) ."\">". substr(check_output($referer->url), 0, 100) ."</A></TD><TD>". check_output($referer->count) ."</TD></TR>";
+    $output .= "<TR><TD><A HREF=\"". check_output($referer->url) ."\">". substr(check_output($referer->url), 0, 100) ."</A></TD><TD>". format_date($referer->timestamp, "small") ."</TD></TR>";
   }
   $output .= "</TABLE>\n";
 
   return $output;
 }
 
-function statistics_referer_external() {
-  $result = db_query("SELECT url, COUNT(url) AS count FROM referer WHERE url NOT LIKE '". path_uri() ."%' GROUP BY url ORDER BY count DESC");
-
-  $output .= "<P>External referers of the last ". format_interval(variable_get("referer_clear", 604800)) .":</P>\n";
+function statistics_table_2($query) {
+  $result = db_query($query);
 
   $output .= "<TABLE BORDER=\"1\" CELLPADDING=\"3\" CELLSPACING=\"0\">\n";
   $output .= " <TR><TH>URL</TH><TH>number</TH></TR>\n";
@@ -59,6 +55,28 @@ function statistics_referer_external() {
   return $output;
 }
 
+function statistics_referer_internal() {
+  $output .= "<H3>Most recent referers</H3>\n";
+  $output .= statistics_table_1("SELECT url, timestamp FROM referer WHERE url LIKE '". path_uri() ."%' ORDER BY timestamp DESC LIMIT 15");
+
+  $output .= "<H3>Referers of the last ". format_interval(variable_get("referer_clear", 604800)) ."</H3>\n";
+  $output .= statistics_table_2("SELECT url, COUNT(url) AS count FROM referer WHERE url LIKE '". path_uri() ."%' GROUP BY url ORDER BY count DESC");
+
+  return $output;
+}
+
+function statistics_referer_external() {
+  $result = db_query("SELECT url, COUNT(url) AS count FROM referer WHERE url NOT LIKE '". path_uri() ."%' GROUP BY url ORDER BY count DESC");
+
+  $output .= "<H3>Most recent referers</H3>\n";
+  $output .= statistics_table_1("SELECT url, timestamp FROM referer WHERE url NOT LIKE '". path_uri() ."%' ORDER BY timestamp DESC LIMIT 15");
+
+  $output .= "<H3>Referers of the last ". format_interval(variable_get("referer_clear", 604800)) ."</H3>\n";
+  $output .= statistics_table_2("SELECT url, COUNT(url) AS count FROM referer WHERE url NOT LIKE '". path_uri() ."%' GROUP BY url ORDER BY count DESC");
+
+  return $output;
+}
+
 function statistics_admin() {
   global $type;
 
-- 
cgit v1.2.3