card 1.16.1 → 1.16.2

data/tmpsets/set/mod007-05_standard/type/file.rb

@@ -0,0 +1,103 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Type; module File; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/file.rb ~~~~~~~~~~~
+include Abstract::Attachment
+
+set_specific_attributes :file, :remote_file_url
+mount_uploader :file, FileUploader
+
+format do
+  view :source do |args|
+    card.attachment.url
+  end
+
+  view :core do |args|
+    handle_source args do |source|
+      card_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.attachment.url(style) )
+
+      file = selected_file_version
+      [ file.path,
+        {
+          :type => file.content_type,
+          :filename =>  "#{card.cardname.safe_key}.#{file.extension}",
+          :x_sendfile => true,
+          :disposition => (params[:format]=='file' ? 'attachment' : 'inline' )
+        }
+      ]
+    else
+      _render_not_found
+    end
+  end
+
+  def selected_file_version
+    card.attachment
+  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}"
+    file_chooser args
+  end
+
+  def file_chooser args, db_column=:file
+    preview =
+      if !card.new_card?
+        content_tag :div, _render_core(args).html_safe,
+          :class=>'attachment-preview', :id=>"#{card.attachment.filename}-preview"
+      end
+
+    <<-HTML
+      <div class="choose-file">
+        #{preview}
+        <div>#{file_field db_column, :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>
+    HTML
+  end
+
+end
+
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/file.rb ~~~~~~~~~~~
+end;end;end;end;

data/tmpsets/set/mod007-05_standard/type/image.rb

@@ -0,0 +1,89 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Type; module Image; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/image.rb ~~~~~~~~~~~
+include Abstract::Attachment
+set_specific_attributes :image, :remote_image_url
+mount_uploader :image, ImageUploader
+
+
+format do
+
+  include File::Format
+
+  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].to_sym
+      when main?          ;  :large
+      else                ;  :medium
+      end
+    style = :original if style.to_sym == :full
+    if style == :original
+      card.image.url
+    else
+      card.image.versions[style].url
+    end
+  end
+
+end
+
+format :html do
+  include File::HtmlFormat
+
+
+  view :editor do |args|
+    file_chooser args, :image
+  end
+
+
+  view :core do |args|
+    handle_source args do |source|
+      source == 'missing' ? "<!-- image missing #{@card.name} -->" : image_tag(source)
+    end
+  end
+
+
+  view :content_changes do |args|
+    out = ''
+    size = args[:diff_type]==:summary ? :icon : :medium
+    if !args[:hide_diff] and args[:action] and last_change = card.last_change_on(:db_content,:before=>args[:action])
+      card.selected_action_id=last_change.card_action_id
+      out << Card::Diff.render_added_chunk(_render_core(:size=>size))
+    end
+    card.selected_action_id=args[:action].id
+    out <<  Card::Diff.render_deleted_chunk(_render_core(:size=>size))
+    out
+  end
+
+end
+
+format :css do
+  view :core do |args|
+    render_source
+  end
+
+  view :content do |args|  #why is this necessary?
+    render_core
+  end
+end
+
+format :file do
+  include File::FileFormat
+
+  view :style do |args|  #should this be in model?
+    ['', 'full'].member?( args[:style].to_s ) ? :original : args[:style]
+  end
+
+  def selected_file_version
+    style = _render_style(:style=>params[:size]).to_sym
+    (style && style != :original) ? card.attachment.versions[style] : card.attachment
+  end
+end
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/image.rb ~~~~~~~~~~~
+end;end;end;end;

data/tmpsets/set/mod007-05_standard/type/layout_type.rb

@@ -0,0 +1,21 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Type; module LayoutType; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/layout_type.rb ~~~~~~~~~~~
+# -*- encoding : utf-8 -*-
+include Html
+
+format do
+  include Html::Format
+end
+
+format :html do
+  include Html::HtmlFormat
+
+  view :core do |args|
+    with_inclusion_mode :template do
+      process_content ::CodeRay.scan( _render_raw, :html ).div
+    end
+  end
+end
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/layout_type.rb ~~~~~~~~~~~
+end;end;end;end;

data/tmpsets/set/mod007-05_standard/type/number.rb

@@ -0,0 +1,25 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Type; module Number; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/number.rb ~~~~~~~~~~~
+
+view :editor do |args|
+  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
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/number.rb ~~~~~~~~~~~
+end;end;end;end;

data/tmpsets/set/mod007-05_standard/type/phrase.rb

@@ -0,0 +1,9 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Type; module Phrase; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/phrase.rb ~~~~~~~~~~~
+view :editor do |args|
+  text_field :content, :class=>'card-content'
+end
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/phrase.rb ~~~~~~~~~~~
+end;end;end;end;

data/tmpsets/set/mod007-05_standard/type/search_type.rb

@@ -0,0 +1,291 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; module Type; module SearchType; extend Card::Set # ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/search_type.rb ~~~~~~~~~~~
+
+
+def item_cards params={}
+  s = query(params)
+  raise("OH NO.. no limit") unless s[:limit]
+  # forces explicit limiting
+  # can be 0 or less to force no limit
+  Card.search( s )
+end
+
+def item_names params={}
+  Card.search(query(params.merge(:return=>:name)))
+end
+
+def item_type
+  query[:type]
+end
+
+def count params={}
+  Card.count_by_wql query( params )
+end
+
+def query params={}
+  @query ||= {}
+  @query[params.to_s] ||= get_query(params.clone)
+end
+
+def get_query params={}
+  query = Auth.as_bot do ## why is this a wagn_bot thing?  can't deny search content??
+    query_content = params.delete(:query) || raw_content
+    #warn "get_query #{name}, #{query_content}, #{params.inspect}"
+    raise("Error in card '#{self.name}':can't run search with empty content") if query_content.empty?
+    String === query_content ? JSON.parse( query_content ) : query_content
+  end
+  query.symbolize_keys!.merge! params.symbolize_keys
+  if default_limit = query.delete(:default_limit) and !query[:limit]
+    query[:limit] = default_limit
+  end
+  query[:context] ||= (cardname.junction? ? cardname.left_name : cardname)
+  query
+end
+
+
+
+
+format do
+
+  view :core do |args|
+    search_vars args
+
+    case
+    when e = search_vars[:error]
+      %{#{e.class.to_s} :: #{e.message} :: #{card.raw_content}}
+    when search_vars[:query][:return] =='count'
+      search_results.to_s
+    when @mode == :template
+      render :raw
+    else
+      _render_card_list args
+    end
+  end
+
+  view :card_list do |args|
+    if search_results.empty?
+      'no results'
+    else
+      search_results.map do |c|
+        nest c
+      end.join "\n"
+    end
+  end
+
+  def search_vars args={}
+    @search_vars ||=
+      begin
+        v = {}
+        v[:query] = card.query(search_params)
+        v[:item]  = set_inclusion_opts args.merge( :query_view=>v[:query][:view] )
+        v
+      rescue =>e
+        { :error => e }
+      end
+  end
+
+  def search_results
+    @search_results ||=
+      begin
+        card.item_cards search_params
+      rescue => e
+        { :error => e}
+      end
+  end
+
+  def search_result_names
+    @search_result_names ||=
+      begin
+        card.item_names search_params
+      rescue => e
+        { :error => e}
+      end
+  end
+
+  def each_reference_with_args args={}
+    search_result_names.each do |name|
+      yield(name, nest_args(args.reverse_merge!(:item=>:content)))
+    end
+  end
+
+  def set_inclusion_opts args
+    @inclusion_defaults = nil
+    @inclusion_opts ||= {}
+    @inclusion_opts[:view] = args[:item] || inclusion_opts[:view] || args[:query_view] || default_item_view
+    # explicit > inclusion syntax > WQL > inclusion defaults
+  end
+
+
+
+  def page_link text, page, current=false, options={}
+    @paging_path_args[:offset] = page * @paging_limit
+    options.merge!(:class=>'card-paging-link slotter', :remote => true)
+    link_to raw(text), path(@paging_path_args), options
+  end
+
+  def page_li text, page, current=false, options={}
+    css_class = if current
+                  'active'
+                elsif !page
+                  'disabled'
+                end
+    page ||= 0
+    content_tag :li, :class=>css_class do
+      page_link text, page, current, options
+    end
+  end
+
+  def previous_page_link page
+    page_li '<span aria-hidden="true">&laquo;</span>', page, false, 'aria-label'=>"Previous"
+  end
+
+  def next_page_link page
+    page_li '<span aria-hidden="true">&raquo;</span>', page, false, 'aria-label'=>"Next"
+  end
+
+  def ellipse_page
+    content_tag :li, content_tag(:span, '...')
+  end
+
+  def chunk_list
+    :query
+  end
+end
+
+
+format :data do
+
+  view :card_list do |args|
+    search_results.map do |c|
+      nest c
+    end
+  end
+end
+
+format :csv do
+  view :card_list do |args|
+    items = super args
+    if @depth == 0
+      render_csv_title_row + items
+    else
+      items
+    end
+  end
+end
+
+format :json do
+  def default_search_params
+    set_default_search_params :default_limit => 0
+  end
+end
+
+format :rss do
+  def raw_feed_items
+    search_params.merge!(:default_limit => 25)
+    search_results
+  end
+end
+
+format :html do
+
+  view :card_list do |args|
+    paging = _optional_render :paging, args
+
+    if search_results.empty?
+      render_no_search_results(args)
+    else
+      results =
+        search_results.map do |c|
+          item_view = inclusion_defaults(c)[:view]
+          %{
+            <div class="search-result-item item-#{ item_view }">
+              #{nest(c, :size=>args[:size], :view=>item_view)}
+            </div>
+          }
+        end.join "\n"
+
+      %{
+        #{ paging }
+        <div class="search-result-list">
+          #{ results }
+        </div>
+        #{ paging if search_results.length > 10 }
+      }
+    end
+  end
+
+
+  view :closed_content do |args|
+    if @depth > self.class.max_depth
+      "..."
+    else
+      search_limit = args[:closed_search_limit]
+      search_params[:limit] = search_limit && search_limit < Card.config.closed_search_limit ?
+                                search_limit : Card.config.closed_search_limit
+      _render_core args.merge( :hide=>'paging', :item=>:link )
+      # TODO: if item is queryified to be "name", then that should work.  otherwise use link
+    end
+  end
+
+  view :editor, :mod=>Html::HtmlFormat
+
+  view :no_search_results do |args|
+    %{<div class="search-no-results"></div>}
+  end
+
+  view :paging do |args|
+    s = card.query search_params
+    offset, limit = s[:offset].to_i, s[:limit].to_i
+    return '' if limit < 1
+    return '' if offset==0 && limit > offset + search_results.length #avoid query if we know there aren't enough results to warrant paging
+    total = card.count search_params
+    return '' if limit >= total # should only happen if limit exactly equals the total
+
+    @paging_path_args = { :limit => limit, :item=> inclusion_defaults(card)[:view] }
+    @paging_limit = limit
+
+    s[:vars].each { |key, value| @paging_path_args["_#{key}"] = value }
+
+    out = ['<nav><ul class="pagination paging">' ]
+
+    total_pages  = ((total-1) / limit).to_i
+    current_page = ( offset   / limit).to_i # should already be integer
+    window = 2 # should be configurable
+    window_min = current_page - window
+    window_max = current_page + window
+
+    previous_page = current_page > 0 ? current_page - 1 : false
+    out << previous_page_link(previous_page)
+    if window_min > 0
+      out << page_li( 1, 0 )
+      out << ellipse_page if window_min > 1
+    end
+
+    (window_min .. window_max).each do |page|
+      next if page < 0 or page > total_pages
+      text = page + 1
+      out << page_li( text, page, page==current_page )
+    end
+
+    if total_pages > window_max
+      out << ellipse_page if total_pages > window_max + 1
+      out << page_li( total_pages + 1, total_pages )
+    end
+
+    next_page = current_page < total_pages ? current_page + 1 : false
+    out << next_page_link(next_page)
+
+    out << %{</ul></nav>}
+    out.join
+  end
+
+  def default_search_params
+    set_default_search_params :default_limit=>20
+  end
+
+end
+
+
+
+# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_standard/set/type/search_type.rb ~~~~~~~~~~~
+end;end;end;end;