card 1.99.4 → 1.99.5

data/tmpsets/set/mod024-date/all/calendar.rb

@@ -1,18 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Calendar)
-#
-module Calendar;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/date/set/all/calendar.rb"; end
-Self::InputOptions.add_to_basket :options, "calendar"
-
-module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  def calendar_input
-    text_field :content, class: "date-editor datetimepicker-input",
-                         "data-toggle": "datetimepicker",
-                         "data-target": "##{form_prefix}_content"
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/date/set/all/calendar.rb ~~

data/tmpsets/set/mod024-date/self/script_datepicker.rb

@@ -1,16 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "ScriptDatepicker"
-#
-module ScriptDatepicker;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/date/set/self/script_datepicker.rb"; end
-include_set Abstract::VendorCodeFile
-Self::ScriptMods.add_item :script_datepicker
-
-def source_files
-  %w[moment/min/moment-with-locales.min.js
-     tempusdominus/build/js/tempusdominus-bootstrap-4.js]
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/date/set/self/script_datepicker.rb ~~

data/tmpsets/set/mod024-date/self/script_datepicker_config.rb

@@ -1,13 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "ScriptDatepickerConfig"
-#
-module ScriptDatepickerConfig;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/date/set/self/script_datepicker_config.rb"; end
-include_set Abstract::CodeFile
-
-Self::ScriptEditors.add_item :script_datepicker_config
-All::Head::HtmlFormat.add_to_basket :mod_js_config, [:datepicker, "setDatepickerConfig"]
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/date/set/self/script_datepicker_config.rb ~~

data/tmpsets/set/mod024-date/self/style_datepicker.rb

@@ -1,20 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "StyleDatepicker"
-#
-module StyleDatepicker;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/date/set/self/style_datepicker.rb"; end
-include_set Abstract::CodeFile
-Self::StyleLibraries.add_item :style_datepicker
-
-def source_files
-  %w[lib/stylesheets/tempusdominus.scss
-     vendor/tempusdominus/src/sass/_tempusdominus-bootstrap-4.scss]
-end
-
-def source_dir
-  ""
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/date/set/self/style_datepicker.rb ~~

data/tmpsets/set/mod024-date/type/date.rb

@@ -1,14 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "Date" cards
-#
-module Date;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/date/set/type/date.rb"; end
-module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  def editor
-    :calendar
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/date/set/type/date.rb ~~

data/tmpsets/set/mod025-account/right/account.rb

@@ -1,199 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Account" cards
-#
-# -*- encoding : utf-8 -*-
-module Account;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/account/set/right/account.rb"; end
-
-include All::Permissions::Accounts
-
-card_accessor :email
-card_accessor :password
-card_accessor :salt
-card_accessor :status
-card_accessor :token
-
-#### ON CREATE
-
-# legal to add +*account card
-event :validate_accountability, :prepare_to_validate, on: :create do
-  errors.add :content, tr(:error_not_allowed) unless left&.accountable?
-end
-
-event :require_email, :prepare_to_validate,
-      after: :validate_accountability, on: :create do
-  errors.add :email, "required" unless subfield(:email)
-end
-
-event :set_default_salt, :prepare_to_validate, on: :create do
-  salt = Digest::SHA1.hexdigest "--#{Time.zone.now}--"
-  Env[:salt] = salt # HACK!!! need viable mechanism to get this to password
-  add_subfield :salt, content: salt
-end
-
-event :set_default_status, :prepare_to_validate, on: :create do
-  default_status = left&.try(:default_account_status) || "active"
-  add_subfield :status, content: default_status
-end
-
-event :generate_confirmation_token,
-      :prepare_to_store, on: :create, when: :can_approve? do
-  add_subfield :token, content: generate_token
-end
-
-event :send_account_verification_email, :integrate,
-      on: :create, when: proc { |c| c.token.present? } do
-  Card[:verification_email].deliver self, to: email
-end
-
-# ON UPDATE
-
-# reset password emails contain a link to update the +*account card
-# and trigger this event
-event :reset_password, :prepare_to_validate, on: :update, trigger: :required do
-  reset_password_with_token Env.params[:token]
-end
-
-# STANDALONE EVENTS
-# only triggered when called directly (as methods)
-
-event :reset_token do
-  token = generate_token
-  Auth.as_bot { token_card.update! content: token }
-  token
-end
-
-event :send_welcome_email do
-  welcome = Card[:welcome_email]
-  welcome.deliver self, to: email if welcome&.type_code == :email_template
-end
-
-event :send_reset_password_token do
-  Auth.as_bot do
-    token_card.update! content: generate_token
-  end
-  Card[:password_reset_email].deliver self, to: email
-end
-
-def active?
-  status == "active"
-end
-
-def blocked?
-  status == "blocked"
-end
-
-def built_in?
-  status == "system"
-end
-
-def pending?
-  status == "pending"
-end
-
-def validate_token! test_token
-  tcard = token_card
-  tcard.validate! test_token
-  copy_errors tcard
-  errors.empty?
-end
-
-def reset_password_with_token token
-  aborting do
-    if !token
-      errors.add :token, "is required"
-    elsif !validate_token!(token)
-      # FIXME: isn't this an error??
-      success << reset_password_try_again
-    else
-      success << reset_password_success
-    end
-  end
-end
-
-def refreshed_token
-  if token_card.id
-    token_card.refresh(true).db_content # TODO: explain why refresh is needed
-  else # eg when viewing email template
-    "[token]"
-  end
-end
-
-def can_approve?
-  Card.new(type_id: Card.default_accounted_type_id).ok? :create
-end
-
-def ok_to_read
-  own_account? ? true : super
-end
-
-def reset_password_success
-  token_card.used!
-  Auth.signin left_id
-  { id: name,
-    view: :edit }
-end
-
-def reset_password_try_again
-  send_reset_password_token
-  { id: "_self",
-    view: "message",
-    message: tr(:sorry_email_reset, error_msg: errors.first.last) }
-end
-
-# FIXME: explain or remove.
-def edit_password_success_args; end
-
-def changes_visible? act
-  act.actions_affecting(act.card).each do |action|
-    return true if action.card.ok? :read
-  end
-  false
-end
-
-module Format; parent.send :register_set_format, Card::Format, self; extend Card::Set::AbstractFormat
-  view :verify_url, cache: :never do
-    card_url path(token_path_opts.merge(mark: card.name.left))
-  end
-
-  view :verify_days, cache: :never do
-    (Card.config.token_expiry / 1.day).to_s
-  end
-
-  view :reset_password_url do
-    card_url path(token_path_opts.merge(card: { trigger: :reset_password }))
-  end
-
-  view :reset_password_days do
-    (Card.config.token_expiry / 1.day).to_s
-  end
-
-  def token_path_opts
-    { action: :update, live_token: true, token: card.refreshed_token }
-  end
-end
-
-module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :raw do
-    # FIXME: use field_nest instead of parsing content
-    # Problem: when you do that then the fields are missing in the sign up form:
-    # output( [field_nest(:email, view: :titled, title: "email"),
-    #          field_nest(:password, view: :titled, title: "password")])
-    %({{+#{:email.cardname}|labeled;title:email;edit:inline}}
-      {{+#{:password.cardname}|labeled;title:password;edit:inline}})
-  end
-
-  before :content_formgroup do
-    voo.edit_structure = [[:email, "email"], [:password, "password"]]
-  end
-end
-
-module EmailHtmlFormat; parent.send :register_set_format, Card::Format::EmailHtmlFormat, self; extend Card::Set::AbstractFormat
-  def mail context, fields
-    super context, fields.reverse_merge(to: card.email)
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/account/set/right/account.rb ~~

data/tmpsets/set/mod025-account/right/email.rb

@@ -1,50 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Email" cards
-#
-module Email;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/account/set/right/email.rb"; end
-include All::Permissions::Accounts
-
-event :validate_email, :validate, on: :save do
-  if content? && content !~ /^([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,})$/i
-    errors.add :content, tr(:error_invalid_address)
-  end
-end
-
-event :validate_unique_email, after: :validate_email, on: :save do
-  if content.present?
-    Auth.as_bot do
-      wql = { right_id: Card::EmailID, eq: content, return: :id }
-      wql[:not] = { id: id } if id
-      wql_comment = tr(:search_email_duplicate, content: content)
-      if Card.search(wql, wql_comment).first
-        errors.add :content, tr(:error_not_unique)
-      end
-    end
-  end
-end
-
-event :downcase_email, :prepare_to_validate, on: :save do
-  return if !content || content == content.downcase
-  self.content = content.downcase
-end
-
-def email_required?
-  !built_in?
-end
-
-def ok_to_read
-  if own_email? || Auth.always_ok?
-    true
-  else
-    deny_because tr(:deny_email_restricted)
-  end
-end
-
-def own_email?
-  name.part_names[0].key == Auth.as_card.key
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/account/set/right/email.rb ~~

data/tmpsets/set/mod025-account/right/salt.rb

@@ -1,18 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Salt" cards
-#
-module Salt;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/account/set/right/salt.rb"; end
-include All::Permissions::Accounts
-
-def history?
-  false
-end
-
-view :raw do
-  tr :private_data
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/account/set/right/salt.rb ~~

data/tmpsets/set/mod025-account/right/status.rb

@@ -1,18 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Status" cards
-#
-module Status;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/account/set/right/status.rb"; end
-include All::Permissions::Accounts
-
-def ok_to_update
-  if own_account? && !Auth.always_ok?
-    deny_because you_cant(tr(:deny_not_change_own_account))
-  else
-    super
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/account/set/right/status.rb ~~

data/tmpsets/set/mod025-account/right/token.rb

@@ -1,63 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Token" cards
-#
-module Token;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/account/set/right/token.rb"; end
-include All::Permissions::Accounts
-
-DURATIONS = "second|minute|hour|day|week|month|year".freeze
-
-card_accessor :expiration
-
-def history?
-  false
-end
-
-view :raw do
-  tr :private_data
-end
-
-def validate! token
-  error =
-    case
-    when !real?           then [:token_not_found, tr(:error_token_not_found)]
-    when expired?         then [:token_expired, tr(:error_token_expired)]
-    when content != token then [:incorrect_token, tr(:error_incorrect_token)]
-    end
-  errors.add *error if error
-end
-
-def expired?
-  !permanent? && updated_at <= term.ago
-end
-
-def permanent?
-  term == "permanent"
-end
-
-def used!
-  # immediate deletion was causing problems.  commenting for now
-  # Auth.as_bot { delete! } unless 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/token.rb ~~

data/tmpsets/set/mod025-account/self/account_links.rb

@@ -1,91 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "AccountLinks"
-#
-module AccountLinks;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/account/set/self/account_links.rb"; end
-def ok_to_read
-  true
-end
-
-module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :core, cache: :never do
-    status_class = Auth.signed_in? ? "logged-in" : "logged-out"
-    wrap_with :span, id: "logging", class: status_class do
-      item_links.join " "
-    end
-  end
-
-  def item_links _args=nil
-    # removed invite for now
-    %i[my_card sign_out sign_up sign_in].map do |link_view|
-      render link_view
-    end.compact
-  end
-
-  def self.link_options opts={}
-    options = { denial: :blank, cache: :never }.merge opts
-    options[:perms] = ->(r) { yield r } if block_given?
-    options.clone
-  end
-
-  view :sign_up, link_options(&:show_signup_link?) do
-    link_to_card :signup, account_link_text(:sign_up),
-                 class: nav_link_class("signup-link"),
-                 path: { action: :new, mark: :signup }
-  end
-
-  view(:sign_in, link_options { !Auth.signed_in? }) do
-    link_to_card :signin, account_link_text(:sign_in),
-                 class: nav_link_class("signin-link")
-  end
-
-  view(:sign_out, link_options { Auth.signed_in? }) do
-    link_to_card :signin, account_link_text(:sign_out),
-                 class: nav_link_class("signout-link"),
-                 path: { action: :delete }
-  end
-
-  view :invite, link_options(&:show_invite_link?) do
-    link_to_card :signup, account_link_text(:invite),
-                 class: nav_link_class("invite-link"),
-                 path: { action: :new, mark: :signup }
-  end
-
-  view(:my_card, link_options { Auth.signed_in? }) do
-    link = link_to_card Auth.current.name, nil,
-                        id: "my-card-link",
-                        class: nav_link_class("my-card")
-    split_button link, nil do
-      [
-        link_to_card([Auth.current, :account_settings], "Account"),
-        ["Roles", roles.map(&method(:link_to_card))]
-      ]
-    end
-  end
-
-  def roles
-    [Card[:eagle], Auth.current.fetch(trait: :roles)&.item_names].flatten.compact
-  end
-
-  def account_link_text purpose
-    voo.title ||
-      I18n.t(purpose, scope: "mod.account.set.self.account_links")
-  end
-
-  def nav_link_class type
-    "nav-link #{classy(type)}"
-  end
-
-  def show_signup_link?
-    !Auth.signed_in? && Card.new(type_id: Card::SignupID).ok?(:create)
-  end
-
-  def show_invite_link?
-    Auth.signed_in? &&
-      Card.new(type_id: Card.default_accounted_type_id).ok?(:create)
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/account/set/self/account_links.rb ~~