mirror of
https://github.com/plausible/analytics.git
synced 2024-12-19 07:31:50 +03:00
74 lines
2.2 KiB
Elixir
74 lines
2.2 KiB
Elixir
defmodule PlausibleWeb.Tracker do
|
|
import Plug.Conn
|
|
use Agent
|
|
|
|
custom_script_name = Application.get_env(:plausible, :custom_script_name)
|
|
base_variants = ["hash", "outbound-links", "exclusions", "compat"]
|
|
base_filenames = ["plausible", custom_script_name]
|
|
|
|
# Generates Power Set of all variants
|
|
variants =
|
|
1..Enum.count(base_variants)
|
|
|> Enum.map(fn x ->
|
|
Combination.combine(base_variants, x)
|
|
|> Enum.map(fn y -> Enum.sort(y) |> Enum.join(".") end)
|
|
end)
|
|
|> List.flatten()
|
|
|
|
# Formats power set into filenames
|
|
files_available =
|
|
["plausible.js", "p.js"] ++ Enum.map(variants, fn v -> "plausible.#{v}.js" end)
|
|
|
|
# Computes permutations for every power set elements, formats them as alias filenames
|
|
aliases_available =
|
|
Enum.map(variants, fn x ->
|
|
variants =
|
|
String.split(x, ".")
|
|
|> Combination.permutate()
|
|
|> Enum.map(fn p -> Enum.join(p, ".") end)
|
|
|> Enum.map(fn v -> Enum.map(base_filenames, fn filename -> "#{filename}.#{v}.js" end) end)
|
|
|> List.flatten()
|
|
|
|
if Enum.count(variants) > 0 do
|
|
{"plausible.#{x}.js", variants}
|
|
end
|
|
end)
|
|
|> Enum.reject(fn x -> x == nil end)
|
|
|> Enum.into(%{})
|
|
|> Map.put("plausible.js", ["analytics.js", "#{custom_script_name}.js"])
|
|
|
|
@templates files_available
|
|
@aliases aliases_available
|
|
|
|
def init(_) do
|
|
all_files =
|
|
Enum.reduce(@templates, %{}, fn template_filename, all_files ->
|
|
aliases = Map.get(@aliases, template_filename, [])
|
|
|
|
[template_filename | aliases]
|
|
|> Enum.map(fn filename -> {"/js/" <> filename, template_filename} end)
|
|
|> Enum.into(%{})
|
|
|> Map.merge(all_files)
|
|
end)
|
|
|
|
[files: all_files]
|
|
end
|
|
|
|
def call(conn, files: files) do
|
|
case files[conn.request_path] do
|
|
nil ->
|
|
conn
|
|
|
|
found ->
|
|
location = Application.app_dir(:plausible, "priv/tracker/js/" <> found)
|
|
|
|
conn
|
|
|> put_resp_header("content-type", "application/javascript")
|
|
|> put_resp_header("cross-origin-resource-policy", "cross-origin")
|
|
|> put_resp_header("access-control-allow-origin", "*")
|
|
|> send_file(200, location)
|
|
|> halt()
|
|
end
|
|
end
|
|
end
|