card 1.16.1 → 1.16.2

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

@@ -0,0 +1,55 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module AccountLinks; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/account_links.rb ~~~~~~~~~~~
+
+format :html do
+
+  def item_links args
+    [
+      optional_render( :my_card, args),
+      optional_render( :invite, args),
+      optional_render( :sign_out, args),
+      optional_render( :sign_up, args),
+      optional_render( :sign_in, args)
+    ]
+  end
+  
+  #ENGLISH below
+  view :sign_up, :perms=>lambda { |r| !Auth.signed_in? && Card.new(:type_id=>Card::SignupID).ok?(:create) }, 
+                 :denial=>:blank do |args|
+    link_to( 'Sign up', card_path('account/signup'), :id=>'signup-link' )
+  end
+  
+  view :sign_in, :perms=>lambda { |r| !Auth.signed_in? },
+                 :denial=>:blank do |args|
+    link_to( 'Sign in', card_path(':signin'), :id=>'signin-link' )
+  end
+  
+  view :invite, :perms=>lambda { |r|  Auth.signed_in? && Card.new(:type_id=>Card.default_accounted_type_id).ok?(:create) },
+                :denial=>:blank do |args|
+    link_to( 'Invite', card_path('account/signup'), :id=>'invite-a-friend-link' )
+  end
+  
+  view :sign_out, :perms=>lambda { |r| Auth.signed_in? },
+                  :denial=>:blank do |args|
+    link_to( 'Sign out', card_path('delete/:signin'), :id=>'signout-link' )
+  end 
+  
+  view :my_card, :perms=>lambda { |r| Auth.signed_in? },
+                 :denial=>:blank do |args|
+    card_link( Auth.current.cardname, :id=>'my-card-link' )
+  end
+  
+  view :raw do |args|
+    item_links(args).join ' '
+  end
+
+  view :core do |args|
+    content_tag :span, :id=>'logging' do
+      render_raw args
+    end
+  end
+end
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/account_links.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,11 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module Alerts; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/alerts.rb ~~~~~~~~~~~
+
+view :raw do |args|
+  '<!-- *alerts is deprecated. please remove from layout -->'
+end
+view :core, :raw
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/alerts.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,28 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module All; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/all.rb ~~~~~~~~~~~
+
+event :admin_tasks, :on=>:update, :before=>:approve do
+  if task = Env.params[:task]
+    if Auth.always_ok?
+      case task.to_sym
+      when :clear_cache           ;  Card::Cache.reset_global; Card::ViewCache.reset
+      when :repair_references     ;  Card::Reference.repair_all
+      when :empty_trash           ;  Card.empty_trash
+      when :clear_view_cache      ;  Card::ViewCache.reset
+      when :delete_old_revisions  ;  Card::Action.delete_old
+      when :delete_old_sessions
+        if months = Env.params[:months].to_i and months > 0
+          ActiveRecord::SessionStore::Session.delete_all ["updated_at < ?", months.months.ago]
+        end
+      end
+      Env.params[:success] = Card[:stats].name
+      abort :success
+    else
+      raise Card::PermissionDenied.new(self)
+    end
+  end
+end
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/all.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,14 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module Foot; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/foot.rb ~~~~~~~~~~~
+
+format :html do
+  view :raw do |args|
+    '<!-- *foot is deprecated. please remove from layout -->'
+  end
+
+  view :core, :raw
+end
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/foot.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,126 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module Head; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/head.rb ~~~~~~~~~~~
+format :html do
+
+  view :raw do |args|
+    %(
+      <meta charset="UTF-8">
+      <meta name="viewport" content="width=device-width, initial-scale=1.0"/>
+      #{ head_title       }
+      #{ head_buttons     }
+      #{ head_stylesheets }
+      #{ head_javascript  }
+    )
+  end
+
+  view :core do |args|
+    case
+    when focal?    ; CGI.escapeHTML _render_raw(args)
+    when @mainline ; "(*head)"
+    else           ; _render_raw(args)
+    end
+  end
+
+  def head_title
+    title = root.card && root.card.name
+    title = nil if title.blank?
+    title = params[:action] if title=='*placeholder'
+    %(<title>#{title ? "#{title} - " : ''}#{ Card.setting :title }</title>)
+  end
+
+  def head_buttons
+    bits = []
+    [:favicon, :logo].each do |name|
+      if c = Card[name] and c.type_id == ImageID and !c.db_content.blank?
+        bits << %{<link rel="shortcut icon" href="#{ subformat(c)._render_source :size=>:small }" />}
+        break
+      end
+    end
+
+    #Universal Edit Button
+    if root.card
+      if !root.card.new_record? && root.card.ok?(:update)
+        bits << %{<link rel="alternate" type="application/x-wiki" title="Edit this page!" href="#{ root.path :view=>:edit }"/>}
+      end
+
+      # RSS # move to mods!
+      if root.card.type_id == SearchTypeID
+        opts = { :format => :rss }
+        root.search_params[:vars].each { |key, val| opts["_#{key}"] = val }
+        bits << %{<link rel="alternate" type="application/rss+xml" title="RSS" href=#{page_path root.card.cardname, opts} />}
+      end
+    end
+    bits.join "\n      "
+  end
+
+  def head_stylesheets
+    manual_style = params[:style]
+    style_card   = Card[manual_style] if manual_style
+    style_card ||= root.card.rule_card :style
+    @css_path = if params[:debug] == 'style'
+      page_path( style_card.cardname, :item => :import, :format => :css)
+    elsif style_card
+      card_path style_card.machine_output_url
+    end
+
+    if @css_path
+      %{<link href="#{@css_path}" media="all" rel="stylesheet" type="text/css" />}
+    end
+  end
+
+  def head_javascript
+    varvals = [
+      "window.wagn={rootPath:'#{ Card.config.relative_url_root }'}",
+      "window.tinyMCEPreInit={base:\"#{card_path 'assets/tinymce'}\",query:'3.5.9',suffix:''}" # tinyMCE doesn't load on non-root wagns w/o preinit line
+    ]
+    card.have_recaptcha_keys?                        and varvals << "wagn.recaptchaKey='#{Card.config.recaptcha_public_key}'"
+    c=Card[:double_click] and !Card.toggle c.content and varvals << 'wagn.noDoubleClick=true'
+    @css_path                                        and varvals << "wagn.cssPath='#{@css_path}'"
+
+    manual_script = params[:script]
+    script_card   = Card[manual_script] if manual_script
+    script_card ||= root.card.rule_card :script
+
+    @js_tag = if params[:debug] == 'script'
+      script_card.format(:js).render_core :item => :include_tag
+    elsif script_card
+      javascript_include_tag script_card.machine_output_url
+    end
+
+    ie9_card    = Card[:script_html5shiv_printshiv]
+    %(#{ javascript_tag do varvals * ';' end  }
+      #{ @js_tag if @js_tag }
+      <!--[if lt IE 9]>#{ javascript_include_tag ie9_card.machine_output_url if ie9_card }<![endif]-->
+      #{ javascript_tag { "wagn.setTinyMCEConfig('#{ escape_javascript Card.setting(:tiny_mce).to_s }')" } }
+      #{ google_analytics_head_javascript }
+      <script type="text/javascript">
+        $('document').ready(function() {
+          $('.card-slot').trigger('slotReady');
+        })
+      </script>)
+  end
+
+
+  def google_analytics_head_javascript
+    if ga_key = Card.setting("*google analytics key") #fixme.  escape this?
+      %{
+        <script type="text/javascript">
+          var _gaq = _gaq || [];
+          _gaq.push(['_setAccount', '#{ga_key}']);
+          _gaq.push(['_trackPageview']);
+          (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);
+          })();
+        </script>
+      }
+    end
+  end
+end
+
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/head.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,39 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module Navbox; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/navbox.rb ~~~~~~~~~~~
+
+format :html do
+  
+  view :raw do |args|
+    input_args = { :class=>'navbox form-control' }
+    @@placeholder ||= begin
+      p = Card["#{Card[:navbox].name}+*placeholder"] and p.raw_content
+    end
+    input_args[:placeholder] = @@placeholder if @@placeholder
+    
+    content_tag :div, :class=>'form-group' do
+      text_field_tag :_keyword, '', input_args
+    end
+  end
+  
+  view :navbar_left do |args|
+    _render_core args.merge(:navbar_class=>'navbar-form navbar-left')
+  end
+  
+  view :navbar_right do |args|
+    _render_core args.merge(:navbar_class=>'navbar-form navbar-right')
+  end
+  
+  view :core do |args|
+    tag_args = { :method=>'get', :role=>'search', :class=>"nodblclick navbox-form #{args[:navbar_class]}"}
+    form_tag Card.path_setting('/:search'), tag_args do
+      _render_raw args
+    end
+
+  end
+  
+end
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/navbox.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,12 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module Now; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/now.rb ~~~~~~~~~~~
+
+view :raw do |args|
+  Time.now.strftime '%A, %B %d, %Y %I:%M %p %Z'
+end
+
+view :core, :raw
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/now.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,98 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Self; module PerformanceLog; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/performance_log.rb ~~~~~~~~~~~
+def log_dir
+  dir = File.join File.dirname(Wagn.paths['log'].existent.first), 'performance'
+  Dir.mkdir dir unless Dir.exists? dir
+  dir
+end
+
+def log_path item
+  File.join log_dir, "#{item.gsub('/','_').gsub(/[^0-9A-Za-z.\-]/, '_')}.log"
+end
+
+def csv_path
+  File.join log_dir, "#{Card[:performance_log].codename}.csv"
+end
+
+def add_log_entry request, html_log
+  time = DateTime.now.utc.strftime "%Y%m%d%H%M%S"
+  name = "%s+%s %s" % [Card[:performance_log].name, time, request.gsub('/','/') ]
+  if Card.fetch name
+    name += 'a'
+    while Card.fetch name
+      name.next!
+    end
+  end
+
+  Card::Auth.as_bot do
+    File.open(Card[:performance_log].log_path(name), 'w') {|f| f.puts html_log}
+    Card[:performance_log].add_item! name
+  end
+end
+
+def add_csv_entry page, wbench_data, runs
+  if !File.exists? csv_path
+    File.open(csv_path, 'w') { |f| f.puts "page,render time, dom loading time, connection time"}
+  end
+  browser = wbench_data.browser
+  runs.times do |i|
+    csv_data = [
+      page,
+      browser['responseEnd'][i] - browser['requestStart'][i],
+      browser['domComplete'][i] - browser['domLoading'][i], # domLoadingTime
+      browser['requestStart'][i],  # domLoadingStart
+    ]
+    csv_line = CSV.generate_line(csv_data)
+    File.open(csv_path, 'a') { |f| f.puts csv_line }
+  end
+end
+
+format :html do
+  view :core do |args|
+    wagn_data =
+      card.item_names.map do |item|
+        path = card.log_path item
+        if File.exists? path
+          File.read(path)
+        end
+      end.compact.join "\n"
+    browser_data = CSV.parse(File.read(card.csv_path))
+    output [
+      table(browser_data, true),
+      wagn_data
+    ]
+  end
+
+  def table data, with_header=false
+    thead = if with_header
+              content_tag :thead do
+                content_tag :tr do
+                  data.shift.map do |item|
+                    content_tag :th, item
+                  end.join "\n"
+                end
+              end
+            end
+    tbody = content_tag :tbody do
+              data.map do |row|
+                content_tag :tr do
+                  row.map do |item|
+                    content_tag :td, item
+                  end.join "\n"
+                end
+              end.join "\n"
+            end
+
+    %{
+      <table class="table">
+        #{thead}
+        #{tbody}
+      </table>
+    }
+  end
+end
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/self/performance_log.rb ~~~~~~~~~~~
+end;end;end;end;

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

@@ -0,0 +1,54 @@
+# -*- 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;