little draft on visit stats

1 files changed, 21 insertions, 0 deletions

diff --git a/webstats/queries.sql b/webstats/queries.sql
new file mode 100644
index 0000000..2a3f762
--- /dev/null
+++ b/webstats/queries.sql
@@ -0,0 +1,21 @@
+#lang cl-yesql/sqlite
+
+-- name: create-stats-table
+-- Creates table for tracking visits
+CREATE TABLE IF NOT EXISTS STATS (
+    timestamp int DEFAULT (unixepoch()) NOT NULL,
+    click text,
+    page text,
+    referrer text,
+    ip text,
+    user_agent text,
+    title text)
+
+-- name: drop-stats-table
+-- Removes table tracking visits
+DROP TABLE IF EXISTS STATS
+
+-- name: insert @last-id
+-- Insert a data point
+INSERT INTO STATS (click, page, referrer, ip, user_agent, title)
+    VALUES (:click, :page, :referer, :ip, :user_agent, :title)