share/lua/media/academicearth.lua

   1 -- libquvi-scripts
   2 -- Copyright (C) 2010-2012  Toni Gundogdu <legatvs@gmail.com>
   3 --
   4 -- This file is part of libquvi-scripts <http://quvi.sourceforge.net/>.
   5 --
   6 -- This library is free software; you can redistribute it and/or
   7 -- modify it under the terms of the GNU Lesser General Public
   8 -- License as published by the Free Software Foundation; either
   9 -- version 2.1 of the License, or (at your option) any later version.
  10 --
  11 -- This library is distributed in the hope that it will be useful,
  12 -- but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 -- Lesser General Public License for more details.
  15 --
  16 -- You should have received a copy of the GNU Lesser General Public
  17 -- License along with this library; if not, write to the Free Software
  18 -- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  19 -- 02110-1301  USA
  20 --
  21
  22 --
  23 -- NOTE
  24 --
  25 -- academicearth.org hosts media at blip.tv or youtube.com .
  26 -- Set "goto_url" to point to the actual location of the media.
  27 --
  28 -- The library will then relay the new URL to a media script that
  29 -- accepts it.
  30 --
  31
  32 local AcademicEarth = {} -- Utility functions specific to this script
  33
  34 -- Identify the media script.
  35 function ident(qargs)
  36     local C      = require 'quvi/const'
  37     local r      = {}
  38     r.domain     = "academicearth%.org"
  39     r.formats    = "default"
  40     r.categories = C.proto_http
  41     local U      = require 'quvi/util'
  42     r.handles    = U.handles(self.page_url, {r.domain}, {"/lectures/"})
  43     return r
  44 end
  45
  46 -- Query available formats.
  47 function query_formats(self)
  48     return AcademicEarth.get_redirect_url(self)
  49 end
  50
  51 -- Parse media URL.
  52 function parse(self)
  53     return AcademicEarth.get_redirect_url(self)
  54 end
  55
  56 --
  57 -- Utility functions
  58 --
  59
  60 function AcademicEarth.get_redirect_url(self)
  61     local p = quvi.fetch(self.page_url)
  62     local s = p:match('ytID = "(.-)"')
  63     if s then
  64         self.redirect_url = 'http://youtube.com/e/' .. s
  65     else
  66         local s = p:match('embed src="(.-)"') -- blip
  67         if s then
  68             self.redirect_url = s
  69         else
  70             error('no match: blip or youtube pattern')
  71         end
  72     end
  73     return self
  74 end
  75
  76 -- vim: set ts=4 sw=4 tw=72 expandtab: