module Sprockets::URIUtils

def build_asset_uri(path, params = {})
  join_file_uri("file", nil, path, encode_uri_query_params(params))
end

def build_file_digest_uri(path)
  join_file_uri('file-digest'.freeze, nil, path, nil)
end

def encode_uri_query_params(params)
  query = []
  params.each do |key, value|
    case value
    when Integer
      query << "#{key}=#{value}"
    when String, Symbol
      query << "#{key}=#{URI::Generic::DEFAULT_PARSER.escape(value.to_s)}"
    when TrueClass
      query << "#{key}"
    when FalseClass, NilClass
    else
      raise TypeError, "unexpected type: #{value.class}"
    end
  end
  "#{query.join('&')}" if query.any?
end

def join_file_uri(scheme, host, path, query)
  str = "#{scheme}://"
  str << host if host
  path = "/#{path}" unless path.start_with?("/")
  str << URI::Generic::DEFAULT_PARSER.escape(path)
  str << "?#{query}" if query
  str
end

def join_uri(scheme, userinfo, host, port, registry, path, opaque, query, fragment)
  URI::Generic.new(scheme, userinfo, host, port, registry, path, opaque, query, fragment).to_s
end

def parse_asset_uri(uri)
  scheme, _, path, query = split_file_uri(uri)
  unless scheme == 'file'
    raise URI::InvalidURIError, "expected file:// scheme: #{uri}"
  end
  return path, parse_uri_query_params(query)
end

def parse_file_digest_uri(uri)
  scheme, _, path, _ = split_file_uri(uri)
  unless scheme == 'file-digest'.freeze
    raise URI::InvalidURIError, "expected file-digest scheme: #{uri}"
  end
  path
end

def parse_uri_query_params(query)
  query.to_s.split('&').reduce({}) do |h, p|
    k, v = p.split('=', 2)
    v = URI::Generic::DEFAULT_PARSER.unescape(v) if v
    h[k.to_sym] = v || true
    h
  end
end

def split_file_uri(uri)
  scheme, _, host, _, _, path, _, query, _ = URI.split(uri)
  path = URI::Generic::DEFAULT_PARSER.unescape(path)
  path.force_encoding(Encoding::UTF_8)
  # Hack for parsing Windows "file:///C:/Users/IEUser" paths
  path.gsub!(/^\/([a-zA-Z]:)/, '\1'.freeze)
  [scheme, host, path, query]
end

def split_uri(uri)
  URI.split(uri)
end

def valid_asset_uri?(str)
  # Quick prefix check before attempting a full parse
  str.start_with?("file://") && parse_asset_uri(str) ? true : false
rescue URI::InvalidURIError
  false
end