card 1.99.4 → 1.99.5

data/tmpsets/set/mod004-basic_formats/all/all_css.rb

@@ -0,0 +1,45 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module AllCss; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/all_css.rb ~~
+
+format :css do
+  def get_nest_defaults _nested_card
+    { view: :raw }
+  end
+
+  def show view, args
+    view ||= :content
+    render view, args
+  end
+
+  view :titled do |args|
+    major_comment(%( Style Card: "#{card.name}" )) + _render_core(args)
+  end
+
+  view :content do |args|
+    _render_core args
+  end
+
+  view :missing do |_args|
+    major_comment "MISSING Style Card: #{card.name}"
+  end
+
+  view :import do |_args|
+    %{\n@import url("#{_render_url item: :import}");\n}
+  end
+
+  view :url, perms: :none do |args|
+    page_path card.cardname, format: :css, item: args[:item]
+    # card_url _render_linkname
+  end
+
+  def major_comment comment, char="-"
+    edge = %(/* #{char * (comment.length + 4)} */)
+    main = %(/* #{char} #{comment} #{char} */)
+    "#{edge}\n#{main}\n#{edge}\n\n"
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/all_css.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/all_csv.rb

@@ -0,0 +1,56 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module AllCsv; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/all_csv.rb ~~
+require "csv"
+
+format :csv  do
+  def get_nest_defaults _nested_card
+    { view: :core }
+  end
+
+  def default_item_view
+    @depth == 0 ? :csv_row : :name
+  end
+
+  view :csv_row do |_args|
+    array = _render_raw.scan(/\{\{[^\}]*\}\}/).map do |inc|
+      process_content(inc).strip
+    end
+
+    CSV.generate_line(array).strip
+    # strip is because search already joins with newlines
+  end
+
+  view :missing do |_args|
+    ""
+  end
+
+  view :csv_title_row do |_args|
+    # NOTE: assumes all cards have the same structure!
+    begin
+      card1 = search_results.first
+
+      parsed_content = Card::Content.new card1.raw_content, self
+      if parsed_content.__getobj__.is_a? String
+        ""
+      else
+        titles = parsed_content.map do |chunk|
+          next if chunk.class != Card::Content::Chunk::Include
+          opts = chunk.options
+          if %w(name link).member? opts[:view]
+            opts[:view]
+          else
+            opts[:inc_name].to_name.tag
+          end
+        end.compact
+        CSV.generate_line titles.map { |title| title.to_s.upcase }
+      end
+    rescue
+      ""
+    end
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/all_csv.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/all_js.rb

@@ -0,0 +1,13 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module AllJs; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/all_js.rb ~~
+
+format :js do
+  view :include_tag do |_args|
+    %(\n#{javascript_include_tag page_path(card.cardname)}\n )
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/all_js.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/base.rb

@@ -0,0 +1,155 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module Base; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/base.rb ~~
+format do
+  def show view, args
+    view ||= :core
+    render view, args
+  end
+
+  # NAME VIEWS
+  view :name, closed: true, perms: :none do |args|
+    return card.name unless args[:variant]
+    args[:variant].split(/[\s,]+/).inject(card.name) do |name, variant|
+      case variant.to_sym
+      when :capitalized
+        name.capitalize
+      when :singular
+        name.singularize
+      when :plural
+        name.pluralize
+      when :title
+        name.titleize
+      else
+        if ::Set.new([
+                       :downcase, :upcase, :swapcase, :reverse, :succ
+                     ]).include?(variant.to_sym)
+          name.send variant
+        else
+          name
+        end
+      end
+    end
+  end
+
+  view(:key,      closed: true, perms: :none) { card.key }
+  view(:linkname, closed: true, perms: :none) { card.cardname.url_key }
+  view(:url,      closed: true, perms: :none) { card_url _render_linkname }
+
+  view :title, closed: true, perms: :none do |args|
+    args[:title] || card.name
+  end
+
+  view :url_link, closed: true, perms: :none do
+    web_link card_url(_render_linkname)
+  end
+
+  view :link, closed: true, perms: :none do |args|
+    card_link(
+      card.name,
+      text: showname(args[:title]),
+      known: card.known?,
+      path_opts: { type: args[:type] }
+    )
+  end
+
+  view(:codename, closed: true) { card.codename.to_s }
+  view(:id,       closed: true) { card.id            }
+  view(:type,     closed: true) { card.type_name     }
+
+  # DATE VIEWS
+
+  view(:created_at, closed: true) { time_ago_in_words card.created_at }
+  view(:updated_at, closed: true) { time_ago_in_words card.updated_at }
+  view(:acted_at,   closed: true) { time_ago_in_words card.acted_at   }
+
+  # CONTENT VIEWS
+
+  view :raw do |args|
+    scard = args[:structure] ? Card[args[:structure]] : card
+    scard ? scard.raw_content : _render_blank
+  end
+
+  view :core do |args|
+    process_content _render_raw(args)
+  end
+
+  view :content do |args|
+    _render_core args
+  end
+
+  view :open_content do |args|
+    _render_core args
+  end
+
+  view :closed_content, closed: true do |args|
+    Card::Content.smart_truncate _render_core(args)
+  end
+
+  view :blank, closed: true, perms: :none do
+    ""
+  end
+
+  # note: content and open_content may look like they should be aliased to
+  # core, but it's important that they render core explicitly so that core view
+  # overrides work.  the titled and labeled views below, however, are not
+  # intended for frequent override, so this shortcut is fine.
+
+  # NAME + CONTENT VIEWS
+
+  view :titled do |args|
+    "#{card.name}\n\n#{_render_core args}"
+  end
+  view :open, :titled
+
+  view :labeled do |args|
+    "#{card.name}: #{_render_closed_content args}"
+  end
+  view :closed, :labeled
+
+  # SPECIAL VIEWS
+
+  view :array do |args|
+    card.item_cards(limit: 0).map do |item_card|
+      subformat(item_card)._render_core(args)
+    end.inspect
+  end
+
+  # none of the below belongs here!!
+
+  view :template_rule, tags: :unknown_ok do |args|
+    # FIXME: - relativity should be handled in smartname
+    return "" unless args[:inc_name]
+    name = args[:inc_name].to_name
+    stripped = name.stripped
+
+    if name.relative? && !stripped.to_name.starts_with_joint?
+      # not a simple relative name; just return the original syntax
+      "{{#{args[:inc_syntax]}}}"
+    else
+      set_name =
+        if name.absolute?
+          "#{name}+#{Card[:self].name}" # *self set
+        elsif (type = on_type_set)
+          "#{type}#{name}+#{Card[:type_plus_right].name}" # *type plus right
+        else
+          "#{stripped.gsub(/^\+/, '')}+#{Card[:right].name}" # *right
+        end
+      subformat(Card.fetch(set_name)).render_template_link args
+    end
+  end
+
+  def on_type_set
+    return unless
+      (tmpl_set_name = parent.card.cardname.trunk_name) &&
+      (tmpl_set_class_name = tmpl_set_name.tag_name) &&
+      (tmpl_set_class_card = Card[tmpl_set_class_name]) &&
+      (tmpl_set_class_card.codename == "type")
+
+    tmpl_set_name.left_name
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/base.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/file.rb

@@ -0,0 +1,16 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module File; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/file.rb ~~
+format :file do
+  view :core do |_args|
+    "File rendering of this card not yet supported"
+  end
+
+  view :style do |_args|
+    nil
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/file.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/json.rb

@@ -0,0 +1,76 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module Json; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/json.rb ~~
+
+format :json do
+  def get_nest_defaults _nested_card
+    { view: :atom }
+  end
+
+  def default_item_view
+    params[:item] || :atom
+  end
+
+  def max_depth
+    params[:max_depth] || 1
+  end
+
+  def show view, args
+    view ||= :content
+    raw = render view, args
+    if raw.is_a?(String)
+      raw
+    elsif params[:compress]
+      JSON(raw)
+    else
+      JSON.pretty_generate raw
+    end
+  end
+
+  view :name_complete do |_args|
+    card.item_cards complete: params["term"], limit: 8, sort: "name",
+                    return: "name", context: ""
+  end
+
+  view :status, tags: :unknown_ok, perms: :none do |_args|
+    status =
+      case
+      when !card.known?     then :unknown
+      # do we want the following to prevent fishing?  of course, they can always
+      # post...
+      when !card.ok?(:read) then :unknown
+      when card.real?       then :real
+      when card.virtual?    then :virtual
+      else :wtf
+      end
+
+    hash = { key: card.key, url_key: card.cardname.url_key, status: status }
+    hash[:id] = card.id if status == :real
+
+    hash
+  end
+
+  view :content do |_args|
+    req = controller.request
+    {
+      url:       (req && req.original_url),
+      timestamp: Time.now.to_s,
+      card:      _render_atom
+    }
+  end
+
+  view :atom do |args|
+    h = {
+      name: card.name,
+      type: card.type_name
+    }
+    h[:content]  = card.content  unless card.structure
+    h[:codename] = card.codename     if card.codename
+    h[:value]    = _render_core args if @depth < max_depth
+    h
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/json.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/rss.rb

@@ -0,0 +1,77 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module Rss; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/rss.rb ~~
+format :rss do
+  attr_accessor :xml
+
+  def initialize card, args
+    super
+    @xml = @parent ? @parent.xml : ::Builder::XmlMarkup.new
+  end
+
+  def show view, args
+    view ||= :feed
+    render view, args
+  end
+
+  # FIXME: integrate this with common XML features when it is added
+  view :feed do
+    begin
+      @xml.instruct! :xml, version: "1.0"
+      @xml.rss version: "2.0" do
+        @xml.channel do
+          @xml.title       render_feed_title
+          @xml.description render_feed_description
+          @xml.link        render_url
+          render_feed_body
+        end
+      end
+    rescue => e
+      @xml.error "\n\nERROR rendering RSS: #{e.inspect}\n\n #{e.backtrace}"
+    end
+  end
+
+  def raw_feed_items _args
+    [card]
+  end
+
+  view :feed_body do |_args|
+    render_feed_item_list
+  end
+
+  view :feed_item_list do |args|
+    raw_feed_items(args).each do |item|
+      @xml.item do
+        # FIXME: yuck.
+        subformat(item).render_feed_item view_changes: (card.id == RecentID)
+      end
+    end
+  end
+
+  view :feed_title do
+    Card.global_setting(:title) + " : " + card.name.gsub(/^\*/, "")
+  end
+
+  view :feed_item do |args|
+    @xml.title card.name
+    add_name_context
+    @xml.description render((args[:view_changes] ? :change : :open_content))
+    @xml.pubDate card.revised_at.to_s(:rfc822)  # updated_at fails on virtual
+    # cards, because not all to_s's take args (just actual dates)
+    @xml.link render_url
+    @xml.guid render_url
+  end
+
+  view :feed_description do "" end
+  view :comment_box      do "" end
+  view :menu             do "" end
+
+  view :open,         view: :titled, mod: All::Base::Format
+  view :content,      view: :core,   mod: All::Base::Format
+  view :open_content, view: :core,   mod: All::Base::Format
+  view :closed,       view: :link,   mod: All::Base::Format
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/rss.rb ~~
+end;end;end;end;

data/tmpsets/set/mod004-basic_formats/all/text.rb

@@ -0,0 +1,13 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module Text; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/text.rb ~~
+
+format :text do
+  view :core do |args|
+    HTMLEntities.new.decode strip_tags(super args).to_s # need this string method to get out of html_safe mode
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/basic_formats/set/all/text.rb ~~
+end;end;end;end;