# backtick_javascript: true

module Browser
  module Delegate
    def [](property)
      method_missing(property)
    end

    def method_missing message, *args, &block
      if message.end_with? '='
        message = message.chop
        property_name = property_for_message(message)
        arg = args[0]
        arg = arg.to_n if `arg && typeof arg.$to_n === 'function'`
        return `self[#{property_name}] = arg`
      else
        property_name = property_for_message(message)
        %x{
          let value = self[#{property_name}];
          let type = typeof(value);
          if (type === 'undefined') { return #{super}; }
          try {
            if (type === 'function') {
              #{args.map! { |arg| `arg && typeof arg.$to_n === 'function'` ? arg.to_n : arg }}
              value = value.apply(self, args);
            }
            if (value instanceof HTMLCollection || value instanceof NodeList) {
              let a = [];
              for(let i=0; i<value.length; i++) {
                a[i] = #{Browser::Element.new(`value.item(i)`)};
              }
              value = a;
            } else if (value instanceof HTMLElement || value instanceof SVGElement) {
              value = #{Browser::Element.new(`value`)};
            } else if (value instanceof Event) {
              value = #{Browser::Event.new(`value`)};
            } else if (value instanceof FileReader) {
              value = #{Browser::FileReader.new(`value`)}
            } else if (value === null || type === 'undefined' || (type === 'number' && isNaN(value))) {
              value = nil;
            }
            return value;
          } catch { return value; }
        }
      end
    end

    def respond_to_missing? message, include_all
      message = message.chop if message.end_with? '='
      property_name = property_for_message(message)
      return true if `#{property_name} in self`
      false
    end

    def property_for_message(message)
      %x{
        let camel_cased_message;
        if (typeof(self[message]) !== 'undefined') { camel_cased_message = message; }
        else { camel_cased_message = #{message.camelize(:lower)} }

        if (camel_cased_message.endsWith('?')) {
          camel_cased_message = camel_cased_message.substring(0, camel_cased_message.length - 2);
          if (typeof(self[camel_cased_message]) === 'undefined') {
            camel_cased_message = 'is' + camel_cased_message[0].toUpperCase() + camel_cased_message.substring(0, camel_cased_message.length - 1);
          }
        }
        return camel_cased_message
      }
    end
  end
end