rad_kit 0.0.6 → 0.0.7

data/lib/text_utils/pipe.rb

@@ -0,0 +1,16 @@
+class TextUtils::Pipe
+  def initialize *processors
+    @processor = processors.reverse.inject nil do |next_processor, meta|
+      klass, args = if meta.is_a? Array
+        [meta[0], meta[1..-1]]
+      else
+        [meta, []]
+      end
+      klass.new next_processor, *args
+    end
+  end
+  
+  def call text
+    @processor.call text, {}
+  end
+end

data/lib/text_utils/processor.rb

@@ -0,0 +1,14 @@
+class TextUtils::Processor
+  def initialize next_processor = nil
+    @next_processor = next_processor
+  end
+  
+  protected
+    def call_next data, env
+      if @next_processor 
+        @next_processor.call data, env 
+      else
+        data
+      end
+    end
+end

data/lib/text_utils/support.rb

@@ -0,0 +1,15 @@
+Object.class_eval do
+  unless method_defined? :try
+    def try method
+      self && self.send(method)
+    end
+  end
+end
+
+
+class String
+  def self.random length = 3
+    @digits ||= ('a'..'z').to_a + (0..9).to_a
+    (0..(length-1)).map{@digits[rand(@digits.size)]}.join
+  end  
+end

data/lib/text_utils/truncate.rb

@@ -0,0 +1,30 @@
+class TextUtils::Truncate < TextUtils::Processor
+  def initialize processor, length
+    super processor
+    @length = length
+  end
+  
+  def call data, env
+    data ||= ""
+  
+    # strip from HTML tags
+    data = data.gsub("<br", " <br").gsub("<p", " <p") # to preserve space in place of <> html elements
+    doc = Nokogiri::XML("<div class='root'>#{data}</div>")
+    data = doc.css('.root').first.content
+  
+    # remove clear space
+    data = data.gsub(/\s+/, ' ')
+
+    # truncate with no broken words
+    data = if data.length >= @length
+      shortened = data[0, @length]
+      splitted = shortened.split(/\s/)
+      words = splitted.length
+      splitted[0, words-1].join(" ") + ' ...'
+    else
+      data
+    end
+    
+    call_next data, env
+  end
+end

data/lib/text_utils.rb

@@ -0,0 +1,23 @@
+require 'digest/md5'
+require 'iconv'
+
+require 'nokogiri'
+require 'bluecloth'
+require 'sanitize'
+
+module TextUtils; end
+
+%w(
+  support
+
+  processor
+  
+  ensure_utf
+  html_sanitizer
+  format_qualifier
+  truncate
+  markdown
+  custom_markdown
+  pipe
+  code_highlighter
+).each{|f| require "text_utils/#{f}"}

data/readme.md

@@ -1,10 +1,3 @@
 # Rapid Application Development Kit for Rad Framework
 
-[add docs]
-
-# Low
-
-- WYSIWYG from WordPress/GitHub
-- remove unused locale tokens
-
-# TODO
+[add docs]

data/spec/controller/authorization_spec.rb

@@ -15,7 +15,7 @@ describe "Authorizations" do
     class ::AuthorizationController
       inherit Rad::Controller::Http
       
-      inherit Rad::Controller::Http::Authorized
+      inherit Rad::Controller::Authorized
     
       require_permission :call_controller_level, only: :controller_level
     

data/spec/controller/captcha_spec.rb

@@ -0,0 +1,66 @@
+require "spec_helper"
+
+describe "Captcha" do
+  before :all do
+    class TheController
+      inherit Rad::Controller::Http, Rad::Controller::Captcha
+      
+      def action
+        render inline: 'ok'
+      end
+    end      
+  end     
+  after(:all){remove_constants :TheController}
+  
+  before do
+    rad.captcha.stub!(:enabled).and_return(true)
+
+    @request = Rad::Http::Request.stub
+    @request.stub!(:from_browser?).and_return(true)
+    
+    @params = Rad::Conveyors::Params.new
+    
+    @controller = TheController.new
+    @controller.stub!(:request).and_return(@request)
+    @controller.stub!(:params).and_return(@params)
+  end
+  
+  it "should allow get for anyone" do
+    @request.stub!(:get?).and_return(true)
+    
+    rad.user = Factory.build :anonymous
+    @controller.call(:action).should == 'ok'
+    
+    rad.user = Factory.build :registered
+    @controller.call(:action).should == 'ok'
+  end
+  
+  it "shouldn't allow non-get for anonymous" do
+    @request.stub!(:get?).and_return(false)
+    
+    rad.user = Factory.build :anonymous
+    -> {@controller.call(:action)}.should raise_error(UserError)
+    
+    rad.user = Factory.build :registered
+    @controller.call(:action).should == 'ok'
+  end
+  
+  it "should display captcha form for anonymous if format is :js" do
+    @request.stub!(:get?).and_return(false)    
+    @params.format = 'js'
+    rad.captcha.stub!(:verify).and_return(false)
+    rad.user = Factory.build :anonymous
+    @controller.stub!(:render).and_return('form')
+    
+    @controller.call(:action).should == 'form'
+  end
+  
+  it "should allow anonymous access if it solved captcha" do
+    @request.stub!(:get?).and_return(false) 
+    @params.format = 'js'
+    rad.captcha.stub!(:verify).and_return(true)
+    rad.user = Factory.build :anonymous
+    
+    @controller.call(:action).should == 'ok'
+  end
+end

data/spec/i18n/i18n_spec/locales/en/general.yml

@@ -0,0 +1,5 @@
+en:
+  name: "Name"
+  comments:
+    one: "%{count} comment"
+    many: "%{count} comments"

data/spec/i18n/i18n_spec/locales/ru/general.yml

@@ -0,0 +1,7 @@
+ru:
+  name: "Имя"
+  comments_count:
+    one: "%{count} комментарий"
+    few: "%{count} комментария"
+    many: "%{count} комментариев"
+    other: "%{count} комментариев"

data/spec/i18n/i18n_spec.rb

@@ -0,0 +1,32 @@
+# encoding: utf-8
+
+require "spec_helper"
+
+describe 'I18n' do
+  before :all do
+    rad.web
+    rad.reset :conveyors
+    
+    I18n.load_path += Dir["#{spec_dir}/locales/*/*.{rb,yml}"]
+  end
+  
+  def t *args
+    I18n.t *args
+  end
+  
+  it "basic" do
+    I18n.locale = 'en'
+    t(:name).should == "Name"
+    t(:name).is_a?(String).should be_true
+    
+    I18n.locale = 'ru'
+    t(:name).should == "Имя"
+  end
+  
+  it "pluggable pluralization" do
+    I18n.locale = 'ru'
+    t(:comments_count, count: 1).should == "1 комментарий"
+    t(:comments_count, count: 2).should == "2 комментария"
+    t(:comments_count, count: 5).should == "5 комментариев"
+  end
+end

data/spec/misc/kit_text_utils_spec.rb

@@ -0,0 +1,29 @@
+require "spec_helper"
+
+describe "TextUtils with Kit extensions" do
+  it "should truncate" do    
+    TextUtils.truncate('lorem ipsum', 10).should == 'lorem ...'
+  end
+  
+  it "should process markdown (should qualify markdown format automatically)" do
+    TextUtils.markup('lorem **ipsum**').should == '<p>lorem <strong>ipsum</strong></p>'
+  end
+  
+  it "should process html (should qualify html format automatically)" do
+    TextUtils.markup('<p>lorem **ipsum**</p>').should == '<p>lorem **ipsum**</p>'
+  end
+  
+  it "code highlight" do
+    rad.config.stub!(:use_code_highlighter).and_return(true)
+    
+    markdown = <<MARKDOWN
+code
+
+``` ruby
+puts "Hello World"
+```
+MARKDOWN
+
+    TextUtils.markup(markdown).should =~ /span/i
+  end
+end

data/spec/misc/prepare_model_spec.rb

@@ -0,0 +1,37 @@
+require "spec_helper"
+
+describe "User Error" do
+  isolate :conveyors, :router, before: :all
+
+  before :all do    
+    rad.delete :conveyors
+    rad.conveyors.web do |web|
+      web.use Rad::Controller::Processors::ControllerCaller
+    end
+    
+    class ::SomeModel
+      def self.find! id
+        id.should == 'some id'
+        SomeModel.new
+      end
+    end
+  end  
+  after :all do
+    remove_constants %w(SomeModel ControllerSpec)
+  end
+  
+  it "user error" do
+    class ::ControllerSpec
+      inherit Rad::Controller::Http
+      
+      prepare_model SomeModel, id: :some_model, variable: 'some_model'
+      
+      def action
+        @some_model.should_not == nil
+        render inline: 'ok'
+      end
+    end
+
+    ccall(ControllerSpec, :action, some_model: 'some id').should == 'ok'
+  end
+end

data/spec/misc/user_error_spec.rb

@@ -0,0 +1,38 @@
+require "spec_helper"
+
+describe "User Error" do    
+  isolate :conveyors, :router, before: :all
+  
+  before(:all) do
+    rad.delete :conveyors
+    rad.conveyors.web do |web|
+      web.use Rad::Controller::Processors::ControllerCaller
+    end
+  end
+  
+  after :all do
+    remove_constants %w(UserErrorSpec)
+  end
+  
+  it "user error" do
+    class ::UserErrorSpec
+      inherit Rad::Controller::Http
+      
+      def action
+        raise_user_error "some error"
+      end      
+      
+      protected
+        def catch_user_error
+          begin
+            yield
+          rescue UserError => ue
+            render inline: "Catched #{ue.message}"
+          end
+        end
+        around :catch_user_error
+    end
+    
+    ccall(UserErrorSpec, :action).should == "Catched some error"
+  end
+end

data/spec/models/authorized_object_spec.rb

@@ -98,6 +98,13 @@ describe "Authorized Object" do
       o.normalized_collaborators.should == %w{manager member user:auser}
     end
     
+    it "anonymous should never be collaborator (from error)" do
+      @user = Factory.build :anonymous
+      o = AModel.new
+      o.owner = @user
+      o.normalized_collaborators.should == []
+    end
+    
     it "viewers and collaborators dependance" do
       o = AModel.new
       o.owner = @user
@@ -174,8 +181,8 @@ describe "Authorized Object" do
         @object = AModel.new        
         @owned_object = AModel.new
         @owned_object.owner = @user
-      end      
-  
+      end
+      
       it "owner?" do                
         @user.should_not be_owner(@object)
         @user.should be_owner(@owned_object)        
@@ -189,7 +196,7 @@ describe "Authorized Object" do
         
         @user.should_not be_owner(@owned_object)
       end
-  
+
       it 'permissions for owner' do
         @user.can?(:manage, @object).should be_false
         @user.can?(:manage, @owned_object).should be_true

data/spec/spec_helper/factories.rb

@@ -11,6 +11,10 @@ Factory.define :user, class: 'Models::User' do |u|
   u.sequence(:name){|i| "user#{i}"}  
 end
 
+Factory.define :registered, parent: :user do |u|
+  u.name 'alex'
+end
+
 Factory.define :admin, parent: :user do |u|
   u.admin true
 end

data/spec/spec_helper/user.rb

@@ -5,9 +5,8 @@ class Models::User
 
   include Mongoid::Authorized
 
-  def anonymous?
-    name == 'anonymous'
-  end        
+  # def self.anonymous_name; 'anonymous' end
+  # def anonymous?; name == self.class.anonymous_name end    
 
   class << self
     def avatar_url *a; end

data/spec/spec_helper.rb

@@ -3,11 +3,6 @@ require 'rspec_ext'
 require 'rad'
 require 'rad/spec'
 
-require 'rad_ext'
-require 'rad_ext/spec'
-
-# require 'mongoid_rad'
-
 require 'kit/spec'
 
 # rad.config.runtime_path = 'tmp'

data/spec/text_utils/code_highlighter_spec.rb

@@ -0,0 +1,38 @@
+require 'text_utils/spec_helper'
+
+describe "Markdown" do
+  include RSpec::TextUtilsHelper
+  
+  before do
+    @processor = TextUtils::CodeHighlighter.new
+    @options = {format: :html}
+  end
+  
+  it_should_behave_like 'text processor'
+  
+  it "basic" do
+    process(%{<p> text </p><code lang='ruby'>class A; p "Hello World" end</code><p> text </p>}).should =~ /span/i
+    process(%{<p> text </p><code language='ruby'>class A; p "Hello World" end</code><p> text </p>}).should =~ /span/i
+    process(%{<code lang='ruby'>\nclass A \n  def p\n    10\n  end\nend \n</code>}).should =~ /span/i
+  end
+  
+  it "should works with < and > in code" do
+    process(%{<code lang='ruby'>class A < ClassB; end</code>}).should include('ClassB')
+  end
+  
+  it 'should preserve custom classes in <code>' do
+    process(%{<code lang='ruby' class='my_code'>\nclass A \n  def p\n    10\n  end\nend \n</code>}).should =~ /my_code/i
+  end
+  
+  it 'markdown' do
+    markdown = <<MARKDOWN
+text
+
+``` ruby
+print "Hello World"
+```
+MARKDOWN
+    
+    process(markdown).should =~ /span/i
+  end
+end

data/spec/text_utils/custom_markdown_spec.rb

@@ -0,0 +1,82 @@
+require 'text_utils/spec_helper'
+
+describe "Markdown" do
+  include RSpec::TextUtilsHelper
+  
+  before do
+    markdown = TextUtils::Markdown.new
+    @processor = TextUtils::CustomMarkdown.new markdown
+    @options = {format: :markdown}
+  end
+  
+  it_should_behave_like 'text processor'
+  
+  it "should apply markup inside of html elements (from error)" do
+    html = <<HTML
+<div class='right'>
+![img]
+</div>
+
+[img]: /some_link
+HTML
+  
+    to_doc(html).css('.right img').size.should == 1
+  end
+  
+  it "should leave existing links intact" do
+    doc = to_doc(%{<a href="http://some_domain.com">http://some_domain.com</a>})
+    doc.css('a').size.should == 1
+    doc.css('a').first['href'].should == "http://some_domain.com"
+  end    
+  
+  describe 'image box' do
+    it "should use simplifyed syntax for image boxes (!![img_thumb] => [![img_thumb]][img_full_version])" do
+      html = <<HTML
+!![img]
+![img]
+
+!![img_2]
+![img_2]
+
+[img]: /some_prefix/image_name.png
+[img_2]: /some_prefix/image_name2.icon.png
+HTML
+
+      doc = to_doc html
+      doc.css('a').first.to_fuzzy_hash.should == {href: "/some_prefix/image_name.png"}
+      doc.css('a img').first.to_fuzzy_hash.should == {src: "/some_prefix/image_name.thumb.png"}
+  
+      doc.css('a').last.to_fuzzy_hash.should == {href: "/some_prefix/image_name2.png"}
+      doc.css('a img').last.to_fuzzy_hash.should == {src: "/some_prefix/image_name2.icon.png"}
+  
+      doc.css('img').size.should == 4
+    end
+
+    it "simplifyed syntax for image boxes should be robust (from error)" do
+      html = "!![img] " # without resolved reference
+      lambda{process(html)}.should_not raise_error
+    end
+  end
+
+  # discarded
+  # it "clear div" do
+  #   html = "[clear]"
+  #   
+  #   doc = to_doc html
+  #   doc.css('div.clear').size.should == 1
+  # end
+  
+  # discarded
+  # it "space div" do
+  #   html = "[space]"
+  #   
+  #   doc = to_doc html
+  #   doc.css('div.space').size.should == 1
+  # end  
+  
+  # discarded
+  # it "should skip empty paragraphs" do
+  #   html = "line 1\n\nline 2\n\n\n\nline 3"
+  #   process(html).should =~ /<p>\s*line 1<\/p>\n<p>line 2<\/p>\n<p>line 3\s*<\/p>.?/
+  # end
+end

data/spec/text_utils/format_qualifier_spec.rb

@@ -0,0 +1,37 @@
+require 'text_utils/spec_helper'
+
+describe "FormatQualifier" do
+  before do
+    @processor = TextUtils::FormatQualifier.new
+  end
+  
+  it_should_behave_like 'text processor'
+  
+  it "should qualify format" do
+    [
+      '<b>some</b>',                 :html,
+      '<b>some</b> <p>other</p>',    :html,
+      ' <b> some</b> ',              :html,
+      '<b/>',                        :html,
+      '<b>',                         :markdown,
+      'abc',                         :markdown
+    ].each_slice 2 do |text, format|
+      env = {}
+      @processor.call(text, env)
+      env[:format].should == format
+    end
+  end
+  
+  it "should qualify :html (from error)" do
+    html = <<HTML
+<h2>Title</h2>
+
+<p>body</p>    
+HTML
+
+    env = {}
+    @processor.call(html, env)
+    env[:format].should == :html    
+  end
+  
+end

data/spec/text_utils/html_sanitizer_spec.rb

@@ -0,0 +1,88 @@
+require 'text_utils/spec_helper'
+
+describe "HtmlSanitizer" do
+  include RSpec::TextUtilsHelper
+  
+  before do
+    @processor = TextUtils::HtmlSanitizer.new
+    @options = {format: :html}
+  end
+  
+  it_should_behave_like 'text processor'
+  
+  it "should escape restricted tags" do
+    %w(script object).each do |tag|
+      html = "<#{tag}}>some text</#{tag}>"
+      process(html).should_not include(tag)
+    end
+  end
+  
+  it "shouldn't escape non-restricted tags" do
+    common_attr_names = %w(class style)
+    {
+      iframe: %w(height scrolling src width),
+      a:      %w(href title rel)
+    }.each do |tag, attr_names|
+      attrs = {}; (common_attr_names + attr_names).each{|n| attrs[n] = 'value'}
+      
+      attrs_html = ""; attrs.each{|n, v| attrs_html << "#{n}='#{v}'"}
+      html = "<#{tag} #{attrs_html}}>some text</#{tag}>"
+      
+      to_doc(html).css(tag.to_s).first.to_fuzzy_hash.should == attrs
+    end
+  end
+  
+  it "should allow image inside of link (from error)" do
+    html = <<HTML
+<a rel="images" class="image_box" href="/some_image">
+  <img src="/some_image"/>
+</a>
+HTML
+
+    doc = to_doc html
+    doc.css('a').first.to_fuzzy_hash.should == {href: "/some_image", class: "image_box"}
+    doc.css('a img').first.to_fuzzy_hash.should == {src: "/some_image"}
+  end
+    
+  it "should allow 'a' elements (from error)" do
+    html = <<HTML
+<a href="http://www.some.com/some">Absolute Link</a>
+<a href="/some">Relative Link</a>
+HTML
+
+    doc = to_doc html
+    doc.css("a").first[:href].should == "http://www.some.com/some"
+    doc.css("a").last[:href].should == "/some"
+  end
+  
+  it "should allow div with any classes (from error)" do
+    html = %{<div class="col3 left"><a href='#'>text</a></div>}
+    to_doc(html).css("div.col3.left a").size.should == 1
+  end
+  
+  it "should embed YouTube Videos" do 
+    html =<<HTML
+<object width="425" height="344">
+<param name="movie" value="http://www.youtube.com/v/s8hYKKXV5wU&hl=en_US&fs=1&"></param>
+<param name="allowFullScreen" value="true"></param>
+<param name="allowscriptaccess" value="always"></param>
+<embed src="http://www.youtube.com/v/s8hYKKXV5wU&hl=en_US&fs=1&" type="application/x-shockwave-flash" allowscriptaccess="always" allowfullscreen="true" width="425" height="344"></embed>
+</object>
+HTML
+
+    doc = to_doc html
+    obj = doc.css("object").first.to_fuzzy_hash.should == {width: '425', height: '344'}
+    p1, p2, p3, embed = doc.css('object *')
+    p1.to_fuzzy_hash.should == {name: 'movie', value: 'http://www.youtube.com/v/s8hYKKXV5wU&hl=en_US&fs=1&'}
+    p2.to_fuzzy_hash.should == {name: 'allowFullScreen', value: 'true'}
+    p3.to_fuzzy_hash.should == {name: 'allowscriptaccess', value: 'always'}
+    embed.to_fuzzy_hash.should == {
+      src: 'http://www.youtube.com/v/s8hYKKXV5wU&hl=en_US&fs=1&', 
+      type: 'application/x-shockwave-flash', 
+      allowscriptaccess: 'always',
+      allowfullscreen: 'true', 
+      width: '425', 
+      height: '344'
+    }
+  end
+end