comfortable_mexican_sofa 0.0.18

data/app/controllers/cms_admin/sections_controller.rb

@@ -0,0 +1,17 @@
+class CmsAdmin::SectionsController < CmsAdmin::BaseController
+  
+  def show
+    @page = CmsPage.sections.find_by_id(params[:id])
+    @pages = @page.children.paginate :page => params[:page]
+    
+    # attempt to singularize section name
+    @section_label = @page.label.singularize
+  end
+  
+  def test_get_show
+    get :show, :id => cms_pages(:complex_page)
+    assert_response :success
+    assert assigns(:pages)
+  end
+  
+end

data/app/controllers/cms_admin/snippets_controller.rb

@@ -0,0 +1,58 @@
+class CmsAdmin::SnippetsController < CmsAdmin::BaseController
+  
+  before_filter :load_snippet, :only => [:edit, :update, :destroy]
+  
+  def index
+    @snippets = CmsSnippet.paginate :page => params[:page]
+  end
+  
+  def new
+    # ...
+  end
+  
+  def edit
+    # ...
+  end
+  
+  def create
+    @snippet = CmsSnippet.new(params[:snippet])
+    @snippet.save!
+    
+    flash[:notice] = 'Snippet created'
+    redirect_to :action => :edit, :id => @snippet
+    
+  rescue ActiveRecord::RecordInvalid
+    render :action => :new
+  end
+  
+  def update
+    @snippet.update_attributes!(params[:snippet])
+    
+    flash[:notice] = 'Snippet updated'
+    redirect_to :action => :edit, :id => @snippet
+    
+  rescue ActiveRecord::RecordInvalid
+    render :action => :edit
+  end
+  
+  def destroy
+    @snippet.destroy
+    
+    flash[:notice] = 'Snippet removed'
+    redirect_to :action => :index
+  end
+  
+  def reorder
+    params[:snippet_list].each_with_index do |id, position|
+      CmsSnippet.find(id).update_attribute(:position, position)
+    end
+    render :nothing => true
+  end
+  
+protected
+
+  def load_snippet
+    @snippet = CmsSnippet.find_by_id(params[:id])
+  end
+  
+end

data/app/controllers/cms_common/render_page.rb

@@ -0,0 +1,47 @@
+module CmsCommon::RenderPage
+  
+  def render_page(options = {})
+    
+    @cms_page_preview_mode = options[:preview]
+    
+    # Rendering 404 page
+    if !@cms_page
+      @cms_page = CmsPage.published.find_by_full_path('404')
+      if !@cms_page
+        render :text => '404 Page Not Found', :status => 404
+      else
+        render :inline => @cms_page.content, :layout => (@cms_page.cms_layout.app_layout || false), :status => 404
+      end
+      return
+    end
+    
+    respond_to do |format|
+      format.html do
+        if @cms_page.redirect_to_page
+          redirect_to @cms_page.redirect_to_page.full_path
+        else
+          
+          layout = (@cms_page.cms_layout.app_layout || false)
+          
+          if Rails.env.development? || Rails.env.test?
+            # attempt to load content from the filesystem first
+            begin
+              @cms_page_slug = @cms_page_slug.blank? ? 'index' : @cms_page_slug
+              render :template => "/cms/#{@cms_page_slug}", :layout => layout
+              return
+            rescue ActionView::MissingTemplate ; end
+          end
+          
+          render :inline => @cms_page.content, :layout => layout
+        end
+      end
+      format.xml do
+        @cms_page_children = @cms_page.children[0...25].collect do |p|
+          p.rendered_content = render_to_string(:inline => p.content, :layout => false)
+          p
+        end
+      end
+    end
+  end
+  
+end

data/app/controllers/cms_content_controller.rb

@@ -0,0 +1,30 @@
+class CmsContentController < ApplicationController
+  
+  include CmsCommon::RenderPage
+  
+  unloadable
+  
+  before_filter :parse_path, :only => :show
+  
+  def show
+    @cms_page_slug = params[:path].join('/')
+    @cms_page = CmsPage.published.find_by_full_path(@cms_page_slug)
+    render_page
+  end
+  
+  def sitemap
+    respond_to do |format|
+      format.xml do
+        @cms_pages = CmsPage.all
+      end
+    end
+  end
+  
+protected
+
+  def parse_path
+    params[:format] = (params[:path].last && (match = params[:path].last.match(/\.(.*?)$/)) && match[1]) || 'html'
+    params[:path].last && params[:path].last.gsub!(/\.(.*?)$/, '')
+  end
+  
+end

data/app/helpers/cms_helper.rb

@@ -0,0 +1,12 @@
+module CmsHelper
+  
+  CMS_C = %w( crazy cool colorful cremated creamed crusty clapping campy crude corky comfortable crappy cromulent childish crafty cruddy creaky cranky catatonic comatose circular curvaceous crabby cyan canned clobbered controlling candid cagey callous capable capricious ceaseless changeable cheerful chilly chivalrous chubby chunky clammy classy cloistered cloudy clumsy coherent cold colossal combative comfortable cooing cooperative courageous cowardly craven credible creepy crooked cuddly cultured curly curved cynical casual).freeze
+  CMS_M = %w( massive monster mini mighty morbid mexican moses machine mucus murder macabre macho maddening madly magenta magical magnificent majestic makeshift malicious mammoth maniacal many marked massive materialistic mature measly meek melodic merciful mere mighty mindless miniature minor miscreant moaning modern moldy momentous muddled mundane murky mushy mysterious).freeze
+  CMS_S = %w( scott sean sack sail salt sand scale scarecrow scarf scene scent school science scissors screw sea seashore seat secretary seed selection self sense servant shade shake shame shape sheep sheet shelf ship shirt shock shoe shoes shop show side sidewalk sign silk silver sink sister sisters size skate skin skirt sky slave sleep sleet slip slope smash smell smile smoke snail snails snake snakes sneeze snow soap society sock soda sofa son song songs sort sound soup space spade spark spiders sponge spoon spot spring spy square squirrel stage stamp star start statement station steam steel stem step stew stick sticks stitch stocking stomach stone stop store story stove stranger straw stream street stretch string structure substance sugar suggestion suit summer sun support surprise sweater swim swing system sangria).freeze
+  
+  def application_name
+    ComfortableMexicanSofa::Config.cms_title || 
+    [CMS_C, CMS_M, CMS_S].collect{|a| a.sort_by{rand}.first.capitalize}.join
+  end
+
+end

data/app/models/cms_attachment.rb

@@ -0,0 +1,17 @@
+class CmsAttachment < ActiveRecord::Base
+
+  # -- Relationships --------------------------------------------------------
+  
+  has_attached_file :file, ComfortableMexicanSofa::Config.paperclip_options
+  acts_as_categorized
+  
+  # -- Validations ----------------------------------------------------------
+  
+  validates_attachment_presence :file
+  validates_presence_of :label
+
+  # -- Named Scopes ----------------------------------------------------------
+
+  default_scope :order => 'created_at DESC'
+
+end

data/app/models/cms_attachment_categorization.rb

@@ -0,0 +1,5 @@
+class CmsAttachmentCategorization < ActiveRecord::Base
+  
+  acts_as_categorization
+  
+end

data/app/models/cms_block.rb

@@ -0,0 +1,15 @@
+class CmsBlock < ActiveRecord::Base
+  
+  # -- Relationships --------------------------------------------------------
+  belongs_to :cms_page
+  
+  # -- Validations ----------------------------------------------------------
+  validates_presence_of :label
+  validates_uniqueness_of :label, :scope => :cms_page_id
+  
+  # -- Scopes ---------------------------------------------------------------
+  named_scope :with_label, lambda{ |name|{
+    :conditions => {:label => name}
+  }}
+  
+end

data/app/models/cms_category.rb

@@ -0,0 +1,36 @@
+class CmsCategory < ActiveRecord::Base
+  
+  # -- Relationships --------------------------------------------------------
+  acts_as_tree
+  
+  has_many :cms_page_categorizations,       :dependent => :destroy
+  has_many :cms_attachment_categorizations, :dependent => :destroy
+  
+  has_many :cms_pages,        :through => :cms_page_categorizations
+  has_many :cms_attachments,  :through => :cms_attachment_categorizations
+  
+  # -- Validations ----------------------------------------------------------
+  validates_presence_of :slug, :label
+  validates_uniqueness_of :slug, :scope => :parent_id
+  
+  # -- Named Scopes ---------------------------------------------------------
+  default_scope :order => 'label'
+  
+  # -- Callbacks ------------------------------------------------------------
+  before_validation :set_slug_if_blank
+  
+  # -- Class Methods --------------------------------------------------------
+  def set_slug_if_blank
+    self.slug = self.label.slugify if self.slug.blank?
+  end
+
+  def self.categories_for_select(collection = CmsCategory.roots, level = 0)
+    out = []
+    collection.each do |category|
+      out += [["#{". . " * level} #{category.label}", category.id]]
+      out += self.categories_for_select(category.children, level+1) if category.children.count > 0
+    end
+    out
+  end
+
+end

data/app/models/cms_layout.rb

@@ -0,0 +1,102 @@
+class CmsLayout < ActiveRecord::Base
+  
+  # -- Relationships --------------------------------------------------------
+  acts_as_tree :counter_cache => :children_count
+  has_many :cms_pages, :dependent => :nullify
+  
+  # -- Validations ----------------------------------------------------------
+  validates_presence_of :label
+  validates_uniqueness_of :label
+  validate  :validate_block_presence,
+            :validate_proper_relationship
+  
+  # -- AR Callbacks ---------------------------------------------------------
+  before_save :flag_as_extendable,
+              :update_page_blocks
+  
+  # -- Scopes ---------------------------------------------------------------
+  default_scope :order => 'position ASC'
+  named_scope :extendable, :conditions => { :is_extendable => true }
+  
+  # -- Class Methods --------------------------------------------------------
+  def self.options_for_select
+    [['---', nil]] + CmsLayout.all.collect{ |l| [l.label, l.id]}
+  end
+  
+  def self.app_layouts_for_select
+    path = "#{RAILS_ROOT}/app/views/layouts"
+    regex = /^([a-z0-9]\w+)\.html/i
+    
+    app_layouts = begin
+      Dir.entries(path).collect{|l| l.match(regex).try(:captures)}.compact.flatten
+    rescue
+      # no app layouts
+    end
+    
+    !app_layouts.blank? ? [['---', nil]] + app_layouts : [['---', nil]]
+  end
+  
+  # -- Instance Methods -----------------------------------------------------
+  def content
+    if parent
+      parent.content.gsub(/\{\{\s*cms_page_block:default:.*?\}\}/, self.read_attribute(:content))
+    else
+      read_attribute(:content)
+    end
+  end
+  
+  def app_layout
+    this_layout = read_attribute(:app_layout)
+    if this_layout.blank?
+      parent && parent.app_layout
+    else
+      this_layout
+    end
+  end
+  
+  def extendable_for_select
+    [['---', nil]] + CmsLayout.extendable.all.reject{|l| ([self]+self.descendants).member?(l)}.collect{ |l| [l.label, l.id] }
+  end
+  
+  def tags(options = {})
+    CmsTag::parse_tags(self.content, options)
+  end
+  
+protected
+
+  def validate_block_presence
+    self.errors.add(:content, 'does not have any cms_blocks defined') if self.tags.empty?
+  end
+  
+  def validate_proper_relationship
+    if self.descendants.member?(parent) || self.parent == self
+      self.errors.add(:parent_id, 'layout is invalid') 
+    end
+  end
+  
+  def validate_children_against_extendable
+    # todo
+  end
+  
+  def flag_as_extendable
+    self.is_extendable = !self.tags.select{|t| t.tag_type == 'cms_page_block' && t.label == 'default'}.blank?
+    true
+  end
+  
+  def update_page_blocks
+    return if new_record? || !content_changed?
+    
+    old_tags = CmsTag::parse_tags(content_was).select{|t| ['cms_block', 'cms_page_block'].member?(t.tag_type)}.collect{|t| t.label}
+    new_tags = CmsTag::parse_tags(content).select{|t| ['cms_block', 'cms_page_block'].member?(t.tag_type)}.collect{|t| t.label}
+    
+    # creating new cms_blocks for all pages using this layout
+    labels_for_blocks = new_tags - old_tags
+    if !labels_for_blocks.blank?
+      cms_pages.each do |cms_page|
+        labels_for_blocks.each do |label|
+          cms_page.cms_blocks.create(:label => label)
+        end
+      end
+    end
+  end
+end

data/app/models/cms_page.rb

@@ -0,0 +1,125 @@
+class CmsPage < ActiveRecord::Base
+  
+  attr_accessor :rendered_content
+  
+  # -- Relationships --------------------------------------------------------
+  acts_as_tree :counter_cache => :children_count
+  acts_as_published
+  acts_as_categorized
+  
+  belongs_to  :cms_layout
+  has_many    :cms_blocks,
+    :dependent    => :destroy
+  belongs_to  :redirect_to_page,
+    :class_name   => 'CmsPage',
+    :foreign_key  => :redirect_to_page_id
+  has_one :redirected_from_page,
+    :class_name   => 'CmsPage',
+    :foreign_key  => :redirect_to_page_id
+  
+  #-- Validations -----------------------------------------------------------
+  validates_presence_of   :cms_layout_id,
+    :unless => lambda{|p| p.redirect_to_page}
+  validates_presence_of   :label
+  validates_presence_of   :slug,
+    :unless => lambda{|p| CmsPage.count == 0 || p == CmsPage.root}
+  validates_format_of     :slug,
+    :with   => /^\w[a-z0-9_-]*$/i,
+    :unless => lambda{|p| CmsPage.count == 0 || p == CmsPage.root}
+  validates_uniqueness_of :full_path
+  
+  validate :validate_redirect_to
+  
+  # -- AR Callbacks ---------------------------------------------------------
+  before_validation :assign_full_path
+  after_save        :save_blocks,
+                    :sync_child_slugs
+  
+  # -- Scopes ---------------------------------------------------------------
+  default_scope :order => 'position ASC'
+  named_scope :sections,
+    :conditions => {:is_section => true}
+    
+  # -- Class Methods --------------------------------------------------------
+  def self.[](slug)
+    CmsPage.find_by_slug!(slug)
+  end
+    
+  # -- Instance Methods -----------------------------------------------------
+  def content
+    # TODO: Add column to cache the render output. pointless to run it all the time
+    render_content
+  end
+  
+  # FIX: Recursive Tag/Content Replacement
+  # Works, but potentionally dangerous and not particularly efficient
+  def render_content(content = nil)
+    content = cms_layout.content.dup if !content
+    while (!(tags = CmsTag::parse_tags(content, :page => self).sort_by{|t| t.class.render_priority}).blank?)
+      tags.each do |tag|
+        content.gsub!(tag.regex) { tag.render }
+      end
+    end
+    content
+  end
+  
+  def blocks=(blocks)
+    blocks.each do |label, params|
+      if !self.new_record? && !(block = self.cms_blocks.select{|b| b.label == label}.first).blank?
+        block.attributes = params
+      else
+        self.cms_blocks.build({:label => label}.merge(params))
+      end
+    end
+  end
+  
+  def pages_for_select(page = CmsPage.root, level = 0, exclude_self = false)
+    page ||= CmsPage.root
+    return [] if !page || (page == self && exclude_self)
+    out = [["#{". . " * level} #{page.label}", page.id]]
+    page.children.each do |child|
+      if child.children.count > 0
+        out += pages_for_select(child, level + 1, exclude_self)
+      else
+        unless (child == self && exclude_self)
+          out += [["#{". . " * (level + 1)} #{child.label}", child.id]]
+        end
+      end
+    end
+    out
+  end
+  
+  def full_path
+    "/#{read_attribute(:full_path)}"
+  end
+  
+  def cms_block_content(label, content)
+    self.cms_blocks.select{|b| b.label.to_s == label.to_s}.first.try(content)
+  end
+  
+protected
+  
+  def assign_full_path
+    self.full_path = (self.ancestors.reverse.collect{|p| p.slug}.compact + [self.slug]).join('/')
+  end
+  
+  def validate_redirect_to
+    if self.redirect_to_page && (self == self.redirect_to_page || self.redirect_to_page.redirect_to_page)
+      self.errors.add(:redirect_to_page_id) 
+    end
+  end
+  
+  def save_blocks
+    self.cms_blocks.each do |b|
+      b.save! if b.changed?
+    end
+  end
+  
+  def sync_child_slugs
+    if slug_changed?
+      children.each do |child|
+        child.save!
+      end
+    end
+  end
+end