From 4b69030c295365df8ffd448288bfdb1ece991227 Mon Sep 17 00:00:00 2001
From: Kristian Lyngstol <kly@kly@.no>
Date: Sat, 26 Mar 2016 20:21:03 +0100
Subject: NMS: Tweak caching and more

---
 web/nms.gathering.org/api/public/ping | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'web/nms.gathering.org/api/public/ping')

diff --git a/web/nms.gathering.org/api/public/ping b/web/nms.gathering.org/api/public/ping
index db46b00..5d1037c 100755
--- a/web/nms.gathering.org/api/public/ping
+++ b/web/nms.gathering.org/api/public/ping
@@ -4,7 +4,7 @@ use strict;
 use warnings;
 use nms::web;
 
-nms::web::setwhen('10s');
+nms::web::setwhen('15s');
 
 my $q = $nms::web::dbh->prepare("SELECT DISTINCT ON (sysname) (now() - time) as age,sysname, latency_ms FROM ping NATURAL JOIN switches WHERE time in (select max(time) from ping where "
         . $nms::web::when . " group by switch)");
@@ -32,6 +32,6 @@ while ( my $ref = $lq->fetchrow_hashref() ) {
     $nms::web::json{'linknets'}{$ref->{'linknet'}} = [ $ref->{'latency1_ms'}, $ref->{'latency2_ms'} ];
 }
 
-$nms::web::cc{'max-age'} = "2";
+$nms::web::cc{'max-age'} = "1";
 $nms::web::cc{'stale-while-revalidate'} = "15";
 finalize_output();
-- 
cgit v1.2.3


From 51e9872f4ac5db633c12862dec951e0b91b1b132 Mon Sep 17 00:00:00 2001
From: Kristian Lyngstol <kly@kly.no>
Date: Thu, 31 Mar 2016 20:44:38 +0200
Subject: NMS: Fix historic review, part one

The actual replay might still be bugged, but fixed-point review works.
---
 web/nms.gathering.org/api/public/ping | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'web/nms.gathering.org/api/public/ping')

diff --git a/web/nms.gathering.org/api/public/ping b/web/nms.gathering.org/api/public/ping
index 5d1037c..811708d 100755
--- a/web/nms.gathering.org/api/public/ping
+++ b/web/nms.gathering.org/api/public/ping
@@ -6,7 +6,7 @@ use nms::web;
 
 nms::web::setwhen('15s');
 
-my $q = $nms::web::dbh->prepare("SELECT DISTINCT ON (sysname) (now() - time) as age,sysname, latency_ms FROM ping NATURAL JOIN switches WHERE time in (select max(time) from ping where "
+my $q = $nms::web::dbh->prepare("SELECT DISTINCT ON (sysname) (" . $nms::web::now . " - time) as age,sysname, latency_ms FROM ping NATURAL JOIN switches WHERE time in (select max(time) from ping where "
         . $nms::web::when . " group by switch)");
 
 $q->execute();
-- 
cgit v1.2.3