mdw@git.distorted.org.uk Git - epls/blob - mkm3u

   1 #! /usr/bin/python3
   2 ### -*- mode: python; coding: utf-8 -*-
   3
   4 from contextlib import contextmanager
   5 import optparse as OP
   6 import os as OS
   7 import re as RX
   8 import sys as SYS
   9
  10 class ExpectedError (Exception): pass
  11
  12 @contextmanager
  13 def location(loc):
  14   global LOC
  15   old, LOC = LOC, loc
  16   yield loc
  17   LOC = old
  18
  19 def filter(value, func = None, dflt = None):
  20   if value is None: return dflt
  21   elif func is None: return value
  22   else: return func(value)
  23
  24 def check(cond, msg):
  25   if not cond: raise ExpectedError(msg)
  26
  27 def lookup(dict, key, msg):
  28   try: return dict[key]
  29   except KeyError: raise ExpectedError(msg)
  30
  31 def forget(dict, key):
  32   try: del dict[key]
  33   except KeyError: pass
  34
  35 def getint(s):
  36   if not s.isdigit(): raise ExpectedError("bad integer `%s'" % s)
  37   return int(s)
  38
  39 class Words (object):
  40   def __init__(me, s):
  41     me._s = s
  42     me._i, me._n = 0, len(s)
  43   def _wordstart(me):
  44     s, i, n = me._s, me._i, me._n
  45     while i < n:
  46       if not s[i].isspace(): return i
  47       i += 1
  48     return -1
  49   def nextword(me):
  50     s, n = me._s, me._n
  51     begin = i = me._wordstart()
  52     if begin < 0: return None
  53     while i < n and not s[i].isspace(): i += 1
  54     me._i = i
  55     return s[begin:i]
  56   def rest(me):
  57     s, n = me._s, me._n
  58     begin = me._wordstart()
  59     if begin < 0: return None
  60     else: return s[begin:].rstrip()
  61
  62 URL_SAFE_P = 256*[False]
  63 for ch in \
  64     b"ABCDEFGHIJKLMNOPQRSTUVWXYZ" \
  65     b"abcdefghijklmnopqrstuvwxyz" \
  66     b"0123456789" b"!$%-.,/":
  67   URL_SAFE_P[ch] = True
  68 def urlencode(s):
  69   return "".join((URL_SAFE_P[ch] and chr(ch) or "%%%02x" % ch
  70                   for ch in s.encode("UTF-8")))
  71
  72 PROG = OS.path.basename(SYS.argv[0])
  73
  74 class BaseLocation (object):
  75   def report(me, exc):
  76     SYS.stderr.write("%s: %s%s\n" % (PROG, me._loc(), exc))
  77
  78 class DummyLocation (BaseLocation):
  79   def _loc(me): return ""
  80
  81 class FileLocation (BaseLocation):
  82   def __init__(me, fn, lno = 1): me._fn, me._lno = fn, lno
  83   def _loc(me): return "%s:%d: " % (me._fn, me._lno)
  84   def stepline(me): me._lno += 1
  85
  86 LOC = DummyLocation()
  87
  88 class Source (object):
  89   PREFIX = ""
  90   TITLEP = CHAPTERP = False
  91   def __init__(me, fn):
  92     me.fn = fn
  93     me.neps = None
  94     me.used_titles = dict()
  95     me.used_chapters = set()
  96     me.nuses = 0
  97   def url(me, title = None, start_chapter = None, end_chapter = None):
  98     if title == "-":
  99       if me.TITLEP: raise ExpectedError("missing title number")
 100       if start_chapter is not None or end_chapter is not None:
 101         raise ExpectedError("can't specify chapter without title")
 102       suffix = ""
 103     elif not me.TITLEP:
 104       raise ExpectedError("can't specify title with `%s'" % me.fn)
 105     elif start_chapter is None:
 106       if end_chapter is not None:
 107         raise ExpectedError("can't specify end chapter without start chapter")
 108       suffix = "#%d" % title
 109     elif not me.CHAPTERP:
 110       raise ExpectedError("can't specify chapter with `%s'" % me.fn)
 111     elif end_chapter is None:
 112       suffix = "#%d:%d" % (title, start_chapter)
 113     else:
 114       suffix = "#%d:%d-%d:%d" % (title, start_chapter, title, end_chapter - 1)
 115     if end_chapter is not None:
 116       keys = [(title, ch) for ch in range(start_chapter, end_chapter)]
 117       set = me.used_chapters
 118     else:
 119       keys, set = [title], me.used_titles
 120     for k in keys:
 121       if k in set:
 122         if title == "-":
 123           raise ExpectedError("`%s' already used" % me.fn)
 124         elif end_chapter is None:
 125           raise ExpectedError("`%s' title %d already used" % (me.fn, title))
 126         else:
 127           raise ExpectedError("`%s' title %d chapter %d already used" %
 128                               (me.fn, title, k[1]))
 129     if end_chapter is not None:
 130       for ch in range(start_chapter, end_chapter):
 131         me.used_chapters.add((title, ch))
 132     return me.PREFIX + ROOT + urlencode(me.fn) + suffix
 133
 134 class VideoDisc (Source):
 135   PREFIX = "dvd://"
 136   TITLEP = CHAPTERP = True
 137
 138   def __init__(me, fn, *args, **kw):
 139     super().__init__(fn, *args, **kw)
 140     me.neps = 0
 141
 142 class VideoSeason (object):
 143   def __init__(me, i, title):
 144     me.i = i
 145     me.title = title
 146     me.episodes = {}
 147   def set_episode_disc(me, i, disc):
 148     if i in me.episodes:
 149       raise ExpectedError("season %d episode %d already taken" % (me.i, i))
 150     me.episodes[i] = disc; disc.neps += 1
 151
 152 def some_group(m, *gg):
 153   for g in gg:
 154     s = m.group(g)
 155     if s is not None: return s
 156   return None
 157
 158 class VideoDir (object):
 159
 160   _R_ISO_PRE = RX.compile(r""" ^
 161         (?: S (?P<si> \d+)
 162               (?: \. \ (?P<st> .*) — (?: D \d+ \. \ )? |
 163                   D \d+ \. \ |
 164                   (?= E \d+ \. \ ) |
 165                   \. \ ) |
 166             \d+ \. \ )
 167         (?: (?P<eplist>
 168              (?: S \d+ \ )? E \d+ (?: – \d+)?
 169              (?: , \ (?: S \d+ \ )? E \d+ (?: – \d+)?)*) |
 170             (?P<epname> E \d+) \. \ .*)
 171         \. iso $
 172   """, RX.X)
 173
 174   _R_ISO_EP = RX.compile(r""" ^
 175         (?: S (?P<si> \d+) \ )?
 176         E (?P<ei> \d+) (?: – (?P<ej> \d+))? $
 177   """, RX.X)
 178
 179   def __init__(me, dir):
 180     me.dir = dir
 181     fns = OS.listdir(OS.path.join(ROOT, dir))
 182     fns.sort()
 183     season = None
 184     seasons = {}
 185     for fn in fns:
 186       path = OS.path.join(dir, fn)
 187       if not fn.endswith(".iso"): continue
 188       m = me._R_ISO_PRE.match(fn)
 189       if not m:
 190         #print(";; `%s' ignored" % path, file = SYS.stderr)
 191         continue
 192
 193       i = filter(m.group("si"), int)
 194       stitle = m.group("st")
 195       check(i is not None or stitle is None,
 196             "explicit season title without number in `%s'" % fn)
 197       if i is not None:
 198         if season is None or i != season.i:
 199           check(season is None or i == season.i + 1,
 200                 "season %d /= %d" %
 201                   (i, season is None and -1 or season.i + 1))
 202           check(i not in seasons, "season %d already seen" % i)
 203           seasons[i] = season = VideoSeason(i, stitle)
 204         else:
 205           check(stitle == season.title,
 206                 "season title `%s' /= `%s'" % (stitle, season.title))
 207
 208       disc = VideoDisc(path)
 209       ts = season
 210       any, bad = False, False
 211       epname = m.group("epname")
 212       if epname is not None: eplist = [epname]
 213       else: eplist = m.group("eplist").split(", ")
 214       for eprange in eplist:
 215         mm = me._R_ISO_EP.match(eprange)
 216         if mm is None: bad = True; continue
 217         if not any:
 218           #print(";; `%s'" % path, file = SYS.stderr)
 219           any = True
 220         i = filter(mm.group("si"), int)
 221         if i is not None:
 222           try: ts = seasons[i]
 223           except KeyError: ts = seasons[i] = VideoSeason(i, None)
 224         if ts is None:
 225           ts = season = seasons[1] = VideoSeason(1, None)
 226         start = filter(mm.group("ei"), int)
 227         end = filter(mm.group("ej"), int, start)
 228         for k in range(start, end + 1):
 229           ts.set_episode_disc(k, disc)
 230           #print(";;\tepisode %d.%d" % (ts.i, k), file = SYS.stderr)
 231       if not any: pass #print(";; `%s' ignored" % path, file = SYS.stderr)
 232       elif bad: raise ExpectedError("bad ep list in `%s'", fn)
 233     me.seasons = seasons
 234
 235 class AudioDisc (Source):
 236   PREFIX = "file://"
 237   TITLEP = CHAPTERP = False
 238
 239 class AudioEpisode (Source):
 240   PREFIX = "file://"
 241   TITLEP = CHAPTERP = False
 242   def __init__(me, fn, i, *args, **kw):
 243     super().__init__(fn, *args, **kw)
 244     me.i = i
 245
 246 class AudioDir (object):
 247
 248   _R_FLAC = RX.compile(r""" ^
 249           E (\d+)
 250           (?: \. \ (.*))?
 251           \. flac $
 252   """, RX.X)
 253
 254   def __init__(me, dir):
 255     me.dir = dir
 256     fns = OS.listdir(OS.path.join(ROOT, dir))
 257     fns.sort()
 258     episodes = {}
 259     last_i = 0
 260     for fn in fns:
 261       path = OS.path.join(dir, fn)
 262       if not fn.endswith(".flac"): continue
 263       m = me._R_FLAC.match(fn)
 264       if not m: continue
 265       i = filter(m.group(1), int)
 266       etitle = m.group(2)
 267       check(i == last_i + 1, "episode %d /= %d" % (i, last_i + 1))
 268       episodes[i] = AudioEpisode(path, i)
 269       last_i = i
 270     me.episodes = episodes
 271
 272 class Chapter (object):
 273   def __init__(me, episode, title, i):
 274     me.title, me.i = title, i
 275     me.url = episode.source.url(episode.tno, i, i + 1)
 276
 277 class Episode (object):
 278   def __init__(me, season, i, neps, title, src, tno = None, startch = None):
 279     me.season = season
 280     me.i, me.neps, me.title = i, neps, title
 281     me.chapters = []
 282     me.source, me.tno = src, tno
 283     me.url = src.url(tno, startch, None)
 284   def add_chapter(me, title, j):
 285     ch = Chapter(me, title, j)
 286     me.chapters.append(ch)
 287     return ch
 288   def label(me):
 289     return me.season._eplabel(me.i, me.neps, me.title)
 290
 291 class BaseSeason (object):
 292   def __init__(me, series, implicitp = False):
 293     me.series = series
 294     me.episodes = []
 295     me.implicitp = implicitp
 296     me.ep_i, episodes = 1, []
 297   def add_episode(me, j, neps, title, src, tno, startch):
 298     ep = Episode(me, j, neps, title, src, tno, startch)
 299     me.episodes.append(ep)
 300     src.nuses += neps; me.ep_i += neps
 301     return ep
 302   def _epnames(me, i, neps):
 303     playlist = me.series.playlist
 304     if neps == 1: return playlist.epname, "%d" % i
 305     elif neps == 2: return playlist.epnames, "%d, %d" % (i, i + 1)
 306     else: return playlist.epnames, "%d–%d" % (i, i + neps - 1)
 307
 308 class Season (BaseSeason):
 309   def __init__(me, series, title, i, *args, **kw):
 310     super().__init__(series, *args, **kw)
 311     me.title, me.i = title, i
 312   def _eplabel(me, i, neps, title):
 313     epname, epn = me._epnames(i, neps)
 314     if title is None:
 315       if me.implicitp: label = "%s %s" % (epname, epn)
 316       elif me.title is None: label = "%s %d.%s" % (epname, me.i, epn)
 317       else: label = "%s—%s %s" % (me.title, epname, epn)
 318     else:
 319       if me.implicitp: label = "%s. %s" % (epn, title)
 320       elif me.title is None: label = "%d.%s. %s" % (me.i, epn, title)
 321       else: label = "%s—%s. %s" % (me.title, epn, title)
 322     return label
 323
 324 class MovieSeason (BaseSeason):
 325   def __init__(me, series, *args, **kw):
 326     me.i = None
 327   def add_episode(me, j, neps, title, src, tno, startch):
 328     if title is None: raise ExpectedError("movie must have a title")
 329     return super().add_episode(j, neps, title, src, tno, startch)
 330   def _eplabel(me, i, epn, title):
 331     return title
 332
 333 class Series (object):
 334   def __init__(me, playlist, title = None):
 335     me.playlist = playlist
 336     me.title = title
 337     me.cur_season = None
 338   def _add_season(me, season):
 339     me.cur_season = season
 340   def add_season(me, title, i, implicitp = False):
 341     me._add_season(Season(me, title, i, implicitp))
 342   def add_movies(me):
 343     me._add_season(MovieSeason(me))
 344   def ensure_season(me):
 345     if me.cur_season is None: me.add_season(None, 1, implicitp = True)
 346     return me.cur_season
 347   def end_season(me):
 348     me.cur_season = None
 349
 350 class Playlist (object):
 351   def __init__(me):
 352     me.seasons = []
 353     me.episodes = []
 354     me.epname, me.epnames = "Episode", "Episodes"
 355     me.nseries = 0
 356   def add_episode(me, episode):
 357     me.episodes.append(episode)
 358   def done_season(me):
 359     if me.episodes:
 360       me.seasons.append(me.episodes)
 361       me.episodes = []
 362   def write(me, f):
 363     f.write("#EXTM3U\n")
 364     for season in me.seasons:
 365       f.write("\n")
 366       for ep in season:
 367         label = ep.label()
 368         if me.nseries > 1: label = ep.season.series.title + " " + label
 369         if not ep.chapters:
 370           f.write("#EXTINF:0,,%s\n%s\n" % (label, ep.url))
 371         else:
 372           for ch in ep.chapters:
 373             f.write("#EXTINF:0,,%s: %s\n%s\n" %
 374                     (label, ch.title, ch.url))
 375
 376 MODE_UNSET = 0
 377 MODE_SINGLE = 1
 378 MODE_MULTI = 2
 379
 380 class EpisodeListParser (object):
 381
 382   def __init__(me, series_wanted = None, chapters_wanted_p = False):
 383     me._pl = Playlist()
 384     me._cur_episode = me._cur_chapter = None
 385     me._series = {}; me._vdirs = {}; me._audirs = {}; me._isos = {}
 386     me._series_wanted = series_wanted
 387     me._chaptersp = chapters_wanted_p
 388     if series_wanted is None: me._mode = MODE_UNSET
 389     else: me._mode = MODE_MULTI
 390
 391   def _bad_keyval(me, cmd, k, v):
 392     raise ExpectedError("invalid `!%s' option `%s'" %
 393                           (cmd, v if k is None else k))
 394
 395   def _keyvals(me, opts):
 396     if opts is not None:
 397       for kv in opts.split(","):
 398         try: sep = kv.index("=")
 399         except ValueError: yield None, kv
 400         else: yield kv[:sep], kv[sep + 1:]
 401
 402   def _set_mode(me, mode):
 403     if me._mode == MODE_UNSET:
 404       me._mode = mode
 405     elif me._mode != mode:
 406       raise ExpectedError("inconsistent single-/multi-series usage")
 407
 408   def _get_series(me, name):
 409     if name is None:
 410       me._set_mode(MODE_SINGLE)
 411       try: series = me._series[None]
 412       except KeyError:
 413         series = me._series[None] = Series(me._pl)
 414         me._pl.nseries += 1
 415     else:
 416       me._set_mode(MODE_MULTI)
 417       series = lookup(me._series, name, "unknown series `%s'" % name)
 418     return series
 419
 420   def _opts_series(me, cmd, opts):
 421     name = None
 422     for k, v in me._keyvals(opts):
 423       if k is None: name = v
 424       else: me._bad_keyval(cmd, k, v)
 425     return me._get_series(name), name
 426
 427   def _wantedp(me, name):
 428     return me._series_wanted is None or name in me._series_wanted
 429
 430   def _process_cmd(me, ww):
 431
 432     cmd = ww.nextword(); check(cmd is not None, "missing command")
 433     try: sep = cmd.index(":")
 434     except ValueError: opts = None
 435     else: cmd, opts = cmd[:sep], cmd[sep + 1:]
 436
 437     if cmd == "series":
 438       name = None
 439       for k, v in me._keyvals(opts):
 440         if k is None: name = v
 441         else: me._bad_keyval(cmd, k, v)
 442       check(name is not None, "missing series name")
 443       check(name not in me._series, "series `%s' already defined" % name)
 444       title = ww.rest(); check(title is not None, "missing title")
 445       me._set_mode(MODE_MULTI)
 446       me._series[name] = Series(me._pl, title)
 447       if me._wantedp(name): me._pl.nseries += 1
 448
 449     elif cmd == "season":
 450       series, sname = me._opts_series(cmd, opts)
 451       w = ww.nextword();
 452       check(w is not None, "missing season number")
 453       if w == "-":
 454         check(ww.rest() is None, "trailing junk")
 455         if not me._wantedp(sname): return
 456         series.add_movies()
 457       else:
 458         title = ww.rest(); i = getint(w)
 459         if not me._wantedp(sname): return
 460         series.add_season(ww.rest(), getint(w), implicitp = False)
 461       me._cur_episode = me._cur_chapter = None
 462       me._pl.done_season()
 463
 464     elif cmd == "epname":
 465       for k, v in me._keyvals(opts): me._bad_keyval("epname", k, v)
 466       name = ww.rest(); check(name is not None, "missing episode name")
 467       try: sep = name.index(",")
 468       except ValueError: names = name + "s"
 469       else: name, names = name[:sep], name[sep + 1:]
 470       me._pl.epname, me._pl.epnames = name, names
 471
 472     elif cmd == "epno":
 473       series, sname = me._opts_series(cmd, opts)
 474       w = ww.rest(); check(w is not None, "missing episode number")
 475       epi = getint(w)
 476       if not me._wantedp(sname): return
 477       series.ensure_season().ep_i = epi
 478
 479     elif cmd == "iso":
 480       _, name = me._opts_series(cmd, opts)
 481       fn = ww.rest(); check(fn is not None, "missing filename")
 482       if not me._wantedp(name): return
 483       if fn == "-": forget(me._isos, name)
 484       else:
 485         check(OS.path.exists(OS.path.join(ROOT, fn)),
 486               "iso file `%s' not found" % fn)
 487         me._isos[name] = VideoDisc(fn)
 488
 489     elif cmd == "vdir":
 490       _, name = me._opts_series(cmd, opts)
 491       dir = ww.rest(); check(dir is not None, "missing directory")
 492       if not me._wantedp(name): return
 493       if dir == "-": forget(me._vdirs, name)
 494       else: me._vdirs[name] = VideoDir(dir)
 495
 496     elif cmd == "adir":
 497       _, name = me._opts_series(cmd, opts)
 498       dir = ww.rest(); check(dir is not None, "missing directory")
 499       if not me._wantedp(name): return
 500       if dir == "-": forget(me._audirs, name)
 501       else: me._audirs[name] = AudioDir(dir)
 502
 503     else:
 504       raise ExpectedError("unknown command `%s'" % cmd)
 505
 506   def _process_episode(me, ww):
 507
 508     opts = ww.nextword(); check(opts is not None, "missing title/options")
 509     ti = None; sname = None; neps = 1; epi = None; ch = None
 510     for k, v in me._keyvals(opts):
 511       if k is None:
 512         if v.isdigit(): ti = int(v)
 513         elif v == "-": ti = "-"
 514         else: sname = v
 515       elif k == "s": sname = v
 516       elif k == "n": neps = getint(v)
 517       elif k == "ep": epi = getint(v)
 518       elif k == "ch": ch = getint(v)
 519       else: raise ExpectedError("unknown episode option `%s'" % k)
 520     check(ti is not None, "missing title number")
 521     series = me._get_series(sname)
 522     me._cur_chapter = None
 523
 524     title = ww.rest()
 525     if not me._wantedp(sname): return
 526     season = series.ensure_season()
 527     if epi is None: epi = season.ep_i
 528
 529     if ti == "-":
 530       check(season.implicitp, "audio source, but explicit season")
 531       if not me._wantedp(sname): return
 532       dir = lookup(me._audirs, sname, "no title, and no audio directory")
 533       src = lookup(dir.episodes, season.ep_i,
 534                    "episode %d not found in audio dir `%s'" % (epi, dir.dir))
 535
 536     else:
 537       try: src = me._isos[sname]
 538       except KeyError:
 539         check(season.i is not None, "must use explicit iso for movies")
 540         dir = lookup(me._vdirs, sname,
 541                      "title, but no iso or video directory")
 542         vseason = lookup(dir.seasons, season.i,
 543                          "season %d not found in video dir `%s'" %
 544                            (season.i, dir.dir))
 545         src = lookup(vseason.episodes, season.ep_i,
 546                      "episode %d.%d not found in video dir `%s'" %
 547                        (season.i, season.ep_i, dir.dir))
 548
 549     episode = season.add_episode(epi, neps, title, src, ti, ch)
 550     me._pl.add_episode(episode)
 551     me._cur_episode = episode
 552
 553   def _process_chapter(me, ww):
 554     check(me._cur_episode is not None, "no current episode")
 555     check(me._cur_episode.source.CHAPTERP,
 556           "episode source doesn't allow chapters")
 557     if me._chaptersp:
 558       if me._cur_chapter is None: i = 1
 559       else: i = me._cur_chapter.i + 1
 560       me._cur_chapter = me._cur_episode.add_chapter(ww.rest(), i)
 561
 562   def parse_file(me, fn):
 563     with location(FileLocation(fn, 0)) as floc:
 564       with open(fn, "r") as f:
 565         for line in f:
 566           floc.stepline()
 567           sline = line.lstrip()
 568           if sline == "" or sline.startswith(";"): continue
 569
 570           if line.startswith("!"): me._process_cmd(Words(line[1:]))
 571           elif not line[0].isspace(): me._process_episode(Words(line))
 572           else: me._process_chapter(Words(line))
 573     me._pl.done_season()
 574
 575   def done(me):
 576     discs = set()
 577     for name, vdir in me._vdirs.items():
 578       if not me._wantedp(name): continue
 579       for s in vdir.seasons.values():
 580         for d in s.episodes.values():
 581           discs.add(d)
 582     for adir in me._audirs.values():
 583       for d in adir.episodes.values():
 584         discs.add(d)
 585     for d in sorted(discs, key = lambda d: d.fn):
 586       if d.neps is not None and d.neps != d.nuses:
 587         raise ExpectedError("disc `%s' has %d episodes, used %d times" %
 588                             (d.fn, d.neps, d.nuses))
 589     return me._pl
 590
 591 ROOT = "/mnt/dvd/archive/"
 592
 593 op = OP.OptionParser \
 594   (usage = "%prog [-c] [-s SERIES] EPLS",
 595    description = "Generate M3U playlists from an episode list.")
 596 op.add_option("-c", "--chapters",
 597               dest = "chaptersp", action = "store_true", default = False,
 598               help = "Output individual chapter names")
 599 op.add_option("-s", "--series",
 600               dest = "series", type = "str", default = None,
 601               help = "Output only the listed SERIES (comma-separated)")
 602 opts, argv = op.parse_args()
 603 if len(argv) != 1: op.print_usage(file = SYS.stderr); SYS.exit(2)
 604 if opts.series is None:
 605   series_wanted = None
 606 else:
 607   series_wanted = set()
 608   for name in opts.series.split(","): series_wanted.add(name)
 609 try:
 610   ep = EpisodeListParser(series_wanted, opts.chaptersp)
 611   ep.parse_file(argv[0])
 612   pl = ep.done()
 613   pl.write(SYS.stdout)
 614 except (ExpectedError, IOError, OSError) as e:
 615   LOC.report(e)
 616   SYS.exit(2)