module ActionView::Helpers::FormTagHelper

def check_box_tag(name, value = "1", checked = false, options = {})
  html_options = { "type" => "checkbox", "name" => name, "id" => sanitize_to_id(name), "value" => value }.update(options.stringify_keys)
  html_options["checked"] = "checked" if checked
  tag :input, html_options
end

def extra_tags_for_form(html_options)
  case method = html_options.delete("method").to_s
    when /^get$/i # must be case-insentive, but can't use downcase as might be nil
      html_options["method"] = "get"
      ''
    when /^post$/i, "", nil
      html_options["method"] = "post"
      protect_against_forgery? ? content_tag(:div, token_tag, :style => 'margin:0;padding:0') : ''
    else
      html_options["method"] = "post"
      content_tag(:div, tag(:input, :type => "hidden", :name => "_method", :value => method) + token_tag, :style => 'margin:0;padding:0')
  end
end

def field_set_tag(legend = nil, options = nil, &block)
  content = capture(&block)
  concat(tag(:fieldset, options, true))
  concat(content_tag(:legend, legend)) unless legend.blank?
  concat(content)
  concat("</fieldset>")
end

def file_field_tag(name, options = {})
  text_field_tag(name, nil, options.update("type" => "file"))
end

def form_tag(url_for_options = {}, options = {}, *parameters_for_url, &block)
  html_options = html_options_for_form(url_for_options, options, *parameters_for_url)
  if block_given?
    form_tag_in_block(html_options, &block)
  else
    form_tag_html(html_options)
  end
end

def form_tag_html(html_options)
  extra_tags = extra_tags_for_form(html_options)
  tag(:form, html_options, true) + extra_tags
end

def form_tag_in_block(html_options, &block)
  content = capture(&block)
  concat(form_tag_html(html_options))
  concat(content)
  concat("</form>")
end

def hidden_field_tag(name, value = nil, options = {})
  text_field_tag(name, value, options.stringify_keys.update("type" => "hidden"))
end

def html_options_for_form(url_for_options, options, *parameters_for_url)
  returning options.stringify_keys do |html_options|
    html_options["enctype"] = "multipart/form-data" if html_options.delete("multipart")
    html_options["action"]  = url_for(url_for_options, *parameters_for_url)
  end
end

def image_submit_tag(source, options = {})
  options.stringify_keys!
  if confirm = options.delete("confirm")
    options["onclick"] ||= ''
    options["onclick"] += "return #{confirm_javascript_function(confirm)};"
  end
  tag :input, { "type" => "image", "src" => path_to_image(source) }.update(options.stringify_keys)
end

def label_tag(name, text = nil, options = {})
  content_tag :label, text || name.to_s.humanize, { "for" => sanitize_to_id(name) }.update(options.stringify_keys)
end

def password_field_tag(name = "password", value = nil, options = {})
  text_field_tag(name, value, options.update("type" => "password"))
end

def radio_button_tag(name, value, checked = false, options = {})
  pretty_tag_value = value.to_s.gsub(/\s/, "_").gsub(/(?!-)\W/, "").downcase
  pretty_name = name.to_s.gsub(/\[/, "_").gsub(/\]/, "")
  html_options = { "type" => "radio", "name" => name, "id" => "#{pretty_name}_#{pretty_tag_value}", "value" => value }.update(options.stringify_keys)
  html_options["checked"] = "checked" if checked
  tag :input, html_options
end

def sanitize_to_id(name)
  name.to_s.gsub(']','').gsub(/[^-a-zA-Z0-9:.]/, "_")
end

def select_tag(name, option_tags = nil, options = {})
  html_name = (options[:multiple] == true && !name.to_s.ends_with?("[]")) ? "#{name}[]" : name
  content_tag :select, option_tags, { "name" => html_name, "id" => sanitize_to_id(name) }.update(options.stringify_keys)
end

def submit_tag(value = "Save changes", options = {})
  options.stringify_keys!
  if disable_with = options.delete("disable_with")
    disable_with = "this.value='#{disable_with}'"
    disable_with << ";#{options.delete('onclick')}" if options['onclick']
    
    options["onclick"]  = "if (window.hiddenCommit) { window.hiddenCommit.setAttribute('value', this.value); }"
    options["onclick"] << "else { hiddenCommit = this.cloneNode(false);hiddenCommit.setAttribute('type', 'hidden');this.form.appendChild(hiddenCommit); }"
    options["onclick"] << "this.setAttribute('originalValue', this.value);this.disabled = true;#{disable_with};"
    options["onclick"] << "result = (this.form.onsubmit ? (this.form.onsubmit() ? this.form.submit() : false) : this.form.submit());"
    options["onclick"] << "if (result == false) { this.value = this.getAttribute('originalValue');this.disabled = false; }return result;"
  end
  if confirm = options.delete("confirm")
    options["onclick"] ||= 'return true;'
    options["onclick"] = "if (!#{confirm_javascript_function(confirm)}) return false; #{options['onclick']}"
  end
  tag :input, { "type" => "submit", "name" => "commit", "value" => value }.update(options.stringify_keys)
end

def text_area_tag(name, content = nil, options = {})
  options.stringify_keys!
  if size = options.delete("size")
    options["cols"], options["rows"] = size.split("x") if size.respond_to?(:split)
  end
  content_tag :textarea, content, { "name" => name, "id" => name }.update(options.stringify_keys)
end

def text_field_tag(name, value = nil, options = {})
  tag :input, { "type" => "text", "name" => name, "id" => sanitize_to_id(name), "value" => value }.update(options.stringify_keys)
end

def token_tag
  unless protect_against_forgery?
    ''
  else
    tag(:input, :type => "hidden", :name => request_forgery_protection_token.to_s, :value => form_authenticity_token)
  end
end