card 1.97.0.1 → 1.98.0

data/tmpsets/set/mod026-bootstrap/type/customized_bootswatch_skin/html_views.rb

@@ -0,0 +1,46 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class Type; module CustomizedBootswatchSkin;
+# Set: All "CustomizedBootswatchSkin+HtmlViews" cards (HtmlViews)
+#
+module HtmlViews;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/bootstrap/set/type/customized_bootswatch_skin/html_views.rb"; end
+include_set Abstract::Media
+include_set Abstract::BsBadge
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  view :menu do
+    ""
+  end
+
+  def short_content
+    ""
+    # labeled_badge card.item_count, "items"
+    # "#{card.item_count} items"
+  end
+
+  view :core, template: :haml
+
+  bar_cols 9, 3
+  info_bar_cols 6, 3, 3
+
+  before :bar do
+    super()
+    voo.show :edit_button, :bar_middle
+    class_up "bar-middle", "p-3 align-items-center p-0"
+  end
+
+  view :bar_right do
+    render(:short_content)
+  end
+
+  before :bar_expanded_nav do
+    voo.hide :edit_link
+  end
+
+  view :bar_bottom do
+    render_core
+  end
+end
+end;end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/bootstrap/set/type/customized_bootswatch_skin/html_views.rb ~~

data/tmpsets/set/mod026-bootstrap/type_plus_right/customized_bootswatch_skin/colors.rb

@@ -0,0 +1,122 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class TypePlusRight; module CustomizedBootswatchSkin;
+# Set: All "+Colors" cards on "CustomizedBootswatchSkin" cards
+#
+module Colors;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/bootstrap/set/type_plus_right/customized_bootswatch_skin/colors.rb"; end
+VARIABLE_NAMES = {
+  colors: %i[blue indigo purple pink red orange yellow green teal cyan
+             white gray-100 gray-200 gray-300 gray-400 gray-500 gray-600 gray-700 gray-800
+             gray-900 black],
+  theme_colors: %i[primary secondary success info warning danger light dark
+                   body-bg body-color]
+}.freeze
+
+# temporarily removed: link-color card-bg card-cap-bg
+# bootstrap default for link-color uses the theme-color function which
+# has to be defined between the theme-colors and that variable
+# (see bootstrap's _variables.scss)
+# TODO: deal with that
+
+# @param name [String] a scss variable name (it can start with a $)
+def variable_value name
+  value_from_scss(name, content) ||
+    value_from_variables_card(name) ||
+    default_value_from_bootstrap(name)
+end
+
+def value_from_scss name, source
+  name = name.to_s
+  name = name[1..-1] if name.start_with?("$")
+  source.match(definition_regex(name))&.capture(:value)
+end
+
+def value_from_variables_card name
+  return unless (var_card = left.variables_card) && var_card.content.present?
+  value_from_scss name, var_card.content
+end
+
+def definition_regex name
+  /^(?<before>\s*\$#{name}\:\s*)(?<value>.+?)(?<after> !default;)$/
+end
+
+def default_value_from_bootstrap name
+  value_from_scss name, bootstrap_variables_scss
+end
+
+def bootstrap_variables_scss
+  @bootstrap_variables_scss ||= Type::CustomizedBootswatchSkin.read_bootstrap_variables
+end
+
+def colors
+  @colors ||= variable_group_with_values :colors
+end
+
+def theme_colors
+  @theme_colors ||= variable_group_with_values :theme_colors
+end
+
+def variable_group_with_values group
+  VARIABLE_NAMES[group].each_with_object({}) do |name, h|
+    h[name] = variable_value name
+  end
+end
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  view :editor, template: :haml do
+    @colors = card.colors
+    @theme_colors = card.theme_colors
+  end
+
+  def theme_color_picker name, value
+    # value = value[1..-1] if value.start_with? "$"
+    options = VARIABLE_NAMES[:colors].map { |var| "$#{var}" }
+    options << value unless options.include? value
+    select_tag "theme_colors[#{name}]", options_for_select(options, value),
+               class: "tags form-control"
+  end
+
+  before :bar_right do
+    voo.show :edit_button
+  end
+
+  view :core, template: :haml do
+    @colors = card.theme_colors.reject { |k, _v| k.in? %i[body-bg body-color] }
+  end
+
+  view :bar_middle do
+    <<-HTML
+      <div class="colorpicker-element">
+        <div class="input-group-addon">
+          <span class="bg-body border p-1">Text</span>
+          <span class="bg-dark text-light border p-1">Nav</span>
+            <i class="bg-primary"></i>
+          <i class="bg-secondary"></i>
+        </div>
+      </div>
+    HTML
+  end
+end
+
+event :translate_variables_to_scss, :prepare_to_validate, on: :update do
+  replace_values :colors
+  replace_values :theme_colors
+end
+
+def replace_values group, prefix=""
+  values = variable_values_from_params group
+  values.each_pair do |name, val|
+    if content.match definition_regex(name)
+      content.gsub! definition_regex(name), "\\k<before>#{prefix}#{val}\\k<after>"
+    else
+      self.content += "$#{name}: #{prefix}#{val} !default;\n"
+    end
+  end
+end
+
+def variable_values_from_params group
+  Env.params.dig(group)&.slice(*VARIABLE_NAMES[group]) || {}
+end
+end;end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/bootstrap/set/type_plus_right/customized_bootswatch_skin/colors.rb ~~

data/tmpsets/set/mod027-google_analytics/all/google_analytics.rb

@@ -0,0 +1,48 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (GoogleAnalytics)
+#
+module GoogleAnalytics;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/google_analytics/set/all/google_analytics.rb"; end
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  def views_in_head
+    super << :google_analytics_snippet
+  end
+
+  view :google_analytics_snippet, unknown: true, perms: :none do
+    return unless google_analytics_key
+    javascript_tag { google_analytics_snippet_javascript }
+  end
+
+  def google_analytics_key
+    @google_analytics_key ||= Card.global_setting :google_analytics_key
+  end
+
+  def google_analytics_snippet_vars
+    [[:_setAccount, google_analytics_key],
+     [:_trackPageview]]
+  end
+
+  def google_analytics_snippet_vars_string
+    google_analytics_snippet_vars.map do |array|
+      <<-JAVASCRIPT
+      _gaq.push([#{array.map { |i| "'#{i}'" }.join ', '}]);
+      JAVASCRIPT
+    end.join
+  end
+
+  def google_analytics_snippet_javascript
+    <<-JAVASCRIPT
+      var _gaq = _gaq || [];#{"\n" + google_analytics_snippet_vars_string}
+      (function() {
+        var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
+        ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
+        var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
+      })();
+    JAVASCRIPT
+  end
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/google_analytics/set/all/google_analytics.rb ~~

data/tmpsets/set/mod028-recaptcha/all/recaptcha.rb

@@ -0,0 +1,116 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All
+# Set: All cards (Recaptcha)
+#
+module Recaptcha;
+extend Card::Set
+def self.source_location; "/Users/ethan/dev/decko/gem/card/mod/recaptcha/set/all/recaptcha.rb"; end
+RECAPTCHA_ERROR_CODES = {  # LOCALIZE
+  "missing-input-secret" =>	"secret parameter is missing",
+  "invalid-input-secret" =>	"secret parameter is invalid or malformed",
+  "missing-input-response" =>	"response parameter is missing",
+  "invalid-input-response" =>	"response parameter is invalid or malformed",
+  "bad-request" =>	"request is invalid or malformed"
+}
+
+def human?
+  result = JSON.parse recaptcha_response
+  return if recaptcha_success?(result)
+
+  add_recaptcha_errors result["error-codes"]
+end
+
+def consider_recaptcha?
+  true
+end
+
+def recaptcha_on?
+  consider_recaptcha?  &&
+    recaptcha_keys?    &&
+    Env[:controller]   &&
+    !Auth.signed_in?   &&
+    !Auth.needs_setup? &&
+    !Auth.always_ok?   &&
+    Card.toggle(rule(:captcha))
+end
+
+def add_recaptcha_errors error_codes
+  if error_codes.present?
+    error_codes.each do |code|
+      errors.add :recaptcha, RECAPTCHA_ERROR_CODES.fetch(code, code)
+    end
+  else
+    errors.add :recaptcha, "Looks like you are not a human" # LOCALIZE
+  end
+end
+
+def recaptcha_success? result
+  result['success'] &&
+    (result['score'].to_f >= Cardio.config.recaptcha_minimum_score) &&
+    (result['action'].to_sym == action.to_sym)
+end
+
+def recaptcha_response
+  ::Recaptcha.get({ secret: Card.config.recaptcha_secret_key,
+                    response: Env.params[:recaptcha_token] }, {})
+end
+
+def recaptcha_keys?
+  Card.config.recaptcha_site_key && Card.config.recaptcha_secret_key
+end
+
+event :recaptcha, :validate, when: :validate_recaptcha? do
+  handle_recaptcha_config_errors do
+    Env[:recaptcha_used] = true
+    human?
+  end
+end
+
+def handle_recaptcha_config_errors
+  if Env.params[:recaptcha_token] == "grecaptcha-undefined"
+    errors.add "recaptcha", "needs correct v3 configuration" # LOCALILZE
+  elsif Env.params[:recaptcha_token] == "recaptcha-token-field-missing"
+    raise Card::Error, "recaptcha token field missing" # LOCALILZE
+  else
+    yield
+  end
+end
+
+
+def validate_recaptcha?
+  !@supercard && !Env[:recaptcha_used] && recaptcha_on?
+end
+
+module HtmlFormat; parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
+  def recaptcha_token action
+    output [
+      javascript_include_tag(recaptcha_script_url),
+      hidden_field_tag("recaptcha_token", "",
+                       "data-site-key": Card.config.recaptcha_site_key,
+                       "data-action": action,
+                       class: "_recaptcha-token")
+    ]
+  end
+
+  def recaptcha_script_url
+    "https://www.google.com/recaptcha/api.js?render=#{Card.config.recaptcha_site_key}"
+  end
+
+  def hidden_form_tags action, opts
+    return super unless recaptcha?(opts)
+
+    super + recaptcha_token(action)
+  end
+
+  def card_form_html_opts action, opts={}
+    super
+    opts["data-recaptcha"] ||= "on" if recaptcha?(opts)
+    opts
+  end
+
+  def recaptcha? opts
+    card.recaptcha_on? && opts[:recaptcha] != :off
+  end
+end
+end;end;end;end;
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/recaptcha/set/all/recaptcha.rb ~~

data/tmpsets/set_pattern/100-all.rb

@@ -1,24 +1,22 @@
 # -*- encoding : utf-8 -*-
+# Set Pattern: All
+#
 class Card::Set::All < Card::Set::Pattern::Abstract
-  cattr_accessor :options
-  class << self
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set_pattern/01_all.rb ~~
-
+cattr_accessor :options
+class << self
 def label _name
   "All cards"
 end
 
-def prototype_args _anchor
-  {}
-end
-
-def follow_label _name
+def short_label _name
   "everything"
 end
 
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set_pattern/01_all.rb ~~
-  end
-  register "all", (options || {})
+def prototype_args _anchor
+  {}
 end
+              end
+              register "All".underscore.to_sym, (options || {})
+            end
 
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set_pattern/01_all.rb ~~

data/tmpsets/set_pattern/101-all_plus.rb

@@ -1,26 +1,24 @@
 # -*- encoding : utf-8 -*-
+# Set Pattern: AllPlus
+#
 class Card::Set::AllPlus < Card::Set::Pattern::Abstract
-  cattr_accessor :options
-  class << self
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set_pattern/02_all_plus.rb ~~
-
+cattr_accessor :options
+class << self
 @@options = { junction_only: true }
 
 def label _name
   'All "+" cards'
 end
 
-def prototype_args _anchor
-  { name: "+" }
-end
-
-def follow_label _name
+def short_label _name
   'all "+" cards'
 end
 
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set_pattern/02_all_plus.rb ~~
-  end
-  register "all_plus", (options || {})
+def prototype_args _anchor
+  { name: "+" }
 end
+              end
+              register "AllPlus".underscore.to_sym, (options || {})
+            end
 
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set_pattern/02_all_plus.rb ~~

data/tmpsets/set_pattern/102-type.rb

@@ -1,13 +1,17 @@
 # -*- encoding : utf-8 -*-
+# Set Pattern: Type
+#
 class Card::Set::Type < Card::Set::Pattern::Abstract
-  cattr_accessor :options
-  class << self
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set_pattern/03_type.rb ~~
-
+cattr_accessor :options
+class << self
 def label name
   %(All "#{name}" cards)
 end
 
+def short_label name
+  %(all "#{name}s")
+end
+
 def prototype_args anchor
   { type: anchor }
 end
@@ -23,14 +27,8 @@ end
 def anchor_id card
   card.type_id
 end
+              end
+              register "Type".underscore.to_sym, (options || {})
+            end
 
-def follow_label name
-  %(all "#{name}s")
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/core/set_pattern/03_type.rb ~~
-  end
-  register "type", (options || {})
-end
-
+# ~~ generated from /Users/ethan/dev/decko/gem/card/mod/core/set_pattern/03_type.rb ~~