2 ### -*- mode: python; coding: utf-8 -*-
4 from contextlib
import contextmanager
10 class ExpectedError (Exception): pass
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
)
25 if not cond
: raise ExpectedError(msg
)
27 def lookup(dict, key
, msg
):
29 except KeyError: raise ExpectedError(msg
)
31 def forget(dict, key
):
36 if not s
.isdigit(): raise ExpectedError("bad integer `%s'" % s
)
42 me
._i
, me
._n
= 0, len(s
)
44 s
, i
, n
= me
._s
, me
._i
, me
._n
46 if not s
[i
].isspace(): return i
51 begin
= i
= me
._wordstart()
52 if begin
< 0: return None
53 while i
< n
and not s
[i
].isspace(): i
+= 1
58 begin
= me
._wordstart()
59 if begin
< 0: return None
60 else: return s
[begin
:].rstrip()
62 URL_SAFE_P
= 256*[False]
64 b
"ABCDEFGHIJKLMNOPQRSTUVWXYZ" \
65 b
"abcdefghijklmnopqrstuvwxyz" \
66 b
"0123456789" b
"!$%-.,/":
69 return "".join((URL_SAFE_P
[ch
] and chr(ch
) or "%%%02x" % ch
70 for ch
in s
.encode("UTF-8")))
72 PROG
= OS
.path
.basename(SYS
.argv
[0])
74 class BaseLocation (object):
76 SYS
.stderr
.write("%s: %s%s\n" %
(PROG
, me
._loc(), exc
))
78 class DummyLocation (BaseLocation
):
79 def _loc(me
): return ""
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
88 class Source (object):
90 TITLEP
= CHAPTERP
= False
94 me
.used_titles
= dict()
95 me
.used_chapters
= set()
97 def url(me
, title
= None, start_chapter
= None, end_chapter
= None):
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")
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
)
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
119 keys
, set = [title
], me
.used_titles
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
))
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
134 class VideoDisc (Source
):
136 TITLEP
= CHAPTERP
= True
138 def __init__(me
, fn
, *args
, **kw
):
139 super().__init__(fn
, *args
, **kw
)
142 class VideoSeason (object):
143 def __init__(me
, i
, title
):
147 def set_episode_disc(me
, i
, disc
):
149 raise ExpectedError("season %d episode %d already taken" %
(me
.i
, i
))
150 me
.episodes
[i
] = disc
; disc
.neps
+= 1
152 def match_group(m
, *groups
, dflt
= None, mustp
= False):
155 except IndexError: continue
156 if s
is not None: return s
157 if mustp
: raise ValueError("no match found")
160 class VideoDir (object):
162 _R_ISO_PRE
= list(map(lambda pats
:
164 RX
.compile("^" + pat
+ r
"\.iso$", RX
.X
),
166 [[r
""" S (?P<si> \d+) \. \ (?P<stitle> .*) — (?: D \d+ \. \ )?
168 r
""" S (?P<si> \d+) (?: D \d+)? \. \ (?P<epex> .*) """,
169 r
""" S (?P<si> \d+) \. \ (?P<epex> E \d+ .*) """,
170 r
""" S (?P<si> \d+) (?P<epex> E \d+) \. \ .* """],
171 [r
""" (?P<si> \d+) [A-Z]? \. \ (?P<stitle> .*) — (?P<epex> .*) """],
172 [r
""" \d+ \. \ (?P<epex> [ES] \d+ .*) """],
173 [r
""" (?P<epnum> \d+ ) \. \ .* """]]))
175 _R_ISO_EP
= RX
.compile(r
""" ^
176 (?: S (?P<si> \d+) \ )?
177 E (?P<ei> \d+) (?: – (?P<ej> \d+))? $
180 def __init__(me
, dir):
182 fns
= OS
.listdir(OS
.path
.join(ROOT
, dir))
186 styles
= me
._R_ISO_PRE
188 path
= OS
.path
.join(dir, fn
)
189 if not fn
.endswith(".iso"): continue
190 #print(";; `%s'" % path, file = SYS.stderr)
194 if m
: styles
= [sty
]; break
199 #print(";;\tignored (regex mismatch)", file = SYS.stderr)
202 si
= filter(match_group(m
, "si"), int)
203 stitle
= match_group(m
, "stitle")
205 check(si
is not None or stitle
is None,
206 "explicit season title without number in `%s'" % fn
)
208 if season
is None or si
!= season
.i
:
209 check(season
is None or si
== season
.i
+ 1,
211 (si
, season
is None and -1 or season
.i
+ 1))
212 check(si
not in seasons
, "season %d already seen" % si
)
213 seasons
[si
] = season
= VideoSeason(si
, stitle
)
215 check(stitle
== season
.title
,
216 "season title `%s' /= `%s'" %
(stitle
, season
.title
))
218 disc
= VideoDisc(path
)
220 any
, bad
= False, False
221 epnum
= match_group(m
, "epnum")
222 if epnum
is not None: eplist
= ["E" + epnum
]
223 else: eplist
= match_group(m
, "epex", mustp
= True).split(", ")
224 for eprange
in eplist
:
225 mm
= me
._R_ISO_EP
.match(eprange
)
227 #print(";;\t`%s'?" % eprange, file = SYS.stderr)
229 if not any
: any
= True
230 i
= filter(mm
.group("si"), int)
233 except KeyError: ts
= seasons
[i
] = VideoSeason(i
, None)
235 ts
= season
= seasons
[1] = VideoSeason(1, None)
236 start
= filter(mm
.group("ei"), int)
237 end
= filter(mm
.group("ej"), int, start
)
238 for k
in range(start
, end
+ 1):
239 ts
.set_episode_disc(k
, disc
)
240 #print(";;\tepisode %d.%d" % (ts.i, k), file = SYS.stderr)
242 #print(";;\tignored", file = SYS.stderr)
245 raise ExpectedError("bad ep list in `%s'", fn
)
248 class AudioDisc (Source
):
250 TITLEP
= CHAPTERP
= False
252 class AudioEpisode (Source
):
254 TITLEP
= CHAPTERP
= False
255 def __init__(me
, fn
, i
, *args
, **kw
):
256 super().__init__(fn
, *args
, **kw
)
259 class AudioDir (object):
261 _R_FLAC
= RX
.compile(r
""" ^
267 def __init__(me
, dir):
269 fns
= OS
.listdir(OS
.path
.join(ROOT
, dir))
274 path
= OS
.path
.join(dir, fn
)
275 if not fn
.endswith(".flac"): continue
276 m
= me
._R_FLAC
.match(fn
)
278 i
= filter(m
.group(1), int)
280 check(i
== last_i
+ 1, "episode %d /= %d" %
(i
, last_i
+ 1))
281 episodes
[i
] = AudioEpisode(path
, i
)
283 me
.episodes
= episodes
285 class Chapter (object):
286 def __init__(me
, episode
, title
, i
):
287 me
.title
, me
.i
= title
, i
288 me
.url
= episode
.source
.url(episode
.tno
, i
, i
+ 1)
290 class Episode (object):
291 def __init__(me
, season
, i
, neps
, title
, src
, tno
= None,
292 startch
= None, endch
= None):
294 me
.i
, me
.neps
, me
.title
= i
, neps
, title
296 me
.source
, me
.tno
= src
, tno
297 me
.url
= src
.url(tno
, startch
, endch
)
298 def add_chapter(me
, title
, j
):
299 ch
= Chapter(me
, title
, j
)
300 me
.chapters
.append(ch
)
303 return me
.season
._eplabel(me
.i
, me
.neps
, me
.title
)
305 class BaseSeason (object):
306 def __init__(me
, series
, implicitp
= False):
309 me
.implicitp
= implicitp
310 me
.ep_i
, episodes
= 1, []
311 def add_episode(me
, j
, neps
, title
, src
, tno
, startch
, endch
):
312 ep
= Episode(me
, j
, neps
, title
, src
, tno
, startch
, endch
)
313 me
.episodes
.append(ep
)
314 src
.nuses
+= neps
; me
.ep_i
+= neps
316 def _epnames(me
, i
, neps
):
317 playlist
= me
.series
.playlist
318 if neps
== 1: return playlist
.epname
, "%d" % i
319 elif neps
== 2: return playlist
.epnames
, "%d, %d" %
(i
, i
+ 1)
320 else: return playlist
.epnames
, "%d–%d" %
(i
, i
+ neps
- 1)
322 class Season (BaseSeason
):
323 def __init__(me
, series
, title
, i
, *args
, **kw
):
324 super().__init__(series
, *args
, **kw
)
325 me
.title
, me
.i
= title
, i
326 def _eplabel(me
, i
, neps
, title
):
327 epname
, epn
= me
._epnames(i
, neps
)
329 if me
.implicitp
: label
= "%s %s" %
(epname
, epn
)
330 elif me
.title
is None: label
= "%s %d.%s" %
(epname
, me
.i
, epn
)
331 else: label
= "%s—%s %s" %
(me
.title
, epname
, epn
)
333 if me
.implicitp
: label
= "%s. %s" %
(epn
, title
)
334 elif me
.title
is None: label
= "%d.%s. %s" %
(me
.i
, epn
, title
)
335 else: label
= "%s—%s. %s" %
(me
.title
, epn
, title
)
338 class MovieSeason (BaseSeason
):
339 def __init__(me
, series
, title
, *args
, **kw
):
340 super().__init__(series
, *args
, **kw
)
343 def add_episode(me
, j
, neps
, title
, src
, tno
, startch
, endch
):
344 if me
.title
is None and title
is None:
345 raise ExpectedError("movie or movie season must have a title")
346 return super().add_episode(j
, neps
, title
, src
, tno
, startch
, endch
)
347 def _eplabel(me
, i
, neps
, title
):
351 epname
, epn
= me
._epnames(i
, neps
)
352 label
= "%s—%s %s" %
(me
.title
, epname
, epn
)
354 label
= "%s—%s" %
(me
.title
, title
)
357 class Series (object):
358 def __init__(me
, playlist
, name
, title
= None, wantedp
= True):
359 me
.playlist
= playlist
360 me
.name
, me
.title
= name
, title
363 def _add_season(me
, season
):
364 me
.cur_season
= season
365 def add_season(me
, title
, i
, implicitp
= False):
366 me
._add_season(Season(me
, title
, i
, implicitp
))
367 def add_movies(me
, title
= None):
368 me
._add_season(MovieSeason(me
, title
))
369 def ensure_season(me
):
370 if me
.cur_season
is None: me
.add_season(None, 1, implicitp
= True)
375 class Playlist (object):
379 me
.epname
, me
.epnames
= "Episode", "Episodes"
381 def add_episode(me
, episode
):
382 me
.episodes
.append(episode
)
385 me
.seasons
.append(me
.episodes
)
389 for season
in me
.seasons
:
393 if me
.nseries
> 1: label
= ep
.season
.series
.title
+ " " + label
395 f
.write("#EXTINF:0,,%s\n%s\n" %
(label
, ep
.url
))
397 for ch
in ep
.chapters
:
398 f
.write("#EXTINF:0,,%s: %s\n%s\n" %
399 (label
, ch
.title
, ch
.url
))
405 class EpisodeListParser (object):
407 def __init__(me
, series_wanted
= None, chapters_wanted_p
= False):
409 me
._cur_episode
= me
._cur_chapter
= None
410 me
._series
= {}; me
._vdirs
= {}; me
._audirs
= {}; me
._isos
= {}
411 me
._series_wanted
= series_wanted
412 me
._chaptersp
= chapters_wanted_p
413 if series_wanted
is None: me
._mode
= MODE_UNSET
414 else: me
._mode
= MODE_MULTI
416 def _bad_keyval(me
, cmd
, k
, v
):
417 raise ExpectedError("invalid `!%s' option `%s'" %
418 (cmd
, v
if k
is None else k
))
420 def _keyvals(me
, opts
):
422 for kv
in opts
.split(","):
423 try: sep
= kv
.index("=")
424 except ValueError: yield None, kv
425 else: yield kv
[:sep
], kv
[sep
+ 1:]
427 def _set_mode(me
, mode
):
428 if me
._mode
== MODE_UNSET
:
430 elif me
._mode
!= mode
:
431 raise ExpectedError("inconsistent single-/multi-series usage")
433 def _get_series(me
, name
):
435 me
._set_mode(MODE_SINGLE
)
436 try: series
= me
._series
[None]
438 series
= me
._series
[None] = Series(me
._pl
, None)
441 me
._set_mode(MODE_MULTI
)
442 series
= lookup(me
._series
, name
, "unknown series `%s'" % name
)
445 def _opts_series(me
, cmd
, opts
):
447 for k
, v
in me
._keyvals(opts
):
448 if k
is None: name
= v
449 else: me
._bad_keyval(cmd
, k
, v
)
450 return me
._get_series(name
)
452 def _auto_epsrc(me
, series
):
453 dir = lookup(me
._vdirs
, series
.name
, "no active video directory")
454 season
= series
.ensure_season()
455 check(season
.i
is not None, "must use explicit iso for movie seasons")
456 vseason
= lookup(dir.seasons
, season
.i
,
457 "season %d not found in video dir `%s'" %
459 src
= lookup(vseason
.episodes
, season
.ep_i
,
460 "episode %d.%d not found in video dir `%s'" %
461 (season
.i
, season
.ep_i
, dir.dir))
464 def _process_cmd(me
, ww
):
466 cmd
= ww
.nextword(); check(cmd
is not None, "missing command")
467 try: sep
= cmd
.index(":")
468 except ValueError: opts
= None
469 else: cmd
, opts
= cmd
[:sep
], cmd
[sep
+ 1:]
473 for k
, v
in me
._keyvals(opts
):
474 if k
is None: name
= v
475 else: me
._bad_keyval(cmd
, k
, v
)
476 check(name
is not None, "missing series name")
477 check(name
not in me
._series
, "series `%s' already defined" % name
)
478 title
= ww
.rest(); check(title
is not None, "missing title")
479 me
._set_mode(MODE_MULTI
)
480 me
._series
[name
] = series
= Series(me
._pl
, name
, title
,
481 me
._series_wanted
is None or
482 name
in me
._series_wanted
)
483 if series
.wantedp
: me
._pl
.nseries
+= 1
485 elif cmd
== "season":
486 series
= me
._opts_series(cmd
, opts
)
488 check(w
is not None, "missing season number")
490 if not series
.wantedp
: return
491 series
.add_movies(ww
.rest())
493 title
= ww
.rest(); i
= getint(w
)
494 if not series
.wantedp
: return
495 series
.add_season(ww
.rest(), getint(w
), implicitp
= False)
496 me
._cur_episode
= me
._cur_chapter
= None
499 elif cmd
== "epname":
500 for k
, v
in me
._keyvals(opts
): me
._bad_keyval("epname", k
, v
)
501 name
= ww
.rest(); check(name
is not None, "missing episode name")
502 try: sep
= name
.index(",")
503 except ValueError: names
= name
+ "s"
504 else: name
, names
= name
[:sep
], name
[sep
+ 1:]
505 me
._pl
.epname
, me
._pl
.epnames
= name
, names
508 series
= me
._opts_series(cmd
, opts
)
509 w
= ww
.rest(); check(w
is not None, "missing episode number")
511 if not series
.wantedp
: return
512 series
.ensure_season().ep_i
= epi
515 series
= me
._opts_series(cmd
, opts
)
516 fn
= ww
.rest(); check(fn
is not None, "missing filename")
517 if not series
.wantedp
: return
518 if fn
== "-": forget(me
._isos
, series
.name
)
520 check(OS
.path
.exists(OS
.path
.join(ROOT
, fn
)),
521 "iso file `%s' not found" % fn
)
522 me
._isos
[series
.name
] = VideoDisc(fn
)
525 series
= me
._opts_series(cmd
, opts
)
526 dir = ww
.rest(); check(dir is not None, "missing directory")
527 if not series
.wantedp
: return
528 if dir == "-": forget(me
._vdirs
, series
.name
)
529 else: me
._vdirs
[series
.name
] = VideoDir(dir)
532 series
= me
._opts_series(cmd
, opts
)
533 dir = ww
.rest(); check(dir is not None, "missing directory")
534 if not series
.wantedp
: return
535 if dir == "-": forget(me
._audirs
, series
.name
)
536 else: me
._audirs
[series
.name
] = AudioDir(dir)
538 elif cmd
== "displaced":
539 series
= me
._opts_series(cmd
, opts
)
540 w
= ww
.rest(); check(w
is not None, "missing count"); n
= getint(w
)
541 src
= me
._auto_epsrc(series
)
544 raise ExpectedError("unknown command `%s'" % cmd
)
546 def _process_episode(me
, ww
):
548 opts
= ww
.nextword(); check(opts
is not None, "missing title/options")
549 ti
= None; sname
= None; neps
= 1; epi
= None; loch
= hich
= None
550 for k
, v
in me
._keyvals(opts
):
552 if v
.isdigit(): ti
= int(v
)
553 elif v
== "-": ti
= "-"
555 elif k
== "s": sname
= v
556 elif k
== "n": neps
= getint(v
)
557 elif k
== "ep": epi
= getint(v
)
559 try: sep
= v
.index("-")
560 except ValueError: loch
, hich
= getint(v
), None
561 else: loch
, hich
= getint(v
[:sep
]), getint(v
[sep
+ 1:]) + 1
562 else: raise ExpectedError("unknown episode option `%s'" % k
)
563 check(ti
is not None, "missing title number")
564 series
= me
._get_series(sname
)
565 me
._cur_chapter
= None
568 if not series
.wantedp
: return
569 season
= series
.ensure_season()
570 if epi
is None: epi
= season
.ep_i
573 check(season
.implicitp
, "audio source, but explicit season")
574 dir = lookup(me
._audirs
, series
.name
,
575 "no title, and no audio directory")
576 src
= lookup(dir.episodes
, season
.ep_i
,
577 "episode %d not found in audio dir `%s'" %
(epi
, dir.dir))
580 try: src
= me
._isos
[series
.name
]
581 except KeyError: src
= me
._auto_epsrc(series
)
583 episode
= season
.add_episode(epi
, neps
, title
, src
, ti
, loch
, hich
)
584 me
._pl
.add_episode(episode
)
585 me
._cur_episode
= episode
587 def _process_chapter(me
, ww
):
588 check(me
._cur_episode
is not None, "no current episode")
589 check(me
._cur_episode
.source
.CHAPTERP
,
590 "episode source doesn't allow chapters")
592 if me
._cur_chapter
is None: i
= 1
593 else: i
= me
._cur_chapter
.i
+ 1
594 me
._cur_chapter
= me
._cur_episode
.add_chapter(ww
.rest(), i
)
596 def parse_file(me
, fn
):
597 with
location(FileLocation(fn
, 0)) as floc
:
598 with
open(fn
, "r") as f
:
601 sline
= line
.lstrip()
602 if sline
== "" or sline
.startswith(";"): continue
604 if line
.startswith("!"): me
._process_cmd(Words(line
[1:]))
605 elif not line
[0].isspace(): me
._process_episode(Words(line
))
606 else: me
._process_chapter(Words(line
))
611 for name
, vdir
in me
._vdirs
.items():
612 if not me
._series
[name
].wantedp
: continue
613 for s
in vdir
.seasons
.values():
614 for d
in s
.episodes
.values():
616 for adir
in me
._audirs
.values():
617 for d
in adir
.episodes
.values():
619 for d
in sorted(discs
, key
= lambda d
: d
.fn
):
620 if d
.neps
is not None and d
.neps
!= d
.nuses
:
621 raise ExpectedError("disc `%s' has %d episodes, used %d times" %
622 (d
.fn
, d
.neps
, d
.nuses
))
625 ROOT
= "/mnt/dvd/archive/"
627 op
= OP
.OptionParser \
628 (usage
= "%prog [-c] [-s SERIES] EPLS",
629 description
= "Generate M3U playlists from an episode list.")
630 op
.add_option("-c", "--chapters",
631 dest
= "chaptersp", action
= "store_true", default
= False,
632 help = "Output individual chapter names")
633 op
.add_option("-s", "--series",
634 dest
= "series", type = "str", default
= None,
635 help = "Output only the listed SERIES (comma-separated)")
636 opts
, argv
= op
.parse_args()
637 if len(argv
) != 1: op
.print_usage(file = SYS
.stderr
); SYS
.exit(2)
638 if opts
.series
is None:
641 series_wanted
= set()
642 for name
in opts
.series
.split(","): series_wanted
.add(name
)
644 ep
= EpisodeListParser(series_wanted
, opts
.chaptersp
)
645 ep
.parse_file(argv
[0])
648 except (ExpectedError
, IOError, OSError) as e
: