card 1.18.6 → 1.19.0

data/tmpsets/set/mod007-05_standard/self/recent.rb

@@ -1,55 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Recent; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/recent.rb ~~~~~~~~~~~
-
-view :title do |args|
-   super args.merge( title: 'Recent Changes' )
-end
-
-format :html do
-
-  view :card_list do |args|
-    search_vars[:item] ||= :change
-
-    cards_by_day = Hash.new { |h, day| h[day] = [] }
-    search_results.each do |card|
-      begin
-        stamp = card.updated_at
-        day = Date.new(stamp.year, stamp.month, stamp.day)
-      rescue =>e
-        day = Date.today
-        card.content = "(error getting date)"
-      end
-      cards_by_day[day] << card if card.followable?
-    end
-
-    paging = _optional_render :paging, args
-    %{
-      #{ paging }
-      #{
-        cards_by_day.keys.sort.reverse.map do |day|
-          %{
-            <h2>#{format_date(day, include_time = false) }</h2>
-            <div class="search-result-list">
-              #{
-                 cards_by_day[day].map do |card|
-                   %{
-                     <div class="search-result-item item-#{ search_vars[:item] }">
-                      #{ nest(card, view: search_vars[:item]) }
-                    </div>
-                   }
-                 end * ' '
-              }
-            </div>
-          }
-        end * "\n"
-      }
-      #{ paging }
-    }
-  end
-
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/recent.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod007-05_standard/self/search.rb

@@ -1,73 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Search; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/search.rb ~~~~~~~~~~~
-
-format :html do
-  view :title do |args|
-    vars = root.search_params[:vars]
-    if vars && vars[:keyword]
-      args.merge! title: %{Search results for: <span class="search-keyword">}\
-                         "#{vars[:keyword]}</span>"
-    end
-    super args
-  end
-end
-
-format :json do
-  view :complete do
-    term = complete_term
-    exact = Card.fetch term, new: {}
-
-    {
-      search: true,
-      add: add_item(exact),
-      new: new_item_of_type(exact),
-      goto: goto_items(term, exact)
-    }
-  end
-
-  def add_item exact
-    return unless exact.new_card? &&
-                  exact.cardname.valid? &&
-                  !exact.virtual? &&
-                  exact.ok?(:create)
-    exact.name
-  end
-
-  def new_item_of_type exact
-    return unless (exact.type_id == Card::CardtypeID) &&
-                  Card.new(type_id: exact.id).ok?(:create)
-    [exact.name, exact.cardname.url_key]
-  end
-
-  def goto_items term, exact
-    goto_names = Card.search goto_wql(term), "goto items for term: #{term}"
-    if add_exact_to_goto_names? exact, goto_names
-      goto_names.unshift exact.name
-    end
-    goto_names.map do |name|
-      [name, highlight(name, term), name.to_name.url_key]
-    end
-  end
-
-  def add_exact_to_goto_names? exact, goto_names
-    exact.known? && !goto_names.find { |n| n.to_name.key == exact.key }
-  end
-
-  def complete_term
-    term = params['_keyword']
-    if (term =~ /^\+/) && (main = params['main'])
-      term = main + term
-    end
-    term
-  end
-
-  # hacky.  here for override
-  def goto_wql term
-    { complete: term, limit: 8, sort: 'name', return: 'name' }
-  end
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/search.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod007-05_standard/self/signin.rb

@@ -1,140 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Signin; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/signin.rb ~~~~~~~~~~~
-
-format :html do
-  view :open do |args|
-    args.merge! optional_help: :show
-    super args
-  end
-
-  def default_title_args args
-    args[:title] ||= 'Sign In'
-  end
-
-  view :open_content do |args|
-    # annoying step designed to avoid table of contents.  sigh
-    _render_core(args)
-  end
-
-  view :closed_content do |_args|
-    ''
-  end
-
-  def default_core_args args={}
-    args[:buttons] = button_tag 'Sign in', situation: 'primary'
-    if Card.new(type_id: Card::SignupID).ok? :create
-      args[:buttons] += link_to('...or sign up!', card_path('account/signup'))
-    end
-    args[:buttons] += raw(
-      "<div style='float:right'>" \
-      "#{ view_link 'RESET PASSWORD', :edit,
-                    path_opts: { slot: { hide: :toolbar } } }" \
-      '</div>') # FIXME: hardcoded styling
-    args
-  end
-
-  view :core do |args|
-    form_args = {
-      hidden: { success: "REDIRECT: #{Env.interrupted_action || '*previous'}" },
-      recaptcha: :off
-    }
-    with_inclusion_mode :edit do
-      card_form :update, form_args do
-        [
-          _optional_render(:content_formgroup, args.merge(structure: true)),
-          _optional_render(:button_formgroup, args)
-        ].join
-      end
-    end
-  end
-
-  # FORGOT PASSWORD
-  view :edit do |args|
-    @forgot_password = true
-    args.merge!(
-      title: 'Forgot Password',
-      optional_help: :hide,
-      buttons: button_tag('Reset my password', situation: 'primary'),
-      structure: true,
-      hidden: {
-        reset_password: true,
-        success: { view: :reset_password_success }
-      }
-    )
-
-    Auth.as_bot { super args }
-  end
-
-  view :raw do |_args|
-    if @forgot_password
-      "{{+#{Card[:email].name}|title:email;type:Phrase}}"
-    else
-      %(
-        {{+#{Card[:email].name}|titled;title:email}}
-        {{+#{Card[:password].name}|titled;title:password}}
-      )
-    end
-  end
-
-  view :reset_password_success do |_args|
-    frame { 'Check your email for a link to reset your password' }
-  end
-end
-
-event :signin, before: :approve, on: :update do
-  email = subfield :email
-  email &&= email.content
-  pword = subfield :password
-  pword &&= pword.content
-
-  abort :failure, 'bad signin args' unless email && pword
-
-  if (account = Auth.authenticate(email, pword))
-    Auth.signin account.left_id
-  else
-    account = Auth[email.strip.downcase]
-    error_msg =
-      case
-      when account.nil?     then 'Unrecognized email.'
-      when !account.active? then 'Sorry, that account is not active.'
-      else 'Wrong password'
-      end
-    errors.add :signin, error_msg
-    abort :failure
-  end
-end
-
-event :signin_success, after: :signin do
-  abort :success
-end
-
-event :send_reset_password_token,
-      before: :signin, on: :update,
-      when: proc { Env.params[:reset_password] } do
-  email = subfield :email
-  email &&= email.content
-
-  account = Auth[email.strip.downcase]
-  if account
-    if account.active?
-      account.send_reset_password_token
-      abort :success
-    else
-      errors.add :account, 'not active'
-      abort :failure
-    end
-  else
-    errors.add :email, 'not recognized'
-    abort :failure
-  end
-end
-
-event :signout, before: :approve, on: :delete do
-  Auth.signin nil
-  abort :success
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/signin.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod007-05_standard/self/stats.rb

@@ -1,110 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Stats; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/stats.rb ~~~~~~~~~~~
-
-format :html do
-  view :core do |args|
-    oldmem = session[:memory]
-    session[:memory] = newmem = card.profile_memory
-    stats = %{
-      <table>
-        <tr>
-          <th>Stat</th>
-          <th>Value</th>
-          <th>Action</th>
-        </tr>
-        <tr>
-          <td>cards</td>
-          <td>#{ Card.where(trash: false).count }</td>
-          <td></td>
-        </tr>
-        <tr>
-          <td>trashed cards</td>
-          <td>#{ Card.where(trash: true).count  }</td>
-          <td>#{link_to 'delete all', card_path( 'update/:all?task=empty_trash' )}</td>
-        </tr>
-        <tr>
-          <td>actions</td>
-          <td>#{ Card::Action.count }</td>
-          <td>#{link_to 'delete old', card_path( 'update/:all?task=delete_old_revisions' ) }</td>
-        </tr>
-          <tr><td>references</td>
-          <td>#{ Card::Reference.count }</td>
-          <td>#{link_to 'repair all', card_path( 'update/:all?task=repair_references' ) }</td>
-        </tr>
-        <tr>
-          <td>sessions</td>
-          <td>#{ ActiveRecord::SessionStore::Session.count }</td>
-          <td>
-            delete older than
-            #{ delete_sessions_link 1 }
-            #{ delete_sessions_link 2 }
-            #{ delete_sessions_link 3 }
-            months
-          </td>
-        </tr>
-        #{
-          if Card.config.view_cache
-            %{
-              <tr>
-                <td>view cache</td>
-                <td>#{ Card::ViewCache.count }</td>
-                <td>#{link_to 'clear view cache',  card_path( 'update/:all?task=clear_view_cache' ) }</td>
-              </tr>
-            }
-          end
-        }
-
-        <tr>
-          <td>memory now</td>
-          <td>#{ newmem }M</td>
-          <td>#{link_to 'clear cache',  card_path( 'update/:all?task=clear_cache' ) }</td>
-        </tr>
-        #{
-          if oldmem
-            %{
-              <tr>
-                <td>memory prev</td>
-                <td>#{ oldmem }M</td>
-                <td></td>
-              </tr>
-              <tr>
-                <td>memory diff</td>
-                <td>#{ newmem - oldmem }M</td>
-                <td></td>
-              </tr>
-
-            }
-          end
-        }
-      </table>
-    }
-  end
-
-  def delete_sessions_link months
-    link_to months, card_path( "update/:all?task=delete_old_sessions&months=#{months}")
-  end
-end
-
-
-
-
-def get_current_memory_usage
-  `ps -o rss= -p #{Process.pid}`.to_i
-end
-
-def profile_memory(&block)
-  before = get_current_memory_usage
-  file, line, _ = caller[0].split(':')
-  if block_given?
-    instance_eval(&block)
-    (get_current_memory_usage - before) / 1024
-  else
-    before = 0
-    (get_current_memory_usage - before) / 1024
-  end.to_i
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/stats.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod007-05_standard/self/version.rb

@@ -1,16 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Version; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/version.rb ~~~~~~~~~~~
-# -*- encoding : utf-8 -*-
-require_dependency 'card/version'
-
-view :raw do |args|
-  Card::Version.release
-end
-
-view :core, :raw
-
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/version.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod007-05_standard/type/basic.rb

@@ -1,53 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Type; module Basic; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/basic.rb ~~~~~~~~~~~
-format :html do
-  view :open_content do |args|
-    content = _render_core args
-    table_of_contents(content) || content
-  end
-
-  def table_of_contents content
-    return if @mode==:closed || !content.present?
-    min = card.rule(:table_of_contents).to_i
-    #warn "table_of #{name}, #{min}"
-    return unless min and min > 0
-
-    toc, dep = [], 1
-    content.gsub!( /<(h\d)>(.*?)<\/h\d>/i ) do |match|
-      if $~
-        tag, value = $~[1,2]
-        value = ActionView::Base.new.strip_tags(value).strip
-        next if value.empty?
-        item = { value: value, uri: URI.escape(value) }
-        case tag.downcase
-        when 'h1'
-          item[:depth] = dep = 1; toc << item
-        when 'h2'
-          toc << []  if dep == 1
-          item[:depth] = dep = 2; toc.last << item
-        end
-        %{<a name="#{item[:uri]}"></a>#{match}}
-      end
-    end
-
-    if toc.flatten.length >= min
-      content.replace %{ <div class="table-of-contents"> <h5>Table of Contents</h5> } +
-        make_table_of_contents_list(toc) + '</div>'+ content
-    end
-  end
-
-
-  def make_table_of_contents_list(items)
-    list = items.collect do |i|
-      Array === i ? make_table_of_contents_list(i) : %{<li><a href="##{i[:uri]}"> #{i[:value]}</a></li>}
-    end.join("\n")
-    "<ol>" + list + "</ol>"
-  end
-
-end
-
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/basic.rb ~~~~~~~~~~~
-end;end;end;end;