48b4981fb4492178d62f9f1bee576eb1a9ce9c3f
[vlc.git] / share / luaplaylist / youtube.lua
1 -- $Id$
2
3 -- Helper function to get a parameter's value in a URL
4 function get_url_param( url, name )
5     return string.gsub( url, "^.*[&?]"..name.."=([^&]*).*$", "%1" )
6 end
7
8 function get_arturl( path, video_id )
9     if string.match( vlc.path, "iurl=" ) then
10         return vlc.decode_uri( get_url_param( vlc.path, "iurl" ) )
11     end
12     if not arturl then
13         return "http://img.youtube.com/vi/"..video_id.."/default.jpg"
14     end
15 end
16
17 -- Probe function.
18 function probe()
19     return vlc.access == "http"
20         and string.match( vlc.path, "youtube.com" ) 
21         and (  string.match( vlc.path, "watch%?v=" ) -- the html page
22             or string.match( vlc.path, "watch_fullscreen%?video_id=" ) -- the fullscreen page
23             or string.match( vlc.path, "p.swf" ) -- the (old?) player url
24             or string.match( vlc.path, "jp.swf" ) -- the (new?) player url (as of 24/08/2007)
25             or string.match( vlc.path, "player2.swf" ) -- another player url
26             or ( string.match( vlc.path, "get_video%?video_id=" ) and not string.match( vlc.path, "t=" ) ) ) -- the video url without the t= parameter which is mandatory (since 24/08/2007)
27 end
28
29 -- Parse function.
30 function parse()
31     if string.match( vlc.path, "watch%?v=" )
32     then -- This is the HTML page's URL
33         while true do
34             -- Try to find the video's title
35             line = vlc.readline()
36             if not line then break end
37             if string.match( line, "<meta name=\"title\"" ) then
38                 name = string.gsub( line, "^.*content=\"([^\"]*).*$", "%1" )
39             end
40             if string.match( line, "<meta name=\"description\"" ) then
41                 description = string.gsub( line, "^.*content=\"([^\"]*).*$", "%1" )
42             end
43             if string.match( line, "subscribe_to_user=" ) then
44                 artist = string.gsub( line, ".*subscribe_to_user=([^&]*).*", "%1" )
45             end
46             -- var swfArgs = {hl:'en',BASE_YT_URL:'http://youtube.com/',video_id:'XPJ7d8dq0t8',l:'292',t:'OEgsToPDskLFdOYrrlDm3FQPoQBYaCP1',sk:'0gnr-AE6QZJEZmCMd3lq_AC'};
47             if string.match( line, "swfArgs" ) and string.match( line, "video_id" ) then
48                 if string.match( line, "BASE_YT_URL" ) then
49                     base_yt_url = string.gsub( line, ".*BASE_YT_URL:'([^']*)'.*", "%1" )
50                 end
51                 t = string.gsub( line, ".*t:'([^']*)'.*", "%1" )
52                 vlc.msg_err( t )
53                 -- video_id = string.gsub( line, ".*&video_id:'([^']*)'.*", "%1" )
54             end
55             if name and description and artist --[[and video_id]] then break end
56         end
57         if not video_id then
58             video_id = get_url_param( vlc.path, "v" )
59         end
60         if not base_yt_url then
61             base_yt_url = "http://youtube.com/"
62         end
63         art_url = get_arturl( vlc.path, video_id )
64         if t then
65             return { { path = base_yt_url .. "get_video?video_id="..video_id.."&t="..t; name = name; description = description; artist = artist; arturl = arturl } }
66         else
67             -- This shouldn't happen ... but keep it as a backup.
68             return { { path = "http://www.youtube.com/v/"..video_id; name = name; description = description; artist = artist; arturl = arturl } }
69         end
70     else -- This is the flash player's URL
71         if string.match( vlc.path, "title=" ) then
72             name = get_url_param( vlc.path, "title" )
73         end
74         video_id = get_url_param( vlc.path, "video_id" )
75         art_url = get_arturl( vlc.path, video_id )
76         if not string.match( vlc.path, "t=" ) then
77             -- This sucks, we're missing "t" which is now mandatory. Let's
78             -- try using another url
79             return { { path = "http://www.youtube.com/v/"..video_id; name = name; arturl = arturl } }
80         end
81         return { { path = "http://www.youtube.com/get_video.php?video_id="..video_id.."&t="..get_url_param( vlc.path, "t" ); name = name; arturl = arturl } }
82     end
83 end