distraction.party/lib/pleroma/upload.ex

207 lines
5 KiB
Elixir
Raw Normal View History

2017-03-28 23:39:01 +00:00
defmodule Pleroma.Upload do
alias Ecto.UUID
alias Pleroma.Web
2018-03-30 13:01:53 +00:00
2018-04-15 23:37:51 +00:00
def store(%Plug.Upload{} = file, should_dedupe) do
content_type = get_content_type(file.path)
uuid = get_uuid(file, should_dedupe)
name = get_name(file, uuid, content_type, should_dedupe)
upload_folder = get_upload_path(uuid, should_dedupe)
url_path = get_url(name, uuid, should_dedupe)
2017-03-28 23:39:01 +00:00
File.mkdir_p!(upload_folder)
2018-04-15 23:37:51 +00:00
result_file = Path.join(upload_folder, name)
2017-03-28 23:39:01 +00:00
2018-04-15 23:37:51 +00:00
if File.exists?(result_file) do
File.rm!(file.path)
else
File.cp!(file.path, result_file)
end
2017-11-09 12:11:37 +00:00
2018-06-26 22:09:45 +00:00
strip_exif_data(content_type, result_file)
2018-06-26 21:03:23 +00:00
2017-03-28 23:39:01 +00:00
%{
"type" => "Document",
2018-03-30 13:01:53 +00:00
"url" => [
%{
"type" => "Link",
"mediaType" => content_type,
2018-04-15 23:37:51 +00:00
"href" => url_path
2018-03-30 13:01:53 +00:00
}
],
2018-04-15 23:37:51 +00:00
"name" => name
2017-03-28 23:39:01 +00:00
}
end
2018-04-15 23:37:51 +00:00
def store(%{"img" => "data:image/" <> image_data}, should_dedupe) do
2017-04-16 12:23:30 +00:00
parsed = Regex.named_captures(~r/(?<filetype>jpeg|png|gif);base64,(?<data>.*)/, image_data)
2018-04-15 23:37:51 +00:00
data = Base.decode64!(parsed["data"], ignore: :whitespace)
2018-03-30 13:01:53 +00:00
uuid = UUID.generate()
2018-04-15 23:37:51 +00:00
uuidpath = Path.join(upload_path(), uuid)
uuid = UUID.generate()
File.mkdir_p!(upload_path())
2017-04-16 12:23:30 +00:00
2018-04-15 23:37:51 +00:00
File.write!(uuidpath, data)
2017-04-16 12:23:30 +00:00
2018-04-15 23:37:51 +00:00
content_type = get_content_type(uuidpath)
name =
create_name(
String.downcase(Base.encode16(:crypto.hash(:sha256, data))),
parsed["filetype"],
content_type
)
upload_folder = get_upload_path(uuid, should_dedupe)
url_path = get_url(name, uuid, should_dedupe)
File.mkdir_p!(upload_folder)
result_file = Path.join(upload_folder, name)
if should_dedupe do
if !File.exists?(result_file) do
File.rename(uuidpath, result_file)
else
File.rm!(uuidpath)
end
else
File.rename(uuidpath, result_file)
end
2017-04-16 12:23:30 +00:00
2018-06-26 22:09:45 +00:00
strip_exif_data(content_type, result_file)
2018-06-26 21:03:23 +00:00
2017-04-16 12:23:30 +00:00
%{
"type" => "Image",
2018-03-30 13:01:53 +00:00
"url" => [
%{
"type" => "Link",
"mediaType" => content_type,
2018-04-15 23:37:51 +00:00
"href" => url_path
2018-03-30 13:01:53 +00:00
}
],
2018-04-15 23:37:51 +00:00
"name" => name
2017-04-16 12:23:30 +00:00
}
end
2018-06-26 21:03:23 +00:00
def strip_exif_data(content_type, file) do
2018-06-26 20:45:47 +00:00
settings = Application.get_env(:pleroma, Pleroma.Upload)
2018-06-26 21:35:35 +00:00
do_strip = Keyword.fetch!(settings, :strip_exif)
2018-06-26 21:03:23 +00:00
[filetype, ext] = String.split(content_type, "/")
2018-06-26 20:49:57 +00:00
2018-06-26 21:35:35 +00:00
if filetype == "image" and do_strip == true do
2018-06-26 20:49:57 +00:00
Mogrify.open(file) |> Mogrify.custom("strip") |> Mogrify.save(in_place: true)
2018-06-26 20:45:47 +00:00
end
end
def upload_path do
settings = Application.get_env(:pleroma, Pleroma.Upload)
Keyword.fetch!(settings, :uploads)
2017-03-28 23:39:01 +00:00
end
2018-04-15 23:37:51 +00:00
defp create_name(uuid, ext, type) do
case type do
"application/octet-stream" ->
String.downcase(Enum.join([uuid, ext], "."))
"audio/mpeg" ->
String.downcase(Enum.join([uuid, "mp3"], "."))
_ ->
String.downcase(Enum.join([uuid, List.last(String.split(type, "/"))], "."))
2018-04-15 23:37:51 +00:00
end
end
defp get_uuid(file, should_dedupe) do
if should_dedupe do
Base.encode16(:crypto.hash(:sha256, File.read!(file.path)))
else
UUID.generate()
end
end
defp get_name(file, uuid, type, should_dedupe) do
if should_dedupe do
create_name(uuid, List.last(String.split(file.filename, ".")), type)
else
parts = String.split(file.filename, ".")
new_filename =
if length(parts) > 1 do
Enum.drop(parts, -1) |> Enum.join(".")
else
Enum.join(parts)
end
case type do
"application/octet-stream" -> file.filename
"audio/mpeg" -> new_filename <> ".mp3"
"image/jpeg" -> new_filename <> ".jpg"
_ -> Enum.join([new_filename, String.split(type, "/") |> List.last()], ".")
end
2018-04-15 23:37:51 +00:00
end
end
defp get_upload_path(uuid, should_dedupe) do
if should_dedupe do
upload_path()
else
Path.join(upload_path(), uuid)
end
end
defp get_url(name, uuid, should_dedupe) do
if should_dedupe do
url_for(:cow_uri.urlencode(name))
else
url_for(Path.join(uuid, :cow_uri.urlencode(name)))
end
end
2017-03-28 23:39:01 +00:00
defp url_for(file) do
"#{Web.base_url()}/media/#{file}"
2017-03-28 23:39:01 +00:00
end
def get_content_type(file) do
2018-03-30 13:01:53 +00:00
match =
File.open(file, [:read], fn f ->
case IO.binread(f, 8) do
<<0x89, 0x50, 0x4E, 0x47, 0x0D, 0x0A, 0x1A, 0x0A>> ->
"image/png"
<<0x47, 0x49, 0x46, 0x38, _, 0x61, _, _>> ->
"image/gif"
<<0xFF, 0xD8, 0xFF, _, _, _, _, _>> ->
"image/jpeg"
<<0x1A, 0x45, 0xDF, 0xA3, _, _, _, _>> ->
"video/webm"
<<0x00, 0x00, 0x00, _, 0x66, 0x74, 0x79, 0x70>> ->
"video/mp4"
<<0x49, 0x44, 0x33, _, _, _, _, _>> ->
"audio/mpeg"
<<255, 251, _, 68, 0, 0, 0, 0>> ->
"audio/mpeg"
2018-03-30 13:01:53 +00:00
<<0x4F, 0x67, 0x67, 0x53, 0x00, 0x02, 0x00, 0x00>> ->
"audio/ogg"
<<0x52, 0x49, 0x46, 0x46, _, _, _, _>> ->
"audio/wav"
_ ->
"application/octet-stream"
end
end)
case match do
{:ok, type} -> type
_e -> "application/octet-stream"
end
end
2017-03-28 23:39:01 +00:00
end