wagn 1.12.7

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

@@ -0,0 +1,17 @@
+# -*- encoding : utf-8 -*-
+
+format :html do
+
+  view :editor, :type=>:plain_text
+  
+  view :core do |args|
+    # FIXME: scan must happen before process for inclusion interactions to work, but this will likely cause
+    # problems with including other css?
+    process_content ::CodeRay.scan( _render_raw, :css ).div, :size=>:icon
+  end
+  
+end
+
+event :reset_style_for_css, :after=>:store do
+  Card::Set::Right::Style.delete_style_files
+end

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

@@ -0,0 +1,9 @@
+# -*- encoding : utf-8 -*-
+
+format :html do
+
+  # what is this for?  Can't you just use TYPE-date and editor to match this cas, no special view needed?
+  view :editor do |args|
+    form.text_field :content, :class=>'date-editor'
+  end
+end

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

@@ -0,0 +1,87 @@
+# -*- encoding : utf-8 -*-
+
+  
+def item_names(args={})  # needed for flexmail attachments.  hacky.
+  [self.cardname]
+end
+
+
+format do
+  view :source do |args|
+    card.attach.url
+  end
+
+  view :core do |args|
+    handle_source args do |source|
+      wagn_url source
+    end
+  end
+
+  def handle_source args
+    source = _render_source args
+    source ? yield( source ) : ''
+  rescue
+    'File Error'
+  end
+end
+
+
+format :file do
+      
+  view :core do |args|                                    # returns send_file args.  not in love with this...
+    if format = card.attachment_format( params[:format] ) # this means we only support known formats.  dislike.
+      if params[:explicit_file] and r = controller.response
+        r.headers["Expires"] = 1.year.from_now.httpdate
+        #r.headers["Cache-Control"] = "public"            # currently using default "private", because proxy servers could block needed permission checks
+      end
+      
+   
+  #      elsif ![format, 'file'].member? params[:format]  # formerly supported redirecting to correct file format 
+  #        return redirect_to( request.fullpath.sub( /\.#{params[:format]}\b/, '.' + format ) ) #card.attach.url(style) )
+
+      style = _render_style :style=>params[:size]         # fixme, shouldn't be in type file
+      [ card.attach.path( *[style].compact ),             # nil or empty arg breaks 1.8.7
+        {
+          :type => card.attach_content_type,
+          :filename =>  "#{card.cardname.url_key}#{style.blank? ? '' : '-'}#{style}.#{format}",
+          :x_sendfile => true,
+          :disposition => (params[:format]=='file' ? 'attachment' : 'inline' )
+        }
+      ]
+    else
+      _render_not_found
+    end
+  end  
+
+end
+
+
+format :html do
+  
+  view :core do |args|
+    handle_source args do |source|
+      "<a href=\"#{source}\">Download #{ showname args[:title] }</a>"
+    end
+  end
+
+  view :editor do |args|
+    #Rails.logger.debug "editor for file #{card.inspect}"
+    out = '<div class="choose-file">'
+    if !card.new_card?
+      out << %{<div class="attachment-preview", :id="#{card.attach_file_name}-preview"> #{_render_core(args)} </div> }
+    end
+    out << %{
+      <div>#{form.file_field :attach, :class=>'file-upload slotter'}</div>
+    </div>
+    <div class="chosen-file" style="display:none">
+      <div><label>File chosen:</label> <span class="chosen-filename"></span></div>
+      <div><a class="cancel-upload">Unchoose</a></div>
+    </div>
+      }
+    out
+  end
+  
+end
+
+
+

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

@@ -0,0 +1,17 @@
+# -*- encoding : utf-8 -*-
+
+view :editor do |args|
+  form.text_area :content, :rows=>5, :class=>'card-content'
+end
+
+view :closed_content do |args|
+  ''
+end
+
+def clean_html?
+  false
+end
+
+def chunk_list
+  :references
+end

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

@@ -0,0 +1,67 @@
+# -*- encoding : utf-8 -*-
+
+include Card::Set::Type::File
+
+view :closed_content do |args|
+  _render_core :size=>:icon
+end
+
+view :source do |args|
+  style = case
+    when @mode==:closed ;  :icon
+    when args[:size]    ;  args[:size]
+    when main?          ;  :large
+    else                ;  :medium
+    end
+  style = :original if style.to_sym == :full
+  card.attach.url style
+end
+
+
+view :core, :type=>:file
+
+
+format :html do
+
+  view :core do |args|
+    handle_source args do |source|
+      source == 'missing' ? "<!-- image missing #{@card.name} -->" : image_tag(source)
+    end
+  end
+
+
+  view :diff do |args|
+    out = ''
+    if @show_diff and @previous_revision
+      card.selected_revision_id=@previous_revision.id
+      out << _render_core
+    end
+    card.selected_revision_id=@revision.id
+    out << _render_core
+    out
+  end
+
+  view :editor, :type=>:file
+
+end
+
+format :css do
+  view :core do |args|
+    render_source
+  end
+  
+  view :content do |args|
+    render_core
+  end
+end
+
+format :file do
+
+  view :style do |args|  #should this be in model?
+    ['', 'full'].member?( args[:style].to_s ) ? :original : args[:style]
+  end
+    
+  view :core, :type=>:file
+
+end
+

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

@@ -0,0 +1,11 @@
+# -*- encoding : utf-8 -*-
+include Card::Set::Type::Html
+
+view :editor, :type=>:html
+view :closed_content, :type=>:html
+
+view :core do |args|
+  with_inclusion_mode :template do
+    process_content ::CodeRay.scan( _render_raw, :html ).div
+  end
+end

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

@@ -0,0 +1,20 @@
+# -*- encoding : utf-8 -*-
+
+view :editor do |args|
+  form.text_field :content, :class=>'card-content'
+end
+
+event :validate_number, :after=>:approve do
+  errors.add :content, "'#{content}' is not numeric" unless valid_number?( content )
+end
+
+def valid_number?( string )
+  valid = true
+  begin
+    Kernel.Float( string )
+  rescue ArgumentError, TypeError
+    valid = false
+  end
+  valid
+end
+

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

@@ -0,0 +1,3 @@
+view :editor do |args|
+  form.text_field :content, :class=>'card-content'
+end

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

@@ -0,0 +1,10 @@
+format :html do
+
+  view :editor do |args|
+    form.text_area :content, :rows=>5, :class=>'card-content'
+  end
+  
+  view :core do |args|
+    process_content_object( CGI.escapeHTML _render_raw )
+  end
+end

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

@@ -0,0 +1,219 @@
+# -*- encoding : utf-8 -*-
+
+format do
+  def wrap_item item, args={}
+    item #no wrap in base    
+  end
+  
+  view :core do |args|
+    pointer_items args[:item], joint=', '
+  end
+  
+  def pointer_items itemview=nil, joint=' '
+    args = { :view => ( itemview || (@inclusion_opts && @inclusion_opts[:view]) || default_item_view ) }
+    
+    if type = card.item_type
+      args[:type] = type
+    end
+      
+    card.item_cards.map do |icard|
+      wrap_item process_inclusion(icard, args.clone), args 
+    end.join joint
+  end
+
+end
+
+format :html do
+
+  view :core do |args|
+    %{<div class="pointer-list">#{ pointer_items args[:item], args[:joint] }</div>}
+  end
+
+  view :closed_content do |args|
+    args[:item] = (args[:item] || inclusion_defaults[:view])=='name' ? 'name' : 'link'
+    args[:joint] ||= ', '
+    _render_core args
+  end
+
+  view :editor do |args|
+    part_view = (c = card.rule(:input)) ? c.gsub(/[\[\]]/,'') : :list
+    form.hidden_field( :content, :class=>'card-content') +
+    raw(_render(part_view))
+  end
+
+  view :list do |args| #this is a permission view.  should it go with them?
+    args ||= {}
+    items = args[:item_list] || card.item_names(:context=>:raw)
+    items = [''] if items.empty?
+    options_card_name = (oc = card.options_card) ? oc.cardname.url_key : ':all'
+
+    extra_css_class = args[:extra_css_class] || 'pointer-list-ul'
+
+    %{<ul class="pointer-list-editor #{extra_css_class}" options-card="#{options_card_name}"> } +
+    items.map do |item|
+      %{<li class="pointer-li"> } +
+        text_field_tag( 'pointer_item', item, :class=>'pointer-item-text', :id=>'asdfsd' ) +
+        link_to( '', '#', :class=>'pointer-item-delete ui-icon ui-icon-circle-close' ) +
+      '</li>'
+    end.join("\n") +
+    %{</ul><div class="add-another-div">#{link_to 'Add another','#', :class=>'pointer-item-add'}</div>}
+
+  end
+
+  view :checkbox do |args|
+    options = card.options.map do |option|
+      checked = card.item_names.include?(option.name)
+      id = "pointer-checkbox-#{option.cardname.key}"
+      description = pointer_option_description option
+      %{
+        <div class="pointer-checkbox">
+          #{ check_box_tag "pointer_checkbox", option.name, checked, :id=>id, :class=>'pointer-checkbox-button' }
+          <label for="#{id}">#{option.name}</label>
+          #{ %{<div class="checkbox-option-description">#{ description }</div>} if description }
+        </div>
+      }
+    end.join "\n"
+
+    %{<div class="pointer-checkbox-list">#{options}</div>}
+  end
+
+  view :multiselect do |args|
+    options = options_from_collection_for_select(card.options,:name,:name,card.item_names)
+    select_tag("pointer_multiselect", options, :multiple=>true, :class=>'pointer-multiselect')
+  end
+
+  view :radio do |args|
+    input_name = "pointer_radio_button-#{card.key}"
+    options = card.options.map do |option|
+      checked = (option.name==card.item_names.first)
+      id = "pointer-radio-#{option.cardname.key}"
+      description = pointer_option_description option
+      %{ 
+        <div class="pointer-radio">
+        #{ radio_button_tag input_name, option.name, checked, :id=>id, :class=>'pointer-radio-button' }
+        <label for="#{id}">#{ option.name }</label>
+        #{ %{<div class="radio-option-description">#{ description }</div>} if description }
+        </div>
+      }
+    end.join("\n")
+
+    %{<div class="pointer-radio-list">#{options}</div>}
+  end
+
+  view :select do |args|
+    options = [["-- Select --",""]] + card.options.map{|x| [x.name,x.name]}
+    select_tag("pointer_select", options_for_select(options, card.item_names.first), :class=>'pointer-select')
+  end
+  
+  def pointer_option_description option
+    pod_name = card.rule(:options_label) || 'description'
+    dcard = Card[ "#{option.name}+#{pod_name}" ]
+    if dcard and dcard.ok? :read
+      subformat(dcard).render_core
+    end
+  end
+  
+
+  
+  def wrap_item item, args
+    %{<div class="pointer-item item-#{args[:view]}">#{item}</div>}
+  end
+  
+end
+
+
+
+def item_cards args={}
+  if args[:complete]
+    #warn "item_card[#{args.inspect}], :complete"
+    Card::Query.new({:referred_to_by=>name}.merge(args)).run
+  else
+    #warn "item_card[#{inspect}], :complete"
+    item_names(args).map do |name|
+      new_args = args[:type] ? { :type=>args[:type] } : {}
+      Card.fetch name, :new=>new_args
+    end.compact # compact?  can't be nil, right?
+  end
+end
+
+def item_names args={}
+  context = args[:context] || self.cardname
+  self.raw_content.split(/\n+/).map do |line|
+    item_name = line.gsub /\[\[|\]\]/, ''
+    if context == :raw
+      item_name
+    else
+      item_name.to_name.to_absolute context
+    end
+  end
+end
+
+def item_ids args={}
+  item_names(args).map do |name|
+    Card.fetch_id name
+  end.compact
+end
+
+def item_type
+  opt = options_card
+  if !opt or opt==self #fixme, need better recursion prevention
+    nil
+  else
+    opt.item_type
+  end
+end
+
+def items= array
+  self.content=''
+  array.each { |i| self << i }
+  save!
+end
+
+def << item
+  newname = case item
+    when Card     ;  item.name
+    when Integer  ;  c = Card[item] and c.name
+    else             item
+    end
+  add_item newname
+end
+
+def add_item newname
+  inames = item_names
+  unless inames.include? newname
+    self.content="[[#{(inames << newname).reject(&:blank?)*"]]\n[["}]]"
+  end
+end
+
+def drop_item name
+  inames = item_names
+  if inames.include? name
+    inames = inames.reject{|n|n==name}
+    self.content= inames.empty? ? '' : "[[#{inames * "]]\n[["}]]"
+  end
+end
+
+def options_card
+  self.rule_card :options
+end
+
+def options
+  if oc = options_card
+    oc.item_cards :default_limit=>50, :context=>name
+  else
+    Card.search :sort=>'alpha', :limit=>50
+  end
+end
+
+
+format :css do
+  view :content do |args|
+    %(#{major_comment "STYLE GROUP: \"#{card.name}\"", '='}#{ _render_core })
+  end    
+  
+  view :core do |args|
+    card.item_cards.map do |item|
+      process_inclusion item, :view=>(params[:item] || :content)
+    end.join "\n\n"
+  end
+end