card 1.101.5 → 1.101.6

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

@@ -1,42 +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: :expire_old_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
-
-event :validate_renaming, :validate, on: :update, changed: :name, skip: :allowed do
-  return if name_before_act&.to_name == name # just changing to new variant
-  errors.add :content, tr(:cannot_change_content) if content_is_changing?
-  errors.add :type, tr(:cannot_change_type) if type_is_changing?
-  detect_illegal_compound_names
-end
-
-event :cascade_name_changes, :finalize, on: :update, changed: :name do
-  each_descendant do |d|
-    d.action = :update
-    update_referers ? d.update_referers : d.update_referer_references_out
-    d.refresh_references_in
-    d.refresh_references_out
-    d.expire
-  end
-end
-
-def changed_from_simple_to_compound?
-  name.compound? && name_before_act.to_name.simple?
-end
-
-def detect_illegal_compound_names
-  return unless changed_from_simple_to_compound? && child_ids(:right).present?
-  errors.add :name, "illegal name change; existing names end in +#{name_before_act}"
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/rename.rb ~~

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

@@ -1,90 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Rules)
-#
-module Rules;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/core/set/all/rules.rb"; end
-def rule setting_code
-  rule_card(setting_code, skip_modules: true)&.db_content
-end
-
-def rule_card setting_code, options={}
-  Card.fetch rule_card_id(setting_code), options
-end
-
-def rule_card_id setting_code
-  rule_id_lookup Card::Rule.rule_cache, setting_code
-end
-
-def preference setting_code, user=nil
-  preference_card(setting_code, user, skip_modules: true)&.db_content
-end
-
-def preference_card setting_code, user=nil, options={}
-  Card.fetch preference_card_id(setting_code, user), options
-end
-
-def preference_card_id setting_code, user=nil
-  return unless (user_id = preference_user_id user)
-  rule_id_lookup Card::Rule.preference_cache,
-                 "#{setting_code}+#{user_id}",
-                 "#{setting_code}+#{AllID}"
-end
-
-def is_rule?
-  is_standard_rule? || is_preference?
-end
-
-def is_standard_rule?
-  (r = right(skip_modules: true)) &&
-    r.type_id == SettingID &&
-    (l = left(skip_modules: true)) &&
-    l.type_id == SetID
-end
-
-def is_preference?
-  name.parts.length > 2 &&
-    (r = right(skip_modules: true)) &&
-    r.type_id == SettingID &&
-    (set = self[0..-3, skip_modules: true]) &&
-    set.type_id == SetID &&
-    (user = self[-2, skip_modules: true]) &&
-    (user.type_id == UserID || user.codename == :all)
-end
-
-# FIXME: move to a better place (if still needed) and use codenames
-def related_sets with_self=false
-  # refers to sets that users may configure from the current card -
-  # NOT to sets to which the current card belongs
-
-  sets = []
-  sets << ["#{name}+*self", Card::Set::Self.label(name)] if with_self
-  if known? && name.simple?
-    sets << ["#{name}+*right", Card::Set::Right.label(name)]
-  end
-  sets
-end
-
-private
-
-def preference_user_id user
-  case user
-  when Integer then user;
-  when Card    then user
-  when nil     then Auth.current_id
-  else
-    raise Card::ServerError, "invalid preference user"
-  end
-end
-
-def rule_id_lookup lookup_hash, cache_suffix, fallback_suffix=nil
-  rule_set_keys.each do |rule_set_key|
-    rule_id = lookup_hash["#{rule_set_key}+#{cache_suffix}"]
-    rule_id ||= fallback_suffix && lookup_hash["#{rule_set_key}+#{fallback_suffix}"]
-    return rule_id if rule_id
-  end
-  nil
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set/all/rules.rb ~~

data/tmpsets/set/mod003-settings/right/autoname.rb

@@ -1,12 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Autoname" cards
-#
-module Autoname;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/settings/set/right/autoname.rb"; end
-def history?
-  false
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/settings/set/right/autoname.rb ~~

data/tmpsets/set/mod004-standard/all/rich_html/html_views/info.rb

@@ -1,93 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module RichHtml;; module HtmlViews;
-# Set: All cards (RichHtml, HtmlViews, Info)
-#
-module Info;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/standard/set/all/rich_html/html_views/info.rb"; end
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :type, unknown: true do
-    link_to_card card.type_card, nil, class: "cardtype"
-  end
-
-  view :change do
-    voo.show :title_link
-    voo.hide :menu
-    wrap do
-      [_render_title,
-       _render_menu,
-       _render_last_action]
-    end
-  end
-
-  view :last_action do
-    act = card.last_act
-    return unless act
-
-    action = act.action_on card.id
-    return unless action
-
-    action_verb =
-      case action.action_type
-      when :create then "added"
-      when :delete then "deleted"
-      else
-        link_to_view :history, "edited", class: "last-edited", rel: "nofollow"
-      end
-
-    %(
-      <span class="last-update">
-        #{action_verb} #{_render_acted_at} ago by
-        #{subformat(card.last_actor)._render_link}
-      </span>
-    )
-  end
-
-  view :type_info do
-    return unless card.type_code != :basic
-
-    wrap_with :span, class: "type-info float-right" do
-      link_to_card card.type_name, nil, class: "navbar-link"
-    end
-  end
-
-  view :view_list do
-    %i[bar box info_bar open closed titled labeled content content_panel].map do |v|
-      wrap_with :p, [content_tag(:h3, v), render(v, show: :menu)]
-    end.flatten.join ""
-  end
-
-  view :demo do
-    frame do
-      [
-        view_select,
-        wrap_with(:div, view_demo, class: "demo-slot")
-      ]
-    end
-  end
-
-  def demo_view
-    Env.params[:demo_view] || :core
-  end
-
-  def view_demo
-    wrap(true) do
-      render demo_view
-    end
-  end
-
-  def view_select
-    card_form :get, success: { view: :demo } do
-      select_tag :demo_view, options_for_select(all_views, demo_view),
-                 class: "_submit-on-select"
-    end
-  end
-
-  def all_views
-    Card::Set::Format::AbstractFormat::ViewDefinition.views
-                                                     .slice(*self.class.ancestors)
-                                                     .values.map(&:keys).flatten.uniq
-  end
-end
-end;end;end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/standard/set/all/rich_html/html_views/info.rb ~~

data/tmpsets/set/mod004-standard/type/cardtype.rb

@@ -1,128 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "Cardtype" cards
-#
-module Cardtype;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/standard/set/type/cardtype.rb"; end
-def related_sets with_self=false
-  sets = []
-  sets << ["#{name}+*type", Card::Set::Type.label(name)] if known?
-  sets + super
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :type, unknown: true do
-    link_to_card card.type_card, nil, class: "cardtype"
-  end
-
-  def type_formgroup args={}
-    if card.cards_of_type_exist?
-      wrap_with :div, tr(:cards_exist, cardname: safe_name)
-    else
-      super
-    end
-  end
-
-  view :add_link do
-    add_link
-  end
-
-  view :add_button do
-    add_link class: "btn btn-secondary"
-  end
-
-  def add_link opts={}
-    voo.title ||= tr(:add_card, cardname: safe_name)
-    link_to render_title, add_link_opts(opts)
-  end
-
-  def add_link_opts opts
-    modal = opts.delete :modal
-    modal = true if modal.nil?
-    opts[:path] = add_path(modal ? :new_in_modal : :new)
-    modal ? modal_link_opts(opts) : opts
-  end
-
-  view :add_url do
-    card_url _render_add_path
-  end
-
-  def add_path view
-    path_args = { mark: card.name }
-    process_voo_params(path_args) if voo.params
-    if view == :new
-      path_args[:action] = :new
-    else
-      path_args[:action] = :type
-      path_args[:view] = view
-    end
-    path path_args
-  end
-
-  # don't cache because it depends on update permission for another card
-  view :configure_link, cache: :never, perms: ->(fmt) { fmt.can_configure? } do
-    configure_link
-  end
-
-  def can_configure?
-    Card.fetch(card, :type, :structure, new: {}).ok? :update
-  end
-
-  view :configure_button, cache: :never, denial: :blank,
-                          perms:  ->(fmt) { fmt.can_configure? } do
-    configure_link "btn btn-secondary"
-  end
-
-  def configure_link css_class=nil
-    return "" unless Card.fetch(card, :type, :structure, new: {}).ok? :update
-
-    voo.title ||= tr(:configure_card, cardname: safe_name.pluralize)
-    title = _render_title
-    link_to_card card, title, path: { view: :bridge, bridge: { tab: :rules_tab },
-                                      set: Card::Name[safe_name, :type] },
-                              class: css_classes("configure-type-link ml-3", css_class)
-  end
-
-  private
-
-  def process_voo_params path_args
-    context = ((@parent&.card) || card).name
-    Rack::Utils.parse_nested_query(voo.params).each do |key, value|
-      value = value.to_name.absolute(context) if value
-      key = key.to_name.absolute(context)
-      path_args[key] = value
-    end
-  end
-end
-
-def cards_of_type_exist?
-  !new_card? && Card.where(trash: false, type_id: id).exists?
-end
-
-def create_ok?
-  Card.new(type_id: id).ok? :create
-end
-
-def was_cardtype?
-  type_id_before_act == Card::CardtypeID
-end
-
-event :check_for_cards_of_type, after: :validate_delete do
-  errors.add :cardtype, tr(:cards_exist, cardname: name) if cards_of_type_exist?
-end
-
-event :check_for_cards_of_type_when_type_changed,
-      :validate, changing: :type, when: :was_cardtype? do
-  if cards_of_type_exist?
-    errors.add :cardtype, tr(:error_cant_alter, name: name_before_act)
-  end
-end
-
-event :validate_cardtype_name, :validate, on: :save, changed: :name do
-  if %r{[<>/]}.match?(name)
-    errors.add :name, tr(:error_invalid_character_in_cardtype, banned: "<, >, /")
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/standard/set/type/cardtype.rb ~~

data/tmpsets/set/mod011-card-mod-account/right/api_key.rb

@@ -1,57 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+ApiKey" cards
-#
-module ApiKey;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-account/set/right/api_key.rb"; end
-include_set Abstract::AccountField
-
-# DURATIONS = "second|minute|hour|day|week|month|year".freeze
-
-def history?
-  false
-end
-
-view :raw do
-  tr :private_data
-end
-
-def validate! api_key
-  error =
-    case
-    when !real?             then [:token_not_found, tr(:error_token_not_found)]
-    # when expired?           then [:token_expired, tr(:error_token_expired)]
-    when content != api_key then [:incorrect_token, tr(:error_incorrect_token)]
-    end
-  errors.add(*error) if error
-  error.nil?
-end
-
-# def expired?
-#   !permanent? && updated_at <= term.ago
-# end
-#
-# def permanent?
-#   term == "permanent"
-# end
-
-# def term
-#   @term ||=
-#     if expiration.present?
-#       term_from_string expiration
-#     else
-#       Card.config.token_expiry
-#     end
-# end
-
-# def term_from_string string
-#   string.strip!
-#   return "permanent" if string == "none"
-#   re_match = /^(\d+)[\.\s]*(#{DURATIONS})s?$/.match(string)
-#   number, unit = re_match.captures if re_match
-#   raise Card::Open::Error, tr(:exception_bad_expiration, example: '2 days') unless unit
-#   number.to_i.send unit
-# end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-account/set/right/api_key.rb ~~