seaofclouds / twitter-meh-experiment

# meh is a rainy day httparty with your hosts, json and twitter
#--------------------------------------------------------------
require 'rubygems'
require 'sinatra'
require 'httparty'
 
class Twitter
  include HTTParty
end
 
helpers do
  def query
    if params[:query]
      params[:query]
    else
      'meh'
    end
  end
  # fancy time
  def relative_time(from_time, to_time = Time.now, include_seconds = true, detail = false)
    from_time = from_time.to_time if from_time.respond_to?(:to_time)
    to_time = to_time.to_time if to_time.respond_to?(:to_time)
    distance_in_minutes = (((to_time - from_time).abs)/60).round
    distance_in_seconds = ((to_time - from_time).abs).round
    case distance_in_minutes
      when 0..1 then time = (distance_in_seconds < 60) ? "#{distance_in_seconds} seconds ago" : 'a minute ago'
      when 2..59 then time = "#{distance_in_minutes} minutes ago"
      when 60..90 then time = "an hour ago"
      when 90..1440 then time = "#{(distance_in_minutes.to_f / 60.0).round} hours ago"
      when 1440..2160 then time = 'a day ago' # 1-1.5 days
      when 2160..2880 then time = "#{(distance_in_minutes.to_f / 1440.0).round} days ago" # 1.5-2 days
      else time = from_time.strftime("%d %B %Y")
    end
    return time_stamp(from_time) if (detail && distance_in_minutes > 2880)
    return time.to_s
  end
 
end
 
not_found do
  headers["Status"] = "301 Moved Permanently"
  redirect("/")
end
 
get '/' do
  @tweets = Twitter.get('http://search.twitter.com/search.json?q='+query)['results']
  haml :index
end
 
# stylesheets
 
get '/main.css' do
  content_type 'text/css', :charset => 'utf-8'
  sass :main
end
 
get '/:query' do
  @tweets = Twitter.get('http://search.twitter.com/search.json?q='+query)['results']
  haml :index
end
 
# templates
 
use_in_file_templates!
 
__END__
 
@@ layout
!!! XML
!!! Strict
%html{ :xmlns => "http://www.w3.org/1999/xhtml", :lang => "en", 'xml:lang' => "en" }
  %head
    %title= query
    %meta{'http-equiv'=>"content-type", :content=>"text/html; charset=UTF-8"}/
    %link{:href=>"/main.css", :media=>"all", :rel=>"stylesheet", :type=>"text/css"}/
  %body{:id=>"#{query}"}
    .container
      #content
        = yield
      #footer 
        
@@ index
- @tweets.each do |entry|
  .item
    %span.meta
      -#%span.date= relative_time(entry['created_at'])
      %span.name
        %a{:href=>"http://twitter.com/#{entry['from_user']}"}= entry['from_user']
      %span.separator said
    %span.title= entry['text'].gsub(/(\w+:\/\/[A-Za-z0-9\-_]+\.[A-Za-z0-9\-_:%&\?\/.=]+)/im, '<a href="\1">\1</a>').gsub(/@([a-zA-Z0-9\-_]+)([ ,.;\-><:!?]+)/im, '<a href="http://twitter.com/\1">@\1</a>\2').gsub(/(#{query})/im, '<strong>\1</strong>').gsub(/href=\"(.*)<strong>(.*)<\/strong>(.*)\"/im, 'href="\1\2\3"')
  
#footer 
  <script src="http://static.getclicky.com/56588.js" type="text/javascript"></script>
  <noscript><img alt="Clicky" width="1" height="1" src="http://static.getclicky.com/56588-db8.gif" /></noscript>
  %p
    %span.copyright
      = "tweet '#{query}' on" 
      %a{:href=>"http://twitter.com"} twitter
      | something meh from <a href="http://www.seaofclouds.com">seaofclouds</a>&trade; | 
      %a{:href=>"http://github.com/seaofclouds/twitter-meh-experiment/"} contribute
          
@@ main
*
  :margin 0
  :padding 0
  :font-family arial, sans-serif
body#meh
  :background-color #666
  :color #777
  :text-transform uppercase
  :font-size 300%
  :text-align justify
  :line-height .8em
  :padding .1em
  a
    :color #777
    :text-decoration none
  strong
    :color #999
  .item
    :display inline
    &:hover
      :color #aaa
      a
        :color #ccc
      .title
        :color #ddd
        strong
          :color #fff
        a
          :color #ddd
          &:hover
            :color #ccc
  #footer
    :font-family verdana, sans-serif
    :font-size 25%
    :text-align center
    :padding-top 1em
    :padding-bottom 0
    :text-transform none
    :color #888
    p
      :line-height .8em
    a
      :color #aaa