wagn 1.12.13 → 1.13.0.pre

data/mods/standard/sets/self/navbox.rb

@@ -1,4 +1,3 @@
-# -*- encoding : utf-8 -*-
 
 format :html do
 

data/mods/standard/sets/self/now.rb

@@ -1,4 +1,3 @@
-# -*- encoding : utf-8 -*-
 
 view :raw do |args|
   Time.now.strftime '%A, %B %d, %Y %I:%M %p %Z'

data/mods/standard/sets/self/recent.rb

@@ -3,43 +3,46 @@ view :title do |args|
    _final_title args.merge( :title=>'Recent Changes' )
 end
 
-view :card_list do |args|
-  search_vars[:item] ||= :change
+format :html do
 
-  cards_by_day = Hash.new { |h, day| h[day] = [] }
-  search_vars[:results].each do |card|
-    begin
-      stamp = card.updated_at
-      day = Date.new(stamp.year, stamp.month, stamp.day)
-    rescue Exception=>e
-      day = Date.today
-      card.content = "(error getting date)"
+  view :card_list do |args|
+    search_vars[:item] ||= :change
+
+    cards_by_day = Hash.new { |h, day| h[day] = [] }
+    search_vars[:results].each do |card|
+      begin
+        stamp = card.updated_at
+        day = Date.new(stamp.year, stamp.month, stamp.day)
+      rescue Exception=>e
+        day = Date.today
+        card.content = "(error getting date)"
+      end
+      cards_by_day[day] << card
     end
-    cards_by_day[day] << card
-  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] }">
-                    #{ process_inclusion(card, :view=>search_vars[:item]) }
-                  </div>
-                 }
-               end * ' '
-            }
-          </div>
-        }
-      end * "\n"
+    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 }
     }
-    #{ paging }
-  }
-end
+  end
 
+end

data/mods/standard/sets/self/script_card_menu.rb

@@ -0,0 +1,8 @@
+
+view :raw do |args|
+  File.read "#{Wagn.gem_root}/mods/standard/lib/javascript/wagn_menu.js"
+end
+
+view :editor do |args|
+  "Content is stored in file and can't be edited."
+end

data/mods/standard/sets/self/script_html5shiv_printshiv.rb

@@ -0,0 +1,7 @@
+view :raw do |args|
+  File.read "#{Wagn.gem_root}/mods/standard/lib/javascript/html5shiv-printshiv.js"
+end
+
+view :editor do |args|
+  "Content is stored in file and can't be edited."
+end

data/mods/standard/sets/self/script_jquery.rb

@@ -0,0 +1,8 @@
+
+view :raw do |args|
+  File.read "#{Wagn.gem_root}/mods/standard/lib/javascript/jquery.js"
+end
+
+view :editor do |args|
+  "Content is stored in file and can't be edited."
+end

data/mods/standard/sets/self/script_jquery_helper.rb

@@ -0,0 +1,13 @@
+
+view :raw do |args|
+  # jquery.ui.all must be after jquery.mobile to override dialog weirdness *
+  # jquery.ui.autocomplete must be after jquery.ui stuff 
+  js_files = %w( jquerymobile.js jquery-ui.js jquery.ui.autocomplete.html.js jquery.autosize.js jquery.fileupload.js jquery.iframe-transport.js jquery_ujs.js )
+  js_files.map do |filename|
+    File.read "#{Wagn.gem_root}/mods/standard/lib/javascript/#{filename}"
+  end.join("\n")
+end
+
+view :editor do |args|
+  "Content is stored in file and can't be edited."
+end

data/mods/standard/sets/self/script_slot.rb

@@ -0,0 +1,9 @@
+view :raw do |args|
+  [ "wagn_mod.js.coffee", "wagn.js.coffee" ].map do |name|
+    File.read "#{Wagn.gem_root}/mods/standard/lib/javascript/#{name}"
+  end.join("\n")
+end
+
+view :editor do |args|
+  "Content is stored in file and can't be edited."
+end

data/mods/standard/sets/self/script_tinymce.rb

@@ -0,0 +1,8 @@
+
+view :raw do |args|
+  File.read "#{Wagn.gem_root}/mods/standard/lib/javascript/tinymce.js"
+end
+
+view :editor do |args|
+  "Content is stored in file and can't be edited."
+end

data/mods/standard/sets/self/search.rb

@@ -1,4 +1,3 @@
-# -*- encoding : utf-8 -*-
 
 format :html do
   

data/mods/standard/sets/self/signin.rb

@@ -0,0 +1,111 @@
+
+format :html do
+
+  view :open do |args|
+    args.merge! :title=>'Sign In', :optional_help=>:show
+    _final_open args
+  end
+
+  view :open_content do |args|
+    # annoying step designed to avoid table of contents.  sigh
+    _render_core( args )
+  end
+  
+  
+  view :core do |args|
+    args[:buttons] = submit_tag 'Sign in'
+    if Card.new(:type_id=>Card::SignupID).ok? :create
+      args[:buttons] += link_to( '...or sign up!', wagn_path("account/signup"))
+    end
+    args[:buttons] += raw("<div style='float:right'>#{ link_to_view 'RESET PASSWORD', :edit }</div>") #FIXME - hardcoded styling
+  
+    account = card.fetch :trait=>:account, :new=>{}
+  
+    form_args = {
+      :hidden => { :success=>'REDIRECT: /' },
+      :recaptcha => :off
+    }
+  
+    with_inclusion_mode :edit do
+      card_form :update, form_args do
+        [
+          Auth.as_bot do
+            subformat(account)._render :content_fieldset, :structure=>true, :items=>{:autocomplete=>'on'}
+          end, 
+          _optional_render( :button_fieldset, args )
+        ].join
+      end
+    end
+  end
+
+  #FORGOT PASSWORD
+  view :edit do |args|
+    args.merge!( {
+      :title=>'Forgot Password',
+      :optional_help=>:hide,
+      :buttons => submit_tag( 'Reset my password' ),
+      :structure => true,      
+      :hidden => { 
+        :reset_password => true,
+        :success => { :view => :reset_password_success }
+      }
+    } )
+    
+    Auth.as_bot { _final_edit args }
+  end
+  
+  view :raw do |args|
+    '{{+*email|title:email;type:Phrase}}'
+  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 = subcards["+#{Card[:email   ].name}"]
+  email &&= email['content']
+  pword = subcards["+#{Card[:password].name}"]
+  pword &&= pword['content']
+
+  abort :failure, 'bad signin args' unless email && pword  
+  
+  if signin_id = Auth.authenticate( email, pword )
+    Auth.signin signin_id
+    abort :success
+  else
+    accted = Auth[ email.strip.downcase ]
+    errors.add :signin, case
+      when accted.nil?             ; "Unrecognized email."
+      when !accted.account.active? ; "Sorry, that account is not active."
+      else                         ; "Wrong password"
+      end
+    abort :failure
+  end  
+end
+
+event :send_reset_password_token, :before=>:signin, :on=>:update, :when=>proc{ |c| Env.params[:reset_password] } do
+  email = subcards["+#{Card[:email].name}"]
+  email &&= email['content']
+  
+  if accted = Auth[ email.strip.downcase ] and accted.account.active?
+    accted.account.send_reset_password_token
+    abort :success    
+  else
+    if accted
+      errors.add :account, 'not active'
+    else
+      errors.add :email, 'not recognized'
+    end
+    abort :failure
+  end
+end
+
+event :signout, :before=>:approve, :on=>:delete do
+  Auth.signin nil
+  abort :success
+end
+
+

data/mods/standard/sets/self/stats.rb

@@ -0,0 +1,91 @@
+
+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', wagn_path( 'update/:all?task=empty_trash' )}</td>
+        </tr>
+        <tr>
+          <td>revisions</td>
+          <td>#{ Card::Revision.count }</td>
+          <td>#{link_to 'delete old', wagn_path( 'update/:all?task=delete_old_revisions' ) }</td>
+        </tr>
+          <tr><td>references</td>
+          <td>#{ Card::Reference.count }</td>
+          <td>#{link_to 'repair all', wagn_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>
+        <tr>
+          <td>memory now</td>
+          <td>#{ newmem }M</td>
+          <td>#{link_to 'clear cache',  wagn_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, wagn_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

data/mods/standard/sets/self/style_functional.rb

@@ -1,4 +1,4 @@
-# -*- encoding : utf-8 -*-
+
 view :raw do |args|
   File.read "#{Wagn.gem_root}/mods/standard/lib/stylesheets/functional.scss"
 end

data/mods/standard/sets/self/style_jquery_ui_smoothness.rb

@@ -1,4 +1,4 @@
-# -*- encoding : utf-8 -*-
+
 view :raw do |args|
   File.read "#{Wagn.gem_root}/mods/standard/lib/stylesheets/jquery-ui-smoothness.css"
 end

data/mods/standard/sets/self/style_standard.rb

@@ -1,4 +1,4 @@
-# -*- encoding : utf-8 -*-
+
 view :raw do |args|
   File.read "#{Wagn.gem_root}/mods/standard/lib/stylesheets/standard.scss"
 end

data/mods/standard/sets/type/basic.rb

@@ -1,30 +1,31 @@
-# -*- encoding : utf-8 -*-
 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
+  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|
-      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
+      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
-      %{<a name="#{item[:uri]}"></a>#{match}}
     end
 
     if toc.flatten.length >= min

data/mods/standard/sets/type/cardtype.rb

@@ -1,4 +1,3 @@
-# -*- encoding : utf-8 -*-
 
 format :html do
 
@@ -30,12 +29,12 @@ format :html do
   end
 end
 
-include Card::Set::Type::Basic
+include Basic
 
 
 
 def cards_of_type_exist?
-  !new_card? and Account.as_bot { Card.count_by_wql :type_id=>id } > 0
+  !new_card? and Auth.as_bot { Card.count_by_wql :type_id=>id } > 0
 end
 
 event :check_for_cards_of_type, :after=>:validate_delete do