-- libquvi-scripts v0.4.8 -- Copyright (C) 2010-2012 Toni Gundogdu -- -- This file is part of libquvi-scripts . -- -- This library is free software; you can redistribute it and/or -- modify it under the terms of the GNU Lesser General Public -- License as published by the Free Software Foundation; either -- version 2.1 of the License, or (at your option) any later version. -- -- This library is distributed in the hope that it will be useful, -- but WITHOUT ANY WARRANTY; without even the implied warranty of -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -- Lesser General Public License for more details. -- -- You should have received a copy of the GNU Lesser General Public -- License along with this library; if not, write to the Free Software -- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA -- 02110-1301 USA -- -- Identify the script. function ident(self) package.path = self.script_dir .. '/?.lua' local C = require 'quvi/const' local r = {} r.domain = "clipfish%.de" r.formats = "default" r.categories = C.proto_http local U = require 'quvi/util' r.handles = U.handles(self.page_url, {r.domain}, {"/video/%d+/"}) return r end -- Query available formats. function query_formats(self) self.formats = 'default' return self end -- Parse media URL. function parse(self) self.host_id = "clipfish" self.id = self.page_url:match("/video/(.-)/") or error("no match: media ID") local c_url = "http://www.clipfish.de/devxml/videoinfo/" .. self.id local c = quvi.fetch(c_url, {fetch_type = 'config'}) self.title = c:match('<!%[CDATA%[(.-)%]') or error("no match: media title") self.thumbnail_url = c:match('<imageurl>(.-)</') or '' self.url = {c:match("<filename><!%[CDATA%[(.-)%]") or error("no match: media URL")} return self end -- vim: set ts=4 sw=4 tw=72 expandtab: