card 1.97.0.1 → 1.98.0

data/tmpsets/set/mod003-core/all/cache.rb

@@ -0,0 +1,123 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (Cache)
+#
+module Cache;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/cache.rb"; end
+module ClassMethods
+  def retrieve_from_cache cache_key, local_only=false
+    return unless cache
+    local_only ? cache.soft.read(cache_key) : cache.read(cache_key)
+  end
+
+  def retrieve_from_cache_by_id id, local_only=false
+    name = retrieve_from_cache "~#{id}", local_only
+    retrieve_from_cache name, local_only if name
+  end
+
+  def retrieve_from_cache_by_key key, local_only=false
+    retrieve_from_cache key, local_only
+  end
+
+  def write_to_cache card, local_only=false
+    if local_only
+      write_to_soft_cache card
+    elsif cache
+      cache.write card.key, card
+      cache.write "~#{card.id}", card.key if card.id.to_i.nonzero?
+    end
+  end
+
+  def write_to_soft_cache card
+    return unless cache
+    cache.soft.write card.key, card
+    cache.soft.write "~#{card.id}", card.key if card.id.to_i.nonzero?
+  end
+
+  def expire name
+    key = name.to_name.key
+    return unless (card = Card.cache.read key)
+    card.expire
+  end
+
+  def new_for_cache card, name, opts
+    return if name.is_a? Integer
+    return if name.blank? && !opts[:new]
+    return if card && (card.type_known? || skip_type_lookup?(opts))
+    new name: name,
+        skip_modules: true,
+        skip_type_lookup: skip_type_lookup?(opts)
+  end
+end
+
+def expire_pieces
+  name.piece_names.each do |piece|
+    Card.expire piece
+  end
+end
+
+def expire cache_type=nil
+  return unless (cache_class = cache_class_from_type cache_type)
+  expire_views
+  expire_names cache_class
+  expire_id cache_class
+end
+
+def cache_class_from_type cache_type
+  cache_type ? Card.cache.send(cache_type) : Card.cache
+end
+
+def register_view_cache_key cache_key
+  view_cache_keys cache_key
+  hard_write_view_cache_keys
+end
+
+def view_cache_keys new_key=nil
+  @view_cache_keys ||= []
+  @view_cache_keys << new_key if new_key
+  append_missing_view_cache_keys
+  @view_cache_keys.uniq!
+  @view_cache_keys
+end
+
+def append_missing_view_cache_keys
+  return unless Card.cache.hard
+  @view_cache_keys +=
+      (Card.cache.hard.read_attribute(key, :view_cache_keys) || [])
+end
+
+def hard_write_view_cache_keys
+  # puts "WRITE VIEW CACHE KEYS (#{name}): #{view_cache_keys}"
+  return unless Card.cache.hard
+  Card.cache.hard.write_attribute key, :view_cache_keys, view_cache_keys
+end
+
+def expire_views
+  # puts "EXPIRE VIEW CACHE (#{name}): #{view_cache_keys}"
+  return unless view_cache_keys.present?
+  Array.wrap(view_cache_keys).each do |view_cache_key|
+    Card::View.cache.delete view_cache_key
+  end
+  @view_cache_keys = nil
+end
+
+def expire_names cache
+  [name, name_before_act].each do |name_version|
+    expire_name name_version, cache
+  end
+end
+
+def expire_name name_version, cache
+  return unless name_version.present?
+  key_version = name_version.to_name.key
+  return unless key_version.present?
+  cache.delete key_version
+end
+
+def expire_id cache
+  return unless id.present?
+  cache.delete "~#{id}"
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/cache.rb ~~

data/tmpsets/set/mod003-core/all/chunk.rb

@@ -0,0 +1,156 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (Chunk)
+#
+module Chunk;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/chunk.rb"; end
+
+def chunks content, type, named=false
+  content ||= self.content
+  type ||= Card::Content::Chunk
+  all_chunks = Card::Content.new(content, self).find_chunks type
+  named ? all_chunks.select(&:referee_name) : all_chunks
+end
+
+def reference_chunks content=nil, named=true
+  chunks content, Card::Content::Chunk::Reference, named
+end
+
+# named=true rejects commented nests
+def nest_chunks content=nil, named=true
+  chunks content, Card::Content::Chunk::Nest, named
+end
+
+# named=true rejects external links (since the don't refer to a card name)
+def link_chunks content=nil, named=false
+  chunks content, Card::Content::Chunk::Link, named
+end
+
+def each_item_name_with_options content=nil
+  reference_chunks(content).each do |chunk|
+    options = chunk.respond_to?(:options) ? chunk.options : {}
+    yield chunk.referee_name, options
+  end
+end
+
+module Format; parent.send :register_set_format, Card::Format, self; extend Card::Set::AbstractFormat
+  def nested_fields content=nil
+    result = []
+    each_nested_card(content, true) do |chunk|
+      result << [chunk.referee_name, chunk.options]
+    end
+    result
+  end
+
+  def nested_field_cards content=nil
+    nested_fields(content).map do |name, _options|
+      Card.fetch name
+    end
+  end
+
+  def nested_cards_for_edit fields_only=false
+    return normalized_edit_fields if edit_fields.present?
+    result = []
+    each_nested_card nil, fields_only do |chunk|
+      result << [chunk.options[:nest_name], chunk.options]
+    end
+    result
+  end
+
+  def edit_fields
+    voo.edit_structure || []
+  end
+
+  def normalized_edit_fields
+    edit_fields.map do |cardish, options|
+      field_mark = normalized_edit_field_mark cardish, options
+      options = normalized_edit_field_options options, Card::Name[field_mark]
+      [field_mark, options]
+    end
+  end
+
+  def normalized_edit_field_options options, cardname
+    options ||= cardname
+    options.is_a?(String) ? { title: options } : options
+  end
+
+  def normalized_edit_field_mark cardish, options
+    return cardish if cardish.is_a?(Card) ||
+                      (options.is_a?(Hash) && options.delete(:absolute))
+    card.name.field cardish
+  end
+
+  def process_field chunk, processed
+    return unless process_unique_field? chunk, processed
+    yield chunk if block_given?
+  end
+
+  def each_nested_field content=nil, &block
+    each_nested_card content, true, &block
+  end
+
+  def each_nested_card content=nil, fields_only=false, &block
+    processed = process_tally
+    nest_chunks(content).each do |chunk|
+      next if fields_only && !field_chunk?(chunk)
+      process_nested_chunk chunk, processed, &block
+    end
+  end
+
+  def uniq_nested_cards content: nil
+    with_unique_chunks do
+      nest_chunks(content).map do |chunk|
+        chunk.referee_card if unique_chunk? chunk
+      end
+    end
+  end
+
+  def nest_chunks content=nil
+    content ||= _render_raw
+    card.nest_chunks content
+  end
+
+  def process_tally
+    ::Set.new [card.key]
+  end
+
+  def field_chunk? chunk
+    chunk.referee_name.to_name.field_of? card.name
+  end
+
+  def unique_chunk? chunk
+    key = chunk.referee_name.key
+    return false if @processed.include? key
+    @processed << key
+    true
+  end
+
+  def with_unique_chunks
+    @processed = ::Set.new [card.key]
+    yield
+  end
+
+  def process_nested_chunk chunk, processed, &block
+    virtual = chunk.referee_card&.virtual?
+    # TODO: handle structures that are non-virtual
+    method = virtual ? :process_virtual_field : :process_field
+    send method, chunk, processed, &block
+  end
+
+  def process_virtual_field chunk, processed, &block
+    return unless process_unique_field? chunk, processed
+    subformat(chunk.referee_card).each_nested_field do |sub_chunk|
+      process_field sub_chunk, processed, &block
+    end
+  end
+
+  def process_unique_field? chunk, processed
+    key = chunk.referee_name.key
+    return false if processed.include? key
+    processed << key
+    true
+  end
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/chunk.rb ~~

data/tmpsets/set/mod003-core/all/codename.rb

@@ -0,0 +1,36 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (Codename)
+#
+module Codename;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/codename.rb"; end
+def codename
+  super&.to_sym
+end
+
+event :validate_codename, :validate, on: :update, changed: :codename do
+  validate_codename_permission
+  validate_codename_uniqueness
+end
+
+event :reset_codename_cache, :integrate, changed: :codename do
+  return if @action == :create && codename.nil?
+
+  Card::Codename.reset_cache
+end
+
+private
+
+def validate_codename_permission
+  return if Auth.always_ok?
+  errors.add :codename, tr(:only_admins_codename)
+end
+
+def validate_codename_uniqueness
+  return (self.codename = nil) if codename.blank?
+  return if errors.present? || !Card.find_by_codename(codename)
+  errors.add :codename, tr(:error_code_in_use, codename: codename)
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/codename.rb ~~

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

@@ -0,0 +1,64 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (Collection)
+#
+# shared methods for card collections (Pointers, Searches, Sets, etc.)
+module Collection;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/collection.rb"; end
+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 collection?
+  item_cards != [self]
+end
+
+module Format; parent.send :register_set_format, Card::Format, self; extend Card::Set::AbstractFormat
+  view :count do
+    card.item_names.size
+  end
+end
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  view :carousel do
+    bs_carousel unique_id, 0 do
+      nest_item_array.each do |rendered_item|
+        item(rendered_item)
+      end
+    end
+  end
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/collection.rb ~~

data/tmpsets/set/mod003-core/all/content.rb

@@ -0,0 +1,121 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (Content)
+#
+module Content;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/content.rb"; end
+def content= value
+  self.db_content = value
+end
+
+def content
+  structured_content || standard_content
+end
+alias raw_content content #DEPRECATED!
+
+def content?
+  content.present?
+end
+
+def standard_content
+  db_content || (new_card? && template.db_content)
+end
+
+def structured_content
+  structure && template.db_content
+end
+
+module Format; parent.send :register_set_format, Card::Format, self; extend Card::Set::AbstractFormat
+  def chunk_list # override to customize by set
+    :default
+  end
+end
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  view :hidden_content_field, unknown: true, cache: :never do
+    hidden_field :content, class: "d0-card-content"
+  end
+end
+
+def label
+  name
+end
+
+def creator
+  Card[creator_id]
+end
+
+def updater
+  Card[updater_id]
+end
+
+def save_content_draft _content
+  clear_drafts
+end
+
+def clear_drafts
+  drafts.created_by(Card::Auth.current_id).each(&:delete)
+end
+
+def last_draft_content
+  drafts.last.card_changes.last.value
+end
+
+event :set_content, :store, on: :save do
+  self.db_content = prepare_db_content
+  @selected_action_id = @selected_content = nil
+  clear_drafts
+  reset_patterns_if_rule true
+end
+
+event :save_draft, :store, on: :update, when: :draft? do
+  save_content_draft content
+  abort :success
+end
+
+event :set_default_content,
+      :prepare_to_validate,
+      on: :create, when: :use_default_content? do
+  self.db_content = template.db_content
+end
+
+def draft?
+  Env.params["draft"] == "true"
+end
+
+def prepare_db_content
+  cont = standard_db_content || "" # necessary?
+  clean_html? ? Card::Content.clean!(cont) : cont
+end
+
+def standard_db_content
+  if structure
+    # do not override db_content with content from structure
+    db_content
+  else
+    standard_content
+  end
+end
+
+def clean_html?
+  true
+end
+
+def use_default_content?
+  !db_content_changed? && template && template.db_content.present?
+end
+
+def unfilled?
+  blank_content? && blank_comment? && !subcards?
+end
+
+def blank_content?
+  content.blank? || content.strip.blank?
+end
+
+def blank_comment?
+  comment.blank? || comment.strip.blank?
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/content.rb ~~