commerce-bank-client 1.0.0 → 1.1.0

data/Manifest

@@ -1,6 +1,7 @@
 Manifest
 README.markdown
 Rakefile
+lib/commerce-bank-client.rb
 lib/commercebank.rb
 lib/commercebank/monkey.rb
 test/commerce_bank_client_test.rb

data/Rakefile

@@ -2,7 +2,7 @@ require 'rubygems'
 require 'rake'
 require 'echoe'
 
-Echoe.new("commerce-bank-client", "1.0.0") do |p|
+Echoe.new("commerce-bank-client", "1.1.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"

data/commerce-bank-client.gemspec

@@ -2,7 +2,7 @@
 
 Gem::Specification.new do |s|
   s.name = %q{commerce-bank-client}
-  s.version = "1.0.0"
+  s.version = "1.1.0"
 
   s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
   s.authors = ["Alex McHale"]
@@ -10,8 +10,8 @@ Gem::Specification.new do |s|
   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.extra_rdoc_files = ["README.markdown", "lib/commerce-bank-client.rb", "lib/commercebank.rb", "lib/commercebank/monkey.rb"]
+  s.files = ["Manifest", "README.markdown", "Rakefile", "lib/commerce-bank-client.rb", "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"]

data/lib/commerce-bank-client.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
+

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: commerce-bank-client
 version: !ruby/object:Gem::Version 
-  hash: 23
+  hash: 19
   prerelease: false
   segments: 
   - 1
+  - 1
   - 0
-  - 0
-  version: 1.0.0
+  version: 1.1.0
 platform: ruby
 authors: 
 - Alex McHale
@@ -48,12 +48,14 @@ extensions: []
 
 extra_rdoc_files: 
 - README.markdown
+- lib/commerce-bank-client.rb
 - lib/commercebank.rb
 - lib/commercebank/monkey.rb
 files: 
 - Manifest
 - README.markdown
 - Rakefile
+- lib/commerce-bank-client.rb
 - lib/commercebank.rb
 - lib/commercebank/monkey.rb
 - test/commerce_bank_client_test.rb