campfire_export.rb

require 'rubygems'
require 'time'
require 'fileutils'
require 'httparty'
require 'nokogiri'
require 'pp'

APIToken  = 'your-api-token-goes-here'
APIServer = 'http://sample.campfirenow.com'

def get(path, params = {})
  HTTParty.get "#{APIServer}#{path}",
    :query      => params,
    :basic_auth => {:username => APIToken, :password => 'X'}
end

def username(id)
  @usernames     ||= {}
  @usernames[id] ||= begin
    doc = Nokogiri::XML get("/users/#{id}.xml").body
    doc.css('name').text
  end
end

def message_to_string(message)
  user = username message.css('user-id').text
  type = message.css('type').text
  
  body = message.css('body').text
  time = Time.parse message.css('created-at').text
  prefix = time.strftime '[%H:%M:%S]'
  
  case type
  when 'EnterMessage'
    "#{prefix} #{user} has entered the room"
  when 'KickMessage', 'LeaveMessage'
    "#{prefix} #{user} has left the room"
  when 'TextMessage'
    "#{prefix} #{user}: #{body}"
  when 'UploadMessage'
    "#{prefix} #{user} uploaded '#{body}'"
  when 'PasteMessage'
    "#{prefix} #{user} pasted:\n#{body}"
  when 'TopicChangeMessage'
    "#{prefix} #{user} changed the topic to '#{body}'"
  when 'ConferenceCreatedMessage'
    "#{prefix} #{user} created conference #{body}"
  else
    raise "Unknown Message Type: #{type} - '#{body}'"
  end
end

def file_name(date)
  file_name = date.year.to_s
  file_name << '-'
  file_name << '0' if date.mon < 10
  file_name << date.mon.to_s
  file_name << '-'
  file_name << '0' if date.mday < 10
  file_name << date.mday.to_s
  file_name + '.txt'
end

doc = Nokogiri::XML get('/rooms.xml').body
doc.css('room').each do |room_xml|
  puts room_xml.css('name').text
  id = room_xml.css('id').text
  
  FileUtils.mkdir_p("campfire/#{id}")

  date = Date.civil 2011, 1, 19
  # date = Date.civil 2011, 1, 1

  while date < Date.today
    puts "#{date.year} #{date.mon} #{date.mday}"
    transcript = Nokogiri::XML get("/room/#{id}/transcript/#{date.year}/#{date.mon}/#{date.mday}.xml").body
  
    output = "#{room_xml.css('name').text} Transcript\n"
  
    transcript.css('message').each do |message|
      next if message.css('type').text == 'TimestampMessage'
    
      output << message_to_string(message) << "\n"

      if message.css('type').text == "UploadMessage"
        # We get the HTML page because the XML doesn't contain the URL for the uploaded file :(
        html_transcript = Nokogiri::XML get("/room/#{id}/transcript/#{date.year}/#{date.mon}/#{date.mday}")
        file_name = "#{message.css('body').text}"
        # I am sure there's a better way than cycling through all the hyperlinks
        html_transcript.css('a').each do |link|
          if link.text == file_name
            open("campfire/#{id}/#{link.text}", "wb") { |file|
              file.write(get(link.attr("href")))
             }
             # We break because there are two links with the same file on the HTML page
             break
          end
        end
      end
    end
  
    open("campfire/#{id}/#{file_name date}", 'w') do |f|
      f.puts output
    end
  
    date = date.next
  end
end