emergent-core 0.1.0

data/rails_generators/emergent_config/templates/app/helpers/accounts_helper.rb

@@ -0,0 +1,93 @@
+module AccountsHelper
+  
+  #
+  # Use this to wrap view elements that the user can't access.
+  # !! Note: this is an *interface*, not *security* feature !!
+  # You need to do all access control at the controller level.
+  #
+  # Example:
+  # <%= if_authorized?(:index,   User)  do link_to('List all users', users_path) end %> |
+  # <%= if_authorized?(:edit,    @user) do link_to('Edit this user', edit_user_path) end %> |
+  # <%= if_authorized?(:destroy, @user) do link_to 'Destroy', @user, :confirm => 'Are you sure?', :method => :delete end %> 
+  #
+  #
+  def if_authorized?(action, resource, &block)
+    if authorized?(action, resource)
+      yield action, resource
+    end
+  end
+
+  #
+  # Link to user's page ('accounts/1')
+  #
+  # By default, their login is used as link text and link title (tooltip)
+  #
+  # Takes options
+  # * :content_text => 'Content text in place of account.login', escaped with
+  #   the standard h() function.
+  # * :content_method => :account_instance_method_to_call_for_content_text
+  # * :title_method => :account_instance_method_to_call_for_title_attribute
+  # * as well as link_to()'s standard options
+  #
+  # Examples:
+  #   link_to_account @account
+  #   # => <a href="/accounts/3" title="barmy">barmy</a>
+  #
+  #   # if you've added a .name attribute:
+  #  content_tag :span, :class => :vcard do
+  #    (link_to_account account, :class => 'fn n', :title_method => :login, :content_method => :name) +
+  #          ': ' + (content_tag :span, account.email, :class => 'email')
+  #   end
+  #   # => <span class="vcard"><a href="/accounts/3" title="barmy" class="fn n">Cyril Fotheringay-Phipps</a>: <span class="email">barmy@blandings.com</span></span>
+  #
+  #   link_to_account @account, :content_text => 'Your user page'
+  #   # => <a href="/accounts/3" title="barmy" class="nickname">Your user page</a>
+  #
+  def link_to_account(account, options={})
+    raise "Invalid account" unless account
+    options.reverse_merge! :content_method => :login, :title_method => :login, :class => :nickname
+    content_text      = options.delete(:content_text)
+    content_text    ||= account.send(options.delete(:content_method))
+    options[:title] ||= account.send(options.delete(:title_method))
+    link_to h(content_text), account_path(account), options
+  end
+
+  #
+  # Link to login page using remote ip address as link content
+  #
+  # The :title (and thus, tooltip) is set to the IP address 
+  #
+  # Examples:
+  #   link_to_login_with_IP
+  #   # => <a href="/login" title="169.69.69.69">169.69.69.69</a>
+  #
+  #   link_to_login_with_IP :content_text => 'not signed in'
+  #   # => <a href="/login" title="169.69.69.69">not signed in</a>
+  #
+  def link_to_login_with_IP content_text=nil, options={}
+    ip_addr           = request.remote_ip
+    content_text    ||= ip_addr
+    options.reverse_merge! :title => ip_addr
+    if tag = options.delete(:tag)
+      content_tag tag, h(content_text), options
+    else
+      link_to h(content_text), login_path, options
+    end
+  end
+
+  #
+  # Link to the current user's page (using link_to_account) or to the login page
+  # (using link_to_login_with_IP).
+  #
+  def link_to_current_account(options={})
+    if current_account
+      link_to_account current_account, options
+    else
+      content_text = options.delete(:content_text) || 'not signed in'
+      # kill ignored options from link_to_account
+      [:content_method, :title_method].each{|opt| options.delete(opt)} 
+      link_to_login_with_IP content_text, options
+    end
+  end
+
+end

data/rails_generators/emergent_config/templates/app/helpers/application_helper.rb

@@ -0,0 +1,3 @@
+# Methods added to this helper will be available to all templates in the application.
+module ApplicationHelper
+end

data/rails_generators/emergent_config/templates/app/models/account.rb

@@ -0,0 +1,84 @@
+require 'digest/sha1'
+
+class Account < ActiveRecord::Base
+  include Authentication
+  include Authentication::ByPassword
+  include Authentication::ByCookieToken
+  include Authorization::AasmRoles
+
+  DEFAULT_PHOTO_URL = '/images/avatar-missing.png'
+
+  validates_presence_of     :login
+  validates_length_of       :login,    :within => 3..40
+  validates_uniqueness_of   :login
+  validates_format_of       :login,    :with => Authentication.login_regex, :message => Authentication.bad_login_message
+
+#  validates_format_of       :first_name,     :with => Authentication.name_regex,  :message => Authentication.bad_name_message, :allow_nil => true
+#  validates_length_of       :first_name,     :maximum => 100
+  
+#  validates_format_of       :last_name,     :with => Authentication.name_regex,  :message => Authentication.bad_name_message, :allow_nil => true
+#  validates_length_of       :last_name,     :maximum => 100
+
+  validates_presence_of     :email
+  validates_length_of       :email,    :within => 6..100 #r@a.wk
+  validates_uniqueness_of   :email
+  validates_format_of       :email,    :with => Authentication.email_regex, :message => Authentication.bad_email_message
+
+  has_one :user
+  
+  has_attached_file :avatar, :styles => {:thumb => '100x100>'} # doesn't resize for some reason, check!
+
+  # has_attachment :content_type => :image, 
+  #                :storage => :file_system,
+  #                :resize_to => '100x100>',
+  #                :path_prefix => 'public/images/accounts'
+
+  cattr_accessor :current_account, :session_token
+
+  # HACK HACK HACK -- how to do attr_accessible from here?
+  # prevents a user from submitting a crafted form that bypasses activation
+  # anything else you want your user to change should be added here.
+  attr_accessible :login, :email, :first_name, :last_name, :password, :password_confirmation, :session_token, :avatar #:uploaded_data
+  
+  # Authenticates a user by their login name and unencrypted password.  Returns the user or nil.
+  #
+  # uff.  this is really an authorization, not authentication routine.  
+  # We really need a Dispatch Chain here or something.
+  # This will also let us return a human error message.
+  #
+  def self.authenticate(login, password)
+    return nil if login.blank? || password.blank?
+    u = find_in_state :first, :pending, :conditions => {:login => login} # need to get the salt
+    u && u.authenticated?(password) ? u : nil
+  end
+  
+  def session_token
+    Account.session_token
+  end
+
+  def login=(value)
+    write_attribute :login, (value ? value.downcase : nil)
+  end
+
+  def email=(value)
+    write_attribute :email, (value ? value.downcase : nil)
+  end
+  
+  def photo_url
+    begin
+      #public_filename
+      avatar.url(:original)
+    rescue
+      DEFAULT_PHOTO_URL
+    end
+  end
+  
+  protected
+    
+    def make_activation_code
+        self.deleted_at = nil
+        self.activation_code = self.class.make_token
+    end
+
+
+end

data/rails_generators/emergent_config/templates/app/models/account_mailer.rb

@@ -0,0 +1,24 @@
+class AccountMailer < ActionMailer::Base
+  def signup_notification(account)
+    setup_email(account)
+    subject    += 'Please activate your new account'
+  
+    body[:url]  = "http://localhost:3000/activate/#{account.activation_code}"
+  
+  end
+  
+  def activation(account)
+    setup_email(account)
+    subject    += 'Your account has been activated!'
+    body[:url]  = "http://localhost:3000/"
+  end
+  
+  protected
+    def setup_email(account)
+      recipients  = "#{account.email}"
+      from        = "Administrator"
+      subject     = "[pomodo] "
+      sent_on     = Time.now
+      body[:account] = account
+    end
+end

data/rails_generators/emergent_config/templates/app/models/account_observer.rb

@@ -0,0 +1,17 @@
+class AccountObserver < ActiveRecord::Observer
+  def after_create(account)
+#    AccountMailer.deliver_signup_notification(account)
+    
+    address = Address.new
+    address.save!
+    
+    user = User.new
+    user.account = account
+    user.address = address
+    user.save!
+  end
+
+  def after_save(account)
+#   AccountMailer.deliver_activation(account) if account.recently_activated?
+  end
+end

data/rails_generators/emergent_config/templates/app/models/address.rb

@@ -0,0 +1,2 @@
+class Address < ActiveRecord::Base
+end

data/rails_generators/emergent_config/templates/app/models/asset.rb

@@ -0,0 +1,6 @@
+class Asset < ActiveRecord::Base
+  has_many :contents, :through => :asset_assignments
+  has_many :asset_assignments, :order => 'position', :dependent => :delete_all
+  
+  has_attached_file :attachment, :styles => {:thumb => '100x100>'} # doesn't resize for some reason, check!
+end

data/rails_generators/emergent_config/templates/app/models/asset_assignment.rb

@@ -0,0 +1,4 @@
+class AssetLink < ActiveRecord::Base
+  belongs_to :content
+  belongs_to :asset
+end

data/rails_generators/emergent_config/templates/app/models/category.rb

@@ -0,0 +1,35 @@
+class Category < ActiveRecord::Base
+  
+  acts_as_nested_set
+  has_permalink :title, :scope => :section_id
+
+  belongs_to :section, :foreign_key => 'section_id'
+  has_many :contents, :through => :category_assignments
+  has_many :category_assignments, :dependent => :delete_all
+
+  before_validation :set_path
+
+  validates_presence_of :section, :title
+  validates_uniqueness_of :permalink, :scope => :section_id
+
+  def set_path
+    new_path = build_path
+    unless self.path == new_path
+      self.path = new_path
+      @paths_dirty = true
+    end
+  end
+
+  def update_child_paths
+    return unless @paths_dirty
+    self.all_children.each do |child|
+      child.path = child.build_path
+      child.save
+    end
+    @paths_dirty = false
+  end
+
+  def build_path
+    self_and_ancestors.map(&:permalink).join('/')
+  end
+end

data/rails_generators/emergent_config/templates/app/models/comment.rb

@@ -0,0 +1,98 @@
+class Comment < Content
+
+  acts_as_role_context # :parent => Content
+
+  filtered_column :body
+  filters_attributes :sanitize => :body_html
+
+  belongs_to :site
+  belongs_to :section
+  belongs_to :commentable, :polymorphic => true
+  belongs_to_author
+
+  validates_presence_of :body, :commentable
+
+  before_validation :set_owners
+  before_create :authorize_commenting
+  after_save    :update_commentable
+  after_destroy :update_commentable
+
+  def owner
+    commentable
+  end
+
+  def filter
+    commentable.comment_filter
+  end
+
+  def unapproved?
+    !approved?
+  end
+
+  def just_approved?
+    approved_changed? and approved?
+  end
+
+  def just_unapproved?
+    approved_changed? and unapproved?
+  end
+  
+  def state_changes
+    state_changes = if just_approved?
+      [:approved]
+    elsif just_unapproved?
+      [:unapproved]
+    end || []
+    super + state_changes 
+  end
+
+  def spam_info
+    read_attribute(:spam_info) || {}
+  end
+
+  has_many :spam_reports, :as => :subject
+
+  def spam_threshold
+    51 # TODO have a config option on site for this
+  end
+
+  def ham?
+    spaminess < spam_threshold
+  end
+
+  def spam?
+    spaminess >= spam_threshold
+  end
+
+  def check_approval(context = {})
+    section.spam_engine.check_comment(self, context)
+    self.spaminess = calculate_spaminess
+    self.approved = ham?
+    save!
+  end
+
+  def calculate_spaminess
+    sum = spam_reports(true).inject(0){|sum, report| sum + report.spaminess }
+    sum > 0 ? sum / spam_reports.count : 0
+  end
+
+  protected
+
+    def authorize_commenting
+      if commentable && !commentable.accept_comments?
+        raise CommentNotAllowed, I18n.t(:'adva.comments.messages.not_allowed')
+      end
+    end
+
+    def set_owners
+      if commentable # TODO in what cases would commentable be nil here?
+        self.site = commentable.site
+        self.section = commentable.section
+      end
+    end
+
+    def update_commentable
+      owner.after_comment_update(self) if owner && owner.respond_to?(:after_comment_update)
+    end
+
+end

data/rails_generators/emergent_config/templates/app/models/content.rb

@@ -0,0 +1,89 @@
+class Content < ActiveRecord::Base
+  has_many :content_assignments
+  has_many :asset_assignments
+  has_many :assets, :through => :asset_assignments
+  
+  def self.find_entire_tree(builder=nil)
+    # add something here to get the content, not the assignment
+    to_fxml(:builder => builder, :skip_instruct => true) do |fxml|
+      ContentAssignment.roots(:first, :conditions => {:content_id => self.id}).children.each do |child|
+        child.content.to_fxml_content_tree(fxml)
+      end
+    end
+  end
+  
+  def to_fxml_content_tree(builder=nil)
+    # add something here to get the content, not the assignment
+    to_fxml(:builder => builder, :skip_instruct => true) do |fxml|
+      ContentAssignment.find(:first, :conditions => {:content_id => self.id}).children.each do |child|
+        child.content.to_fxml_content_tree(fxml)
+      end
+    end
+  end
+  
+  def desc
+     @content_assignments = []
+      @procs = []
+      ContentAssignment.find(:first, :conditions => {:target_id => self.id}).descendants.each do |child|
+        proc = Proc.new do |opts|
+          opts[:builder].tag!('parent_id', child.parent.target_id)
+        end
+        @content_assignments.push(child)
+        @procs.push(proc)
+      end
+      to_fxml(:child_proc => @procs)
+  end
+  
+  def descendants(builder=nil)
+    @children = []
+    @parent_ids = []
+    @contents = []
+    ContentAssignment.find(:first, :conditions => {:target_id => self.id}).self_and_descendants.each do |child|
+      proc = Proc.new do |opts|
+        opts[:builder].tag!('parent_id', child.source_id)
+      end
+      # CAN'T JUST PUSH THEM IN, THE ID's GET ALL SCREWED UP
+      @children.push(child)
+      @parent_ids.push(proc)
+    end
+    @contents = self.class.find(@children).to_fxml(:child_proc => @parent_ids)
+  end
+  
+  def descendants2(builder=nil)
+    @children = []
+    @parent_ids = []
+    @contents = []
+    @nodes = {}
+    @tmp = []
+    ContentAssignment.find(:first, :conditions => {:target_id => self.id}).self_and_descendants.each do |child|
+      proc = Proc.new do |opts|
+        opts[:builder].tag!('parent_id', child.source_id)
+      end
+      # CAN'T JUST PUSH THEM IN, THE ID's GET ALL SCREWED UP
+      @parent_ids.push(proc)
+      if !@nodes[child.source_id]
+         @nodes[child.source_id] = true
+         @children.push(child)
+      end
+    end
+    @contents = self.class.find(@children)
+    @parent_ids.each do |node|
+       if node
+    end
+       to_fxml(:child_proc => @parent_ids)
+  end
+  
+  def to_xml_content_tree(builder=nil)
+    # add something here to get the content, not the assignment
+    to_xml(:builder => builder, :skip_instruct => true) do |xml|
+      ContentAssignment.find(:first, :conditions => {:content_id => self.id}).children.each do |child|
+        child.content.to_xml_content_tree(xml)
+      end
+    end
+  end
+  
+  def parent
+    @parent = ContentAssignment.find(:first, :conditions => {:content_id => self.id}).parent.content
+  end
+  
+end

data/rails_generators/emergent_config/templates/app/models/content_assignment.rb

@@ -0,0 +1,21 @@
+class ContentLink < ActiveRecord::Base
+  belongs_to :content_node, :class_name => "ContentNode", :foreign_key => "target_id"
+  acts_as_nested_set(:parent_column => "ancestor_id")
+
+  def full_xml(builder=nil)
+    # add something here to get the content, not the assignment
+    to_xml(:builder => builder, :skip_instruct => true) do |xml|
+      children.each { |child| child.full_xml(xml) }
+    end
+  end
+  
+  def self.find_parent_content_by_content_id(content_id)
+    @parent_content = find(:all, :conditions => {:content_id => content_id}).parent.content
+    return @parent_content
+  end
+  
+  #before filter on controller:
+  def title
+     #name += "Link between #{source} and #{target}"
+  end
+end

data/rails_generators/emergent_config/templates/app/models/image.rb

@@ -0,0 +1,3 @@
+class Image < Asset
+   has_attached_file :attachment, :styles => {:thumb => '100x100>'} # doesn't resize for some reason, check!
+end

data/rails_generators/emergent_config/templates/app/models/post.rb

@@ -0,0 +1,76 @@
+class Post < Content
+  
+  filters_attributes :except => [:excerpt, :excerpt_html, :body, :body_html, :cached_tag_list]
+  write_inheritable_attribute :default_find_options, { :order => 'contents.published_at desc' }
+
+  before_create :set_position
+
+  class << self
+    def find_by_permalink(*args)
+      options = args.extract_options!
+      if args.size > 1
+        permalink = args.pop
+        with_time_delta(*args) do find_by_permalink(permalink, options) end
+      else
+        find :first, options.merge(:conditions => ['permalink = ?', args.first])
+      end
+    end
+  end
+
+  def full_permalink
+    raise "can not create full_permalink for an article that belongs to a non-blog section" unless section.is_a? Blog
+    # raise "can not create full_permalink for an unpublished article" unless published?
+    date = [:year, :month, :day].map { |key| [key, (published? ? published_at : created_at).send(key)] }.flatten
+    Hash[:permalink, permalink, *date]
+  end
+
+  def primary?
+    section.articles.primary == self
+  end
+
+  def accept_comments?
+    published? && (comment_age > -1) && (comment_age == 0 || comments_expired_at > Time.zone.now)
+  end
+
+  def has_excerpt?
+    !excerpt.blank?
+  end
+
+  def published_month
+    Time.local published_at.year, published_at.month, 1
+  end
+
+  def draft?
+    published_at.nil?
+  end
+
+  def pending?
+    !published?
+  end
+
+  def published?
+    !published_at.nil? and published_at <= Time.zone.now
+  end
+
+  def published_at?(date)
+    published? and date == [:year, :month, :day].map {|key| published_at.send(key).to_s }
+  end
+
+  def state
+    pending? ? :pending : :published
+  end
+
+  def previous
+    section.articles.find_published :first, :conditions => ['published_at < ?', published_at], :order => :published_at
+  end
+
+  def next
+    section.articles.find_published :first, :conditions => ['published_at > ?', published_at], :order => :published_at
+  end
+
+  protected
+
+    def set_position
+      self.position ||= section.articles.maximum(:position).to_i + 1 if section
+    end
+end

data/rails_generators/emergent_config/templates/app/models/section.rb

@@ -0,0 +1,97 @@
+class Section < Content
+  
+  @@types = ['Section']
+  cattr_reader :types
+  
+  acts_as_role_context :actions => ["create article", "update article", "delete article"],
+                       :parent => Site
+                       
+  
+  serialize :permissions
+
+  has_option :articles_per_page, :default => 15
+  has_permalink :title, :scope => :site_id
+  acts_as_nested_set
+  has_many_comments
+  instantiates_with_sti
+
+  belongs_to :site
+  has_many :articles, :foreign_key => 'section_id', :dependent => :destroy do
+    def primary
+      find_published :first, :order => :position
+    end
+
+    def permalinks
+      find_published(:all).map(&:permalink)
+    end
+  end
+
+  has_many :categories, :dependent => :destroy, :order => 'lft' do
+    def roots
+      find :all, :conditions => {:parent_id => nil}, :order => 'lft'
+    end
+  end
+
+  before_validation :set_path, :set_comment_age
+
+  validates_presence_of :title # :site wtf ... this breaks install_controller#index
+  validates_uniqueness_of :permalink, :scope => :site_id
+  validates_numericality_of :articles_per_page, :only_integer => true, :message => :only_integer
+
+  # TODO validates_inclusion_of :articles_per_page, :in => 1..30, :message => "can only be between 1 and 30."
+
+  delegate :spam_engine, :to => :site
+
+  class << self
+    def register_type(type)
+      @@types << type
+      @@types.uniq!
+    end
+    
+    def content_type
+      'Article'
+    end
+  end
+
+  def owner
+    site
+  end
+
+  def type
+    read_attribute(:type) || 'Section'
+  end
+
+  def tag_counts
+    Content.tag_counts :conditions => "section_id = #{id}"
+  end
+
+  def render_options(options = {:template => nil, :layout => nil})
+    options.merge options.keys.inject({}) { |options, type|
+      value = send(type)
+      options[type] = value.sub /^templates\//, '' unless value.blank?
+      options
+    }
+  end
+
+  def root_section?
+    self == site.sections.root
+  end
+
+  def accept_comments?
+    comment_age.to_i > -1
+  end
+
+  protected
+
+    def set_comment_age
+      self.comment_age ||= -1
+    end
+
+    def set_path
+      self.path = build_path
+    end
+
+    def build_path
+      self_and_ancestors.map(&:permalink).join('/')
+    end
+end

data/rails_generators/emergent_config/templates/app/models/site.rb

@@ -0,0 +1 @@
+controller.as.erb

data/rails_generators/emergent_config/templates/app/models/tag.rb

@@ -0,0 +1 @@
+controller.as.erb

data/rails_generators/emergent_config/templates/app/models/user.rb

@@ -0,0 +1,4 @@
+class User < ActiveRecord::Base  
+  belongs_to :address
+  belongs_to :account
+end

data/rails_generators/emergent_config/templates/app/views/account_mailer/activation.erb

@@ -0,0 +1,3 @@
+<%=h @account.login %>, your account has been activated.  Welcome aboard!
+
+  <%=h @url %>