peakium 0.1.0 → 0.1.1

data/lib/peakium/api_operations/create.rb

@@ -0,0 +1,16 @@
+module Peakium
+  module APIOperations
+    module Create
+      module ClassMethods
+        def create(params={}, api_key=nil)
+          response, api_key = Peakium.request(:post, self.endpoint_url, api_key, params)
+          Util.convert_to_peakium_object(response, api_key)
+        end
+      end
+
+      def self.included(base)
+        base.extend(ClassMethods)
+      end
+    end
+  end
+end

data/lib/peakium/api_operations/delete.rb

@@ -0,0 +1,11 @@
+module Peakium
+  module APIOperations
+    module Delete
+      def delete
+        response, api_key = Peakium.request(:delete, endpoint_url, @api_key)
+        refresh_from(response, api_key)
+        self
+      end
+    end
+  end
+end

data/lib/peakium/api_operations/list.rb

@@ -0,0 +1,21 @@
+module Peakium
+  module APIOperations
+    module List
+      module ClassMethods
+        def all(filters={}, api_key=nil)
+          response, api_key = Peakium.request(:get, endpoint_url, api_key, filters)
+          object = Util.convert_to_peakium_object(response, api_key)
+
+          # Set the URL for list objects
+          if object.kind_of? ListObject
+            object.set_endpoint_url(endpoint_url, filters)
+          end
+        end
+      end
+
+      def self.included(base)
+        base.extend(ClassMethods)
+      end
+    end
+  end
+end

data/lib/peakium/api_operations/update.rb

@@ -0,0 +1,17 @@
+module Peakium
+  module APIOperations
+    module Update
+      def save
+        if @unsaved_values.length > 0
+          values = @unsaved_values.reduce({}) do |h, k| 
+            h.update(k => @values[k].nil? ? '' : @values[k])
+          end
+          values.delete(:id)
+          response, api_key = Peakium.request(:post, endpoint_url, @api_key, values)
+          refresh_from(response, api_key)
+        end
+        self
+      end
+    end
+  end
+end

data/lib/peakium/api_resource.rb

@@ -0,0 +1,33 @@
+module Peakium
+  class APIResource < PeakiumObject
+    def self.class_name
+      self.name.split('::')[-1]
+    end
+
+    def self.endpoint_url()
+      if self == APIResource
+        raise NotImplementedError.new('APIResource is an abstract class. You should perform actions on its subclasses')
+      end
+      "/v1/#{CGI.escape(Util.camel_to_snake_case(class_name))}s"
+    end
+
+    def endpoint_url
+      unless id = self['id']
+        raise InvalidRequestError.new("Could not determine which endpoint URL to request: #{self.class} instance has invalid ID: #{id.inspect}", 'id')
+      end
+      "#{self.class.endpoint_url}/#{CGI.escape(id)}"
+    end
+
+    def refresh
+      response, api_key = Peakium.request(:get, endpoint_url, @api_key, @retrieve_options)
+      refresh_from(response, api_key)
+      self
+    end
+
+    def self.retrieve(id, api_key=nil)
+      instance = self.new(id, api_key)
+      instance.refresh
+      instance
+    end
+  end
+end

data/lib/peakium/api_resources/customer.rb

@@ -0,0 +1,25 @@
+module Peakium
+  class Customer < APIResource
+    include Peakium::APIOperations::List
+
+    def subscriptions
+      Subscription.all({ :customer => id }, @api_key)
+    end
+
+    def cancel_subscription(token)
+      response, api_key = Peakium.request(:delete, subscription_url(token), @api_key)
+      refresh_from({ :subscription => response }, api_key, true)
+      subscription
+    end
+
+    private
+
+    def subscription_url(token)
+      "#{subscriptions_url}/#{CGI.escape(token)}"
+    end
+
+    def subscriptions_url
+      "#{endpoint_url}/subscriptions"
+    end
+  end
+end

data/lib/peakium/api_resources/event.rb

@@ -0,0 +1,28 @@
+module Peakium
+  class Event < APIResource
+    include Peakium::APIOperations::List
+
+    def validate(data)
+      response, api_key = Peakium.request(:post, validate_url, @api_key, data)
+      refresh_from(response, api_key)
+      self
+    end
+
+    def send(params={})
+      response, api_key = Peakium.request(:post, send_url, @api_key, params)
+      refresh_from(response, api_key)
+      self
+    end
+
+    private
+
+    def validate_url
+      endpoint_url + '/validate'
+    end
+
+    def send_url
+      endpoint_url + '/send'
+    end
+
+  end
+end

data/lib/peakium/api_resources/event_webhook.rb

@@ -0,0 +1,5 @@
+module Peakium
+  class EventWebhook < APIResource
+    include Peakium::APIOperations::List
+  end
+end

data/lib/peakium/api_resources/gateway.rb

@@ -0,0 +1,19 @@
+module Peakium
+  class Gateway < APIResource
+    include Peakium::APIOperations::Create
+    include Peakium::APIOperations::List
+    include Peakium::APIOperations::Update
+
+    def set_default()
+      response, api_key = Peakium.request(:post, set_default_url, @api_key)
+      refresh_from(response, api_key)
+      self
+    end
+
+    private
+
+    def set_default_url
+      endpoint_url + '/default'
+    end
+  end
+end

data/lib/peakium/api_resources/invoice.rb

@@ -0,0 +1,26 @@
+module Peakium
+  class Invoice < APIResource
+    include Peakium::APIOperations::List
+
+    def overdue(params={}, api_key = nil)
+      params = params + { :overdue => true }
+      all(params, api_key);
+    end
+
+    def pay
+      response, api_key = Peakium.request(:post, pay_url, @api_key)
+      refresh_from(response, api_key)
+      self
+    end
+
+    private
+
+    def overdue_url
+      endpoint_url + '/overdue'
+    end
+
+    def pay_url
+      endpoint_url + '/pay'
+    end
+  end
+end

data/lib/peakium/api_resources/payment_session.rb

@@ -0,0 +1,5 @@
+module Peakium
+  class PaymentSession < APIResource
+    include Peakium::APIOperations::List
+  end
+end

data/lib/peakium/api_resources/submission_form.rb

@@ -0,0 +1,12 @@
+module Peakium
+  class SubmissionForm < APIResource
+    def self.build(type, params, api_key=nil)
+      response, api_key = Peakium.request(:post, self.build_url(type), api_key, params)
+      Util.convert_to_peakium_object(response, api_key)
+    end
+
+    def self.build_url(type)
+      "#{self.endpoint_url}/#{CGI.escape(type)}"
+    end
+  end
+end

data/lib/peakium/api_resources/subscription.rb

@@ -0,0 +1,26 @@
+module Peakium
+  class Subscription < APIResource
+    include Peakium::APIOperations::List
+
+    def id
+      unless id = self['token']
+        raise InvalidRequestError.new("Object #{self.class} has not token: #{id.inspect}", id)
+      end
+      id
+    end
+
+    def self.retrieve(id, api_key=nil)
+      raise InvalidRequestError.new("You need to access individual #{self.class} through a #{Customer.class}", 'customer');
+    end
+
+    def endpoint_url
+      unless token = self['id']
+        raise InvalidRequestError.new("Could not determine which endpoint URL to request: #{self.class} instance has invalid token: #{token.inspect}", 'token')
+      end
+      unless customer = self['customer']
+        raise InvalidRequestError.new("Could not determine which endpoint URL to request: #{self.class} instance has invalid #{Customer.class}: #{customer.inspect}", 'customer')
+      end
+      url = customer.endpoint_url + "/subscriptions/#{CGI.escape(token)}"
+    end
+  end
+end

data/lib/peakium/api_resources/webhook.rb

@@ -0,0 +1,21 @@
+module Peakium
+  class Webhook < APIResource
+    include Peakium::APIOperations::Create
+    include Peakium::APIOperations::Delete
+    include Peakium::APIOperations::List
+
+    def id
+      unless id = self['url']
+        raise InvalidRequestError.new("No url set for Peakium::Webhook")
+      end
+      id
+    end
+
+    def endpoint_url
+      unless url = self['url']
+        raise InvalidRequestError.new("Could not determine which endpoint URL to request: #{self.class} instance has invalid url: #{url.inspect}", 'url')
+      end
+      "#{self.class.endpoint_url}/#{CGI.escape(url)}"
+    end
+  end
+end

data/lib/peakium/errors/api_connection_error.rb

@@ -0,0 +1,4 @@
+module Peakium
+  class APIConnectionError < PeakiumError
+  end
+end

data/lib/peakium/errors/api_error.rb

@@ -0,0 +1,4 @@
+module Peakium
+  class APIError < PeakiumError
+  end
+end

data/lib/peakium/errors/authentication_error.rb

@@ -0,0 +1,4 @@
+module Peakium
+  class AuthenticationError < PeakiumError
+  end
+end

data/lib/peakium/errors/invalid_request_error.rb

@@ -0,0 +1,10 @@
+module Peakium
+  class InvalidRequestError < PeakiumError
+    attr_accessor :param
+
+    def initialize(message, param, http_status=nil, http_body=nil, json_body=nil)
+      super(message, http_status, http_body, json_body)
+      @param = param
+    end
+  end
+end

data/lib/peakium/errors/peakium_error.rb

@@ -0,0 +1,20 @@
+module Peakium
+  class PeakiumError < StandardError
+    attr_reader :message
+    attr_reader :http_status
+    attr_reader :http_body
+    attr_reader :json_body
+
+    def initialize(message=nil, http_status=nil, http_body=nil, json_body=nil)
+      @message = message
+      @http_status = http_status
+      @http_body = http_body
+      @json_body = json_body
+    end
+
+    def to_s
+      status_string = @http_status.nil? ? "" : "(Status #{@http_status}) "
+      "#{status_string}#{@message}"
+    end
+  end
+end

data/lib/peakium/list_object.rb

@@ -0,0 +1,31 @@
+module Peakium
+  class ListObject < PeakiumObject
+
+    def [](k)
+      case k
+      when String, Symbol
+        super
+      else
+        raise ArgumentError.new("You tried to access the #{k.inspect} index, but ListObject types only support String keys. (HINT: List calls return an object with a 'data' (which is the data array). You likely want to call #data[#{k.inspect}])")
+      end
+    end
+
+    def each(&blk)
+      self.data.each(&blk)
+    end
+
+    def all(params={}, api_key=nil)
+      response, api_key = Peakium.request(:get, endpoint_url, api_key, params)
+      Util.convert_to_peakium_object(response, api_key)
+      self.set_endpoint_url(endpoint_url, params)
+    end
+
+    def set_endpoint_url(endpoint_url, params)
+      # Set the URL for list objects
+      url = endpoint_url;
+      url += "#{(endpoint_url.include? '?') ? '&' : '?'}#{Peakium.uri_encode(params)}" if params && params.any?
+      self.endpoint_url = url
+      self
+	end
+  end
+end

data/lib/peakium/peakium_object.rb

@@ -0,0 +1,167 @@
+module Peakium
+  class PeakiumObject
+    include Enumerable
+
+    attr_accessor :api_key
+    @@permanent_attributes = Set.new([:api_key, :id])
+
+    # The default :id method is deprecated and isn't useful to us
+    if method_defined?(:id)
+      undef :id
+    end
+
+    def initialize(id=nil, api_key=nil)
+      # parameter overloading!
+      if id.kind_of?(Hash)
+        @retrieve_options = id.dup
+        @retrieve_options.delete(:id)
+        id = id[:id]
+      else
+        @retrieve_options = {}
+      end
+
+      @api_key = api_key
+      @values = {}
+      # This really belongs in APIResource, but not putting it there allows us
+      # to have a unified inspect method
+      @unsaved_values = Set.new
+      @transient_values = Set.new
+      @values[:id] = id if id
+    end
+
+    def self.construct_from(values, api_key=nil)
+      obj = self.new(values[:id], api_key)
+      obj.refresh_from(values, api_key)
+      obj
+    end
+
+    def to_s(*args)
+      JSON.pretty_generate(@values, :pretty => true)
+    end
+
+    def inspect()
+      id_string = (self.respond_to?(:id) && !self.id.nil?) ? " id=#{self.id}" : ""
+      "#<#{self.class}:0x#{self.object_id.to_s(16)}#{id_string}> JSON: " + JSON.pretty_generate(@values, :pretty => true)
+    end
+
+    def refresh_from(values, api_key, partial=false)
+      @api_key = api_key
+
+      removed = partial ? Set.new : Set.new(@values.keys - values.keys)
+      added = Set.new(values.keys - @values.keys)
+      # Wipe old state before setting new.  This is useful for e.g. updating a
+      # customer, where there is no persistent card parameter.  Mark those values
+      # which don't persist as transient
+
+      instance_eval do
+        remove_accessors(removed)
+        add_accessors(added)
+      end
+      removed.each do |k|
+        @values.delete(k)
+        @transient_values.add(k)
+        @unsaved_values.delete(k)
+      end
+      values.each do |k, v|
+        @values[k] = Util.convert_to_peakium_object(v, api_key)
+        @transient_values.delete(k)
+        @unsaved_values.delete(k)
+      end
+    end
+
+    def [](k)
+      @values[k.to_sym]
+    end
+
+    def []=(k, v)
+      send(:"#{k}=", v)
+    end
+
+    def keys
+      @values.keys
+    end
+
+    def values
+      @values.values
+    end
+
+    def to_json(*a)
+      JSON.generate(@values)
+    end
+
+    def as_json(*a)
+      @values.as_json(*a)
+    end
+
+    def to_hash
+      @values
+    end
+
+    def each(&blk)
+      @values.each(&blk)
+    end
+
+    protected
+
+    def metaclass
+      class << self; self; end
+    end
+
+    def remove_accessors(keys)
+      metaclass.instance_eval do
+        keys.each do |k|
+          next if @@permanent_attributes.include?(k)
+          k_eq = :"#{k}="
+          remove_method(k) if method_defined?(k)
+          remove_method(k_eq) if method_defined?(k_eq)
+        end
+      end
+    end
+
+    def add_accessors(keys)
+      metaclass.instance_eval do
+        keys.each do |k|
+          next if @@permanent_attributes.include?(k)
+          k_eq = :"#{k}="
+          define_method(k) { @values[k] }
+          define_method(k_eq) do |v|
+            if v == ""
+              raise ArgumentError.new(
+                "You cannot set #{k} to an empty string." +
+                "We interpret empty strings as nil in requests." +
+                "You may set #{self}.#{k} = nil to delete the property.")
+            end
+            @values[k] = v
+            @unsaved_values.add(k)
+          end
+        end
+      end
+    end
+
+    def method_missing(name, *args)
+      # TODO: only allow setting in updateable classes.
+      if name.to_s.end_with?('=')
+        attr = name.to_s[0...-1].to_sym
+        add_accessors([attr])
+        begin
+          mth = method(name)
+        rescue NameError
+          raise NoMethodError.new("Cannot set #{attr} on this object. HINT: you can't set: #{@@permanent_attributes.to_a.join(', ')}")
+        end
+        return mth.call(args[0])
+      else
+        return @values[name] if @values.has_key?(name)
+      end
+
+      begin
+        super
+      rescue NoMethodError => e
+        if @transient_values.include?(name)
+          raise NoMethodError.new(e.message + ".  HINT: The '#{name}' attribute was set in the past, however.  It was then wiped when refreshing the object with the result returned by Peakium's API, probably as a result of a save().  The attributes currently available on this object are: #{@values.keys.join(', ')}")
+        else
+          raise
+        end
+      end
+    end
+  end
+end

data/lib/peakium/util.rb

@@ -0,0 +1,115 @@
+module Peakium
+  module Util
+    def self.objects_to_ids(h)
+      case h
+      when APIResource
+        h.id
+      when Hash
+        res = {}
+        h.each { |k, v| res[k] = objects_to_ids(v) unless v.nil? }
+        res
+      when Array
+        h.map { |v| objects_to_ids(v) }
+      else
+        h
+      end
+    end
+
+    def self.object_classes
+      @object_classes ||= {
+        'customer' => Customer,
+        'event' => Event,
+        'event_webhook' => EventWebhook,
+        'gateway' => Gateway,
+        'invoice' => Invoice,
+        'payment_session' => PaymentSession,
+        'subscription' => Subscription,
+        'submission_form' => SubmissionForm,
+        'webhook' => Webhook,
+        'list' => ListObject
+      }
+    end
+
+    def self.convert_to_peakium_object(resp, api_key)
+      case resp
+      when Array
+        resp.map { |i| convert_to_peakium_object(i, api_key) }
+      when Hash
+        # Try converting to a known object class.  If none available, fall back to generic PeakiumObject
+        object_classes.fetch(resp[:object], PeakiumObject).construct_from(resp, api_key)
+      else
+        resp
+      end
+    end
+
+    def self.file_readable(file)
+      # This is nominally equivalent to File.readable?, but that can
+      # report incorrect results on some more oddball filesystems
+      # (such as AFS)
+      begin
+        File.open(file) { |f| }
+      rescue
+        false
+      else
+        true
+      end
+    end
+
+    def self.symbolize_names(object)
+      case object
+      when Hash
+        new = {}
+        object.each do |key, value|
+          key = (key.to_sym rescue key) || key
+          new[key] = symbolize_names(value)
+        end
+        new
+      when Array
+        object.map { |value| symbolize_names(value) }
+      else
+        object
+      end
+    end
+
+    def self.url_encode(key)
+      URI.escape(key.to_s, Regexp.new("[^#{URI::PATTERN::UNRESERVED}]"))
+    end
+
+    def self.flatten_params(params, parent_key=nil)
+      result = []
+      params.each do |key, value|
+        calculated_key = parent_key ? "#{parent_key}[#{url_encode(key)}]" : url_encode(key)
+        if value.is_a?(Hash)
+          result += flatten_params(value, calculated_key)
+        elsif value.is_a?(Array)
+          result += flatten_params_array(value, calculated_key)
+        else
+          result << [calculated_key, value]
+        end
+      end
+      result
+    end
+
+    def self.flatten_params_array(value, calculated_key)
+      result = []
+      value.each do |elem|
+        if elem.is_a?(Hash)
+          result += flatten_params(elem, calculated_key)
+        elsif elem.is_a?(Array)
+          result += flatten_params_array(elem, calculated_key)
+        else
+          result << ["#{calculated_key}[]", elem]
+        end
+      end
+      result
+    end
+
+    def self.camel_to_snake_case(camel)
+      camel.gsub(/::/, '/').
+        gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
+        gsub(/([a-z\d])([A-Z])/,'\1_\2').
+        tr("-", "_").
+        downcase
+    end
+  end
+end

data/lib/peakium/version.rb

@@ -0,0 +1,3 @@
+module Peakium
+  VERSION = '0.1.1'
+end