wagn 1.14.9 → 1.15.pre

data/mod/05_standard/set/right/email.rb

@@ -1,52 +0,0 @@
-#event :
-include All::Permissions::Accounts
-
-view :raw do |args|
-  case
-  when card.real?          ; card.content
-  when card.left.account   ; card.left.account.email #this supports legacy behavior (should be moved to User+*email+*type plus right)
-  else ''
-  end
-end
-
-view :core, :raw
-
-event :validate_email, :after=>:approve, :on=>:save do
-  if content.present? && content !~ /^([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,})$/i
-    errors.add :content, 'must be valid address'
-  end
-end
-
-event :validate_unique_email, :after=>:validate_email, :on=>:save do
-  if content.present?
-    Auth.as_bot do
-      wql = { :right_id=>Card::EmailID, :eq=>content }
-      wql[:not] = { :id => id } if id
-      if Card.search( wql ).first
-        errors.add :content, 'must be unique'
-      end
-    end
-  end
-end
-
-event :downcase_email, :before=>:approve, :on=>:save do
-  if content and content != content.downcase
-    self.content = content.downcase
-  end
-end
-
-def email_required?
-  !built_in?
-end
-
-def ok_to_read
-  if is_own_account? or Auth.always_ok?
-    true
-  else
-    deny_because "viewing email is restricted to administrators and account holders"
-  end
-end
-
-def is_own_account?
-  cardname.parts[0].to_name.key == Auth.as_card.cardname.key
-end

data/mod/05_standard/set/right/password.rb

@@ -1,39 +0,0 @@
-
-include All::Permissions::Accounts
-
-view :editor do |args|
-  card.content = ''
-  autocomplete = (@parent && @parent.card.name=='*signin+*account') ? 'on' : 'off' #hack
-  form.password_field :content, :class=>'card-content', :autocomplete=>autocomplete
-end
-
-view :raw do |args|
-  '<em>encrypted</em>'
-end
-
-event :encrypt_password, :on=>:save, :after=>:process_subcards do
-  salt = (left && left.salt)
-  unless salt.present? or salt = Card::Env[:salt] # hack - fix with better ORM handling
-    #errors.add :password, 'need a valid salt'
-    # turns out we have a lot of existing account without a salt.  not sure when that broke??
-  end
-  if db_content_changed?
-    unless Card::Env[:no_password_encryptions] # hack for import - fix with api for ignoring events
-      self.content = Auth.encrypt content, salt
-    end
-  end
-end
-
-event :validate_password, :on=>:save, :before=>:approve do
-  unless content.length > 3
-    errors.add :password, 'must be at least 4 characters'
-  end
-end
-
-event :validate_password_present, :on=>:update, :before=>:approve do
-  abort :success if content.blank?
-end
-
-def ok_to_read
-  is_own_account? ? true : super
-end

data/mod/05_standard/set/right/salt.rb

@@ -1,5 +0,0 @@
-include All::Permissions::Accounts
-
-view :raw do |args|
-  "Private data"
-end

data/mod/05_standard/set/right/stats.rb

@@ -1,35 +0,0 @@
-
-view :core do |args|
-  if subject = card.left
-  
-    frame args do
-      cache_card = Card.fetch(subject.key)
-      db_card    = Card.find_by_key(subject.key)
-    
-      table = if cache_card && db_card
-        %{<table class="show-cache">
-            <tr><th>Field</th><th>Cache Val</th><th>Database Val</th></tr>
-            #{
-              [ :name, :updated_at, :updater_id, :content ].map do |field|
-                %{<tr>#{ [ field, cache_card.send(field), db_card.send(field) ].map() { |cell| "<td>#{cell}</td>"}.join }</tr>}
-              end.join
-            }
-          </table>
-        }
-      end
-  
-      %{
-        <h1>Cache/DB Comparison</h1>
-        #{ table }
-      
-        <h1>Cached Card Inspect</h1>
-        #{ h cache_card.inspect }
-
-        <h1>Database Card Inspect</h1>
-        #{ h db_card.inspect }
-       }
-    end
-    
-  end
-end
-

data/mod/05_standard/set/right/status.rb

@@ -1,9 +0,0 @@
-include All::Permissions::Accounts
-
-def ok_to_update
-  if is_own_account? && !Auth.always_ok?
-    deny_because you_cant('change the status of your own account')
-  else
-    super
-  end 
-end

data/mod/05_standard/set/right/token.rb

@@ -1,5 +0,0 @@
-include All::Permissions::Accounts
-
-view :raw do |args|
-  "Private data"
-end

data/mod/05_standard/set/right/when_created.rb

@@ -1,5 +0,0 @@
-view :raw do |args|
-  card.left.new_card? ? '' : card.left.created_at.strftime('%A, %B %d, %Y %I:%M %p %Z')
-end
-
-view :core, :raw

data/mod/05_standard/set/right/when_last_edited.rb

@@ -1,5 +0,0 @@
-view :raw do |args|
-  card.left.new_card? ? '' : card.left.updated_at.strftime('%A, %B %d, %Y %I:%M %p %Z')
-end
-
-view :core, :raw

data/mod/05_standard/set/rstar/rules.rb

@@ -1,251 +0,0 @@
-format :html do
-
-  view :closed_rule, :tags=>:unknown_ok do |args|
-    return 'not a rule' if !card.is_rule? #these are helpful for handling non-rule rstar cards until we have real rule sets
-      
-    rule_card = card.new_card? ? find_current_rule_card[0] : card
-
-    rule_content = !rule_card ? '' : begin
-      subformat(rule_card)._render_closed_content :set_context=>card.cardname.trunk_name
-    end
-
-    cells = [
-      ["rule-setting",
-        link_to( card.cardname.tag.sub(/^\*/,''), path(:view=>:open_rule),
-          :class => 'edit-rule-link slotter', :remote => true, :rel=>'nofollow' )
-      ],
-      ["rule-content",
-        %{<div class="rule-content-container">
-           <span class="closed-content content">#{rule_content}</span>
-         </div> } ],
-      ["rule-set", (rule_card ? rule_card.trunk.label : '') ],
-    ]
-
-    extra_css_class = rule_card && !rule_card.new_card? ? 'known-rule' : 'missing-rule'
-
-    %{<tr class="card-slot closed-rule">} +
-    cells.map do |css_class, content|
-      %{<td class="rule-cell #{css_class} #{extra_css_class}">#{content}</td>}
-    end.join("\n") +
-    '</tr>'
-  end
-
-
-
-  view :open_rule, :tags=>:unknown_ok do |args|
-    return 'not a rule' if !card.is_rule?
-    
-    current_rule, prototype = find_current_rule_card
-    setting_name = card.cardname.tag
-    current_rule ||= Card.new :name=> "*all+#{setting_name}" #FIXME use codename
-    set_selected = false
-    edit_mode = !params[:success] && card.ok?( ( card.new_card? ? :create : :update ) )
-
-    #~~~~~~ handle reloading due to type change
-    if params[:type_reload] && card_args=params[:card]
-      if card_args[:name] && card_args[:name].to_name.key != current_rule.key
-        current_rule = Card.new card_args
-      else
-        current_rule = current_rule.refresh
-        current_rule.assign_attributes card_args
-        current_rule.include_set_modules
-      end
-      set_selected = card_args[:name].to_name.left
-      edit_mode = true
-    end
-
-    
-    opts = {
-      :open_rule    => card,
-      :setting_name => setting_name,
-      :set_context  => card.cardname.trunk_name
-    }
-    rule_view = edit_mode ? :edit_rule : :show_rule
-    
-    
-    
-    if edit_mode
-      opts.merge!( {
-        :fallback_set    => false,
-        :current_set_key => (current_rule.new_card? ? nil : current_rule.cardname.trunk_name.key),
-        :set_selected    => set_selected
-      } )
-      
-      #~~~~~~~~~~ determine the set options to which the user can apply the rule.
-
-      set_options = prototype.set_names.reverse
-      first = (csk=opts[:current_set_key]) ? set_options.index{|s| s.to_name.key == csk} : 0
-      if first > 0
-        set_options[0..(first-1)].reverse.each do |set_name|
-          opts[:fallback_set] = set_name if Card.exists?("#{set_name}+#{opts[:setting_name]}")
-        end
-      end
-      last = set_options.index{|s| s.to_name.key == card.cardname.trunk_name.key} || -1
-      # note, the -1 can happen with virtual cards because the self set doesn't show up in the set_names.  FIXME!!
-      opts[:set_options] = set_options[first..last]
-
-
-      # The broadest set should always be the currently applied rule
-      # (for anything more general, they must explicitly choose to "DELETE" the current one)
-      # the narrowest rule should be the one attached to the set being viewed.  So, eg, if you're looking at the "*all plus" set, you shouldn't
-      # have the option to create rules based on arbitrary narrower sets, though narrower sets will always apply to whatever prototype we create
-    end
-
-    %{
-      
-      <tr class="card-slot open-rule #{rule_view.to_s.sub '_', '-'}">
-        <td class="rule-cell" colspan="3">
-          <div class="rule-setting">
-            #{ view_link setting_name.sub(/^\*/,''), :closed_rule, :class=>'close-rule-link slotter' }
-            #{ card_link setting_name, :text=>"all rules", :class=>'setting-link', :target=>'wagn_setting' }
-          </div>
-          
-          <div class="instruction rule-instruction">
-            #{ process_content "{{#{setting_name}+*right+*help}}" }
-          </div>
-          
-          <div class="card-body">
-            #{ subformat( current_rule )._render rule_view, opts }
-          </div>
-        </td>
-      </tr>
-    }
-
-  end
-  
-  view :show_rule, :tags=>:unknown_ok do |args|
-    return 'not a rule' if !card.is_rule?
-    
-    if !card.new_card?
-      set = card.trunk
-      args[:item] ||= :link
-      %{
-        <div class="rule-set">
-          <label>Applies to</label> #{ card_link set.cardname, :text=>set.label }:
-        </div>
-        #{ _render_core args }
-      }
-    else
-      'No Current Rule'
-    end
-  end
-
-  view :edit_rule, :tags=>:unknown_ok do |args|
-    return 'not a rule' if !card.is_rule?
-
-    setting_name    = args[:setting_name]
-    current_set_key = args[:current_set_key] || Card[:all].name  # (should have a constant for this?)
-    open_rule       = args[:open_rule]
-
-    form_for card, :url=>path(:action=>:update, :no_id=>true), :remote=>true, :html=>
-        {:class=>"card-form card-rule-form slotter" } do |form|
-
-      %{
-        #{ hidden_field_tag 'success[id]', open_rule.name }
-        #{ hidden_field_tag 'success[view]', 'open_rule' }
-        #{ hidden_field_tag 'success[item]', 'view_rule' }
-        
-
-        <div class="card-editor">
-          #{
-            if card.right.rule_type_editable
-              fieldset 'type', type_field(
-                :href         => path(:name=>open_rule.name, :view=>:open_rule, :type_reload=>true),
-                :class        => 'type-field rule-type-field live-type-field',
-                'data-remote' => true
-              ), :editor=>'type'
-            end
-          }
-          
-          #{ fieldset 'content', content_field( form, args.merge(:skip_rev_id=>true) ), :editor=>'content' }
-          
-          #{
-            fieldset 'set', (
-              option_items = args[:set_options].map do |set_name|
-                checked = ( args[:set_selected] == set_name or current_set_key && args[:set_options].length==1 )
-                is_current = set_name.to_name.key == current_set_key
-                %{
-                  <li>
-                    #{ form.radio_button :name, "#{set_name}+#{setting_name}", :checked=> checked }
-                    <span class="set-label" #{'current-set-label' if is_current }>
-                      #{ card_link set_name, :text=> Card.fetch(set_name).label, :target=>'wagn_set' }
-                      #{'<em>(current)</em>' if is_current}
-                    </span>
-                  </li>
-                }
-              end
-              %{ <ul>#{ option_items * "\n" }</ul>}
-            ), :editor => 'set'
-          }          
-        </div>
-        
-        <div class="edit-button-area">
-          #{ 
-            if !card.new_card?
-              b_args = { :remote=>true, :class=>'rule-delete-button slotter', :type=>'button' }
-              b_args[:href] = path :action=>:delete, :success=>{ :id=>open_rule.cardname.url_key, :view=>:open_rule, :item=>:view_rule }
-              if fset = args[:fallback_set]
-                b_args['data-confirm']="Deleting will revert to #{setting_name} rule for #{Card.fetch(fset).label }"
-              end
-              %{<span class="rule-delete-section">#{ button_tag 'Delete', b_args }</span>}
-            end
-           }
-           #{ button_tag 'Submit', :class=>'rule-submit-button' }
-           #{ button_tag 'Cancel', :class=>'rule-cancel-button slotter', :type=>'button',
-                :href=>path( :view=>( card.new_card? ? :closed_rule : :open_rule ), :success=>true ) }
-        </div>
-      }
-    end
-  end
-
-=begin
-  view :edit_rule2 do |args|
-    card_form :update do
-      [
-        _optional_render( :type_fieldset,    args ),
-        _optional_render( :content_fieldset, args ),
-        _optional_render( :set_fieldset,     args ),
-        _optional_render( :button_fieldset,  args )
-      ]
-    end
-  end
-=end
-
-  private
-
-  def find_current_rule_card
-    # self.card is a POTENTIAL rule; it quacks like a rule but may or may not exist.
-    # This generates a prototypical member of the POTENTIAL rule's set
-    # and returns that member's ACTUAL rule for the POTENTIAL rule's setting
-    set_prototype = card.trunk.prototype
-    rule_card = if card.new_card?
-      setting = card.right and set_prototype.rule_card setting.codename   
-    else
-      card
-    end 
-    [ rule_card, set_prototype ]
-  end
-
-end
-
-# 
-
-=begin
-
-def repair_set
-  @set_repair_attempted = true
-  if real?
-    reset_patterns
-    template # repair happens in template loading
-    include_set_modules
-  end
-end
- 
-def method_missing method_id, *args
-  if !@set_repair_attempted and repair_set
-    send method_id, *args
-  else
-    super
-  end
-end
-=end

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

@@ -1,27 +0,0 @@
-
-format :html do
-
-  def account_links
-    #ENGLISH
-    links = []
-    if Auth.signed_in?
-      links << card_link( Auth.current.cardname, :id=>'my-card-link' )
-      if Card.new(:type_id=>Card.default_accounted_type_id).ok? :create
-        # Shouldn't these use the new paths?
-        links << link_to( 'Invite', wagn_path('account/signup'), :id=>'invite-a-friend-link' )
-      end
-      links << link_to( 'Sign out', wagn_path('delete/:signin'), :id=>'signout-link' )
-    else
-      if Card.new(:type_id=>Card::SignupID).ok? :create
-        links << link_to( 'Sign up', wagn_path('account/signup'), :id=>'signup-link' )
-      end
-      links << link_to( 'Sign in', wagn_path(':signin'), :id=>'signin-link' )
-    end
-    links
-  end
-  
-  view :raw do |args|
-    %{<span id="logging">#{ account_links.join ' ' }</span>}
-  end
-
-end

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

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