Initial Commit

station.liq

@@ -0,0 +1,116 @@
+# station.liq - Main liquidsoap configuration
+# All paths are resolved relative to this file's location.
+# Move the whole directory tree and nothing else needs changing.
+
+# -------------------------------------------------------
+# Resolve root directory from script location
+# -------------------------------------------------------
+let ROOT = configure.bindir()
+
+let MUSIC_DIR   = ROOT ^ "/music"
+let PODCASTS_DIR = ROOT ^ "/podcasts"
+let PLAYLISTS_DIR = ROOT ^ "/playlists"
+let SCHEDULE_FILE = ROOT ^ "/schedule.txt"
+let CONFIG_FILE   = ROOT ^ "/config.json"
+
+# -------------------------------------------------------
+# Load Icecast credentials from config.json
+# -------------------------------------------------------
+let cfg = json.from_file(CONFIG_FILE)
+let ic_host = json.(cfg.icecast.host)
+let ic_port = int_of_string(json.(cfg.icecast.port))
+let ic_mount = json.(cfg.icecast.mount)
+let ic_user  = json.(cfg.icecast.username)
+let ic_pass  = json.(cfg.icecast.password)
+
+# -------------------------------------------------------
+# Background music source
+# -------------------------------------------------------
+let music =
+  playlist.recursive(
+    mode="random",
+    duration=3600,
+    path=MUSIC_DIR,
+    extensions=["mp3", "m4a", "ogg", "flac"]
+  )
+
+# -------------------------------------------------------
+# Scheduled content via request queue
+# -------------------------------------------------------
+def q = ref []
+
+def push_request(req) =
+  q := req :: (!q)
+
+# Build a show source from its .pls file (written by update_playlists.py)
+def show_source(slug) =
+  let pls_path = PLAYLISTS_DIR ^ "/" ^ slug ^ ".pls"
+  if file.test(pls_path) then
+    log("# Playing scheduled show: #{slug}")
+    Some(request.create(pls_path))
+  else
+    log("! No playlist found for show: #{slug}, skipping")
+    None
+  end
+
+# Parse schedule.txt and register cron-triggered tasks
+def load_schedule() =
+  try
+    if not(file.test(SCHEDULE_FILE)) then
+      log("WARNING: schedule.txt not found at #{SCHEDULE_FILE}")
+    else
+      let lines = file.lines(SCHEDULE_FILE)
+      List.iter(fun line ->
+        let t = String.strip(line)
+        if t != "" && not(String.starts_with(t, "#")) then
+          let p = String.split(t, sep=" ")
+                     |> List.filter(fun x -> String.strip(x) != "")
+          if List.length(p) >= 7 then
+            let cron_expr = String.concat(sep=" ", List.take(p, 5))
+            let stype     = List.nth(p, 5)
+            let target    = List.nth(p, 6)
+            match stype with
+              | "show" ->
+                  cron.add(id=target, cron_expr, fun () ->
+                    match show_source(target) with
+                      | Some(r) -> push_request r
+                      | None    -> ()
+                  )
+              | "stream" ->
+                  let runlen_str =
+                    if List.length(p) > 7 then List.nth(p, 7) else "3600"
+                  let runlen = int_of_string(runlen_str)
+                  cron.add(id=target, cron_expr, fun () ->
+                    log("Triggering stream: #{target} (#{runlen}s)")
+                    # For external streams, create a request with duration cap
+                    let s = single.file(fallback=false, target)
+                    push_request(request.create(target))
+                  )
+              | _ ->
+                  log("Unknown schedule type '#{stype}' for target '#{target}', ignoring")
+            end
+          else
+            log("Malformed schedule line (need at least 7 fields): #{t}")
+          end
+        end
+      ) lines
+      log("Schedule loaded from #{SCHEDULE_FILE}")
+  with e ->
+    log("ERROR loading schedule: #{e}")
+
+# Load schedule once at startup
+thread.run(at=now(), fun () -> load_schedule())
+
+# -------------------------------------------------------
+# Output: scheduled content over background music fallback
+# -------------------------------------------------------
+output.icecast(
+  %mp3(bitrate=128),
+  host=ic_host,
+  port=ic_port,
+  user=ic_user,
+  password=ic_pass,
+  mount=ic_mount,
+  fallback=music,
+  request.queue(q)
+)