mirrors/vlc
0
0
Fork 0
mirror of https://github.com/videolan/vlc.git synced 2024-12-11 10:44:38 +08:00
Code Issues Packages Projects Releases Wiki Activity

appletrailers sd: rewrite

Browse Source 
Don't use the iphone-trick, but instead parse the playlist-file and add
all the video-types on one run. Seems that when adding nodes on lua sd plugin,
theres some flickering.
This commit is contained in:
Ilkka Ollakka 2010-05-21 14:00:08 +03:00
parent 99039b1133
commit e78e5ad187
1 changed files with 36 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

53
share/lua/sd/appletrailers.lua
View File

@ -30,28 +30,47 @@ function find( haystack, needle )
end
function main()
fd = vlc.stream( "http://trailers.apple.com/trailers/iphone/home/feeds/just_added.json" )
fd = vlc.stream( "http://trailers.apple.com/trailers/home/feeds/just_hd.json" )
if not fd then return nil end
options = {":http-user-agent='iPhone'"}
while true
options = {":http-user-agent=QuickTime/7.2 vlc edition",":demux=avformat",":play-and-pause"}
line = fd:readline()
while line ~= nil
do
line = fd:readline()
if not line then break end
if string.match( line, "title" ) and string.match( line, "hd\":true")then
if string.match( line, "title" ) then
title = vlc.strings.resolve_xml_special_chars( find( line, "title\":\"(.-)\""))
art = find( line, "poster\":\"(.-)\"")
url = find( line, "location\":\"(.-)\"")
trailertype = ""
trailertype = find( line, "type\":\"(.-)\"")
vlc.msg.err(trailertype)
if trailertype then
trailertype = string.gsub( trailertype, " ", "")
trailertype = string.lower( trailertype )
else
trailertype = "trailer"
url = find( line, "url\":\"(.-)\"")
playlist = vlc.stream( "http://trailers.apple.com"..url.."includes/playlists/web.inc" )
if not playlist then
vlc.msg.info("Didn't get playlist...")
end
url = "http://trailers.apple.com"..url..trailertype.."/"
vlc.sd.add_item( { path = url, name=title, title=title, options=options, arturl=art})
node = vlc.sd.add_node( {title=title,arturl=art} )
playlistline = playlist:readline()
description =""
vlc.msg.info( "http://trailers.apple.com"..url.."includes/playlists/web.inc" )
if not playlistline then vlc.msg.info("Empty playlists-file") end
while playlistline ~= nil
do
if string.match( playlistline, "class=\".-first" ) then
description = find( playlistline, "h%d.->(.-)</h%d")
vlc.msg.info( "Got type:"..description )
end
if string.match( playlistline, "class=\"hd\".-\.mov") then
for urlline,resolution in string.gmatch(playlistline, "class=\"hd\".-href=\"(.-.mov)\".-(%d+.-p)") do
urlline = string.gsub( urlline, "_"..resolution, "_h"..resolution )
vlc.msg.info( "adding url:"..urlline )
node:add_subitem( {path = urlline,
title=title.." "..description.." ("..resolution..")",
options=options, arturl=art })
end
end
playlistline = playlist:readline()
end
vlc.msg.info( "entry done...")
end
line = fd:readline()
end
end