home.rb

# myapp.rb
require 'sinatra'
require 'date'
require 'open-uri'
require 'nokogiri'
require 'data_mapper'

class Event
  include DataMapper::Resource

  property :id,           Serial
  property :date,         Date,     :index => true
  property :description,  String ,  :length => 250
end

if ENV['VCAP_SERVICES'].nil?
  DataMapper::setup(:default, "postgres://conception:Test1234@localhost/conception")
else
  require 'json'
  svcs = JSON.parse ENV['VCAP_SERVICES']
  pgsql = svcs.detect { |k,v| k =~ /^postgresql/ }.last.first
  creds = pgsql['credentials']
  user, pass, host, name = %w(user password host name).map { |key| creds[key] }
  DataMapper.setup(:default, "postgres://#{user}:#{pass}@#{host}/#{name}")
end

get '/' do
  erb :index
end

post '/' do
  begin
    date = Date.parse(params[:date]) << 9

    eventlist = Event.all(:date.lte => date, :date.gt => date - 14, :order => [ :date.desc ])[0,4]
    unless eventlist.empty?
      event = eventlist.sample
      erb :result, :locals => {:date => event[:date], :description => event[:description] }
    else
      erb :bored, :locals => {:date => date}
    end
  rescue ArgumentError
    halt 500, 'Illegal date'
  end
end

get '/scrape' do
  DataMapper.auto_migrate!

  doc = Nokogiri::parse(open(File.expand_path(File.dirname(__FILE__)) + '/data/data.xml'))
  cnt = 0
  doc.xpath('//event').each do |event|
    begin
      cnt += 1
      date = Date.parse(event.xpath('date').text)
      description = event.xpath('description').text.strip()

      Event.create(:date => date, :description => description)
      puts cnt   if cnt % 1000 == 0
    rescue ArgumentError

    end
  end
  "Done!"
end