radiant-tags-extension 1.5.1

data/lib/tagging_methods.rb

@@ -0,0 +1,128 @@
+TaggingMethods = Proc.new do
+  
+  def valid_with_tags?
+    return (self.errors.empty? && valid_without_tags?)
+  end
+  alias_method_chain :valid?, :tags
+  
+  def tag_with tags
+    self.save if self.new_record?
+    # just skip the whole method if the tags string hasn't changed
+    return if tags == tag_list
+    # do we need to delete any tags?
+    tags_to_delete = tag_list.split(MetaTag::DELIMITER) - tags.split(MetaTag::DELIMITER)
+    tags_to_delete.select{|t| meta_tags.delete(MetaTag.find_by_name(t))}
+    
+    tags.split(MetaTag::DELIMITER).each do |tag|
+      begin
+        tag = MetaTag.find_or_initialize_by_name(tag.strip.squeeze(" "))
+        meta_tags << tag unless meta_tags.include?(tag)
+      rescue ActiveRecord::RecordInvalid => e
+        errors.add_to_base("Tags can not contain special characters")
+      rescue ActiveRecord::StatementInvalid => e
+        # With SQLite3 - a duplicate tagging will result in the following message:
+        # SQLite3::SQLException: SQL logic error or missing database: INSERT INTO taggings ("meta_tag_id", "taggable_type", "taggable_id") VALUES(11, 'Page', 74)
+        # raise unless e.to_s =~ /duplicate/i
+      end
+    end
+  end
+  
+  alias :meta_tags= :tag_with
+
+  def tag_list
+    meta_tags.map(&:name).join(MetaTag::DELIMITER)
+  end
+
+   # 
+   # Find all the objects tagged with the supplied list of tags
+   # 
+   # Usage : Model.tagged_with("ruby")
+   #         Model.tagged_with("hello", "world")
+   #         Model.tagged_with("hello", "world", :limit => 10)
+   #
+   def self.tagged_with(*tag_list)
+     options = tag_list.extract_options!
+     tag_list = parse_tags(tag_list)
+   
+     scope = scope(:find)
+     options[:select] ||= "#{table_name}.*"
+     options[:from] ||= "#{table_name}, meta_tags, taggings"
+   
+     sql  = "SELECT #{(scope && scope[:select]) || options[:select]} "
+     sql << "FROM #{(scope && scope[:from]) || options[:from]} "
+
+     add_joins!(sql, options[:joins], scope)
+   
+     sql << "WHERE #{table_name}.#{primary_key} = taggings.taggable_id "
+     sql << "AND taggings.taggable_type = '#{ActiveRecord::Base.send(:class_name_of_active_record_descendant, self).to_s}' "
+     sql << "AND taggings.meta_tag_id = meta_tags.id "
+     sql << "AND pages.site_id = #{current_site.id} " if self.respond_to?(:current_site)
+     
+     tag_list_condition = tag_list.map {|name| "\"#{name.strip.squeeze(' ')}\""}.join(", ")
+   
+     sql << "AND (meta_tags.name IN (#{sanitize_sql(tag_list_condition)})) "
+     sql << "AND #{sanitize_sql(options[:conditions])} " if options[:conditions]
+      
+     columns = column_names.map do |column| 
+       "#{table_name}.#{column}"
+     end.join(", ")
+      
+     sql << "GROUP BY #{columns} "
+     sql << "HAVING COUNT(taggings.meta_tag_id) = #{tag_list.size}"
+   
+     add_order!(sql, options[:order], scope)
+     add_limit!(sql, options, scope)
+     add_lock!(sql, options, scope)
+
+   
+     find_by_sql(sql)
+   end
+   
+   def self.tagged_with_any(*tag_list)
+     options = tag_list.extract_options!
+     tag_list = parse_tags(tag_list)
+   
+     scope = scope(:find)
+     options[:select] ||= "#{table_name}.*"
+     options[:from] ||= "#{table_name}, meta_tags, taggings"
+   
+     sql  = "SELECT #{(scope && scope[:select]) || options[:select]} "
+     sql << "FROM #{(scope && scope[:from]) || options[:from]} "
+
+     add_joins!(sql, options[:joins], scope)
+   
+     sql << "WHERE #{table_name}.#{primary_key} = taggings.taggable_id "
+     sql << "AND taggings.taggable_type = '#{ActiveRecord::Base.send(:class_name_of_active_record_descendant, self).to_s}' "
+     sql << "AND taggings.meta_tag_id = meta_tags.id "
+     sql << "AND pages.site_id = #{current_site.id} " if self.respond_to?(:current_site)
+     
+     sql << "AND ("
+     sql << tag_list.inject([]) do |arr,name|
+              arr << sanitize_sql(["meta_tags.name = ?", name.strip.squeeze(' ')])
+            end.join(" OR ")
+     sql << ") "
+     
+     
+     sql << "AND #{sanitize_sql(options[:conditions])} " if options[:conditions]
+      
+     columns = column_names.map do |column| 
+       "#{table_name}.#{column}"
+     end.join(", ")
+      
+     sql << "GROUP BY #{columns} "
+   
+     add_order!(sql, options[:order], scope)
+     add_limit!(sql, options, scope)
+     add_lock!(sql, options, scope)
+   
+     find_by_sql(sql)
+   end
+ 
+   def self.parse_tags(tags)
+     return [] if tags.blank?
+     tags = Array(tags).first
+     tags = tags.respond_to?(:flatten) ? tags.flatten : tags.split(MetaTag::DELIMITER)
+     tags.map { |tag| tag.strip.squeeze(" ") }.flatten.compact.uniq
+   end
+
+end

data/lib/tasks/tags_extension_tasks.rake

@@ -0,0 +1,32 @@
+namespace :radiant do
+  namespace :extensions do
+    namespace :tags do
+      
+      desc "Runs the migration and update tasks of the Tags extension"
+      task :install => [:environment, :migrate, :update]
+      
+      desc "Runs the migration of the Tags extension"
+      task :migrate => :environment do
+        require 'radiant/extension_migrator'
+        if ENV["VERSION"]
+          TagsExtension.migrator.migrate(ENV["VERSION"].to_i)
+        else
+          TagsExtension.migrator.migrate
+        end
+      end
+      
+      desc "Copy needed files to public dir"
+      task :update => :environment do
+        is_svn_or_dir = proc {|path| path =~ /\.svn/ || File.directory?(path) }
+        Dir[TagsExtension.root + "/public/**/*"].reject(&is_svn_or_dir).each do |file|
+          path = file.sub(TagsExtension.root, '')
+          directory = File.dirname(path)
+          puts "Copying #{path}..."
+          mkdir_p RAILS_ROOT + directory
+          cp file, RAILS_ROOT + path
+        end
+      end
+      
+    end
+  end
+end

data/public/stylesheets/tags.css

@@ -0,0 +1,11 @@
+ol.tag_cloud { list-style: none; }
+.tag_cloud li { display: inline; }
+/* hide the extra context from CSS-enabled browsers, but not screenreaders */
+.tag_cloud span { position: absolute; left: 0px; top: -500px; width: 1px; height: 1px; overflow: hidden; }
+
+.tag_cloud .size1 { font-size: 1em; }
+.tag_cloud .size2 { font-size: 1.3em; }
+.tag_cloud .size3 { font-size: 1.6em; }
+.tag_cloud .size4 { font-size: 1.9em; }
+.tag_cloud .size5 { font-size: 2.2em; }
+.tag_cloud .size6 { font-size: 2.5em; }

data/tags_extension.rb

@@ -0,0 +1,57 @@
+require_dependency 'application_controller'
+require File.dirname(__FILE__)+'/lib/tagging_methods'
+require 'radiant-tags-extension'
+
+class TagsExtension < Radiant::Extension
+  version RadiantTagsExtension::VERSION
+  description "This extension enhances the page model with tagging capabilities, tagging as in \"2.0\" and tagclouds."
+  url "http://gorilla-webdesign.be"  
+  
+  DEFAULT_RESULTS_URL = '/search/by-tag'
+
+  define_routes do |map|
+    if Radiant::Config['tags.results_page_url'].blank?
+      Radiant::Config['tags.results_page_url'] = TagsExtension::DEFAULT_RESULTS_URL if Radiant::Config['tags.results_page_url'].blank?
+    end
+    begin
+      if defined?(SiteLanguage) && SiteLanguage.count > 0
+        include Globalize
+        SiteLanguage.codes.each do |code|
+          langname = Locale.new(code).language.code
+          map.connect "#{langname}#{Radiant::Config['tags.results_page_url']}/:tag", :controller => 'site', :action => 'show_page', :url => Radiant::Config['tags.results_page_url'], :language => code
+        end
+      else if defined?(VhostExtension)
+        map.connect "#{Radiant::Config['tags.results_page_url']}/:tag", :controller => 'site', :action => 'show_page', :url => Radiant::Config['tags.results_page_url']
+      end
+        map.connect "#{Radiant::Config['tags.results_page_url']}/:tag", :controller => 'site', :action => 'show_page', :url => Radiant::Config['tags.results_page_url']
+      end
+    rescue
+      # dirty hack; need to get trough here to allow migrations to run..
+    end  
+  end
+  
+  def activate
+    raise "The Shards extension is required and must be loaded first!" unless defined?(admin.page)
+    if Radiant::Config.table_exists?
+      Radiant::Config['tags.results_page_url'] = TagsExtension::DEFAULT_RESULTS_URL unless Radiant::Config['tags.results_page_url']
+      Radiant::Config['tags.complex_strings'] = 'false' unless Radiant::Config['tags.complex_strings']
+    end
+    TagSearchPage
+    Page.send :include, RadiusTags
+    begin
+      MetaTag
+    rescue
+      # dirty hack; need to get trough here to allow migrations to run..
+    end
+    Page.module_eval &TaggingMethods
+    admin.page.edit.add :extended_metadata, 'tag_field'
+    
+    # HELP
+    if admin.respond_to?(:help)
+      admin.help.index.add :page_details, 'using_tags', :after => 'breadcrumbs'
+    end
+  end
+  
+  def deactivate
+  end
+end

data/test/fixtures/meta_tags.yml

@@ -0,0 +1,12 @@
+lorem:
+  id: 1
+  name: lorem
+ipsum:
+  id: 2
+  name: ipsum
+dolor:
+  id: 3
+  name: dolor
+sit:
+  id: 4
+  name: sit

data/test/fixtures/page_parts.yml

@@ -0,0 +1,17 @@
+display_tags_part:
+  id: 1
+  page_id: 5
+  name: body
+  content: 
+    <h1>Results for <r:search:query /></h1>
+    <r:search:empty>
+      <h2>No pages tagged with "<r:search:query/>".</h2>
+    </r:search:empty>
+    <r:search:results>
+      <h2>These pages are tagged with "<r:search:query/>".</h2>
+      <ul>
+        <r:search:results:each order="desc" by="published_at">
+          <li><r:link/> door <r:author/> op <r:date/></li>
+        </r:search:results:each>
+      </ul>
+    </r:search:results>

data/test/fixtures/pages.yml

@@ -0,0 +1,43 @@
+# Read about fixtures at http://ar.rubyonrails.org/classes/Fixtures.html
+homepage:
+  id: 1
+  title: Ruby Home Page
+  breadcrumb: Home
+  slug: /
+  status_id: 100
+  parent_id:
+  published_at: 2006-01-30 08:41:07 
+documentation:
+  id: 2
+  title: Documentation
+  breadcrumb: Documentation
+  slug: documentation
+  status_id: 100
+  parent_id: 1
+  published_at: 2006-01-31 08:41:07 
+books:
+  id: 3
+  title: Books
+  breadcrumb: Books
+  slug: books
+  status_id: 100
+  parent_id: 2
+  published_at: 2006-01-30 08:41:07 
+textile:
+  id: 4
+  title: Textile
+  breadcrumb: Textile
+  slug: textile
+  status_id: 100
+  parent_id: 1
+  published_at: 2006-01-30 08:41:07
+
+tags_page:
+  id: 5
+  title: Tags Page
+  breadcrumb: tags
+  slug: tags
+  status_id: 100
+  parent_id: 1
+  class_name: TagSearchPage
+  published_at: 2006-01-30 08:41:07

data/test/fixtures/taggings.yml

@@ -0,0 +1,20 @@
+1:
+  meta_tag_id: 1
+  taggable_id: 1
+  taggable_type: Page
+2:
+  meta_tag_id: 2
+  taggable_id: 1
+  taggable_type: Page
+3:
+  meta_tag_id: 3
+  taggable_id: 1
+  taggable_type: Page
+4:
+  meta_tag_id: 1
+  taggable_id: 2
+  taggable_type: Page
+5:
+  meta_tag_id: 2
+  taggable_id: 2
+  taggable_type: Page

data/test/functional/tag_search_page_test.rb

@@ -0,0 +1,44 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class TagSearchPageTest < Test::Unit::TestCase
+  
+  fixtures :pages, :meta_tags, :taggings, :page_parts
+  
+  def setup
+    @page = pages(:tags_page)
+    @page.request = ActionController::TestRequest.new
+    @page.response = ActionController::TestResponse.new
+  end
+  
+  def test_title_gets_set_ok
+    @page.request.request_parameters = {:tag => "foo"}
+    @page.render
+    assert_equal "Tagged with foo", @page.title
+  end
+  
+  def test_no_title_means_no_title_change
+    @page.render
+    assert_equal "Tags Page", @page.title
+  end
+  
+  def test_page_should_show_posts_tagged_with_tag
+    @page.request.request_parameters = {:tag => "lorem"}
+    output = @page.render
+    assert_match /These pages are tagged with "lorem"/, output
+    assert_match /Ruby Home Page/, output
+    assert_match /Documentation/, output
+  end
+  
+  def test_resulting_pages_should_be_sorted
+    @page.request.request_parameters = {:tag => "lorem"}
+    output = @page.render
+    assert_match /Documentation.*Ruby Home Page/, output
+  end
+  
+  def test_unknown_tag_should_say_so
+    @page.request.request_parameters = {:tag => "foobarbar"}
+    output = @page.render
+    assert_match /No pages tagged with "foobarbar"/, output
+  end
+  
+end

data/test/functional/tags_extension_test.rb

@@ -0,0 +1,19 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class TagsExtensionTest < Test::Unit::TestCase
+  
+  fixtures :pages, :meta_tags, :taggings
+  test_helper :render
+  
+  def setup
+    @page = pages(:documentation)
+  end
+  
+  def test_cloud_tag
+    assert_renders "<ol class=\"tag_cloud\"><li class=\"size2\"><span>1 page is tagged with </span><a href=\"?q=dolor\" class=\"tag\">dolor</a></li><li class=\"size3\"><span>2 pages are tagged with </span><a href=\"?q=ipsum\" class=\"tag\">ipsum</a></li><li class=\"size3\"><span>2 pages are tagged with </span><a href=\"?q=lorem\" class=\"tag\">lorem</a></li></ol>", "<r:tag_cloud />"
+  end
+  
+  def test_tag_list
+    assert_renders "<a href=\"?q=ipsum\" class=\"tag\">ipsum</a>, <a href=\"?q=lorem\" class=\"tag\">lorem</a>", "<r:tag_list />"
+  end
+end

data/test/helpers/render_test_helper.rb

@@ -0,0 +1,60 @@
+module RenderTestHelper
+  
+  def assert_renders(expected, input, url = nil, host = nil)
+    output = get_render_output(input, url, host)
+    message = "<#{expected.inspect}> expected but was <#{output.inspect}>"
+    assert_block(message) { expected == output }
+  end
+  
+  def assert_render_match(regexp, input, url = nil)
+    regexp = Regexp.new(regexp) if regexp.kind_of? String
+    output = get_render_output(input, url)
+    message = "<#{output.inspect}> expected to be =~ <#{regexp.inspect}>"
+    assert_block(message) { output =~ regexp }
+  end
+  
+  def assert_render_error(expected_error_message, input, url = nil)
+    output = get_render_output(input, url)
+    message = "expected error message <#{expected_error_message.inspect}> expected but none was thrown"
+    assert_block(message) { false }
+  rescue => e
+    message = "expected error message <#{expected_error_message.inspect}> but was <#{e.message.inspect}>"
+    assert_block(message) { expected_error_message === e.message }
+  end
+  
+  def assert_headers(expected_headers, url = nil)
+    setup_page(url)
+    headers = @page.headers
+    message = "<#{expected_headers.inspect}> expected but was <#{headers.inspect}>"
+    assert_block(message) { expected_headers == headers }
+  end
+  
+  def assert_page_renders(page_name, expected, message = nil)
+    page = pages(page_name)
+    output = page.render
+    message = "<#{expected.inspect}> expected, but was <#{output.inspect}>"
+    assert_block(message) { expected == output }
+  end
+  
+  def assert_snippet_renders(snippet_name, expected, message = nil)
+    snippet = snippets(snippet_name)
+    output = @page.render_snippet(snippet)
+    message = "<#{expected.inspect}> expected, but was <#{output.inspect}>"
+    assert_block(message) { expected == output }
+  end
+  
+  private
+  
+    def get_render_output(input, url, host = nil)
+      setup_page(url, host)
+      @page.send(:parse, input)
+    end
+    
+    def setup_page(url = nil, host = nil)
+      @page.request = ActionController::TestRequest.new
+      @page.request.request_uri = (url || @page.url)
+      @page.request.host = host || "testhost.tld"
+      @page.response = ActionController::TestResponse.new
+    end
+  
+end

data/test/test_helper.rb

@@ -0,0 +1,20 @@
+require 'test/unit'
+# Load the the environment
+unless defined? RADIANT_ROOT
+  ENV["RAILS_ENV"] = "test"
+  require "#{File.expand_path(File.dirname(__FILE__) + "/../../../../")}/config/environment"
+end
+require "#{RADIANT_ROOT}/test/test_helper"
+
+class Test::Unit::TestCase
+  
+  # Include a helper to make testing Radius tags easier
+  test_helper :render
+  
+  # Add the fixture directory to the fixture path
+  self.fixture_path << File.dirname(__FILE__) + "/fixtures"
+  
+  fixtures :users, :pages
+  # Add more helper methods to be used by all extension tests here...
+  
+end

data/test/unit/page_taggability_test.rb

@@ -0,0 +1,20 @@
+require File.dirname(__FILE__) + '/../test_helper'
+
+class PageTaggabilityTest < Test::Unit::TestCase
+  def setup
+    @page = Page.find 1
+  end
+  
+  def test_page_should_be_taggable
+    assert true, @page.respond_to?("tag_with")
+    assert_difference MetaTag, :count, 2 do
+      @page.tag_with 'lorem ipsum'
+    end
+  end
+  
+  def assert_difference(object, method = nil, difference = 1)
+    initial_value = object.send(method)
+    yield
+    assert_equal initial_value + difference, object.send(method), "#{object}##{method}"
+  end
+end

data/vendor/plugins/has_many_polymorphs/.gitignore

@@ -0,0 +1 @@
+test/integration/app/log

data/vendor/plugins/has_many_polymorphs/CHANGELOG

@@ -0,0 +1,86 @@
+v2.2. Various fixes.
+
+v2.13. Merge various fixes for Rails 2.2.2.
+
+v2.12. Improvements to the test suite; bugfixes for STI children (rsl). Remove fancy dependency system in favor of using Dispatcher::to_prepare every time.
+
+v2.11. Rails 1.2.6 tagging generator compatibility; change test suite to use included integration app.
+
+v2.10. Add :parent_conditions option; bugfix for nullified conditions; bugfix for self-referential tagging generator; allow setting of has_many_polymorphs_options hash in Configuration's after_initialize if you need to adjust the autoload behavior; clear error message on missing or improperly namespaced models; fix .build on double-sided relationships; add :namespace key for easier set up of Camping apps or other unusual class structures.
+
+v2.9. Gem version renumbering; my apologies if this messes anyone up.
+
+v2.8. RDoc documentation; repository relocation; Rakefile cleanup; remove deprecated plugin-specific class caching.
+
+v2.7.5. Various bugfixes; Postgres problems may remain on edge.
+
+v2.7.3. Use new :source and :source_type options in 1.2.3 (David Lemstra); fix pluralization bug; add some tests; experimental tagging generator.
+
+v2.7.2. Deprecate has_many_polymorphs_cache_classes= option because it doesn't really work. Use config.cache_classes= instead to cache all reloadable items.
+
+v2.7.1. Dispatcher.to_prepare didn't fire in the console; now using a config.after_initialize wrapper instead.
+
+v2.7. Dependency injection framework elimates having to care about load order.
+
+v2.6. Make the logger act sane for the gem version.
+
+v2.5.2. Allow :skip_duplicates on double relationships.
+
+v2.5.1. Renamed :ignore_duplicates to :skip_duplicates to better express its non-passive behavior; made sure not to load target set on push unless necessary.
+
+v2.5. Activerecord compatibility branch becomes trunk: extra options now supported for double polymorphism; conditions nulled-out and propogated to child relationships; more tests; new :ignore_duplicates option on macro can be set to false if you want << to push duplicate associations.
+
+v2.4.1. Code split into multiple files; tests added for pluralization check; Rails 1.1.6 no longer supported.
+
+v2.4. Unlimited mixed class association extensions for both single and double targets and joins.
+
+v2.3. Gem version
+
+v2.2. API change; prefix on methods is now singular when using :rename_individual_collections.
+
+v2.1. Add configuration option to cache polymorphic classes in development mode.
+
+v2.0. Collection methods (push, delete, clear) now on individual collections.
+
+v1.9.2. Disjoint collection sides bugfix, don't raise on new records.
+
+v1.9.1. Double classify bugfix.
+
+v1.9. Large changes to properly support double polymorphism.
+
+v1.8.2. Bugfix to make sure the type gets checked on doubly polymorphic parents.
+
+v1.8.1. Bugfix for sqlite3 child attribute retrieval.
+
+v1.8. Bugfix for instantiating attributes of namespaced models.
+
+v1.7.1. Bugfix for double polymorphic relationships.
+
+v1.7. Double polymorphic relationships (includes new API method).
+
+v1.6. Namespaced model support.
+
+v1.5. Bugfix for Postgres and Mysql under 1.1.6; refactored tests (hildofur); properly handles legacy table names set with set_table_name().
+
+v1.4. STI support added (use the child class names, not the base class).
+
+v1.3. Bug regarding table names with underscores in SQL query fixed.
+
+v1.2. License change, again.
+
+v1.1. File_column bug fixed.
+
+v1.0. Tests written; after_find and after_initialize now correctly called.
+
+v0.5. SQL performance enhancements added.
+
+v0.4. Rewrote singletons as full-fledged proxy class so that marshalling works (e.g. in the session).
+
+v0.3. Caching added.
+
+v0.2. Fixed dependency reloading problem in development mode.
+
+v0.1. License change.
+
+v0. Added :dependent support on the join table; no changelog before this version.
+