pyre 0.1.0

data/History.txt

@@ -0,0 +1,4 @@
+== 0.1.0 / 2008-02-15
+
+* 1 major enhancement
+  * Existence

data/Manifest.txt

@@ -0,0 +1,19 @@
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+lib/pyre.rb
+lib/pyre/campfire.rb
+lib/pyre/room.rb
+spec/pyre_spec.rb
+spec/spec_helper.rb
+tasks/annotations.rake
+tasks/doc.rake
+tasks/gem.rake
+tasks/manifest.rake
+tasks/post_load.rake
+tasks/rubyforge.rake
+tasks/setup.rb
+tasks/spec.rake
+tasks/svn.rake
+tasks/test.rake

data/README.txt

@@ -0,0 +1,67 @@
+= pyre
+    by Christopher Shea
+    http://pyre.rubyforge.org/
+
+== DESCRIPTION:
+
+Pyre is a library for interacting with Campfire, the web-based group chat site from 37signals.
+
+Pyre owes a great deal of debt to Tinder (http://tinder.rubyforge.org)
+
+== FEATURES/PROBLEMS:
+
+Features:
+* Speak in a Campfire room!
+* Paste in a Campfire room!
+* More reliable determination of whether your login was successful than Tinder!
+
+Problems:
+* No public tests (I have them on my box, but you can't see them (passwords!))
+* No listening (yet)
+
+Patches awfully welcome.
+
+== SYNOPSIS:
+
+  require 'rubygems'
+  require 'pyre'
+  
+  campfire = Pyre::Campfire.new('pyre')
+  campfire.login('mycoolemail@example.com', 'anactualpassword')
+  room = campfire.find_room_by_name('Pyre Test')
+  room.speak('ZOMG! It works!')   # automatically joins the room
+  room.leave
+  campfire.logout
+
+== REQUIREMENTS:
+
+* mechanize (WWW::Mechanize)
+
+== INSTALL:
+
+* sudo gem install pyre
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008
+
+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/Rakefile

@@ -0,0 +1,20 @@
+# Look in the tasks/setup.rb file for the various options that can be
+# configured in this Rakefile. The .rake files in the tasks directory
+# are where the options are used.
+
+load 'tasks/setup.rb'
+
+ensure_in_path 'lib'
+require 'pyre'
+
+task :default => 'spec:run'
+
+PROJ.name = 'pyre'
+PROJ.authors = 'Christopher Shea'
+PROJ.email = 'chris@ruby.tie-rack.org'
+PROJ.url = 'http://pyre.rubyforge.org'
+PROJ.rubyforge_name = 'pyre'
+
+PROJ.spec_opts << '--color'
+
+depend_on('mechanize')

data/lib/pyre.rb

@@ -0,0 +1,24 @@
+# Pyre: Because there isn't a real API for Campfire.
+module Pyre
+  # :stopdoc:
+  VERSION = '0.1.0'
+  LIBPATH = ::File.expand_path(::File.dirname(__FILE__)) + ::File::SEPARATOR
+  PATH = ::File.dirname(LIBPATH) + ::File::SEPARATOR
+  # :startdoc:
+
+  # Returns the version string for the library.
+  #
+  def self.version
+    VERSION
+  end
+end
+
+require 'uri'
+begin
+  require 'mechanize'
+rescue LoadError
+  require 'rubygems'
+  require 'mechanize'
+end
+require 'pyre/campfire'
+require 'pyre/room'

data/lib/pyre/campfire.rb

@@ -0,0 +1,60 @@
+module Pyre
+  # Pyre::Campfire is for general Campfire tasks. Logging in, logging out, and finding rooms.
+  class Campfire
+    attr_reader :subdomain, :uri, :agent
+    
+    # Create a new Pyre::Campfire object.
+    # Pass in your subdomain and maybe some options.
+    # Of course, the only option is whether or not to use ssl.
+    # Pass along <tt>:ssl => true</tt> if you need it.
+    def initialize(subdomain, options={})
+      @subdomain = subdomain
+      protocol   = 'http'
+      protocol  << 's' if options[:ssl]
+      @uri       = "#{protocol}://#{subdomain}.campfirenow.com"
+      @agent     = WWW::Mechanize.new
+    end
+    
+    # Login with the supplied credentials. Returns true on success.
+    def login(email, password)
+      page = @agent.get(@uri + '/login')
+      login_form = page.forms.first
+      login_form.fields.name('email_address').value = email
+      login_form.fields.name('password').value      = password
+      @agent.submit(login_form)
+      logged_in?
+    end
+    
+    # Log out. Returns true on success.
+    def logout
+      page = @agent.get(@uri + '/logout')
+      not logged_in?
+    end
+    
+    def logged_in?
+      @agent.current_page.links.any? {|link| link.text == 'Logout'} rescue false
+    end
+    
+    # Get a list of all the rooms as Pyre::Room objects.
+    def rooms
+      if logged_in?
+        @agent.get(@uri)
+        @rooms = @agent.current_page.parser.search('div[@id="rooms"]//h2').map do |h2|
+          name = h2.inner_text.strip
+          url  = h2.at('a')[:href]
+          Pyre::Room.new(name, url, self)
+        end
+      end
+    end
+    
+    # Know the name of the room you're looking for? Try it here.
+    def find_room_by_name(name)
+      @rooms ||= rooms
+      @rooms.detect {|room| room.name == name}
+    end
+    
+    def inspect #:nodoc:
+      "#<#{self.class} \"#{@subdomain}\" \"#{uri}\">"
+    end
+  end
+end

data/lib/pyre/room.rb

@@ -0,0 +1,60 @@
+module Pyre
+  # Pyre::Room is for interacting with a room!
+  class Room
+    attr_reader :name
+    
+    def initialize(name, url, campfire) #:nodoc:
+      @name     = name
+      @url      = url
+      @campfire = campfire
+    end
+    
+    # Enter the room. Returns true on success.
+    def join
+      @campfire.agent.get(@url)
+      joined?
+    end
+    
+    # Leave the room. Returns true on success.
+    def leave
+      if joined?
+        leave = @campfire.agent.current_page.links.detect {|link| link.text == 'Leave'}
+        @campfire.agent.post(leave.uri)
+        not joined?
+      end
+    end
+    
+    # If you're in the room right now.
+    def joined?
+      @campfire.agent.current_page.at('h1[@id="room_name"]').inner_text == @name rescue false
+    end
+    
+    # Send +message+ to the room. Joins the room if necessary. 
+    def speak(message)
+      result = submit_chat_form(message)
+      success = (result.uri.to_s == "#{@url}/speak")
+      join
+      success
+    end
+    
+    # Paste +message+ to the room. Joins the room if necessary.
+    def paste(message)
+      result = submit_chat_form(message, 'paste' => 'true')
+      success = (result.links.detect {|link| link.text == 'View paste'} and result.uri.to_s == "#{@url}/speak")
+      join
+      success
+    end
+    
+    def inspect #:nodoc:
+      "#<#{self.class} \"#{@name}\" \"#{@url}\">"
+    end
+    
+    protected
+    
+    def submit_chat_form(message, options={}) #:nodoc:
+      join unless joined?
+      speak_form = @campfire.agent.current_page.forms.detect {|form| form.form_node[:id] == 'chat_form'}
+      @campfire.agent.post(@url + '/speak', {'message' => message, 't' => Time.now.to_i.to_s}.merge(options))
+    end
+  end
+end

data/spec/pyre_spec.rb

@@ -0,0 +1,8 @@
+# $Id$
+
+require File.join(File.dirname(__FILE__), %w[spec_helper])
+
+describe Pyre do
+end
+
+# EOF

data/spec/spec_helper.rb

@@ -0,0 +1,17 @@
+# $Id$
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), %w[.. lib pyre]))
+
+Spec::Runner.configure do |config|
+  # == Mock Framework
+  #
+  # RSpec uses it's own mocking framework by default. If you prefer to
+  # use mocha, flexmock or RR, uncomment the appropriate line:
+  #
+  # config.mock_with :mocha
+  # config.mock_with :flexmock
+  # config.mock_with :rr
+end
+
+# EOF

data/tasks/annotations.rake

@@ -0,0 +1,30 @@
+# $Id$
+
+if HAVE_BONES
+
+desc "Enumerate all annotations"
+task :notes do
+  Bones::AnnotationExtractor.enumerate(
+      PROJ, "OPTIMIZE|FIXME|TODO", :tag => true)
+end
+
+namespace :notes do
+  desc "Enumerate all OPTIMIZE annotations"
+  task :optimize do
+    Bones::AnnotationExtractor.enumerate(PROJ, "OPTIMIZE")
+  end
+
+  desc "Enumerate all FIXME annotations"
+  task :fixme do
+    Bones::AnnotationExtractor.enumerate(PROJ, "FIXME")
+  end
+
+  desc "Enumerate all TODO annotations"
+  task :todo do
+    Bones::AnnotationExtractor.enumerate(PROJ, "TODO")
+  end
+end
+
+end  # if HAVE_BONES
+
+# EOF

data/tasks/doc.rake

@@ -0,0 +1,49 @@
+# $Id$
+
+require 'rake/rdoctask'
+
+namespace :doc do
+
+  desc 'Generate RDoc documentation'
+  Rake::RDocTask.new do |rd|
+    rd.main = PROJ.rdoc_main
+    rd.rdoc_dir = PROJ.rdoc_dir
+
+    incl = Regexp.new(PROJ.rdoc_include.join('|'))
+    excl = Regexp.new(PROJ.rdoc_exclude.join('|'))
+    files = PROJ.files.find_all do |fn|
+              case fn
+              when excl; false
+              when incl; true
+              else false end
+            end
+    rd.rdoc_files.push(*files)
+
+    title = "#{PROJ.name}-#{PROJ.version} Documentation"
+    title = "#{PROJ.rubyforge_name}'s " + title if PROJ.rubyforge_name != title
+
+    rd.options << "-t #{title}"
+    rd.options.concat(PROJ.rdoc_opts)
+  end
+
+  desc 'Generate ri locally for testing'
+  task :ri => :clobber_ri do
+    sh "#{RDOC} --ri -o ri ."
+  end
+
+  desc 'Remove ri products'
+  task :clobber_ri do
+    rm_r 'ri' rescue nil
+  end
+
+end  # namespace :doc
+
+desc 'Alias to doc:rdoc'
+task :doc => 'doc:rdoc'
+
+desc 'Remove all build products'
+task :clobber => %w(doc:clobber_rdoc doc:clobber_ri)
+
+remove_desc_for_task %w(doc:clobber_rdoc doc:clobber_ri)
+
+# EOF

data/tasks/gem.rake

@@ -0,0 +1,89 @@
+# $Id$
+
+require 'rake/gempackagetask'
+
+namespace :gem do
+
+  PROJ.spec = Gem::Specification.new do |s|
+    s.name = PROJ.name
+    s.version = PROJ.version
+    s.summary = PROJ.summary
+    s.authors = Array(PROJ.authors)
+    s.email = PROJ.email
+    s.homepage = Array(PROJ.url).first
+    s.rubyforge_project = PROJ.rubyforge_name
+
+    s.description = PROJ.description
+
+    PROJ.dependencies.each do |dep|
+      s.add_dependency(*dep)
+    end
+
+    s.files = PROJ.files
+    s.executables = PROJ.executables.map {|fn| File.basename(fn)}
+    s.extensions = PROJ.files.grep %r/extconf\.rb$/
+
+    s.bindir = 'bin'
+    dirs = Dir["{#{PROJ.libs.join(',')}}"]
+    s.require_paths = dirs unless dirs.empty?
+
+    incl = Regexp.new(PROJ.rdoc_include.join('|'))
+    excl = PROJ.rdoc_exclude.dup.concat %w[\.rb$ ^(\.\/|\/)?ext]
+    excl = Regexp.new(excl.join('|'))
+    rdoc_files = PROJ.files.find_all do |fn|
+                   case fn
+                   when excl; false
+                   when incl; true
+                   else false end
+                 end
+    s.rdoc_options = PROJ.rdoc_opts + ['--main', PROJ.rdoc_main]
+    s.extra_rdoc_files = rdoc_files
+    s.has_rdoc = true
+
+    if test ?f, PROJ.test_file
+      s.test_file = PROJ.test_file
+    else
+      s.test_files = PROJ.tests.to_a
+    end
+
+    # Do any extra stuff the user wants
+#   spec_extras.each do |msg, val|
+#     case val
+#     when Proc
+#       val.call(s.send(msg))
+#     else
+#       s.send "#{msg}=", val
+#     end
+#   end
+  end
+
+  desc 'Show information about the gem'
+  task :debug do
+    puts PROJ.spec.to_ruby
+  end
+
+  Rake::GemPackageTask.new(PROJ.spec) do |pkg|
+    pkg.need_tar = PROJ.need_tar
+    pkg.need_zip = PROJ.need_zip
+  end
+
+  desc 'Install the gem'
+  task :install => [:clobber, :package] do
+    sh "#{SUDO} #{GEM} install pkg/#{PROJ.spec.full_name}"
+  end
+
+  desc 'Uninstall the gem'
+  task :uninstall do
+    sh "#{SUDO} #{GEM} uninstall -v '#{PROJ.version}' -x #{PROJ.name}"
+  end
+
+end  # namespace :gem
+
+desc 'Alias to gem:package'
+task :gem => 'gem:package'
+
+task :clobber => 'gem:clobber_package'
+
+remove_desc_for_task %w(gem:clobber_package)
+
+# EOF

data/tasks/manifest.rake

@@ -0,0 +1,55 @@
+# $Id$
+
+require 'find'
+
+namespace :manifest do
+
+  desc 'Verify the manifest'
+  task :check do
+    fn = 'Manifest.tmp'
+    files = []
+    exclude = Regexp.new(PROJ.exclude.join('|'))
+    Find.find '.' do |path|
+      path.sub! %r/^(\.\/|\/)/o, ''
+      next unless test ?f, path
+      next if path =~ exclude
+      files << path
+    end
+
+    File.open(fn, 'w') {|fp| fp.puts files.sort}
+    lines = %x(#{DIFF} -du Manifest.txt #{fn}).split("\n")
+    if HAVE_FACETS_ANSICODE and ENV.has_key?('TERM')
+      lines.map! do |line|
+        case line
+        when %r/^(-{3}|\+{3})/; nil
+        when %r/^@/; Console::ANSICode.blue line
+        when %r/^\+/; Console::ANSICode.green line
+        when %r/^\-/; Console::ANSICode.red line
+        else line end
+      end
+    end
+    puts lines.compact
+    rm fn rescue nil
+  end
+
+  desc 'Create a new manifest'
+  task :create do
+    fn = 'Manifest.txt'
+    files = []
+    exclude = Regexp.new(PROJ.exclude.join('|'))
+    Find.find '.' do |path|
+      path.sub! %r/^(\.\/|\/)/o, ''
+      next unless test ?f, path
+      next if path =~ exclude
+      files << path
+    end
+
+    files << fn unless test ?f, fn
+    File.open(fn, 'w') {|fp| fp.puts files.sort}
+  end
+end  # namespace :manifest
+
+desc 'Alias to manifest:check'
+task :manifest => 'manifest:check'
+
+# EOF

data/tasks/post_load.rake

@@ -0,0 +1,18 @@
+# $Id$
+
+# This file does not define any rake tasks. It is used to load some project
+# settings if they are not defined by the user.
+
+unless PROJ.changes
+  PROJ.changes = paragraphs_of('History.txt', 0..1).join("\n\n")
+end
+
+unless PROJ.description
+  PROJ.description = paragraphs_of('README.txt', 'description').join("\n\n")
+end
+
+unless PROJ.summary
+  PROJ.summary = PROJ.description.split('.').first
+end
+
+# EOF

data/tasks/rubyforge.rake

@@ -0,0 +1,57 @@
+# $Id$
+
+if PROJ.rubyforge_name && HAVE_RUBYFORGE
+
+require 'rubyforge'
+require 'rake/contrib/sshpublisher'
+
+namespace :gem do
+  desc 'Package and upload to RubyForge'
+  task :release => [:clobber, :package] do |t|
+    v = ENV['VERSION'] or abort 'Must supply VERSION=x.y.z'
+    abort "Versions don't match #{v} vs #{PROJ.version}" if v != PROJ.version
+    pkg = "pkg/#{PROJ.spec.full_name}"
+
+    if $DEBUG then
+      puts "release_id = rf.add_release #{PROJ.rubyforge_name.inspect}, #{PROJ.name.inspect}, #{PROJ.version.inspect}, \"#{pkg}.tgz\""
+      puts "rf.add_file #{PROJ.rubyforge_name.inspect}, #{PROJ.name.inspect}, release_id, \"#{pkg}.gem\""
+    end
+
+    rf = RubyForge.new
+    puts 'Logging in'
+    rf.login
+
+    c = rf.userconfig
+    c['release_notes'] = PROJ.description if PROJ.description
+    c['release_changes'] = PROJ.changes if PROJ.changes
+    c['preformatted'] = true
+
+    files = [(PROJ.need_tar ? "#{pkg}.tgz" : nil),
+             (PROJ.need_zip ? "#{pkg}.zip" : nil),
+             "#{pkg}.gem"].compact
+
+    puts "Releasing #{PROJ.name} v. #{PROJ.version}"
+    rf.add_release PROJ.rubyforge_name, PROJ.name, PROJ.version, *files
+  end
+end  # namespace :gem
+
+
+namespace :doc do
+  desc "Publish RDoc to RubyForge"
+  task :release => %w(doc:clobber_rdoc doc:rdoc) do
+    config = YAML.load(
+        File.read(File.expand_path('~/.rubyforge/user-config.yml'))
+    )
+
+    host = "#{config['username']}@rubyforge.org"
+    remote_dir = "/var/www/gforge-projects/#{PROJ.rubyforge_name}/"
+    remote_dir << PROJ.rdoc_remote_dir if PROJ.rdoc_remote_dir
+    local_dir = PROJ.rdoc_dir
+
+    Rake::SshDirPublisher.new(host, remote_dir, local_dir).upload
+  end
+end  # namespace :doc
+
+end  # if HAVE_RUBYFORGE
+
+# EOF

data/tasks/setup.rb

@@ -0,0 +1,189 @@
+# $Id$
+
+require 'rubygems'
+require 'rake'
+require 'fileutils'
+require 'ostruct'
+
+PROJ = OpenStruct.new
+
+PROJ.name = nil
+PROJ.summary = nil
+PROJ.description = nil
+PROJ.changes = nil
+PROJ.authors = nil
+PROJ.email = nil
+PROJ.url = nil
+PROJ.version = ENV['VERSION'] || '0.0.0'
+PROJ.rubyforge_name = nil
+PROJ.exclude = %w(tmp$ bak$ ~$ CVS .svn/ ^pkg/ ^doc/)
+
+# Rspec
+PROJ.specs = FileList['spec/**/*_spec.rb']
+PROJ.spec_opts = []
+
+# Test::Unit
+PROJ.tests = FileList['test/**/test_*.rb']
+PROJ.test_file = 'test/all.rb'
+PROJ.test_opts = []
+
+# Rcov
+PROJ.rcov_opts = ['--sort', 'coverage', '-T']
+
+# Rdoc
+PROJ.rdoc_opts = []
+PROJ.rdoc_include = %w(^lib/ ^bin/ ^ext/ .txt$)
+PROJ.rdoc_exclude = %w(extconf.rb$ ^Manifest.txt$)
+PROJ.rdoc_main = 'README.txt'
+PROJ.rdoc_dir = 'doc'
+PROJ.rdoc_remote_dir = nil
+
+# Extensions
+PROJ.extensions = FileList['ext/**/extconf.rb']
+PROJ.ruby_opts = %w(-w)
+PROJ.libs = []
+%w(lib ext).each {|dir| PROJ.libs << dir if test ?d, dir}
+
+# Gem Packaging
+PROJ.files =
+  if test ?f, 'Manifest.txt'
+    files = File.readlines('Manifest.txt').map {|fn| fn.chomp.strip}
+    files.delete ''
+    files
+  else [] end
+PROJ.executables = PROJ.files.find_all {|fn| fn =~ %r/^bin/}
+PROJ.dependencies = []
+PROJ.need_tar = true
+PROJ.need_zip = false
+
+# File Annotations
+PROJ.annotation_exclude = []
+PROJ.annotation_extensions = %w(.txt .rb .erb) << ''
+
+# Subversion Repository
+PROJ.svn = false
+PROJ.svn_root = nil
+PROJ.svn_trunk = 'trunk'
+PROJ.svn_tags = 'tags'
+PROJ.svn_branches = 'branches'
+
+# Load the other rake files in the tasks folder
+rakefiles = Dir.glob('tasks/*.rake').sort
+rakefiles.unshift(rakefiles.delete('tasks/post_load.rake')).compact!
+import(*rakefiles)
+
+# Setup some constants
+WIN32 = %r/djgpp|(cyg|ms|bcc)win|mingw/ =~ RUBY_PLATFORM unless defined? WIN32
+
+DEV_NULL = WIN32 ? 'NUL:' : '/dev/null'
+
+def quiet( &block )
+  io = [STDOUT.dup, STDERR.dup]
+  STDOUT.reopen DEV_NULL
+  STDERR.reopen DEV_NULL
+  block.call
+ensure
+  STDOUT.reopen io.first
+  STDERR.reopen io.last
+end
+
+DIFF = if WIN32 then 'diff.exe'
+       else
+         if quiet {system "gdiff", __FILE__, __FILE__} then 'gdiff'
+         else 'diff' end
+       end unless defined? DIFF
+
+SUDO = if WIN32 then ''
+       else
+         if quiet {system 'which sudo'} then 'sudo'
+         else '' end
+       end
+
+RCOV = WIN32 ? 'rcov.cmd'  : 'rcov'
+GEM  = WIN32 ? 'gem.cmd'   : 'gem'
+
+%w(rcov spec/rake/spectask rubyforge bones facets/ansicode).each do |lib|
+  begin
+    require lib
+    Object.instance_eval {const_set "HAVE_#{lib.tr('/','_').upcase}", true}
+  rescue LoadError
+    Object.instance_eval {const_set "HAVE_#{lib.tr('/','_').upcase}", false}
+  end
+end
+
+# Reads a file at +path+ and spits out an array of the +paragraphs+
+# specified.
+#
+#    changes = paragraphs_of('History.txt', 0..1).join("\n\n")
+#    summary, *description = paragraphs_of('README.txt', 3, 3..8)
+#
+def paragraphs_of( path, *paragraphs )
+  title = String === paragraphs.first ? paragraphs.shift : nil
+  ary = File.read(path).delete("\r").split(/\n\n+/)
+
+  result = if title
+    tmp, matching = [], false
+    rgxp = %r/^=+\s*#{Regexp.escape(title)}/i
+    paragraphs << (0..-1) if paragraphs.empty?
+
+    ary.each do |val|
+      if val =~ rgxp
+        break if matching
+        matching = true
+        rgxp = %r/^=+/i
+      elsif matching
+        tmp << val
+      end
+    end
+    tmp
+  else ary end
+
+  result.values_at(*paragraphs)
+end
+
+# Adds the given gem _name_ to the current project's dependency list. An
+# optional gem _version_ can be given. If omitted, the newest gem version
+# will be used.
+#
+def depend_on( name, version = nil )
+  spec = Gem.source_index.find_name(name).last
+  version = spec.version.to_s if version.nil? and !spec.nil?
+
+  PROJ.dependencies << (version.nil? ? [name] : [name, ">= #{version}"])
+end
+
+# Adds the given arguments to the include path if they are not already there
+#
+def ensure_in_path( *args )
+  args.each do |path|
+    path = File.expand_path(path)
+    $:.unshift(path) if test(?d, path) and not $:.include?(path)
+  end
+end
+
+# Find a rake task using the task name and remove any description text. This
+# will prevent the task from being displayed in the list of available tasks.
+#
+def remove_desc_for_task( names )
+  Array(names).each do |task_name|
+    task = Rake.application.tasks.find {|t| t.name == task_name}
+    next if task.nil?
+    task.instance_variable_set :@comment, nil
+  end
+end
+
+# Change working directories to _dir_, call the _block_ of code, and then
+# change back to the original working directory (the current directory when
+# this method was called).
+#
+def in_directory( dir, &block )
+  curdir = pwd
+  begin
+    cd dir
+    return block.call
+  ensure
+    cd curdir
+  end
+end
+
+# EOF

data/tasks/spec.rake

@@ -0,0 +1,43 @@
+# $Id$
+
+if HAVE_SPEC_RAKE_SPECTASK
+
+namespace :spec do
+
+  desc 'Run all specs with basic output'
+  Spec::Rake::SpecTask.new(:run) do |t|
+    t.spec_opts = PROJ.spec_opts
+    t.spec_files = PROJ.specs
+    t.libs += PROJ.libs
+  end
+
+  desc 'Run all specs with text output'
+  Spec::Rake::SpecTask.new(:specdoc) do |t|
+    t.spec_opts = PROJ.spec_opts + ['--format', 'specdoc']
+    t.spec_files = PROJ.specs
+    t.libs += PROJ.libs
+  end
+
+  if HAVE_RCOV
+    desc 'Run all specs with RCov'
+    Spec::Rake::SpecTask.new(:rcov) do |t|
+      t.spec_opts = PROJ.spec_opts
+      t.spec_files = PROJ.specs
+      t.libs += PROJ.libs
+      t.rcov = true
+      t.rcov_opts = PROJ.rcov_opts + ['--exclude', 'spec']
+    end
+  end
+
+end  # namespace :spec
+
+desc 'Alias to spec:run'
+task :spec => 'spec:run'
+
+task :clobber => 'spec:clobber_rcov' if HAVE_RCOV
+
+remove_desc_for_task %w(spec:clobber_rcov)
+
+end  # if HAVE_SPEC_RAKE_SPECTASK
+
+# EOF

data/tasks/svn.rake

@@ -0,0 +1,44 @@
+# $Id$
+
+
+if PROJ.svn and system("svn --version 2>&1 > #{DEV_NULL}")
+
+unless PROJ.svn_root
+  info = %x/svn info ./
+  m = %r/^Repository Root:\s+(.*)$/.match(info)
+  PROJ.svn_root = (m.nil? ? '' : m[1])
+end
+PROJ.svn_root = File.join(PROJ.svn_root, PROJ.svn) if String === PROJ.svn
+
+namespace :svn do
+
+  desc 'Show tags from the SVN repository'
+  task :show_tags do |t|
+    tags = %x/svn list #{File.join(PROJ.svn_root, PROJ.svn_tags)}/
+    tags.gsub!(%r/\/$/, '')
+    puts tags
+  end
+
+  desc 'Create a new tag in the SVN repository'
+  task :create_tag do |t|
+    v = ENV['VERSION'] or abort 'Must supply VERSION=x.y.z'
+    abort "Versions don't match #{v} vs #{PROJ.version}" if v != PROJ.version
+
+    trunk = File.join(PROJ.svn_root, PROJ.svn_trunk)
+    tag = "%s-%s" % [PROJ.name, PROJ.version]
+    tag = File.join(PROJ.svn_root, PROJ.svn_tags, tag)
+    msg = "Creating tag for #{PROJ.name} version #{PROJ.version}"
+
+    puts "Creating SVN tag '#{tag}'"
+    unless system "svn cp -m '#{msg}' #{trunk} #{tag}"
+      abort "Tag creation failed" 
+    end
+  end
+
+end  # namespace :svn
+
+task 'gem:release' => 'svn:create_tag'
+
+end  # if PROJ.svn
+
+# EOF

data/tasks/test.rake

@@ -0,0 +1,40 @@
+# $Id$
+
+require 'rake/testtask'
+
+namespace :test do
+
+  Rake::TestTask.new(:run) do |t|
+    t.libs = PROJ.libs
+    t.test_files = if test ?f, PROJ.test_file then [PROJ.test_file]
+                   else PROJ.tests end
+    t.ruby_opts += PROJ.ruby_opts
+    t.ruby_opts += PROJ.test_opts
+  end
+
+  if HAVE_RCOV
+    desc 'Run rcov on the unit tests'
+    task :rcov => :clobber_rcov do
+      opts = PROJ.rcov_opts.join(' ')
+      files = if test ?f, PROJ.test_file then [PROJ.test_file]
+              else PROJ.tests end
+      files = files.join(' ')
+      sh "#{RCOV} #{files} #{opts}"
+    end
+
+    desc 'Remove rcov products'
+    task :clobber_rcov do
+      rm_r 'coverage' rescue nil
+    end
+  end
+
+end  # namespace :test
+
+desc 'Alias to test:run'
+task :test => 'test:run'
+
+task :clobber => 'test:clobber_rcov' if HAVE_RCOV
+
+remove_desc_for_task %w(test:clobber_rcov)
+
+# EOF

data/test/test_pyre_private.rb

@@ -0,0 +1,53 @@
+require 'test/unit'
+
+require 'pyre'
+
+class TestPyre < Test::Unit::TestCase
+  def setup
+    @pyre_campfire = Pyre::Campfire.new('pyre')
+    @pyre_email    = 'bot@tie-rack.org'
+    @pyre_password = 'pyre99bts'
+  end
+  
+  def login
+    @pyre_campfire.login(@pyre_email, @pyre_password)
+  end
+  
+  def test_001_subdomain
+    assert_equal('pyre', @pyre_campfire.subdomain)
+  end
+  
+  def test_002_uri
+    assert_equal('http://pyre.campfirenow.com', @pyre_campfire.uri)
+  end
+  
+  def test_003_agent
+    assert_kind_of(WWW::Mechanize, @pyre_campfire.instance_variable_get('@agent'))
+  end
+  
+  def test_004_login
+    assert_equal(false, @pyre_campfire.logged_in?)
+    login
+    assert(@pyre_campfire.logged_in?, 'Campfire#login failed.')
+  end
+  
+  def test_005_login_fails_with_bad_credentials
+    assert_equal(false, @pyre_campfire.logged_in?)
+    @pyre_campfire.login('not an email', 'not a password')
+    assert_equal(false, @pyre_campfire.logged_in?, 'Campfire#login succeeded with bad credentials!')
+  end
+  
+  def test_006_rooms
+    login
+    rooms = @pyre_campfire.rooms
+    assert_kind_of(Array, rooms)
+    assert_equal(false, rooms.empty?, 'Rooms returns an empty array.')
+  end
+  
+  def test_007_logout
+    login
+    assert(@pyre_campfire.logged_in?, 'Campfire#login failed.')
+    @pyre_campfire.logout
+    assert_equal(false, @pyre_campfire.logged_in?, 'Campfire#logout failed!')
+  end
+end

data/test/test_pyre_rooms_private.rb

@@ -0,0 +1,42 @@
+require 'test/unit'
+
+require 'pyre'
+
+class TestPyreRooms < Test::Unit::TestCase
+  def setup
+    @pyre_campfire = Pyre::Campfire.new('pyre')
+    @pyre_email    = 'bot@tie-rack.org'
+    @pyre_password = 'pyre99bts'
+    
+    @pyre_campfire.login(@pyre_email, @pyre_password)
+    
+    @pyre_test     = @pyre_campfire.find_room_by_name('Pyre Test')
+  end
+  
+  def teardown
+    @pyre_campfire.logout
+  end
+  
+  def test_001_find_room_by_name
+    assert_kind_of(Pyre::Room, @pyre_test)
+  end
+  
+  def test_002_enter_and_leave_room
+    assert_equal(false, @pyre_test.joined?, 'Somehow in the room before joining!')
+    @pyre_test.join
+    assert(@pyre_test.joined?, 'Room#join failed')
+    @pyre_test.leave
+    assert_equal(false, @pyre_test.joined?, 'Room#leave failed!')
+    assert(@pyre_campfire.logged_in?, 'Room#leave did\'t redirect.')
+  end
+  
+  def test_003_interact_with_room
+    @pyre_test.join
+    assert(@pyre_test.speak("I am speaking at #{Time.now}"))
+    assert(@pyre_test.joined?, 'Didn\'t return to room after speaking!')
+    assert(@pyre_test.paste("I am pasting\n at #{Time.now}"))
+    assert(@pyre_test.joined?, 'Didn\'t return to room after pasting!')
+    @pyre_test.leave
+    assert_equal(false, @pyre_test.joined?, 'Room#leave failed!')
+  end
+end

data/test/test_ssl_private.rb

@@ -0,0 +1,47 @@
+require 'test/unit'
+
+require 'pyre'
+
+class TestPyreSSL < Test::Unit::TestCase
+  def setup
+    @qval_campfire = Pyre::Campfire.new('qval', :ssl => true)
+    @qval_email    = 'chris@myqval.com'
+    @qval_password = 'd0rkc0ntr0l'
+    
+    @qval_campfire.login(@qval_email, @qval_password)
+  end
+  
+  def teardown
+    @qval_campfire.logout
+  end
+  
+  def test_001_uri
+    assert_equal('https://qval.campfirenow.com', @qval_campfire.uri)
+  end
+  
+  def test_002_rooms
+    rooms = @qval_campfire.rooms
+    assert_kind_of(Array, rooms)
+    assert_equal(false, rooms.empty?)
+    assert_kind_of(Pyre::Room, rooms.first)
+  end
+  
+  def test_004_find_room_by_name
+    assert_not_nil(@qval_campfire.find_room_by_name('Qval Development'))
+    assert_nil(@qval_campfire.find_room_by_name('Chris is the new owner of Qval'))
+  end
+  
+  def test_005_interact_with_room
+    tinder_test = @qval_campfire.find_room_by_name('Tinder Test')
+    assert_equal(true, tinder_test.join)
+    assert_equal(true, tinder_test.speak('Hello from the test suite!'))
+    tinder_test.leave
+  end
+  
+  def test_006_paste
+    tinder_test = @qval_campfire.find_room_by_name('Tinder Test')
+    assert_equal(true, tinder_test.join)
+    assert_equal(true, tinder_test.paste("Two Liner\nat #{Time.now}"))
+    tinder_test.leave
+  end
+end

metadata

@@ -0,0 +1,83 @@
+--- !ruby/object:Gem::Specification 
+name: pyre
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Christopher Shea
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-02-16 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: mechanize
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.7.0
+    version: 
+description: Pyre is a library for interacting with Campfire, the web-based group chat site from 37signals.  Pyre owes a great deal of debt to Tinder (http://tinder.rubyforge.org)
+email: chris@ruby.tie-rack.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- README.txt
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/pyre.rb
+- lib/pyre/campfire.rb
+- lib/pyre/room.rb
+- spec/pyre_spec.rb
+- spec/spec_helper.rb
+- tasks/annotations.rake
+- tasks/doc.rake
+- tasks/gem.rake
+- tasks/manifest.rake
+- tasks/post_load.rake
+- tasks/rubyforge.rake
+- tasks/setup.rb
+- tasks/spec.rake
+- tasks/svn.rake
+- tasks/test.rake
+has_rdoc: true
+homepage: http://pyre.rubyforge.org
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+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: pyre
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: Pyre is a library for interacting with Campfire, the web-based group chat site from 37signals
+test_files: 
+- test/test_pyre_private.rb
+- test/test_pyre_rooms_private.rb
+- test/test_ssl_private.rb