--- /dev/null
+#include <infodrom.style>
+
+<page func="Infodrom Oldenburg" title="Statistics">
+
+<?
+ $tabhead =
+'<table class="font border" width="100%">
+<tr bgcolor="#<colh>"><th width="10%">Count</th><th width="90%">Referer</th></tr>';
+ $tabfoot = '</table>';
+ $tabrow = '<tr bgcolor="#%s"><td width="10%%" align="center">%d</td><td width="90%%"><a href="%s" title="%s">%s</a></td></tr>';
+
+ $dbh = pg_pconnect ("<dbhost>", "<dbport>", "<dbname>")
+ or die("Unable to connect to SQL server");
+
+
+ $query = "SELECT id,name FROM ref_site ";
+ if (isset($_GET["site"]))
+ $query .= sprintf("WHERE id = %d ", $_GET["site"]);
+ $query .= "ORDER BY name";
+ $sth = pg_exec ($dbh, $query) or die("Datenbank-Abfrage!");
+
+ for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
+ $site = pg_fetch_array ($sth, $nr);
+ printf ('<h3 class="bar"><a href="<get-var WML_SRC_BASENAME>.php?site=%d">%s</a></h3>', $site["id"], $site["name"]);
+
+ $color = "<cold>";
+ echo $tabhead;
+ $query = sprintf (
+"SELECT count(*) AS count,ref_origin.url,ref_origin.title
+ FROM ref_origin,ref_url,ref_log
+ WHERE ref_log.url = ref_url.id
+ AND ref_log.origin = ref_origin.id
+ AND ref_url.site = %d
+ GROUP BY ref_origin.url,ref_origin.title
+ ORDER BY count DESC", $site["id"]);
+
+ if (!isset($_GET["site"]))
+ $query .= " LIMIT 10";
+
+ $sth2 = pg_exec ($dbh, $query) or die("Datenbank-Abfrage!");
+ for ($i=0; $i < pg_NumRows ($sth2); $i++) {
+ $row = pg_fetch_array ($sth2, $i);
+ if (strlen($row["title"])) {
+ $title = substr($row["title"], 0, 80);
+ } else {
+ $title = htmlentities(substr($row["url"], 0, 80));
+ }
+ $color = $color == "<cold>"?"<coln>" : "<cold>";
+ printf ($tabrow, $color, $row["count"], $row["url"], htmlentities($row["url"]), $title);
+ }
+ echo $tabfoot;
+ }
+?>
+
+<div style="padding-top: 1em"></div>
+
+</page>
+
+# Local variables:
+# mode: auto-fill
+# end: