card 1.101.2 → 1.102.0

data/tmpsets/set/mod005-card-mod-email/all/email_html.rb

@@ -1,18 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (EmailHtml)
-#
-module EmailHtml;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/all/email_html.rb"; end
-module EmailHtmlFormat; module_parent.send :register_set_format, Card::Format::EmailHtmlFormat, self; extend Card::Set::AbstractFormat
-  view :unknown do
-    ""
-  end
-
-  view :compact_missing do
-    ""
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/all/email_html.rb ~~

data/tmpsets/set/mod005-card-mod-email/all/email_text.rb

@@ -1,23 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (EmailText)
-#
-module EmailText;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/all/email_text.rb"; end
-
-module EmailTextFormat; module_parent.send :register_set_format, Card::Format::EmailTextFormat, self; extend Card::Set::AbstractFormat
-  view :unknown do
-    ""
-  end
-
-  view :compact_missing do
-    ""
-  end
-
-  view :last_action, perms: :none, cache: :never do
-    _render_last_action_verb
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/all/email_text.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/bcc.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Bcc" cards
-#
-module Bcc;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/bcc.rb"; end
-include_set Abstract::EmailField
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/bcc.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/cc.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Cc" cards
-#
-module Cc;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/cc.rb"; end
-include_set Abstract::EmailField
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/cc.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/from.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+From" cards
-#
-module From;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/from.rb"; end
-include_set Abstract::EmailField
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/from.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/html_message.rb

@@ -1,22 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+HtmlMessage" cards
-#
-module HtmlMessage;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/html_message.rb"; end
-include_set Abstract::TestContext
-
-def clean_html?
-  false
-end
-
-module EmailHtmlFormat; module_parent.send :register_set_format, Card::Format::EmailHtmlFormat, self; extend Card::Set::AbstractFormat
-  def email_content context
-    content = contextual_content context
-    return unless content.present?
-    Card::Mailer.layout content
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/html_message.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/subject.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Subject" cards
-#
-module Subject;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/subject.rb"; end
-include_set Abstract::TestContext
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/subject.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/text_message.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+TextMessage" cards
-#
-module TextMessage;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/text_message.rb"; end
-include_set Abstract::TestContext
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/text_message.rb ~~

data/tmpsets/set/mod005-card-mod-email/right/to.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+To" cards
-#
-module To;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/right/to.rb"; end
-include_set Abstract::EmailField
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/right/to.rb ~~

data/tmpsets/set/mod005-card-mod-email/type/email_template.rb

@@ -1,100 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "EmailTemplate" cards
-#
-module EmailTemplate;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/type/email_template.rb"; end
-
-def clean_html?
-  false
-end
-
-def deliver context=nil, fields={}, opts={}
-  mail = format.mail context, fields, opts
-  mail.deliver
-rescue Net::SMTPError => exception
-  errors.add :exception, exception.message
-end
-
-module Format; module_parent.send :register_set_format, Card::Format, self; extend Card::Set::AbstractFormat
-  def mail context=nil, fields={}, opts={}
-    config = card.email_config context, fields, opts
-    fmt = self # self is <Mail::Message> within the new_mail block
-    Card::Mailer.new_mail config do
-      fmt.message_body self, config
-      fmt.add_attachments self, config.delete(:attach)
-    end
-  end
-
-  def message_body mail, config
-    config[:html_message] &&= config[:html_message].call mail
-    method, args = body_method_and_args config[:html_message].present?,
-                                        config[:text_message].present?
-    args = Array.wrap(args).map { |arg| config[arg] }
-    send method, mail, *args
-  end
-
-  def body_method_and_args html, text
-    if html && text
-      [:text_and_html_message, %i[text_message html_message attach]]
-    elsif html
-      %i[html_body html_message]
-    else
-      %i[text_body text_message]
-    end
-  end
-
-  def text_and_html_message mail, text_message, html_message, attachment_list=nil
-    fmt = self
-    if attachment_list&.any?
-      mail.multipart_mixed text_message, html_message
-    else
-      mail.text_part { body text_message }
-      mail.html_part { fmt.html_body self, html_message }
-    end
-  end
-
-  def multipart_mixed mail, text_message, html_message
-    mail.content_type "multipart/mixed"
-    mail.part content_type: "multipart/alternative" do |copy|
-      copy.part content_type: "text/plain" do |plain|
-        plain.body = text_message
-      end
-      copy.part content_type: "text/html" do |html|
-        html.body = html_message
-      end
-    end
-  end
-
-  def html_body mail, message
-    mail.content_type "text/html; charset=UTF-8"
-    mail.body message
-  end
-
-  def text_body mail, message
-    mail.content_type "text/plain; charset=UTF-8"
-    mail.text_part { body message }
-  end
-
-  def add_attachments mail, list
-    return unless list.present?
-    each_valid_attachment list do |file, index|
-      mail.add_file filename: attachment_name(file, index),
-                    content: File.read(file.path)
-    end
-  end
-
-  def each_valid_attachment list
-    list.each_with_index do |cardname, index|
-      next unless (file = Card[cardname]&.try(:attachment))
-      yield file, index
-    end
-  end
-
-  def attachment_name file, number
-    "attachment-#{number + 1}.#{file.extension}"
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/type/email_template.rb ~~

data/tmpsets/set/mod005-card-mod-email/type/email_template/email_config.rb

@@ -1,90 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type; module EmailTemplate;
-# Set: All "EmailTemplate+EmailConfig" cards (EmailConfig)
-#
-module EmailConfig;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-email/set/type/email_template/email_config.rb"; end
-EMAIL_FIELDS =
-  %i[to from cc bcc attach subject text_message html_message].freeze
-
-EMAIL_FIELD_METHODS =
-  { subject: :contextual_content,
-    text_message: :contextual_content,
-    attach: :extended_item_contents }.freeze
-
-# @param [Card] context  the card in whose context all email fields will be interpreted
-# @param [Hash] fields override any templated field configurations with hash values
-# @param [Hash] opts options for rendering. unknown options become format options
-# @option opts [Card, String, Integer] :auth user identifier. render as this user
-def email_config context, fields={}, opts={}
-  @active_email_context = context || self
-  auth = opts.delete :auth
-  config = EMAIL_FIELDS.each_with_object({}) do |field, conf|
-    conf[field] = fields[field] || email_field_from_card(field, auth, opts)
-  end
-  safe_from_and_reply_to! config
-  config.select { |_k, v| v.present? }
-end
-
-def email_field_from_card field, auth, format_opts
-  return unless (field_card = fetch(field))
-  auth ||= field_card.updater
-  special_email_field_method(field, field_card, auth, format_opts) ||
-    standard_email_field(field, field_card, auth, format_opts)
-end
-
-def special_email_field_method field, field_card, auth, format_opts
-  method = "email_#{field}_field"
-  return unless respond_to? method
-  send method, field_card, auth, format_opts
-end
-
-def standard_email_field field, field_card, auth, format_opts
-  method = EMAIL_FIELD_METHODS[field] || :email_addresses
-  format_opts = format_opts.merge format: :email_text
-  Auth.as auth do
-    field_card.format(format_opts).send method, @active_email_context
-  end
-end
-
-# html messages return procs because image attachments can't be properly rendered
-# without a mail object. (which isn't available at initial config time)
-def email_html_message_field message_card, auth, format_opts
-  proc do |mail|
-    Auth.as auth do
-      format_opts = format_opts.merge format: :email_html, active_mail: mail
-      message_card.format(format_opts).email_content @active_email_context
-    end
-  end
-end
-
-# whenever a default "from" field is configured in Card::Mailer, emails are always
-# actually "from" that address
-def safe_from_and_reply_to! config
-  conf_name, conf_email = configured_from_name_and_email config[:from]
-  actual_email = Card::Mailer.default[:from] || conf_email
-  config[:from] = email_from_field_value conf_name, conf_email, actual_email
-  config[:reply_to] ||= actual_email
-end
-
-def email_from_field_value conf_name, conf_email, actual_email
-  conf_text = conf_name || conf_email
-  if conf_text != actual_email
-    %("#{conf_text}" <#{actual_email}>)
-  elsif actual_email.present?
-    actual_email
-  else
-    Card[WagnBotID].account.email
-  end
-end
-
-def configured_from_name_and_email raw_string
-  if raw_string =~ /(.*)\<(.*)>/
-    [Regexp.last_match(1).strip, Regexp.last_match(2)]
-  else
-    [nil, raw_string]
-  end
-end
-end;end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-email/set/type/email_template/email_config.rb ~~

data/tmpsets/set/mod006-card-mod-collection/abstract/items.rb

@@ -1,211 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Abstract
-# Set: Abstract (Items)
-#
-# ~~~~~~~~~~~~ READING ITEMS ~~~~~~~~~~~~
-
-module Items;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-collection/set/abstract/items.rb"; end
-# While each of the three main methods for returning lists of items can handle arguments,
-# they are most commonly used without them.
-
-# @return [Array] list of Card::Name objects
-# @param args [Hash]
-# @option args [String] :content override card content
-# @option args [String, Card::Name, Symbol] :context name in whose context relative items
-#         will be interpreted. For example. +A in context of B is interpreted as B+A
-#         context defaults to pointer card's name. If value is `:raw`, then name is not
-#         contextualized
-# @option args [String, Integer] :limit max number of cards to return
-# @option args [String, Integer] :offset begin after the offset-th item
-def item_names args={}
-  context = args[:context]
-  item_strings(args).map do |item|
-    clean_item_name item, context
-  end.compact
-end
-
-def first_name args={}
-  item_names(args).first
-end
-
-def first_card args={}
-  return unless (name = first_name)
-  fetch_item_card name, args
-end
-
-def first_code
-  first_card&.codename
-end
-
-def first_id
-  first_card&.id
-end
-
-# @return [Array] list of integers (card ids of items)
-# @param args [Hash] see #item_names
-def item_ids args={}
-  item_names(args).map { |name| Card.fetch_id name }.compact
-end
-
-# @return [Array] list of Card objects
-# @param args [Hash] see #item_names for additional options
-# @option args [String] :complete keyword to use in searching among items
-# @option args [True/False] :known_only if true, return only known cards
-# @option args [String] :type name of type to be used for unknown cards
-def item_cards args={}
-  return item_cards_search(args) if args[:complete]
-  return known_item_cards(args) if args[:known_only]
-  all_item_cards args
-end
-
-# #item_name, #item_id, and #item_card each return a single item, rather than an array.
-%i[name id card].each do |obj|
-  define_method "item_#{obj}" do |args={}|
-    send("item_#{obj}s", args.merge(limit: 1)).first
-  end
-end
-
-# for override, eg by json
-def item_value item_name
-  item_name
-end
-
-# ~~~~~~~~~~~~ ALTERING ITEMS ~~~~~~~~~~~~
-
-# set card content based on array and save card
-# @param array [Array] list of strings/names (Cardish)
-def items= array
-  items_to_content array
-  save!
-end
-
-# append item to list (does not save)
-# @param cardish [Cardish]
-def << cardish
-  add_item cardish
-end
-
-# append item to list (does not save)
-# @param cardish [String, Card::Name] item name
-# @param allow_duplicates [True/False] permit duplicate items (default is False)
-def add_item cardish, allow_duplicates=false
-  return if !allow_duplicates && include_item?(cardish)
-
-  items = item_strings << cardish
-  items_to_content items
-end
-
-# append item to list and save card
-# @param name [String, Card::Name] item name
-def add_item! name
-  add_item(name) && save!
-end
-
-# remove item from list
-# @param cardish [String, Card::Name] item to drop
-def drop_item cardish
-  drop_item_name = Card::Name[cardish]
-  items_to_content(item_names.reject { |item_name| item_name == drop_item_name })
-end
-
-# remove item from list and save card
-# @param cardish [String, Card::Name] item to drop
-def drop_item! cardish
-  drop_item cardish
-  save!
-end
-
-# insert item into list at specified location
-# @param index [Integer] Array index in which to insert item (0 is first)
-# @param name [String, Card::Name] item name
-def insert_item index, name
-  new_names = item_names
-  new_names.delete name
-  new_names.insert index, name
-  items_to_content new_names
-end
-
-# insert item into list at specified location and save
-# @param index [Integer] Array index in which to insert item (0 is first)
-# @param name [String, Card::Name] item name
-def insert_item! index, name
-  insert_item index, name
-  save!
-end
-
-# ~~~~~~~~~~~~ READING ITEM HELPERS ~~~~~~~~~~~~
-
-# Warning: the following methods, while available for use, may be subject to change
-
-# #item_cards helpers
-
-def item_cards_search query
-  Card::Query.run query.reverse_merge(referred_to_by: name, limit: 0)
-end
-
-def known_item_cards args={}
-  item_names(args).map { |name| Card.fetch name }.compact
-end
-
-def all_item_cards args={}
-  names = args[:item_names] || item_names(args)
-  names.map { |name| fetch_item_card name, args }
-end
-
-# TODO: support type_code and type_id. (currently type)
-# uses name, because its most common use is from CQL
-def item_type
-  opt = options_rule_card
-  # FIXME: need better recursion prevention
-  return if !opt || opt == self
-  opt.item_type
-end
-
-def item_strings args={}
-  items = raw_item_strings(args[:content] || content)
-  return items unless args.present?
-
-  filtered_items items, args.slice(:limit, :offset)
-end
-
-def raw_item_strings content
-  content.to_s.split(/\n+/).map { |i| strip_item i }
-end
-
-private
-
-def filtered_items items, limit: 0, offset: 0
-  limit = limit.to_i
-  offset = offset.to_i
-  return items unless limit.positive? || offset.positive?
-
-  items[offset, (limit.zero? ? items.size : limit)] || []
-end
-
-def fetch_item_card name, args={}
-  Card.fetch name, new: new_unknown_item_args(args)
-end
-
-def new_unknown_item_args args
-  itype = args[:type] || item_type
-  itype ? { type: itype } : {}
-end
-
-def clean_item_name item, context
-  item = item.to_name
-  return item if context == :raw
-  context ||= context_card.name
-  item.absolute_name context
-rescue Card::Error::NotFound
-  # eg for invalid ids or codenames
-  # "Invalid Item: #{item}".to_name
-  nil
-end
-
-def strip_item item
-  item.gsub(/\[\[|\]\]/, "").strip
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-collection/set/abstract/items.rb ~~