kaspay 0.0.5 → 0.1.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 43081c96cd556ee5cc3f775ef57e9b4b2f7139e9
-  data.tar.gz: be34341f29d037b715d41cb0fb2f4366c6975690
+  metadata.gz: 1105d0ccb68652d0db5be5c66b6700156941019f
+  data.tar.gz: 3ff3ba33823323e647a0f0c61c78fac65379807b
 SHA512:
-  metadata.gz: 2a2fc30b97487116b4761f12110d435d046da79e6d293aabde5f49ac014c821ecdecb17ef3c0964705c223b8ffc8f41ce39bab261eb375639869d8b3519df676
-  data.tar.gz: a81f7ade37886a8b8b9e0c5ca87b33532acdd96aaa41aca62ff88e9978b70445958af9362077f5d28d6375e1e6be5b1c0bcada06d77f7e3aec72f806f0bc5217
+  metadata.gz: 56525bb0c6852c73eeaa59b12f20f1c7aaf38e420c6f7b1d4e18cb7ff1a6dabaa657d5fc4ca89d3000ea9adee0f4199de50255edd28b1b79affed3d9c270ecd5
+  data.tar.gz: dbf60d5327aab90aa84d4c8692803de8dc004545d9f4713f5d2d370ebf8ae7eedb364a3f688614a6ce10c6d64963200b808e60091886e9cb3c580ae87fac5bfc

data/kaspay.gemspec

@@ -6,7 +6,7 @@ require 'kaspay/version'
 Gem::Specification.new do |spec|
   spec.name          = "kaspay"
   spec.version       = KasPay::VERSION
-  spec.date          = "2015-08-25"
+  spec.date          = Time.now.strftime("%Y-%m-%d")
 
   spec.authors       = ["Adrian Setyadi"]
   spec.email         = ["a.styd@yahoo.com"]

data/lib/kaspay.rb

@@ -6,19 +6,21 @@ require 'pstore'
 require 'watir'
 require 'headless'
 require_relative 'meta_stuff'
-require_relative 'kernel_patch'
+require_relative 'kaspay/money'
+require_relative 'kaspay/transaction'
 
 class KasPay
-   # Assign methods from MetaStuff module as KasPay class methods
+   # Assigns methods from MetaStuff module as KasPay class methods
    extend MetaStuff
 
-   # A bunch of constants belong to KasPay.
+   # A bunch of KasPay constants.
    BASE_URL = "https://www.kaspay.com"
    LOGIN_URL = BASE_URL + "/login" 
-   THINGS_TO_GET = %w(name balance acc_num).map(&:to_sym)
-   THE_GET_METHODS = add__get__to(THINGS_TO_GET)
+   TRANSACTION_URL = BASE_URL + "/account/transactiondetails/" 
+   TRANSACTION_HISTORY_URL = BASE_URL + "/account/history/"
    DATA_DIR = ENV['HOME'] + "/.kaspay"
-   DATA_PATH = DATA_DIR + "/kaspay.dat"
+   LOGIN_PATH = DATA_DIR + "/login.dat"
+   COOKIE_PATH = DATA_DIR + "/cookie.dat"
 
    # Opening KasPay class singleton scope
    class << self
@@ -27,7 +29,7 @@ class KasPay
       # the information.
       static_pages = %w(about term) # more will come
      
-      # Iterate through static pages list to make methods named the
+      # Iterates through static pages list to make methods named the
       # the same as the member of the list. These methods will be
       # the class methods of KasPay.
       # Example usage:
@@ -57,6 +59,65 @@ class KasPay
       alias_method :login, :new
       # Hidden to force the use of `login` as the class method
       # for instantiation.
+   
+      def all_get_methods
+         instance_methods.grep /^get_/
+      end
+      
+      def things_to_get
+         all_get_methods.map{|m| m.id2name.sub("get_","")}
+      end
+   
+      def data_scope(path, &block)
+         kasdb = PStore.new(path)
+         kasdb.transaction do
+            yield(kasdb)
+         end
+      end
+
+      def login_scope(&block)
+         data_scope(LOGIN_PATH, &block)
+      end
+    
+      def login_data_exists? login_name
+         data = nil
+         begin
+            login_scope {|login| data = login.roots}
+            return data.include? login_name
+         rescue NameError
+            return false
+         end
+      end
+   
+      def clear_login login_name = nil
+         login_scope do |login|
+            if !login_name.nil?
+               login.delete login_name
+            elsif login_name.nil?
+               login.roots.each do |name|
+                  login.delete name
+               end
+            end
+         end  
+      end
+
+      def load_login login_name
+         raise LoadLoginError,
+            "login data \"#{login_name}\" cannot be found" \
+               unless login_data_exists? login_name
+         email, password = nil
+         login_scope do |login|
+            email = login[login_name][:email]
+            password = login[login_name][:password]
+         end
+         login email: email, password: password
+      end
+   
+      def cookies_scope(&block)
+         data_scope(COOKIE_PATH, &block)
+      end
+       
+ 
       private :new
    end
    
@@ -69,6 +130,8 @@ class KasPay
    attr_reader :password
   
    # Some methods need to be inaccessible
+   private :browser
+   private :browser=
    private :headless
    private :headless=
    private :password
@@ -83,18 +146,34 @@ class KasPay
    end
    
    # Actually starts the login process after email and password
-   # provided. This is actualy different from the class method
-   # `login` that only creates KasPay object and compounding the
-   # data for login. 
+   # provided. This is different from the class method `login`
+   # that only creates KasPay object and compounding the data
+   # for login. 
    def login 
       headless = Headless.new
       headless.start
       
       @browser = Watir::Browser.start LOGIN_URL
 
-      browser.text_field(id: 'username').set email
-      browser.text_field(id: 'password').set password
-      browser.button(name: 'button').click
+      # Delete all expired cookies
+      delete_cookies_if_expire
+      # Use unexpired cookies that match the given email and password
+      the_cookies = use_cookies
+
+      # Fresh login
+      if the_cookies.nil?
+         browser.text_field(id: 'username').set email
+         browser.text_field(id: 'password').set password
+         browser.button(name: 'button').click
+         save_cookies
+      # Cookies still exist
+      else
+         browser.cookies.clear
+         the_cookies.each do |cookies|
+            browser.cookies.add(cookies[:name], cookies[:value])
+         end
+         browser.goto BASE_URL 
+      end
    end
 
    # Sets email input
@@ -107,6 +186,7 @@ class KasPay
    def password= pass 
       @password = pass
       login if user_data_complete?
+      return nil
    end
    
    def current_url
@@ -117,26 +197,117 @@ class KasPay
       url = (path[0] == "/" ? (BASE_URL + path) : path)
       browser.goto url
    end
-   
+
    def get_name
       browser.span(class: "user-name").text
    end
    
    def get_balance
-      Money.new browser.div(class: "kaspay-balance") \
-         .span.text.sub("Rp ","").sub(".","").to_i
+      Money.new browser.div(class: "kaspay-balance").span.text
    end
    
    def get_acc_num 
       browser.span(class: "kaspay-id").text.sub("KasPay Account: ", "").to_i
    end
-   
+  
+   def get_cookies_expire_time
+      current_cookies_scope do |cookies, cookies_name|
+         cookies[cookies_name][:cookies].each do |el|
+            if el[:name] == "kaspay_csrf_cookie" 
+               return DateTime.parse(el[:expires].to_s)
+            end
+         end
+      end
+   end
+
+   def trx_type_to_num val_in_sym 
+      num = case val_in_sym
+            when :all_trx then 0
+            when :top_up then 1
+            when :payment_to then 2
+            when :payment_from then 3
+            when :redeem then 4
+            when :refund then 5
+            when :trx_fee then 6
+            else 0
+            end
+      return num
+   end
+      
+   def get_transaction options = {}
+      default_options = {
+         latest: 5,
+         type: :all_trx,
+         oldest_only: false
+      }
+      options = default_options.merge(options)
+      unless options[:oldest_only]
+         no_of_trx = options[:latest]
+         get_latest_transactions no_of_trx, trx_type_to_num(options[:type])
+      else
+         trx_no = options[:latest] - 1
+         get_transaction_number trx_no, trx_type_to_num(options[:type])
+      end
+   end
+
+   def get_latest_transactions no_of_trx, type = 0
+      trx_ids = []
+      while no_of_trx - trx_ids.length > 0 
+         browser.goto(TRANSACTION_HISTORY_URL \
+                      + trx_ids.length.to_s \
+                      + "?f=01/01/2009&t=" \
+                      + Time.now.strftime("%d/%m/%Y") \
+                      + "&transactiontype=" \
+                      + type.to_s)
+
+         browser.tds(class: "trxid").each do |td|
+            trx_ids << td.link.href.sub(/.*\/(.*)$/, '\1')
+            break if trx_ids.length == no_of_trx 
+         end
+         break if trx_ids.length == 0 \
+            || trx_ids.length >= no_of_trx
+      end
+      trx_ids.each_with_index do |trx_id, i|
+         trx_ids[i] = Transaction.new trx_id, browser
+      end
+      browser.goto(BASE_URL)
+      return trx_ids
+   end
+
+   def get_transaction_number trx_no, type = 0
+      row_number = trx_no % 5
+      browser.goto(TRANSACTION_HISTORY_URL \
+                   + (trx_no - row_number).to_s \
+                   + "?f=01/01/2009&t=" \
+                   + Time.now.strftime("%d/%m/%Y") \
+                   + "&transactiontype=" \
+                   + type.to_s)
+
+      trx_id = Transaction.new(browser.tds(class: "trxid")[row_number] \
+                  .link.href.sub(/.*\/(.*)$/, '\1'), browser)
+      browser.goto(BASE_URL)
+      return trx_id
+   end
+
+   def links
+      links = []
+      browser.tds(class: "trxid").each{|td| links << td.link.href.to_s}
+      links
+   end
+
    def home
       goto "/"
    end
-   
+
    def logout!
+      calling_method = caller[0][/(?<=`).*(?=')/]
       logout_link.click
+      delete_cookies unless calling_method == "delete_cookies"
+   end
+  
+   # Silently logs out 
+   def logout
+      logout! if logged_in?
    end
    
    def logged_in?
@@ -154,96 +325,90 @@ class KasPay
 
    def save_login login_name
       Dir.mkdir(DATA_DIR) unless Dir.exists?(DATA_DIR)
-      kasdb = PStore.new(DATA_PATH)
-      kasdb.transaction do
-         kasdb[login_name] = {email: email, password: password}
-      end
-   end
-
-   def load_login login_name
-      kasdb = PStore.new(DATA_PATH)
-      kasdb.transaction do
-         @email = kasdb[login_name][:email]
-         @password = kasdb[login_name][:password]
-         return kasdb[login_name]
+      KasPay.login_scope do |login|
+         login[login_name] = {email: email, password: password}
       end
+      return nil
    end
- 
-   def inspect
-      "#<#{self.class}:0x#{(object_id << 1).to_s(16)} logged_in=#{logged_in?}>"
-   end
-   
-   def method_missing(m, *args, &block)  
-      if THINGS_TO_GET.include? m
-         send("get_#{m}")
-      else
-         super
-      end 
-   end 
    
    def check_login
       raise LoginError, "you are not logged in" unless logged_in?
    end
+
+   def inspect
+      "#<#{self.class}:0x#{(object_id << 1).to_s(16)} logged_in=#{logged_in?}>"
+   end
    
-   before( THE_GET_METHODS + [:logout!] ){ :check_login }
-   
-   alias_method :logout, :logout!
+   before( all_get_methods + [:logout!] ){ :check_login }
    alias_method :url, :current_url
-   
-private
-
-   def login_data_exists?
-      data = nil
-      begin
-         PStore.new("kaspay.dat").tap{|x| x.transaction{ data = x.roots}}
-         return (data != [])
-      rescue NameError
-         return false
-      end
+   KasPay.things_to_get.each do |m|
+      alias_method m, "get_#{m}"
    end
-  
-   def logout_link
-      logout_link = browser.a(href: "https://www.kaspay.com/account/logout")
+ 
+private
+   
+   def get_cookies
+      browser.cookies.to_a
    end
-
-   # inner class Money
-   class Money
-      attr_accessor :value
-      
-      fixnum_methods_to_discard = %w(inspect -@ abs magnitude to_s dclone ~ & | ^ [] << >> size bit_length to_f).map(&:to_sym)
-      new_methods = Fixnum.instance_methods(false) \
-         .delete_if{|m| fixnum_methods_to_discard.include? m}
-      
-      new_methods.each do |m|
-         define_method(m) do |arg, &block|
-            arg = arg.to_i # to convert string or Money object to Integer 
-            self.value = value.send(m, arg)
-            return self
+ 
+   def current_cookies_scope
+      KasPay.cookies_scope do |cookies|
+         cookies.roots.reverse.each do |cookies_name|
+            if cookies[cookies_name][:email] == email \
+                  && cookies[cookies_name][:password] == password
+               yield(cookies, cookies_name)
+            end
          end
       end
-      
-      def initialize value = 0
-         @value = Integer(value)
+   end
+   
+   def delete_cookies_if_expire 
+      current_cookies_scope do |cookies, cookies_name|
+         cookies[cookies_name][:cookies].each do |el|
+            if el[:name] == "kaspay_csrf_cookie" \
+                  && DateTime.parse(el[:expires].to_s) < DateTime.now
+               cookies.delete(cookies_name)
+            end
+         end
       end
-      
-      def to_f
-         value * 1.0
+   end
+
+   def delete_cookies 
+      current_cookies_scope do |cookies, cookies_name|
+         cookies.delete(cookies_name)
       end
-      
-      def to_s
-         "Rp " + value.to_s.reverse.gsub(/(\d{3})(?=\d)/, '\\1,').reverse + ".00"
+      logout! if logged_in?
+      return nil
+   end
+    
+   def save_cookies
+      time = Time.now
+      cookies_name = time.strftime("%y%m%d%H%M%S").to_i.to_s(36)
+      Dir.mkdir(DATA_DIR) unless Dir.exists?(DATA_DIR)
+      KasPay.cookies_scope do |cookies|
+         cookies[cookies_name] = {email: email, password: password, cookies: get_cookies}
       end
+   end
 
-      def inspect
-         "#<#{self.class}:0x#{(object_id << 1).to_s(16)} value=#{value}>"
+   def use_cookies
+      the_cookie = nil
+      current_cookies_scope do |cookies, cookies_name|
+         the_cookie = cookies[cookies_name][:cookies]
       end
-               
-      alias_method :to_i, :value
+      return the_cookie
+   end
+
+   def logout_link
+      logout_link = browser.a(href: "https://www.kaspay.com/account/logout")
    end
 end
 
+# Aliases for 'KasPay' class
+Kaspay = KasPay
+KASPAY = KasPay
+
 class LoginError < StandardError
 end
 
-class UserDataError < StandardError
+class LoadLoginError < StandardError
 end

data/lib/kaspay/money.rb

@@ -0,0 +1,37 @@
+class KasPay
+   # Inner class Money
+   class Money
+      attr_accessor :value
+      
+      fixnum_methods_to_discard = %w(inspect -@ abs magnitude to_s dclone ~ & | ^ [] << >> size bit_length to_f).map(&:to_sym)
+      new_methods = Fixnum.instance_methods(false) \
+         .delete_if{|m| fixnum_methods_to_discard.include? m}
+      
+      # Inheriting some methods from Fixnum
+      new_methods.each do |m|
+         define_method(m) do |arg, &block|
+            arg = arg.to_i # to convert string or Money object to Integer 
+            self.value = value.send(m, arg)
+            return self
+         end
+      end
+      
+      def initialize value = 0
+         @value = value.gsub(/\s/, '').sub(/[\.\,]00$/, "").sub(/^Rp\s*(.*)$/, '\1').gsub(/[\.\,]/, '').to_i
+      end
+      
+      def to_f
+         value * 1.0
+      end
+      
+      def to_s
+         "Rp " + value.to_s.reverse.gsub(/(\d{3})(?=\d)/, '\\1,').reverse + ".00"
+      end
+
+      def inspect
+         "#<#{self.class}:0x#{(object_id << 1).to_s(16)} value=#{value}>"
+      end
+               
+      alias_method :to_i, :value
+   end
+end

data/lib/kaspay/transaction.rb

@@ -0,0 +1,87 @@
+class KasPay
+   # Inner class Transaction
+   class Transaction
+      def initialize trx_id, browser
+         @trx_id = trx_id
+         @browser = browser
+      end
+
+      def data_available?
+         respond_to? :amount
+      end
+
+      # To be called only when needed
+      def data_build
+         @browser.goto(KasPay::TRANSACTION_URL + @trx_id)
+         data = []
+         @browser.tds.each_slice(3){|a, b, c| data << c.text}
+         @date = DateTime.parse(data[0] + "T" \
+                                   + data[1] + "+07:00")
+         @trx_id = data[2]
+         @trx_type = data[3]
+         @remark = data[4]
+         @status = data[5]
+         m1_in_sym = []
+         (instance_variables - [:@browser]).each do |v|
+            m1_in_sym << v.to_s.sub(/@/, '').to_sym
+         end
+         m1_in_sym.each do |m|
+            define_singleton_method m do
+               eval "@#{m.to_s}"
+            end
+         end
+
+         non_payment_type = ["Transaction correction", "Topup"]
+         unless non_payment_type.include? @trx_type
+            @seller = data[6]
+            @merchant_trx_id = data[7]
+            @product_id = data[8]
+            @product_name = data[9]
+            @quantity = data[10].gsub(/[^0-9]/, '').to_i
+            @description = data[11]
+            m2_in_sym = []
+            (instance_variables - [:@browser]).each do |v|
+               m2_in_sym << v.to_s.sub(/@/, '').to_sym
+            end
+            m2_in_sym = m2_in_sym - m1_in_sym
+            m2_in_sym.each do |m|
+               define_singleton_method m do
+                  eval "@#{m.to_s}"
+               end
+            end
+            @amount = Money.new data[12]
+         else
+            @amount = Money.new data[6]
+         end
+
+         define_singleton_method :amount do
+            @amount
+         end
+      end
+
+      def to_h
+         h = {}
+         instance_variables.each do |v|
+            m_in_sym = v.to_s.sub(/@/, '').to_sym
+            h[m_in_sym] = send m_in_sym
+         end
+         return h
+      end
+
+      def inspect
+         "#<#{self.class}:0x#{(object_id << 1).to_s(16)} id=#{@trx_id} browser=#{@browser}>"
+      end
+
+      def method_missing(name, *args, &block)
+         if data_available?
+            super
+         else
+            data_build
+            send(name, *args, &block)
+         end
+      end
+
+      alias_method :to_s, :to_h
+ 
+   end
+end

data/lib/kaspay/transaction_collection.rb

@@ -0,0 +1,5 @@
+class KasPay
+   # Inner class TransactionCollection
+   class TransactionCollection
+   end
+end

data/lib/kaspay/version.rb

@@ -1,3 +1,3 @@
 class KasPay
-  VERSION = "0.0.5"
+  VERSION = "0.1.2"
 end

data/lib/meta_stuff.rb

@@ -1,17 +1,13 @@
 module MetaStuff
-  def method_missing(m, *args, &block)  
-    raise NoMethodError, "undefined method `#{m}' for #{self}:#{self.class}"
-  end  
-
-  def before(names, &block)
-    names.each do |name|
-      m = instance_method(name)
-      n = instance_method(yield)
-      define_method(name) do
-        n.bind(self).call 
-        m.bind(self).call
+   def before(names)
+      names.each do |name|
+         m = instance_method(name)
+         n = instance_method(yield)
+         define_method(name) do |*args, &block|
+            n.bind(self)
+            m.bind(self).(*args, &block)
+         end
       end
-    end
-    private yield
-  end
+      private yield
+   end
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: kaspay
 version: !ruby/object:Gem::Version
-  version: 0.0.5
+  version: 0.1.2
 platform: ruby
 authors:
 - Adrian Setyadi
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-08-25 00:00:00.000000000 Z
+date: 2015-10-05 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: watir
@@ -62,8 +62,10 @@ files:
 - README.md
 - kaspay.gemspec
 - lib/kaspay.rb
+- lib/kaspay/money.rb
+- lib/kaspay/transaction.rb
+- lib/kaspay/transaction_collection.rb
 - lib/kaspay/version.rb
-- lib/kernel_patch.rb
 - lib/meta_stuff.rb
 homepage: https://github.com/styd/kaspay
 licenses:

data/lib/kernel_patch.rb

@@ -1,5 +0,0 @@
-module Kernel
-  def add__get__to array
-    array.map {|el| "get_#{el}".to_sym}
-  end
-end