infomeme_client 0.1.1

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Infomeme Ltd.
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,8 @@
+= InfomemeClient
+
+A RubyGem for implementing both Infomeme client and meme applications.
+See https://api-docs.infomeme.com
+
+== Copyright
+
+Copyright (c) 2010 Infomeme Ltd. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,54 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "infomeme_client"
+    gem.summary = "A RubyGem for implementing both Infomeme client and meme applications."
+    gem.description = gem.summary
+    gem.email = "infomeme@infomeme.com"
+    gem.homepage = "https://api.infomeme.com"
+    gem.authors = ["Infomeme Ltd."]
+    gem.add_dependency "oauth"
+    gem.add_dependency "json"
+    gem.add_dependency "multipart-post"
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/test_*.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/test_*.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+task :test => :check_dependencies
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "infomeme_client #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.1.1

data/lib/infomeme_client/base.rb

@@ -0,0 +1,77 @@
+module InfomemeClient::Base
+    def initialize(options = {})
+	self.consumer = OAuth::Consumer.new(options[:api_key] || ::INFOMEME_API_KEY, options[:api_secret] || ::INFOMEME_API_SECRET, :site => options[:site] || ::INFOMEME_API_SITE)
+	self.default_language = options[:language] || "en"
+	self.default_currency = options[:currency] || "usd"
+	case
+	    when options.key?(:token) && options.key?(:secret) then authorize_with_token(options[:token], options[:secret])
+	    when options.key?(:login) && options.key?(:password) then authorize_with_credentials(options[:login], options[:password])
+	    else deauthorize
+	end
+    end
+
+    def request_authorization
+	response = handle_response :get, consumer.request_token_url
+	response.request_token
+    end
+
+    def authorize_url(token, permissions = [])
+	"https://infomeme.com/authorize?token=#{token}&permissions=#{permissions.join(',')}"
+    end
+
+    def authorize_with_verifier(token, secret, verifier)
+	req_token = OAuth::RequestToken.new(consumer, token, secret)
+	response = token_request(req_token, :get, finalize_get_url(consumer.access_token_url, {:oauth_verifier => verifier})) #do request with request_token
+	return false if response.error?
+	authorize_with_token(response.access_token.token, response.access_token.secret)
+    end
+
+    def authorize_with_token(token, secret)
+	access_token = OAuth::AccessToken.new(consumer, token, secret)
+	response = token_request(access_token, :get, "/oauth/verify_access")
+	return false if response.error?
+	self.verified_user = response.user_id
+	self.token = access_token
+	refresh_user_data
+	self
+    end
+
+    def authorize_with_credentials(login, password, permissions = nil)
+	req_token = request_authorization
+	response = put(consumer.authorize_url, {:oauth_token => req_token.token, :login => login, :password => password, :permissions => permissions || all_permissions.collect {|perm| perm.id}})
+	return false if response.error?
+	authorize_with_verifier(req_token.token, req_token.secret, response.verifier)
+    end
+
+    def deauthorize
+	self.verified_user = nil
+	self.token = OAuth::AccessToken.new(consumer)
+	refresh_user_data
+	self
+    end
+
+    def authorized?
+	! verified_user.nil?
+    end
+
+    def credentials(just = nil)
+	creds = {
+	    :login => verified_user,
+	    :token => token.token,
+	    :secret => token.secret,
+	}
+	creds.key?(just) ? creds[just] : creds
+    end
+
+    def inspect
+	"#<#{self.class.name}: #{authorized? ? credentials.merge({:permissions => (all_permissions || []).select {|perm| has_permission?(perm.id)}.collect {|perm| perm.name}}).inspect : 'not authorized'}>"
+    end
+
+    private
+	attr_accessor :consumer, :token, :verified_user
+
+	def refresh_user_data
+	    refresh_settings
+	    refresh_permissions
+	end
+end

data/lib/infomeme_client/communication.rb

@@ -0,0 +1,75 @@
+module InfomemeClient::Communication
+    def get(path, headers = {})
+	request(:get, path, headers)
+    end
+
+    def post(path, body = "", headers = {})
+	request(:post, path, body, headers)
+    end
+
+    def put(path, body = "", headers = {})
+	request(:put, path, body, headers)
+    end
+
+    def request(method, path, *args)
+	token_request(token, method, path, *args)
+    end
+
+    def handle_response(method, path, *args, &block)
+	response = request(method, path, *args)
+	response.raise_error
+	if block_given?
+	    if block.arity == 1
+		yield response
+	    else
+		yield unless response.error?
+	    end
+	else
+	    response
+	end
+    end
+
+    def extract_from_response(extract, method, path, *args)
+	handle_response(method, path, *args) do |resp|
+	    resp.extract(extract) unless resp.error?
+	end
+    end
+
+    def extract_or_response(extract, method, path, options, headers = {})
+	no_extract = options[:no_extract] || false
+	options.delete(:no_extract)
+	if [:put, :post].include?(method.to_sym)
+	    args = [method, path, options, headers]
+	else
+	    args = [method, finalize_get_url(path, options), headers]
+	end
+	if no_extract
+	    handle_response *args
+	else
+	    extract_from_response *args.unshift(extract)
+	end
+    end
+
+    private
+	def token_request(token, method, path, *args)
+	    body = [:post, :put].include?(method.to_sym) ? (args.shift || {}) : {}
+	    headers = args.shift || {}
+	    headers.store("Accept", "application/json") #override to use json
+	    if [:post, :put].include?(method.to_sym) && (! headers.key?("Content-Type") || headers["Content-Type"] == "application/json")
+		body = JSON.generate(body) unless body.is_a?(String)
+		headers.store("Content-Type", "application/json")
+	    end
+	    args.unshift headers
+	    args.unshift body if [:post, :put].include?(method.to_sym)
+	    begin
+		resp = token.request(method, path, *args).body
+		InfomemeClient::Response.new JSON.parse(resp)
+	    rescue => e
+		InfomemeClient::Response.new e
+	    end
+	end
+
+	def finalize_get_url(url, params)
+	    url + (url.include?("?") ? "&" : "?") + params.collect {|key, val| "#{key.to_s}=#{val.to_s}"}.join("&")
+	end
+end

data/lib/infomeme_client/entity_hash/comment.rb

@@ -0,0 +1,2 @@
+class InfomemeClient::EntityHash::Comment < InfomemeClient::EntityHash
+end

data/lib/infomeme_client/entity_hash/meme.rb

@@ -0,0 +1,45 @@
+class InfomemeClient::EntityHash::Meme < InfomemeClient::EntityHash
+    def initialize(meme, client)
+	super(meme, true)
+	@client = client
+	freeze
+    end
+
+    #todo: have_access?, published_by_me?, confirmed?, inactive?, incomplete?, has_upload?, etc.
+
+    def update(options = {})
+	@client.update_meme(id, options)
+    end
+
+    def delete
+	@client.delete_meme(id)
+    end
+
+    def confirm
+	@client.confirm_meme(id)
+    end
+
+    def activate
+	@client.activate_meme(id)
+    end
+
+    def deactivate
+	@client.deactivate_meme(id)
+    end
+
+    def upload_url(raw = false)
+	@client.upload_for_meme(id, raw)
+    end
+
+    def upload(file)
+	@client.upload(id, file)
+    end
+
+    def rate(rating)
+	@client.rate(id, rating)
+    end
+
+    def comment(comment)
+	@client.comment(id, comment)
+    end
+end

data/lib/infomeme_client/entity_hash/meme_type.rb

@@ -0,0 +1,2 @@
+class InfomemeClient::EntityHash::MemeType < InfomemeClient::EntityHash
+end

data/lib/infomeme_client/entity_hash/transaction.rb

@@ -0,0 +1,3 @@
+class InfomemeClient::EntityHash::Transaction < InfomemeClient::EntityHash
+    #todo: invoices
+end

data/lib/infomeme_client/entity_hash/user.rb

@@ -0,0 +1,2 @@
+class InfomemeClient::EntityHash::User < InfomemeClient::EntityHash
+end

data/lib/infomeme_client/entity_hash.rb

@@ -0,0 +1,65 @@
+class InfomemeClient::EntityHash
+    autoload :Comment, "infomeme_client/entity_hash/comment"
+    autoload :Meme, "infomeme_client/entity_hash/meme"
+    autoload :MemeType, "infomeme_client/entity_hash/meme_type"
+    autoload :Transaction, "infomeme_client/entity_hash/transaction"
+    autoload :User, "infomeme_client/entity_hash/user"
+
+    def initialize(hsh, no_freeze = false)
+	@hsh = hsh.inject({}) {|memo, keyvalue| #ripped from ActiveSupport, http://api.rubyonrails.org/classes/ActiveSupport/CoreExtensions/Hash/Keys.html#M000904
+	    key, value = keyvalue
+	    memo[(key.to_sym rescue key) || key] = map_values(value)
+	    memo
+	}
+	freeze unless no_freeze
+    end
+
+    def method_missing(sym)
+	@hsh.key?(sym) ? @hsh[sym] : super
+    end
+
+    def respond_to?(sym, include_private = false)
+	@hsh.key?(sym) ? true : super
+    end
+
+    def to_hash
+	@hsh.inject({}) do |memo, (key, value)|
+	    memo[key] = extract_values(value)
+	    memo
+	end
+    end
+
+    def freeze
+	@hsh.each do |key, val|
+	    deep_freeze(val)
+	end
+	@hsh.freeze
+	super
+    end
+
+    def id
+	@hsh.key?(:id) ? @hsh[:id] : super
+    end
+
+    private
+	def map_values(val)
+	    case
+		when val.is_a?(Hash) then InfomemeClient::EntityHash.new(val)
+		when val.is_a?(Array) then val.collect {|obj| map_values(obj)}
+		else val
+	    end
+	end
+
+	def extract_values(val)
+	    case
+		when val.is_a?(InfomemeClient::EntityHash) then val.to_hash
+		when val.is_a?(Array) then val.collect {|obj| extract_values(obj)}
+		else val
+	    end
+	end
+
+	def deep_freeze(val)
+	    val.each {|obj| deep_freeze(obj)} if val.is_a?(Array)
+	    val.freeze
+	end
+end

data/lib/infomeme_client/errors.rb

@@ -0,0 +1,22 @@
+class InfomemeClient::Error < StandardError
+    class RequestFailed < self ; end
+    class InternalError < self ; end
+    class NoAccess < self ; end
+    class NotFound < self ; end
+
+    attr_reader :errors
+
+    def initialize(args)
+	@errors = args.shift
+	msg = args.shift
+	super(msg)
+    end
+
+    def message
+	"#{super} Errors: #{errors.inspect}"
+    end
+
+    def inspect
+	"<#{self.class.inspect} #{self.message}>"
+    end
+end

data/lib/infomeme_client/functions/meme.rb

@@ -0,0 +1,23 @@
+module InfomemeClient::Functions::Meme
+    def browse(options = {})
+	get_memes "/memes", options
+    end
+
+    def search(search_token, options = {})
+	get_memes "/memes/search", options.merge({:search_token => search_token})
+    end
+
+    def meme_types
+	extract_from_response :meme_types, :get, "/memes/types"
+    end
+
+    def meme(meme_id)
+	handle_response :get, "/memes/#{meme_id}" do |resp|
+	    resp.extract(:meme, self) unless resp.error?
+	end
+    end
+
+    def meme_comments(meme_id, options = {})
+	extract_or_response :comments, :get, "/memes/#{meme_id}/comments", options
+    end
+end