module GraphQL::Subscriptions::Serialize

def dump(obj)
  JSON.generate(dump_value(obj), quirks_mode: true)
end

def dump_recursive(obj)
  case
  when obj.is_a?(Array)
    obj.map { |i| dump_recursive(i) }.join(':')
  when obj.is_a?(Hash)
    obj.map { |k, v| "#{dump_recursive(k)}:#{dump_recursive(v)}" }.join(":")
  when obj.is_a?(GraphQL::Schema::InputObject)
    dump_recursive(obj.to_h)
  when obj.respond_to?(:to_gid_param)
    obj.to_gid_param
  when obj.respond_to?(:to_param)
    obj.to_param
  else
    obj.to_s
  end
end

def dump_value(obj)
  if obj.is_a?(Array)
    obj.map{|item| dump_value(item)}
  elsif obj.is_a?(Hash)
    symbol_keys = nil
    dumped_h = {}
    obj.each do |k, v|
      dumped_h[k.to_s] = dump_value(v)
      if k.is_a?(Symbol)
        symbol_keys ||= Set.new
        symbol_keys << k.to_s
      end
    end
    if symbol_keys
      dumped_h[SYMBOL_KEYS_KEY] = symbol_keys.to_a
    end
    dumped_h
  elsif obj.is_a?(Symbol)
    { SYMBOL_KEY => obj.to_s }
  elsif obj.respond_to?(:to_gid_param)
    {GLOBALID_KEY => obj.to_gid_param}
  else
    obj
  end
end

def load(str)
  parsed_obj = JSON.parse(str)
  load_value(parsed_obj)
end

def load_value(value)
  if value.is_a?(Array)
    value.map{|item| load_value(item)}
  elsif value.is_a?(Hash)
    if value.size == 1 && value.key?(GLOBALID_KEY)
      GlobalID::Locator.locate(value[GLOBALID_KEY])
    elsif value.size == 1 && value.key?(SYMBOL_KEY)
      value[SYMBOL_KEY].to_sym
    else
      loaded_h = {}
      sym_keys = value.fetch(SYMBOL_KEYS_KEY, [])
      value.each do |k, v|
        if k == SYMBOL_KEYS_KEY
          next
        end
        if sym_keys.include?(k)
          k = k.to_sym
        end
        loaded_h[k] = load_value(v)
      end
      loaded_h
    end
  else
    value
  end
end