radiant 0.5.0

data/lib/advanced_delegation.rb

@@ -0,0 +1,21 @@
+class Module
+  def delegate_to(object, *collection)
+    collection = [*collection]
+    is_hash = ((collection.size == 1) and collection.first.kind_of?(Hash))
+    hash = is_hash ? collection.first : nil
+  
+    delegate_to_method = lambda do |as, method|
+      module_eval() do
+        define_method(as) do |*args|
+          send(object).send(method, *args)
+        end
+      end
+    end
+  
+    if hash
+      hash.each { |as, method| delegate_to_method.call(as, method) }
+    else
+      collection.each { |method| delegate_to_method.call(method, method) }
+    end
+  end
+end

data/lib/archive_index_behavior_tags_and_methods.rb

@@ -0,0 +1,48 @@
+module ArchiveIndexBehaviorTagsAndMethods
+  def self.included(base)
+    base.module_eval do
+      define_tags do        
+        url = request.request_uri unless request.nil?
+        
+        tag "archive" do |tag|
+          tag.expand
+        end
+
+        year, month, day = $1, $2, $3 if url =~ %r{/(\d{4})(?:/(\d{2})(?:/(\d{2}))?)?/?$}
+
+        tag "title" do |tag|
+          page = tag.locals.page
+          if year
+            Date.new((year || 1).to_i, (month || 1).to_i, (day || 1).to_i).strftime(page.title)
+          else
+            page.title
+          end
+        end
+
+        tag "archive:year" do |tag|
+          year unless year.nil?
+        end
+        
+        tag "archive:month" do |tag|
+          Date.new(year.to_i, month.to_i, 1).strftime('%B') rescue ''
+        end
+        
+        tag "archive:day" do |tag|
+          day.to_i unless day.nil?
+        end
+        
+        tag "archive:day_of_week" do |tag|
+          Date.new(year.to_i, month.to_i, day.to_i).strftime('%A') rescue ''
+        end
+        
+        tag("archive:children:first") { "unimplemented" }
+        tag("archive:children:last" ) { "unimplemented" }
+        tag("archive:children:count") { "unimplemented" }
+      end
+
+      def page_virtual?
+        true
+      end
+    end
+  end
+end

data/lib/generators/behavior/USAGE

@@ -0,0 +1,16 @@
+Description:
+    The behavior generator creates stubs for a new behavior.
+
+    The generator takes a model name as its argument.  The model name may be
+    given in CamelCase or under_score and should not be suffixed with 'Behavior'.
+
+    The generator creates a model class in app/behaviors and a test suite in
+    test/unit/behaviors.
+
+Example:
+    ./script/generate behavior BookArchive
+
+    This will create a BookArchive behavior:
+        Behavior:   app/behaviors/book_archive_behavior.rb
+        Test:       test/unit/behaviors/book_archive_behavior_test.rb
+

data/lib/generators/behavior/behavior_generator.rb

@@ -0,0 +1,22 @@
+class BehaviorGenerator < Rails::Generator::NamedBase
+
+  def manifest
+    record do |m|
+      # Check for class naming collisions.
+      m.class_collisions class_path, "#{class_name}Behavior", "#{class_name}BehaviorTest"
+
+      # Model, test, and fixture directories.
+      m.directory File.join('app/behaviors', class_path)
+      m.directory File.join('test/unit/behaviors', class_path)
+
+      # Model class, unit test, and fixtures.
+      m.template 'model.rb.template',      File.join('app/behaviors', class_path, "#{file_name}_behavior.rb")
+      m.template 'unit_test.rb.template',  File.join('test/unit/behaviors', class_path, "#{file_name}_behavior_test.rb")
+    end
+  end
+  
+  def behavior_name
+    class_name.gsub(/([A-Z][a-z])/, ' \1').strip
+  end
+
+end

data/lib/generators/behavior/templates/model.rb.template

@@ -0,0 +1,9 @@
+class <%= class_name %>Behavior < Behavior::Base
+  
+  register "<%= behavior_name %>"
+  
+  description %{
+    Describe <%= behavior_name %> behavior here.
+  }
+  
+end

data/lib/generators/behavior/templates/unit_test.rb.template

@@ -0,0 +1,16 @@
+require File.dirname(__FILE__) + '<%= '/..' * class_nesting_depth %>/../../test_helper'
+
+class <%= class_name %>BehaviorTest < Test::Unit::TestCase
+  test_helper :behavior_render
+  
+  def setup
+    @page = Page.new(:title => 'Test Page', :slug => "\\")
+    @page.behavior_id = '<%= behavior_name %>'
+    @behavior = @page.behavior
+  end
+  
+  # Replace this with your real tests.
+  def test_title_tag
+    assert_renders 'Test Page', '<r:title />'
+  end
+end

data/lib/generators/filter/USAGE

@@ -0,0 +1,16 @@
+Description:
+    The filter generator creates stubs for a new filter.
+
+    The generator takes a model name as its argument.  The model name may be
+    given in CamelCase or under_score and should not be suffixed with 'Filter'.
+
+    The generator creates a model class in app/filters and a test suite in
+    test/unit/filters.
+
+Example:
+    ./script/generate filter RDoc
+
+    This will create a RDoc filter:
+        Behavior:   app/filters/r_doc_filter.rb
+        Test:       test/unit/filters/r_doc_filter_test.rb
+

data/lib/generators/filter/filter_generator.rb

@@ -0,0 +1,22 @@
+class FilterGenerator < Rails::Generator::NamedBase
+
+  def manifest
+    record do |m|
+      # Check for class naming collisions.
+      m.class_collisions class_path, "#{class_name}Filter", "#{class_name}FilterTest"
+
+      # Model, test, and fixture directories.
+      m.directory File.join('app/filters', class_path)
+      m.directory File.join('test/unit/filters', class_path)
+
+      # Model class, unit test, and fixtures.
+      m.template 'model.rb.template',      File.join('app/filters', class_path, "#{file_name}_filter.rb")
+      m.template 'unit_test.rb.template',  File.join('test/unit/filters', class_path, "#{file_name}_filter_test.rb")
+    end
+  end
+  
+  def filter_name
+    class_name.gsub(/([A-Z][a-z])/, ' \1').strip
+  end
+
+end

data/lib/generators/filter/templates/model.rb.template

@@ -0,0 +1,8 @@
+class <%= class_name %>Filter < TextFilter::Base
+  register "<%= filter_name %>"
+  
+  def filter(text)
+    # filter text here
+    text
+  end
+end

data/lib/generators/filter/templates/unit_test.rb.template

@@ -0,0 +1,7 @@
+require File.dirname(__FILE__) + '<%= '/..' * class_nesting_depth %>/../test_helper'
+
+class <%= class_name %>BehaviorTest < Test::Unit::TestCase
+  def test_registered_id
+    assert_equal '<%= filter_name %>', <%= class_name %>Filter.registered_id
+  end
+end

data/lib/inheritable_class_attributes.rb

@@ -0,0 +1,65 @@
+module InheritableClassAttributes
+  def self.included(base)
+    base.extend ClassMethods
+    base.module_eval do
+      class << self
+        alias inherited_without_inheritable_class_attributes inherited
+        alias inherited inherited_with_inheritable_class_attributes
+      end
+    end
+  end
+  
+  module ClassMethods
+    def inheritable_cattr_readers
+      @inheritable_class_readers ||= []
+    end
+    
+    def inheritable_cattr_writers
+      @inheritable_class_writers ||= []
+    end
+    
+    def cattr_inheritable_reader(*symbols)
+      symbols.each do |symbol|
+        self.inheritable_cattr_readers << symbol
+        self.module_eval %{
+          def self.#{symbol}
+            @#{symbol}
+          end 
+        }
+      end
+      self.inheritable_cattr_readers.uniq!
+    end
+    
+    def cattr_inheritable_writer(*symbols)
+      symbols.each do |symbol|
+        self.inheritable_cattr_writers << symbol
+        self.module_eval %{
+          def self.#{symbol}=(value)
+            @#{symbol} = value
+          end 
+        }
+      end
+      self.inheritable_cattr_writers.uniq!
+    end
+    
+    def cattr_inheritable_accessor(*symbols)
+      cattr_inheritable_writer(*symbols)
+      cattr_inheritable_reader(*symbols)
+    end
+    
+    def inherited_with_inheritable_class_attributes(klass)
+      inherited_without_inheritable_class_attributes(child) if respond_to?(:inherited_without_inheritable_class_attributes)
+      
+      readers = inheritable_cattr_readers.dup
+      writers = inheritable_cattr_writers.dup
+      inheritables = [:inheritable_cattr_readers, :inheritable_cattr_writers]
+      
+      (readers + writers + inheritables).uniq.each do |attr|
+        var = "@#{attr}"
+        old_value = self.module_eval(var)
+        new_value = (old_value.dup rescue old_value)
+        klass.module_eval("#{var} = new_value")
+      end
+    end
+  end
+end

data/lib/login_system.rb

@@ -0,0 +1,80 @@
+module LoginSystem
+  def self.append_features(base)
+    base.class_eval %{
+      before_filter :authenticate
+      
+      @@controllers_where_no_login_required = []
+      @@controller_permissions = Hash.new { |h, k| h[k] = Hash.new { |h, k| h[k] = Hash.new } }
+    }
+    base.extend ClassMethods
+    super
+  end
+  
+  protected
+  
+    def authenticate
+      action = params['action'].to_s.intern
+      user = session[:user]
+      if no_login_required? or (user and user_has_access_to_action?(action))
+        true
+      else
+        if user
+          permissions = self.class.controller_permissions[self.class][action]
+          flash[:error] = permissions[:denied_message] || 'Access denied.'
+          redirect_to permissions[:denied_url] || { :action => :index }
+        else
+          redirect_to login_url
+        end
+        false
+      end
+    end
+  
+    def no_login_required?
+      controllers = self.class.controllers_where_no_login_required
+      controllers.include?(self.class)
+    end
+  
+    def user_has_role?(role)
+      session[:user].send("#{role}?")
+    end
+    
+    def user_has_access_to_action?(action)
+      permissions = self.class.controller_permissions[self.class][action]
+      case
+      when allowed_roles = permissions[:when]
+        allowed_roles = [allowed_roles].flatten
+        allowed_roles.each do |role|
+          return true if user_has_role?(role)
+        end
+        false
+      when condition_method = permissions[:if]
+        send(condition_method)
+      else
+        true
+      end
+    end
+  
+  module ClassMethods
+    def no_login_required
+      controllers_where_no_login_required << self
+    end
+    
+    def only_allow_access_to(*args)
+      options = {}
+      options = args.pop.dup if args.last.kind_of?(Hash)
+      options.symbolize_keys!
+      actions = args.map { |a| a.to_s.intern }
+      actions.each do |action|
+        controller_permissions[self][action] = options
+      end
+    end
+    
+    def controller_permissions
+      self.class_eval %{ @@controller_permissions }
+    end
+    
+    def controllers_where_no_login_required
+      self.class_eval %{ @@controllers_where_no_login_required }
+    end
+  end
+end

data/lib/plugins/index_quoting_fix/init.rb

@@ -0,0 +1,32 @@
+#
+# Repairs a quoting problem with Active Record, repaired on Edge Rails
+#
+module ActiveRecord::ConnectionAdapters::SchemaStatements
+  def add_column(table_name, column_name, type, options = {})
+    add_column_sql = "ALTER TABLE #{table_name} ADD #{quote_column_name(column_name)} #{type_to_sql(type, options[:limit])}"
+    add_column_options!(add_column_sql, options)
+    execute(add_column_sql)
+  end
+  
+  def remove_column(table_name, column_name)
+    execute "ALTER TABLE #{table_name} DROP #{quote_column_name(column_name)}"
+  end
+  
+  def add_index(table_name, column_name, options = {})
+    column_names = Array(column_name)
+    index_name   = index_name(table_name, :column => column_names.first)
+
+    if Hash === options # legacy support, since this param was a string
+      index_type = options[:unique] ? "UNIQUE" : ""
+      index_name = options[:name] || index_name
+    else
+      index_type = options
+    end
+    quoted_column_names = column_names.map { |e| quote_column_name(e) }.join(", ")
+    execute "CREATE #{index_type} INDEX #{quote_column_name(index_name)} ON #{table_name} (#{quoted_column_names})"
+  end
+  
+  def remove_index(table_name, options = {})
+    execute "DROP INDEX #{quote_column_name(index_name(table_name, options))} ON #{table_name}"
+  end
+end

data/lib/plugins/string_io/init.rb

@@ -0,0 +1,2 @@
+# For some reason 1.1 forgot to require "stringio". This causes problems for schema.rb
+require 'stringio'

data/lib/radiant.rb

@@ -0,0 +1,5 @@
+RADIANT_ROOT = File.join(File.dirname(__FILE__), "..") unless defined? RADIANT_ROOT
+
+module Radiant
+  Version = '0.5.0'
+end

data/lib/registerable.rb

@@ -0,0 +1,70 @@
+module Registerable
+  def self.append_features(base)
+    base.class_eval %{
+      @@registered = {}
+      
+      def self.registered
+        # protect access to hash
+        @@registered.dup
+      end
+
+      def self.register(id, klass)
+        id = id.to_s.strip
+        unless @@registered[id]
+          @@registered[id] = klass
+          klass.class_eval "def self.registered_id; '\#{id}'; end"
+        else
+          raise "ID `\#{id}' already registered. Choose another ID."
+        end
+      end
+
+      def self.find_all
+        self.registered.inject([]) { |a, (k, v)| a << v }.sort_by { |f| f.registered_id }
+      end
+      
+      def self.[](id)
+        id = id.to_s.strip
+        if @@registered.has_key?(id)
+          @@registered[id]
+        else
+          Base
+        end
+      end
+      
+      def self.create(id)
+        self[id].new
+      end
+        
+      class Base
+        def self.register(id)
+          #{base.name}.register(id, self)
+        end
+        
+        def self.registered_id
+          nil
+        end
+        
+        def registered_id
+          self.class.registered_id
+        end
+      end
+    }
+    super
+  end
+end
+
+require 'active_record'
+class ActiveRecord::Base
+  def self.registered_attr(symbol, registerable_module)
+    module_eval %{
+      def #{symbol}
+        if @#{symbol}.nil? or (@old_#{symbol}_id != #{symbol}_id)
+          @old_#{symbol}_id = #{symbol}_id
+          @#{symbol} = #{registerable_module}[#{symbol}_id].new
+        else
+          @#{symbol}
+        end
+      end
+    }
+  end
+end