card 1.99.6 → 1.100.0

data/tmpsets/set/mod008-pointer/abstract/01_paging.rb

@@ -0,0 +1,156 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class Abstract
+# Set: Abstract (Paging)
+#
+module Paging;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/01_paging.rb"; end
+include_set Abstract::PagingParams
+
+module Format; parent.send :register_set_format, Card::Format, self; extend Card::Set::AbstractFormat
+  def limit
+    limit_param
+  end
+
+  def offset
+    offset_param
+  end
+
+  def search_with_params
+    card.item_names
+  end
+
+  def count_with_params
+    card.item_names.count
+  end
+
+  def total_pages
+    return 1 if limit.zero?
+    ((count_with_params - 1) / limit).to_i
+  end
+
+  def current_page
+    (offset / limit).to_i
+  end
+
+  # for override
+  def extra_paging_path_args
+    {}
+  end
+end
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  PAGE_LI_CLASS = { ellipses: "disabled", current: "active" }.freeze
+
+  def with_paging path_args={}
+    with_paging_path_args path_args do
+      output [yield(@paging_path_args), _render_paging]
+    end
+  end
+
+  view :paging, cache: :never do
+    return "" unless paging_needed?
+    <<-HTML
+      <nav>
+        <ul class="pagination paging">
+          #{paging_links.join}
+        </ul>
+      </nav>
+    HTML
+  end
+
+  def paging_links
+    PagingLinks.new(total_pages, current_page)
+               .build do |text, page, status, options|
+      page_link_li text, page, status, options
+    end
+  end
+
+  # First page is 0 (not 1)
+  def page_link_li text, page, status, options={}
+    wrap_with :li, class: page_link_li_class(status) do
+      page_link text, page, options
+    end
+  end
+
+  def page_link_li_class status
+    ["page-item", PAGE_LI_CLASS[status]].compact.join " "
+  end
+
+  def page_link text, page, options
+    return content_tag(:div, text.html_safe, class: "page-link") unless page
+
+    options.merge! class: "card-paging-link slotter page-link",
+                   remote: true,
+                   path: page_link_path_args(page)
+    link_to raw(text), options
+  end
+
+  def with_paging_path_args args
+    tmp = @paging_path_args
+    @paging_path_args = paging_path_args args
+    yield
+  ensure
+    @paging_path_args = tmp
+  end
+
+  def paging_path_args local_args={}
+    @paging_path_args ||= {}
+    @paging_path_args.reverse_merge!(limit: limit, offset: offset)
+    @paging_path_args.merge! extra_paging_path_args
+    @paging_path_args.merge local_args
+  end
+
+  def page_link_path_args page
+    paging_path_args.merge offset: page * limit
+  end
+
+  def paging_needed?
+    return false if limit < 1
+    return false if fewer_results_than_limit? # avoid extra count search
+
+    # count search result instead
+    limit < count_with_params
+  end
+
+  # clear we don't need paging even before running count query
+  def fewer_results_than_limit?
+    return false unless offset.zero?
+
+    limit > offset + search_with_params.length
+  end
+end
+
+module JsonFormat; parent.send :register_set_format, Card::Format::JsonFormat, self; extend Card::Set::AbstractFormat
+  def page_link_path_args page
+    {
+      limit: limit,
+      offset: page * limit,
+      item: default_item_view, # hack. need standard voo handling
+      format: :json
+    }.merge extra_paging_path_args
+  end
+
+  view :paging_urls, cache: :never do
+    return {} unless total_pages > 1
+
+    { paging: paging_urls_hash }
+  end
+
+  def paging_urls_hash
+    hash = {}
+    PagingLinks.new(total_pages, current_page)
+               .build do |_text, page, status, _options|
+      add_paging_url hash, page, status
+    end
+    hash
+  end
+
+  def add_paging_url hash, page, status
+    return unless page && status.in?(%i[next previous])
+
+    hash[status] = path page_link_path_args(page)
+  end
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/01_paging.rb ~~

data/tmpsets/set/mod008-pointer/abstract/01_paging/paging_links.rb

@@ -0,0 +1,98 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class Abstract
+# Set: Abstract (Paging)
+#
+#! no set module
+
+module Paging;
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/01_paging/paging_links.rb"; end
+# render paging links
+class PagingLinks
+  def initialize total_pages, current_page
+    @total = total_pages
+    @current = current_page
+  end
+
+  # @param window [integer] number of page links shown left and right
+  #   of the current page
+  # @example: current page = 5, window = 2
+  #   |<<|1|...|3|4|[5]|6|7|...|10|>>|
+  # @yield [text, page, status, options] block to build single paging link
+  # @yieldparam status [Symbol] :active (for current page) or :disabled
+  # @yieldparam page [Integer] page number, first page is 0
+  # @return [Array<String>]
+  def build window=2, &block
+    @render_item = block
+    links window
+  end
+
+  private
+
+  def links window
+    @window_start = [@current - window, 0].max
+    @window_end = [@current + window, @total].min
+    left_part + window_part + right_part
+  end
+
+  # the links around the current page
+  def window_part
+    (@window_start..@window_end).map do |page|
+      direct_page_link page
+    end.compact
+  end
+
+  def left_part
+    [
+      previous_page_link,
+      (direct_page_link 0 if @window_start > 0),
+      (ellipse if @window_start > 1)
+    ].compact
+  end
+
+  def right_part
+    [
+      (ellipse if @total > @window_end + 1),
+      (direct_page_link @total if @total > @window_end),
+      next_page_link
+    ].compact
+  end
+
+  def previous_page_link
+    paging_item '<span aria-hidden="true">&laquo;</span>', previous_page,
+                "aria-label" => "Previous", status: :previous
+  end
+
+  def next_page_link
+    paging_item '<span aria-hidden="true">&raquo;</span>', next_page,
+                "aria-label" => "Next", status: :next
+  end
+
+  def direct_page_link page
+    return unless page >= 0 && page <= @total
+    paging_item page + 1, page
+  end
+
+  def ellipse
+    paging_item "<span>...</span>", nil, status: :ellipses
+  end
+
+  def paging_item text, page, options={}
+    status =
+      if page == @current
+        :current
+      else
+        options.delete :status
+      end
+    @render_item.call text, page, status, options
+  end
+
+  def previous_page
+    @current > 0 ? @current - 1 : false
+  end
+
+  def next_page
+    @current < @total ? @current + 1 : false
+  end
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/01_paging/paging_links.rb ~~

data/tmpsets/set/mod008-pointer/abstract/02_pointer.rb

@@ -0,0 +1,18 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class Abstract
+# Set: Abstract (Pointer)
+#
+module Pointer;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/02_pointer.rb"; end
+include_set Abstract::Paging
+
+def diff_args
+  { diff_format: :pointer }
+end
+
+def count
+  item_strings.size
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/02_pointer.rb ~~

data/tmpsets/set/mod008-pointer/abstract/02_pointer/events.rb

@@ -0,0 +1,80 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class Abstract; module Pointer;
+# Set: Abstract (Pointer, Events)
+#
+module Events;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/02_pointer/events.rb"; end
+event :add_and_drop_items, :prepare_to_validate, on: :save do
+  adds = Env.params["add_item"]
+  drops = Env.params["drop_item"]
+  Array.wrap(adds).each { |i| add_item i } if adds
+  Array.wrap(drops).each { |i| drop_item i } if drops
+end
+
+event :insert_item_event, :prepare_to_validate, on: :save, when: :item_to_insert do
+  index = Env.params["item_index"] || 0
+  insert_item index.to_i, item_to_insert
+end
+
+def item_to_insert
+  Env.params["insert_item"]
+end
+
+# If a card's type and content are updated in the same action, the new module
+# will override the old module's events and functions. But this event is only
+# on pointers -- other type cards do not have this event,
+# Therefore if something is changed from a pointer and its content is changed
+# in the same action, this event will be run and will treat the content like
+# it' still pointer content.  The "when" clause helps with that (but is a hack)
+event :standardize_items, :prepare_to_validate,
+      on: :save, changed: :content, when: :still_pointer? do
+  items_to_content item_strings
+end
+
+def still_pointer?
+  type_id == PointerID
+  # Card.new(type_id: type_id).is_a? Abstract::Pointer
+end
+
+def changed_item_names
+  dropped_item_names + added_item_names
+end
+
+def dropped_item_names
+  return item_names if trash
+  return [] unless (old_content = db_content_before_act)
+
+  old_items = item_names content: old_content
+  old_items - item_names
+end
+
+def added_item_names
+  return [] if trash
+  return item_names unless (old_content = db_content_before_act)
+
+  old_items = item_names content: old_content
+  item_names - old_items
+end
+
+# TODO: refactor. many of the above could be written more elegantly with improved
+# handling of :content in item_names. If content is nil here, we would expect an
+# empty set of cards, but in fact we get items based on self.content.
+
+def changed_item_cards
+  dropped_item_cards + added_item_cards
+end
+
+def dropped_item_cards
+  return [] unless db_content_before_act
+
+  all_item_cards item_names: dropped_item_names
+end
+
+def added_item_cards
+  return item_cards unless db_content_before_act
+
+  all_item_cards item_names: added_item_names
+end
+end;end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/02_pointer/events.rb ~~

data/tmpsets/set/mod008-pointer/abstract/02_pointer/html_views.rb

@@ -0,0 +1,134 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class Abstract; module Pointer;
+# Set: Abstract (Pointer, HtmlViews)
+#
+module HtmlViews;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/02_pointer/html_views.rb"; end
+include_set Abstract::BsBadge
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  view :core, cache: :never do
+    standard_pointer_core
+  end
+
+  view :item_cores, cache: :never do
+    card.known_item_cards.map do |item|
+      nest item, view: :core
+    end.join "\n"
+  end
+
+  def standard_pointer_core
+    with_paging do |paging_args|
+      wrap_with :div, standard_pointer_items(paging_args), class: "pointer-list"
+    end
+  end
+
+  def standard_pointer_items paging_args
+    pointer_items(paging_args.extract!(:limit, :offset)).join(voo.separator || "\n")
+  end
+
+  view :one_line_content do
+    item_view = implicit_item_view
+    item_view = item_view == "name" ? "name" : "link"
+    wrap_with :div, class: "pointer-list" do
+      # limit to first 10 items to optimize
+      pointer_items(view: item_view, limit: 10, offset: 0).join ", "
+    end
+  end
+
+  def wrap_item rendered, item_view
+    %(<div class="pointer-item item-#{item_view}">#{rendered}</div>)
+  end
+
+  view :input do
+    _render_hidden_content_field + super()
+  end
+
+  def default_input_type
+    :list
+  end
+
+  view :list, cache: :never do
+    list_input
+  end
+
+  # view :nav_item do
+  #   nav_dropdown
+  # end
+
+  def list_input args={}
+    items = items_for_input args[:item_list]
+    extra_class = "pointer-list-ul"
+    ul_classes = classy "pointer-list-editor", extra_class
+    haml :list_input, items: items, ul_classes: ul_classes,
+                      options_card: options_card_name
+  end
+
+  %i[autocomplete checkbox radio select multiselect].each do |editor_view|
+    view(editor_view) { send "#{editor_view}_input" }
+  end
+
+  def autocomplete_input
+    items = items_for_input
+    haml :autocomplete_input, item: items.first, options_card: options_card_name
+  end
+
+  def checkbox_input
+    haml :checkbox_input, submit_on_change: @submit_on_change
+  end
+
+  def radio_input
+    haml :radio_input, submit_on_change: @submit_on_change
+  end
+
+  def select_input
+    options = { "-- Select --" => "" }.merge card.options_hash
+    select_tag("pointer_select-#{unique_id}",
+               options_for_select(options, card.item_name),
+               class: "pointer-select form-control")
+  end
+
+  def multiselect_input
+    select_tag "pointer_multiselect-#{unique_id}",
+               options_for_select(card.options_hash, card.item_names),
+               multiple: true, class: "pointer-multiselect form-control"
+  end
+
+  def add_item_modal_link
+    modal_link "Add Item",
+               size: :large,
+               class: "btn btn-sm btn-outline-secondary _add-item-link",
+               path: { view: :filter_items_modal,
+                       item: implicit_item_view,
+                       filter_card: filter_card.name,
+                       slot_selector: filtered_list_slot_class,
+                       item_selector: "_filtered-list-item",
+                       slot: { hide: [:modal_footer] },
+                       filter: { not_ids: not_ids_value } }
+  end
+
+  def not_ids_value
+    card.item_ids.map(&:to_s).join(",")
+  end
+
+  def add_item_overlay_link; end
+
+  def one_line_content
+    if count == 1
+      card.first_name
+    else
+      short_content
+    end
+  end
+
+  private
+
+  # currently only used by :list and :autocomplete. could be generalized?
+  def items_for_input items=nil
+    items ||= card.item_names context: :raw
+    items.empty? ? [""] : items
+  end
+end
+end;end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/pointer/set/abstract/02_pointer/html_views.rb ~~