class ProconBypassMan::Procon
  require "procon_bypass_man/procon/mode_registry"
  require "procon_bypass_man/procon/macro_registry"
  require "procon_bypass_man/procon/layer_changeable"
  require "procon_bypass_man/procon/button_collection"
  require "procon_bypass_man/procon/pressed_button_helper"
  require "procon_bypass_man/procon/user_operation"
  require "procon_bypass_man/procon/flip_cache"

  attr_accessor :user_operation

  def self.reset_cvar!
    @@status = {
      buttons: {},
      current_layer_key: :up,
      ongoing_macro: MacroRegistry.load(:null),
      ongoing_mode: ModeRegistry.load(:manual),
    }
  end
  def self.reset!; reset_cvar!; end
  reset!

  def initialize(binary)
    self.user_operation = ProconBypassMan::Procon::UserOperation.new(binary.dup)
  end

  def status; @@status[:buttons]; end
  def ongoing_macro; @@status[:ongoing_macro]; end
  def ongoing_mode; @@status[:ongoing_mode]; end
  def current_layer_key; @@status[:current_layer_key]; end

  def current_layer
    ProconBypassMan::Configuration.instance.layers[current_layer_key]
  end

  def apply!
    if user_operation.change_layer?
      @@status[:current_layer_key] = user_operation.next_layer_key if user_operation.pressed_next_layer?
      user_operation.set_no_action!
      return
    end

    if ongoing_macro.finished?
      current_layer.macros.each do |macro_name, options|
        if options[:if_pressed].all? { |b| user_operation.pressed_button?(b) }
          @@status[:ongoing_macro] = MacroRegistry.load(macro_name)
        end
      end
    end

    case current_layer.mode
    when :manual
      @@status[:ongoing_mode] = ModeRegistry.load(:manual)
      current_layer.flip_buttons.each do |button, options|
        if !options[:if_pressed]
          FlipCache.fetch(key: button, expires_in: options[:flip_interval]) do
            status[button] = !status[button]
          end
          next
        end

        if options[:if_pressed] && options[:if_pressed].all? { |b| user_operation.pressed_button?(b) }
          FlipCache.fetch(key: button, expires_in: options[:flip_interval]) do
            status[button] = !status[button]
          end
        else
          FlipCache.fetch(key: button, expires_in: options[:flip_interval]) do
            status[button] = false
          end
        end
      end
    else
      unless ongoing_mode.name == current_layer.mode
        @@status[:ongoing_mode] = ProconBypassMan::Procon::ModeRegistry.load(current_layer.mode)
      end
      if(binary = ongoing_mode.next_binary)
        self.user_operation.merge(target_binary: binary)
      end
      return
    end

    status
  end

  # @return [String<binary>]
  def to_binary
    if ongoing_mode.name != :manual
      return user_operation.binary
    end

    if ongoing_macro.ongoing?
      step = ongoing_macro.next_step or return(user_operation.binary)
      user_operation.press_button_only(step)
      return user_operation.binary
    end

    current_layer.flip_buttons.each do |button, options|
      # 何もしないで常に連打
      if !options[:if_pressed] && status[button]
        user_operation.press_button(button) unless user_operation.pressed_button?(button)
        next
      end

      # 押している時だけ連打
      if options[:if_pressed] && options[:if_pressed].all? { |b| user_operation.pressed_button?(b) }
        if !status[button]
          user_operation.unpress_button(button)
        end
        if options[:force_neutral] && user_operation.pressed_button?(options[:force_neutral])
          button = options[:force_neutral]
          user_operation.unpress_button(button)
        end
      end
    end

    current_layer.remaps.each do |from_button, to_button|
      if user_operation.pressed_button?(from_button)
        user_operation.unpress_button(from_button)
        # TODO 2重でpressしないようにしたい
        user_operation.press_button(to_button) unless user_operation.pressed_button?(to_button)
      end
    end

    user_operation.binary
  end

  private

  def method_missing(name)
    if name.to_s =~ /\Apressed_[a-z]+\?\z/
      user_operation.public_send(name)
    else
      super
    end
  end
end