card 1.99.1 → 1.99.6

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

@@ -1,118 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (NameEvents)
-#
-# STAGE: prepare to validate
-module NameEvents;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/name_events.rb"; end
-
-event :set_autoname, :prepare_to_validate, on: :create do
-  if name.blank? && (autoname_card = rule_card(:autoname))
-    self.name = autoname autoname_card.db_content
-    # FIXME: should give placeholder in approve phase
-    # and finalize/commit change in store phase
-    autoname_card.refresh.update_column :db_content, name
-  end
-end
-
-# STAGE: validate
-
-event :validate_name, :validate, on: :save, changed: :name do
-  validate_legality_of_name
-  return if errors.any?
-  validate_uniqueness_of_name
-end
-
-event :validate_uniqueness_of_name do
-  # validate uniqueness of name
-  rel = Card.where key: name.key, trash: false
-  rel = rel.where "id <> ?", id if id
-  if (existing = rel.take)
-    errors.add :name, tr(:error_name_exists, name: existing.name)
-  end
-end
-
-event :validate_legality_of_name do
-  if name.length > 255
-    errors.add :name, tr(:error_too_long, length: name.length)
-  elsif name.blank?
-    errors.add :name, tr(:error_blank_name)
-  elsif name.parts.include? ""
-    errors.add :name, tr(:is_incomplete)
-  elsif !name.valid?
-    errors.add :name, tr(:error_banned_characters, banned: Card::Name.banned_array * " ")
-  elsif changing_existing_tag_to_junction?
-    errors.add :name, tr(:error_name_tag, name: name)
-  end
-end
-
-event :validate_key, after: :validate_name, on: :save do
-  if key.empty?
-    errors.add :key, tr(:error_blank_key) if errors.empty?
-  elsif key != name.key
-    errors.add :key, tr(:error_wrong_key, key: key, name: name)
-  end
-end
-
-# STAGE: store
-
-event :set_name, :store, changed: :name do
-  expire
-end
-
-event :set_left_and_right, :store,
-      changed: :name, on: :save do
-  if name.junction?
-    %i[left right].each do |side|
-      assign_side_id side
-    end
-  else
-    self.left_id = self.right_id = nil
-  end
-end
-
-# STAGE: finalize
-
-event :name_change_finalized, :finalize, changed: :name, on: :save do
-  # The events to update references has to happen after :cascade_name_changes,
-  # but :cascade_name_changes is defined after the reference events and
-  # and additionaly it is defined on :update but some of the reference
-  # events are on :save. Hence we need this additional hook to organize these events.
-end
-
-private
-
-def changing_existing_tag_to_junction?
-  return false unless changing_name_to_junction?
-  name_in_use_as_tag?
-end
-
-def name_in_use_as_tag?
-  !Card.where(right_id: id, trash: false).take.nil?
-end
-
-def changing_name_to_junction?
-  name.junction? && simple?
-end
-
-def assign_side_id side
-  sidename = name.send "#{side}_name"
-  sidecard = Card[sidename] || ActManager.card(sidename)
-
-  # eg, renaming A to A+B
-  old_name_in_way = (sidecard&.id && sidecard&.id == id)
-  suspend_name(sidename) if old_name_in_way
-  send "#{side}_id=", side_id_or_card(old_name_in_way, sidecard, sidename)
-end
-
-def side_id_or_card old_name_in_way, sidecard, sidename
-  if !sidecard || old_name_in_way
-    add_subcard(sidename.s)
-  else
-    # if sidecard doesn't have an id, it's already part of this act
-    sidecard.id || sidecard
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/name_events.rb ~~

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

@@ -1,31 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Observer)
-#
-module Observer;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/observer.rb"; end
-%i[create update delete].each do |action|
-  event "observer_#{action}".to_sym, :integrate, on: action do
-    execute_card_events on: action
-  end
-end
-
-event :cache_delete_card_events, :store, on: :delete do
-  @card_event_cache = event_cards :on_delete
-end
-
-def execute_card_events args
-  setting = "on_#{args[:on]}".to_sym
-  event_cards(setting).each do |event_card|
-    event_card.deliver self
-  end
-end
-
-def event_cards setting
-  @card_event_cache ||
-    ((event_rule = rule_card(setting)) && event_rule.extended_item_cards) ||
-    []
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/observer.rb ~~

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

@@ -1,25 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Phases)
-#
-module Phases;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/phases.rb"; end
-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
-
-# def clean_up
-#   Card::ActManager.clear
-# end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/phases.rb ~~

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

@@ -1,47 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Rename)
-#
-module Rename;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/rename.rb"; end
-event :rename_in_trash, after: :set_name, on: :update do
-  existing_card = Card.find_by_key_and_trash name.key, true
-  return if !existing_card || existing_card == self
-  existing_card.name = existing_card.name + "*trash"
-  existing_card.rename_in_trash_without_callbacks
-  existing_card.save!
-end
-
-def suspend_name name
-  # move the current card out of the way, in case the new name will require
-  # re-creating a card with the current name, ie.  A -> A+B
-  Card.expire name
-  tmp_name = "tmp:" + UUID.new.generate
-  Card.where(id: id).update_all(name: tmp_name, key: tmp_name)
-end
-
-event :validate_renaming, :validate, on: :update, changed: :name, skip: :allowed do
-  errors.add :content, tr(:cannot_change_content) if db_content_is_changing?
-  errors.add :type, tr(:cannot_change_type) if type_id_is_changing?
-end
-
-event :cascade_name_changes, :finalize, on: :update, changed: :name,
-                                        before: :name_change_finalized do
-  @descendants = nil # reset
-
-  children.each do |child|
-    Rails.logger.info "cascading name: #{child.name}"
-    newname = child.name.swap name_before_last_save, name
-    # not sure if this is still needed since we attach the children as subcards
-    # (it used to be resolved right here without adding subcards)
-    Card.expire child.name
-
-    # superleft has to be the first argument. Otherwise the call of `name=` in
-    # `assign_attributes` can cause problems because `left` doesn't find the new left.
-    attach_subcard child.name, superleft: self, name: newname,
-                               update_referers: update_referers
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/rename.rb ~~

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

@@ -1,26 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Stages)
-#
-module Stages;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/stages.rb"; end
-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
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/stages.rb ~~

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

@@ -1,91 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (States)
-#
-# All cards have one (and only one) of these three states: real, virtual, and unknown.
-#
-# - *real* cards are stored in the database (but not in the trash) and have a unique id.
-# - *virtual* cards are not real, but they act real based on rules. For example,
-#   Home+*editors does a search for all the users who have edited the "Home" card.
-#   There are many other similar cards that search for things like references, children,
-#   etc. But we don't store all these cards in the database; we generate them dynamically
-module States;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/states.rb"; end
-#   based on the names.
-# - *unknown* cards are everything else.
-#
-# These states are frequently grouped as follows:
-#
-# - *known* cards are either _real_ or _virtual_
-# - *new* (or *unreal*) cards are either _unknown_ or _virtual_
-
-module ClassMethods
-  def real? mark
-    quick_fetch(mark).present?
-  end
-  alias exist? real?
-  alias exists? real?
-
-  def known? mark
-    fetch(mark).present?
-  end
-end
-
-# @return [Symbol] :real, :virtual, or :unknown
-def state anti_fishing=true
-  case
-  when !known?                     then :unknown
-  when anti_fishing && !ok?(:read) then :unknown
-  when real?                       then :real
-  when virtual?                    then :virtual
-  else :wtf
-  end
-end
-
-# @return [True/False]
-def real?
-  !unreal?
-end
-
-# Virtual cards are structured, compound cards that are not stored in the database. You
-# can create virtual cards with structure rules.
-#
-# Some cards with hard-coded content will also override the #virtual? method. This
-# is established practice, but it is NOT advisable to override any of the other
-# state methods.
-#
-# @return [True/False]
-def virtual?
-  if @virtual.nil?
-    @virtual = real? || name.simple? ? false : structure.present?
-  end
-  @virtual
-end
-
-# @return [True/False]
-def unknown?
-  !known?
-end
-
-# @return [True/False]
-def known?
-  real? || virtual?
-end
-
-# @return [True/False]
-def new?
-  new_record? ||       # not yet in db (from ActiveRecord)
-    !@from_trash.nil?  # in process of restoration from trash
-end
-alias new_card? new?
-alias unreal? new?
-
-# has not been edited directly by human users.  bleep blorp.
-def pristine?
-  new_card? || !actions.joins(:act).where(
-    "card_acts.actor_id != ?", Card::WagnBotID
-  ).exists?
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/states.rb ~~

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

@@ -1,59 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Tabs)
-#
-module Tabs;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/tabs.rb"; end
-module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :tabs do
-    construct_tabs "tabs"
-  end
-
-  def construct_tabs tab_type
-    tabs = { active: {}, paths: {} }
-    voo.items[:view] ||= :content
-    card.each_item_name_with_options(_render_raw) do |name, options|
-      construct_tab tabs, name, options
-    end
-    lazy_loading_tabs tabs[:paths], tabs[:active][:name],
-                      tabs[:active][:content], type: tab_type
-  end
-
-  def construct_tab tabs, name, explicit_options
-    tab_options = item_view_options explicit_options
-    tabs[:paths][name] = {
-      title: nest(name, view: :title, title: tab_options[:title]),
-      path: nest_path(name, tab_options).html_safe
-    }
-    return unless tabs[:active].empty?
-    tabs[:active] = { name: name, content: nest(name, tab_options) }
-  end
-
-  # def tab_title title, name
-  #   return name unless title
-  #   name.to_name.title title, @context_names
-  # end
-
-  view :pills do
-    construct_tabs "pills"
-  end
-
-  view :tabs_static do
-    construct_static_tabs "tabs"
-  end
-
-  view :pills_static do
-    construct_static_tabs "pills"
-  end
-
-  def construct_static_tabs tab_type
-    tabs = {}
-    card.item_cards.each do |item|
-      tabs[item.name] = nest item, item_view_options(args)
-    end
-    static_tabs tabs, tab_type
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/tabs.rb ~~

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

@@ -1,135 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Trash)
-#
-module Trash;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/trash.rb"; end
-Self::Admin.add_to_basket(
-  :tasks,
-  name: :empty_trash,
-  irreversible: true,
-  execute_policy: -> { Card.empty_trash },
-  stats: {
-    title: "trashed cards",
-    count: -> { Card.where(trash: true) },
-    link_text: "empty trash",
-    task: "empty_trash"
-  }
-)
-
-module ClassMethods
-  def empty_trash
-    Card.delete_trashed_files
-    Card.where(trash: true).delete_all
-    Card::Action.delete_cardless
-    Card::Change.delete_actionless
-    Card::Reference.unmap_if_referee_missing
-    Card::Reference.delete_if_referer_missing
-  end
-
-  # deletes any file not associated with a real card.
-  def delete_trashed_files
-    dir = Cardio.paths["files"].existent.first
-    # TODO: handle cloud files
-    return unless dir
-
-    trashed_card_ids = all_trashed_card_ids
-    file_ids = all_file_ids
-    file_ids.each do |file_id|
-      next unless trashed_card_ids.member?(file_id)
-      raise Card::Error, tr(:exception_almost_deleted) if Card.exists?(file_id)
-      ::FileUtils.rm_rf "#{dir}/#{file_id}", secure: true
-    end
-  end
-
-  def all_file_ids
-    dir = Card.paths["files"].existent.first
-    Dir.entries(dir)[2..-1].map(&:to_i)
-  end
-
-  def all_trashed_card_ids
-    trashed_card_sql = %( select id from cards where trash is true )
-    sql_results = Card.connection.select_all(trashed_card_sql)
-    sql_results.map(&:values).flatten.map(&:to_i)
-  end
-end
-
-def delete args={}
-  add_to_trash args do |delete_args|
-    update delete_args
-  end
-end
-
-def delete! args={}
-  add_to_trash args do |delete_args|
-    update! delete_args
-  end
-end
-
-def add_to_trash args
-  return if new_card?
-  yield args.merge trash: true
-end
-
-event :manage_trash, :prepare_to_store, on: :create do
-  pull_from_trash!
-  self.trash = false
-  true
-end
-
-def pull_from_trash!
-  return unless (trashed_card = Card.find_by_key_and_trash key, true)
-  # fwiw, now we _could_ get card using fetch look_in_trash: true (not tried).
-
-  self.id = trashed_card.id
-  # following is needed so that #id_in_database returns existing card id
-  # (and record is updated correctly)
-  db_attributes["id"] = trashed_card.db_attributes["id"]
-
-  @from_trash = true
-  @new_record = false
-end
-
-def db_attributes
-  send(:mutations_from_database).send :attributes
-end
-
-event :validate_delete, :validate, on: :delete do
-  unless codename.blank?
-    errors.add :delete, tr(:error_system_card, name: name, codename: codename)
-  end
-
-  undeletable_all_rules_tags =
-    %w[default style layout create read update delete]
-  # FIXME: HACK! should be configured in the rule
-
-  if junction? && left&.codename == :all &&
-     undeletable_all_rules_tags.member?(right.codename.to_s)
-    errors.add :delete, tr(:error_indestructible, name: name)
-  end
-
-  errors.add :delete, tr(:error_user_edits, name: name) if account && has_edits?
-end
-
-event :validate_delete_children, after: :validate_delete, on: :delete do
-  return if errors.any?
-  children.each do |child|
-    next unless child
-    # prevents errors in cases where a child is deleted prior to this point
-    # and thus is not returned by the fetch in #children
-
-    delete_as_subcard child
-    # next if child.valid?
-    # child.errors.each do |field, message|
-    #   errors.add field, "can't delete #{child.name}: #{message}"
-    # end
-  end
-end
-
-def delete_as_subcard subcard
-  subcard.trash = true
-  add_subcard subcard
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/trash.rb ~~