card 0.0.1 → 1.15.pre

data/mod/05_standard/set/self/account_links.rb

@@ -0,0 +1,61 @@
+
+format :html do
+
+  def account_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|
+    content_tag :span, :id=>'logging' do
+      account_links(args).join ' '
+    end
+  end
+  
+  view :list do |args|
+    content_tag :ul, :class=>args[:class] do
+      account_links(args).map do |al|
+        content_tag :li, al
+      end.join "\n"
+    end
+  end
+  
+  view :navbar_right do |args|
+    render_list args.merge(:class=>"nav navbar-nav navbar-right")
+  end
+  
+  view :navbar_left do |args|
+    render_list args.merge(:class=>"nav navbar-nav navbar-left")
+  end
+end

data/mod/05_standard/set/self/alerts.rb

@@ -0,0 +1,5 @@
+
+view :raw do |args|
+  '<!-- *alerts is deprecated. please remove from layout -->'
+end
+view :core, :raw

data/mod/05_standard/set/self/all.rb

@@ -0,0 +1,21 @@
+
+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
+      when :repair_references     ;  Card::Reference.repair_all
+      when :empty_trash           ;  Card.empty_trash
+      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

data/mod/05_standard/set/self/foot.rb

@@ -0,0 +1,8 @@
+
+format :html do
+  view :raw do |args|
+    '<!-- *foot is deprecated. please remove from layout -->'
+  end
+
+  view :core, :raw
+end

data/mod/05_standard/set/self/head.rb

@@ -0,0 +1,121 @@
+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=>:icon }" />}
+        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
+
+

data/mod/05_standard/set/self/navbox.rb

@@ -0,0 +1,20 @@
+
+format :html do
+
+  view :raw do |args|
+    input_args = { :class=>'navbox' }
+    @@placeholder ||= begin
+      p = Card["#{Card[:navbox].name}+*placeholder"] and p.raw_content
+    end
+    
+    input_args[:placeholder] = @@placeholder if @@placeholder
+
+    %{
+      <form action="#{Card.path_setting '/:search'}" method="get" class="navbox-form nodblclick">
+        #{ text_field_tag :_keyword, '', input_args }
+     </form>
+    }
+  end
+
+  view :core, :raw
+end

data/mod/05_standard/set/self/now.rb

@@ -0,0 +1,6 @@
+
+view :raw do |args|
+  Time.now.strftime '%A, %B %d, %Y %I:%M %p %Z'
+end
+
+view :core, :raw

data/mod/05_standard/set/self/recent.rb

@@ -0,0 +1,48 @@
+
+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_vars[: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
+    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

data/mod/05_standard/set/self/search.rb

@@ -0,0 +1,43 @@
+
+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 |args|
+    term = params['_keyword']
+    if term =~ /^\+/ && main = params['main']
+      term = main+term
+    end
+
+    exact = Card.fetch term, :new=>{}
+    goto_cards = Card.search goto_wql(term)
+    goto_cards.unshift exact.name if exact.known? && !goto_cards.map{|n| n.to_name.key}.include?(exact.key) 
+
+    {
+      :search => true, # card.ok?( :read ),
+      :add    => (exact.new_card? && exact.cardname.valid? && !exact.virtual? && exact.ok?( :create ) && exact.name),
+      :new    => (exact.type_id==Card::CardtypeID &&
+                  Card.new(:type_id=>exact.type_id).ok?(:create) &&
+                  [exact.name, exact.cardname.url_key]
+                 ),
+      :goto   => goto_cards.map { |name| [name, highlight(name, term), name.to_name.url_key] }
+    }
+  
+  end
+  
+  #hacky.  here for override
+  def goto_wql(term)
+   { :complete=>term, :limit=>8, :sort=>'name', :return=>'name' }
+  end
+  
+end

data/mod/05_standard/set/self/signin.rb

@@ -0,0 +1,121 @@
+
+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'
+    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 }</div>") #FIXME - hardcoded styling
+    args
+  end
+  
+  view :core do |args|
+    account = card.fetch :trait=>:account, :new=>{}
+  
+    form_args = {
+      :hidden => { :success=>"REDIRECT: #{interrupted_action || '*previous'}" },
+      :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 => button_tag( 'Reset my password' ),
+      :structure => true,      
+      :hidden => { 
+        :reset_password => true,
+        :success => { :view => :reset_password_success }
+      }
+    } )
+    
+    Auth.as_bot { super 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
+
+