#!/usr/bin/env bb

(require '[clojure.java.shell :refer [sh]]
         '[babashka.process :refer [process tokenize]])

(defn process-running? [name]
  (let [{:keys [exit]} (sh "pgrep" "-x" name)]
    (= exit 0)))

(defn kill-process [name]
  (when (process-running? name)
    (println (str "Stopping " name "..."))
    (sh "pkill" "-x" name)))

(defn start-daemon [cmd-str]
  (println (str "Starting " cmd-str "..."))
  (process (tokenize cmd-str) {:out :discard :err :discard :detach true}))

(let [sb-running (process-running? "sing-box")
      mi-running (process-running? "mihomo")]

  (cond
    mi-running
    (do
      (kill-process "mihomo")
      (start-daemon "sing-box run -c /Users/eltrac/.config/sing-box/config.json"))

    :else
    (do
      (kill-process "sing-box")
      (start-daemon "mihomo")))

  (println "Switch complete."))