card 1.21.0 → 1.91

data/tmpsets/set/mod001-core/all/templating.rb

@@ -1,78 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module Templating; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/templating.rb ~~
-
-def is_template?
-  cardname.trait_name? :structure, :default
-end
-
-def is_structure?
-  cardname.trait_name? :structure
-end
-
-def template
-  # currently applicable templating card.
-  # note that a *default template is never returned for an existing card.
-  @template ||= begin
-    @virtual = false
-
-    if new_card?
-      new_card_template
-    else
-      structure_rule_card
-    end
-  end
-end
-
-def new_card_template
-  default = rule_card :default, skip_modules: true
-
-  dup_card = dup
-  dup_card.type_id = default ? default.type_id : Card.default_type_id
-
-  if (structure = dup_card.structure_rule_card)
-    @virtual = true if junction?
-    self.type_id = structure.type_id if assign_type_to?(structure)
-    structure
-  else
-    default
-  end
-end
-
-def assign_type_to? structure
-  return if type_id == structure.type_id
-  structure.assigns_type?
-end
-
-def assigns_type?
-  # needed because not all *structure templates govern the type of set members
-  # for example, X+*type+*structure governs all cards of type X,
-  # but the content rule does not (in fact cannot) have the type X.
-  return unless (set_pattern = Card.fetch cardname.trunk_name.tag_name,
-                                          skip_modules: true)
-  return unless (pattern_code = set_pattern.codename)
-  return unless (set_class = Set::Pattern.find pattern_code)
-  set_class.assigns_type
-end
-
-def structure
-  return unless template && template.is_structure?
-  template
-end
-
-def virtual?
-  return false unless new_card?
-  if @virtual.nil?
-    cardname.simple? ? (@virtual = false) : template
-  end
-  @virtual
-end
-
-def structure_rule_card
-  card = rule_card :structure, skip_modules: true
-  card && card.db_content.strip == "_self" ? nil : card
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/templating.rb ~~
-end;end;end;end;

data/tmpsets/set/mod001-core/all/tracked_attributes.rb

@@ -1,154 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module TrackedAttributes; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/tracked_attributes.rb ~~
-def assign_attributes args={}
-  if args
-    args = args.stringify_keys
-    @set_specific = {}
-    Card.set_specific_attributes.each do |key|
-      @set_specific[key] = args.delete(key) if args[key]
-    end
-
-    new_type_id = extract_type_id! args unless args.delete("skip_type_lookup")
-    subcard_args = extract_subcard_args! args
-    args["type_id"] = new_type_id if new_type_id
-    reset_patterns
-  end
-  params = ActionController::Parameters.new(args)
-  params.permit!
-  super params
-  return unless args && subcard_args.present?
-  # name= must come before process subcards
-  subcards.add subcard_args
-end
-
-def assign_set_specific_attributes
-  return unless @set_specific.present?
-  @set_specific.each_pair do |name, value|
-    send "#{name}=", value
-  end
-end
-
-protected
-
-def extract_subcard_args! args
-  subcards = args.delete("subcards") || {}
-  if (subfields = args.delete("subfields"))
-    subfields.each_pair do |key, value|
-      subcards[cardname.field(key)] = value
-    end
-  end
-  args.keys.each do |key|
-    subcards[key] = args.delete(key) if key =~ /^\+/
-  end
-  subcards
-end
-
-def extract_type_id! args={}
-  type_id =
-    case
-    when args["type_id"]
-      id = args.delete("type_id").to_i
-      # type_id can come in as 0,'' or nil
-      id == 0 ? nil : id
-    when args["type_code"]
-      Card.fetch_id args.delete("type_code").to_sym
-    when args["type"]
-      Card.fetch_id args.delete("type")
-    else
-      return nil
-    end
-
-  unless type_id
-    errors.add :type, "#{args[:type] || args[:type_code]} is not a known type."
-  end
-  type_id
-end
-
-event :set_content, :store, on: :save do
-  self.db_content = content || "" # necessary?
-  self.db_content = Card::Content.clean!(db_content) if clean_html?
-  @selected_action_id = @selected_content = nil
-  clear_drafts
-  reset_patterns_if_rule true
-end
-
-# FIXME: the following don't really belong here, but they have to come after
-# the reference stuff.  we need to organize a bit!
-
-event :update_ruled_cards, :finalize do
-  if is_rule?
-    # warn "updating ruled cards for #{name}"
-    self.class.clear_rule_cache
-    set = rule_set
-
-    if right_id == Card::ReadID && (name_changed? || trash_changed?)
-      update_read_ruled_cards set
-    end
-  end
-end
-
-def update_read_rules_of_set_members_not_governed_by_narrower_rules set
-  return {} if trash || !set || !(set_class = set.tag) ||
-               !(class_id = set_class.id)
-  in_set = {}
-  rule_class_ids = set_patterns.map(&:pattern_id)
-  Auth.as_bot do
-    cur_index = rule_class_ids.index Card[read_rule_class].id
-    if (rule_class_index = rule_class_ids.index(class_id))
-      set.item_cards(limit: 0).each do |item_card|
-        in_set[item_card.key] = true
-        next if cur_index < rule_class_index
-        item_card.update_read_rule if cur_index >= rule_class_index
-      end
-    else
-      warn "No current rule index #{class_id}, #{rule_class_ids.inspect}"
-    end
-  end
-  in_set
-end
-
-def update_read_ruled_cards set
-  self.class.clear_read_rule_cache
-  Card.cache.reset # maybe be more surgical, just Auth.user related
-  expire # probably shouldn't be necessary,
-  # but was sometimes getting cached version when card should be in the
-  # trash.  could be related to other bugs?
-
-  updated = update_read_rules_of_set_members_not_governed_by_narrower_rules set
-
-  # then find all cards with me as read_rule_id that were not just updated
-  # and regenerate their read_rules
-  return if new_card?
-  Card.search(read_rule_id: id) do |card|
-    card.update_read_rule unless updated[card.key]
-  end
-end
-
-event :process_read_rule_update_queue, :finalize do
-  Array.wrap(@read_rule_update_queue).each(&:update_read_rule)
-  @read_rule_update_queue = []
-end
-
-event :expire_related, :finalize do
-  subcards.keys.each do |key|
-    Card.cache.soft.delete key
-  end
-  expire # FIXME: where do we put this. Here it deletes @stage
-  reset_patterns
-  if is_structure?
-    structuree_names.each do |name|
-      Card.expire name
-    end
-  end
-end
-
-event :expire_related_names, before: :expire_related, changed: :name do
-  # FIXME: look for opportunities to avoid instantiating the following
-  descendants.each(&:expire)
-  name_referers.each(&:expire)
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/tracked_attributes.rb ~~
-end;end;end;end;

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

@@ -1,63 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module Trash; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/trash.rb ~~
-def delete
-  update_attributes trash: true unless new_card?
-end
-
-def delete!
-  update_attributes! trash: true unless new_card?
-end
-
-event :pull_from_trash, :prepare_to_store, on: :create do
-  if (trashed_card = Card.find_by_key_and_trash(key, true))
-    # a. (Rails way) tried Card.where(key: 'wagn_bot').select(:id), but it
-    # wouldn't work.  This #select generally breaks on cards. I think our
-    # initialization process screws with something
-    # b. (Wagn way) we could get card directly from fetch if we add
-    # :include_trashed (eg).
-    #    likely low ROI, but would be nice to have interface to retrieve cards
-    #    from trash...m
-    self.id = trashed_card.id
-    # update instead of create
-    @from_trash = true
-    @new_record = false
-  end
-  self.trash = false
-  true
-end
-
-event :validate_delete, :validate, on: :delete do
-  unless codename.blank?
-    errors.add :delete, "#{name} is is a system card. (#{codename})"
-  end
-
-  undeletable_all_rules_tags =
-    %w(default style layout create read update delete)
-  # FIXME: HACK! should be configured in the rule
-
-  if junction? && (l = left) && l.codename == "all" &&
-     undeletable_all_rules_tags.member?(right.codename)
-    errors.add :delete, "#{name} is an indestructible rule"
-  end
-
-  if account && has_edits?
-    errors.add :delete, "Edits have been made with #{name}'s user account.\n" \
-                        "Deleting this card would mess up our history."
-  end
-end
-
-event :validate_delete_children, :prepare_to_validate, on: :delete do
-  children.each do |child|
-    child.trash = true
-    add_subcard child
-    # next if child.valid?
-    # child.errors.each do |field, message|
-    #   errors.add field, "can't delete #{child.name}: #{message}"
-    # end
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/trash.rb ~~
-end;end;end;end;

data/tmpsets/set/mod001-core/all/type.rb

@@ -1,60 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module Type; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/type.rb ~~
-
-module ClassMethods
-  def default_type_id
-    @@default_type_id ||= Card[:all].fetch(trait: :default).type_id
-  end
-end
-
-def type_card
-  return if type_id.nil?
-  Card.quick_fetch type_id.to_i
-end
-
-def type_code
-  Card::Codename[type_id.to_i]
-end
-
-def type_name
-  type_card.try :name
-end
-
-def type_name_or_default
-  type_card.try(:name) || Card.quick_fetch(Card.default_type_id).name
-end
-
-def type_cardname
-  type_card.try :cardname
-end
-
-def type= type_name
-  self.type_id = Card.fetch_id type_name
-end
-
-def get_type_id_from_structure
-  return unless name && (t = template)
-  reset_patterns # still necessary even with new template handling?
-  t.type_id
-end
-
-event :validate_type_change, :validate, on: :update, changed: :type_id do
-  if (c = dup) && c.action == :create && !c.valid?
-    errors.add :type, "of #{name} can't be changed; errors creating new " \
-                      "#{type_id}: #{c.errors.full_messages * ', '}"
-  end
-end
-
-event :validate_type, :validate, changed: :type_id do
-  errors.add :type, "No such type" unless type_name
-
-  if (rt = structure) && rt.assigns_type? && type_id != rt.type_id
-    errors.add :type, "can't be changed because #{name} is hard templated " \
-                      "to #{rt.type_name}"
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/type.rb ~~
-end;end;end;end;

data/tmpsets/set/mod001-core/all/utils.rb

@@ -1,132 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module Utils; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/utils.rb ~~
-module ClassMethods
-  def empty_trash
-    Card.delete_trashed_files
-    Card.where(trash: true).delete_all
-    Card::Action.delete_cardless
-    Card::Reference.unmap_if_referee_missing
-    Card::Reference.delete_if_referer_missing
-    Card.delete_tmp_files_of_cached_uploads
-  end
-
-  # deletes any file not associated with a real card.
-  def delete_trashed_files
-    trashed_card_ids = all_trashed_card_ids
-    file_ids = all_file_ids
-    dir = Cardio.paths["files"].existent.first
-    file_ids.each do |file_id|
-      next unless trashed_card_ids.member?(file_id)
-      if Card.exists?(file_id) # double check!
-        raise Card::Error, "Narrowly averted deleting current file"
-      end
-      FileUtils.rm_rf "#{dir}/#{file_id}", secure: true
-    end
-  end
-
-  def delete_tmp_files id=nil
-    dir = Cardio.paths["files"].existent.first + "/tmp"
-    dir += "/#{id}" if id
-    FileUtils.rm_rf dir, secure: true
-  rescue
-    Rails.logger.info "failed to remove tmp files"
-  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
-
-  def delete_tmp_files_of_cached_uploads
-    actions = Card::Action.find_by_sql "SELECT * FROM card_actions
-      INNER JOIN cards ON card_actions.card_id = cards.id
-      WHERE cards.type_id IN (#{Card::FileID}, #{Card::ImageID})
-      AND card_actions.draft = true"
-    actions.each do |action|
-      # we don't want to delete uploads in progress
-      if older_than_five_days?(action.created_at) && (card = action.card)
-        # we don't want to delete uploads in progress
-        card.delete_files_for_action action
-      end
-    end
-  end
-
-  def merge_list attribs, opts={}
-    unmerged = []
-    attribs.each do |row|
-      result = begin
-        merge row["name"], row, opts
-      end
-      unmerged.push row unless result == true
-    end
-
-    if unmerged.empty?
-      Rails.logger.info "successfully merged all!"
-    else
-      unmerged_json = JSON.pretty_generate unmerged
-      report_unmerged_json unmerged_json, opts[:output_file]
-    end
-    unmerged
-  end
-
-  def report_unmerged_json unmerged_json, output_file
-    if output_file
-      ::File.open output_file, "w" do |f|
-        f.write unmerged_json
-      end
-    else
-      Rails.logger.info "failed to merge:\n\n#{unmerged_json}"
-    end
-  end
-
-  def merge name, attribs={}, opts={}
-    # puts "merging #{name}"
-    card = fetch name, new: {}
-    [:image, :file].each do |attach|
-      next unless attribs[attach] && attribs[attach].is_a?(String)
-      attribs[attach] = ::File.open(attribs[attach])
-    end
-    if opts[:pristine] && !card.pristine?
-      false
-    else
-      card.update_attributes! attribs
-    end
-  end
-
-  def older_than_five_days? time
-    Time.now - time > 432_000
-  end
-end
-
-def debug_type
-  "#{type_code || ''}:#{type_id}"
-end
-
-def to_s
-  "#<#{self.class.name}[#{debug_type}]#{attributes['name']}>"
-end
-
-def inspect
-  tags = []
-  tags << "trash"    if trash
-  tags << "new"      if new_card?
-  tags << "frozen"   if frozen?
-  tags << "readonly" if readonly?
-  tags << "virtual"  if @virtual
-  tags << "set_mods_loaded" if @set_mods_loaded
-
-  error_messages = errors.any? ? "<E*#{errors.full_messages * ', '}*>" : ""
-
-  "#<Card##{id}[#{debug_type}](#{name})#{error_messages}{#{tags * ','}}"
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set/all/utils.rb ~~
-end;end;end;end;