From: Toni Gundogdu <legatvs@gmail.com>
Date: Tue, 18 Jun 2013 15:46:45 +0000 (+0300)
Subject: media/guardian.lua: Check for expired content (BACKPORTpt4)
X-Git-Tag: v0.9.20130619~1
X-Git-Url: https://repo.or.cz/w/libquvi-scripts.git/commitdiff_plain/a24b7aa9ec6f4393ef7b09db753b2e2822608e79

media/guardian.lua: Check for expired content (BACKPORTpt4)

* Backported from maint-0.4 (22ff394)

Signed-off-by: Toni Gundogdu <legatvs@gmail.com>
---

diff --git a/share/media/guardian.lua b/share/media/guardian.lua
index 2fc2924..7d82526 100644
--- a/share/media/guardian.lua
+++ b/share/media/guardian.lua
@@ -30,7 +30,7 @@ end
 
 -- Parse the media properties.
 function parse(qargs)
-  local p = quvi.http.fetch(qargs.input_url).data
+  local p = Guardian.fetch(qargs)
 
   qargs.duration_ms = tonumber(p:match('duration%:%s+"?(%d+)"?') or 0) * 1000
 
@@ -66,6 +66,13 @@ function Guardian.can_parse_url(qargs)
   end
 end
 
+function Guardian.fetch(qargs)
+  local p = quvi.http.fetch(qargs.input_url).data
+  local e = p:match('<div class="expired">.-<p>(.-)</p>.-</div>') or ''
+  if #e >0 then error(e) end
+  return p
+end
+
 function Guardian.iter_streams(p)
   local u = p:match('file:%s+"(.-)"')
               or error("no match: media stream URL")