[Bump] MyThree Bandwidth Usage Widget

7 February, 2008 – 9:00 pm

Download it ‘ere…

I currently have a mobile broadband account (HSDPA) provided by three.com.au, and after a hexy surcharge from the previous month when exceeding my limit, thought it would be prudent to build a dashboard widget that tracks my monthly bandwidth usage.

Building on a previous post that automates calls to a https website, I followed a nifty tutorial here to turn that perl script into a Mac OSX dashboard widget. I have since revised my original code and opted for a Ruby version of the script, as I found Ruby is easier to setup for a noob as opposed to Perl and its dependencies …

Since Mac OSX already comes with a suitable version of Ruby, the only pre-installation requirement for this widget is to install the relevant gem that I use to automate http. So from a console type and accept the defaults.
sudo gem install -y mechanize

Not anticipating a huge readership that wants this magic explained, I will just post the source code instead for your own use. You can download the widget here. After you decompress the archive, you can look at the source code by right mouse clicking on the widget and show package contents.

The main difference between my code and the example code is that I’m not making a system call to the curl binary as per the following:
widget.system("/usr/bin/curl
    http://www.example.com/dashboard.php?return=sales",
    null).outputString;

Rather, I am making a call to the Perl Ruby binary, which calls the mech script I had created in the previous post as per the following:
/usr/bin/ruby ~/Library/Widgets/ThreeUsageMeter.wdgt/scripts/MyThreeV2.rb ' + mobile + ' ' + password + ' ' + pin;

I have also added some fields that retain their values (for configuration) for your mobile number, password and pin.

If you are keen to just look/run the Ruby code on its own without the dashboard widget feel free to copy it from below.

Let me know if you have any difficulties installing the widget …

#!/usr/bin/env ruby
#sigh, my very first Ruby script ... Will I ditch Perl ? 8^)
#sudo gem install -y mechanize
 
require 'rubygems'
require 'mechanize'
 
login     = ARGV[0]
password  = ARGV[1]
pin       = ARGV[2]
 
url = "https://www.my.three.com.au/My3/jfn"
 
# init agent
agent = WWW::Mechanize.new
agent.user_agent_alias = 'Windows IE 6'
 
# get first page
page = agent.get(url)
 
# login page
form = page.forms.find {|f| f.name == 'login'}
form.fields.find {|f| f.name == 'login'}.value = login
form.fields.find {|f| f.name == 'password'}.value = password
page = agent.submit(form, form.buttons.first)
 
# pin page
form = page.forms.find {|f| f.name == 'myForm'}
form.fields.find {|f| f.name == 'pin'}.value = pin
page = agent.submit(form, form.buttons.first)
 
# get rc1
if page.body.match /Mobiles on this account.+?src='(.+?)'/m
  url = $1
  oid = url.match /;(.+)?mfunc/m
  oid = oid[1]
  url = url.gsub("&","&")
  page = agent.get url
end
 
# get rc2
if page.body.match /paddingText">.+?<a href='(.+?)'/m
  url = $1.gsub("amp;&amp;",oid)
  url = url.gsub("&amp;","&")
  page = agent.get url
end
 
# get rc3
if page.body.match /iframe src='(.+?)'/m
  url = $1.gsub("&amp;","&")
  page = agent.get url
end
 
# spend data
if page.body.match /bill.+?TextRPHeadings">(.+?)<\/span>/m
  spend = $1.gsub(/\n\t\s+/m,"")
end
 
# other data
results = page.body.scan(/span class="paddingText">\s+(Mobile Broadband.+?)<\/tr>/m)
 
results.each { |e|
  # size
  if e.to_s.match /\(([\w\d]+)\)/m
    size = $1
  end
  
  # remain
  if e.to_s.match /<td>\s+([\d\.]+)\s+<\/td>/m
    remain = $1
  end
  
  # date
  if e.to_s.match /rightPadding">(.+?)</m
    date = $1.gsub(/\n\t\s+/m,"")
  end
  
  print spend,"|",size,"|",remain,"|",date,"\n"
}