From 14445fb9cfbbf808b9ca43cddca23941c1f30338 Mon Sep 17 00:00:00 2001
From: "J.T. Sage" <jtsage@gmail.com>
Date: Sun, 27 Jun 2010 19:26:04 +0200
Subject: [PATCH] Initial version

---
 plugins/other/dar_uptime | 96 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 96 insertions(+)
 create mode 100755 plugins/other/dar_uptime

diff --git a/plugins/other/dar_uptime b/plugins/other/dar_uptime
new file mode 100755
index 00000000..5271d453
--- /dev/null
+++ b/plugins/other/dar_uptime
@@ -0,0 +1,96 @@
+#!/usr/bin/perl 
+# -*- perl -*-
+
+=head1 NAME
+
+dar_uptime - Munin plugin to monitor darwin system uptime.
+
+=head1 APPLICABLE SYSTEMS
+
+Should work on any darwin (Mac OS X) system with the 'uptime' command.
+
+=head1 CONFIGURATION
+
+None needed
+
+=head1 INTERPRETATION
+
+The plugin runs the uptime command, and parses the value into days.
+
+=head1 BUGS
+
+Limited test data set, probably fails some of the time - very likely
+on systems with a very low uptime.
+
+=head1 MAGIC MARKERS
+
+  #%# family=auto
+  #%# capabilities=autoconf
+
+=head1 VERSION
+
+  v.0.0.1
+
+=head1 AUTHOR
+
+Copyright (C) 2010.
+
+Original version by J.T.Sage (at) gmail (dot) com.
+
+=head1 LICENSE
+
+GPLv2
+
+=cut
+
+use Munin::Plugin;
+
+if ( defined($ARGV[0])) {
+    if ($ARGV[0] eq 'autoconf') {
+	$uname = `uname`;
+	if ( not ( $uname =~ /Darwin/ ) ) { print "no (not a Darwin System)\n"; }
+	else {
+		if ( not -x "/usr/bin/uptime" ) { print "no (uptime not found)\n"; }
+		else {
+			print "yes\n";
+		}
+	}
+	exit 0;
+    }
+
+    if ( $ARGV[0] eq "config" ) {
+	print "graph_title Uptime\n";
+	print "graph_args --base 1000 -l 0 \n";
+	print "graph_vlabel uptime in days\n";
+	print "graph_category system\n";
+	print "uptime.label uptime\n";
+	print "uptime.draw AREA\n";
+	exit 0;
+    }
+}
+
+@uptime = `/usr/bin/uptime`; 
+foreach(@uptime) {
+	$_ =~ m/^.+up (.+?), \d+ us.+$/;
+	$timestr = $1; 
+	if ( $timestr =~ m/^(\d+) day.+?$/ ) {
+		$days = $1;
+	} else { $days = 0; }
+	if ( $timestr =~ m/(\d+) h/ ) {
+		$hrs = $1;
+	} else { $hrs = 0; }
+	if ( $timestr =~ m/(\d+)\:(\d+)/ ) {
+		$hours = $1; $min = $2;
+	} else { $hours = 0; $min = 0; }
+	if ( $timestr =~ m/(\d+) m/ ) {
+		$mint = $1;
+	} else {
+		$mint = 0;
+	}
+	$total = ( $days * 24 * 60 * 60 ) + ( ( $hrs + $hours ) * 60 * 60 ) + ( ( $min + $mint ) * 60 );
+	$daysf = $total / ( 24 * 60 * 60 );
+	$daysi = ( int( $daysf * 1000 ) / 1000 );
+	print "uptime.value " . $daysi . "\n";
+}
+
+# vim:syntax=perl