open Cmdliner

let main _env xdg profile =
  Logs.app (fun m -> m "Starting example application");

  (* Show XDG paths *)
  let config_dir = Xdge.config_dir xdg in
  Logs.info (fun m -> m "Config dir: %a" Eio.Path.pp config_dir);

  let cache_dir = Xdge.cache_dir xdg in
  Logs.info (fun m -> m "Cache dir: %a" Eio.Path.pp cache_dir);

  let data_dir = Xdge.data_dir xdg in
  Logs.info (fun m -> m "Data dir: %a" Eio.Path.pp data_dir);

  (* Show profile info *)
  Logs.info (fun m -> m "Profile keys: %a"
    Fmt.(list ~sep:comma string)
    (Keyeio.Profile.keys profile));

  0

let () =
  let info = Cmd.info "eiocmd-example"
    ~version:"0.1.0"
    ~doc:"Example application using eiocmd"
  in
  let cmd = Eiocmd.run
    ~info
    ~app_name:"eiocmd-example"
    ~service:"example"
    Term.(const main)
  in
  exit (Cmd.eval' cmd)