"""Build a local record of what actually gets listened to.

Ingests a Last.fm scrobble history into SQLite and keeps it current, so that
the later stages -- building playlists, and deciding what in the library has
gone cold -- can query listening habits locally instead of spending an API call
per question.

The store is derived state. It can be deleted and rebuilt from Last.fm at any
time. Nothing here writes to Last.fm, and nothing here touches the music
library or Lidarr.

Ingest is in two halves. A backfill walks the history backwards until it runs
out, and a catch-up fetches everything scrobbled since the newest scrobble
already held. Both take their bounds from the database rather than from a saved
cursor, so an interrupted run resumes from what it actually has.
"""

import argparse
import fcntl
import json
import logging
import os
import re
import signal
import sqlite3
import sys
import time
import unicodedata
import urllib.error
import urllib.parse
import urllib.request
from dataclasses import dataclass
from datetime import datetime, timezone
from pathlib import Path

logger = logging.getLogger("music-curator")

API_ROOT = "https://ws.audioscrobbler.com/2.0/"

# The documented ceiling for user.getRecentTracks. getLovedTracks does not state
# one; asking for more than it allows is harmless, because paging is driven by
# the totalPages the response reports rather than by arithmetic on this number.
PAGE_SIZE = 200

# Error codes worth another attempt: backend failure, service offline, service
# temporarily unavailable, rate limit. Everything else is a fault in the request
# or the key and will fail again identically.
RETRYABLE_ERRORS = {8, 11, 16, 29}
RETRYABLE_STATUS = {429, 500, 502, 503, 504}

# Last.fm asks for no more than five requests a second averaged over five
# minutes. A full backfill is thousands of requests, so it is worth staying
# well inside that rather than discovering error 29 halfway through.
REQUEST_DELAY_SECONDS = 0.25
BACKOFF_SECONDS = 2.0
BACKOFF_CEILING_SECONDS = 60.0

SCHEMA_VERSION = "2"

# Versions this build upgrades in place. Everything added since version 1 is a
# new table, and the schema script only ever creates what is missing, so running
# it is the whole migration -- an existing history is not re-downloaded.
MIGRATABLE_FROM = {"1"}

SCHEMA = """
-- One row per scrobble. The primary key collapses two plays of the same track
-- in the same second into one: Last.fm gives scrobbles no identifier, so they
-- are genuinely indistinguishable, and one lost play a decade is not worth a
-- surrogate key that would make re-ingest non-idempotent.
CREATE TABLE IF NOT EXISTS scrobble (
    uts         INTEGER NOT NULL,
    artist      TEXT    NOT NULL,
    track       TEXT    NOT NULL,
    album       TEXT    NOT NULL DEFAULT '',
    artist_mbid TEXT,
    album_mbid  TEXT,
    track_mbid  TEXT,
    PRIMARY KEY (uts, artist, track)
);
CREATE INDEX IF NOT EXISTS scrobble_uts ON scrobble (uts);
CREATE INDEX IF NOT EXISTS scrobble_artist_track ON scrobble (artist, track);
CREATE INDEX IF NOT EXISTS scrobble_track_mbid ON scrobble (track_mbid);

-- Loved tracks are current state, not history: a track can be unloved again.
-- The table is replaced on every pass rather than accumulated.
CREATE TABLE IF NOT EXISTS loved (
    artist     TEXT NOT NULL,
    track      TEXT NOT NULL,
    track_mbid TEXT,
    loved_at   INTEGER,
    PRIMARY KEY (artist, track)
);

CREATE TABLE IF NOT EXISTS state (
    key   TEXT PRIMARY KEY,
    value TEXT NOT NULL
);

-- The library as Lidarr sees it. Rebuilt from the API rather than by walking
-- the files, because Lidarr is the only thing holding the MusicBrainz ids that
-- make an exact join possible.
CREATE TABLE IF NOT EXISTS lidarr_artist (
    id        INTEGER PRIMARY KEY,
    mbid      TEXT,
    name      TEXT NOT NULL,
    norm_name TEXT NOT NULL,
    path      TEXT,
    monitored INTEGER NOT NULL DEFAULT 1
);
CREATE INDEX IF NOT EXISTS lidarr_artist_norm ON lidarr_artist (norm_name);

CREATE TABLE IF NOT EXISTS lidarr_album (
    id           INTEGER PRIMARY KEY,
    artist_id    INTEGER NOT NULL,
    mbid         TEXT,
    title        TEXT NOT NULL,
    monitored    INTEGER NOT NULL DEFAULT 1,
    release_date TEXT
);
CREATE INDEX IF NOT EXISTS lidarr_album_artist ON lidarr_album (artist_id);

CREATE TABLE IF NOT EXISTS lidarr_track (
    id             INTEGER PRIMARY KEY,
    artist_id      INTEGER NOT NULL,
    album_id       INTEGER NOT NULL,
    recording_mbid TEXT,
    title          TEXT NOT NULL,
    norm_artist    TEXT NOT NULL,
    norm_title     TEXT NOT NULL,
    has_file       INTEGER NOT NULL DEFAULT 0,
    path           TEXT,
    added          INTEGER,
    duration       INTEGER
);
CREATE INDEX IF NOT EXISTS lidarr_track_recording ON lidarr_track (recording_mbid);
CREATE INDEX IF NOT EXISTS lidarr_track_norm ON lidarr_track (norm_artist, norm_title);
CREATE INDEX IF NOT EXISTS lidarr_track_album ON lidarr_track (album_id);

-- One row per distinct thing listened to, with the verdict on whether it could
-- be tied to the library. Matching belongs at this granularity rather than per
-- play: it is a property of the name pair, and there are three plays for every
-- pair.
CREATE TABLE IF NOT EXISTS scrobble_key (
    artist      TEXT NOT NULL,
    track       TEXT NOT NULL,
    norm_artist TEXT NOT NULL,
    norm_track  TEXT NOT NULL,
    track_mbid  TEXT,
    plays       INTEGER NOT NULL,
    first_uts   INTEGER NOT NULL,
    last_uts    INTEGER NOT NULL,
    track_id    INTEGER,
    method      TEXT NOT NULL DEFAULT 'none',
    PRIMARY KEY (artist, track)
);
CREATE INDEX IF NOT EXISTS scrobble_key_track ON scrobble_key (track_id);
"""


# Suffixes that a file tag carries and a scrobble does not, or the reverse.
# Stripped only from a trailing bracket or after a trailing dash, so a title
# like "(Don't Fear) The Reaper" keeps its opening parenthetical.
VERSION_WORDS = (
    "remaster",
    "remastered",
    "live",
    "mono",
    "stereo",
    "version",
    "edit",
    "mix",
    "remix",
    "deluxe",
    "bonus",
    "explicit",
    "acoustic",
    "demo",
    "radio",
    "single",
    "anniversary",
    "reissue",
    "instrumental",
)
_VERSIONS = "|".join(VERSION_WORDS)
BRACKETED_VERSION = re.compile(
    rf"\s*[\(\[][^\)\]]*\b(?:{_VERSIONS})\b[^\)\]]*[\)\]]\s*$", re.IGNORECASE
)
TRAILING_VERSION = re.compile(rf"\s+-\s+[^-]*\b(?:{_VERSIONS})\b.*$", re.IGNORECASE)

# Last.fm routinely carries the guest credit in the artist field where the file
# tag holds only the primary artist -- "Yellowcard feat. Tay Jardine" against a
# tag of "Yellowcard". `with` is deliberately absent: it appears in far too many
# real titles to cut on sight.
GUEST_CREDIT = re.compile(r"\s+(?:feat|ft|featuring)\b.*$", re.IGNORECASE)

LEADING_ARTICLE = re.compile(r"^the\s+")
# Deleted rather than spaced, so "Don't" and "Dont" agree. Every other mark
# becomes a space instead, so "AC/DC", "AC-DC" and "AC DC" all agree too; the
# two rules pull opposite ways and both are needed.
APOSTROPHES = re.compile(r"['‘’ʼ`´]")
NOT_ALPHANUMERIC = re.compile(r"[^0-9a-z ]+")
WHITESPACE = re.compile(r"\s+")


class LastfmError(Exception):
    """A Last.fm request that failed in a way retrying will not fix."""


class LidarrError(Exception):
    """A Lidarr request that failed."""


def normalise(text):
    """Return a comparison key for an artist or a track title.

    Scrobbles and file tags disagree in predictable ways, and every one of them
    has to be flattened or a track that was played reads as one that was not.
    That is the direction that costs music, so this leans towards collapsing too
    much rather than too little: a false match makes something look played, a
    missed match makes something look abandoned.
    """
    if not text:
        return ""
    text = unicodedata.normalize("NFKD", str(text)).casefold()
    text = "".join(character for character in text if not unicodedata.combining(character))
    text = GUEST_CREDIT.sub("", text)
    # A title can carry more than one, e.g. "Song (Live) (Remastered)".
    while True:
        stripped = BRACKETED_VERSION.sub("", text)
        if stripped == text:
            break
        text = stripped
    text = TRAILING_VERSION.sub("", text)
    text = text.replace("&", " and ")
    text = APOSTROPHES.sub("", text)
    text = NOT_ALPHANUMERIC.sub(" ", text)
    text = WHITESPACE.sub(" ", text).strip()
    return LEADING_ARTICLE.sub("", text)


@dataclass(frozen=True)
class Scrobble:
    """One play, as Last.fm recorded it."""

    uts: int
    artist: str
    track: str
    album: str = ""
    artist_mbid: str | None = None
    album_mbid: str | None = None
    track_mbid: str | None = None


def parse_interval(interval):
    """Return seconds for an interval such as ``30m``, ``6h`` or ``90``."""
    text = str(interval).strip().lower()
    match = re.fullmatch(r"([0-9]+)([smhd]?)", text)
    if not match:
        raise ValueError(f"unrecognised interval {interval!r}: expected e.g. 45m, 6h, 1d")
    value = int(match.group(1))
    return value * {"": 1, "s": 1, "m": 60, "h": 3600, "d": 86400}[match.group(2)]


def as_list(value):
    """Return a list for a field Last.fm renders as a bare object when singular."""
    if value is None:
        return []
    if isinstance(value, list):
        return value
    return [value]


def name_of(value):
    """Return the name out of a Last.fm sub-object.

    The same conceptual field is ``#text`` in some responses (recent tracks) and
    ``name`` in others (loved tracks, and anything fetched with extended=1).
    """
    if isinstance(value, dict):
        return (value.get("name") or value.get("#text") or "").strip()
    return (value or "").strip()


def mbid_of(value):
    """Return an MBID, or None where the field is present but empty.

    Last.fm sends an empty string rather than omitting the key, and an empty
    string would otherwise look like a usable join key further down the line.
    """
    if isinstance(value, dict):
        value = value.get("mbid")
    value = (value or "").strip()
    return value or None


def parse_scrobble(entry):
    """Return a Scrobble for one recent-tracks entry, or None to skip it.

    The currently-playing track comes back with no ``date`` at all. Storing it
    would mean a scrobble with no timestamp, and it would arrive again on every
    pass until the song ended, so it is dropped until it has a real one.
    """
    date = entry.get("date") or {}
    if "uts" not in date:
        return None
    artist = name_of(entry.get("artist"))
    track = (entry.get("name") or "").strip()
    if not artist or not track:
        return None
    return Scrobble(
        uts=int(date["uts"]),
        artist=artist,
        track=track,
        album=name_of(entry.get("album")),
        artist_mbid=mbid_of(entry.get("artist")),
        album_mbid=mbid_of(entry.get("album")),
        track_mbid=mbid_of(entry.get("mbid")),
    )


def http_get(url, timeout=30, headers=None):
    """Fetch a URL and return its body. Replaced in tests."""
    request = urllib.request.Request(url, headers=headers or {})
    with urllib.request.urlopen(request, timeout=timeout) as response:  # noqa: S310
        return response.read().decode("utf-8")


class Lastfm:
    """Minimal read-only Last.fm client.

    Only an API key is needed: none of the methods used here authenticate a
    user, so there is no session key, no signing and no secret to hold.
    """

    def __init__(
        self,
        api_key,
        delay=REQUEST_DELAY_SECONDS,
        attempts=5,
        backoff=BACKOFF_SECONDS,
        transport=None,
    ):
        self.api_key = api_key
        self.delay = delay
        self.attempts = attempts
        self.backoff = backoff
        # Resolved here rather than as a default argument so the tests can
        # replace the module-level fetcher.
        self.transport = transport or http_get
        self._previous_request = None

    def call(self, method, params):
        """Return the decoded response for one API method."""
        query = {key: value for key, value in params.items() if value is not None}
        query.update(method=method, api_key=self.api_key, format="json")
        url = f"{API_ROOT}?{urllib.parse.urlencode(query)}"

        for attempt in range(1, self.attempts + 1):
            self._throttle()
            try:
                payload = json.loads(self.transport(url))
            except urllib.error.HTTPError as error:
                if error.code not in RETRYABLE_STATUS:
                    raise LastfmError(f"{method}: HTTP {error.code}") from error
                self._retry_or_raise(method, attempt, f"HTTP {error.code}", error)
                continue
            except (urllib.error.URLError, TimeoutError, json.JSONDecodeError) as error:
                self._retry_or_raise(method, attempt, str(error), error)
                continue

            code = payload.get("error")
            if code is None:
                return payload
            detail = f"error {code}: {payload.get('message', '')}".strip()
            if code not in RETRYABLE_ERRORS:
                raise LastfmError(f"{method}: {detail}")
            self._retry_or_raise(method, attempt, detail, None)

        raise LastfmError(f"{method}: gave up after {self.attempts} attempts")

    def _retry_or_raise(self, method, attempt, detail, cause):
        """Sleep before the next attempt, or give up if this was the last one."""
        if attempt >= self.attempts:
            raise LastfmError(f"{method}: {detail}") from cause
        pause = min(self.backoff * 2 ** (attempt - 1), BACKOFF_CEILING_SECONDS)
        logger.warning("%s: %s; retrying in %.0fs", method, detail, pause)
        time.sleep(pause)

    def _throttle(self):
        """Keep consecutive requests at least `delay` apart."""
        if self.delay <= 0:
            return
        if self._previous_request is not None:
            waited = time.monotonic() - self._previous_request
            if waited < self.delay:
                time.sleep(self.delay - waited)
        self._previous_request = time.monotonic()


class Store:
    """The local scrobble database."""

    def __init__(self, path):
        self.path = Path(path)
        self.path.parent.mkdir(parents=True, exist_ok=True)
        self.connection = sqlite3.connect(self.path)
        self.connection.row_factory = sqlite3.Row
        # WAL so a long backfill does not lock a reader out, and a relaxed sync
        # because the whole store can be rebuilt from Last.fm if a crash eats
        # the tail of it.
        self.connection.execute("PRAGMA journal_mode = WAL")
        self.connection.execute("PRAGMA synchronous = NORMAL")
        # Registered so matching runs in SQL, rather than pulling twenty
        # thousand name pairs into Python to compare them one at a time.
        self.connection.create_function("normalise", 1, normalise, deterministic=True)
        self.connection.executescript(SCHEMA)
        self._check_version()

    def _check_version(self):
        held = self.get_state("schema_version")
        if held is None or held in MIGRATABLE_FROM:
            if held is not None:
                logger.info("store migrated from schema version %s to %s", held, SCHEMA_VERSION)
            self.set_state("schema_version", SCHEMA_VERSION)
        elif held != SCHEMA_VERSION:
            raise RuntimeError(
                f"{self.path} is schema version {held}, this build expects {SCHEMA_VERSION}; "
                "delete it and let it rebuild"
            )

    def close(self):
        self.connection.close()

    def get_state(self, key):
        row = self.connection.execute("SELECT value FROM state WHERE key = ?", (key,)).fetchone()
        return row["value"] if row else None

    def set_state(self, key, value):
        with self.connection:
            self.connection.execute(
                "INSERT INTO state (key, value) VALUES (?, ?)"
                " ON CONFLICT (key) DO UPDATE SET value = excluded.value",
                (key, value),
            )

    def add_scrobbles(self, scrobbles):
        """Insert scrobbles, ignoring any already held. Returns how many were new."""
        if not scrobbles:
            return 0
        with self.connection:
            before = self.connection.total_changes
            self.connection.executemany(
                "INSERT OR IGNORE INTO scrobble"
                " (uts, artist, track, album, artist_mbid, album_mbid, track_mbid)"
                " VALUES (?, ?, ?, ?, ?, ?, ?)",
                [
                    (
                        item.uts,
                        item.artist,
                        item.track,
                        item.album,
                        item.artist_mbid,
                        item.album_mbid,
                        item.track_mbid,
                    )
                    for item in scrobbles
                ],
            )
            return self.connection.total_changes - before

    def replace_loved(self, rows):
        """Replace the loved-track list wholesale, in one transaction."""
        with self.connection:
            self.connection.execute("DELETE FROM loved")
            self.connection.executemany(
                "INSERT OR IGNORE INTO loved (artist, track, track_mbid, loved_at)"
                " VALUES (?, ?, ?, ?)",
                rows,
            )

    def replace_library(self, artists, albums, tracks):
        """Swap in a freshly indexed library, in one transaction."""
        with self.connection:
            for table in ("lidarr_track", "lidarr_album", "lidarr_artist"):
                self.connection.execute(f"DELETE FROM {table}")
            self.connection.executemany(
                "INSERT INTO lidarr_artist (id, mbid, name, norm_name, path, monitored)"
                " VALUES (?, ?, ?, ?, ?, ?)",
                artists,
            )
            self.connection.executemany(
                "INSERT INTO lidarr_album"
                " (id, artist_id, mbid, title, monitored, release_date)"
                " VALUES (?, ?, ?, ?, ?, ?)",
                albums,
            )
            self.connection.executemany(
                "INSERT INTO lidarr_track"
                " (id, artist_id, album_id, recording_mbid, title, norm_artist, norm_title,"
                "  has_file, path, added, duration)"
                " VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)",
                tracks,
            )

    def rebuild_keys(self):
        """Collapse the scrobble history into one row per distinct track.

        Rows whose plays have not changed keep their existing verdict until the
        matcher overwrites it; rows for tracks no longer in the history are
        dropped, so an edited history does not leave orphans behind.
        """
        with self.connection:
            self.connection.execute(
                "DELETE FROM scrobble_key WHERE (artist, track) NOT IN"
                " (SELECT artist, track FROM scrobble)"
            )
            self.connection.execute(
                "INSERT INTO scrobble_key"
                " (artist, track, norm_artist, norm_track, track_mbid, plays,"
                "  first_uts, last_uts)"
                " SELECT artist, track, normalise(artist), normalise(track),"
                "        MAX(track_mbid), COUNT(*), MIN(uts), MAX(uts)"
                " FROM scrobble GROUP BY artist, track"
                " ON CONFLICT (artist, track) DO UPDATE SET"
                "   norm_artist = excluded.norm_artist,"
                "   norm_track  = excluded.norm_track,"
                "   track_mbid  = excluded.track_mbid,"
                "   plays       = excluded.plays,"
                "   first_uts   = excluded.first_uts,"
                "   last_uts    = excluded.last_uts"
            )

    def scalar(self, sql):
        return self.connection.execute(sql).fetchone()[0]

    def newest_uts(self):
        return self.scalar("SELECT MAX(uts) FROM scrobble")

    def oldest_uts(self):
        return self.scalar("SELECT MIN(uts) FROM scrobble")

    def count(self):
        return self.scalar("SELECT COUNT(*) FROM scrobble")


def fetch_page(client, user, to=None, since=None, page=1):
    """Return the scrobbles on one page of the recent-tracks history."""
    payload = client.call(
        "user.getRecentTracks",
        {"user": user, "limit": PAGE_SIZE, "page": page, "from": since, "to": to},
    )
    block = payload.get("recenttracks") or {}
    entries = as_list(block.get("track"))
    parsed = [scrobble for scrobble in map(parse_scrobble, entries) if scrobble is not None]
    attributes = block.get("@attr") or {}
    return parsed, int(attributes.get("totalPages") or 1)


def backfill(client, store, user, now, limit=0):
    """Walk the history backwards until it runs out. Returns scrobbles added.

    Each request asks for the newest page of everything at or before a cursor,
    and the cursor is then moved to the oldest scrobble that came back. There is
    no page number to keep across runs, so an interrupted backfill resumes from
    whatever the database holds.
    """
    if store.get_state("backfill_complete") == "yes":
        return 0

    cursor = store.oldest_uts()
    if cursor is None:
        cursor = now
    page = 1
    added = 0
    requests = 0

    while limit <= 0 or requests < limit:
        scrobbles, _ = fetch_page(client, user, to=cursor, page=page)
        requests += 1
        if not scrobbles:
            store.set_state("backfill_complete", "yes")
            logger.info("backfill complete: %d scrobbles held", store.count())
            return added

        added += store.add_scrobbles(scrobbles)
        page_oldest = min(scrobble.uts for scrobble in scrobbles)
        if page_oldest < cursor:
            cursor, page = page_oldest, 1
        else:
            # Every scrobble on this page shares the cursor's second. Moving the
            # window would step over the rest of them, so take the next page of
            # the same window instead.
            page += 1
        logger.info("backfill: %d added, reached %s", added, format_time(page_oldest))

    logger.info("backfill paused after %d requests; resumes next pass", requests)
    return added


def catch_up(client, store, user, now):
    """Fetch everything scrobbled since the newest scrobble held.

    Bounded at both ends, so the window cannot shift under the paging while new
    scrobbles arrive mid-run; anything that lands during the pass is picked up
    by the next one.
    """
    newest = store.newest_uts()
    if newest is None:
        return 0

    added = 0
    page = 1
    while True:
        scrobbles, total_pages = fetch_page(client, user, to=now, since=newest, page=page)
        added += store.add_scrobbles(scrobbles)
        if page >= total_pages:
            return added
        page += 1


def sync_loved(client, store, user):
    """Rebuild the loved-track table. Returns how many are loved."""
    rows = []
    page = 1
    while True:
        payload = client.call(
            "user.getLovedTracks", {"user": user, "limit": PAGE_SIZE, "page": page}
        )
        block = payload.get("lovedtracks") or {}
        for entry in as_list(block.get("track")):
            artist = name_of(entry.get("artist"))
            track = (entry.get("name") or "").strip()
            if not artist or not track:
                continue
            loved_at = (entry.get("date") or {}).get("uts")
            rows.append((artist, track, mbid_of(entry.get("mbid")), int(loved_at or 0) or None))
        total_pages = int((block.get("@attr") or {}).get("totalPages") or 1)
        if page >= total_pages:
            break
        page += 1

    # Written only once the whole list has been fetched: a failure halfway
    # through must not leave a truncated set of protected tracks behind.
    store.replace_loved(rows)
    return len(rows)


class Lidarr:
    """Minimal read-only Lidarr client.

    No retries: Lidarr is on the same LAN as this, and a failure there means it
    is down or the key is wrong, neither of which improves on a second attempt.
    """

    def __init__(self, url, api_key, timeout=60, transport=None):
        self.root = url.rstrip("/")
        self.api_key = api_key
        self.timeout = timeout
        self.transport = transport or http_get

    def get(self, path, params=None):
        """Return the decoded response for one API path."""
        query = urllib.parse.urlencode(params or {})
        url = f"{self.root}/api/v1/{path}" + (f"?{query}" if query else "")
        try:
            body = self.transport(url, timeout=self.timeout, headers={"X-Api-Key": self.api_key})
        except urllib.error.HTTPError as error:
            detail = error_detail(error)
            raise LidarrError(f"GET {url}: HTTP {error.code}{': ' + detail if detail else ''}")
        except (urllib.error.URLError, TimeoutError) as error:
            raise LidarrError(f"GET {url}: {error}") from error
        try:
            return json.loads(body)
        except json.JSONDecodeError as error:
            raise LidarrError(f"GET {url}: malformed response") from error


def error_detail(error, limit=300):
    """Return whatever the server said about a failure, for the log.

    A bare status code sends you looking in the wrong place; Lidarr puts the
    actual exception in the body.
    """
    try:
        body = error.read().decode("utf-8", "replace").strip()
    except Exception:  # noqa: BLE001 - diagnostics must never raise
        return ""
    if not body:
        return ""
    try:
        payload = json.loads(body)
    except json.JSONDecodeError:
        return body[:limit]
    for key in ("message", "description", "error"):
        if payload.get(key):
            return str(payload[key])[:limit]
    return body[:limit]


def parse_added(value):
    """Return a unix timestamp for a Lidarr ISO-8601 date, or None."""
    if not value:
        return None
    try:
        return int(datetime.fromisoformat(str(value).replace("Z", "+00:00")).timestamp())
    except ValueError:
        return None


def fetch_albums(client, artists):
    """Return albums grouped by artist id, plus the artists whose albums failed.

    Every album endpoint maps through a resource that picks the release with
    `SingleOrDefault(x => x.Monitored)`, which throws for an album with two
    monitored releases -- "Sequence contains more than one element" -- and takes
    the entire response down with it.

    The unfiltered endpoint is one request and is the only one that also skips
    albums whose artist metadata is missing, so it is tried first. When it dies,
    asking per artist confines the loss to whichever artist owns the offending
    album, and names them, which is the only way to find it.
    """
    try:
        grouped = {}
        for album in client.get("album"):
            grouped.setdefault(album.get("artistId"), []).append(album)
        return grouped, []
    except LidarrError as error:
        logger.warning("fetching all albums failed (%s)", error)
        logger.warning("falling back to one request per artist to isolate the bad album")

    grouped, failed = {}, []
    for artist in artists:
        artist_id = artist["id"]
        try:
            grouped[artist_id] = client.get("album", {"artistId": artist_id})
        except LidarrError as error:
            name = artist.get("artistName") or str(artist_id)
            logger.warning("could not fetch albums for %s: %s", name, error)
            failed.append(name)
    return grouped, failed


def index_library(client, store):
    """Rebuild the library index from Lidarr. Returns (artists, tracks).

    Rebuilt wholesale rather than reconciled: Lidarr is the authority, the index
    is small, and a delete in Lidarr has to disappear here or it lingers as a
    library entry with no file behind it.
    """
    artists = client.get("artist")
    artist_rows, album_rows, track_rows = [], [], []
    skipped = []

    albums_by_artist, album_failures = fetch_albums(client, artists)

    for artist in artists:
        artist_id = artist["id"]
        name = artist.get("artistName") or ""
        artist_rows.append(
            (
                artist_id,
                mbid_of(artist.get("foreignArtistId")),
                name,
                normalise(name),
                artist.get("path"),
                1 if artist.get("monitored") else 0,
            )
        )

        for album in albums_by_artist.get(artist_id, []):
            album_rows.append(
                (
                    album["id"],
                    artist_id,
                    mbid_of(album.get("foreignAlbumId")),
                    album.get("title") or "",
                    1 if album.get("monitored") else 0,
                    (album.get("releaseDate") or "")[:10] or None,
                )
            )

        # Tracks and files have no unfiltered endpoint -- Lidarr rejects a call
        # with no filter at all -- so these stay per artist. One artist it
        # cannot serve must not cost the whole index, but it cannot pass
        # silently either: their tracks end up absent, and every scrobble of
        # theirs then reads as unmatched.
        try:
            # Paths and the date a track landed live on the file, not the track.
            files = {
                handle["id"]: handle
                for handle in client.get("trackfile", {"artistId": artist_id})
            }
            tracks = client.get("track", {"artistId": artist_id})
        except LidarrError as error:
            logger.warning("could not index %s: %s", name or artist_id, error)
            skipped.append(name or str(artist_id))
            continue

        for track in tracks:
            handle = files.get(track.get("trackFileId") or 0) or {}
            title = track.get("title") or ""
            track_rows.append(
                (
                    track["id"],
                    artist_id,
                    track.get("albumId") or 0,
                    mbid_of(track.get("foreignRecordingId")),
                    title,
                    normalise(name),
                    normalise(title),
                    1 if track.get("hasFile") else 0,
                    handle.get("path"),
                    parse_added(handle.get("dateAdded")),
                    track.get("duration"),
                )
            )

    store.replace_library(artist_rows, album_rows, track_rows)
    store.set_state("index_skipped", str(len(skipped)))
    store.set_state("index_albums_skipped", str(len(album_failures)))
    logger.info(
        "library indexed: %d artists, %d albums, %d tracks (%d with files)",
        len(artist_rows),
        len(album_rows),
        len(track_rows),
        sum(row[7] for row in track_rows),
    )
    if skipped:
        logger.warning(
            "%d artists could not be indexed, so their tracks are missing: %s",
            len(skipped),
            ", ".join(sorted(skipped)[:10]),
        )
    if album_failures:
        logger.warning(
            "no albums indexed for %d artists: %s."
            " In Lidarr, open each one and check the Releases tab of their albums:"
            " exactly one release per album may be monitored.",
            len(album_failures),
            ", ".join(sorted(album_failures)[:10]),
        )
    return len(artist_rows), len(track_rows)


def match_library(store):
    """Tie every distinct thing listened to back to a library track.

    Two tiers. A MusicBrainz recording id is an exact join and is tried first;
    everything else falls to the normalised name pair. There is no third tier on
    purpose -- a guess that is nearly right is worse here than an admitted miss,
    because the whole point of the number this produces is to say how far the
    matching can be trusted.
    """
    store.rebuild_keys()
    with store.connection:
        store.connection.execute("UPDATE scrobble_key SET track_id = NULL, method = 'none'")
        store.connection.execute(
            "UPDATE scrobble_key SET"
            "   track_id = (SELECT t.id FROM lidarr_track t"
            "               WHERE t.recording_mbid = scrobble_key.track_mbid"
            "               ORDER BY t.has_file DESC, t.id LIMIT 1),"
            "   method = 'mbid'"
            " WHERE track_mbid IS NOT NULL"
            "   AND EXISTS (SELECT 1 FROM lidarr_track t"
            "               WHERE t.recording_mbid = scrobble_key.track_mbid)"
        )
        store.connection.execute(
            "UPDATE scrobble_key SET"
            "   track_id = (SELECT t.id FROM lidarr_track t"
            "               WHERE t.norm_artist = scrobble_key.norm_artist"
            "                 AND t.norm_title = scrobble_key.norm_track"
            "               ORDER BY t.has_file DESC, t.id LIMIT 1),"
            "   method = 'name'"
            " WHERE track_id IS NULL"
            "   AND norm_artist <> '' AND norm_track <> ''"
            "   AND EXISTS (SELECT 1 FROM lidarr_track t"
            "               WHERE t.norm_artist = scrobble_key.norm_artist"
            "                 AND t.norm_title = scrobble_key.norm_track)"
        )


def format_time(uts):
    """Return a UTC timestamp as a readable date."""
    if uts is None:
        return "never"
    return datetime.fromtimestamp(uts, tz=timezone.utc).strftime("%Y-%m-%d %H:%M")


def coverage_report(store):
    """Log how much of the listening history could be tied to the library.

    The split that matters is not matched against unmatched. Most unmatched
    listening is music that was never in the library at all, which says nothing
    about the matcher. The number to watch is unmatched listening by an artist
    the library *does* hold: that is a track that was played, sitting next to a
    file it should have matched, and every one of those is a candidate for being
    wrongly called cold later on.
    """
    tracks = store.scalar("SELECT COUNT(*) FROM lidarr_track")
    if not tracks:
        return

    pairs = store.scalar("SELECT COUNT(*) FROM scrobble_key")
    if not pairs:
        return

    logger.info("--- match coverage ---")
    skipped = int(store.get_state("index_skipped") or 0)
    if skipped:
        logger.warning(
            "the index is incomplete: %d artists are missing their tracks, so every"
            " figure below is a floor. Do not cull against it.",
            skipped,
        )
    albums_skipped = int(store.get_state("index_albums_skipped") or 0)
    if albums_skipped:
        logger.warning(
            "%d artists have no albums indexed. Matching is unaffected -- it runs off"
            " tracks -- but a cull cannot be run until this is fixed.",
            albums_skipped,
        )
    for method in ("mbid", "name", "none"):
        row = store.connection.execute(
            "SELECT COUNT(*) AS pairs, COALESCE(SUM(plays), 0) AS plays"
            " FROM scrobble_key WHERE method = ?",
            (method,),
        ).fetchone()
        logger.info(
            "%-5s: %6d pairs (%4.1f%%), %7d plays",
            method,
            row["pairs"],
            100 * row["pairs"] / pairs,
            row["plays"],
        )

    suspect = store.connection.execute(
        "SELECT COUNT(*) AS pairs, COALESCE(SUM(plays), 0) AS plays FROM scrobble_key k"
        " WHERE k.track_id IS NULL"
        "   AND EXISTS (SELECT 1 FROM lidarr_artist a WHERE a.norm_name = k.norm_artist)"
    ).fetchone()
    logger.info(
        "unmatched by an artist the library holds: %d pairs, %d plays -- these are the"
        " matcher's misses, not music you do not own",
        suspect["pairs"],
        suspect["plays"],
    )

    with_files = store.scalar("SELECT COUNT(*) FROM lidarr_track WHERE has_file = 1")
    played = store.scalar(
        "SELECT COUNT(DISTINCT k.track_id) FROM scrobble_key k"
        " JOIN lidarr_track t ON t.id = k.track_id WHERE t.has_file = 1"
    )
    logger.info(
        "library tracks with a file: %d, of which played at least once: %d (%.1f%%)",
        with_files,
        played,
        100 * played / with_files if with_files else 0,
    )

    worst = store.connection.execute(
        "SELECT k.artist, k.track, k.plays FROM scrobble_key k"
        " WHERE k.track_id IS NULL"
        "   AND EXISTS (SELECT 1 FROM lidarr_artist a WHERE a.norm_name = k.norm_artist)"
        " ORDER BY k.plays DESC, k.artist LIMIT 15"
    ).fetchall()
    for position, row in enumerate(worst, start=1):
        label = f"{row['artist']} - {row['track']}"
        logger.info("  unmatched %2d: %-60s %d plays", position, label[:60], row["plays"])


def report(store, now):
    """Log what the store holds.

    The MBID coverage line is the one to watch: scrobbles carrying a MusicBrainz
    recording id can be joined to the library exactly, and everything else has
    to go through name matching. That percentage predicts how well the next
    stage will work, and whether it can be trusted to decide what is unplayed.
    """
    total = store.count()
    logger.info("scrobbles: %d", total)
    if not total:
        return

    with_mbid = store.scalar("SELECT COUNT(*) FROM scrobble WHERE track_mbid IS NOT NULL")
    logger.info(
        "range: %s to %s", format_time(store.oldest_uts()), format_time(store.newest_uts())
    )
    logger.info("distinct artists: %d", store.scalar("SELECT COUNT(DISTINCT artist) FROM scrobble"))
    logger.info(
        "distinct tracks: %d",
        store.scalar("SELECT COUNT(DISTINCT artist || ' - ' || track) FROM scrobble"),
    )
    logger.info("recording MBID present: %d (%.1f%%)", with_mbid, 100 * with_mbid / total)
    logger.info("loved tracks: %d", store.scalar("SELECT COUNT(*) FROM loved"))
    logger.info("backfill complete: %s", store.get_state("backfill_complete") == "yes")

    top = store.connection.execute(
        "SELECT artist, COUNT(*) AS plays FROM scrobble"
        " GROUP BY artist ORDER BY plays DESC, artist LIMIT 10"
    ).fetchall()
    for position, row in enumerate(top, start=1):
        logger.info("  top artist %2d: %-40s %d", position, row["artist"][:40], row["plays"])

    coverage_report(store)

    recent = store.connection.execute(
        "SELECT artist, track, COUNT(*) AS plays FROM scrobble WHERE uts >= ?"
        " GROUP BY artist, track ORDER BY plays DESC, artist LIMIT 10",
        (now - 90 * 86400,),
    ).fetchall()
    for position, row in enumerate(recent, start=1):
        label = f"{row['artist']} - {row['track']}"
        logger.info("  top track 90d %2d: %-50s %d", position, label[:50], row["plays"])


def run_once(client, store, user, now, backfill_limit, lidarr=None):
    """Run a single pass. Returns the number of scrobbles added."""
    started = time.monotonic()
    added = catch_up(client, store, user, now)
    added += backfill(client, store, user, now, limit=backfill_limit)
    loved = sync_loved(client, store, user)

    if lidarr is not None:
        index_library(lidarr, store)
    # Matching is worth redoing even without a fresh index: new scrobbles have
    # arrived, and they need a verdict too.
    if store.scalar("SELECT COUNT(*) FROM lidarr_track"):
        match_library(store)

    logger.info(
        "pass complete in %.1fs: %d scrobbles added, %d loved",
        time.monotonic() - started,
        added,
        loved,
    )
    return added


def acquire_lock(database):
    """Take an exclusive lock so two passes cannot ingest into one store."""
    database.parent.mkdir(parents=True, exist_ok=True)
    handle = open(database.with_suffix(".lock"), "w")  # noqa: SIM115 - held for the process
    try:
        fcntl.flock(handle, fcntl.LOCK_EX | fcntl.LOCK_NB)
    except OSError:
        handle.close()
        return None
    return handle


def build_parser():
    """Return the argument parser. Every option also reads an environment
    variable, so the container can be configured without a command line."""
    parser = argparse.ArgumentParser(
        prog="music-curator",
        description="Ingest a Last.fm scrobble history into a local store.",
    )
    parser.add_argument(
        "--user",
        default=os.getenv("MUSIC_CURATOR_LASTFM_USER"),
        help="Last.fm username to read (env MUSIC_CURATOR_LASTFM_USER)",
    )
    parser.add_argument(
        "--api-key",
        default=os.getenv("MUSIC_CURATOR_LASTFM_API_KEY"),
        help="Last.fm API key (env MUSIC_CURATOR_LASTFM_API_KEY)",
    )
    parser.add_argument(
        "--db",
        default=os.getenv("MUSIC_CURATOR_DB", "/data/curator.db"),
        help="path to the SQLite store (env MUSIC_CURATOR_DB)",
    )
    parser.add_argument(
        "--interval",
        default=os.getenv("MUSIC_CURATOR_INTERVAL"),
        help="repeat forever, waiting this long between passes, e.g. 6h (env MUSIC_CURATOR_INTERVAL)",
    )
    parser.add_argument(
        "--request-delay",
        type=float,
        default=float(os.getenv("MUSIC_CURATOR_REQUEST_DELAY", REQUEST_DELAY_SECONDS)),
        help="seconds between API requests (env MUSIC_CURATOR_REQUEST_DELAY)",
    )
    parser.add_argument(
        "--backfill-limit",
        type=int,
        default=int(os.getenv("MUSIC_CURATOR_BACKFILL_LIMIT", "0")),
        help="cap the backfill at this many requests per pass; 0 for no cap"
        " (env MUSIC_CURATOR_BACKFILL_LIMIT)",
    )
    parser.add_argument(
        "--lidarr-url",
        default=os.getenv("MUSIC_CURATOR_LIDARR_URL"),
        help="base URL of Lidarr, e.g. http://lidarr:8686 (env MUSIC_CURATOR_LIDARR_URL)",
    )
    parser.add_argument(
        "--lidarr-api-key",
        default=os.getenv("MUSIC_CURATOR_LIDARR_API_KEY"),
        help="Lidarr API key (env MUSIC_CURATOR_LIDARR_API_KEY)",
    )
    parser.add_argument(
        "--skip-index",
        action="store_true",
        help="do not re-index the library this pass; match against the index already held",
    )
    parser.add_argument(
        "--report-only",
        action="store_true",
        help="report on the existing store without fetching anything",
    )
    return parser


def main(argv=None, clock=time.time):
    """Entry point. Returns a process exit code."""
    logging.basicConfig(format="%(asctime)s %(levelname)s %(message)s", level=logging.INFO)
    args = build_parser().parse_args(argv)

    if not args.report_only and (not args.user or not args.api_key):
        logger.error("both a Last.fm user and an API key are required")
        return 2

    try:
        interval = parse_interval(args.interval) if args.interval else None
    except ValueError as error:
        logger.error("%s", error)
        return 2

    database = Path(args.db).resolve()
    lock = acquire_lock(database)
    if lock is None:
        logger.error("another pass is already using %s", database)
        return 3

    store = Store(database)

    if args.report_only:
        report(store, int(clock()))
        store.close()
        lock.close()
        return 0

    client = Lastfm(args.api_key, delay=args.request_delay)

    lidarr = None
    if args.lidarr_url and args.lidarr_api_key and not args.skip_index:
        lidarr = Lidarr(args.lidarr_url, args.lidarr_api_key)
    elif not args.lidarr_url:
        logger.info("no Lidarr URL configured; ingesting scrobbles only")

    stopping = False

    def stop(signum, _frame):
        nonlocal stopping
        stopping = True
        logger.info("signal %d received; finishing the current pass", signum)

    signal.signal(signal.SIGTERM, stop)
    signal.signal(signal.SIGINT, stop)

    try:
        while True:
            now = int(clock())
            try:
                run_once(client, store, args.user, now, args.backfill_limit, lidarr)
            except (LastfmError, LidarrError) as error:
                logger.error("%s", error)
                if interval is None:
                    return 1
            report(store, now)

            if interval is None or stopping:
                return 0
            logger.info("sleeping %ds", interval)
            for _ in range(interval):
                if stopping:
                    return 0
                time.sleep(1)
    finally:
        store.close()
        lock.close()


def run():
    """Console-script entry point."""
    sys.exit(main())


if __name__ == "__main__":
    run()