sergiotarxz/burguillos.info
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

New optimization attempt.

Browse Source
This commit is contained in:
sergiotarxz 2023-05-02 21:47:41 +02:00
parent 00b8991961
commit 0f1cd79625
1 changed files with 10 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
lib/BurguillosInfo/Tracking.pm
View File

@ -104,20 +104,17 @@ EOF
my $dbh = BurguillosInfo::DB->connect($app);
my $data = $dbh->selectall_arrayref(<<"EOF", {Slice => {}});
SELECT paths.path,
(
$SELECT_GLOBAL
where requests.path = paths.path and date > NOW() - interval '1 day'
) as unique_ips_last_24_hours,
(
$SELECT_GLOBAL
where requests.path = paths.path and date > NOW() - interval '1 week'
) as unique_ips_last_week,
(
$SELECT_GLOBAL
where requests.path = paths.path and date > NOW() - interval '1 month'
) as unique_ips_last_month
COUNT(DISTINCT(requests_day.remote_address, requests_day.user_agent)) as unique_ips_last_24_hours,
COUNT(DISTINCT(requests_week.remote_address, requests_week.user_agent)) as unique_ips_last_week,
COUNT(DISTINCT(requests_month.remote_address, requests_month.user_agent)) as unique_ips_last_month
FROM paths
WHERE paths.last_seen > NOW() - INTERVAL '1 month';
LEFT join requests requests_day ON paths.path=requests_day.path
LEFT join requests requests_month ON paths.path=requests_month.path
LEFT join requests requests_week ON paths.path=requests_week.path
WHERE paths.last_seen > NOW() - INTERVAL '1 month' AND
requests_day.date > NOW() - interval '1 day' AND
requests_week.date > NOW() - interval '1 week'
GROUP BY paths.path
EOF
return $data;
}