card 1.104.1 → 1.105.0

data/mod/admin/set/self/admin.rb

@@ -1,144 +0,0 @@
-def run_task_from_task_basket task
-  task = task.to_sym
-  task_data = basket[: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 :regenerate_assets    then Card::Assets.refresh_assets force: true
-  # when :regenerate_scripts   then Card::Assets.refresh_scripts
-  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
-
-format :html do
-  view :core, cache: :never do
-    stats = card_stats
-    stats += cache_stats
-    stats += memory_stats
-    basket[: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: "style assets",
-        link_text: "regenerate styles and scripts",
-        task: "regenerate_assets" } # ,
-      # { title: "script assets",
-      #   link_text: "regenerate scripts",
-      #   task: "regenerate_scripts" }
-    ]
-    # 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 asset_input_cache_count
-    Card.where(right_id: AssetInputCacheID).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

data/mod/admin/set/self/admin_info.rb

@@ -1,40 +0,0 @@
-basket[:warnings] = [:no_email_delivery]
-# 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).
-
-def no_email_delivery?
-  Card.config.action_mailer.perform_deliveries == false
-end
-
-def clean_html?
-  false
-end
-
-format :html do
-  view :core do
-    warnings = basket[: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

data/mod/admin/set/self/debugger.rb

@@ -1,3 +0,0 @@
-def raw_help_text
-  "show more useful error pages"
-end

data/mod/admin/spec/set/self/admin_info_spec.rb

@@ -1,9 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-RSpec.describe Card::Set::Self::AdminInfo do
-  specify "view core" do
-    expect_view(:core).to have_tag("div.alert.alert-warning.alert-dismissible") do
-      with_tag "button.close"
-    end
-  end
-end

data/mod/core/data/production.yml

@@ -1,7 +0,0 @@
----
-- :name: Mod
-  :type: :cardtype
-  :codename: :mod
-- :name: Cardtype
-  :type: :cardtype
-  :codename: :cardtype

data/mod/core/set/all/collection.rb

@@ -1,53 +0,0 @@
-# shared methods for card collections (Pointers, Searches, Sets, etc.)
-module ClassMethods
-  def search spec, comment=nil, &block
-    results = ::Card::Query.run(spec, comment)
-    results.each(&block) if block_given? && results.is_a?(Array)
-    results
-  end
-
-  def count_by_cql spec
-    spec = spec.clone
-    spec.delete(:offset)
-    search spec.merge(return: "count")
-  end
-
-  def find_each **options, &block
-    # this is a copy from rails (3.2.16) and is needed because this
-    # is performed by a relation (ActiveRecord::Relation)
-    find_in_batches(**options) do |records|
-      records.each(&block)
-    end
-  end
-
-  def find_in_batches **options
-    if block_given?
-      super do |records|
-        yield(records)
-        Card::Cache.reset_soft
-      end
-    else
-      super
-    end
-  end
-end
-
-def collection?
-  item_cards != [self]
-end
-
-format do
-  view :count do
-    card.item_names.size
-  end
-end
-
-format :html do
-  view :carousel do
-    bs_carousel unique_id, 0 do
-      nest_item_array.each do |rendered_item|
-        item(rendered_item)
-      end
-    end
-  end
-end

data/mod/core/spec/set/all/collection_spec.rb

@@ -1,170 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-RSpec.describe Card::Set::All::Collection do
-  describe "#item_names" do
-    subject do
-      item_names_args = @context ? { context: @context } : {}
-      Card.new(@args).item_names(item_names_args)
-    end
-
-    it "returns item for each line of basic content" do
-      @args = { name: "foo", content: "X\nY" }
-      is_expected.to eq(%w[X Y])
-    end
-
-    it "returns list of card names for search" do
-      @args = { name: "foo", type: "Search", content: '{"name":"Z"}' }
-      is_expected.to eq(["Z"])
-    end
-
-    it "handles searches relative to context card" do
-      # NOTE: A refers to 'Z'
-      @context = "A"
-      @args = { name: "foo", type: "Search",
-                content: '{"referred_to_by":"_self"}' }
-      is_expected.to eq(["Z"])
-    end
-  end
-
-  # describe "#extended_list" do
-  #   it "returns item's content for pointer setting" do
-  #     c = Card.new(name: "foo", type: "Pointer", content: "[[Z]]")
-  #     expect(c.extended_list).to eq(["I'm here to be referenced to"])
-  #   end
-  # end
-
-  describe "#extended_item_cards" do
-    it "returns the 'leaf cards' of a tree of pointer cards" do
-      Card::Auth.as_bot do
-        Card.create!(name: "node", type: "Pointer", content: "[[Z]]")
-      end
-      c = Card.new(name: "foo", type: "Pointer", content: "[[node]]\n[[A]]")
-      expect(c.extended_item_cards).to eq([Card.fetch("Z"), Card.fetch("A")])
-    end
-  end
-
-  describe "#extended_item_contents" do
-    it "returns the content of the 'leaf cards' of a tree of pointer cards" do
-      Card::Auth.as_bot do
-        Card.create!(name: "node", type: "Pointer", content: "[[Z]]")
-      end
-      c = Card.new(name: "foo", type: "Pointer", content:  "[[node]]\n[[T]]")
-      expect(c.extended_item_contents)
-        .to eq(["I'm here to be referenced to", "Theta"])
-    end
-  end
-
-  describe "#contextual_content" do
-    let(:context_card) { Card["A"] }
-
-    # refers to 'Z'
-    it "processes nests relative to context card" do
-      c = create "foo", content: "{{_self+B|core}}"
-      expect(c.format.contextual_content(context_card)).to eq("AlphaBeta")
-    end
-
-    # why the heck is this good?  -efm
-    it "returns content even when context card is hard templated" do
-      create "A+*self+*structure", content: "Banana"
-      c = create "foo", content: "{{_self+B|core}}"
-      expect(c.format.contextual_content(context_card)).to eq("AlphaBeta")
-    end
-
-    it "doesn't use chunk list of context card" do
-      c = create "foo", content: "test@email.com", type: "HTML"
-      expect(c.format.contextual_content(context_card)).not_to have_tag "a"
-    end
-  end
-
-  describe "tabs view" do
-    it "renders tab panel" do
-      tabs = render_card :tabs, content: "[[A]]\n[[B]]\n[[C]]", type: "pointer"
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select "li > a[data-toggle=tab]"
-      end
-    end
-
-    it "loads only the first tab pane" do
-      tabs = render_card :tabs, content: "[[A]]\n[[B]]\n[[C]]", type: "pointer"
-      expect(tabs).to have_tag :div, with: { role: "tabpanel" } do
-        with_tag "div.tab-pane#tempo_rary-1-a" do
-          with_tag "div.card-slot#a-content-view"
-        end
-        with_tag :li do
-          with_tag "a.load", with: { "data-toggle": "tab", href: "#tempo_rary-2-b" }
-        end
-        with_tag "div.tab-pane#tempo_rary-2-b"
-      end
-    end
-
-    it "handles relative names" do
-      Card::Auth.as_bot do
-        Card.create! name: "G", content: "[[+B]]", type: "pointer",
-                     subcards: { "+B" => "GammaBeta" }
-      end
-      tabs = Card.fetch("G").format.render_tabs
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select "div.tab-pane#g-1-g-b .d0-card-content", "GammaBeta"
-      end
-    end
-
-    it "handles item views" do
-      tabs = render_content "{{Fruit+*type+*create|tabs|name}}"
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select "div.tab-pane#fruit-Xtype-Xcreate-1-anyone", "Anyone"
-      end
-    end
-
-    it "handles item params" do
-      tabs = render_content "{{Fruit+*type+*create|tabs|name;structure:Home}}"
-      params = { slot: { structure: "Home" }, view: :name }.to_param
-      path = "/Anyone?#{params}"
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select %(li > a[data-toggle="tab"][data-url="#{path}"])
-      end
-    end
-
-    it "handles contextual titles" do
-      create name: "tabs card", type: "pointer",
-             content: "[[A+B]]\n[[One+Two+Three]]\n[[Four+One+Five]]"
-      tabs = render_content  "{{tabs card|tabs|closed;title:_left}}"
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select 'li > a[data-toggle="tab"]', "A"
-        assert_select 'li > a[data-toggle="tab"]', "One+Two"
-      end
-    end
-
-    it "handles contextual titles as link" do
-      create name: "tabs card",
-             content: "[[A+B]]\n[[One+Two+Three]]\n[[Four+One+Five]]",
-             type: "pointer"
-      tabs = render_content "{{tabs card|tabs|closed;title:_left;show:title_link}}"
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select 'li > a[data-toggle="tab"]', "A"
-        assert_select 'li > a[data-toggle="tab"]', "One+Two"
-      end
-    end
-
-    it "handles nests as items" do
-      tabs = render_card :tabs, name: "tab_test", type_id: Card::PlainTextID,
-                                content: "{{A|type;title:my tab title}}"
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select 'li > a[data-toggle=tab][href="#tab_test-1-a"]',
-                      "my tab title"
-        assert_select "div.tab-pane#tab_test-1-a", "RichText"
-      end
-    end
-
-    it "works with search cards" do
-      Card.create type: "Search", name: "Asearch",
-                  content: '{"type":"User","sort":"name"}'
-      tabs = render_content("{{Asearch|tabs|name}}")
-      assert_view_select tabs, "div[role=tabpanel]" do
-        assert_select(
-          'li > a[data-toggle=tab][href="#asearch-2-joe_admin"] span.card-title',
-          "Joe Admin"
-        )
-      end
-    end
-  end
-end

data/mod/core/spec/set/all/utils_spec.rb

@@ -1,5 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Set::All::Utils do
-  # SPECSTUB
-end

data/mod/standard/data/files/logo/image-original.svg

@@ -1 +0,0 @@
-<svg xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" style="min-width:65px;min-height:45px;margin-top:-12px;margin-bottom:-14px" version="1.1" viewBox="0 0 242 218"><title>b&amp;w_logo</title><desc>Created with Sketch.</desc><defs><rect id="path-1" width="157.28" height="190.607" x="35.33" y="10.485" rx="12.491"/><filter id="filter-2" width="125.4%" height="121%" x="-12.1%" y="-10.5%" filterUnits="objectBoundingBox"><feMorphology in="SourceAlpha" operator="dilate" radius="1" result="shadowSpreadOuter1"/><feOffset dx="1" dy="0" in="shadowSpreadOuter1" result="shadowOffsetOuter1"/><feGaussianBlur in="shadowOffsetOuter1" result="shadowBlurOuter1" stdDeviation="5.5"/><feColorMatrix in="shadowBlurOuter1" type="matrix" values="0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.1 0"/></filter><rect id="path-3" width="123.953" height="171.161" x="51.988" y="19.404" rx="9.689"/><filter id="filter-4" width="132.3%" height="123.4%" x="-15.3%" y="-11.7%" filterUnits="objectBoundingBox"><feMorphology in="SourceAlpha" operator="dilate" radius="1" result="shadowSpreadOuter1"/><feOffset dx="1" dy="0" in="shadowSpreadOuter1" result="shadowOffsetOuter1"/><feGaussianBlur in="shadowOffsetOuter1" result="shadowBlurOuter1" stdDeviation="5.5"/><feColorMatrix in="shadowBlurOuter1" type="matrix" values="0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.1 0"/></filter><path id="path-5" d="M70.1050368,35.6666109 L159.089911,35.6666109 L159.089911,35.6666109 C163.678051,35.6666109 167.397473,39.386033 167.397473,43.9741728 L167.397473,87.717145 L167.397473,166.808436 L167.397473,166.808436 C167.397473,171.396576 163.678051,175.115998 159.089911,175.115998 L70.1050368,175.115998 L70.1050368,175.115998 C65.516897,175.115998 61.7974749,171.396576 61.7974749,166.808436 L61.7974749,43.9741728 L61.7974749,43.9741728 C61.7974749,39.386033 65.516897,35.6666109 70.1050368,35.6666109 Z"/><filter id="filter-6" width="137.9%" height="128.7%" x="-18%" y="-14.3%" filterUnits="objectBoundingBox"><feMorphology in="SourceAlpha" operator="dilate" radius="1" result="shadowSpreadOuter1"/><feOffset dx="1" dy="0" in="shadowSpreadOuter1" result="shadowOffsetOuter1"/><feGaussianBlur in="shadowOffsetOuter1" result="shadowBlurOuter1" stdDeviation="5.5"/><feColorMatrix in="shadowBlurOuter1" type="matrix" values="0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.1 0"/></filter><rect id="path-7" width="92.149" height="107.187" x="70.764" y="49.853" rx="7.866"/><filter id="filter-8" width="143.4%" height="137.3%" x="-20.6%" y="-18.7%" filterUnits="objectBoundingBox"><feMorphology in="SourceAlpha" operator="dilate" radius="1" result="shadowSpreadOuter1"/><feOffset dx="1" dy="0" in="shadowSpreadOuter1" result="shadowOffsetOuter1"/><feGaussianBlur in="shadowOffsetOuter1" result="shadowBlurOuter1" stdDeviation="5.5"/><feColorMatrix in="shadowBlurOuter1" type="matrix" values="0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.102553216 0"/></filter></defs><g id="Page-3" fill="none" fill-rule="evenodd" stroke="none" stroke-width="1"><g id="b&amp;w_logo" fill-rule="nonzero"><g id="Decko-Logo-" transform="translate(7.000000, 4.000000)"><g id="g5642"><g id="svg-card-1" transform="translate(113.969540, 105.788552) scale(-1, 1) rotate(105.855860) translate(-113.969540, -105.788552)"><use fill="#000" fill-opacity="1" filter="url(#filter-2)" xlink:href="#path-1"/><use fill="#4D4D4D" fill-rule="evenodd" xlink:href="#path-1"/></g><g id="svg-card-2" opacity=".88" transform="translate(113.964538, 104.984820) scale(-1, 1) rotate(117.480003) translate(-113.964538, -104.984820)"><use fill="#000" fill-opacity="1" filter="url(#filter-4)" xlink:href="#path-3"/><use fill="#FFF" fill-rule="evenodd" xlink:href="#path-3"/></g><g id="svg-card-3" transform="translate(114.597474, 105.391304) scale(-1, 1) rotate(133.539993) translate(-114.597474, -105.391304)"><use fill="#000" fill-opacity="1" filter="url(#filter-6)" xlink:href="#path-5"/><use fill="#4C4C4C" fill-rule="evenodd" xlink:href="#path-5"/></g><g id="svg-card-4" opacity=".88" transform="translate(116.838368, 103.446228) scale(-1, 1) rotate(142.690002) translate(-116.838368, -103.446228)"><use fill="#000" fill-opacity="1" filter="url(#filter-8)" xlink:href="#path-7"/><use fill="#FFF" fill-rule="evenodd" xlink:href="#path-7"/></g></g></g></g></g></svg>