module EacRubyUtils::SimpleCache

def cache_keys
  @cache_keys ||= {}
end

def call_method_with_cache(method, args, &block)
  raise 'Não é possível realizar o cache de métodos com bloco' if block
  key = ([method] + args).join('@@@')
  unless cache_keys.key?(sanitize_cache_key(key))
    uncached_value = call_uncached_method(method, args)
    cache_keys[sanitize_cache_key(key)] = uncached_value
  end
  cache_keys[sanitize_cache_key(key)]
end

def call_uncached_method(method, args)
  send(uncached_method_name(method), *args)
end

def method_missing(method, *args, &block)
  if respond_to?(uncached_method_name(method), true)
    call_method_with_cache(method, args, &block)
  else
    super
  end
end

def reset_cache(*keys)
  if keys.any?
    keys.each { |key| cache_keys.delete(sanitize_cache_key(key)) }
  else
    @cache_keys = nil
  end
end

def respond_to_missing?(method, include_all = false)
  if method.to_s.end_with?('_uncached')
    super
  else
    respond_to?("#{method}_uncached", true) || super
  end
end

def sanitize_cache_key(key)
  key.to_s.to_sym
end

def uncached_method_name(method_name)
  method_name = method_name.to_s
  end_mark = nil
  if %w[! ?].any? { |mark| method_name.end_with?(mark) }
    end_mark = method_name[-1]
    method_name = method_name[0..-2]
  end
  "#{method_name}#{UNCACHED_METHOD_NAME_SUFFIX}#{end_mark}"
end

def uncached_method_name(original_method_name)
  ::EacRubyUtils::SimpleCache.uncached_method_name(original_method_name)
end