diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/banner.ml | 7 | ||||
| -rw-r--r-- | lib/lock_loader.ml | 5 | ||||
| -rw-r--r-- | lib/manifest.ml | 7 | ||||
| -rw-r--r-- | lib/nixtamal.ml | 1 |
4 files changed, 18 insertions, 2 deletions
diff --git a/lib/banner.ml b/lib/banner.ml new file mode 100644 index 0000000..6168b10 --- /dev/null +++ b/lib/banner.ml @@ -0,0 +1,7 @@ +(*─────────────────────────────────────────────────────────────────────────────┐ +│ SPDX-FileCopyrightText: 2025 toastal <https://toast.al/contact/> │ +│ SPDX-License-Identifier: LGPL-2.1-or-later WITH OCaml-LGPL-linking-exception │ +└─────────────────────────────────────────────────────────────────────────────*) +let pp ppf = Fmt.pf ppf {|┏┓╻+╻ ╱┏┳┓┏┓┏┳┓┏┓╻@.┃┃┃┃┗━┓╹┃╹┣┫┃┃┃┣┫┃@.╹┗┛╹╱ ╹ ╹ ╹╹╹ ╹╹╹┗┛|} + +let show = Fmt.str "%t" pp diff --git a/lib/lock_loader.ml b/lib/lock_loader.ml index 98e86e3..6dcb233 100644 --- a/lib/lock_loader.ml +++ b/lib/lock_loader.ml @@ -82,8 +82,9 @@ let pp_banner (ppf : Format.formatter) = pf ppf "PERFORMANCE@ OF@ THIS@ SOFTWARE.@]@."; pf ppf "@."; pf ppf "%a@." Fmt.string hr; - pf ppf "@[<hov>This file was generated by Nixtamal.@;"; - pf ppf "Do not edit as it will be overwritten.@]@."; + pf ppf "┏┓╻+╻ ╱┏┳┓┏┓┏┳┓┏┓╻@."; + pf ppf "┃┃┃┃┗━┓╹┃╹┣┫┃┃┃┣┫┃ This file was generated by Nixtamal.@."; + pf ppf "╹┗┛╹╱ ╹ ╹ ╹╹╹ ╹╹╹┗┛ Do not edit as it will be overwritten.@."; pf ppf "%a@." Fmt.string hr; pf ppf "*/@." diff --git a/lib/manifest.ml b/lib/manifest.ml index 2583e74..b79ebb9 100644 --- a/lib/manifest.ml +++ b/lib/manifest.ml @@ -711,6 +711,13 @@ let write () : (unit, error) result = Logs.app (fun m -> m "Writing manifest @@ %s …" filename); let result = Eio.Path.with_open_out ~create: (`Exclusive 0o644) filepath @@ fun flow -> + let banner = [ + Cstruct.of_string "// ┏┓╻+╻ ╱┏┳┓┏┓┏┳┓┏┓╻\n"; + Cstruct.of_string "// ┃┃┃┃┗━┓╹┃╹┣┫┃┃┃┣┫┃ Read the manpage:\n"; + Cstruct.of_string "// ╹┗┛╹╱ ╹ ╹ ╹╹╹ ╹╹╹┗┛ $ man nixtamal-manifest\n"; + ] + in + Eio.Flow.write flow banner; Util.KDL.to_flow flow mnfst; Eio.Flow.write flow ([Cstruct.of_string "\n"]) in diff --git a/lib/nixtamal.ml b/lib/nixtamal.ml index bb865f6..e45d906 100644 --- a/lib/nixtamal.ml +++ b/lib/nixtamal.ml @@ -91,6 +91,7 @@ let set_up ~env ?nixpkgs: nixpkgs_opt () : (unit, error) result = let (let*) = Result.bind in Eio.Switch.run @@ fun sw -> let proc_mgr = Eio.Stdenv.process_mgr env in + Logs.app (fun m -> m "%t@." Banner.pp); Working_directory.set_up_root (); if Manifest.exists () then begin |