class ActiveLdap::Association::Collection

def <<(*entries)
  add_entries(*entries)
end

def add_entries(*entries)
  result = true
  load_target
  flatten_deeper(entries).each do |entry|
    entry = normalize_entry(entry)
    unless @owner.new_entry?
      infect_connection(entry)
      result &&= insert_entry(entry)
    end
    @target << entry
  end
  result && self
end

def delete(*entries)
  entries = flatten_deeper(entries).reject do |entry|
    @target.delete(entry) if entry.new_entry?
    entry.new_entry?
  end
  return if entries.empty?
  delete_entries(entries)
  entries.each do |entry|
    @target.delete(entry)
  end
end

def dn_values_to_string_values(values)
  values.collect do |value|
    if value.is_a?(DN)
      value.to_s
    else
      value
    end
  end
end

def each(&block)
  to_ary.each(&block)
end

def exists?
  load_target
  not @target.empty?
end

def flatten_deeper(array)
  array.collect do |element|
    element.respond_to?(:flatten) ? element.flatten : element
  end.flatten
end

def insert_entry(entry)
  entry[@options[:foreign_key_name]] = @owner[@options[:local_key_name]]
  entry.save
end

def normalize_entry(entry)
  entry
end

def replace(others)
  load_target
  entry = @target.first
  if entry.nil?
    deleted_entries = []
    added_entries = others
  else
    base_class = entry.class
    others = others.collect do |other|
      other = base_class.find(other) unless other.is_a?(base_class)
      other
    end
    deleted_entries = @target - others
    added_entries = others - @target
  end
  delete(deleted_entries)
  concat(added_entries)
end

def reset
  @target = []
  @loaded = false
end

def to_ary
  load_target
  @target.to_ary
end