admin/visits: list entries of last logins v2.5
authorMischa POSLAWSKY <perl@shiar.org>
Tue, 12 Dec 2017 21:49:42 +0000 (22:49 +0100)
committerMischa POSLAWSKY <perl@shiar.org>
Sat, 23 Dec 2017 00:06:47 +0000 (01:06 +0100)
admin/visits.html [new file with mode: 0644]
admin/visits.php [new file with mode: 0644]

diff --git a/admin/visits.html b/admin/visits.html
new file mode 100644 (file)
index 0000000..e772122
--- /dev/null
@@ -0,0 +1 @@
+<h2>Recente gebruikers</h2>
diff --git a/admin/visits.php b/admin/visits.php
new file mode 100644 (file)
index 0000000..5c29a6c
--- /dev/null
@@ -0,0 +1,17 @@
+<?php
+$logs = glob('login/*/last.log');
+
+$logins = [];
+foreach ($logs as $log) {
+       preg_match('{^login/([^/]+)}', $log, $login);
+       $logins[ $login[1] ] = filemtime($log);
+}
+
+print "<ul>\n";
+arsort($logins, SORT_NUMERIC);
+foreach ($logins as $login => $last) {
+       printf('<li>%s <a href="/login/%s">%s</a></li>'."\n",
+               strftime('%F %H:%M', $last), $login, $login
+       );
+}
+print "</ul>\n\n";