katsomo.lua: add code to handle both treeId and progId in url
[vlc.git] / share / lua / playlist / vimeo.lua
1 --[[
2  $Id$
3
4  Copyright © 2009 the VideoLAN team
5
6  Authors: Konstantin Pavlov (thresh@videolan.org)
7
8  This program is free software; you can redistribute it and/or modify
9  it under the terms of the GNU General Public License as published by
10  the Free Software Foundation; either version 2 of the License, or
11  (at your option) any later version.
12
13  This program is distributed in the hope that it will be useful,
14  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  GNU General Public License for more details.
17
18  You should have received a copy of the GNU General Public License
19  along with this program; if not, write to the Free Software
20  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
21 --]]
22
23 -- Probe function.
24 function probe()
25     return vlc.access == "http"
26         and string.match( vlc.path, "vimeo.com/%d+" )
27             or string.match( vlc.path, "vimeo.com/moogaloop/load" )
28 end
29
30 -- Parse function.
31 function parse()
32     p = {}
33     if string.match ( vlc.path, "vimeo.com/%d+" ) then
34         print (" vlc path is : " .. vlc.path )
35         _,_,id = string.find( vlc.path, "vimeo.com/(.*)")
36         print (" id is : " .. id )
37         return { { path = "http://vimeo.com/moogaloop/load/clip:" .. id .. "/local/", name = "Vimeo playlist" } }
38     end
39
40     if string.match ( vlc.path, "vimeo.com/moogaloop" ) then
41         while true do
42             -- Try to find the video's title
43             line = vlc.readline()
44             if not line then break end
45             if string.match( line, "<caption>(.*)</caption>" ) then
46                 _,_,name = string.find (line, "<caption>(.*)</caption>" )
47             end
48             -- Try to find id of the video
49             _,_,id = string.find (vlc.path, "vimeo.com/moogaloop/load/clip:(.*)/local/")
50             -- Try to find image for thumbnail
51             if string.match( line, "<thumbnail>(.*)</thumbnail>" ) then
52                 _,_,arturl = string.find (line, "<thumbnail>(.*)</thumbnail>" )
53             end
54             -- Try to find request signature (needed to construct video url)
55             if string.match( line, "<request_signature>(.*)</request_signature>" ) then
56                 _,_,rsig = string.find (line, "<request_signature>(.*)</request_signature>" )
57             end
58             -- Try to find request signature expiration time (needed to construct video url)
59             if string.match( line, "<request_signature_expires>(.*)</request_signature_expires>" ) then
60                 _,_,rsigtime = string.find (line, "<request_signature_expires>(.*)</request_signature_expires>" )
61             end
62             -- Try to find whether video is HD actually
63             if string.match( line, "<isHD>1</isHD>" ) then
64                 ishd = true
65             end
66         end
67         table.insert( p, { path = "http://vimeo.com/moogaloop/play/clip:"..id.."/"..rsig.."/"..rsigtime; name = name; arturl = arturl } )
68         if ishd == true then
69             table.insert( p, { path = "http://vimeo.com/moogaloop/play/clip:"..id.."/"..rsig.."/"..rsigtime.."/?q=hd"; name = name.." (HD)"; arturl = arturl } )
70         end
71     end
72     return p
73 end