open_porch 0.5.0

data/app/controllers/application_controller.rb

@@ -0,0 +1,15 @@
+class ApplicationController < ActionController::Base
+  protect_from_forgery
+  before_filter :login_from_cookie
+  before_filter :login_required
+  
+protected
+  def login_required
+    redirect_to login_path unless logged_in?
+  end
+  
+  def redirect_if_logged_in
+    redirect_to area_path(current_user.areas.first) if logged_in?
+  end
+  
+end

data/app/controllers/areas/base_controller.rb

@@ -0,0 +1,25 @@
+class Areas::BaseController < ApplicationController
+  before_filter :load_area
+  before_filter :initialize_search
+  
+protected
+  def load_area
+    if current_user.is_admin?
+      @area = Area.find(params[:area_id] || params[:id])
+    else
+      @area = current_user.areas.find(params[:area_id] || params[:id])
+    end
+  rescue ActiveRecord::RecordNotFound
+    flash[:alert] = "The area you were looking for was not found"
+    if current_user.areas.empty?
+      redirect_to user_path
+    else
+      redirect_to area_path(current_user.areas.first)
+    end
+  end
+  
+  def initialize_search
+    params[:search] ||= {}
+    @search = @area.posts.search(params[:search])
+  end
+end

data/app/controllers/areas/issues_controller.rb

@@ -0,0 +1,35 @@
+class Areas::IssuesController < Areas::BaseController
+  before_filter :load_issue,
+    :only => :show
+  
+  def index
+    if params[:year].present? and params[:month].present?
+      @current_month = Time.parse([params[:year], params[:month], '01'].join('-')).to_date
+    else
+      @current_month = Date.today.beginning_of_month
+    end
+    @issues = @area.issues.sent.in_month(@current_month.strftime("%Y-%m")).order('sent_at DESC')
+  end
+
+  def show
+    @prev_issue = @area.issues.find_by_number(@issue.number-1)
+    @next_issue  = @area.issues.find_by_number(@issue.number+1)
+  end
+  
+  def current
+    @issue = @area.issues.sent.last
+    if @issue.present?
+      render :template => 'areas/issues/show'
+    else
+      render :text => 'Issue not found', :status => 404
+    end
+  end
+
+protected
+  def load_issue
+    @issue = @area.issues.sent.find_by_number!(params[:id])
+  rescue ActiveRecord::RecordNotFound
+    render :text => 'Issue not found', :status => 404
+  end
+  
+end

data/app/controllers/areas/posts_controller.rb

@@ -0,0 +1,28 @@
+class Areas::PostsController < Areas::BaseController
+  before_filter :build_post,
+    :only => [:new, :create]
+  
+  def index
+    params[:search] ||= {}
+    @search = @area.posts.order('created_at DESC').joins(:issue).where('sent_at IS NOT NULL').search(params[:search])
+    @posts = @search.paginate(:page => params[:page])
+  end
+  
+  def new
+  end
+  
+  def create
+    @post.save!
+    redirect_to(area_path(@area), :notice => 'Your message has been successfully posted.')
+  rescue ActiveRecord::RecordInvalid
+    render :action => :new
+  end
+
+protected
+  
+  def build_post
+    @post = @area.posts.new(params[:post])
+    @post.user = current_user
+  end
+  
+end

data/app/controllers/areas_controller.rb

@@ -0,0 +1,30 @@
+class AreasController < Areas::BaseController
+  skip_before_filter :login_required, :only => :show
+  before_filter :load_area, :only => :show
+  before_filter :initialize_search
+
+  def show
+  end
+
+protected
+  def load_area
+    if logged_in?
+      if current_user.is_admin?
+        @area = Area.find(params[:id])
+      else
+        @area = current_user.areas.find(params[:id])
+      end
+    else
+      @session_user = SessionUser.new
+      @area = Area.find(params[:id])
+    end
+  rescue ActiveRecord::RecordNotFound
+    flash[:alert] = "The area you were looking for was not found"
+    if current_user.areas.empty?
+      redirect_to user_path
+    else
+      redirect_to area_path(current_user.areas.first)
+    end
+  end
+
+end

data/app/controllers/passwords_controller.rb

@@ -0,0 +1,42 @@
+class PasswordsController < ApplicationController
+  skip_before_filter :login_required
+  before_filter :redirect_if_logged_in, :only => [ :new, :create, :edit, :update ]
+  before_filter :load_user_by_perishable_token, :only => [:edit, :update]
+  
+  def new
+    # ...
+  end
+  
+  def create
+    user = User.find_by_email!(params[:email])
+    user.reset_perishable_token!
+    UserMailer.password_reset(user).deliver
+    flash[:notice] = 'Email to reset password successfully sent.'
+    redirect_to login_path
+  rescue ActiveRecord::RecordNotFound
+    flash.now[:alert] = 'Your email was not found. Did you mistype?'
+    render :action => :new
+  end
+  
+  def edit
+    # ...
+  end
+  
+  def update
+    @user.update_attributes!(params[:user].merge(:perishable_token => nil))
+    login_as_user(@user)
+    flash[:notice] = 'Your password was successfully updated!'
+    redirect_to user_path(@user)
+  rescue ActiveRecord::RecordInvalid
+    flash[:notice] = 'An error occurred. Please try again.'
+    redirect_to login_path
+  end
+  
+  
+protected
+  def load_user_by_perishable_token
+    @user = User.find_by_perishable_token!(params[:id])
+  rescue ActiveRecord::RecordNotFound
+    redirect_to login_path
+  end
+end

data/app/controllers/registrations_controller.rb

@@ -0,0 +1,42 @@
+class RegistrationsController < ApplicationController
+  skip_before_filter :login_required
+  before_filter :redirect_if_logged_in
+  before_filter :build_address, :only => [:new, :index, :create]
+  
+  def index
+    # ...
+  end
+  
+  def new
+    # ...
+  end
+  
+  def create
+    if @address.valid?
+      @areas = @address.closest_regions
+      if @areas.empty?
+        flash[:alert] = "Sorry, we couldn't find any neighbourhoods close to you!"
+        redirect_to root_path
+      else
+        @selected_area = @areas.shift
+        @address.area_id = @selected_area.id
+      
+        @user = User.new(:address_attributes => @address)
+        @user.memberships.build(:area_id => @selected_area.id)
+      end
+    else
+      flash[:alert] = "Please enter a valid address"
+      redirect_to root_path
+    end
+  rescue ActiveRecord::StatementInvalid
+    flash[:alert] = "Sorry, we couldn't find the address you specified"
+    redirect_to root_path
+  end
+  
+  
+protected
+  def build_address
+    @address = Address.new(params[:address])
+  end
+
+end

data/app/controllers/sessions_controller.rb

@@ -0,0 +1,33 @@
+class SessionsController < ApplicationController
+  skip_before_filter :login_required,  :except => :destroy
+  before_filter :redirect_if_logged_in, :only => [ :new, :create ]
+  before_filter :build_user_session,  :only => [ :new, :create ]
+  
+  def create
+    if @session_user.save
+      login(@session_user)
+      if current_user.areas.empty?
+        redirect_to(user_path, :notice => "Welcome, you are now logged in.")
+      else
+        redirect_to(area_path(current_user.areas.first), :notice => "Welcome, you are now logged in.")
+      end
+    else
+      flash.now[:alert] = 'Login failed. Did you mistype?'
+      render :action => :new
+    end
+  end
+  
+  def destroy
+    logout
+    redirect_to root_path
+  end
+  
+protected
+  def build_user_session
+    @session_user = SessionUser.new(params[:session_user])
+  end
+  
+  def redirect_if_logged_in
+    redirect_to user_path if logged_in?
+  end
+end

data/app/controllers/users_controller.rb

@@ -0,0 +1,77 @@
+class UsersController < ApplicationController
+  skip_before_filter :login_required, :only => [:new, :create, :verify_email, :resend_email_verification]
+  before_filter :redirect_if_logged_in, :only => [ :new, :create, :verify_email, :resend_email_verification ]
+  before_filter :build_user, :only => [:new, :create]
+  before_filter :load_user, :only => [:edit, :update, :destroy]
+  
+  def new
+    # ...
+  end
+  
+  def create
+    @user.set_email_verification_key
+    @user.save!
+    UserMailer::email_verification(@user).deliver
+    redirect_to root_path, :notice => "Thank you, please check your email to complete the registration."
+  rescue ActiveRecord::RecordInvalid
+    render :action => :new
+  end
+  
+  def edit; end
+  
+  def update
+    @user.update_attributes!(params[:user])
+    redirect_to(user_path, :notice => 'Your profile has been updated')
+  rescue ActiveRecord::RecordInvalid
+    render :action => :edit
+  end
+  
+  def verify_email
+    if @user = User.where(:email_verification_key => params[:email_verification_key]).first
+      @user.update_attributes(
+        :verified_at => Time.now,
+        :email_verification_key => nil
+      )
+      flash[:notice] = "Your email address has been verified. You can now login"
+      redirect_to login_path
+    else
+      flash[:alert] = "We were not able to verify your account. Please contact us for assistance."
+      redirect_to root_path
+    end
+  end
+  
+  def resend_email_verification
+    if @user = User.where(:email_verification_key => params[:email_verification_key]).first
+      # Just ignore it if the user is already verified
+      if @user.is_verified?
+        flash[:notice] = "Your account has already been validated. You can now login."
+      else
+        UserMailer::email_verification(@user).deliver
+        flash[:notice] = "The email verification has been sent to #{@user.email}"
+      end
+    end
+    redirect_to login_path
+  end
+  
+  def destroy
+    logout
+    @user.destroy
+    flash[:alert] = "Your account has been deleted."
+    redirect_to root_path
+  end
+  
+protected
+  def build_user
+    @user = User.new(params[:user])
+    if @user.memberships.empty?
+      redirect_to root_path
+    else
+      @area = @user.memberships.first.area
+    end
+  end
+  
+  def load_user
+    @user = current_user
+  end
+  
+end

data/app/helpers/open_porch_helper.rb

@@ -0,0 +1,24 @@
+module OpenPorchHelper
+  def show_user_activity_for_url(url)
+    content_for(:doc_ready) do
+      raw %{get_user_activity('#{current_user.full_name}', '#{url}', '#{UserActivity::EXPIRES * 1000 }');} # multiply by 1000 because javascript requires miliseconds
+    end    
+    content_tag(:div, '', :id => "user_activity")
+  end
+  
+  def update_user_activity_for_url(url)
+    content_for(:doc_ready) do
+      raw %{update_user_activity('#{current_user.full_name}', '#{url}', '#{(UserActivity::EXPIRES-2) * 1000}');}
+    end
+  end
+
+  def show_ad_for(zone_name, area)
+    return unless defined?(OPEN_PORCH_ZONES)
+    time = Time.now.to_i
+
+    link_to("http://d1.openx.org/ck.php?cb=#{time}&n=a8417ca6", :class => "ad #{zone_name}", :target => '_blank') do
+      image_tag("http://d1.openx.org/avw.php?zoneid=#{OPEN_PORCH_ZONES[zone_name.to_s]}&region=#{@area.slug}&cb=#{time}&n=a8417ca6")
+    end
+  end
+end
+

data/app/mailers/user_mailer.rb

@@ -0,0 +1,35 @@
+class UserMailer < PostageApp::Mailer
+  default :from => 'open_porch@example.com'
+
+  if defined?(ActionController::Base)
+    default_url_options[:host] = defined?(HOST) ? HOST : 'localhost:3000'
+  end
+
+  def password_reset(user)
+    postageapp_template 'main_layout'
+    @user = user
+    mail(
+      :to => user.email, 
+      :subject => "You have requested a new password"
+    )
+  end
+
+  def new_issue(issue)
+    postageapp_template 'main_layout'
+    @issue = issue
+    mail(
+      :subject => "#{issue.number}-#{issue.area.name}",
+      :to => issue.area.users.collect(&:email)
+    )
+  end
+
+  def email_verification(user)
+    postageapp_template 'main_layout'
+    @user = user
+    mail(
+      :subject => "Your account has been created. Please verify your email address",
+      :to => user.email
+    )
+  end
+  
+end

data/app/models/address.rb

@@ -0,0 +1,57 @@
+class Address
+  include ActiveModel::Validations
+  include GeoKit::Geocoders
+  
+  # == Constants ============================================================
+  
+  # == Attributes =====================================================
+  
+  # == Attribute ==========================================================
+
+  attr_accessor :address, :city, :state, :area_id
+  attr_accessor :location, :lat, :lng
+  
+  # == Validations ==========================================================
+
+  validates :address, :city, :state,
+    :presence => {:message => 'Please enter your address'}
+    
+  # == Instance Methods =====================================================
+
+  def initialize(params = {})
+    if params
+      @address = params[:address]
+      @city = params[:city]
+      @state = params[:state]
+    end
+  end
+  
+  def to_key; end
+  
+  def full
+    [self.address, self.city, self.state].join(', ')
+  end
+  
+  def closest_regions
+    location = self.geolocate
+    if location.all.length > 1 || location.street_address.nil?
+      []
+    else
+      point = Point.new()
+      point.set_x_y(self.lat, self.lng)
+      Area.closest_from(point, 400)
+    end
+  end
+  
+protected
+  
+  def geolocate
+    @location ||= begin
+      loc = Geokit::Geocoders::GoogleGeocoder.geocode(self.full)
+      self.lat = loc.lat
+      self.lng = loc.lng
+      loc
+    end
+  end
+  
+end

data/app/models/area.rb

@@ -0,0 +1,171 @@
+class Area < ActiveRecord::Base
+  
+  # == Constants ============================================================
+  
+  SEND_MODES = %w{immediate batched}
+  
+  # == Relationships ========================================================
+  
+  has_many :memberships,
+    :dependent => :destroy
+  has_many :users,
+    :through => :memberships
+  has_many :posts,
+    :dependent => :destroy
+  has_one :issue_number,
+    :dependent => :destroy
+  has_many :issues,
+    :dependent => :destroy
+  has_many :activities,
+    :dependent => :destroy,
+    :class_name => 'AreaActivity'
+  
+  # == Validations ==========================================================
+  
+  validates :name,
+    :presence => {:message => 'Please enter the name of this area'}
+  validates :slug,
+    :uniqueness  => true,
+    :format => { :with => /^[\w.-]+$/ },
+    :allow_nil => true
+  validates :send_mode,
+    :presence => true,
+    :inclusion => SEND_MODES
+    
+  # == Scopes ===============================================================
+  
+  scope :closest_from, lambda {|point, distance| 
+    where("ST_DWithin(border, ST_GeomFromEWKT('SRID=4326;POINT(#{point.text_representation})'), #{distance})").
+    order("ST_Distance(border, ST_GeomFromEWKT('SRID=4326;POINT(#{point.text_representation})'))")
+  }
+  
+  # Search Scope
+  scope :full_name_search,
+    lambda {|str|
+      like_str = "%#{str}%"
+      id = str
+      where("((name || ', ' || city || ', ' || state) ILIKE ?)", like_str)
+    }
+
+  if defined?(MetaSearch)
+    search_methods :full_name_search
+  end
+  
+  # == Callbacks ============================================================
+  
+  before_validation :set_send_mode, :on => :create
+  after_create :initialize_issue_numbers
+  after_save :check_send_mode_change, :on => :update
+  
+  # == Class Methods ========================================================
+  
+  # Return a hash with the form {area_id => posts.count}
+  def self.newposts_count
+    connection.select_rows("
+      SELECT area_id, COUNT(posts.id) 
+      FROM posts LEFT JOIN areas ON (posts.area_id = areas.id)
+      WHERE issue_id IS NULL
+      GROUP BY area_id
+    ").inject({}){|h, count| h[count[0].to_i] = count[1].to_i; h}
+  end
+  
+  # == Instance Methods =====================================================
+  
+  def coordinates=(points)
+    coords = points.collect{|k, v| [v[0].to_f, v[1].to_f]}
+    self.border = Polygon.from_coordinates([coords + [coords.first]])
+  end
+  
+  
+  # Returns an array with coordinates
+  # removing the last (repeated) point
+  def to_a
+    if self.border.present?
+      {
+        :id => self.id,
+        :name => self.name,
+        :points => self.border.first.points[0..-2].collect{|p| [p.x, p.y]}
+      }
+    end
+  end
+  
+  # Returns a Point object
+  def center
+    if self.border.present?
+      border.envelope.center
+    end
+  end
+  
+  def bounds
+    return [] unless self.border.present?
+    [
+      [self.border.envelope.lower_corner.x, self.border.envelope.lower_corner.y],
+      [self.border.envelope.upper_corner.x, self.border.envelope.upper_corner.y]
+    ]
+  end
+  
+  def border_coordinates
+    @border_coordinates ||= border.rings.first.points.collect{|point| "new google.maps.LatLng(#{point.x}, #{point.y})"}.join(',')
+  end
+  
+  def location
+    [self.city, self.state].compact.join(', ')
+  end
+  
+  def current_issue
+    @current_issue ||= self.issues.where(:sent_at => nil).first
+  end
+  
+  def send_mode?(mode)
+    self.send_mode == mode.to_s
+  end
+  
+  def record_activity_for!(field)
+    field = field.to_s
+    if AreaActivity::TRACKABLE.include?(field)
+      activity = self.activities.find_or_create_by_day(Time.now.utc.to_date)
+      activity.increment!([field, 'count'].join('_'), 1)
+      activity.reload
+    else
+      raise "Cannot find field in the list of trackable fields. Currently tracking: #{AreaActivity::TRACKABLE.join(', ')}"
+    end
+  end
+  
+  def self.for_select
+    Area.order('state, city, name').collect{|a| [[a.name, a.city, a.state].join(', '), a.id]}
+  end
+  
+  def email
+    if defined?(OPEN_PORCH_POP3)
+      "#{self.slug}@#{OPEN_PORCH_POP3['mailto']}"
+    end
+  end
+  
+protected
+  def initialize_issue_numbers
+    self.create_issue_number(:sequence_number => 0)
+  end
+  
+  def set_send_mode
+    self.send_mode ||= 'immediate'
+  end
+  
+  def check_send_mode_change
+    # Detach any posts from the current issue
+    if self.send_mode_changed? && self.send_mode?(:immediate)
+      if self.current_issue
+        self.current_issue.posts.each do |post|
+          post.update_attribute(:issue_id, nil)
+        end
+        # Delete the current issue
+        self.current_issue.reload
+        self.current_issue.destroy
+        @current_issue = nil
+      end
+      # Send any post left over
+      self.posts.in_issue(nil).each do |post|
+        post.send_immediatelly!
+      end
+    end
+  end
+end

data/app/models/area_activity.rb

@@ -0,0 +1,24 @@
+class AreaActivity < ActiveRecord::Base
+  
+  TRACKABLE = %w(quitters new_users new_posts issues_published).freeze
+  
+  # == Relationships ========================================================
+  
+  belongs_to :area
+  
+  # == Validations ==========================================================
+  
+  validates :day,
+    :presence => true
+  validates :area_id,
+    :presence => true,
+    :uniqueness => {:scope => :day}
+
+  # == Scopes ===============================================================
+  
+  default_scope order('day ASC')
+  
+  scope :grouped_by_day,
+    select([['day'] + TRACKABLE.collect{|a| "sum(#{a}_count) as sum_#{a}_count"}].join(', ')).group(:day)
+
+end