summaryrefslogtreecommitdiff
path: root/mrtg-procs
diff options
context:
space:
mode:
authorPeter Palfrader <peter@palfrader.org>2014-09-03 11:37:35 +0200
committerPeter Palfrader <peter@palfrader.org>2014-09-03 11:37:35 +0200
commit8e233f74d3e218de01003a88a4e34d681001f712 (patch)
tree954ee162cfe99eadfeee565dbe6a00abf034857c /mrtg-procs
parent82f0e5970523d4d35e0d4b5bcc016d835d8a6ef1 (diff)
Move files around
Diffstat (limited to 'mrtg-procs')
-rwxr-xr-xmrtg-procs47
1 files changed, 0 insertions, 47 deletions
diff --git a/mrtg-procs b/mrtg-procs
deleted file mode 100755
index 727d3e3..0000000
--- a/mrtg-procs
+++ /dev/null
@@ -1,47 +0,0 @@
-#!/usr/bin/perl -wT
-# (c) 2003 by Peter Palfrader
-#
-# mrtg memory and swap usage check
-#
-# Permission is hereby granted, free of charge, to any person obtaining
-# a copy of this software and associated documentation files (the
-# "Software"), to deal in the Software without restriction, including
-# without limitation the rights to use, copy, modify, merge, publish,
-# distribute, sublicense, and/or sell copies of the Software, and to
-# permit persons to whom the Software is furnished to do so, subject to
-# the following conditions:
-#
-# The above copyright notice and this permission notice shall be
-# included in all copies or substantial portions of the Software.
-#
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
-# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
-# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
-# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
-# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
-# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-# run as suid because grsec limits ps
-
-use strict;
-use English;
-
-$ENV{'PATH'} = '/bin:/usr/bin';
-delete @ENV{'IFS', 'CDPATH', 'ENV', 'BASH_ENV'};
-
-open(FOO, "/bin/ps ax|") || die "$0: can't fork ps $!";
-my @processes = <FOO>;
-close FOO;
-
-shift @processes;
-my $running=0;
-
-for my $line (@processes) {
- my @line = split /\s+/, $line;
- $running++ if ($line[2] =~ /R/);
-}
-
-my $uptime=`/usr/bin/uptime`;
-my $hostname=`/bin/hostname`;
-printf "%d\n%d\n%s%s", scalar @processes, $running, $uptime, $hostname;