aboutsummaryrefslogtreecommitdiffstats
path: root/web/nms.gathering.org/api/public/dhcp
diff options
context:
space:
mode:
Diffstat (limited to 'web/nms.gathering.org/api/public/dhcp')
-rwxr-xr-xweb/nms.gathering.org/api/public/dhcp20
1 files changed, 0 insertions, 20 deletions
diff --git a/web/nms.gathering.org/api/public/dhcp b/web/nms.gathering.org/api/public/dhcp
deleted file mode 100755
index 7b048d1..0000000
--- a/web/nms.gathering.org/api/public/dhcp
+++ /dev/null
@@ -1,20 +0,0 @@
-#! /usr/bin/perl
-# vim:ts=8:sw=8
-
-use lib '../../../../include';
-use nms::web qw (%json finalize_output);
-use strict;
-use warnings;
-use Data::Dumper;
-
-nms::web::setwhen('60m');
-my $q = $nms::web::dbh->prepare('select distinct on (sysname) extract(epoch from date_trunc(\'second\',time)) as time,sysname from dhcp join switches on dhcp.switch = switches.switch where ' . $nms::web::when . ' order by sysname,time desc;');
-$q->execute();
-while ( my $ref = $q->fetchrow_hashref() ) {
- my $sysname = $ref->{'sysname'};
- $json{'dhcp'}{$ref->{'sysname'}} = $ref->{'time'};
-}
-
-$nms::web::cc{'max-age'} = "10";
-$nms::web::cc{'stale-while-revalidate'} = "30";
-finalize_output();