diff options
| author | Ole Mathias Aa. Heggem <olemathias.aa.heggem@gmail.com> | 2025-04-13 07:18:45 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2025-04-13 07:18:45 +0200 |
| commit | 4ea3a099b05fa910498bfbf1b2d7387118355472 (patch) | |
| tree | c248cf6764412471ee3e0d1218761bee19fb396a /web/api/public/dhcp-summary | |
| parent | 09710c061d5b8ae86b3dfe49f4b8936c13a10535 (diff) | |
Diffstat (limited to 'web/api/public/dhcp-summary')
| -rwxr-xr-x | web/api/public/dhcp-summary | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/web/api/public/dhcp-summary b/web/api/public/dhcp-summary deleted file mode 100755 index beed463..0000000 --- a/web/api/public/dhcp-summary +++ /dev/null @@ -1,16 +0,0 @@ -#! /usr/bin/perl -use lib '/opt/gondul/include'; -use strict; -use warnings; -use nms::web; - -nms::web::setwhen('2h'); - -my $q2 = $nms::web::dbh->prepare("select count(DISTINCT data ->> 'clientip') as clients, family(inet (data ->> 'clientip')) as family from metrics where $nms::web::when GROUP by family;"); -$q2->execute(); -while (my $ref = $q2->fetchrow_hashref()) { - $nms::web::json{'dhcp'}{$ref->{'family'}} = $ref->{'clients'}; -} -$nms::web::cc{'max-age'} = "10"; -$nms::web::cc{'stale-while-revalidate'} = "15"; -finalize_output(); |