kmx.io/kmxgit/lib/header/make.ex

• Show log

  Commit

• Hash : 87eab820
  Author : Thomas de Grivel
  Date : 2022-11-02T18:19:29
  

  licence

Download

• lib/header/make.ex

• ## cl89
  ## Copyright 2022 kmx.io <contact@kmx.io>
  ##
  ## Permission is hereby granted to use this software granted
  ## the above copyright notice and this permission paragraph
  ## are included in all copies and substantial portions of this
  ## software.
  ##
  ## THIS SOFTWARE IS PROVIDED "AS-IS" WITHOUT ANY GUARANTEE OF
  ## PURPOSE AND PERFORMANCE. IN NO EVENT WHATSOEVER SHALL THE
  ## AUTHOR BE CONSIDERED LIABLE FOR THE USE AND PERFORMANCE OF
  ## THIS SOFTWARE.
  
  defmodule Header.Make do
    def split(src) do
      split(src, [])
    end
  
    def split([line = ("#" <> _) | rest], acc) do
      split(rest, [line | acc])
    end
    def split(rest, acc) do
      {Enum.reverse(acc) |> Enum.join("\n"), rest |> Enum.join("\n")}
    end
  
    def main([src_path | dest_paths]) do
      {:ok, src} = File.read(src_path)
      src_lines = String.split(src, "\n")
      {header, _} = split(src_lines)
      Enum.each dest_paths, fn dest_path ->
        {:ok, dest} = File.read(dest_path)
        dest_lines = String.split(dest, "\n")
        {_, rest} = split(dest_lines)
        result = header <> "\n" <> rest
        File.write(dest_path, result)
      end
    end
  end
  

Download