shoponrails/clots

require 'clot/tag_helper'

module Clot
  module AttributeSetter
    def set_primary_attributes(context)
      @id_string = @name_string = resolve_value(@params.shift,context)
      if @params[0] && ! @params[0].match(/:/)
        @value_string = resolve_value(@params.shift,context)
      end
    end

    def personal_attributes(name,value)

    end


    def set_attributes(context)
      set_primary_attributes(context)

      @params.each do |pair|
        pair.match /([^:]*):(.*)/
        pair =  [$1, $2]
        value = resolve_value(pair[1],context)
        if personal_attributes(pair[0], value)
          next
        end

        case pair[0]
          when "value" then
            @value_string = value
          when "type" then
            @type = value
          when "accept" then
            @accept_string = %{accept="#{CGI::unescape value}" }
          when "class" then
            @class_string = %{class="#{value}" }
          when "onchange" then
            @onchange_string = %{onchange="#{value}" }
          when "maxlength" then
            @max_length_string = %{maxlength="#{value}" }
          when "disabled" then
            @disabled_string = %{disabled="#{if (value == true || value == "disabled") then 'disabled' end}" }
        end
      end
    end
  end

  class ClotTag < Liquid::Tag
    Syntax = /([^\s]+)\s+/

    include AttributeSetter
    include TagHelper

    def initialize(tag_name, markup, tokens)
      if markup =~ Syntax
        @form_object = $1
        @attributes = {}
        markup.scan(Liquid::TagAttributes) do |key, value|
          @attributes[key] = value
        end
      else
        syntax_error tag_name, markup, tokens
      end
      super
    end

    def render(context)
      @attributes.each do |key, value|
        @attributes[key] = resolve_value(value, context)
      end

      @form_object = context[@form_object].to_sym if context[@form_object].is_a?(String)
      @form_object = context[@form_object].source if @form_object.nil? && context[@form_object].is_a?(Liquid::Drop)
    end

  end


  class InputTag < ClotTag

    def personal_attributes(name,value)
      case name
        when "size" then
          @size_string = %{size="#{value}" }
        when "width" then
          @size_string = %{width="#{value}" }
      end
    end

    def render_string
      unless @value_string.nil?
        @value_string = CGI::escapeHTML(@value_string.to_s)
        @value_string = %{value="#{@value_string}" }
      end
      %{<input #{@accept_string}#{@disabled_string}#{@class_string}id="#{@id_string}" #{@max_length_string}name="#{@name_string}" #{@size_string}#{@onchange_string}type="#{@type}" #{@value_string}/>}
    end
  end

  class HiddenFieldTag < InputTag

    def render_string
      @type = "hidden"
      super
    end
  end

  class PasswordFieldTag < InputTag

    def render_string
      @type = "password"
      super
    end
  end

  class TextFieldTag < InputTag

    def render_string
      @type ||= "text"
      super
    end
  end

  class FileFieldTag < InputTag

    def render_string
      @type = "file"
      super
    end
  end

  class TextAreaTag < ClotTag
    def personal_attributes(name,value)

      case name
        when "cols" then
          @col_string = %{cols="#{value}" }
        when "rows" then
          @row_string = %{ rows="#{value}"}
        when "size" then
          size_array = value.split /x/
          @col_string = %{cols="#{size_array[0]}" }
          @row_string = %{ rows="#{size_array[1]}"}
      end
    end

    def render_string
      %{<textarea #{@disabled_string}#{@class_string}#{@col_string}id="#{@id_string}" name="#{@name_string}"#{@row_string}>#{@value_string}</textarea>}
    end
  end

  class SubmitTag < ClotTag

    def personal_attributes(name,value)
      case name
        when "name" then
          if value.nil? then @commit_name_string = '' end
        when "disable_with" then
          @onclick_string = %{onclick="this.disabled=true;this.value='#{value}';this.form.submit();" }
      end
    end

    def set_primary_attributes(context)
      @value_string = "Save changes"
      @commit_name_string = 'name="commit" '
      if @params[0] && ! @params[0].match(/:/)
        @value_string = resolve_value @params.shift, context
      end
    end

    def render_string
      %{<input #{@class_string}#{@onclick_string}#{@disabled_string}type="submit" #{@commit_name_string}value="#{@value_string}" />}
    end

  end

  class SelectTag < ClotTag

    def personal_attributes(name,value)
      case name
        when 'multiple' then
          @multiple_string = %{multiple="#{value == "true" ? "multiple" : ""}" }
        when 'prompt' then
          @prompt_option = %{<option value="">#{value}</option>}
      end
    end

    def render_string
      %{<select #{@disabled_string}#{@class_string}id="#{@id_string}" #{@multiple_string}name="#{@name_string}#{unless @multiple_string.nil? then '[]' end}">#{@prompt_option}#{@value_string}</select>}
    end

  end


  class LabelTag < ClotTag
    def render_string
      @value_string ||= @name_string.humanize
      %{<label #{@class_string}for="#{@id_string}">#{@value_string}</label>}
    end

    def personal_attributes(name,value)
      case name
        when 'value' then
          @id_string << "_#{value}"
      end
    end

  end

  class CheckBoxTag < ClotTag
    def personal_attributes(name,value)
      case name
        when 'collection' then
          @checkbox_collection = value
        when 'member' then
          @checkbox_member = value
          if (! @checkbox_collection.nil?) && @checkbox_collection.include?(@checkbox_member)
            @checked_value = %{checked="checked" }
          end
      end
    end


    def set_primary_attributes(context)
      super context
      if @params[0] && ! @params[0].match(/:/)
        checked = resolve_value @params.shift, context
        if checked
          @checked_value = %{checked="checked" }
        end
      end
    end

    def render_string
      @value_string ||= 1
      %{<input #{@disabled_string}#{@class_string}#{@checked_value}id="#{@id_string}" name="#{@name_string}" type="checkbox" value="#{@value_string}" />}
    end
  end


end