From d146d6373a2aa2541a92295961b0de1cf4bc0fee Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andrej=20Rama=C5=A1euski?= <andrej@x2.cz>
Date: Mon, 26 Dec 2022 16:08:04 +0100
Subject: [PATCH] Logujeme referrer

---
 VERSION                       | 2 +-
 lib/PZ/Controller/Shortcut.pm | 5 +++--
 lib/PZ/Schema/Result/Log.pm   | 1 +
 sql/migrations.sql            | 3 +++
 4 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/VERSION b/VERSION
index 524cb55..26aaba0 100644
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-1.1.1
+1.2.0
diff --git a/lib/PZ/Controller/Shortcut.pm b/lib/PZ/Controller/Shortcut.pm
index be4db46..3d60b5d 100644
--- a/lib/PZ/Controller/Shortcut.pm
+++ b/lib/PZ/Controller/Shortcut.pm
@@ -17,8 +17,9 @@ sub redirect ($c) {
     }
 
     $shortcut->add_to_log_items({
-        ip => ($c->forwarded_for || $c->tx->remote_address),
-        ua => $c->req->headers->user_agent,
+        ip       => ($c->forwarded_for || $c->tx->remote_address),
+        ua       => $c->req->headers->user_agent,
+        referrer => $c->req->headers->referrer,
     });
 
     $c->res->code($shortcut->code);
diff --git a/lib/PZ/Schema/Result/Log.pm b/lib/PZ/Schema/Result/Log.pm
index 7b74c24..57686e5 100644
--- a/lib/PZ/Schema/Result/Log.pm
+++ b/lib/PZ/Schema/Result/Log.pm
@@ -21,6 +21,7 @@ __PACKAGE__->add_columns(
         shortcut_id
         ip
         ua
+        referrer
     ),
 );
 
diff --git a/sql/migrations.sql b/sql/migrations.sql
index 9797780..9dcaaff 100644
--- a/sql/migrations.sql
+++ b/sql/migrations.sql
@@ -47,3 +47,6 @@ create index "shortcuts_shortcut_idx" on "shortcuts" ("shortcut");
 
 -- 3 up
 alter table "log" add column "ua" text;
+
+-- 4 up
+alter table "log" add column "referrer" text;
-- 
GitLab