cm-httpclient 1.0.0

data/README.md

@@ -0,0 +1,4 @@
+A simple HTTP client 
+============================
+
+Doc in progress...

data/httpclient.gemspec

@@ -0,0 +1,45 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{httpclient}
+  s.version = "1.0.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["pedro gutierrez"]
+  s.date = %q{2009-05-29}
+  s.description = %q{a simple httpclient}
+  s.email = %q{pedrogutierrez@mac.com}
+  
+  s.files = %w[
+    README.md
+    httpclient.gemspec
+    lib/httpclient.rb
+    lib/httpclient/multipart.rb
+    lib/httpclient/httpclient.rb
+  ]  
+  
+  
+  s.has_rdoc = true
+  s.homepage = %q{http://codemutiny.tumblr.com}
+  s.rdoc_options = ["--inline-source", "--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{cm-httpclient}
+  s.rubygems_version = %q{1.0.0}
+  s.summary = %q{a simple httpclient}
+
+  #if s.respond_to? :specification_version then
+  #  current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+  #  s.specification_version = 2
+
+  #  if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+  #    s.add_runtime_dependency(%q<mime-types>, [">= 1.15"])
+  #    s.add_runtime_dependency(%q<diff-lcs>, [">= 1.1.2"])
+  #  else
+  #    s.add_dependency(%q<mime-types>, [">= 1.15"])
+  #    s.add_dependency(%q<diff-lcs>, [">= 1.1.2"])
+  #  end
+  #else
+  #  s.add_dependency(%q<mime-types>, [">= 1.15"])
+  #  s.add_dependency(%q<diff-lcs>, [">= 1.1.2"])
+  #end
+end

data/lib/httpclient/httpclient.rb

@@ -0,0 +1,181 @@
+require 'net/https'
+require 'uri'
+require 'rexml/document'
+require 'helpers/multipart'
+
+class Hash
+  def to_s
+    s = "{ "
+    self.each{ |k, v| s << "#{k} => #{v}, " }
+    s.chop!
+    s.chop!
+    s << " }"
+  end
+  
+  def desym!
+    r = Hash.new
+    self.each do |k, v|
+      r[k.to_s]=v.to_s
+    end
+    self.replace(r)
+  end
+end
+
+class REXML::Document
+  
+  def method_missing( name, *args )
+    self.root.send( name, args )
+  end
+
+end
+
+class REXML::Element
+  
+  def method_missing( name, *args )
+    self.get_text( name.to_s ).to_s
+  end
+
+end
+
+class String 
+  
+  def to_simple_date
+    DateTime.strptime( self, '%Y-%m-%d' ).strftime( '%B %d, %Y ')
+  end
+
+end
+
+module HttpClient 
+	
+	def host( host  )
+	  @@host = host
+	end
+	
+	def connect( &block )
+	  uri = URI.parse( @@host )
+		h = Net::HTTP.new( uri.host, uri.port )			
+		if( uri.scheme == 'https' )
+		   h.use_ssl = uri.scheme
+	 	   h.verify_mode = OpenSSL::SSL::VERIFY_NONE
+		end
+		headers = {}
+		headers.merge!( @auth ) if @auth
+		headers.desym!
+		
+		block.call( h, headers )
+	end
+	
+	def debug( &block )
+	   @debug = true
+	   instance_eval( &block )
+	   @debug = false
+	end
+
+	
+	
+	def debug_request( http_method, path, headers, form = nil )
+	  if @debug
+	    puts ""
+	    puts "Request"
+		  puts "==========================="
+		  puts "method: #{http_method}"
+      puts "path: #{path}"
+		  puts "headers: #{headers}"
+		  puts "form: #{form}" if form
+		  puts ""
+		end
+	end
+	
+	def debug_response( code, headers, body )
+	  if @debug
+	      puts ""
+  		  puts "Response"
+  		  puts "==========================="
+  		  puts "status code: #{code}"
+  		  puts "headers: #{headers}"
+  		  puts "body: #{body}"
+  		  puts ""
+  	 end
+  end
+	
+	def retrieve( path, &block )
+	  connect do |http, headers|
+		  debug_request( :get, path, headers )
+		  res = http.get path, headers
+		  handle_response( res, block )
+		end
+	end
+	
+	def remove( path, &block )
+	  connect do |http, headers|
+	    debug_request( :delete, path, headers )
+      res = http.delete path, headers
+		  handle_response( res, block )
+		end
+	end
+	
+	
+	def create( path, form = nil, &block )
+	  connect do |http, headers|
+	    data = nil
+  	  headers[ 'Content-Length' ] = '0'
+  	
+  	  if form
+  	    data, extra_headers = Multipart::Post.prepare_query( form )
+  	    headers.merge!( extra_headers )
+  	    headers[ 'Content-Length' ] = data.length.to_s
+  	  end
+  	
+  	  debug_request( :post, path, headers, form )
+  	 
+  	  res = http.post path, data, headers
+  	  handle_response( res, block )
+  	end
+	end
+	
+	alias :update :create
+  
+	
+	def handle_response( res, block = nil )
+	 code = res.code.to_i
+	 headers = res.to_hash
+	 body = res.body
+	 
+	 debug_response( code, headers, body )
+	 
+	 if res[ 'Content-Type' ] == 'text/xml'
+	   body = REXML::Document.new( body )
+	 end
+	 if block
+	   block.call( code, body, headers ) 
+	 else
+	   @obtained_code = code
+	   @obtained_body = body
+	   @obtained_headers = headers
+	 end
+	end
+
+  attr_reader :obtained_code, :obtained_body, :obtained_headers
+  
+	def admin( key, &block )
+		if key == nil
+		  anonymous( &block )
+		else
+		  @auth = { :cmuser => key }
+		  instance_eval( &block )
+		end
+	end
+
+	def user( username, password = nil, &block )
+    @auth = { :cmuser => username  }
+    @auth[ :cmpasswd ] = password if password 
+    instance_eval( &block )
+	end
+	
+	def anonymous(  &block )
+	  @auth = { :cmuser => 'anonymous' }
+    instance_eval( &block )
+	end
+
+end
+

data/lib/httpclient/multipart.rb

@@ -0,0 +1,83 @@
+# Takes a hash of string and file parameters and returns a string of text
+# formatted to be sent as a multipart form post.
+#
+# Author:: Cody Brimhall <mailto:cbrimhall@ucdavis.edu>
+# Created:: 22 Feb 2008
+
+require 'rubygems'
+require 'mime/types'
+require 'cgi'
+
+
+module Multipart
+	VERSION = "1.0.0" unless const_defined?(:VERSION)
+	
+	# Formats a given hash as a multipart form post
+	# If a hash value responds to :string or :read messages, then it is
+	# interpreted as a file and processed accordingly; otherwise, it is assumed
+	# to be a string
+	class Post
+		# We have to pretend like we're a web browser...
+		USERAGENT = "Mozilla/5.0 (Macintosh; U; PPC Mac OS X; en-us) AppleWebKit/523.10.6 (KHTML, like Gecko) Version/3.0.4 Safari/523.10.6" unless const_defined?(:USERAGENT)
+		BOUNDARY = "0123456789ABLEWASIEREISAWELBA9876543210" unless const_defined?(:BOUNDARY)
+		CONTENT_TYPE = "multipart/form-data; boundary=#{ BOUNDARY }" unless const_defined?(:CONTENT_TYPE)
+		HEADER = { "Content-Type" => CONTENT_TYPE, "User-Agent" => USERAGENT } unless const_defined?(:HEADER)
+		
+		def self.prepare_query(params)
+			fp = []
+			
+			params.each do |k, v|
+			  
+			  k = k.to_s
+			  
+				# Are we trying to make a file parameter?
+				if v.respond_to?(:path) and v.respond_to?(:read) then
+					fp.push(FileParam.new(k, v.path, v.read))
+				# We must be trying to make a regular parameter
+				else
+					fp.push(StringParam.new(k, v))
+				end
+			end
+			
+			# Assemble the request body using the special multipart format
+			query = fp.collect {|p| "--" + BOUNDARY + "\r\n" + p.to_multipart }.join("")	+ "--" + BOUNDARY + "--"
+			return query, HEADER
+		end
+	end
+	
+	private
+	
+	# Formats a basic string key/value pair for inclusion with a multipart post
+	class StringParam
+		attr_accessor :k, :v
+		
+		def initialize(k, v)
+			@k = k
+			@v = v
+		end
+		
+		def to_multipart
+			return "Content-Disposition: form-data; name=\"#{CGI::escape(k)}\"\r\n\r\n#{v}\r\n"
+		end
+	end
+	
+	# Formats the contents of a file or string for inclusion with a multipart
+	# form post
+	class FileParam
+		attr_accessor :k, :filename, :content
+		
+		def initialize(k, filename, content)
+			@k = k
+			@filename = filename
+			@content = content
+		end
+		
+		def to_multipart
+			# If we can tell the possible mime-type from the filename, use the
+			# first in the list; otherwise, use "application/octet-stream"
+			mime_type = MIME::Types.type_for(filename)[0] || MIME::Types["application/octet-stream"][0]
+			return "Content-Disposition: form-data; name=\"#{CGI::escape(k)}\"; filename=\"#{ filename }\"\r\n" +
+						 "Content-Type: #{ mime_type.simplified }\r\n\r\n#{ content }\r\n"
+		end
+	end
+end

data/lib/httpclient.rb

@@ -0,0 +1,7 @@
+libdir = File.dirname(__FILE__)
+$LOAD_PATH.unshift(libdir) unless $LOAD_PATH.include?(libdir)
+
+require 'httpclient/multipart'
+require 'httpclient/httpclient'
+
+include HttpClient

metadata

@@ -0,0 +1,58 @@
+--- !ruby/object:Gem::Specification 
+name: cm-httpclient
+version: !ruby/object:Gem::Version 
+  version: 1.0.0
+platform: ruby
+authors: 
+- pedro gutierrez
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-05-29 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: a simple httpclient
+email: pedrogutierrez@mac.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README.md
+- httpclient.gemspec
+- lib/httpclient.rb
+- lib/httpclient/multipart.rb
+- lib/httpclient/httpclient.rb
+has_rdoc: true
+homepage: http://codemutiny.tumblr.com
+post_install_message: 
+rdoc_options: 
+- --inline-source
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: cm-httpclient
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: a simple httpclient
+test_files: []
+