module Rubygoo
  class CheckBox < Widget
    attr_accessor :checked
    can_fire :checked
    def initialize(opts={})
      super opts
    end

    def added()
      @checked = false
      @color = theme_property :color
      @bg_color = theme_property :bg_color
      @border_color = theme_property :border_color
      @focus_color = theme_property :focus_color
      @checked_color = theme_property :checked_color

      @rect = Rect.new [@x-@x_pad,@y-@y_pad,@w+2*@x_pad,@h+2*@y_pad]
    end

    def checked?()
      @checked
    end

    def toggle()
      if checked?
        uncheck
      else
        check
      end
    end

    def check()
      @checked = true
      fire :checked, self
    end

    def uncheck()
      @checked = false
      fire :checked, self
    end

    # called when there is a mouse click
    def mouse_up(event)
      toggle
    end

    # called when there is a mouse click at the end of a drag
    def mouse_drag(event)
      toggle
    end

    # called when a key press is sent to us
    def key_pressed(event)
      case event.data[:key]
      when K_SPACE
        toggle
      end
    end

    def draw(adapter)
      x1 = @rect[0]
      y1 = @rect[1]
      x2 = @rect[2] + x1
      y2 = @rect[3] + y1
      if @focussed
        adapter.fill x1, y1, x2, y2, @focus_color
      elsif @bg_color
        adapter.fill x1, y1, x2, y2, @bg_color
      end

      if @checked
        rect = @rect.inflate(-@x_pad,-@y_pad)
        cx1 = rect[0]
        cy1 = rect[1]
        cx2 = rect[2] + x1
        cy2 = rect[3] + y1
        adapter.fill cx1, cy1, cx2, cy2, @checked_color
      end

      if @border_color
        adapter.draw_box x1, y1, x2, y2, @border_color
      end
    end
  end
end