Munin contributed plugins

# munin plugin to retrieve connection statistics from the web admin interface

# on a Linksys AG241v2 ADSL modem

# Makes use of the http://modemaddress/ADSLCStatus.htm page

#This plugin has only been tested on a Debian testing system

# This modem also has some basic SNMP support so you can configure it

# as per the instructions on the munin wiki

# http://munin.projects.linpro.no/wiki/Using_SNMP_plugins

# By default the SNMP server is disabled, you can enable it in the web admin

# You will need to set up the "virtual node" configuration as detailed

# for snmp plugins

# Plugin will require some configuration in /etc/munin/plugin-conf.d/ag241_MODEMADDRESS

# e.g.

# [ag241_vocume.stargate_*]

# env.user admin

# env.pass password

# #env.port 80

# Once you have the above config set you will need to symlink the plugin to

# /etc/munin/plugins/ag241_MODEMADDRESS_syncrate

# /etc/munin/plugins/ag241_MODEMADDRESS_attenutation

# /etc/munin/plugins/ag241_MODEMADDRESS_noise

# now restart munin-node.

# hopefully in 20-30mins you will have some nice graphs

#Some magical munin foo...

#default parameters

pass = ENV['pass'] || 'forhax' #don't remember what the default admin password was

	puts "Incorrect number of parameters"

	exit 1

	puts "user = "+ user

	puts "pass = "+ pass

	puts "host = "+ host

	puts "port = "+ port

	puts "stat = "+ stat

	puts 'host_name ' + host

	puts 'graph_category network'

	case stat

		when 'syncrate'

			puts 'graph_info This graph shows the ADSL line sync rate.'

			puts 'graph_title ADSL line sync rate'

		        puts 'graph_vlabel connection rate bits / second'

			puts 'graph_args --base 1000 -l 0 '

		when 'attenuation'

			puts 'graph_info This graph shows the ADSL line attenuation.'

			puts 'graph_title ADSL line attenuation'

		        puts 'graph_vlabel attenuation dB'

		when 'margin','noise'

			puts 'graph_info This graph shows the ADSL SNR margin.'

			puts 'graph_title ADSL line SNR margin'

		        puts 'graph_vlabel noise margin dB'

	end

        puts 'down.label downstream'

        puts 'up.label upstream'

	exit 0

http = Net::HTTP.start(host,port)

#Make sure we got the page successfully

	puts "Getting web page failed:"

	case response.code

		when '401'

			puts 'Probably because the username and password are incorrect'

		#Looks like the modem response with 200 when you try to access a page that does not exist >_>

		#when '404'

		#	puts 'Looks like the page this plugin needs isn\'t available...'

		#	puts 'Check your modem make/model/version'

	end

	puts s

	exit 1

     when 'syncrate'

          a = s.scan(/.*share\.curstate.*\n.*share\.downstr[^0-9]*([0-9]+).*share\.upstr[^0-9]*([0-9]+).*$/)

          b,c = a[0]

          puts  'down.value '+ (b.to_i*1000).to_s + "\n" + 'up.value '+ (c.to_i*1000).to_s

	  exit 0

     when 'attenuation'

          a = s.scan(/.*share\.lineatt.*\n.*share\.down[^0-9]*([0-9]+).*share\.up[^0-9]*([0-9]+).*$/)

          b,c = a[0]

          puts 'down.value '+ (b.to_i).to_s + "\n" + 'up.value '+ (c.to_i).to_s

	  exit 0

     when 'margin','noise'

          a = s.scan(/.*share\.noise.*\n.*share\.down[^0-9]*([0-9]+).*share\.up[^0-9]*([0-9]+).*$/)

          b,c = a[0]

          puts 'down.value '+ (b.to_i).to_s + "\n" + 'up.value '+ (c.to_i).to_s

	  exit 0

     else

	puts 'Statistic ' + stat.to_s + ' not known, would you like me to fabricate it for you?'

	exit 1