card 1.102.0 → 1.103.0

data/lib/cardio/defaults.yml

@@ -1,71 +0,0 @@
----
-
-# if you disable inline styles tinymce's formatting options stop working
-:allow_inline_styles: true
-:delaying:
-
-token_expiry: !ruby/object:ActiveSupport::Duration
-  value: 172800
-  parts:
-    :days: 2
-
-:recaptcha_public_key: # deprecated; use recaptcha_site_key instead
-:recaptcha_private_key: # deprecated; use recaptcha_secret_key instead
-
-:recaptcha_proxy:
-:recaptcha_site_key:
-:recaptcha_secret_key:
-:recaptcha_minimum_score: 0.5
-
-:google_analytics_key:
-
-:override_host:
-:override_protocol:
-
-:no_authentication: false
-:files_web_path: files
-
-:max_char_count: 200
-:max_depth: 20
-:email_defaults:
-
-:acts_per_page: 10
-:space_last_in_multispace: true
-:closed_search_limit: 10
-:paging_limit: 20
-
-:non_createable_types:
-  - - signup
-    - setting
-    - set
-    - session
-    - bootswatch_skin
-    - customized_bootswatch_skin
-
-:view_cache: false
-:rss_enabled: false
-:double_click: :signed_in
-
-:encoding: utf-8
-:request_logger: false
-:performance_logger: false
-:sql_comments: true
-
-:file_storage: :local
-:file_buckets: {}
-:file_default_bucket:
-:protocol_and_host:
-
-:rich_text_editor: :tinymce
-
-:persistent_cache: true
-:prepopulate_cache: false
-:machine_refresh: :cautious
-:compress_javascript: true
-
-:allow_irreversible_admin_tasks: false
-:raise_all_rendering_errors: false
-:rescue_all_in_controller: true
-:navbox_match_start_only: true
-
-:cache_set_module_list: false

data/tmpsets/set/mod001-admin/self/admin.rb

@@ -1,155 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Admin"
-#
-# collect arrays of the form
-module Admin;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/card/mod/admin/set/self/admin.rb"; end
-# [task symbol, { execute_policy: block, stats_policy: block }]
-basket :tasks
-
-def run_task_from_task_basket task
-  task = task.to_sym
-  task_data = tasks.find { |h| h[:name].to_sym == task.to_sym }
-  if !irreversibles_tasks_allowed? && task_data[:irreversible]
-    not_allowed task_data[:stats][:link_text]
-  elsif task_data
-    task_data[:execute_policy].call
-  end
-end
-
-event :admin_tasks, :initialize, on: :update do
-  return unless (task = Env.params[:task])
-  raise Card::Error::PermissionDenied, self unless Auth.always_ok?
-
-  case task.to_sym
-  when :clear_cache          then Card::Cache.reset_all
-  when :repair_references    then Card::Reference.repair_all
-  when :repair_permissions   then Card.repair_all_permissions
-  when :clear_solid_cache    then Card.clear_solid_cache
-  when :clear_machine_cache  then Card.reset_all_machines
-  when :clear_script_cache   then Card.reset_script_machine
-  when :clear_history
-    not_allowed "clear history" unless irreversibles_tasks_allowed?
-    Card::Action.delete_old
-  else
-    run_task_from_task_basket task
-  end
-  abort :success
-end
-
-def not_allowed task
-  raise Card::Error::PermissionDenied,
-        "The admin task '#{task}' is disabled for security reasons.<br>"\
-        "You can enable it with the config option 'allow_irreversible_admin_tasks'"
-end
-
-def irreversibles_tasks_allowed?
-  Cardio.config.allow_irreversible_admin_tasks
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :core, cache: :never do
-    stats = card_stats
-    stats += cache_stats
-    stats += memory_stats
-    card.tasks.each do |task|
-      stats += Array.wrap task[:stats]
-    end
-    table_content = stats.map { |args| stat_row(args) }
-    table table_content, header: %w[Stat Value Action]
-  end
-
-  def card_stats
-    [
-      { title: "cards",
-        count: Card.where(trash: false) },
-      { title: "actions",
-        count: Card::Action },
-      #  link_text: "clear history",
-      #  task: "clear_history" },
-      { title: "references",
-        count: Card::Reference }
-      # link_text: "repair all",
-      # task: "repair_references" }
-    ]
-  end
-
-  def cache_stats
-    [
-      { title: "solid cache",
-        count: solid_cache_count, unit: " cards",
-        link_text: "clear solid cache",
-        task: "clear_solid_cache" },
-      { title: "machine cache",
-        count: machine_cache_count, unit: " cards",
-        link_text: "clear machine cache",
-        task: "clear_machine_cache" }
-    ]
-    # return stats unless Card.config.view_cache#
-    # stats << { title: "view cache",
-    #            count: Card::View,
-    #            link_text: "clear view cache",
-    #            task: "clear_view_cache" }
-  end
-
-  def memory_stats
-    oldmem = session[:memory]
-    session[:memory] = newmem = card.profile_memory
-    stats = [
-      { title: "memory now",
-        count: newmem, unit: "M",
-        link_text: "clear cache", task: "clear_cache" }
-    ]
-    return stats unless oldmem
-
-    stats << { title: "memory prev", count: oldmem, unit: "M" }
-    stats << { title: "memory diff", count: newmem - oldmem, unit: "M" }
-    stats
-  end
-
-  def stat_row args={}
-    res = [(args[:title] || "")]
-    res << "#{count(args[:count])}#{args[:unit]}"
-    return res unless args[:task]
-
-    res << link_to_card(:admin, (args[:link_text] || args[:task]),
-                        path: { action: :update, task: args[:task] })
-    res
-  end
-
-  def count counter
-    counter = counter.call if counter.is_a?(Proc)
-    counter.respond_to?(:count) ? counter.count : counter
-  end
-
-  def solid_cache_count
-    Card.search right: { codename: "solid_cache" }, return: "count"
-  end
-
-  def machine_cache_count
-    Card::Virtual.where(right_id: MachineCacheID).count
-  end
-
-  def delete_sessions_link months
-    link_to_card :admin, months, path: { action: :update, months: months,
-                                         task: "delete_old_sessions" }
-  end
-end
-
-def current_memory_usage
-  `ps -o rss= -p #{Process.pid}`.to_i
-end
-
-def profile_memory &block
-  before = current_memory_usage
-  if block_given?
-    instance_eval(&block)
-  else
-    before = 0
-  end
-  (current_memory_usage - before) / 1024.to_i
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/card/mod/admin/set/self/admin.rb ~~

data/tmpsets/set/mod001-admin/self/admin_info.rb

@@ -1,52 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "AdminInfo"
-#
-module AdminInfo;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/card/mod/admin/set/self/admin_info.rb"; end
-basket :warnings
-
-# For each warning in the basket (eg :my_warning), the core view
-# will run a test by appending a question mark (eg #my_warning?).
-# If it fails it will generate a message by appending message
-# (eg #my_warning_message).
-
-add_to_basket :warnings, :no_email_delivery
-
-def no_email_delivery?
-  Card.config.action_mailer.perform_deliveries == false
-end
-
-def clean_html?
-  false
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :core do
-    warnings = card.warnings.map do |warning|
-      card.send("#{warning}?") ? send("#{warning}_message") : nil
-    end
-    warnings.compact!
-    warnings.empty? ? "" : warning_alert(warnings)
-  end
-
-  def warning_alert warnings
-    # 'ADMINISTRATOR WARNING'
-    alert :warning, true do
-      "<h5>#{t :admin_warn}</h5>" + list_tag(warnings)
-    end
-  end
-
-  def no_email_delivery_message
-    # "Email delivery is turned off."
-    # "Change settings in config/application.rb to send sign up notifications."
-    t :admin_email_off, path: "config/application.rb"
-  end
-
-  def warning_list_with_auto_scope warnings
-    "<h5>#{t :admin_warn}</h5>" + warnings.join("\n")
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/card/mod/admin/set/self/admin_info.rb ~~

data/tmpsets/set/mod001-admin/self/debugger.rb

@@ -1,12 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Debugger"
-#
-module Debugger;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/card/mod/admin/set/self/debugger.rb"; end
-def raw_help_text
-  "show more useful error pages"
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/card/mod/admin/set/self/debugger.rb ~~

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

@@ -1,85 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Abort)
-#
-# The Card#abort method is for cleanly exiting an action without continuing
-# to process any further events.
-#
-# Three statuses are supported:
-#
-module Abort;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/card/mod/core/set/all/abort.rb"; end
-#   failure: adds an error, returns false on save
-#   success: no error, returns true on save
-#   triumph: similar to success, but if called on a subcard
-#            it causes the entire action to abort (not just the subcard)
-def abort status, msg="action canceled"
-  director.abort
-  if status == :failure && errors.empty?
-    errors.add :abort, msg
-  elsif status.is_a?(Hash) && status[:success]
-    success << status[:success]
-    status = :success
-  end
-  raise Card::Error::Abort.new(status, msg)
-end
-
-def aborting
-  yield
-  errors.any? ? abort(:failure) : abort(:success)
-end
-
-def abortable
-  yield
-rescue Card::Error::Abort => e
-  handle_abort_error e
-end
-
-private
-
-def handle_abort_error e
-  case e.status
-  when :triumph
-    @supercard ? raise(e) : true
-  when :success
-    abort_success
-  end
-end
-
-def abort_success
-  if @supercard
-    @supercard.subcards.delete key
-    @supercard.director.subdirectors.delete self
-    expire :soft
-  end
-  true
-end
-
-# this is an override of standard rails behavior that rescues abort
-# makes it so that :success abortions do not rollback
-def with_transaction_returning_status &block
-  status = nil
-  self.class.transaction do
-    add_to_transaction
-    remember_transaction_record_state
-    status = abortable(&block)
-    raise ActiveRecord::Rollback unless status
-  end
-  status
-end
-
-# FIXME: these two do not belong here!
-
-public
-
-event :notable_exception_raised do
-  error = Card::Error.current
-  Rails.logger.debug "#{error.message}\n#{error.backtrace * "\n  "}"
-end
-
-def success
-  Env.success(name)
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/card/mod/core/set/all/abort.rb ~~

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

@@ -1,119 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (AssignAttributes)
-#
-module AssignAttributes;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/card/mod/core/set/all/assign_attributes.rb"; end
-include Card::Subcards::Args
-
-def assign_attributes args={}
-  args = prepare_assignment_args args
-
-  assign_with_subcards args do
-    assign_with_set_modules args do
-      super prepare_assignment_params(args)
-    end
-  end
-end
-
-def assign_set_specific_attributes
-  set_specific.each_pair do |name, value|
-    send "#{name}=", value
-  end
-end
-
-protected
-
-module ClassMethods
-  def assign_or_newish name, attributes, fetch_opts={}
-    if (known_card = Card.fetch(name, fetch_opts))
-      known_card.refresh.newish attributes
-      known_card
-    else
-      Card.new attributes.merge(name: name)
-    end
-  end
-end
-
-def prepare_assignment_params args
-  args = args.to_unsafe_h if args.respond_to?(:to_unsafe_h)
-  params = ActionController::Parameters.new(args)
-  params.permit!
-  params[:db_content] = standardize_content(params[:db_content]) if params[:db_content]
-  params
-end
-
-def prepare_assignment_args args
-  return {} unless args
-
-  args = args.symbolize_keys
-  normalize_type_attributes args
-  stash_set_specific_attributes args
-  args
-end
-
-def assign_with_set_modules args
-  return yield unless args[:name] || args[:type_id]
-
-  refresh_set_modules { yield }
-end
-
-def assign_with_subcards args
-  subcard_args = extract_subcard_args! args
-  yield
-  subcards.add subcard_args if subcard_args.present?
-end
-
-def refresh_set_modules
-  reinclude_set_modules = @set_mods_loaded
-  yield
-  reset_patterns
-  include_set_modules if reinclude_set_modules
-end
-
-def stash_set_specific_attributes args
-  @set_specific = {}
-  Card.set_specific_attributes.each do |key|
-    set_specific[key] = args.delete(key) if args.key?(key)
-  end
-end
-
-def normalize_type_attributes args
-  new_type_id = extract_type_id! args unless args.delete(:type_lookup) == :skip
-  args[:type_id] = new_type_id if new_type_id
-end
-
-def extract_type_id! args={}
-  case
-  when (type_id = args.delete(:type_id)&.to_i)
-    type_id.zero? ? nil : type_id
-  when (type_code = args.delete(:type_code)&.to_sym)
-    type_id_from_codename type_code
-  when (type_name = args.delete :type)
-    type_id_from_cardname type_name
-  end
-end
-
-def type_id_from_codename type_code
-  type_id_or_error(type_code) { Card::Codename.id type_code }
-end
-
-def type_id_from_cardname type_name
-  type_id_or_error(type_name) { type_name.card_id }
-end
-
-def type_id_or_error val
-  type_id = yield
-  return type_id if type_id
-
-  errors.add :type, "#{val} is not a known type."
-  nil
-end
-
-# 'set' refers to the noun not the verb
-def set_specific
-  @set_specific ||= {}
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/card/mod/core/set/all/assign_attributes.rb ~~