card 1.99.6 → 1.100.0

data/lib/card/act_manager/stage_director/phases.rb

@@ -1,37 +0,0 @@
-class Card
-  class ActManager
-    class StageDirector
-      module Phases
-        def validation_phase
-          run_single_stage :initialize
-          run_single_stage :prepare_to_validate
-          run_single_stage :validate
-        ensure
-          # @card.expire_pieces if @card.errors.any?
-          @card.errors.empty?
-        end
-
-        def storage_phase &block
-          catch_up_to_stage :prepare_to_store
-          run_single_stage :store, &block
-          run_single_stage :finalize
-          raise ActiveRecord::RecordInvalid, @card if @card.errors.any?
-        ensure
-          @from_trash = nil
-        end
-
-        def integration_phase
-          return if @abort
-
-          @card.restore_changes_information
-          run_single_stage :integrate
-          run_single_stage :after_integrate
-          run_single_stage :integrate_with_delay
-        ensure
-          @card.clear_changes_information unless @abort
-          # ActManager.clear if main? && !@card.only_storage_phase
-        end
-      end
-    end
-  end
-end

data/mod/core/set/all/erb.rb

@@ -1,11 +0,0 @@
-format do
-  def render_erb locals={}, template=nil, a_binding=nil, &block
-    template ||= yield
-    a_binding ||= binding
-    locals.each do |k, v|
-      # a_binding.local_variable_set(k, v) # needs ruby 2.1
-      instance_variable_set("@#{k}", v)
-    end
-    ERB.new(template, nil, "-").result(binding)
-  end
-end

data/mod/core/set/all/phases.rb

@@ -1,12 +0,0 @@
-def prepare_for_phases
-  reset_patterns
-  include_set_modules
-end
-
-def only_storage_phase?
-  only_storage_phase || !director.main?
-end
-
-delegate :validation_phase, to: :director
-delegate :storage_phase, to: :director
-delegate :integration_phase, to: :director

data/mod/core/set/all/stages.rb

@@ -1,17 +0,0 @@
-attr_writer :director
-delegate :act_manager, to: :director
-
-def director
-  @director ||= Card::ActManager.fetch self
-end
-
-def identify_action
-  @action =
-    if trash && trash_changed?
-      :delete
-    elsif new_card?
-      :create
-    else
-      :update
-    end
-end

data/mod/core/spec/set/all/phases_spec.rb

@@ -1,5 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Set::All::Phases do
-  # how to test abort directly?   set up a stub set module and include it by hand?
-end

data/tmpsets/set/mod001-admin/self/admin_info.rb

@@ -1,110 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self; module AdminInfo; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/admin/set/self/admin_info.rb ~~
-def clean_html?
-  false
-end
-
-format :html do
-  view :core do
-    warnings = []
-    if Card.config.action_mailer.perform_deliveries == false
-      warnings << email_warning
-    end
-    if Card.config.recaptcha_public_key ==
-       Card::Auth::Permissions::RECAPTCHA_DEFAULTS[:recaptcha_public_key] &&
-       card.rule(:captcha) == "1"
-      warnings << recaptcha_warning
-    end
-    return "" if warnings.empty?
-    alert :warning, dismissible: true do
-      render_warning_list warnings
-    end
-  end
-
-  def render_warning_list warnings
-    # 'ADMINISTRATOR WARNING'
-    admin_warn = I18n.t(:admin_warn,
-                        scope: "mod.admin.set.self.admin_info")
-    "<h6>#{admin_warn}</h6>".html_safe + list_group(
-      warnings,
-      items: { class: "list-group-item-warning" }
-    )
-  end
-
-  def email_warning
-    # "Email delivery is turned off."
-    # "Change settings in config/application.rb to send sign up notifications."
-    I18n.t(:email_off,
-           scope: "mod.admin.set.self.admin_info",
-           path: "config/application.rb")
-  end
-
-  def recaptcha_warning
-    warning =
-      if Card::Env.localhost?
-        # %(Your captcha is currently working with temporary settings.
-        #   This is fine for a local installation, but you will need new
-        #   recaptcha keys if you want to make this site public.)
-        I18n.t(:captcha_temp, scope: "mod.admin.set.self.admin_info")
-      else
-        # %(You are configured to use [[*captcha]], but for that to work
-        #   you need new recaptcha keys.)
-        process_content(I18n.t(:captcha_keys,
-                               scope: "mod.admin.set.self.admin_info"))
-      end
-    # 'Instructions'
-    instructions = I18n.t(:instructions,
-                          scope: "mod.admin.set.self.admin_info")
-    <<-HTML
-      <p>
-        #{warning}
-      </p>
-      <h4>#{instructions}</h4>
-      #{howto_add_new_recaptcha_keys}
-      #{howto_turn_captcha_off}
-    HTML
-  end
-
-  def instructions title, steps
-    steps = list_group steps
-    "#{title}#{steps}"
-  end
-
-  def howto_add_new_recaptcha_keys
-    instructions(
-      # 'How to add new recaptcha keys:'
-      I18n.t(:howto_add_keys, scope: "mod.admin.set.self.admin_info"),
-      [
-        # "1. Register your domain at #{web_link 'http://google.com/recaptcha'}"
-        I18n.t(:howto_register,
-               scope: "mod.admin.set.self.admin_info",
-               recaptcha_link: web_link("http://google.com/recaptcha")),
-        # "2. Add your keys to #{card_link :recaptcha_settings}"
-        I18n.t(:howto_add,
-               scope: "mod.admin.set.self.admin_info",
-               recaptcha_settings: card_link(:recaptcha_settings))
-      ]
-    )
-  end
-
-  def howto_turn_captcha_off
-    instructions(
-      # 'How to turn captcha off:'
-      I18n.t(:howto_turn_off, scope: "mod.admin.set.self.admin_info"),
-      [
-        # "1. Go to #{card_link :captcha}"
-        I18n.t(:howto_go,
-               scope: "mod.admin.set.self.admin_info",
-               captcha_card: card_link(:captcha)),
-        # '2. Update all *captcha rules to "no".'
-        I18n.t(:howto_update,
-               scope: "mod.admin.set.self.admin_info")
-      ]
-    )
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/admin/set/self/admin_info.rb ~~
-end;end;end;end;

data/tmpsets/set/mod001-admin/self/version.rb

@@ -1,15 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self; module Version; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/admin/set/self/version.rb ~~
-# -*- encoding : utf-8 -*-
-require_dependency "card/version"
-
-view :raw do |_args|
-  Card::Version.release
-end
-
-view :core, :raw
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/admin/set/self/version.rb ~~
-end;end;end;end;

data/tmpsets/set/mod002-core/abstract/code_file.rb

@@ -1,79 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Abstract; module CodeFile; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/abstract/code_file.rb ~~
-def self.included host_class
-  host_class.mattr_accessor :file_content_mod_name
-  host_class.file_content_mod_name = mod_name(caller)
-end
-
-# try to extract the mod name from the path of the set's tmp file
-# the caller that included the set file is set.rb
-def self.mod_name backtrace
-  mod_dir = tmp_mod_dir backtrace
-  raise Error, "not a valid set path: #{path}" unless mod_dir
-  match = mod_dir.match(/^mod\d+-(?<mod_name>.+)$/)
-  match[:mod_name]
-end
-
-def self.tmp_mod_dir backtrace
-  path = backtrace.find { |line| line.include? "tmp/set/" }
-  raise Error, "couldn't find set path in backtrace: #{backtrace}" unless path
-  path_parts = path.split(File::SEPARATOR)
-  path_parts.fetch(path_parts.index("set") + 1) do
-    raise Error, "not a valid set path: #{path}"
-  end
-end
-
-# @return [Array<String>, String] the name of file(s) to be loaded
-def source_files
-  case type_id
-  when CoffeeScriptID then "#{codename}.js.coffee"
-  when JavaScriptID then "#{codename}.js"
-  when CssID then "#{codename}.css"
-  when ScssID then "#{codename}.scss"
-  end
-end
-
-def source_dir
-  case type_id
-  when CoffeeScriptID, JavaScriptID then "javascript"
-  when CssID, ScssID then "stylesheets"
-  end
-end
-
-def find_file filename
-  Card.paths["mod"].to_a.each do |mod_path|
-    file_path =
-      File.join(mod_path, file_content_mod_name, "lib", source_dir, filename)
-    return file_path if File.exist? file_path
-  end
-  nil
-end
-
-def existing_source_paths
-  Array.wrap(source_files).map do |filename|
-    find_file(filename)
-  end.compact
-end
-
-view :raw do |_args|
-  Array.wrap(card.source_files).map do |filename|
-    if (source_path = card.find_file(filename))
-      Rails.logger.info "reading file: #{source_path}"
-      File.read source_path
-    else
-      Rails.logger.info "couldn't locate file: #{filename}"
-      nil
-    end
-  end.compact.join "\n"
-end
-
-format :html do
-  view :editor do |_args|
-    "Content is stored in file and can't be edited."
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/abstract/code_file.rb ~~
-end;end;end;end;

data/tmpsets/set/mod002-core/all/collection.rb

@@ -1,313 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module Collection; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/collection.rb ~~
-
-module ClassMethods
-  def search spec, comment=nil
-    results = ::Card::Query.run(spec, comment)
-    if block_given? && results.is_a?(Array)
-      results.each { |result| yield result }
-    end
-    results
-  end
-
-  def count_by_wql spec
-    spec = spec.clone
-    spec.delete(:offset)
-    search spec.merge(return: "count")
-  end
-
-  def find_each options={}
-    # this is a copy from rails (3.2.16) and is needed because this
-    # is performed by a relation (ActiveRecord::Relation)
-    find_in_batches(options) do |records|
-      records.each { |record| yield record }
-    end
-  end
-
-  def find_in_batches options={}
-    if block_given?
-      super(options) do |records|
-        yield(records)
-        Card::Cache.reset_soft
-      end
-    else
-      super(options)
-    end
-  end
-end
-
-def item_names _args={}
-  format._render_raw.split(/[,\n]/)
-end
-
-def item_cards _args={} # FIXME: this is inconsistent with item_names
-  [self]
-end
-
-def collection?
-  item_cards != [self]
-end
-
-def item_type
-  nil
-end
-
-def item_keys args={}
-  item_names(args).map do |item|
-    item.to_name.key
-  end
-end
-
-def include_item? item
-  key = item.is_a?(Card) ? item.cardname.key : item.to_name.key
-  item_names.map { |name| name.to_name.key }.member? key
-end
-
-def add_item item
-  return if include_item? item
-  self.content = "#{content}\n#{name}"
-end
-
-def drop_item item
-  return unless include_item? item
-  new_names = item_names.reject { |i| i == item }
-  self.content = new_names.empty? ? "" : new_names.join("\n")
-end
-
-def insert_item index, name
-  new_names = item_names
-  new_names.delete name
-  new_names.insert index, name
-  self.content = new_names.join "\n"
-end
-
-def extended_item_cards context=nil
-  context = (context ? context.cardname : cardname)
-  args = { limit: "" }
-  items = item_cards(args.merge(context: context))
-  extended_list = []
-  already_extended = ::Set.new # avoid loops
-
-  until items.empty?
-    item = items.shift
-    next if already_extended.include? item
-    already_extended << item
-    if item.collection?
-      # keep items in order
-      items.unshift(*item.item_cards)
-    else  # no further level of items
-      extended_list << item
-    end
-  end
-  extended_list
-end
-
-def extended_item_contents context=nil
-  extended_item_cards(context).map(&:item_names).flatten
-end
-
-def extended_list context=nil
-  context = (context ? context.cardname : cardname)
-  args = { limit: "" }
-  item_cards(args.merge(context: context)).map do |x|
-    x.item_cards(args)
-  end.flatten.map do |x|
-    x.item_cards(args)
-  end.flatten.map do |y|
-    y.item_names(args)
-  end.flatten
-  # this could go on and on.  more elegant to recurse until you don't have
-  # a collection
-end
-
-def contextual_content context_card, format_args={}, view_args={}
-  context_card.format(format_args).process_content(
-    format(format_args)._render_raw(view_args), view_args
-  )
-end
-
-format do
-  def item_links _args={}
-    raw(render_core).split(/[,\n]/)
-  end
-
-  def item_view args
-    args[:item] ||
-      (@nest_opts && @nest_opts[:view]) ||
-      default_item_view
-  end
-
-  def item_args args
-    i_args = { view: item_view(args) }
-    if (type = card.item_type)
-      i_args[:type] = type
-    end
-    i_args
-  end
-
-  def search_params
-    @search_params ||= begin
-      p = default_search_params.clone
-
-      if focal?
-        p[:offset] = params[:offset] if params[:offset]
-        p[:limit]  = params[:limit]  if params[:limit]
-        p.merge! params[:wql]        if params[:wql]
-      end
-      p
-    end
-  end
-
-  def default_search_params # wahh?
-    set_default_search_params
-  end
-
-  def set_default_search_params overrides={}
-    @default_search_params ||= begin
-      p = { default_limit: 100 }.merge overrides
-      set_search_params_variables! p
-      p
-    end
-  end
-
-  def set_search_params_variables! hash
-    hash[:vars] = params[:vars] || {}
-    params.each do |key, val|
-      case key.to_s
-      when "_wql"      then hash.merge! val
-      when /^\_(\w+)$/ then hash[:vars][Regexp.last_match(1).to_sym] = val
-      end
-    end
-  end
-
-  def each_reference_with_args args={}
-    content_object = Card::Content.new _render_raw(args), card
-    content_object.find_chunks(Card::Content::Chunk::Reference).each do |chunk|
-      yield chunk.referee_name.to_s, nest_args(args, chunk)
-    end
-  end
-
-  def each_nested_chunk args={}
-    content_object = Card::Content.new(_render_raw(args), card)
-    content_object.find_chunks(Card::Content::Chunk::Include).each do |chunk|
-      yield(chunk) if chunk.referee_name # filter commented nests
-    end
-  end
-
-  def nested_fields args={}
-    result = []
-    each_nested_field(args) do |chunk|
-      result << chunk
-    end
-    result
-  end
-
-  def unique_chunks chunk, processed_set, &_block
-    return if processed_set.include? chunk.referee_name.key
-    processed_set << chunk.referee_name.key
-    yield(chunk)
-  end
-
-  def each_nested_field args, &block
-    processed_chunk_keys = ::Set.new([card.key])
-
-    each_nested_chunk(args) do |chunk|
-      # TODO: handle structures that are non-virtual
-      next unless chunk.referee_name.to_name.field_of? card.name
-      if chunk.referee_card &&
-         chunk.referee_card.virtual? &&
-         !processed_chunk_keys.include?(chunk.referee_name.key)
-
-        processed_chunk_keys << chunk.referee_name.key
-        subformat(chunk.referee_card).each_nested_field(args) do |sub_chunk|
-          unique_chunks sub_chunk, processed_chunk_keys, &block
-        end
-      else
-        unique_chunks chunk, processed_chunk_keys, &block
-      end
-    end
-  end
-
-  def map_references_with_args args={}, &_block
-    result = []
-    each_reference_with_args args do |name, n_args|
-      result << yield(name, n_args)
-    end
-    result
-  end
-
-  # process args for links and nests
-  def nest_args args, chunk=nil
-    r_args = item_args(args)
-    r_args.merge! @nest_opts.clone if @nest_opts
-
-    case chunk
-    when Card::Content::Chunk::Include
-      r_args.merge!(chunk.options)
-    when Card::Content::Chunk::Link
-      r_args.reverse_merge!(view: :link)
-      r_args.reverse_merge!(title: chunk.link_text) if chunk.link_text
-    end
-    r_args
-  end
-end
-
-format :html do
-  view :count do |args|
-    card.item_names(args).size
-  end
-
-  view :tabs do |args|
-    active_name = nil
-    active_content = nil
-    tabs = {}
-    each_reference_with_args(item: :content) do |name, nest_args|
-      tab_name = nest_args[:title] || name
-      tabs[tab_name] = nest_path(name, nest_args).html_safe
-
-      active_name ||= tab_name
-      # warning: nest changes nest_args
-      active_content ||= nest(Card.fetch(name, new: {}), nest_args)
-    end
-    lazy_loading_tabs tabs, active_name, active_content,
-                      type: args[:tab_type]
-  end
-  def default_tabs_args args
-    args[:tab_type] ||= "tabs"
-  end
-
-  # create a path for a nest with respect ot the nest options
-  def nest_path name, nest_args
-    path_args = {}
-    path_args[:view] = nest_args[:view]
-    path_args[:slot] = nest_args.clone
-    path_args[:slot].delete(:view)
-    page_path(name, path_args)
-  end
-
-  view :pills, view: :tabs
-  def default_pills_args args
-    args[:tab_type] ||= "pills"
-  end
-
-  view :tabs_static do |args|
-    tabs = {}
-    card.item_cards.each do |item|
-      tabs[item.name] = nest item, item_args(args)
-    end
-    static_tabs tabs, args[:tab_type]
-  end
-  def default_tabs_static_args args
-    args[:tab_type] ||= "tabs"
-  end
-
-  view :pills_static, view: :tabs_static
-  def default_tabs_static_args args
-    args[:tab_type] ||= "pills"
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/collection.rb ~~
-end;end;end;end;