card 1.99.6 → 1.100.0

data/tmpsets/set/mod016-standard/type/number.rb

@@ -1,25 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type; module Number; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/number.rb ~~
-
-view :editor do |_args|
-  text_field :content, class: "card-content"
-end
-
-event :validate_number, :validate do
-  errors.add :content, "'#{content}' is not numeric" unless valid_number?(content)
-end
-
-def valid_number? string
-  valid = true
-  begin
-    Kernel.Float(string)
-  rescue ArgumentError, TypeError
-    valid = false
-  end
-  valid
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/number.rb ~~
-end;end;end;end;

data/tmpsets/set/mod016-standard/type/phrase.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type; module Phrase; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/phrase.rb ~~
-view :editor do |_args|
-  text_field :content, class: "card-content"
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/phrase.rb ~~
-end;end;end;end;

data/tmpsets/set/mod016-standard/type/search_type.rb

@@ -1,339 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type; module SearchType; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/search_type.rb ~~
-include_set Abstract::AceEditor
-
-def item_cards params={}
-  s = query(params)
-  raise("OH NO.. no limit") unless s[:limit]
-  # forces explicit limiting
-  # can be 0 or less to force no limit
-  Query.run(s, name)
-end
-
-def item_names params={}
-  statement = query params.merge(return: :name)
-  Query.run(statement, name)
-end
-
-def item_type
-  return if query[:type].is_a?(Array) || query[:type].is_a?(Hash)
-  query[:type]
-end
-
-def count params={}
-  Card.count_by_wql query(params)
-end
-
-def query params={}
-  @query ||= {}
-  @query[params.to_s] ||= get_query(params.clone)
-end
-
-def get_query params={}
-  # why is this a wagn_bot thing?  can't deny search content??
-  query = Auth.as_bot do
-    query_content = params.delete(:query) || raw_content
-    if query_content.empty?
-      raise JSON::ParserError,
-            "Error in card '#{name}':can't run search with empty content"
-    elsif query_content.is_a?(String)
-      JSON.parse(query_content)
-    else query_content
-    end
-  end
-  query.symbolize_keys!.merge! params.symbolize_keys
-  if (default_limit = query.delete(:default_limit))
-    query[:limit] ||= default_limit
-  end
-  query[:context] ||= cardname
-  query
-end
-
-format do
-  view :core do |args|
-    view =
-      case search_results args
-      when Exception          then :search_error
-      when Integer            then :search_count
-      when @mode == :template then :raw
-      else                         :card_list
-      end
-    _render view, args
-  end
-
-  view :search_count do |_args|
-    search_results.to_s
-  end
-
-  view :search_error do |_args|
-    sr_class = search_results.class.to_s
-    %(#{sr_class} :: #{search_results.message} :: #{card.raw_content})
-  end
-
-  view :card_list do |_args|
-    if search_results.empty?
-      "no results"
-    else
-      search_results.map do |c|
-        nest c
-      end.join "\n"
-    end
-  end
-
-  def search_vars args={}
-    @search_vars ||=
-      begin
-        v = {}
-        v[:query] = card.query(search_params)
-        v[:item] = set_nest_opts args.merge(query_view: v[:query][:view])
-        v
-      rescue JSON::ParserError => e
-        { error: e }
-      end
-  end
-
-  def search_results args={}
-    @search_results ||= begin
-      search_vars args
-      if search_vars[:error]
-        search_vars[:error]
-      else
-        begin
-          raw_results = card.item_cards search_params
-          is_count = search_vars[:query][:return] == "count"
-          is_count ? raw_results.to_i : raw_results
-        rescue Card::Error::BadQuery => e
-          e
-        end
-      end
-    end
-  end
-
-  def search_result_names
-    @search_result_names ||=
-      begin
-        card.item_names search_params
-      rescue => e
-        { error: e }
-      end
-  end
-
-  def each_reference_with_args args={}
-    search_result_names.each do |name|
-      yield(name, nest_args(args.reverse_merge!(item: :content)))
-    end
-  end
-
-  def set_nest_opts args
-    @nest_defaults = nil
-    @nest_opts ||= {}
-    @nest_opts[:view] = args[:item] || nest_opts[:view] ||
-                        args[:query_view] || default_item_view
-    # explicit > nest syntax > WQL > nest defaults
-  end
-
-  def page_link text, page, _current=false, options={}
-    @paging_path_args[:offset] = page * @paging_limit
-    options[:class] = "card-paging-link slotter"
-    options[:remote] = true
-    link_to raw(text), path(@paging_path_args), options
-  end
-
-  def page_li text, page, current=false, options={}
-    css_class = if current
-                  "active"
-                elsif !page
-                  "disabled"
-                end
-    page ||= 0
-    content_tag :li, class: css_class do
-      page_link text, page, current, options
-    end
-  end
-
-  def previous_page_link page
-    page_li '<span aria-hidden="true">&laquo;</span>', page, false,
-            "aria-label" => "Previous"
-  end
-
-  def next_page_link page
-    page_li '<span aria-hidden="true">&raquo;</span>', page, false,
-            "aria-label" => "Next"
-  end
-
-  def ellipse_page
-    content_tag :li, content_tag(:span, "...")
-  end
-
-  def chunk_list
-    :query
-  end
-end
-
-format :data do
-  view :card_list do |_args|
-    search_results.map do |c|
-      nest c
-    end
-  end
-end
-
-format :csv do
-  view :card_list do |args|
-    items = super args
-    if @depth == 0
-      render_csv_title_row + items
-    else
-      items
-    end
-  end
-end
-
-format :json do
-  def default_search_params
-    set_default_search_params default_limit: 0
-  end
-
-  view :export do |args|
-    # avoid running the search from options and structure that
-    # case a huge result or error
-    return [render_atom(args)] if card.content.empty? ||
-                                  card.name.include?("+*options") ||
-                                  card.name.include?("+*structure")
-    super(args)
-  end
-
-  view :export_items do |args|
-    card.item_names(limit: 0).map do |i_name|
-      next unless (i_card = Card[i_name])
-      subformat(i_card).render_atom(args)
-    end.flatten.reject(&:blank?)
-  end
-end
-
-format :rss do
-  view :feed_body do |args|
-    case raw_feed_items args
-    when Exception then @xml.item(render(:search_error))
-    when Integer then @xml.item(render(:search_count))
-    else super args
-    end
-  end
-
-  def raw_feed_items _args
-    @raw_feed_items ||= begin
-      search_params[:default_limit] = 25
-      search_results
-    end
-  end
-end
-
-format :html do
-  def default_editor_args args
-    args[:ace_mode] = "json"
-  end
-
-  view :card_list do |args|
-    paging = _optional_render :paging, args
-
-    if search_results.empty?
-      render_no_search_results(args)
-    else
-      results =
-        search_results.map do |c|
-          item_view = nest_defaults(c)[:view]
-          %(
-            <div class="search-result-item item-#{item_view}">
-              #{nest(c, size: args[:size], view: item_view)}
-            </div>
-          )
-        end.join "\n"
-
-      %(
-        #{paging}
-        <div class="search-result-list">
-          #{results}
-        </div>
-        #{paging if search_results.length > 10}
-      )
-    end
-  end
-
-  view :closed_content do |args|
-    if @depth > self.class.max_depth
-      "..."
-    else
-      search_limit = args[:closed_search_limit]
-      search_params[:limit] =
-        search_limit && [search_limit, Card.config.closed_search_limit].min
-      _render_core args.merge(hide: "paging", item: :link)
-      # TODO: if item is queryified to be "name", then that should work.
-      # otherwise use link
-    end
-  end
-
-  view :no_search_results do |_args|
-    %(<div class="search-no-results"></div>)
-  end
-
-  view :paging do |args|
-    s = card.query search_params
-    offset = s[:offset].to_i
-    limit = s[:limit].to_i
-    return "" if limit < 1
-    # avoid query if we know there aren't enough results to warrant paging
-    return "" if offset == 0 && limit > offset + search_results.length
-    total = card.count search_params
-    # should only happen if limit exactly equals the total
-    return "" if limit >= total
-    @paging_path_args = { limit: limit,
-                          slot: {
-                            item: args[:item] || nest_defaults(card)[:view]
-                          } }
-    @paging_path_args[:view] = args[:home_view] if args[:home_view]
-    @paging_limit = limit
-
-    s[:vars].each { |key, value| @paging_path_args["_#{key}"] = value }
-
-    out = ['<nav><ul class="pagination paging">']
-
-    total_pages = ((total - 1) / limit).to_i
-    current_page = (offset / limit).to_i # should already be integer
-    window = 2 # should be configurable
-    window_min = current_page - window
-    window_max = current_page + window
-
-    previous_page = current_page > 0 ? current_page - 1 : false
-    out << previous_page_link(previous_page)
-    if window_min > 0
-      out << page_li(1, 0)
-      out << ellipse_page if window_min > 1
-    end
-
-    (window_min..window_max).each do |page|
-      next if page < 0 || page > total_pages
-      text = page + 1
-      out << page_li(text, page, page == current_page)
-    end
-
-    if total_pages > window_max
-      out << ellipse_page if total_pages > window_max + 1
-      out << page_li(total_pages + 1, total_pages)
-    end
-
-    next_page = current_page < total_pages ? current_page + 1 : false
-    out << next_page_link(next_page)
-
-    out << %(</ul></nav>)
-    out.join
-  end
-
-  def default_search_params
-    set_default_search_params default_limit: 20
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/search_type.rb ~~
-end;end;end;end;

data/tmpsets/set/mod016-standard/type/session.rb

@@ -1,42 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type; module Session; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/session.rb ~~
-include Pointer
-
-def history?
-  false
-end
-
-def followable?
-  false
-end
-
-event :store_in_session, :prepare_to_validate, on: :save, changed: :content do
-  Env.session[key] = db_content
-  self.db_content = ""
-end
-
-event :delete_in_session, :validate, on: :delete do
-  Env.session[key] = nil
-  abort :success
-end
-
-def content
-  Env.session[key]
-end
-
-format do
-  include Pointer::Format
-end
-
-format :html do
-  include Pointer::HtmlFormat
-
-  def default_core_args args
-    args[:item] = :name
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/session.rb ~~
-end;end;end;end;

data/tmpsets/set/mod016-standard/type/set.rb

@@ -1,371 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type; module Set; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/set.rb ~~
-
-format :html do
-  view :core do |args|
-    _render args[:rule_view], args
-  end
-
-  def default_core_args args
-    args[:rule_view] ||= :common_rules
-    args[:optional_set_label] ||= :show
-    args[:optional_set_navbar] ||= :hide
-    args[:optional_rule_navbar] ||= :show
-  end
-
-  def with_label_and_navbars args
-    wrap do
-      [
-        _optional_render(:set_label,   args, :show),
-        _optional_render(:rule_navbar, args, :hide),
-        _optional_render(:set_navbar,  args, :hide),
-        yield
-      ]
-    end
-  end
-
-  view :all_rules do |args|
-    with_label_and_navbars args.merge(selected_view: :all_rules) do
-      rules_table card.visible_setting_codenames.sort, args
-    end
-  end
-
-  view :grouped_rules do |args|
-    with_label_and_navbars args.merge(selected_view: :grouped_rules) do
-      content_tag(:div, class: "panel-group",
-                        id: "accordion",
-                        role: "tablist",
-                        "aria-multiselectable" => "true") do
-        Card::Setting.groups.keys.map do |group_key|
-          _optional_render(group_key, args, :show)
-        end * "\n"
-      end
-    end
-  end
-
-  view :recent_rules do |args|
-    with_label_and_navbars args.merge(selected_view: :recent_rules) do
-      recent_settings = Card[:recent_settings].item_cards.map(&:codename)
-      settings = recent_settings.map(&:to_sym) & card.visible_setting_codenames
-      rules_table settings, args
-    end
-  end
-
-  view :common_rules do |args|
-    with_label_and_navbars args.merge(selected_view: :common_rules) do
-      settings =
-        card.visible_setting_codenames &
-        [:create, :read, :update, :delete, :structure, :default, :style]
-      rules_table settings, args
-    end
-  end
-
-  view :field_related_rules do |args|
-    with_label_and_navbars args.merge(selected_view: :field_related_rules) do
-      field_settings = [:default, :help, :structure]
-      if card.type_id == PointerID
-        field_settings += [:input, :options, :options_label]
-      end
-      rules_table (card.visible_setting_codenames & field_settings), args
-    end
-  end
-
-  view :set_label do |_args|
-    content_tag :h3, card.label, class: "set-label"
-  end
-
-  Card::Setting.groups.keys.each do |group_key|
-    view group_key.to_sym do |args|
-      settings = card.visible_settings group_key
-      if settings.present?
-        group_name = Card::Setting.group_names[group_key] || group.to_s
-        heading_id = "heading-#{group_key}"
-        collapse_id = "collapse-#{card.cardname.safe_key}-#{group_key}"
-        output [
-          (content_tag :div, class: "panel panel-default" do
-            content_tag :div, class: "panel-heading", role: "tab",
-                              id: heading_id do
-              content_tag :h4, class: "panel-title" do
-                content_tag :a, group_name,
-                            "data-toggle" => "collapse",
-                            "data-parent" => "#accordion",
-                            href: "##{collapse_id}",
-                            "aria-expanded" => "false",
-                            "aria-controls" => collapse_id
-              end
-            end
-          end),
-          (content_tag :div, id: collapse_id,
-                             class: "panel-collapse collapse",
-                             role: "tabpanel",
-                             "aria-labelledby" => heading_id do
-             rules_table settings.map(&:codename), args
-           end)
-        ]
-      end
-    end
-  end
-
-  def rules_table settings, args={}
-    wrap_with :table, class: "set-rules table" do
-      [
-        (content_tag(:tr, class: "rule-group") do
-          wrap_each_with :th, %w(Trait Content Set), class: "rule-heading"
-        end),
-        (settings.map do |setting|
-          if show_view? setting, args
-            rule_card = card.fetch(trait: setting, new: {})
-            nest(rule_card, view: :closed_rule).html_safe
-          end
-        end * "\n")
-      ]
-    end
-  end
-
-  view :editor do |_args|
-    "Cannot currently edit Sets" # ENGLISH
-  end
-
-  view :template_link do |args|
-    args.delete :style
-    wrap args do
-      link = view_link args[:inc_syntax], :template_editor, class: "slotter"
-      # , 'slot-include'=>include_syntax
-      "{{#{link}}}"
-    end
-  end
-
-  view :template_closer do |_args|
-    view_link "", :template_link,
-              class: "slotter glyphicon glyphicon-remove template-editor-close"
-  end
-
-  view :template_editor do |args|
-    wrap args do
-      %(
-        <div class="template-editor-left">{{</div>
-        <div class="template-editor-main">
-          #{render_template_editor_frame args}
-        </div>
-        <div class="template-editor-right">}}</div>
-      )
-    end
-  end
-
-  view :template_editor_frame do |args|
-    frame no_slot: true, title: card.label, menu_hack: :template_closer do
-      _render_core args.merge(hide: "set_label")
-    end
-  end
-
-  view :closed_content do |_args|
-    ""
-  end
-
-  view :set_navbar do |args|
-    id = "rule-navbar-#{card.cardname.safe_key}-#{args[:home_view]}"
-    related_sets = card.related_sets(true)
-    return "" if related_sets.size <= 1
-    navbar id, toggle: 'Rules<span class="caret"></span>', toggle_align: :left,
-               class: "slotter toolbar", navbar_type: "inverse",
-               collapsed_content: close_link(class: "pull-right visible-xs") do
-      [
-        content_tag(:span, "Set:", class: "navbar-text hidden-xs"),
-        (wrap_with :ul, class: "nav navbar-nav nav-pills" do
-          related_sets.map do |name, label|
-            path_opts = {
-              view: @slot_view,
-              slot: {
-                subheader: showname(name),
-                subframe: true,
-                hide: "header set_label rule_navbar",
-                show: "subheader set_navbar"
-              }
-            }
-            link = card_link name, text: label, remote: true,
-                                   path_opts: path_opts
-            li_pill link, name == card.name
-          end
-        end)
-      ]
-    end
-  end
-
-  def li_pill content, active
-    "<li role='presentation' #{"class='active'" if active}>#{content}</li>"
-  end
-
-  view :rule_navbar do |args|
-    id = "rule-navbar-#{card.cardname.safe_key}-#{args[:home_view]}"
-    args[:path_opts] = { slot: { show: :rule_navbar } }
-    navbar id, toggle: 'Rules<span class="caret"></span>', toggle_align: :left,
-               class: "slotter toolbar", navbar_type: "inverse",
-               collapsed_content: close_link(class: "pull-right visible-xs") do
-      [
-        content_tag(:span, "Rules:", class: "navbar-text hidden-xs"),
-        (wrap_with :ul, class: "nav navbar-nav nav-pills" do
-          [
-            (view_link_pill("field", :field_related_rules, args) if card.junction?),
-            view_link_pill("common", :common_rules, args),
-            view_link_pill("by group", :grouped_rules, args),
-            view_link_pill("by name", :all_rules, args),
-            (view_link_pill("recent", :recent_rules, args) if recently_edited_settings?)
-          ]
-        end)
-      ]
-    end
-  end
-
-  def view_link_pill name, view, args
-    selected_view = args[:selected_view] || @slot_view || args[:home_view]
-    opts = { class: "slotter", role: "pill", path_opts: args[:path_opts] }
-    li_pill view_link(name, view, opts), selected_view == view
-  end
-end
-
-include Card::Set::Type::SearchType
-
-def followed_by? user_id=nil
-  all_members_followed_by? user_id
-end
-
-def default_follow_set_card
-  self
-end
-
-def inheritable?
-  return true if junction_only?
-  cardname.trunk_name.junction? &&
-    cardname.tag_name.key == Card::Set::Self.pattern.key
-end
-
-def subclass_for_set
-  current_set_pattern_code = tag.codename
-  Card.set_patterns.find do |set|
-    current_set_pattern_code == set.pattern_code
-  end
-end
-
-def junction_only?
-  if @junction_only.nil?
-    @junction_only = subclass_for_set.junction_only
-  else
-    @junction_only
-  end
-end
-
-def label
-  if (klass = subclass_for_set)
-    klass.label cardname.left
-  else
-    ""
-  end
-end
-
-def follow_label
-  if (klass = subclass_for_set)
-    klass.follow_label cardname.left
-  else
-    ""
-  end
-end
-
-def follow_rule_name user=nil
-  if user
-    if user.is_a? String
-      "#{name}+#{user}+#{Card[:follow].name}"
-    else
-      "#{name}+#{user.name}+#{Card[:follow].name}"
-    end
-  else
-    "#{name}+#{Card[:all].name}+#{Card[:follow].name}"
-  end
-end
-
-# def to_following_item_name args
-#   left_part = follow_rule_name( args[:user] )
-#   option = args[:option] || if (rule_card = Card.fetch(left_part))
-#        rule_card.content
-#      else
-#        Card[:nothing].name
-#      end
-#
-#   "#{left_part}+#{option}"
-# end
-
-def all_user_ids_with_rule_for setting_code
-  Card.all_user_ids_with_rule_for self, setting_code
-end
-
-def setting_codenames_by_group
-  result = {}
-  Card::Setting.groups.each do |group, settings|
-    visible_settings =
-      settings.reject { |s| !s || !s.applies_to_cardtype(prototype.type_id) }
-    unless visible_settings.empty?
-      result[group] = visible_settings.map(&:codename)
-    end
-  end
-  result
-end
-
-def visible_setting_codenames
-  @visible_settings ||=
-    Card::Setting.groups.values.flatten.compact.reject do |setting|
-      !setting.applies_to_cardtype(prototype.type_id)
-    end.map(&:codename)
-end
-
-def visible_settings group
-  Card::Setting.groups[group].reject do |setting|
-    !setting || !setting.applies_to_cardtype(prototype.type_id)
-  end
-end
-
-def all_members_followed?
-  all_members_followed_by? Auth.current_id
-end
-
-def all_members_followed_by? user_id=nil
-  return false unless prototype.followed_by?(user_id)
-  return true if set_followed_by? user_id
-  broader_sets.each do |b_s|
-    if (set_card = Card.fetch(b_s)) && set_card.set_followed_by?(user_id)
-      return true
-    end
-  end
-  false
-end
-
-def set_followed?
-  set_followed_by? Auth.current_id
-end
-
-def set_followed_by? user_id=nil
-  (
-    user_id &&
-    (user = Card.find(user_id)) && Card.fetch(follow_rule_name(user.name))
-  ) || Card.fetch(follow_rule_name)
-end
-
-def broader_sets
-  prototype.set_names[1..-1]
-end
-
-def prototype
-  opts = subclass_for_set.prototype_args cardname.trunk_name
-  Card.fetch opts[:name], new: opts
-end
-
-def related_sets with_self=false
-  if subclass_for_set.anchorless?
-    prototype.related_sets with_self
-  else
-    left(new: {}).related_sets with_self
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/type/set.rb ~~
-end;end;end;end;