class Marcel::MimeType

# File lib/marcel/mime_type.rb, line 8
def extend(type, extensions: [], parents: [], magic: nil)
  extensions = (Array(extensions) + Array(Marcel::TYPE_EXTS[type])).uniq
  parents = (Array(parents) + Array(Marcel::TYPE_PARENTS[type])).uniq
  Magic.add(type, extensions: extensions, magic: magic, parents: parents)
end

# File lib/marcel/mime_type.rb, line 29
def for(pathname_or_io = nil, name: nil, extension: nil, declared_type: nil)
  filename_type = for_name(name) || for_extension(extension)
  most_specific_type for_data(pathname_or_io), for_declared_type(declared_type), filename_type, BINARY
end

# File lib/marcel/mime_type.rb, line 36
def for_data(pathname_or_io)
  if pathname_or_io
    with_io(pathname_or_io) do |io|
      if magic = Marcel::Magic.by_magic(io)
        magic.type.downcase
      end
    end
  end
end

# File lib/marcel/mime_type.rb, line 62
def for_declared_type(declared_type)
  type = parse_media_type(declared_type)

  # application/octet-stream is treated as an undeclared/missing type,
  # allowing the type to be inferred from the filename. If there's no
  # filename extension, then the type falls back to binary anyway.
  type unless type == BINARY
end

# File lib/marcel/mime_type.rb, line 54
def for_extension(extension)
  if extension
    if magic = Marcel::Magic.by_extension(extension)
      magic.type.downcase
    end
  end
end

# File lib/marcel/mime_type.rb, line 46
def for_name(name)
  if name
    if magic = Marcel::Magic.by_path(name)
      magic.type.downcase
    end
  end
end

# File lib/marcel/mime_type.rb, line 89
def most_specific_type(*candidates)
  candidates.compact.uniq.reduce do |type, candidate|
    Marcel::Magic.child?(candidate, type) ? candidate : type
  end
end

# File lib/marcel/mime_type.rb, line 79
def parse_media_type(content_type)
  if content_type
    result = content_type.downcase.split(/[;,\s]/, 2).first
    result if result && result.index("/")
  end
end

# File lib/marcel/mime_type.rb, line 71
def with_io(pathname_or_io, &block)
  if defined?(Pathname) && pathname_or_io.is_a?(Pathname)
    pathname_or_io.open(&block)
  else
    yield pathname_or_io
  end
end