card 1.18.6 → 1.19.0

data/lib/card/location.rb

@@ -1,36 +0,0 @@
-class Card
-  module Location
-    # page_path    takes a Card::Name, adds the format and query string to
-    #              url_key (site-absolute)
-    # card_path    makes a relative path site-absolute (if not already)
-    # card_url     makes it a full url (if not already)
-
-    # TESTME
-    def page_path title, opts={}
-      Rails.logger.warn "Pass only Card::Name to page_path #{title.class}, #{title}" unless Card::Name === title
-      format = opts[:format] ? ".#{opts.delete(:format)}" : ''
-      action = opts[:action] ? "#{opts.delete(:action)}/" : ''
-      query  = opts.present? ? "?#{opts.to_param}" : ''
-      card_path "#{action}#{title.to_name.url_key}#{format}#{query}"
-    end
-
-    def card_path rel_path
-      Rails.logger.warn "Pass only strings to card_path: #{rel_path.class}, #{rel_path}" unless String === rel_path
-      if rel_path =~ /^\//
-        rel_path
-      else
-        "#{Card.config.relative_url_root}/#{rel_path}"
-      end
-    end
-
-    def card_url rel
-      if rel =~ /^https?\:/
-        rel
-      else
-        "#{Card::Env[:protocol]}#{Card::Env[:host]}#{card_path rel}"
-      end
-    end
-
-    extend Location
-  end
-end

data/lib/card/simplecov_helper.rb

@@ -1,70 +0,0 @@
-def is_in_mod? file, mod_path
-  mod_msg = "below pulled from #{Rails.root}/mod/#{mod_path}/"
-  file.src.join('') =~ /#{mod_msg}/
-end
-
-def card_simplecov_filters
-  add_filter 'spec/'
-  add_filter '/config/'
-  add_filter '/tasks/'
-  # filter all card mods
-  add_filter do |src_file|
-    src_file.filename =~ /tmp\// && !/\d+-(.+\.rb)/.match(src_file.filename) do |m|
-      Dir["mod/**/#{m[1].tr('-', '/').sub('/', '/set/')}"].present?
-    end
-  end
-  # add group for each deck mod
-  Dir['mod/*'].map { |path| path.sub('mod/', '') }.each do |mod|
-    add_group mod.capitalize do |src_file|
-      src_file.filename =~ /mod\/#{mod}\// ||
-        (
-          src_file.filename =~ /tmp\// &&
-          (match = /\d+-(.+\.rb)/.match(src_file.filename) do |m|
-            # '/set' is not in the path anymore after some updates
-            # but `set` exists in the path of the source files
-            Dir["mod/**/#{m[1].tr('-', '/').sub('/', '/set/')}"].present?
-          end) &&
-          is_in_mod?(src_file, mod)
-        )
-    end
-  end
-
-  add_group 'Sets' do |src_file|
-    src_file.filename =~ /tmp\/set\// &&
-      /\d+-(.+\.rb)/.match(src_file.filename) { |m| Dir["mod/**/#{m[1]}"].present? }
-  end
-  add_group 'Set patterns' do |src_file|
-    src_file.filename =~ /tmp\/set_pattern\// &&
-      /\d+-(.+\.rb)/.match(src_file.filename) { |m| Dir["mod/**/#{m[1]}"].present? }
-  end
-  add_group 'Formats' do |src_file|
-    src_file.filename =~ /mod\/[^\/]+\/formats/
-  end
-  add_group 'Chunks' do |src_file|
-    src_file.filename =~ /mod\/[^\/]+\/chunks/
-  end
-end
-
-def card_core_dev_simplecov_filters
-  filters.clear # This will remove the :root_filter that comes via simplecov's defaults
-  add_filter do |src|
-    !(src.filename =~ /^#{SimpleCov.root}/) unless src.filename =~ /card/
-  end
-
-  add_filter '/spec/'
-  add_filter '/features/'
-  add_filter '/config/'
-  add_filter '/tasks/'
-  add_filter '/generators/'
-  add_filter 'lib/card'
-
-  add_group 'Card', 'lib/card'
-  add_group 'Set Patterns', 'tmp/set_pattern/'
-  add_group 'Sets',         'tmp/set/'
-  add_group 'Formats' do |src_file|
-    src_file.filename =~ /mod\/[^\/]+\/format/
-  end
-  add_group 'Chunks' do |src_file|
-    src_file.filename =~ /mod\/[^\/]+\/chunk/
-  end
-end

data/lib/card/spec_helper.rb

@@ -1,147 +0,0 @@
-module SpecHelper
-end
-module Card::SpecHelper
-  include Rails::Dom::Testing::Assertions::SelectorAssertions
-  # ~~~~~~~~~  HELPER METHODS ~~~~~~~~~~~~~~~#
-
-  def login_as user
-    Card::Auth.current_id = (uc = Card[user.to_s]) && uc.id
-    return unless @request
-    @request.session[:user] = Card::Auth.current_id
-    # warn "(ath)login_as #{user.inspect}, #{Card::Auth.current_id}, #{@request.session[:user]}"
-  end
-
-  def create! name, content=''
-    Card.create! name: name, content: content
-  end
-
-  def assert_view_select view_html, *args, &block
-    node = Nokogiri::HTML::Document.parse(view_html).root
-    if block_given?
-      assert_select node, *args, &block
-    else
-      assert_select node, *args
-    end
-  end
-
-  def debug_assert_view_select view_html, *args, &block
-    Rails.logger.rspec %(
-                       #{CodeRay.scan(Nokogiri::XML(view_html, &:noblanks).to_s, :html).div}
-      <style>
-        .CodeRay {
-          background-color: #FFF;
-          border: 1px solid #CCC;
-          padding: 1em 0px 1em 1em;
-        }
-        .CodeRay .code pre { overflow: auto }
-      </style>
-    )
-    assert_view_select view_html, *args, &block
-  end
-
-  def render_editor type
-    card = Card.create(name: "my favority #{type} + #{rand(4)}", type: type)
-    card.format.render(:edit)
-  end
-
-  def render_content content, format_args={}
-    render_content_with_args content, format_args
-  end
-
-  def render_content_with_args content, format_args={}, view_args={}
-    @card ||= Card.new name: 'Tempo Rary 2'
-    @card.content = content
-    @card.format(format_args)._render :core, view_args
-  end
-
-  def render_card view, card_args={}, format_args={}
-    render_card_with_args view, card_args, format_args
-  end
-
-  def render_card_with_args view, card_args={}, format_args={}, view_args={}
-    card = begin
-      if card_args[:name]
-        Card.fetch card_args[:name], new: card_args
-      else
-        Card.new card_args.merge(name: 'Tempo Rary')
-      end
-    end
-    card.format(format_args)._render(view, view_args)
-  end
-
-  def users
-    SharedData::USERS.sort
-  end
-
-  # Make expectations in the event phase.
-  # Takes a stage and registers the event_block in this stage as an event.
-  # Unknown methods in the event_block are executed in the rspec context
-  # instead of the card's context.
-  # An additionally :trigger block in opts is expected that is called
-  # to start the event phase.
-  # Other event options like :on or :when are not supported yet.
-  # Example:
-  # in_stage :initialize,
-  #          trigger: ->{ test_card.update_attributes! content: '' } do
-  #            expect(item_names).to eq []
-  #          end
-  def in_stage stage, opts={}, &event_block
-    stage_sym = :"#{stage}_stage"
-    $rspec_binding = binding
-    add_test_event stage_sym, :in_stage_test, &event_block
-    trigger =
-      if opts[:trigger].is_a?(Symbol)
-        method(opts[:trigger])
-      else
-        opts[:trigger]
-      end
-    trigger.call
-  ensure
-    remove_test_event stage_sym, :in_stage_test
-  end
-
-  def add_test_event stage, name, &event_block
-    Card.class_eval do
-      def method_missing m, *args
-        begin
-          method = eval('method(%s)' % m.inspect, $rspec_binding)
-        rescue NameError
-        else
-          return method.call(*args)
-        end
-        begin
-          value = eval(m.to_s, $rspec_binding)
-          return value
-        rescue NameError
-        end
-        super
-        #        raise NoMethodError
-      end
-
-      define_method name, event_block
-    end
-    Card.define_callbacks name
-    Card.set_callback stage, :before, name, prepend: true
-  end
-
-  def remove_test_event stage, name
-    Card.skip_callback stage, :before, name
-  end
-
-  def test_event stage, _opts, &block
-    event_name = :"test_event_#{@events.size}"
-    stage_sym = :"#{stage}_stage"
-    @events << [stage_sym, event_name]
-    add_test_event stage_sym, event_name, &block
-  end
-
-  def with_test_events
-    @events = []
-    $rspec_binding = binding
-    yield
-  ensure
-    @events.each do |stage, name|
-      remove_test_event stage, name
-    end
-  end
-end

data/lib/card/success.rb

@@ -1,142 +0,0 @@
-class Card
-  class Success
-    include Card::Location
-
-    attr_accessor :params, :redirect, :id, :name, :card, :name_context
-
-    def initialize name_context=nil, success_params=nil
-      @name_context = name_context
-      @new_args = {}
-      @params = OpenStruct.new
-      case success_params
-      when Hash
-        apply(success_params)
-      when nil then  self.name = '_self'
-      else;  self.target = success_params
-      end
-    end
-
-    def << value
-      case value
-      when Hash then apply value
-      else; self.target = value
-      end
-    end
-
-    def hard_redirect?
-      @redirect == true
-    end
-
-    # reset card object and override params with success params
-    def soft_redirect?
-      @redirect == :soft
-    end
-
-    def mark= value
-      case value
-      when Integer then @id = value
-      when String then @name = value
-      when Card then @card = value
-      else; self.target = value
-      end
-    end
-
-    def id= id
-      self.mark = id  # for backwards compatibility use mark here: id was often used for the card name
-    end
-
-    def type= type
-      @new_args[:type] = type
-    end
-
-    def content= content
-      @new_args[:content] = content
-    end
-
-    def target= value
-      @id = @name = @card = nil
-      @target = process_target value
-    end
-
-    def process_target value
-      case value
-      when ''                     then ''
-      when '*previous', :previous then :previous
-      when /^(http|\/)/           then value
-      when /^TEXT:\s*(.+)/        then  Regexp.last_match(1)
-      when /^REDIRECT:\s*(.+)/
-        @redirect = true
-        process_target Regexp.last_match(1)
-      else self.mark = value
-      end
-    end
-
-    def apply args
-      args.each_pair do |key, value|
-        self[key] = value
-      end
-    end
-
-    def card name_context=@name_context
-      if @card
-        @card
-      elsif @id
-        Card.find @id
-      elsif @name
-        Card.fetch @name.to_name.to_absolute(name_context), new: @new_args
-      end
-    end
-
-    def target name_context=@name_context
-      card(name_context) || (@target == :previous ? Card::Env.previous_location : @target) || Card.fetch(name_context)
-    end
-
-    def []= key, value
-      if respond_to? "#{key}="
-        send "#{key}=", value
-      elsif key.to_sym == :soft_redirect
-        @redirect = :soft
-      else
-        @params.send "#{key}=", value
-      end
-    end
-
-    def [] key
-      if respond_to? key.to_sym
-        send key.to_sym
-      elsif key.to_sym == :soft_redirect
-        @redirect == :soft
-      else
-        @params.send key.to_sym
-      end
-    end
-
-    def params
-      @params.marshal_dump
-    end
-
-    def to_url name_context=@name_context
-      case (target = target(name_context))
-      when Card
-        page_path target.cardname, params
-      else
-        target
-      end
-    end
-
-    def method_missing method, *args
-      case method
-      when /^(\w+)=$/
-        self[Regexp.last_match(1).to_sym] = args[0]
-      when /^(\w+)$/
-        self[Regexp.last_match(1).to_sym]
-      else
-        super
-      end
-    end
-
-    def session
-      Card::Env.session
-    end
-  end
-end

data/lib/card/view_cache.rb

@@ -1,94 +0,0 @@
-class Card
-  module ViewCache
-    class << self
-      SIZE = 500
-      LIMIT = 1000 # reduce cache size to SIZE if LIMIT is reached
-      CNT_KEY = 'view_cache_cnt'.freeze
-      FREQUENCY_KEY = 'view_cache_frequency'.freeze
-
-      def cache
-        Card::Cache[Card::ViewCache]
-      end
-
-      def fetch format, view, args, &block
-        return yield if cacheable_view?(view, format)
-
-        key = cache_key view, format, args
-        unless cache.exist?(key)
-          increment_cached_views_cnt
-          reduce_cache if cached_views_cnt > LIMIT
-        end
-        increment_frequency key
-
-        if Card.config.view_cache == 'debug'
-          verbose_fetch key, &bloack
-        else
-          cache.fetch key, &block
-        end
-      end
-
-      def reset
-        cache.reset
-      end
-
-      private
-
-      def verbose_fetch
-        if cache.exist? key
-          "fetched from view cache: #{cache.read key}"
-        else
-          "written to view cache: #{cache.fetch(key, &block)}"
-        end
-      end
-
-      def increment_cached_views_cnt
-        cache.write(CNT_KEY, cached_views_cnt + 1)
-      end
-
-      def cached_views_cnt
-        cache.read(CNT_KEY) || 0
-      end
-
-      def reduce_cache
-        update_frequency do |freq|
-          cnts_with_key = freq.keys.map { |key| [freq[key], key] }
-          index = 1
-          SortedSet.new(cnts_with_key).each do |_cnt, key|
-            if index < (LIMIT - SIZE)
-              cache.delete(key)
-              freq.delete(key)
-            else
-              freq[key] = 0
-            end
-            index += 1
-          end
-        end
-      end
-
-      def update_frequency
-        freq = cache.read(FREQUENCY_KEY) || {}
-        yield(freq)
-        cache.write(FREQUENCY_KEY, freq)
-      end
-
-      def increment_frequency key
-        update_frequency do |freq|
-          freq[key] ||= 0
-          freq[key] += 1
-        end
-      end
-
-      def cache_key view, format, args
-        roles_key = Card::Auth.current.all_roles.sort.join '_'
-        args_key = Card::Cache.obj_to_key(args)
-        '%s#%s__args__%s__roles__%s' %
-          [format.card.key, view, args_key, roles_key]
-      end
-
-      def cacheable_view? view, format
-        !Card.config.view_cache || !format.view_caching? || !format.main? ||
-          (view != :open && view != :content) || format.class != HtmlFormat
-      end
-    end
-  end
-end