turingstudio-basecamp-rb 0.0.1

data/History.txt

@@ -0,0 +1,4 @@
+== 0.0.1 2009-02-18
+
+* 1 major enhancement:
+  * Initial release

data/README.rdoc

@@ -0,0 +1,89 @@
+= basecamp-rb
+
+http://github.com/turingstudio/basecamp-rb/
+
+== DESCRIPTION:
+
+A Ruby gem for working with the Basecamp web-services API.
+
+== FEATURES/PROBLEMS:
+
+
+== SYNOPSIS:
+
+The first thing you need to do is establish a connection to Basecamp. This
+requires your Basecamp site address and your login credentials. Example:
+Basecamp::Base.establish_connection!('your.grouphub.com', 'login', 'password')
+
+m = Basecamp::Message.find(8675309)
+m.title # => 'Jenny'
+
+>> Creating a Resource
+  
+  m = Basecamp::Message.new(:project_id => 1037)
+  m.category_id = 7301
+  m.title = 'Message in a bottle'
+  m.body = 'Another lonely day, with no one here but me'
+  m.save # => true
+
+>> Updating a Resource
+
+  m = Basecamp::Message.find(8675309)
+  m.body = 'Changed'
+  m.save # => true
+ 
+>> Deleting a Resource
+
+  Basecamp::Message.delete(1037)
+
+>> Using the non-REST inteface
+
+# The non-REST interface is accessed via instance methods on the Basecamp
+# class. Ensure you've established a connection, then create a new Basecamp
+# instance and call methods on it. Examples:
+
+  basecamp = Basecamp::Base.new
+
+  basecamp.projects.length      # => 5
+  basecamp.person(93832)        # => #<Record(person)..>
+  basecamp.file_categories(123) # => [#<Record(file-category)>,#<Record..>]
+
+# Object attributes are accessible as methods. Example:
+
+  person = basecamp.person(93832)
+  person.first_name # => "Jason"
+
+ 
+== REQUIREMENTS:
+
+ xml-simple >= 1.0.11
+ activeresource >= 2.2.2
+
+== INSTALL:
+
+gem install turingstudio-basecamp-rb
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 The Turing Studio, Inc.
+
+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/lib/basecamp.rb

@@ -0,0 +1,31 @@
+$:.unshift File.dirname(__FILE__)
+
+require 'yaml'
+require 'date'
+require 'time'
+require 'xmlsimple'
+require 'activeresource'
+
+require 'basecamp/base'
+require 'basecamp/resource'
+require 'basecamp/attachment'
+require 'basecamp/comment'
+require 'basecamp/connection'
+require 'basecamp/message'
+require 'basecamp/record'
+require 'basecamp/time_entry'
+require 'basecamp/todoitem'
+require 'basecamp/todolist'
+
+# A minor hack to let Xml-Simple serialize symbolic keys in hashes
+class Symbol
+  def [](*args)
+    to_s[*args]
+  end
+end
+
+class Hash
+  def to_legacy_xml
+    XmlSimple.xml_out({:request => self}, 'keeproot' => true, 'noattr' => true)
+  end
+end

data/lib/basecamp/attachment.rb

@@ -0,0 +1,53 @@
+module Basecamp
+  class Attachment
+
+     # === Attaching Files to a Resource
+     #
+     # If the resource accepts file attachments, the +attachments+ parameter should
+     # be an array of Basecamp::Attachment objects. Example:
+     #
+     #   a1 = Basecamp::Atachment.create('primary', File.read('primary.doc'))
+     #   a2 = Basecamp::Atachment.create('another', File.read('another.doc'))
+     #
+     #   m = Basecamp::Message.new(:project_id => 1037)
+     #   ...
+     #   m.attachments = [a1, a2]
+     #   m.save # => true
+     #
+       
+     attr_accessor :id, :filename, :content, :content_type
+
+     def self.create(filename, content)
+       returning new(filename, content) do |attachment|
+         attachment.save
+       end
+     end
+
+     def initialize(filename, content, content_type = 'application/octet-stream')
+       @filename, @content, @content_type = filename, content, content_type
+     end
+
+     def attributes
+       { :file => id, :original_filename => filename, :content_type => content_type }
+     end
+
+     def to_xml(options = {})
+       { :file => attributes }.to_xml(options)
+     end
+
+     def inspect
+       to_s
+     end
+
+     def save
+       response = Basecamp::Base.connection.post('/upload', content, 'Content-Type' => content_type)
+
+       if response.code == '200'
+         self.id = Hash.from_xml(response.body)['upload']['id']
+         true
+       else
+         raise "Could not save attachment: #{response.message} (#{response.code})"
+       end
+     end
+  end
+end

data/lib/basecamp/base.rb

@@ -0,0 +1,210 @@
+module Basecamp
+  class Base
+    attr_accessor :use_xml
+
+    class << self
+      attr_reader :site, :user, :password, :use_ssl
+
+      def establish_connection!(site, user, password, use_ssl = false)
+        @site     = site
+        @user     = user
+        @password = password
+        @use_ssl  = use_ssl
+        Resource.user = user
+        Resource.password = password
+        Resource.site = (use_ssl ? "https" : "http") + "://" + site
+        @connection = Connection.new(self)
+      end
+
+      def connection
+        @connection || raise('No connection established')
+      end
+
+    end
+
+    def initialize
+      @use_xml = false
+    end
+
+    # ==========================================================================
+    # GENERAL
+    # ==========================================================================
+
+    # Return the list of all accessible projects
+    def projects
+      records "project", "/project/list"
+    end
+
+    # Returns the list of message categories for the given project
+    def message_categories(project_id)
+      records "post-category", "/projects/#{project_id}/post_categories"
+    end
+
+    # Returns the list of file categories for the given project
+    def file_categories(project_id)
+      records "attachment-category", "/projects/#{project_id}/attachment_categories"
+    end
+
+    # ==========================================================================
+    # CONTACT MANAGEMENT
+    # ==========================================================================
+
+    # Return information for the company with the given id
+    def company(id)
+      record "/contacts/company/#{id}"
+    end
+
+    # Return an array of the people in the given company. If the project-id is
+    # given, only people who have access to the given project will be returned.
+    def people(company_id, project_id=nil)
+      url = project_id ? "/projects/#{project_id}" : ""
+      url << "/contacts/people/#{company_id}"
+      records "person", url
+    end
+
+    # Return information about the person with the given id
+    def person(id)
+      record "/contacts/person/#{id}"
+    end
+
+    # ==========================================================================
+    # MILESTONES
+    # ==========================================================================
+
+    # Complete the milestone with the given id
+    def complete_milestone(id)
+      record "/milestones/complete/#{id}"
+    end
+
+    # Create a new milestone for the given project. +data+ must be hash of the
+    # values to set, including +title+, +deadline+, +responsible_party+, and
+    # +notify+.
+    def create_milestone(project_id, data)
+      create_milestones(project_id, [data]).first
+    end
+
+    # As #create_milestone, but can create multiple milestones in a single
+    # request. The +milestones+ parameter must be an array of milestone values as
+    # descrbed in #create_milestone.
+    def create_milestones(project_id, milestones)
+      records "milestone", "/projects/#{project_id}/milestones/create", :milestone => milestones
+    end
+
+    # Destroys the milestone with the given id.
+    def delete_milestone(id)
+      record "/milestones/delete/#{id}"
+    end
+
+    # Returns a list of all milestones for the given project, optionally filtered
+    # by whether they are completed, late, or upcoming.
+    def milestones(project_id, find="all")
+      records "milestone", "/projects/#{project_id}/milestones/list", :find => find
+    end
+
+    # Uncomplete the milestone with the given id
+    def uncomplete_milestone(id)
+      record "/milestones/uncomplete/#{id}"
+    end
+
+    # Updates an existing milestone.
+    def update_milestone(id, data, move=false, move_off_weekends=false)
+      record "/milestones/update/#{id}", :milestone => data,
+      :move_upcoming_milestones => move,
+        :move_upcoming_milestones_off_weekends => move_off_weekends
+    end
+
+    private
+
+    # Make a raw web-service request to Basecamp. This will return a Hash of
+    # Arrays of the response, and may seem a little odd to the uninitiated.
+    def request(path, parameters = {})
+      response = Base.connection.post(path, convert_body(parameters), "Content-Type" => content_type)
+
+      if response.code.to_i / 100 == 2
+        result = XmlSimple.xml_in(response.body, 'keeproot' => true, 'contentkey' => '__content__', 'forcecontent' => true)
+        typecast_value(result)
+      else
+        raise "#{response.message} (#{response.code})"
+      end
+    end
+
+    # A convenience method for wrapping the result of a query in a Record
+    # object. This assumes that the result is a singleton, not a collection.
+    def record(path, parameters={})
+      result = request(path, parameters)
+      (result && !result.empty?) ? Record.new(result.keys.first, result.values.first) : nil
+    end
+
+    # A convenience method for wrapping the result of a query in Record
+    # objects. This assumes that the result is a collection--any singleton
+    # result will be wrapped in an array.
+    def records(node, path, parameters={})
+      result = request(path, parameters).values.first or return []
+      result = result[node] or return []
+      result = [result] unless Array === result
+      result.map { |row| Record.new(node, row) }
+    end
+
+    def convert_body(body)
+      body = use_xml ? body.to_legacy_xml : body.to_yaml
+    end
+
+    def content_type
+      use_xml ? "application/xml" : "application/x-yaml"
+    end
+
+    def typecast_value(value)
+      case value
+      when Hash
+        if value.has_key?("__content__")
+          content = translate_entities(value["__content__"]).strip
+          case value["type"]
+          when "integer"  then content.to_i
+          when "boolean"  then content == "true"
+          when "datetime" then Time.parse(content)
+          when "date"     then Date.parse(content)
+          else                 content
+          end
+          # a special case to work-around a bug in XmlSimple. When you have an empty
+          # tag that has an attribute, XmlSimple will not add the __content__ key
+          # to the returned hash. Thus, we check for the presense of the 'type'
+          # attribute to look for empty, typed tags, and simply return nil for
+          # their value.
+        elsif value.keys == %w(type)
+          nil
+        elsif value["nil"] == "true"
+          nil
+          # another special case, introduced by the latest rails, where an array
+          # type now exists. This is parsed by XmlSimple as a two-key hash, where
+          # one key is 'type' and the other is the actual array value.
+        elsif value.keys.length == 2 && value["type"] == "array"
+          value.delete("type")
+          typecast_value(value)
+        else
+          value.empty? ? nil : value.inject({}) do |h,(k,v)|
+            h[k] = typecast_value(v)
+            h
+          end
+        end
+      when Array
+        value.map! { |i| typecast_value(i) }
+        case value.length
+        when 0 then nil
+        when 1 then value.first
+        else value
+        end
+      else
+        raise "can't typecast #{value.inspect}"
+      end
+    end
+
+    def translate_entities(value)
+      value.gsub(/&lt;/, "<").
+        gsub(/&gt;/, ">").
+        gsub(/&quot;/, '"').
+        gsub(/&apos;/, "'").
+        gsub(/&amp;/, "&")
+    end 
+  end
+end
+

data/lib/basecamp/comment.rb

@@ -0,0 +1,23 @@
+# == Creating Comments for Multiple Resources
+#
+# Comments can be created for messages, milestones, and to-dos, identified
+# by the <tt>post_id</tt>, <tt>milestone_id</tt>, and <tt>todo_item_id</tt>
+# params respectively.
+#
+# For example, to create a comment on the message with id #8675309:
+#
+#   c = Basecamp::Comment.new(:post_id => 8675309)
+#   c.body = 'Great tune'
+#   c.save # => true
+#
+# Similarly, to create a comment on a milestone:
+#
+#   c = Basecamp::Comment.new(:milestone_id => 8473647)
+#   c.body = 'Is this done yet?'
+#   c.save # => true
+#
+module Basecamp
+  class Comment < Resource
+    parent_resources :post, :milestone, :todo_item
+  end
+end

data/lib/basecamp/connection.rb

@@ -0,0 +1,16 @@
+module Basecamp
+  class Connection #:nodoc:
+    def initialize(master)
+      @master = master
+      @connection = Net::HTTP.new(master.site, master.use_ssl ? 443 : 80)
+      @connection.use_ssl = master.use_ssl
+      @connection.verify_mode = OpenSSL::SSL::VERIFY_NONE if master.use_ssl
+    end
+
+    def post(path, body, headers = {})
+      request = Net::HTTP::Post.new(path, headers.merge('Accept' => 'application/xml'))
+      request.basic_auth(@master.user, @master.password)
+      @connection.request(request, body)
+    end
+  end
+end

data/lib/basecamp/message.rb

@@ -0,0 +1,32 @@
+module Basecamp
+  class Message < Resource
+    parent_resources :project
+    self.element_name = 'post'
+
+    # Returns the most recent 25 messages in the given project (and category,
+    # if specified). If you need to retrieve older messages, use the archive
+    # method instead. Example:
+    #
+    #   Basecamp::Message.list(1037)
+    #   Basecamp::Message.list(1037, :category_id => 7301)
+    #
+    def self.list(project_id, options = {})
+      find(:all, :params => options.merge(:project_id => project_id))
+    end
+
+    # Returns a summary of all messages in the given project (and category, if
+    # specified). The summary is simply the title and category of the message,
+    # as well as the number of attachments (if any). Example:
+    #
+    #   Basecamp::Message.archive(1037)
+    #   Basecamp::Message.archive(1037, :category_id => 7301)
+    #
+    def self.archive(project_id, options = {})
+      find(:all, :params => options.merge(:project_id => project_id), :from => :archive)
+    end
+
+    def comments(options = {})
+      @comments ||= Comment.find(:all, :params => options.merge(:post_id => id))
+    end
+  end
+end

data/lib/basecamp/record.rb

@@ -0,0 +1,58 @@
+module Basecamp
+  class Record #:nodoc:
+    attr_reader :type
+
+    def initialize(type, hash)
+      @type, @hash = type, hash
+    end
+
+    def [](name)
+      name = dashify(name)
+
+      case @hash[name]
+      when Hash then
+        @hash[name] = if (@hash[name].keys.length == 1 && @hash[name].values.first.is_a?(Array))
+          @hash[name].values.first.map { |v| Record.new(@hash[name].keys.first, v) }
+        else
+          Record.new(name, @hash[name])
+        end
+      else
+        @hash[name]
+      end
+    end
+
+    def id
+      @hash['id']
+    end
+
+    def attributes
+      @hash.keys
+    end
+
+    def respond_to?(sym)
+      super || @hash.has_key?(dashify(sym))
+    end
+
+    def method_missing(sym, *args)
+      if args.empty? && !block_given? && respond_to?(sym)
+        self[sym]
+      else
+        super
+      end
+    end
+
+    def to_s
+      "\#<Record(#{@type}) #{@hash.inspect[1..-2]}>"
+    end
+
+    def inspect
+      to_s
+    end
+
+    private
+
+    def dashify(name)
+      name.to_s.tr("_", "-")
+    end
+  end
+end

data/lib/basecamp/resource.rb

@@ -0,0 +1,29 @@
+module Basecamp
+  class Resource < ActiveResource::Base #:nodoc:
+    class << self
+      def parent_resources(*parents)
+        @parent_resources = parents
+      end
+
+      def element_name
+        name.split(/::/).last.underscore
+      end
+
+      def prefix_source
+        @parent_resources.map { |resource| "/#{resource.to_s.pluralize}/:#{resource}_id/" }.join
+      end
+
+      def prefix(options={})
+        if options.any?
+          options.map { |name, value| "/#{name.to_s.chomp('_id').pluralize}/#{value}/" }.join
+        else
+          super
+        end
+      end
+    end
+
+    def prefix_options
+      id ? {} : super
+    end
+  end
+end

data/lib/basecamp/time_entry.rb

@@ -0,0 +1,17 @@
+module Basecamp
+  class TimeEntry < Resource
+    parent_resources :project, :todo_item
+
+    def self.all(project_id, page=0)
+      find(:all, :params => { :project_id => project_id, :page => page })
+    end
+
+    def self.report(options={})
+      find(:all, :from => :report, :params => options)
+    end
+
+    def todo_item(options={})
+      @todo_item ||= todo_item_id && TodoItem.find(todo_item_id, options)
+    end    
+  end
+end

data/lib/basecamp/todoitem.rb

@@ -0,0 +1,25 @@
+module Basecamp
+  class TodoItem < Resource
+    parent_resources :todo_list
+
+    def todo_list(options={})
+      @todo_list ||= TodoList.find(todo_list_id, options)
+    end
+
+    def time_entries(options={})
+      @time_entries ||= TimeEntry.find(:all, :params => options.merge(:todo_item_id => id))
+    end
+
+    def comments(options = {})
+      @comments ||= Comment.find(:all, :params => options.merge(:todo_item_id => id))
+    end
+
+    def complete!
+      put(:complete)
+    end
+
+    def uncomplete!
+      put(:uncomplete)
+    end
+  end
+end

data/lib/basecamp/todolist.rb

@@ -0,0 +1,22 @@
+module Basecamp
+  class TodoList < Resource
+    parent_resources :project
+
+    # Returns all lists for a project. If complete is true, only completed lists
+    # are returned. If complete is false, only uncompleted lists are returned.
+    def self.all(project_id, complete=nil)
+      filter = case complete
+        when nil   then "all"
+        when true  then "finished"
+        when false then "pending"
+        else raise ArgumentError, "invalid value for `complete'"
+      end
+
+      find(:all, :params => { :project_id => project_id, :filter => filter })
+    end
+
+    def todo_items(options={})
+      @todo_items ||= TodoItem.find(:all, :params => options.merge(:todo_list_id => id))
+    end
+  end
+end

data/lib/basecamp/version.rb

@@ -0,0 +1,3 @@
+module Basecamp #:nodoc:
+  VERSION = '0.0.1'
+end

data/spec/basecamp_spec.rb

@@ -0,0 +1,61 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+require File.dirname(__FILE__) + '/../lib/basecamp.rb'
+
+describe Basecamp do
+  
+  before(:each) do
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+    @basecamp = Basecamp::Base.new
+  end
+
+  describe "Creating a resource" do
+    it "should create a comment for post" do
+      comment = Basecamp::Comment.new(:post_id => 15797423)
+      comment.body = "test comment"
+      comment.save
+      c = Basecamp::Comment.find(comment.id)
+      c.body.should == "test comment"
+      c.id.should == comment.id.to_i
+    end 
+  end
+  
+  describe "Finding a resource" do 
+    it "should find message" do
+      message = Basecamp::Message.find(15797423)
+      message.body.should_not be_blank
+      message.category_id.should_not be_blank
+    end
+  end
+
+  describe "Updating a Resource" do 
+    it "should update message" do
+      m = Basecamp::Message.find(15797423)
+      m.body = 'Changed'
+      m.save
+      message = Basecamp::Message.find(15797423)
+      message.body.should == 'Changed' 
+    end    
+  end
+  
+  describe "Deleting a Resource" do
+    it "should delete todo item" do
+      todo = Basecamp::TodoItem.create(:todo_list_id => 4501767, :content => 'Todo for destroy')
+      Basecamp::TodoItem.delete(todo.id)
+    end
+  end
+
+  describe "Using the non-REST inteface" do   
+    it "should return array of projects" do
+      @basecamp.projects.should be_kind_of(Array)
+    end
+
+    it "should return valid project with name" do
+     @basecamp.projects.first.name.should_not be_empty
+    end
+    
+    it "should find person" do
+      person = @basecamp.person(2926255)
+      person.should_not be_blank
+    end
+  end
+end

data/spec/lib/basecamp_base.rb

@@ -0,0 +1,75 @@
+require File.dirname(__FILE__) + '/../spec_helper.rb'
+require File.dirname(__FILE__) + '/../../lib/basecamp.rb'
+
+describe Basecamp::Base do
+  
+  before(:each) do
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+    @basecamp = Basecamp::Base.new
+  end
+
+  it "should return the list of all accessible projects" do
+    @basecamp.projects.should_not be_blank
+    @basecamp.projects.should be_kind_of(Array)
+  end
+
+  it "should return valid project with name" do
+    @basecamp.projects.first.name.should_not be_empty
+  end
+    
+  it "should find person" do
+    person = @basecamp.person(2926255)
+    person.should_not be_blank
+  end
+  
+  it "should return the list of message categories for the given project" do
+    categories = @basecamp.message_categories(2388627)
+    categories.should_not be_blank
+    categories.should be_kind_of(Array)
+  end
+  
+  # CONTACT MANAGEMENT
+  
+  it "should return information for the company with the given id" do
+    company = @basecamp.company(1098114)
+    company.should_not be_blank
+  end
+  
+  it "should return an array of the people in the given company" do
+    people = @basecamp.people(1098114)
+    people.should_not be_blank
+    people.should be_kind_of(Array)
+  end
+  
+  it "should return information about the person with the given id" do
+    @basecamp.person(2926255).should_not be_nil
+  end
+  
+  # MILESTONES
+ 
+  it "should return a list of all milestones for the given project" do
+    milestones = @basecamp.milestones(2388627)
+    milestones.should be_kind_of(Array)
+    milestones.should_not be_blank
+  end
+
+  it "should complete milestone with the given id" do
+    milestone = @basecamp.milestones(2388627).first
+    @basecamp.complete_milestone(milestone.id)
+   
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+
+    milestone = @basecamp.milestones(2388627).first
+    milestone.completed.should == true
+  end
+
+  it "should uncomplete milestone with the given id" do
+    milestone = @basecamp.milestones(2388627).first
+    @basecamp.uncomplete_milestone(milestone.id)
+   
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+
+    milestone = @basecamp.milestones(2388627).first
+    milestone.completed.should == false
+  end
+end

data/spec/lib/basecamp_message_spec.rb

@@ -0,0 +1,42 @@
+require File.dirname(__FILE__) + '/../spec_helper.rb'
+require File.dirname(__FILE__) + '/../../lib/basecamp.rb'
+
+describe Basecamp::Message do
+  
+  before(:each) do
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+  end
+
+  it "should return the most recent 25 messages in the given project" do
+    messages = Basecamp::Message.list(2388627)
+    messages.should_not be_blank
+    messages.should be_kind_of(Array)
+    messages.size.should_not > 25
+  end
+
+  it "should get a list of messages for given project and specified category" do
+    messages = Basecamp::Message.list(2388627, :category_id => 23864732)
+    messages.should_not be_blank
+    messages.should be_kind_of(Array)
+    messages.each{ |m| m.category_id.should == 23864732 }
+  end
+  
+  it "should return a summary of all messages in the given project" do
+    messages = Basecamp::Message.archive(2388627)
+    messages.should_not be_blank
+    messages.should be_kind_of(Array)
+  end
+
+  it "should return a summary of all messages in the given project and specified category " do
+    messages = Basecamp::Message.archive(2388627, :category_id => 23864732)
+    messages.should_not be_blank
+    messages.should be_kind_of(Array)
+  end
+  
+  it "should return list of message comments" do
+    message = Basecamp::Message.find(15797423)
+    comments = message.comments
+    comments.should_not be_blank
+    comments.should be_kind_of(Array)
+  end
+end

data/spec/lib/basecamp_todo_item_spec.rb

@@ -0,0 +1,40 @@
+require File.dirname(__FILE__) + '/../spec_helper.rb'
+require File.dirname(__FILE__) + '/../../lib/basecamp.rb'
+
+describe Basecamp::TodoItem do
+  
+  before(:each) do
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+  end
+
+  it "should have todo list" do
+    todo  = Basecamp::TodoItem.find(32416216)
+    todo.todo_list.should_not be_blank
+  end
+ 
+  it "should return list of comments" do
+    todo  = Basecamp::TodoItem.find(32416216)
+    todo.comments.should_not be_blank
+    todo.comments.should be_kind_of(Array)
+  end
+
+  it "should complete todo item" do
+    todo  = Basecamp::TodoItem.find(32416216)
+    todo.complete!
+   
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+
+    todo  = Basecamp::TodoItem.find(32416216)
+    todo.completed.should == true
+  end
+
+  it "should uncomplete todo item" do
+    todo  = Basecamp::TodoItem.find(32416216)
+    todo.uncomplete!
+   
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+
+    todo  = Basecamp::TodoItem.find(32416216)
+    todo.completed.should == false
+  end 
+end

data/spec/lib/basecamp_todo_list_spec.rb

@@ -0,0 +1,32 @@
+require File.dirname(__FILE__) + '/../spec_helper.rb'
+require File.dirname(__FILE__) + '/../../lib/basecamp.rb'
+
+describe Basecamp::TodoList do
+  
+  before(:each) do
+    Basecamp::Base.establish_connection!('flatsoft-test.grouphub.com', 'flatsoft', '123456')
+  end
+
+  it "should return todo items" do
+    list = Basecamp::TodoList.find(4501767)
+    list.todo_items.should_not be_blank
+    list.todo_items.should be_kind_of(Array)
+  end  
+  
+  it "should return all lists for a specified project" do
+    list = Basecamp::TodoList.all(2388627)
+    list.should_not be_blank
+  end
+ 
+  it "should return all finished lists for a specified project" do
+    list = Basecamp::TodoList.all(2388627, true)
+    list.should_not be_blank
+    list.each { |item| item.complete.should == "true" }
+  end
+ 
+  it "should return all pending lists for a specified project" do
+    list = Basecamp::TodoList.all(2388627, false)
+    list.should_not be_blank
+    list.each { |item| item.complete.should == "false" }
+  end
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--color

data/spec/spec_helper.rb

@@ -0,0 +1,7 @@
+begin
+  require 'spec'
+rescue LoadError
+  require 'rubygems'
+  gem 'rspec'
+  require 'spec'
+end

data/tasks/rspec.rake

@@ -0,0 +1,33 @@
+begin
+  require 'spec'
+rescue LoadError
+  require 'rubygems'
+  require 'spec'
+end
+begin
+  require 'spec/rake/spectask'
+rescue LoadError
+  puts <<-EOS
+To use rspec for testing you must install rspec gem:
+    gem install rspec
+EOS
+  exit(0)
+end
+
+desc "Run the specs under spec/models"
+Spec::Rake::SpecTask.new do |t|
+  t.spec_opts = ['--options', "spec/spec.opts"]
+  t.spec_files = FileList['spec/*_spec.rb']
+end
+
+namespace :spec do
+  desc "Run all specs in spec directory with RCov (excluding plugin specs)"
+  Spec::Rake::SpecTask.new(:rcov) do |t|
+    t.spec_opts = ['--options', '"spec/spec.opts"']
+    t.spec_files = FileList['spec/**/*_spec.rb']
+    t.rcov = true
+    t.rcov_opts = lambda do
+      IO.readlines('spec/rcov.opts').map {|l| l.chomp.split " "}.flatten
+    end
+  end
+end

metadata

@@ -0,0 +1,94 @@
+--- !ruby/object:Gem::Specification 
+name: turingstudio-basecamp-rb
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- The Turing Studio, Inc.
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-02-25 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: xml-simple
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.0.11
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: activeresource
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.2.2
+    version: 
+description: FIX (describe your package)
+email: 
+- operations@turingstudio.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.rdoc
+files: 
+- History.txt
+- README.rdoc
+- lib/basecamp.rb
+- lib/basecamp/base.rb
+- lib/basecamp/version.rb
+- lib/basecamp/resource.rb
+- lib/basecamp/attachment.rb
+- lib/basecamp/comment.rb
+- lib/basecamp/connection.rb
+- lib/basecamp/message.rb
+- lib/basecamp/record.rb
+- lib/basecamp/time_entry.rb
+- lib/basecamp/todoitem.rb
+- lib/basecamp/todolist.rb
+- spec/basecamp_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+- spec/lib/basecamp_base.rb
+- spec/lib/basecamp_message_spec.rb
+- spec/lib/basecamp_todo_item_spec.rb
+- spec/lib/basecamp_todo_list_spec.rb
+- tasks/rspec.rake
+has_rdoc: true
+homepage: http://github.com/turingstudio/basecamp-rb/
+post_install_message: 
+rdoc_options: []
+
+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: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: FIX (describe your package)
+test_files: []
+