git.squeep.com Git - akkoma/blob - lib/pleroma/upload.ex

   1 defmodule Pleroma.Upload do
   2   alias Ecto.UUID
   3   alias Pleroma.Web
   4
   5   def store(%Plug.Upload{} = file, should_dedupe) do
   6     content_type = get_content_type(file.path)
   7     uuid = get_uuid(file, should_dedupe)
   8     name = get_name(file, uuid, content_type, should_dedupe)
   9     upload_folder = get_upload_path(uuid, should_dedupe)
  10     url_path = get_url(name, uuid, should_dedupe)
  11
  12     File.mkdir_p!(upload_folder)
  13     result_file = Path.join(upload_folder, name)
  14
  15     if File.exists?(result_file) do
  16       File.rm!(file.path)
  17     else
  18       File.cp!(file.path, result_file)
  19     end
  20
  21     %{
  22       "type" => "Image",
  23       "url" => [
  24         %{
  25           "type" => "Link",
  26           "mediaType" => content_type,
  27           "href" => url_path
  28         }
  29       ],
  30       "name" => name
  31     }
  32   end
  33
  34   def store(%{"img" => "data:image/" <> image_data}, should_dedupe) do
  35     parsed = Regex.named_captures(~r/(?<filetype>jpeg|png|gif);base64,(?<data>.*)/, image_data)
  36     data = Base.decode64!(parsed["data"], ignore: :whitespace)
  37     uuid = UUID.generate()
  38     uuidpath = Path.join(upload_path(), uuid)
  39     uuid = UUID.generate()
  40
  41     File.mkdir_p!(upload_path())
  42
  43     File.write!(uuidpath, data)
  44
  45     content_type = get_content_type(uuidpath)
  46
  47     name =
  48       create_name(
  49         String.downcase(Base.encode16(:crypto.hash(:sha256, data))),
  50         parsed["filetype"],
  51         content_type
  52       )
  53
  54     upload_folder = get_upload_path(uuid, should_dedupe)
  55     url_path = get_url(name, uuid, should_dedupe)
  56
  57     File.mkdir_p!(upload_folder)
  58     result_file = Path.join(upload_folder, name)
  59
  60     if should_dedupe do
  61       if !File.exists?(result_file) do
  62         File.rename(uuidpath, result_file)
  63       else
  64         File.rm!(uuidpath)
  65       end
  66     else
  67       File.rename(uuidpath, result_file)
  68     end
  69
  70     %{
  71       "type" => "Image",
  72       "url" => [
  73         %{
  74           "type" => "Link",
  75           "mediaType" => content_type,
  76           "href" => url_path
  77         }
  78       ],
  79       "name" => name
  80     }
  81   end
  82
  83   def strip_exif_data(file) do
  84     settings = Application.get_env(:pleroma, Pleroma.Upload)
  85     @do_strip = Keyword.fetch!(settings, :strip_exif)
  86
  87     if @do_strip == true do
  88       Mogrify.open(file) |> Mogrify.custom("strip") |> Mogrify.save(in_place: true)
  89     end
  90   end
  91
  92   def upload_path do
  93     settings = Application.get_env(:pleroma, Pleroma.Upload)
  94     Keyword.fetch!(settings, :uploads)
  95   end
  96
  97   defp create_name(uuid, ext, type) do
  98     case type do
  99       "application/octet-stream" ->
 100         String.downcase(Enum.join([uuid, ext], "."))
 101
 102       "audio/mpeg" ->
 103         String.downcase(Enum.join([uuid, "mp3"], "."))
 104
 105       _ ->
 106         String.downcase(Enum.join([uuid, List.last(String.split(type, "/"))], "."))
 107     end
 108   end
 109
 110   defp get_uuid(file, should_dedupe) do
 111     if should_dedupe do
 112       Base.encode16(:crypto.hash(:sha256, File.read!(file.path)))
 113     else
 114       UUID.generate()
 115     end
 116   end
 117
 118   defp get_name(file, uuid, type, should_dedupe) do
 119     if should_dedupe do
 120       create_name(uuid, List.last(String.split(file.filename, ".")), type)
 121     else
 122       unless String.contains?(file.filename, ".") do
 123         case type do
 124           "image/png" -> file.filename <> ".png"
 125           "image/jpeg" -> file.filename <> ".jpg"
 126           "image/gif" -> file.filename <> ".gif"
 127           "video/webm" -> file.filename <> ".webm"
 128           "video/mp4" -> file.filename <> ".mp4"
 129           "audio/mpeg" -> file.filename <> ".mp3"
 130           "audio/ogg" -> file.filename <> ".ogg"
 131           "audio/wav" -> file.filename <> ".wav"
 132           _ -> file.filename
 133         end
 134       else
 135         file.filename
 136       end
 137     end
 138   end
 139
 140   defp get_upload_path(uuid, should_dedupe) do
 141     if should_dedupe do
 142       upload_path()
 143     else
 144       Path.join(upload_path(), uuid)
 145     end
 146   end
 147
 148   defp get_url(name, uuid, should_dedupe) do
 149     if should_dedupe do
 150       url_for(:cow_uri.urlencode(name))
 151     else
 152       url_for(Path.join(uuid, :cow_uri.urlencode(name)))
 153     end
 154   end
 155
 156   defp url_for(file) do
 157     "#{Web.base_url()}/media/#{file}"
 158   end
 159
 160   def get_content_type(file) do
 161     match =
 162       File.open(file, [:read], fn f ->
 163         case IO.binread(f, 8) do
 164           <<0x89, 0x50, 0x4E, 0x47, 0x0D, 0x0A, 0x1A, 0x0A>> ->
 165             "image/png"
 166
 167           <<0x47, 0x49, 0x46, 0x38, _, 0x61, _, _>> ->
 168             "image/gif"
 169
 170           <<0xFF, 0xD8, 0xFF, _, _, _, _, _>> ->
 171             "image/jpeg"
 172
 173           <<0x1A, 0x45, 0xDF, 0xA3, _, _, _, _>> ->
 174             "video/webm"
 175
 176           <<0x00, 0x00, 0x00, _, 0x66, 0x74, 0x79, 0x70>> ->
 177             "video/mp4"
 178
 179           <<0x49, 0x44, 0x33, _, _, _, _, _>> ->
 180             "audio/mpeg"
 181
 182           <<255, 251, _, 68, 0, 0, 0, 0>> ->
 183             "audio/mpeg"
 184
 185           <<0x4F, 0x67, 0x67, 0x53, 0x00, 0x02, 0x00, 0x00>> ->
 186             "audio/ogg"
 187
 188           <<0x52, 0x49, 0x46, 0x46, _, _, _, _>> ->
 189             "audio/wav"
 190
 191           _ ->
 192             "application/octet-stream"
 193         end
 194       end)
 195
 196     case match do
 197       {:ok, type} -> type
 198       _e -> "application/octet-stream"
 199     end
 200   end
 201 end