Initial Commit - really basic system that creates a post when an incoming message is received and can display it.

Author: scsmith

.gitignore

@@ -0,0 +1,2 @@
+.DS_Store
+.bundle

Gemfile

@@ -0,0 +1,8 @@
+source 'http://rubygems.org'
+
+gem 'sinatra'
+gem 'haml'
+gem 'mongoid'
+gem 'bson_ext'
+gem 'sinatra-mongoid'
+gem 'mail'

Gemfile.lock

@@ -0,0 +1,44 @@
+GEM
+  remote: http://rubygems.org/
+  specs:
+    activesupport (2.3.8)
+    bson (1.0.4)
+    bson_ext (1.0.4)
+    durran-validatable (2.0.1)
+    haml (3.0.16)
+    mail (2.2.5)
+      activesupport (>= 2.3.6)
+      mime-types
+      treetop (>= 1.4.5)
+    mime-types (1.16)
+    mongo (1.0.7)
+      bson (>= 1.0.4)
+    mongo_ext (0.19.3)
+    mongoid (1.9.1)
+      activesupport (<= 3.0.0)
+      bson (~> 1.0.1)
+      durran-validatable (>= 2.0.1)
+      mongo (~> 1.0.1)
+      will_paginate (< 2.9)
+    polyglot (0.3.1)
+    rack (1.2.1)
+    sinatra (1.0)
+      rack (>= 1.0)
+    sinatra-mongoid (0.0.2)
+      mongo_ext
+      mongoid
+      sinatra
+    treetop (1.4.8)
+      polyglot (>= 0.3.1)
+    will_paginate (2.3.14)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bson_ext
+  haml
+  mail
+  mongoid
+  sinatra
+  sinatra-mongoid

config.ru

@@ -0,0 +1,12 @@
+begin
+  # Require the preresolved locked set of gems.
+  require ::File.expand_path('../.bundle/environment', __FILE__)
+rescue LoadError
+  # Fallback on doing the resolve at runtime.
+  require "rubygems"
+  require "bundler"
+  Bundler.setup
+end
+
+require 'email_cms'
+run Sinatra::Application

email_cms.rb

@@ -0,0 +1,52 @@
+require 'sinatra'
+require 'haml'
+require 'mongoid'
+require 'sinatra/mongoid'
+require 'mail'
+
+get '/' do
+  @posts = Post.all
+  haml :posts
+end
+
+get '/:id' do
+  @post = Post.first(:conditions => {:id => params[:id]})
+  pass if @post.nil?
+  haml :post
+end
+
+post '/incoming_message/' do
+  message = Mail.new(params[:message])
+  
+  @post = Post.create!(:title => message.subject, :body => message.body.decoded)
+  haml :post
+end
+
+class Post
+  include Mongoid::Document
+  field :title
+  field :body
+end
+
+__END__
+
+@@layout
+%html
+  %head
+  %body
+    =yield
+
+@@posts
+%h1 Posts
+#posts
+  - for post in @posts
+    #post
+      %h2
+        %a{:href => "/#{post.id}"}= post.title
+      #content
+        = post.body
+    
+@@post
+%h1= @post.title
+#content
+  = @post.body