#!/usr/bin/env python3

import time, types
import os, subprocess, importlib.util
import sys, signal, glob
import libcache, traceback, atexit
from modules import *
from threading import Lock

def prefetch(path):
    if os.name != "posix": return
    with open(path, "rb") as f:
        fd = f.fileno()
        os.posix_fadvise(fd, 0, 0, os.POSIX_FADV_SEQUENTIAL)
        os.posix_fadvise(fd, 0, 0, os.POSIX_FADV_NOREUSE)
        os.posix_fadvise(fd, 0, 0, os.POSIX_FADV_WILLNEED)

MODULES_PACKAGE = "modules"
MODULES_DIR = Path(__file__, "..", MODULES_PACKAGE).resolve()

class ProcessManager(Skeleton_ProcessManager):
    def __init__(self) -> None:
        self.lock = Lock()
        self.processes: list[Process] = []
        self.duration_cache = libcache.Cache([])
    def _get_audio_duration(self, file_path: Path):
        if result := self.duration_cache.getElement(file_path.as_posix(), False): return result
        result = subprocess.run(['ffprobe', '-v', 'quiet', '-show_entries', 'format=duration', '-of', 'default=noprint_wrappers=1:nokey=1', str(file_path)], capture_output=True, text=True)
        if result.returncode == 0:
            result = float(result.stdout.strip())
            self.duration_cache.saveElement(file_path.as_posix(), result, (60*60), False, True)
            return result
    def play(self, track: Track, fade_time: int=5) -> Process:
        cmd = ['ffplay', '-nodisp', '-hide_banner', '-autoexit', '-loglevel', 'quiet']
        assert track.path.exists()

        duration = self._get_audio_duration(track.path.absolute())
        if not duration: raise Exception("Failed to get file duration for", track.path)
        if track.offset >= duration: track.offset = max(duration - 0.1, 0)
        if track.offset > 0: cmd.extend(['-ss', str(track.offset)])

        filters = []
        if track.fade_in: filters.append(f"afade=t=in:st=0:d={fade_time}")
        if track.fade_out: filters.append(f"afade=t=out:st={duration - fade_time - track.offset}:d={fade_time}")
        if filters: cmd.extend(['-af', ",".join(filters)])

        cmd.append(str(track.path.absolute()))

        pr = Process(Popen(cmd, stdout=subprocess.DEVNULL, stderr=subprocess.DEVNULL, start_new_session=True), track.path.name, time.monotonic(), duration - track.offset)
        with self.lock: self.processes.append(pr)
        return pr
    def anything_playing(self) -> bool:
        with self.lock:
            self.processes = [p for p in self.processes if p.process.poll() is None]
            return bool(self.processes)
    def stop_all(self, timeout: float | None = None) -> None:
        with self.lock:
            for process in self.processes:
                process.process.terminate()
                try: process.process.wait(timeout)
                except subprocess.TimeoutExpired: process.process.kill()
            self.processes.clear()
    def wait_all(self, timeout: float | None = None) -> None:
        with self.lock:
            for process in self.processes:
                try: process.process.wait(timeout)
                except subprocess.TimeoutExpired: process.process.terminate()
            self.processes.clear()

class PlaylistParser:
    def __init__(self, output: log95.TextIO): self.logger = log95.log95("PARSER", output=output)

    def _check_for_imports(self, path: Path, seen=None) -> list[str]:
        if seen is None: seen = set()

        if not path.exists():
            self.logger.error(f"Playlist not found: {path.name}")
            return []
        lines = [line.strip() for line in path.read_text().splitlines() if line.strip()]

        out = []
        for line in lines:
            if line.startswith("@"):
                target = Path(line.removeprefix("@"))
                if target not in seen:
                    if not target.exists():
                        self.logger.error(f"Target {target.name} of {path.name} does not exist")
                        continue
                    seen.add(target)
                    out.extend(self._check_for_imports(target, seen))
            else: out.append(line)
        return out

    def parse(self, playlist_path: Path) -> tuple[dict[str, str], list[tuple[list[str], dict[str, str]]]]:
        lines = self._check_for_imports(playlist_path)

        out = []
        global_arguments = {}
        for line in lines:
            arguments = {}
            line = line.strip()
            if not line or line.startswith(";") or line.startswith("#"): continue
            if "|" in line:
                if line.startswith("|"): # No file name, we're defining global arguments
                    args = line.removeprefix("|").split(";")
                    for arg in args:
                        key, val = arg.split("=", 1)
                        global_arguments[key] = val
                else:
                    line, args = line.split("|", 1)
                    args = args.split(";")
                    for arg in args:
                        key, val = arg.split("=", 1)
                        arguments[key] = val
            out.append(([f for f in glob.glob(line) if Path(f).is_file()], arguments))
        return global_arguments, out

class RadioPlayer:
    def __init__(self, arg: str | None, output: log95.TextIO):
        self.simple_modules: list[PlayerModule] = []
        self.playlist_modifier_modules: list[PlaylistModifierModule] = []
        self.playlist_advisor: PlaylistAdvisor | None = None
        self.active_modifier: ActiveModifier | None = None
        self.logger = log95.log95("CORE", output=output)
        self.exit_pending = False
        self.exit_status_code = 0
        self.intr_time = 0
        self.exit_lock = Lock()
        self.procman = ProcessManager()
        self.modules: list[tuple] = []
        self.parser = PlaylistParser(output)
        self.arg = arg

    def shutdown(self): 
        self.procman.stop_all()

    def handle_sigint(self, signum, frame):
        with self.exit_lock:
            self.logger.info("Received CTRL+C (SIGINT)")
            if (time.monotonic() - self.intr_time) > 5:
                self.intr_time = time.monotonic()
                self.logger.info("Will quit on song end.")
                self.exit_pending = True
                self.exit_status_code = 130
            else:
                self.logger.warning("Force-Quit pending")
                raise SystemExit(130)

    def load_modules(self):
        for file in MODULES_DIR.glob("*"):
            if file.name.endswith(".py") and file.name != "__init__.py":
                module_name = file.name[:-3]
                full_module_name = f"{MODULES_PACKAGE}.{module_name}"

                spec = importlib.util.spec_from_file_location(full_module_name, Path(MODULES_DIR, file))
                assert spec
                module = importlib.util.module_from_spec(spec)

                sys.modules[full_module_name] = module
                if MODULES_PACKAGE not in sys.modules:
                    parent = types.ModuleType(MODULES_PACKAGE)
                    parent.__path__ = [str(MODULES_DIR)]
                    parent.__package__ = MODULES_PACKAGE
                    sys.modules[MODULES_PACKAGE] = parent
                module.__package__ = MODULES_PACKAGE

                module._log_out = self.logger.output # type: ignore
                module.__dict__['_log_out'] = self.logger.output
                self.modules.append((spec, module, module_name))
    def start_modules(self):
        for (spec, module, module_name) in self.modules:
            assert spec.loader
            try:
                start = time.perf_counter()
                spec.loader.exec_module(module)
                time_took = time.perf_counter() - start
                if time_took > 0.2: self.logger.warning(f"{module_name} took {time_took:.1f}s to start")
            except Exception as e:
                traceback.print_exc(file=self.logger.output)
                self.logger.error(f"Failed loading {module_name} due to {e}, continuing")
                continue

            if md := getattr(module, "module", None):
                if isinstance(md, list): self.simple_modules.extend(md)
                else: self.simple_modules.append(md)
            if md := getattr(module, "playlistmod", None):
                if isinstance(md, tuple):
                    md, index = md
                    if isinstance(md, list): self.playlist_modifier_modules[index:index] = md
                    else: self.playlist_modifier_modules.insert(index, md)
                elif isinstance(md, list): self.playlist_modifier_modules.extend(md)
                else: self.playlist_modifier_modules.append(md)
            if md := getattr(module, "advisor", None):
                if self.playlist_advisor: raise Exception("Multiple playlist advisors")
                self.playlist_advisor = md
            if md := getattr(module, "activemod", None):
                if self.active_modifier: raise Exception("Multiple active modifiers")
                self.active_modifier = md
        InterModuleCommunication(self.simple_modules + [self.playlist_advisor, ProcmanCommunicator(self.procman), self.active_modifier])
        if self.active_modifier: self.active_modifier.arguments(self.arg)

    def start(self):
        self.logger.info("Core starting, loading modules")
        self.load_modules();self.start_modules()
        if not self.playlist_advisor:
            self.logger.critical_error("Playlist advisor was not found")
            raise SystemExit(1)

    def play_once(self):
        if not self.playlist_advisor or not (playlist_path := self.playlist_advisor.advise(self.arg)): return
        try: global_args, parsed = self.parser.parse(playlist_path)
        except Exception as e:
            self.logger.info(f"Exception ({e}) while parsing playlist, retrying in 15 seconds...")
            traceback.print_exc(file=self.logger.output)
            time.sleep(15)
            return

        playlist: list[Track] = []
        [playlist.extend(Track(Path(line).absolute(), True, True, True, args) for line in lns) for (lns, args) in parsed] # i can read this, i think

        [(playlist := module.modify(global_args, playlist) or playlist) for module in self.playlist_modifier_modules if module] # yep
    
        prefetch(playlist[0].path)
        [mod.on_new_playlist(playlist) for mod in self.simple_modules + [self.active_modifier] if mod] # one liner'd everything

        return_pending = False

        cross_fade = int(global_args.get("crossfade", 5))

        max_iterator = len(playlist)
        song_i = i = 0

        while i < max_iterator:
            if self.exit_pending:
                self.logger.info("Quit received, waiting for song end.")
                self.procman.wait_all()
                raise SystemExit(self.exit_status_code)
            elif return_pending:
                self.logger.info("Return reached, next song will reload the playlist.")
                self.procman.wait_all()
                return
            if self.playlist_advisor and self.playlist_advisor.new_playlist():
                self.logger.info("Reloading now...")
                return_pending = True
                continue

            track = playlist[song_i % len(playlist)]
            next_track = playlist[song_i + 1] if song_i + 1 < len(playlist) else None
            if self.active_modifier:
                (track, next_track), extend = self.active_modifier.play(song_i, track, next_track)
                if track is None:
                    song_i += 1
                    continue
                if extend: max_iterator += 1
            else: extend = False

            prefetch(track.path)
            self.logger.info(f"Now playing: {track.path.name}")

            [module.on_new_track(song_i, track, next_track) for module in self.simple_modules if module]

            pr = self.procman.play(track, cross_fade)
            end_time = pr.started_at + pr.duration
            if track.fade_out: end_time -= cross_fade

            while end_time >= time.monotonic() and pr.process.poll() is None:
                start = time.monotonic()
                [module.progress(song_i, track, time.monotonic() - pr.started_at, pr.duration, end_time - pr.started_at) for module in self.simple_modules if module]
                elapsed = time.monotonic() - start
                remaining_until_end = end_time - time.monotonic()
                if elapsed < 1 and remaining_until_end > 0: time.sleep(min(1 - elapsed, remaining_until_end))

            if next_track: prefetch(next_track.path)
            i += 1
            if not extend: song_i += 1

    def loop(self):
        self.logger.info("Starting playback.")
        try:
            while True:
                self.play_once()
                if self.exit_pending: raise SystemExit(self.exit_status_code)
        except Exception as e:
            self.logger.critical_error(f"Unexpected error: {e}")
            raise

def main():
    log_file_path = Path("/tmp/radioPlayer_log")
    log_file_path.touch()
    log_file = open(log_file_path, "w")

    core = RadioPlayer((" ".join(sys.argv[1:]) if len(sys.argv) > 1 else None), log_file)
    atexit.register(core.shutdown)
    core.start()
    signal.signal(signal.SIGINT, core.handle_sigint)
    try: core.loop()
    finally: log_file.close()