darthapo-comatose 2.0

data/lib/comatose_helper.rb

@@ -0,0 +1,3 @@
+module ComatoseHelper
+  
+end

data/lib/comatose_page.rb

@@ -0,0 +1,141 @@
+# ComatosePage attributes
+#  - parent_id
+#  - title
+#  - full_path
+#  - slug
+#  - keywords
+#  - body
+#  - author
+#  - filter_type
+#  - position
+#  - version
+#  - updated_on
+#  - created_on
+class ComatosePage < ActiveRecord::Base
+  
+  set_table_name 'comatose_pages'
+  
+  # Only versions the content... Not all of the meta data or position
+  acts_as_versioned :table_name=>'comatose_page_versions', :if_changed => [:title, :slug, :keywords, :body]
+  
+  define_option :active_mount_info, {:root=>'', :index=>''}
+
+  acts_as_tree :order => "position, title"
+  acts_as_list :scope => :parent_id
+
+  #before_create :create_full_path
+  before_save :cache_full_path, :create_full_path
+  after_save :update_children_full_path
+
+  # Using before_validation so we can default the slug from the title
+  before_validation do |record|
+    # Create slug from title
+    if record.slug.blank? and !record.title.blank?
+      record.slug = record.title.downcase.lstrip.rstrip.gsub( /[^-a-z0-9~\s\.:;+=_]/, '').gsub(/[\s\.:;=_+]+/, '-').gsub(/[\-]{2,}/, '-').to_s
+    end
+  end
+  
+  # Manually set these, because record_timestamps = false
+  before_create do |record|
+    record.created_on = record.updated_on = Time.now
+  end
+
+  validates_presence_of :title, :on => :save, :message => "must be present"
+  validates_uniqueness_of :slug, :on => :save, :scope=>'parent_id', :message => "is already in use"
+  validates_presence_of :parent_id, :on=>:create, :message=>"must be present"
+
+  # Tests ERB/Liquid content...
+  validates_each :body, :allow_nil=>true, :allow_blank=>true do |record, attr, value|
+    begin
+      body_html = record.to_html
+    rescue SyntaxError
+      record.errors.add :body, "syntax error: #{$!.to_s.gsub('<', '&lt;')}"
+    rescue 
+      record.errors.add :body, "content error: #{$!.to_s.gsub('<', '&lt;')}"
+    end
+  end
+    
+  # Returns a pages URI dynamically, based on the active mount point
+  def uri
+    if full_path == ''
+      active_mount_info[:root]
+    else
+      page_path = (full_path || '').split('/')
+      idx_path = active_mount_info[:index].split('/')
+      uri_root = active_mount_info[:root].split('/')
+      uri_path = ( uri_root + (page_path - idx_path) ).flatten.delete_if {|i| i == "" }
+      ['',uri_path].join('/')
+    end
+  end
+  
+  # Check if a page has a selected keyword... NOT case sensitive. 
+  # So the keyword McCray is the same as mccray
+  def has_keyword?(keyword)
+     @key_list ||= (self.keywords || '').downcase.split(',').map {|k| k.strip }
+     @key_list.include? keyword.to_s.downcase
+   rescue
+     false
+   end
+
+  # Returns the page's content, transformed and filtered...
+  def to_html(options={})
+    #version = options.delete(:version)
+    text = self.body
+    binding = Comatose::ProcessingContext.new(self, options)
+    filter_type = self.filter_type || '[No Filter]'
+    TextFilters.transform(text, binding, filter_type, Comatose.config.default_processor)
+  end
+
+# Static helpers...
+  
+  # Returns a Page with a matching path.
+  def self.find_by_path( path )
+     path = path.split('.')[0] unless path.empty? # Will ignore file extension...
+     path = path[1..-1] if path.starts_with? "/"
+     find( :first, :conditions=>[ 'full_path = ?', path ] )
+  end
+  
+# Overrides...
+
+  # I don't want the AR magic timestamping support for this class...
+  def record_timestamps
+    false
+  end
+  def self.record_timestamps
+    false
+  end
+  
+protected
+
+  # Creates a URI path based on the Page tree
+  def create_full_path
+     if parent_node = self.parent
+        # Build URI Path
+        path = "#{parent_node.full_path}/#{self.slug}"
+        # strip leading space, if there is one...
+        path = path[1..-1] if path.starts_with? "/"
+        self.full_path = path || ""
+     else
+        # I'm the root -- My path is blank
+        self.full_path = ""
+     end
+  end
+  def create_full_path!
+    create_full_path
+    save
+  end
+  
+  # Caches old path (before save) for comparison later
+  def cache_full_path
+    @old_full_path = self.full_path
+  end
+
+  # Updates all this content's child URI paths
+  def update_children_full_path(should_save=true)
+    # OPTIMIZE: Only update all the children if the :slug/:fullpath is different
+    for child in self.children
+      child.create_full_path! unless child.frozen?
+      child.update_children_full_path(should_save)
+    end
+  end
+end

data/lib/liquid.rb

@@ -0,0 +1,52 @@
+# Copyright (c) 2005 Tobias Luetke
+# 
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+# 
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+# 
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOa AND
+# NONINFRINGEMENT. IN NO EVENT SaALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+
+module Liquid
+  FilterSperator              = /\|/
+  ArgumentSeparator           = ','
+  FilterArgumentSeparator     = ':'
+  VariableAttributeSeparator  = '.'
+  TagStart                    = /\{\%/
+  TagEnd                      = /\%\}/
+  VariableStart               = /\{\{/
+  VariableEnd                 = /\}\}/
+  AllowedVariableCharacters   = /[a-zA-Z_.-]/
+  QuotedFragment              = /"[^"]+"|'[^']+'|[^\s,|]+/
+  TagAttributes             = /(\w+)\s*\:\s*(#{QuotedFragment})/
+  TokenizationRegexp          = /(#{TagStart}.*?#{TagEnd}|#{VariableStart}.*?#{VariableEnd})/
+end
+
+require 'liquid/drop'
+require 'liquid/extensions'
+require 'liquid/errors'
+require 'liquid/strainer'
+require 'liquid/context'
+require 'liquid/tag'
+require 'liquid/block'
+require 'liquid/document'
+require 'liquid/variable'
+require 'liquid/file_system'
+require 'liquid/template'
+require 'liquid/standardtags'
+require 'liquid/htmltags'
+require 'liquid/standardfilters'

data/lib/liquid/block.rb

@@ -0,0 +1,96 @@
+module Liquid
+  
+  class Block < Tag
+    def parse(tokens)
+      @nodelist ||= []
+      @nodelist.clear
+
+      while token = tokens.shift 
+
+        case token
+        when /^#{TagStart}/                   
+          if token =~ /^#{TagStart}\s*(\w+)\s*(.*)?#{TagEnd}$/
+
+            # if we found the proper block delimitor just end parsing here and let the outer block
+            # proceed                               
+            if block_delimiter == $1
+              end_tag
+              return
+            end
+
+            # fetch the tag from registered blocks
+            if tag = Template.tags[$1]
+              @nodelist << tag.new($2, tokens)
+            else
+              # this tag is not registered with the system 
+              # pass it to the current block for special handling or error reporting
+              unknown_tag($1, $2, tokens)
+            end              
+          else
+            raise SyntaxError, "Tag '#{token}' was not properly terminated with regexp: #{TagEnd.inspect} "
+          end
+        when /^#{VariableStart}/
+          @nodelist << create_variable(token)
+        when ''
+          # pass
+        else
+          @nodelist << token
+        end
+      end       
+      
+      # Make sure that its ok to end parsing in the current block. 
+      # Effectively this method will throw and exception unless the current block is 
+      # of type Document 
+      assert_missing_delimitation!
+    end                     
+    
+    def end_tag      
+    end
+
+    def unknown_tag(tag, params, tokens)
+      case tag 
+      when 'else'
+        raise SyntaxError, "#{block_name} tag does not expect else tag"
+      when 'end'
+        raise SyntaxError, "'end' is not a valid delimiter for #{block_name} tags. use #{block_delimiter}"
+      else
+        raise SyntaxError, "Unknown tag '#{tag}'"
+      end
+    end
+
+    def block_delimiter
+      "end#{block_name}"
+    end                           
+
+    def block_name
+      self.class.name.scan(/\w+$/).first.downcase
+    end
+
+    def create_variable(token)
+      token.scan(/^#{VariableStart}(.*)#{VariableEnd}$/) do |content|
+        return Variable.new(content.first)
+      end
+      raise SyntaxError.new("Variable '#{token}' was not properly terminated with regexp: #{VariableEnd.inspect} ")
+    end
+
+    def render(context)
+      render_all(@nodelist, context)
+    end
+
+    protected
+
+    def assert_missing_delimitation!
+      raise SyntaxError.new("#{block_name} tag was never closed")
+    end
+
+    def render_all(list, context)
+      list.collect do |token|
+        if token.respond_to?(:render)
+          token.render(context)
+        else
+          token.to_s
+        end
+      end      
+    end
+  end  
+end

data/lib/liquid/context.rb

@@ -0,0 +1,190 @@
+module Liquid
+  
+  class ContextError < StandardError
+  end
+  
+  # Context keeps the variable stack and resolves variables, as well as keywords
+  #
+  #   context['variable'] = 'testing'
+  #   context['variable'] #=> 'testing'
+  #   context['true']     #=> true
+  #   context['10.2232']  #=> 10.2232
+  #   
+  #   context.stack do 
+  #      context['bob'] = 'bobsen'
+  #   end
+  #
+  #   context['bob']  #=> nil  class Context
+  class Context
+    attr_reader :assigns
+    attr_accessor :registers
+    
+    def initialize(assigns = {}, registers = nil)
+      @assigns = [assigns]
+      @registers = registers || {}
+    end
+           
+    def strainer
+      @strainer ||= Strainer.create(self)
+    end
+               
+    # adds filters to this context. 
+    # this does not register the filters with the main Template object. see <tt>Template.register_filter</tt> 
+    # for that
+    def add_filters(filter)
+      return unless filter.is_a?(Module)
+      strainer.extend(filter)
+    end
+                              
+    def invoke(method, *args)
+      if strainer.respond_to?(method)
+        strainer.__send__(method, *args)
+      else
+        return args[0]
+      end        
+    end
+
+    # push new local scope on the stack. use <tt>Context#stack</tt> instead
+    def push
+      @assigns.unshift({})
+    end
+    
+    # merge a hash of variables in the current local scope
+    def merge(new_assigns)
+      @assigns[0].merge!(new_assigns)
+    end
+  
+    # pop from the stack. use <tt>Context#stack</tt> instead
+    def pop
+      raise ContextError if @assigns.size == 1 
+      @assigns.shift
+    end
+    
+    # pushes a new local scope on the stack, pops it at the end of the block
+    #
+    # Example:
+    #
+    #   context.stack do 
+    #      context['var'] = 'hi'
+    #   end
+    #   context['var]  #=> nil
+    #
+    def stack(&block)
+      push
+      begin
+        result = yield
+      ensure 
+        pop
+      end
+      result      
+    end
+  
+    # Only allow String, Numeric, Hash, Array or <tt>Liquid::Drop</tt>
+    def []=(key, value)
+      @assigns[0][key] = value
+    end
+  
+    def [](key)
+      resolve(key)
+    end
+  
+    def has_key?(key)
+      resolve(key) != nil
+    end
+        
+    private
+    
+    # Look up variable, either resolve directly after considering the name. We can directly handle 
+    # Strings, digits, floats and booleans (true,false). If no match is made we lookup the variable in the current scope and 
+    # later move up to the parent blocks to see if we can resolve the variable somewhere up the tree.
+    # Some special keywords return symbols. Those symbols are to be called on the rhs object in expressions
+    #
+    # Example: 
+    #
+    #   products == empty #=> products.empty?
+    #
+    def resolve(key)    
+      case key
+      when nil
+        nil
+      when 'true'
+        true
+      when 'false'
+        false
+      when 'empty'
+        :empty?
+      when 'nil', 'null'
+        nil
+      # Single quoted strings
+      when /^'(.*)'$/
+        $1.to_s
+      # Double quoted strings
+      when /^"(.*)"$/
+        $1.to_s        
+      # Integer and floats
+      when /^(\d+)$/ 
+        $1.to_i
+      when /^(\d[\d\.]+)$/ 
+        $1.to_f
+      else
+        variable(key)
+      end
+    end
+    
+    # fetches an object starting at the local scope and then moving up 
+    # the hierachy 
+    def fetch(key)
+      begin
+        for scope in @assigns
+          if scope.has_key?(key)
+            obj = scope[key]
+            if obj.is_a?(Liquid::Drop)
+              obj.context = self 
+            end
+            return obj
+          end
+        end
+      rescue => e
+        raise ContextError, "Could not fetch key #{key} from context: " + e.message
+      end 
+      nil
+    end
+
+    # resolves namespaced queries gracefully.
+    # 
+    # Example
+    # 
+    #  @context['hash'] = {"name" => 'tobi'}
+    #  assert_equal 'tobi', @context['hash.name']
+    def variable(key)                  
+      parts = key.split(VariableAttributeSeparator)
+      
+      
+      if object = fetch(parts.shift).to_liquid
+        object.context = self if object.is_a?(Liquid::Drop)
+        
+        while not parts.size.zero?
+          next_part_name = parts.shift
+          
+          # If the last part of the context variable is .size we just 
+          # return the count of the objects in this object
+          if next_part_name == 'size' and parts.empty?
+            return object.size if object.is_a?(Array)
+            return object.size if object.is_a?(Hash) && !object.has_key?(next_part_name)
+          end
+          
+          return nil if not object.respond_to?(:has_key?)
+          return nil if not object.has_key?(next_part_name)
+          
+          object = object[next_part_name].to_liquid
+          object.context = self if object.is_a?(Liquid::Drop)
+        end
+
+        object
+      else
+        nil
+      end
+    end                                   
+    
+  end
+end