wagn 1.14.4 → 1.14.5

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

@@ -0,0 +1,145 @@
+format :html do
+  ###---( TOP_LEVEL (used by menu) NEW / EDIT VIEWS )
+
+  view :new, :perms=>:create, :tags=>:unknown_ok do |args|
+    frame_and_form :create, args, 'main-success'=>'REDIRECT' do
+      [
+        _optional_render( :name_fieldset,     args ),
+        _optional_render( :type_fieldset,     args ),
+        _optional_render( :content_fieldsets, args ),
+        _optional_render( :button_fieldset,   args )
+      ]
+    end  
+  end
+  
+
+  def default_new_args args    
+    hidden = args[:hidden] ||= {}
+    hidden[:success] ||= card.rule(:thanks) || '_self'
+    hidden[:card   ] ||={}
+    
+    args[:optional_help] ||= :show
+
+    # name field / title
+    if !params[:name_prompt] and !card.cardname.blank?
+      # name is ready and will show up in title
+      hidden[:card][:name] ||= card.name
+    else
+      # name is not ready; need generic title
+      args[:title] ||= "New #{ card.type_name unless card.type_id == Card.default_type_id }" #fixme - overrides nest args
+      unless card.rule_card :autoname
+        # prompt for name
+        hidden[:name_prompt] = true unless hidden.has_key? :name_prompt
+        args[:optional_name_fieldset] ||= :show
+      end
+    end
+    args[:optional_name_fieldset] ||= :hide
+
+    
+    # type field
+    if ( !params[:type] and !args[:type] and 
+        ( main? || card.simple? || card.is_template? ) and
+        Card.new( :type_id=>card.type_id ).ok? :create #otherwise current type won't be on menu
+      )
+      args[:optional_type_fieldset] = :show
+    else
+      hidden[:card][:type_id] ||= card.type_id
+      args[:optional_type_fieldset] = :hide
+    end
+
+
+    cancel = if main?
+      { :class=>'redirecter', :href=>Card.path_setting('/*previous') }
+    else
+      { :class=>'slotter',    :href=>path( :view=>:missing         ) }
+    end
+    
+    args[:buttons] ||= %{
+      #{ button_tag 'Submit', :class=>'create-submit-button', :disable_with=>'Submitting' }
+      #{ button_tag 'Cancel', :type=>'button', :class=>"create-cancel-button #{cancel[:class]}", :href=>cancel[:href] }
+    }
+    
+  end
+
+  
+  view :edit, :perms=>:update, :tags=>:unknown_ok do |args|
+    frame_and_form :update, args do
+      [
+        _optional_render( :content_fieldsets, args ),
+        _optional_render( :button_fieldset,   args )
+      ]
+    end
+  end
+
+  def default_edit_args args
+    args[:optional_help] = :show
+    
+    args[:buttons] = %{
+      #{ button_tag 'Submit', :class=>'submit-button', :disable_with=>'Submitting' }
+      #{ button_tag 'Cancel', :class=>'cancel-button slotter', :href=>path, :type=>'button' }
+    }
+  end
+  
+  view :edit_name, :perms=>:update do |args|
+    frame_and_form( { :action=>:update, :id=>card.id }, args, 'main-success'=>'REDIRECT' ) do
+      [
+        _render_name_fieldset( args ),
+        _optional_render( :confirm_rename, args ),
+        _optional_render( :button_fieldset, args )
+      ]
+    end
+  end
+  
+  view :confirm_rename do |args|
+    referers = args[:referers]
+    dependents = card.dependents
+    wrap args do
+      %{
+        <h1>Are you sure you want to rename <em>#{card.name}</em>?</h1>
+        #{ %{ <h2>This change will...</h2> } if referers.any? || dependents.any? }
+        <ul>
+          #{ %{<li>automatically alter #{ dependents.size } related name(s). } if dependents.any? }
+          #{ %{<li>affect at least #{referers.size} reference(s) to "#{card.name}".} if referers.any? }
+        </ul>
+        #{ %{<p>You may choose to <em>update or ignore</em> the references.</p>} if referers.any? }
+      }
+    end
+  end
+
+  def default_edit_name_args args
+    referers = args[:referers] = card.extended_referencers  
+    args[:hidden] ||= {}
+    args[:hidden].reverse_merge!(
+      :success  => '_self',
+      :old_name => card.name,
+      :referers => referers.size,
+      :card     => { :update_referencers => false }
+    )
+    args[:buttons] = %{
+      #{ button_tag 'Rename and Update', :disable_with=>'Renaming', :class=>'renamer-updater' }
+      #{ button_tag 'Rename',            :disable_with=>'Renaming', :class=>'renamer'         }
+      #{ button_tag 'Cancel', :class=>'slotter', :type=>'button', :href=>path(:view=>:edit, :id=>card.id)}
+    }
+    
+  end
+
+
+  view :edit_type, :perms=>:update do |args|
+    frame_and_form :update, args do
+    #'main-success'=>'REDIRECT: _self', # adding this back in would make main cards redirect on cardtype changes
+      [
+        _render_type_fieldset( args ),
+        optional_render( :button_fieldset, args )
+      ]
+    end
+  end
+
+  def default_edit_type_args args
+    args[:variety] = :edit #YUCK!
+    args[:hidden] ||= { :view=>:edit }
+    args[:buttons] = %{
+      #{ button_tag 'Submit', :disable_with=>'Submitting' }
+      #{ button_tag 'Cancel', :href=>path(:view=>:edit), :type=>'button', :class=>'slotter' }      
+    }    
+  end
+end

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

@@ -0,0 +1,203 @@
+format do
+  view :closed_missing, :perms=>:none do |args| '' end
+  view :missing,        :perms=>:none do |args| '' end
+
+  view :not_found, :perms=>:none, :error_code=>404 do |args|
+    %{ Could not find #{card.name.present? ? %{"#{card.name}"} : 'the card requested'}. }
+  end
+
+  view :server_error, :perms=>:none, :error_code=>500 do |args|
+    %{ Wagn Hitch!  Server Error. Yuck, sorry about that.\n}+
+    %{ To tell us more and follow the fix, add a support ticket at http://wagn.org/new/Support_Ticket }
+  end
+
+  view :denial, :perms=>:none, :error_code=>403 do |args|
+    focal? ? 'Permission Denied' : ''
+  end
+
+  view :bad_address, :perms=>:none, :error_code=>404 do |args|
+    %{ 404: Bad Address }
+  end
+
+  view :too_deep, :perms=>:none do |args|
+    %{ Man, you're too deep.  (Too many levels of inclusions at a time) }
+  end
+
+  view :too_slow, :perms=>:none do |args|
+    %{ Timed out! #{ showname } took too long to load. }
+  end 
+end
+
+
+format :html do
+  def view_for_unknown view, args
+    case
+    when focal? && ok?( :create )   ;  :new
+    when commentable?( view, args ) ;  view
+    else                               super
+    end
+  end
+  
+  def commentable? view, args
+    self.class.tagged view, :comment                                   and 
+    show_view? :comment_box, args.merge( :default_visibility=>:hide )  and #developer or wagneer has overridden default
+    ok? :comment
+  end
+  
+  def rendering_error exception, view
+    %{
+      
+      <span class="render-error">
+        error rendering
+        #{
+          if Auth.always_ok?
+            %{
+              #{ card_link error_cardname, :class=>'render-error-link' }
+              <div class="render-error-message errors-view" style="display:none">
+                <h3>Error message (visible to admin only)</h3>
+                <p><strong>#{ exception.message }</strong></p>
+                <div>
+                  #{exception.backtrace * "<br>\n"}
+                </div>
+              </div>
+            }
+          else
+            error_cardname
+          end
+        }
+        (#{view} view)
+      </span>
+    }
+  end
+
+  def unsupported_view view
+    "<strong>view <em>#{view}</em> not supported for <em>#{error_cardname}</em></strong>"
+  end
+  
+  view :message, :perms=>:none, :tags=>:unknown_ok do |args|
+    frame args do
+      params[:message]
+    end
+  end
+
+
+  view :missing do |args|
+    return '' unless card.ok? :create  # should this be moved into ok_view?
+
+    opts = { :remote=>true, :class=>"slotter missing-#{ args[:denied_view] || args[:home_view]}" }
+
+    wrap args do
+      view_link "Add #{ fancy_title args[:title] }", :new, opts
+    end
+  end
+
+  view :closed_missing, :perms=>:none do |args|
+    %{<span class="faint"> #{ showname } </span>}
+  end
+  
+  
+  
+  view :conflict, :error_code=>409 do |args|
+    # FIXME: hack to get the conflicted update as a proper act for the diff view
+    card.current_act.save
+    action = card.actions.last  # the unsaved action with the new changes
+    action.card_act_id = card.current_act.id
+    action.draft = true
+    action.save
+    card.store_changes  # deletes action if there are no changes 
+
+    # as a consequence card.current_act.actions can be empty when both users made exactly the same changes
+    # but an act is always supposed to have at least one action, so we have to delete the act to avoid bad things
+    card.current_act.reload
+    if card.current_act.actions.empty?
+      card.current_act.delete
+      card.current_act = nil
+    end
+
+    wrap args.merge( :slot_class=>'error-view' ) do  #ENGLISH below
+      %{<strong>Conflict!</strong><span class="new-current-revision-id">#{card.last_action_id}</span>
+        <div>#{ card_link card.last_action.act.actor.cardname } has also been making changes.</div>
+        <div>Please examine below, resolve above, and re-submit.</div>
+        #{ wrap do |args| 
+            if card.current_act
+              _render_act_expanded :act=>card.current_act, :current_rev_nr => 0 
+            else
+              "No difference between your changes and #{card.last_action.act.actor.name}'s version."
+            end 
+          end
+         } 
+      }
+    end
+  end
+  
+  view :errors, :perms=>:none do |args|
+    if card.errors.any?
+      title = %{ Problems #{%{ with #{card.name} } unless card.name.blank?} }
+      frame args.merge( :title=>title ) do
+        card.errors.map do |attrib, msg|
+          msg = "#{attrib.to_s.upcase}: #{msg}" unless attrib == :abort
+          %{ <div class="card-error-msg">#{msg}</div> }
+        end
+      end
+    end
+  end
+
+  view :not_found do |args| #ug.  bad name.
+    sign_in_or_up_links = if !Auth.signed_in?
+      %{<div>
+        #{ card_link ':signin', :text=>'Sign in'    } or
+        #{ link_to 'Sign up', wagn_path('new/:signup') } to create it.
+       </div>}
+    end
+    frame args.merge(:title=>'Not Found', :optional_menu=>:never) do
+      %{
+        <h2>Could not find #{card.name.present? ? "<em>#{card.name}</em>" : 'that'}.</h2>
+        #{sign_in_or_up_links}
+      }
+    end
+  end
+
+  view :denial do |args|
+    to_task = if task = args[:denied_task]
+      %{to #{task} this.}
+    else
+      'to do that.'
+    end
+
+    if !focal?
+      %{<span class="denied"><!-- Sorry, you don't have permission #{to_task} --></span>}
+    else
+      frame args do #ENGLISH below
+        message = case
+        when task != :read && Wagn.config.read_only
+          "We are currently in read-only mode.  Please try again later."
+        when Auth.signed_in?
+          "You need permission #{to_task}"
+        else
+          or_signup = if Card.new(:type_id=>Card::SignupID).ok? :create
+            "or #{ link_to 'sign up', wagn_url('new/:signup') }"
+          end
+          save_interrupted_action(request.env['REQUEST_URI'])
+          "You have to #{ link_to 'sign in', wagn_url(':signin') } #{or_signup} #{to_task}"
+        end
+
+        %{<h1>Sorry!</h1>\n<div>#{ message }</div>}
+      end
+    end
+  end
+
+
+  view :server_error do |args|
+    %{
+    <body>
+      <div class="dialog">
+        <h1>Wagn Hitch :(</h1>
+        <p>Server Error. Yuck, sorry about that.</p>
+        <p><a href="http://www.wagn.org/new/Support_Ticket">Add a support ticket</a>
+            to tell us more and follow the fix.</p>
+      </div>
+    </body>
+    }
+  end
+  
+end

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

@@ -29,14 +29,14 @@ format :html do
     return '' unless watched_card
     
     following = Auth.current.fetch :trait=>:following, :new=>{:type=>:pointer}
-    path_hash = {:card=>following, :action=>:update, :toggle=>toggle, 
+    path_hash = {:name=>following.name, :action=>:update, :toggle=>toggle, 
                  :success=>{:id=>card.name, :view=>:watch} }
     case toggle
     when :off then path_hash[:drop_item] = watched_card.cardname.url_key
     when :on  then path_hash[:add_item]  = watched_card.cardname.url_key
     end
 
-    link_to "#{text}", path(path_hash), 
+    link_to "#{text}", path_hash, 
       {:class=>"watch-toggle watch-toggle-#{toggle} slotter", :title=>title, :remote=>true, :method=>'post'}.merge(extra)
   end
   

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

@@ -0,0 +1,211 @@
+format :html do 
+  def edit_slot args={}
+    #note: @mode should already be :edit here...
+    if args[:structure] || card.structure
+      # multi-card editing
+    
+      if args[:core_edit] #need better name!
+        _render_core args
+      else
+        process_relative_tags args
+      end
+
+    else
+      # single-card edit mode
+      field = content_field form, args
+    
+      if [ args[:optional_type_fieldset], args[:optional_name_fieldset] ].member? :show
+        # display content field in fieldset for consistency with other fields
+        fieldset '', field, :editor=>:content
+      else
+        editor_wrap( :content ) { field }
+      end
+    end
+  end
+  
+  
+  def form_for_multi
+    block = Proc.new {}
+    builder = ActionView::Base.default_form_builder
+    card.name = card.name.gsub(/^#{Regexp.escape(root.card.name)}\+/, '+') if root.card.new_card?  ##FIXME -- need to match other relative inclusions.
+  
+    builder.new("card[subcards][#{card.relative_name}]", card, template, {}, block)
+  end
+
+  def form
+    @form ||= form_for_multi
+  end
+
+  def card_form action, opts={}
+    hidden_args = opts.delete :hidden
+    form_for card, card_form_opts(action, opts) do |form|
+      @form = form
+      %{
+        #{ hidden_tags hidden_args if hidden_args }
+        #{ yield form }
+      }
+    end
+  end
+
+  def card_form_opts action, html={}
+    url, action = case action
+      when Symbol ;  [ path(:action=>action) , action          ]
+      when Hash   ;  [ path(action)          , action[:action] ]
+      when String ;  [ wagn_path(action)     , nil             ] #deprecated
+      else        ;  raise Card::Error, "unsupported card_form action class: #{action.class}"
+      end
+    
+    klasses = Array.wrap( html[:class] )
+    klasses << 'card-form slotter'
+    klasses << 'autosave' if action == :update
+    html[:class] = klasses.join ' '
+  
+    html[:recaptcha] ||= 'on' if card.recaptcha_on?
+    html.delete :recaptcha if html[:recaptcha] == :off
+  
+    { :url=>url, :remote=>true, :html=>html }
+  end
+
+  def editor_wrap type=nil
+    content_tag( :div, :class=>"editor#{ " #{type}-editor" if type }" ) { yield }
+  end
+
+  def fieldset title, content, opts={}
+    if attribs = opts[:attribs]
+      attrib_string = attribs.keys.map do |key| 
+        %{#{key}="#{attribs[key]}"}
+      end * ' '
+    end
+    help_text = case opts[:help]
+      when String ; _render_help :help_text=> opts[:help]
+      when true   ; _render_help
+      else        ; nil
+    end
+    %{
+      <fieldset #{ attrib_string }>
+        <legend>
+          <h2>#{ title }</h2>
+          #{ help_text }
+        </legend>
+        #{ editor_wrap( opts[:editor] ) { content } }
+      </fieldset>
+    }
+  end
+
+  def hidden_tags hash, base=nil
+    # convert hash into a collection of hidden tags
+    result = ''
+    hash ||= {}
+    hash.each do |key, val|
+      result += if Hash === val
+        hidden_tags val, key
+      else
+        name = base ? "#{base}[#{key}]" : key
+        hidden_field_tag name, val
+      end
+    end
+    result
+  end
+  
+  
+  # FIELDSET VIEWS
+
+  view :name_fieldset do |args|
+    fieldset 'name', raw( name_field form ), :editor=>'name', :help=>args[:help]
+  end
+
+  view :type_fieldset do |args|
+    field = if args[:variety] == :edit #FIXME dislike this api -ef
+      type_field :class=>'type-field edit-type-field'
+    else
+      type_field :class=>"type-field live-type-field", :href=>path(:view=>:new), 'data-remote'=>true
+    end
+    fieldset 'type', field, :editor => 'type', :attribs => { :class=>'type-fieldset'}
+  end
+
+
+  view :button_fieldset do |args|
+    %{
+      <fieldset>
+        <div class="button-area">
+          #{ args[:buttons] }
+        </div>
+      </fieldset>
+    }
+  end
+
+  view :content_fieldsets do |args|
+    raw %{
+      <div class="card-editor editor">
+        #{ edit_slot args }
+      </div>
+    }
+  end
+
+
+  def name_field form=nil, options={}
+    form ||= self.form
+    form.text_field( :name, {
+      :value=>card.name, #needed because otherwise gets wrong value if there are updates
+      :autocomplete=>'off'
+    }.merge(options))
+  end
+
+  def type_field args={}
+    typelist = Auth.createable_types
+    current_type = unless args.delete :no_current_type
+        unless card.new_card? || typelist.include?( card.type_name )
+          # current type should be an option on existing cards, regardless of create perms
+          typelist = (typelist << card.type_name).sort
+        end
+        Card[ card ? card.type_id : Card.default_type_id ].name
+      end
+
+    options = options_from_collection_for_select typelist, :to_s, :to_s, current_type
+    template.select_tag 'card[type]', options, args
+  end
+
+  def content_field form, options={}
+    @form = form
+    @nested = options[:nested]
+    card.last_action_id_before_edit = card.last_action_id
+    revision_tracking = if card && !card.new_card? && !options[:skip_rev_id]
+      form.hidden_field :last_action_id_before_edit, :class=>'current_revision_id'
+      #hidden_field_tag 'card[last_action_id_before_edit]', card.last_action_id, :class=>'current_revision_id'
+    end
+    %{
+      #{ revision_tracking 
+       }
+      #{ _render_editor options }
+    }
+  end
+
+
+# FIELD VIEWS
+
+  view :editor do |args|
+    form.text_area :content, :rows=>3, :class=>'tinymce-textarea card-content', :id=>unique_id
+  end
+
+
+  view :edit_in_form, :perms=>:update, :tags=>:unknown_ok do |args|
+    eform = form_for_multi
+    content = content_field eform, args.merge( :nested=>true )
+    opts = { :editor=>'content', :help=>true, :attribs =>
+      { :class=> "card-editor RIGHT-#{ card.cardname.tag_name.safe_key }" }
+    }
+    if card.new_card?
+      content += raw( "\n #{ eform.hidden_field :type_id }" )
+    else
+      opts[:attribs].merge! :card_id=>card.id, :card_name=>(h card.name)
+    end
+  
+    fieldset fancy_title( args[:title] ), content, opts
+  end
+
+  def process_relative_tags args
+    _render_raw(args).scan( /\{\{\s*\+[^\}]*\}\}/ ).map do |inc| #fixme - wrong place for regexp!
+      process_content( inc ).strip
+    end.join
+  end
+end