X7ROOT File Manager
Current Path:
/etc/munin/plugins
etc
/
munin
/
plugins
/
📁
..
📄
acpi
(1.99 KB)
📄
apache_accesses
(5.11 KB)
📄
apache_processes
(6.46 KB)
📄
apache_volume
(5.06 KB)
📄
cpu
(7.3 KB)
📄
cpuspeed
(4.6 KB)
📄
df
(4.26 KB)
📄
df_inode
(4.31 KB)
📄
diskstats
(34.62 KB)
📄
entropy
(988 B)
📄
exim_mailqueue
(3.12 KB)
📄
exim_mailstats
(5.51 KB)
📄
forks
(1.01 KB)
📄
fw_packets
(1.75 KB)
📄
hddtemp_smartctl
(10.51 KB)
📄
http_loadtime
(3.22 KB)
📄
if_err_eth0
(3.07 KB)
📄
if_err_eth1
(3.07 KB)
📄
if_eth0
(5.78 KB)
📄
if_eth1
(5.78 KB)
📄
interrupts
(1.99 KB)
📄
irqstats
(4.2 KB)
📄
load
(2.69 KB)
📄
memory
(11.16 KB)
📄
munin_stats
(3.78 KB)
📄
mysql_bytes
(1.77 KB)
📄
mysql_innodb
(5.52 KB)
📄
mysql_queries
(2.59 KB)
📄
mysql_slowqueries
(1.5 KB)
📄
mysql_threads
(1.58 KB)
📄
netstat
(3.3 KB)
📄
open_files
(1.2 KB)
📄
open_inodes
(1.06 KB)
📄
proc_pri
(1.56 KB)
📄
processes
(15.26 KB)
📄
swap
(1.24 KB)
📄
threads
(1.4 KB)
📄
uptime
(859 B)
📄
users
(2.46 KB)
📄
vmstat
(1.13 KB)
Editing: users
#!/usr/local/cpanel/3rdparty/perl/536/bin/perl -w # -*- perl -*- use strict; use warnings; =head1 NAME users - Munin plugin to monitor the number of users logged in to a Unix box. =head1 APPLICABLE SYSTEMS Should work on any Unix that has the L<who>(1) command. =head1 CONFIGURATION None needed =head1 INTERPRETATION The plugin simply runs the L<who>(1) command and counts the number of users logged in by different methods (tty, pty, X, etc). =head1 BUGS Logins or sessions that are not registered in C</var/run/utmp> as part of the session setup will not be counted (this is a feature, not a bug). Only tested extensively on Linux. =head1 MAGIC MARKERS #%# family=auto #%# capabilities=autoconf =head1 AUTHOR Copyright (C) 2004-2008. Original version by Michael Kaiser tools (at) micha (dot) de. Modified and made more generic by Nicolai Langfeldt, 2006 =head1 LICENSE GPLv2 =cut use Munin::Plugin; if ( defined($ARGV[0])) { if ($ARGV[0] eq 'autoconf') { print "yes\n"; exit 0; } if ( $ARGV[0] eq "config" ) { print "graph_title Logged in users\n"; print "graph_args --base 1000 -l 0\n"; print "graph_vlabel Users\n"; print "graph_scale no\n"; print "graph_category system\n"; print "graph_printf %3.0lf\n"; print "tty.label tty\n"; print "tty.draw AREASTACK\n"; print "tty.colour 00FF00\n"; print "pty.label pty\n"; print "pty.draw AREASTACK\n"; print "pty.colour 0000FF\n"; print "pts.label pts\n"; print "pts.draw AREASTACK\n"; print "pts.colour 00FFFF\n"; print "X.label X displays\n"; print "X.draw AREASTACK\n"; print "X.info Users logged in on an X display\n"; print "X.colour 000000\n"; print "other.label Other users\n"; print "other.info Users logged in by indeterminate method\n"; print "other.colour FF0000\n"; foreach my $field (qw(tty pty pts X other)) { print_thresholds($field); } exit 0; } } my $tty = 0; my $pty = 0; my $pts = 0; my $X = 0; my $unc = 0; # Unclassified open (WHO,"who |"); foreach (<WHO>) { (undef,$_,undef) = split /[\/ ]+/; $tty++,next if /ttyv?/; # Linux virtual console tty (on some hosts) $pty++,next if /pty|ttyp/; $pts++,next if /pts/; $tty++,next if /tty/; # Regular tty $X++,next if (/:\d+/); # Linux style X screen $X++,next if (/X[0-9a-fA-F]*/); # Solaris style (ifi.uio.no only?) $unc++; } close (WHO); print "tty.value $tty\n"; print "pty.value $pty\n"; print "pts.value $pts\n"; print "X.value $X\n"; print "other.value $unc\n"; # vim:syntax=perl
Upload File
Create Folder