~mika/www.m1kadev.nl

www.m1kadev.nl/kethel/main.exs -rw-r--r-- 3.2 KiB
e089bf6d — m1ka new readme 5 hours ago 
                                                                                
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
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94

args = System.argv()

folder = Enum.at(args, 1)

if folder != nil do
  project_root = Path.expand(folder)

  File.rm_rf!("#{project_root}/build")
  File.mkdir_p("#{project_root}/build")

  collection_time_start = System.monotonic_time(:millisecond)

  # other contents depend on this, so we cant async it
  bricks = Bricks.collect(project_root)

  # special case, see module documentation
  statics_task = Task.async(fn -> Statics.compile(project_root) end)

  styles_task = Task.async(fn -> Styles.collect(project_root) end)
  scripts_task = Task.async(fn -> Scripts.collect(project_root) end)
  pages_task = Task.async(fn -> Pages.collect(project_root, bricks) end)
  thoughts_task = Task.async(fn -> Thoughts.collect(project_root, bricks) end)
  blog_task = Task.async(fn -> Blog.collect(project_root, bricks) end)

  [styles, pages, scripts, thoughts, blog] =
    Task.await_many([styles_task, pages_task, scripts_task, thoughts_task, blog_task], :infinity)

  collection_time_end = System.monotonic_time(:millisecond)
  delta_r = collection_time_end - collection_time_start

  compilation_time_start = System.monotonic_time(:millisecond)

  pages_compile_task = Task.async(fn -> Pages.compile(pages) end)
  styles_compile_task = Task.async(fn -> Styles.compile(styles) end)
  scripts_compile_task = Task.async(fn -> Scripts.compile(scripts) end)
  thoughts_compile_task = Task.async(fn -> Thoughts.compile(thoughts) end)
  blog_compile_task = Task.async(fn -> Blog.compile(blog) end)

  [pages_time, styles_time, scripts_time, thoughts_time, _] =
    Task.await_many(
      [
        pages_compile_task,
        styles_compile_task,
        scripts_compile_task,
        thoughts_compile_task,
        statics_task
      ],
      :infinity
    )

  compilation_time_end = System.monotonic_time(:millisecond)

  rss_header = File.read!("#{project_root}/rss/feed.txml")
  rss_footer = "</channel></rss>"
  rss_item_template = File.read!("#{project_root}/rss/item.txml")

  rss_thoughts =
    thoughts.thoughts
    |> Enum.take(10)
    |> Enum.map(fn thought -> Thoughts.to_rss(thought, rss_item_template, project_root) end)
    |> Enum.join()

  File.write!("#{project_root}/build/rss.xml", rss_header <> rss_thoughts <> rss_footer)

  IO.puts("[GENERATE] #{project_root}/build/rss.xml")

  IO.puts("Finalising...")

  IO.puts("favicon.ico")
  File.cp!("#{project_root}/favicon.ico", "#{project_root}/build/favicon.ico")
  IO.puts("")
  IO.puts(:stderr, "===== BUILD RESULTS =====")

  IO.puts(
    :stderr,
    "FILE READING (*.collect()) | #{collection_time_end - collection_time_start}ms"
  )

  IO.puts(:stderr, "Root page (compile)        | #{pages_time}ms")
  IO.puts(:stderr, "Styles (compile)           | #{styles_time}ms")
  IO.puts(:stderr, "Scripts (compile)          | #{scripts_time}ms")
  IO.puts(:stderr, "Thoughts (compile)         | #{thoughts_time}ms")
  IO.puts(:stderr, String.duplicate("-", 35))

  delta_c = compilation_time_end - compilation_time_start
  ratio = (delta_c / delta_r) |> Float.to_string()

  IO.puts(
    :stderr,
    "www.m1kadev.nl compiled in #{(delta_c + delta_r) / 1000} seconds (ratio compilation : collection = #{ratio |> binary_part(0, min(5, byte_size(ratio)))})"
  )
else
  IO.puts(:stderr, "The root project folder should be provided on the command line")
end