commerce-bank-client 1.0.0

data/Manifest

@@ -0,0 +1,8 @@
+Manifest
+README.markdown
+Rakefile
+lib/commercebank.rb
+lib/commercebank/monkey.rb
+test/commerce_bank_client_test.rb
+test/monkeypatch_test.rb
+test/test_helper.rb

data/README.markdown

@@ -0,0 +1,15 @@
+commerce-bank-client
+====================
+
+A Ruby client library for the Commerce Bank website (https://banking.commercebank.com).
+
+## Installation
+
+    gem install commerce-bank-client
+
+## Usage
+
+    require "rubygems"
+    require "commercebank"
+
+    cb = CommerceBank.new

data/Rakefile

@@ -0,0 +1,16 @@
+require 'rubygems'
+require 'rake'
+require 'echoe'
+
+Echoe.new("commerce-bank-client", "1.0.0") do |p|
+
+  p.description              = "An interface to the Commerce Bank website (https://banking.commercebank.com)."
+  p.url                      = "http://github.com/alexmchale/commerce-bank-client"
+  p.author                   = "Alex McHale"
+  p.email                    = "alexmchale@gmail.com"
+  p.ignore_pattern           = %w( tmp/* script/* )
+  p.runtime_dependencies     = []
+  p.development_dependencies = []
+  p.require_signed           = true
+
+end

data/commerce-bank-client.gemspec

@@ -0,0 +1,33 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{commerce-bank-client}
+  s.version = "1.0.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Alex McHale"]
+  s.cert_chain = ["/home/alexmchale/.ssh/gem-public_cert.pem"]
+  s.date = %q{2010-09-02}
+  s.description = %q{An interface to the Commerce Bank website (https://banking.commercebank.com).}
+  s.email = %q{alexmchale@gmail.com}
+  s.extra_rdoc_files = ["README.markdown", "lib/commercebank.rb", "lib/commercebank/monkey.rb"]
+  s.files = ["Manifest", "README.markdown", "Rakefile", "lib/commercebank.rb", "lib/commercebank/monkey.rb", "test/commerce_bank_client_test.rb", "test/monkeypatch_test.rb", "test/test_helper.rb", "commerce-bank-client.gemspec"]
+  s.homepage = %q{http://github.com/alexmchale/commerce-bank-client}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Commerce-bank-client", "--main", "README.markdown"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{commerce-bank-client}
+  s.rubygems_version = %q{1.3.7}
+  s.signing_key = %q{/home/alexmchale/.ssh/gem-private_key.pem}
+  s.summary = %q{An interface to the Commerce Bank website (https://banking.commercebank.com).}
+  s.test_files = ["test/test_helper.rb", "test/monkeypatch_test.rb", "test/commerce_bank_client_test.rb"]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end

data/lib/commercebank/monkey.rb

@@ -0,0 +1,64 @@
+require 'rubygems'
+require 'pp'
+require 'andand'
+require 'cgi'
+require 'yaml'
+
+class Array
+  def binary
+    map {|e| yield(e) ? [e, nil] : [nil, e]}.transpose.map {|a| a.compact}
+  end
+
+  def paramify
+    hash = Hash.new
+
+    hash.merge! pop if last.kind_of? Hash
+    each {|e| hash[e] = true}
+
+    hash
+  end
+end
+
+class Object
+  def to_cents
+    (to_s.gsub(/[^-.0-9]/, '').to_f * 100).to_i
+  end
+
+  def to_dollars(*options)
+    options = options.paramify
+
+    plus = options[:show_plus] ? '+' : ''
+    minus = options[:hide_minus] ? '' : '-'
+    sign = to_i >= 0 ? plus : minus
+
+    ("%s%0.2f" % [ sign, to_i.abs / 100.0 ]).commify
+  end
+end
+
+class Date
+  def days_in_month
+    (Date.parse("12/31/#{strftime("%Y")}") << (12 - month)).day
+  end
+
+  def last_sunday
+    d = self
+    d -= 1 until d.wday == 0
+    d
+  end
+end
+
+class Hash
+  def to_url
+    map {|key, value| "#{CGI.escape key.to_s}=#{CGI.escape value.to_s}"}.join "&"
+  end
+
+  def to_cookie
+    map {|key, value| "#{key}=#{value}"}.join('; ')
+  end
+end
+
+class String
+  def commify
+    reverse.gsub(/(\d\d\d)(?=\d)/, '\1,').reverse
+  end
+end

data/lib/commercebank.rb

@@ -0,0 +1,232 @@
+require 'rubygems'
+require 'net/http'
+require 'net/https'
+require 'hpricot'
+require 'andand'
+require 'cgi'
+require 'yaml'
+require 'time'
+require 'date'
+require 'json'
+require 'htmlentities'
+require 'gmail'
+require 'appconfig'
+require 'commercebank/monkey.rb'
+
+class Fixnum
+  def days;    24 * hours;   end
+  def hours;   60 * minutes; end
+  def minutes; 60 * seconds; end
+  def seconds; self;         end
+end
+
+class WebClient
+  attr_reader :fields, :cookies
+
+  def initialize
+    @cookies = Hash.new
+    @http = Net::HTTP.new('banking.commercebank.com', 443)
+    @http.use_ssl = true
+    @http.verify_mode = OpenSSL::SSL::VERIFY_NONE
+  end
+
+  def get(path, form = nil)
+    response = @http.get(path, header)
+    add_cookies(response)
+    @fields = (form && get_form(response.body, form)) || Hash.new
+    response
+  end
+
+  def post(path, form = nil)
+    response = @http.post(path, @fields.to_url, header)
+    add_cookies(response)
+    @fields = (form && get_form(response.body, form)) || Hash.new
+    response
+  end
+
+private
+
+  def header
+    { 'Cookie' => @cookies.to_cookie }
+  end
+
+  def get_form(body, name)
+    Hpricot.buffer_size = 262144
+    doc = Hpricot.parse(body)
+    form = (doc/"##{name}").first
+    raise "could not find form #{name}" unless form
+    fields = Hash[*((form/"input").map {|e| [ e.attributes['name'], e.attributes['value'] ]}.flatten)]
+    fields['TestJavaScript'] = 'OK'
+    fields
+  end
+
+  def add_cookies(response)
+    CGI::Cookie.parse(response.header['set-cookie']).each do |key, value|
+      @cookies[key] = value.first
+    end
+
+    @cookies.delete 'path'
+    @cookies.delete 'expires'
+
+    self
+  end
+end
+
+class CommerceBank
+  attr_reader :pending, :register, :current, :available
+
+  def initialize
+    @config = AppConfig.new('~/.commerce.yaml')
+
+    client = WebClient.new
+
+    client.get('/')
+
+    client.get('/CBI/login.aspx', 'MAINFORM')
+
+    client.fields['txtUserID'] = @config.get('username')
+    response = client.post('/CBI/login.aspx', 'MAINFORM')
+
+    # If a question was asked, answer it then get the password page.
+    question = response.body.scan(/Your security question:&nbsp;&nbsp;(.*?)<\/td>/i).first.andand.first
+    if question
+      client.fields['txtChallengeAnswer'] = @config.get(question)
+      client.fields['saveComputer'] = 'rdoBindDeviceNo'
+      response = client.post('/CBI/login.aspx', 'MAINFORM')
+    end
+
+    raise "could not reach the password page" unless client.fields['__EVENTTARGET'] == 'btnLogin'
+
+    client.fields['txtPassword'] = @config.get('password')
+    response = client.post('/CBI/login.aspx')
+
+    response = client.get('/CBI/Accounts/CBI/Activity.aspx', 'MAINFORM')
+    (@current, @available) = parse_balance(response.body)
+    @pending = parse_pending(response.body)
+
+    client.fields['Anthem_UpdatePage'] = 'true'
+    client.fields['txtFilterFromDate:textBox'] = (Time.now - 30.days).strftime('%m/%d/%Y')
+    client.fields['txtFilterToDate:textBox'] = Time.now.strftime('%m/%d/%Y')
+    response = client.post('/CBI/Accounts/CBI/Activity.aspx?Anthem_CallBack=true')
+
+    raw_data = JSON.parse(response.body)
+    @register = parse_register(raw_data['controls']['pnlPosted'])
+
+    @register.each do |entry|
+      entry[:images].map! do |image_url|
+        url = "https://banking.commercebank.com/CBI/Accounts/CBI/#{image_url[:url]}"
+        client.get(url).andand.body
+      end
+      entry[:images].compact!
+    end
+  end
+
+  def daily_summary
+    today, yesterday, this_week, last_week = [], [], [], []
+
+    register.each do |entry|
+      if    entry[:date] == Date.today                               then today << entry
+      elsif entry[:date] == (Date.today - 1)                         then yesterday << entry
+      elsif entry[:date] >= Date.today.last_sunday                   then this_week << entry
+      elsif entry[:date] >= (Date.today.last_sunday - 1).last_sunday then last_week << entry
+      end
+    end
+
+    yield 'Pending', @pending
+    yield 'Today', today
+    yield 'Yesterday', yesterday
+    yield 'This Week', this_week
+    yield 'Last Week', last_week
+  end
+
+  def monthly_summary(day_in_month = (Date.today - Date.today.day))
+    first_of_month = day_in_month - day_in_month.day + 1
+    last_of_month = first_of_month + day_in_month.days_in_month - 1
+
+    entries = register.find_all {|entry| entry[:date] >= first_of_month && entry[:date] <= last_of_month}
+
+    yield day_in_month.strftime('%B'), entries
+  end
+
+private
+
+  def parse_balance(body)
+    Hpricot.buffer_size = 262144
+    doc = Hpricot.parse(body)
+    summaryRows = doc/"table.summaryTable"/"tr"
+    current = (summaryRows[3]/"td")[1].inner_html.to_cents
+    available = (summaryRows[4]/"td")[1].inner_html.to_cents
+    [current, available]
+  end
+
+  def parse_pending(body)
+    Hpricot.buffer_size = 262144
+    doc = Hpricot.parse(body)
+    coder = HTMLEntities.new
+
+    (doc/"#grdMemoPosted"/"tr").map do |e|
+      next nil unless (e['class'] == 'item' || e['class'] == 'alternatingItem')
+
+      values = (e/"td").map {|e1| coder.decode(e1.inner_html.strip)}
+
+      debit = values[2].to_cents
+      credit = values[3].to_cents
+      delta = credit - debit
+
+      { :date => parse_date(values[0]),
+        :destination => values[1],
+        :delta => delta,
+        :debit => debit,
+        :credit => credit }
+    end.compact
+  end
+
+  def parse_register(body)
+    Hpricot.buffer_size = 262144
+    doc = Hpricot.parse(body)
+    coder = HTMLEntities.new
+    (doc/"#grdHistory"/"tr").map do |e|
+      next nil unless [ 'item', 'alternatingitem' ].include? e['class'].to_s.downcase
+
+      anchor = e.at("a")
+      values = (e/"td").map {|e1| e1.inner_html}
+      date = parse_date(values[0])
+      check = values[1].strip
+      debit = values[3].to_cents
+      credit = values[4].to_cents
+      delta = credit - debit
+      total = values[5].scan(/\$[\d,]+\.\d\d/).first.to_cents
+
+      images = (e/"a").find_all do |e1|
+        e1['target'].to_s.downcase == 'checkimage'
+      end.map do |e1|
+        { :url => e1['href'], :title => e1.inner_html.strip }
+      end
+
+      {
+        :destination => coder.decode(anchor.inner_html.strip),
+        :url => anchor['href'],
+        :date => date,
+        :check => check,
+        :images => images,
+        :delta => delta,
+        :debit => debit,
+        :credit => credit,
+        :total => total
+      }
+    end.compact
+  end
+
+  def parse_date(date_string)
+    (month, day, year) = date_string.scan(/(\d+)\/(\d+)\/(\d+)/).first
+    return nil unless month && day && year
+
+    month = month.to_i
+    day = day.to_i
+    year = year.to_i
+    year += 2000 if year < 100
+
+    Date.parse("%04d-%02d-%02d" % [ year, month, day ])
+  end
+end
+

data/test/commerce_bank_client_test.rb

@@ -0,0 +1,6 @@
+require 'test_helper'
+
+class CommerceBankClientTest < Test::Unit::TestCase
+  should "implement tests" do
+  end
+end

data/test/monkeypatch_test.rb

@@ -0,0 +1,11 @@
+require 'test_helper'
+
+class MonkeyPatchTest < Test::Unit::TestCase
+  should "convert a hash to a valid url parameter string" do
+    h1 = { :foo => 1, :bar => 2, :baz => 3 }
+    assert_equal h1.to_url, 'foo=1&bar=2&baz=3'
+
+    h2 = { :foo => "What's up Doc", :bar => "1" }
+    assert_equal h2.to_url, "foo=What%27s+up+Doc&bar=1"
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,10 @@
+require 'rubygems'
+require 'test/unit'
+require 'shoulda'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'lib/commercebank.rb'
+
+class Test::Unit::TestCase
+end

data.tar.gz.sig

@@ -0,0 +1,2 @@
+�&y�#�����ɞ�q���l��˩"���F������J8�WB_A�3�?�Hi��z:S1�F �o@�6	��]B�^�N�z/���W��N�kA�����#���<t��3f��J��V�}U�������^s!��\��L���n��~w���4����6�i� ��Ǭ4o����0�VXYr]l!��K�,F޶�;K)�o�dY�v
+0E��(

metadata

@@ -0,0 +1,106 @@
+--- !ruby/object:Gem::Specification 
+name: commerce-bank-client
+version: !ruby/object:Gem::Version 
+  hash: 23
+  prerelease: false
+  segments: 
+  - 1
+  - 0
+  - 0
+  version: 1.0.0
+platform: ruby
+authors: 
+- Alex McHale
+autorequire: 
+bindir: bin
+cert_chain: 
+- |
+  -----BEGIN CERTIFICATE-----
+  MIIDNjCCAh6gAwIBAgIBADANBgkqhkiG9w0BAQUFADBBMRMwEQYDVQQDDAphbGV4
+  bWNoYWxlMRUwEwYKCZImiZPyLGQBGRYFZ21haWwxEzARBgoJkiaJk/IsZAEZFgNj
+  b20wHhcNMTAwODMxMTQ1NjExWhcNMTEwODMxMTQ1NjExWjBBMRMwEQYDVQQDDAph
+  bGV4bWNoYWxlMRUwEwYKCZImiZPyLGQBGRYFZ21haWwxEzARBgoJkiaJk/IsZAEZ
+  FgNjb20wggEiMA0GCSqGSIb3DQEBAQUAA4IBDwAwggEKAoIBAQDIUoy5sx2lmVzR
+  higIWdA6zFNSt1eibOVF0nCptQ2BejzefTmfhpgwWKDX9FvGdF213WBwxIGJFP0c
+  yOJTOoTgKQwQd6zCSoeNgNNHrXwbd42OKfHBTN1+DvNVoK9mLB659fUJ5CoCqNLU
+  FI6RtILyZVH/Hja8nnHJrfGjJ0aWSRueVuO/06QmKvm19EJEVbTSd/DwAbJTYrQD
+  6snqEY+64mcx8gvF2aCmGXKSpLqnTedsr3/16cd1rkHw7dZqbzyKc1uZaQL+giwp
+  Ijyn2SdMV+OKTf6xe/aL22aW/Z2b+tjQO8elB+/cz5kOlAkhtN3ENjf2e3H3UZSs
+  r+JQgRSdAgMBAAGjOTA3MAkGA1UdEwQCMAAwCwYDVR0PBAQDAgSwMB0GA1UdDgQW
+  BBS84ERhhfvntDfJzJe0/by+aeVeqDANBgkqhkiG9w0BAQUFAAOCAQEAFZRn7kGl
+  gvITFgcLlGAWNwYTfDiXm+8xjNXCyFLP2YgZvzNmP9HtzxnJHG9pk1tvAzKVgGQB
+  w+yPgHA9ASVnNP8/YifMVQtRkOYvmYiK+ynLTgqn3cCod0Q4mWcZ3mTsVfAqGxAZ
+  fyoyfn4C+7Ks6j3k7yXzcKoAi4w0RiHYUrNQAOFzkahHaovvophs88nIgq/HNSY6
+  tgs+JaGdLZUsgj0TZpzELi4d6iFDD44D/pAKN8VIpSlcbyKXkIyQa/NrKOTSie7u
+  AH5EvwIudku4RjdH363cTYX1xZ69LjcwrUpDrCJbG9jNK8icMoAOTEw0huZYvGRC
+  qyGdKMrvQEbACA==
+  -----END CERTIFICATE-----
+
+date: 2010-09-02 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: An interface to the Commerce Bank website (https://banking.commercebank.com).
+email: alexmchale@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.markdown
+- lib/commercebank.rb
+- lib/commercebank/monkey.rb
+files: 
+- Manifest
+- README.markdown
+- Rakefile
+- lib/commercebank.rb
+- lib/commercebank/monkey.rb
+- test/commerce_bank_client_test.rb
+- test/monkeypatch_test.rb
+- test/test_helper.rb
+- commerce-bank-client.gemspec
+has_rdoc: true
+homepage: http://github.com/alexmchale/commerce-bank-client
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Commerce-bank-client
+- --main
+- README.markdown
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 11
+      segments: 
+      - 1
+      - 2
+      version: "1.2"
+requirements: []
+
+rubyforge_project: commerce-bank-client
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: An interface to the Commerce Bank website (https://banking.commercebank.com).
+test_files: 
+- test/test_helper.rb
+- test/monkeypatch_test.rb
+- test/commerce_bank_client_test.rb