#--
# Copyright (c) 2012+ Damjan Rems
#
# Permission is hereby granted, free of charge, to any person obtaining
# a copy of this software and associated documentation files (the
# "Software"), to deal in the Software without restriction, including
# without limitation the rights to use, copy, modify, merge, publish,
# distribute, sublicense, and/or sell copies of the Software, and to
# permit persons to whom the Software is furnished to do so, subject to
# the following conditions:
#
# The above copyright notice and this permission notice shall be
# included in all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#++
module DrgcmsFormFields

###########################################################################
# Implementation of multitext_autocomplete DRG CMS form field.
# 
# multitext_autocomplete field is complex data entry field which uses autocomplete
# function when selecting multiple values for MongoDB Array field. Array typically holds
# id's of selected documents and control typically displays value of the field name 
# defined by search options.
# 
# ===Form options:
# * +name:+ field name (required)
# * +type:+ multitext_autocomplete (required)
# * +table+ Collection (table) name. When defined search must contain field name
# * +search:+ Search may consist of three parameters from which are separated either by dot (.) or comma(,)
#   * search_field_name; when table option is defined search must define field name which will be used for search query
#   * collection_name.search_field_name; Same as above except that table options must be ommited.
#   * collection_name.search_field_name.method_name; When searching is more complex custom search
#   method may be defined in CollectionName model which will provide result set for search.
#      
# Form example:
#      90:
#        name: kats
#        type: multitext_autocomplete
#        search: dc_category.name      
#        html:
#          size: 30
###########################################################################
class MultitextAutocomplete < DrgcmsField

###########################################################################
# Returns value for readonly field
###########################################################################
def ro_standard(table, search)
  result = ''
  table = table.classify.constantize
  return self if @record[@yaml['name']].nil?
# when field name and method are defined together
  search = search.split('.').first if search.match('.')
  @record[@yaml['name']].each do |element|
    result << table.find(element)[search] + '<br>'
  end
  super(result)
end

###########################################################################
# Render multitext_autocomplete field html code
###########################################################################
def render 
# search field name
  if @yaml['search'].class == Hash
    table    = @yaml['search']['table']
    field_name = @yaml['search']['field']
    method   = @yaml['search']['method']
    search = method.nil? ? field_name : "#{field_name}.#{method}"
  elsif @yaml['search'].to_s.match(/\./)
    table, field_name, method = @yaml['search'].split(/\.|\,/) 
    search = method.nil? ? field_name : "#{field_name}.#{method}"
  else # search and table name are separated
    search = field_name = @yaml['search']
  end
# determine table name 
  if @yaml['table']
    table = if @yaml['table'].class == String
      @yaml['table']
# eval(how_to_get_my_table_name)    
    elsif @yaml['table']['eval']
      eval @yaml['table']['eval']
    else
      p "Field #{@yaml['name']}: Invalid table parameter!"
      nil
    end
  end
  unless (table and search)
    @html << 'Table or search field not defined!' 
    return self
  end
# 
  #return ro_standard(table, search) if @readonly
# TODO check if table exists    
  collection = table.classify.constantize
  unless @record.respond_to?(@yaml['name'])
    @html << "Invalid field name: #{@yaml['name']}" 
    return self
  end
# put field to enter search data on form
  @yaml['html'] ||= {}
  @yaml['html']['value'] = ''   # must be. Otherwise it will look into record and return error
  @yaml['html']['placeholder'] = t('drgcms.search_placeholder')
  _name = '_' + @yaml['name']
  @html << '<div class="ui-autocomplete-border">'
  @html << @parent.link_to(@parent.fa_icon('plus-square lg', class: 'dc-animate dc-green'), '#',onclick: 'return false;') # dummy add. But it is usefull.

  record = record_text_for(@yaml['name'])
  # text field for autocomplete
  @html << ' ' << @parent.text_field(record, _name, @yaml['html'])
  # div to list active selections
  @html << "<div id =\"#{record}#{@yaml['name']}\">"
# find value for each field inside categories 
  unless @record[@yaml['name']].nil?
    @record[@yaml['name']].each do |element|
# this is quick and dirty trick. We have model dc_big_table which can be used for retrive 
# more complicated options
# TODO retrieve choices from big_table
      rec = if table == 'dc_big_table'
        collection.find(@yaml['name'], @parent.session)
      else
        collection.find(element)
      end
# Related data is missing. It happends.
      @html << if rec
        link  = @parent.link_to(@parent.fa_icon('remove lg', class: 'dc-animate dc-red'), '#',
                onclick: "$('##{rec.id}').hide(); var v = $('##{record}_#{@yaml['name']}_#{rec.id}'); v.val(\"-\" + v.val());return false;")
        link  = @parent.fa_icon('check lg', class: 'dc-green') if @readonly      
        field = @parent.hidden_field(record, "#{@yaml['name']}_#{rec.id}", value: element)
        "<div id=\"#{rec.id}\" style=\"padding:4px;\">#{link} #{rec.send(field_name)}<br>#{field}</div>"
      else
        '** error **'
      end
    end
  end
  @html << "</div></div>"
# Create text for div to be added when new category is selected  
  link    = @parent.link_to(@parent.fa_icon('remove lg', class: 'dc-animate dc-red'), '#', 
            onclick: "$('#rec_id').hide(); var v = $('##{record}_#{@yaml['name']}_rec_id'); v.val(\"-\" + v.val());return false;")
  field   = @parent.hidden_field(record, "#{@yaml['name']}_rec_id", value: 'rec_id')
  one_div = "<div id=\"rec_id\" style=\"padding:4px;\">#{link} rec_search<br>#{field}</div>"
    
# JS stuff    
  @js << <<EOJS
$(document).ready(function() {
  $("##{record}_#{_name}").autocomplete( {
    source: function(request, response) {
      $.ajax({
        url: "#{ @parent.url_for( controller: 'dc_common', action: 'autocomplete' )}",
        type: "POST",
        dataType: "json",
        data: { input: request.term, table: "#{table}", search: "#{search}" #{(',id: "'+@yaml['id'] + '"') if @yaml['id']} },
        success: function(data) {
          response( $.map( data, function(key) {
            return key;
          }));
        }
      });
    },
    change: function (event, ui) { 
      var div = '#{one_div}';
      div = div.replace(/rec_id/g, ui.item.id)
      div = div.replace('rec_search', ui.item.value)
      $("##{record}#{@yaml['name']}").append(div);
      $("##{record}_#{_name}").val('');
      $("##{record}_#{_name}").focus();
    },
    minLength: 2
  });
});
EOJS

  self 
end

###########################################################################
# Class method for retrieving data from multitext_autocomplete form field.
###########################################################################
def self.get_data(params, name)
  r = []
  params['record'].each do |k,v| 
# if it starts with - then it was removed
    r << BSON::ObjectId.from_string(v) if k.match("#{name}_") and v[0,1] != '-'
  end
  r.uniq!
  r
end

end
end