1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
defmodule LSGWeb.IrcController do
use LSGWeb, :controller
def index(conn, _) do
commands = for mod <- Application.get_env(:lsg, :irc)[:handlers] do
mod.irc_doc()
end
render conn, "index.html", commands: commands
end
def txt(conn, %{"name" => name}), do: do_txt(conn, name)
def txt(conn, _), do: do_txt(conn, nil)
defp do_txt(conn, nil) do
render conn, "txts.html", data: data()
end
defp do_txt(conn, txt) do
data = data()
if Map.has_key?(data, txt) do
render(conn, "txt.html", name: txt, data: data[txt])
else
conn
|> put_status(404)
end
end
defp data() do
dir = Application.get_env(:lsg, LSG.IRC.TxtHandler)[:directory]
Path.wildcard(dir <> "/*.txt")
|> Enum.reduce(%{}, fn(path, m) ->
path = String.split(path, "/")
file = List.last(path)
[key, "txt"] = String.split(file, ".", parts: 2)
data = dir <> file
|> File.read!
|> String.split("\n")
|> Enum.reject(fn(line) ->
cond do
line == "" -> true
!line -> true
true -> false
end
end)
Map.put(m, key, data)
end)
|> Enum.sort
|> Enum.into(Map.new)
end
end
|
