card 0.0.1 → 1.15.pre

data/lib/card/set_pattern.rb

@@ -0,0 +1,168 @@
+class Card
+
+  class SetPattern
+    
+    class << self
+      attr_accessor :pattern_code, :pattern_id, :junction_only, :assigns_type, :anchorless, :anchor_parts_count
+      
+      def find pattern_code
+        Card.set_patterns.find { |sub| sub.pattern_code == pattern_code }        
+      end
+    
+      def junction_only?
+        !!junction_only
+      end
+    
+      def anchorless?
+        !!anchorless
+      end
+
+      def new card
+        super if pattern_applies? card
+      end
+
+      def pattern
+        Card.fetch(self.pattern_id, :skip_modules=>true).cardname
+      end
+
+      def register pattern_code, opts={}
+        if self.pattern_id = Card::Codename[pattern_code]
+          self.pattern_code = pattern_code
+          Card.set_patterns.insert opts.delete(:index).to_i, self
+          self.anchorless = !respond_to?( :anchor_name )
+          opts.each { |key, val| send "#{key}=", val }
+        else
+          warn "no codename for pattern_code #{pattern_code}"
+        end
+      end
+
+      def pattern_applies? card
+        junction_only? ? card.cardname.junction? : true
+      end
+
+      def anchor_parts_count 
+        @anchor_parts_count ||= ( anchorless? ? 0 : 1 )
+      end
+
+      def write_tmp_file pattern_code, from_file, seq
+        to_file = "#{Card.paths['tmp/set_pattern'].first}/#{seq}-#{pattern_code}.rb"
+        klass = "Card::#{pattern_code.camelize}Set"
+        file_content = <<EOF
+# -*- encoding : utf-8 -*-
+class #{klass} < Card::SetPattern
+  cattr_accessor :options
+  class << self
+# ~~~~~~~~~~~ above autogenerated; below pulled from #{from_file} ~~~~~~~~~~~
+
+#{ File.read from_file }
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from #{from_file} ~~~~~~~~~~~
+  end
+  register "#{pattern_code}", (options || {})
+end
+
+EOF
+        File.write to_file, file_content
+        to_file
+      end
+    end
+
+
+    # Instance methods
+
+    def initialize card
+      unless self.class.anchorless?
+        @anchor_name = self.class.anchor_name(card).to_name
+        @anchor_id = if self.class.respond_to? :anchor_id
+          self.class.anchor_id card
+        else
+          Card.fetch_id @anchor_name
+        end
+      end
+      self
+    end
+
+    def module_key
+      (defined? @module_key) ? @module_key : @module_key = begin
+        if self.class.anchorless?
+          self.class.pattern_code.camelize
+        elsif anchor_codenames
+          "#{self.class.pattern_code.camelize}::#{anchor_codenames.map(&:to_s).map(&:camelize) * '::'}"
+        end
+      end
+    end
+
+    def lookup_module_list modules_hash
+      module_key && modules_hash[ module_key ]
+    end
+
+    def module_list
+      lookup_module_list Card::Set.modules[ :nonbase ]
+    end
+
+    def format_module_list klass
+      hash = Card::Set.modules[ :nonbase_format ][ klass ] and lookup_module_list hash
+    end
+
+    def anchor_codenames
+      @anchor_name.parts.map do |part|
+        part_id = Card.fetch_id part
+        part_id && Card::Codename[ part_id.to_i ] or return nil
+      end
+    end
+
+    def pattern
+      @pattern ||= self.class.pattern
+    end
+
+    def to_s
+      self.class.anchorless? ? pattern.s : "#{@anchor_name}+#{pattern}"
+    end
+
+    def inspect
+      "<#{self.class} #{to_s.to_name.inspect}>"
+    end
+
+    def safe_key
+      caps_part = self.class.pattern_code.gsub(' ','_').upcase
+      self.class.anchorless? ? caps_part : "#{caps_part}-#{@anchor_name.safe_key}"
+    end
+
+    def rule_set_key
+      if self.class.anchorless?
+        self.class.pattern_code
+      elsif @anchor_id
+        [ @anchor_id, self.class.pattern_code ].map( &:to_s ) * '+'
+      end
+    end
+  end
+
+  class TypeSet < SetPattern
+    def initialize card
+      super
+      @inherit_card = card unless module_key
+    end
+
+    def lookup_inherited_key
+      return unless @inherit_card
+      card, @inherit_card = @inherit_card, nil
+
+      default_rule = card.rule_card(:default) and
+        type_code = default_rule.type_code and
+        #default_rule.cardname.size > 2 and
+        #default_rule.left.right.codename == self.class.pattern_code
+        mod_key = "Type::#{type_code.to_s.camelize}" and
+        ( Card::Set.modules[:nonbase_format].values +
+          [Card::Set.modules[:nonbase]] ).any?{|hash| hash[mod_key]} and
+        mod_key
+    end
+
+    def inherited_key
+      (defined? @inherited_key) ? @inherited_key : @inherited_key = lookup_inherited_key
+    end
+
+    def lookup_module_list modules_hash
+      module_key ? modules_hash[ module_key ] : inherited_key && modules_hash[ inherited_key ]
+    end
+  end
+end

data/lib/card/simplecov_helper.rb

@@ -0,0 +1,61 @@
+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\// and not
+    /\d+-(.+\.rb)/.match(src_file.filename) { |m| Dir["mod/**/#{m[1]}"].present? }
+  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}\// or 
+        (
+          src_file.filename =~ /tmp\// and
+          /\d+-(.+\.rb)/.match(src_file.filename) { |m| Dir["mod/#{mod}/**/#{m[1]}"].present? } 
+        )
+    end
+  end
+
+  add_group 'Sets' do |src_file|
+    src_file.filename =~ /tmp\/set\// and
+    /\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\// and
+    /\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

@@ -0,0 +1,68 @@
+module SpecHelper
+end
+module Card::SpecHelper
+
+  include ActionDispatch::Assertions::SelectorAssertions
+  #~~~~~~~~~  HELPER METHODS ~~~~~~~~~~~~~~~#
+  
+  def login_as user
+    Card::Auth.current_id = (uc=Card[user.to_s] and uc.id)
+    if @request
+      @request.session[:user] = Card::Auth.current_id
+    end
+    #warn "(ath)login_as #{user.inspect}, #{Card::Auth.current_id}, #{@request.session[:user]}"
+  end
+  
+  def newcard name, content=""
+    #FIXME - misleading name; sounds like it doesn't save.
+    Card.create! :name=>name, :content=>content
+  end
+
+  def assert_view_select(view_html, *args, &block)
+    node = HTML::Document.new(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 "<pre>#{CGI.escapeHTML Nokogiri::XML(view_html,&:noblanks).to_s}</pre>" 
+    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
+end

data/lib/card/version.rb

@@ -1,3 +1,10 @@
-module Card
-  VERSION = "0.0.1"
+# -*- encoding : utf-8 -*-
+
+module Card::Version
+  class << self
+
+    def release
+      @@version ||= File.read( File.expand_path '../../../VERSION', __FILE__ ).strip
+    end
+  end
 end

data/lib/cardio.rb

@@ -0,0 +1,145 @@
+# -*- encoding : utf-8 -*-
+
+require 'active_support/core_ext/numeric/time'
+
+CARD_GEM_ROOT = File.expand_path('../..', __FILE__)
+
+module Cardio
+
+  ActiveSupport.on_load :card do
+    if Card.count > 0
+      Card::Loader.load_mods 
+    else
+      Rails.logger.warn "empty database"
+    end
+  end
+
+  mattr_reader :paths, :config, :cache
+
+  class << self
+    def cache
+      @@cache ||= ::Rails.cache
+    end
+    
+    def set_config config
+      @@config, @@root = config, config.root
+
+      config.autoload_paths += Dir["#{gem_root}/mod/*/lib/**/"]
+      config.autoload_paths += Dir["#{gem_root}/lib/**/"]
+      config.autoload_paths += Dir["#{root}/mod/*/lib/**/"]
+
+      config.read_only             = !!ENV['WAGN_READ_ONLY']
+      config.allow_inline_styles   = false
+
+      config.recaptcha_public_key  = nil
+      config.recaptcha_private_key = nil
+      config.recaptcha_proxy       = nil
+
+      config.cache_store           = :file_store, 'tmp/cache'
+      config.override_host         = nil
+      config.override_protocol     = nil
+
+      config.no_authentication     = false
+      config.files_web_path        = 'files'
+
+      config.max_char_count        = 200
+      config.max_depth             = 20
+      config.email_defaults        = nil
+
+      config.token_expiry          = 2.days
+      config.revisions_per_page    = 10
+      config.closed_search_limit   = 50
+    end
+
+  
+    def set_paths paths
+      @@paths = paths
+      add_path 'tmp/set', :root => root
+      add_path 'tmp/set_pattern', :root => root
+
+      add_path 'mod'
+      add_path "db"
+      add_path 'db/migrate'
+      add_path "db/migrate_core_cards"
+      add_path "db/migrate_deck_cards", :root => root, :with => 'db/migrate_cards'
+      add_path "db/seeds", :with => "db/seeds.rb"
+
+      add_path 'config/initializers', :glob => '**/*.rb'
+    end
+
+    def root
+      @@config.root
+    end
+    
+    def gem_root
+      CARD_GEM_ROOT
+    end
+
+    def add_path path, options={}
+      root = options.delete(:root) || gem_root
+      gem_path = File.join( root, path )
+      with = options.delete(:with)
+      with = with ? File.join(root, with) : gem_path
+      paths[path] = Rails::Paths::Path.new(paths, gem_path, with, options)
+    end
+
+    def future_stamp
+      ## used in test data
+      @@future_stamp ||= Time.local 2020,1,1,0,0,0
+    end
+
+    def migration_paths type
+      list = paths["db/migrate#{schema_suffix type}"].to_a
+      if type == :deck_cards
+        list += Card::Loader.mod_dirs.map do |p|
+          Dir.glob "#{p}/db/migrate_cards"
+        end.flatten
+      end
+      list
+    end
+
+    def assume_migrated_upto_version type
+      Cardio.schema_mode(type) do
+        ActiveRecord::Schema.assume_migrated_upto_version Cardio.schema(type), Cardio.migration_paths(type)
+      end
+    end
+
+    def schema_suffix type
+      case type
+      when :core_cards then '_core_cards'
+      when :deck_cards then '_deck_cards'
+      else ''
+      end
+    end
+
+    def delete_tmp_files id=nil
+      dir = Cardio.paths['files'].existent.first + '/tmp'
+      dir += "/#{id}" if id
+      FileUtils.rm_rf dir, :secure=>true
+    rescue
+      Rails.logger.info "failed to remove tmp files"
+    end
+
+    def schema_mode type
+      new_suffix = Cardio.schema_suffix type
+      original_suffix = ActiveRecord::Base.table_name_suffix
+
+      ActiveRecord::Base.table_name_suffix = new_suffix
+      yield
+      ActiveRecord::Base.table_name_suffix = original_suffix
+    end
+
+    def schema type=nil
+      File.read( schema_stamp_path type ).strip
+    end
+
+    def schema_stamp_path type
+      root_dir = ( type == :deck_cards ? root : gem_root )
+      stamp_dir = ENV['SCHEMA_STAMP_PATH'] || File.join( root_dir, 'db' )
+
+      File.join stamp_dir, "version#{ schema_suffix(type) }.txt"
+    end
+
+  end
+end
+