home *** CD-ROM | disk | FTP | other *** search
/ mail.altrad.com / 2015.02.mail.altrad.com.tar / mail.altrad.com / TEST / vlc-2-0-5-win32.exe / lua / http / requests / playlist_jstree.xml < prev    next >
Extensible Markup Language  |  2012-12-12  |  3KB  |  85 lines
  1. <?xml version="1.0" encoding="utf-8" standalone="yes" ?<?vlc print'>'?>
  2. <?vlc --[[
  3. vim:syntax=lua
  4. <!--  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - >
  5. <  playlist.xml: VLC media player web interface
  6. < - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - >
  7. <  Copyright (C) 2005-2006 the VideoLAN team
  8. <  $Id$
  9. < 
  10. <  Authors: Antoine Cellerier <dionoea -at- videolan -dot- org>
  11. < 
  12. <  This program is free software; you can redistribute it and/or modify
  13. <  it under the terms of the GNU General Public License as published by
  14. <  the Free Software Foundation; either version 2 of the License, or
  15. <  (at your option) any later version.
  16. < 
  17. <  This program is distributed in the hope that it will be useful,
  18. <  but WITHOUT ANY WARRANTY; without even the implied warranty of
  19. <  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20. <  GNU General Public License for more details.
  21. < 
  22. <  You should have received a copy of the GNU General Public License
  23. <  along with this program; if not, write to the Free Software
  24. <  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  25. < - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->
  26. ]] ?>
  27. <root>
  28. <?vlc
  29. --[[
  30. function a(t,pre)
  31.   local pre = pre or ""
  32.   for k,v in pairs(t) do
  33.     vlc.msg.err(pre..tostring(k).." : "..tostring(v))
  34.     if type(v) == "table" then
  35.       a(v,pre.."  ")
  36.     end
  37.   end
  38. end
  39. --]]
  40.  
  41. function print_playlist(item)
  42.     if item.flags.disabled then return end
  43.     if(item.children) then
  44.         local name = vlc.strings.convert_xml_special_chars(item.name or "")
  45.         if(name ~= "Undefined") then
  46.             print('<item id="plid_' ..tostring(item.id).. '" name="' ..tostring(name).. '" ro="' ..(item.flags.ro and "ro" or "rw").. '"><content><name>' ..name.. '</name></content>')
  47.             for _, child in ipairs(item.children) do
  48.                 print_playlist(child)
  49.             end
  50.             print('</item>')
  51.         else
  52.             for _, child in ipairs(item.children) do
  53.                 print_playlist(child)
  54.             end
  55.         end
  56.     else
  57.         local name, path = vlc.strings.convert_xml_special_chars(item.name or "", item.path or "")
  58.         local current_item = vlc.input.item()
  59.         local current = ""
  60.         -- Is the item the one currently played
  61.         if(current_item ~= nil) then
  62.             if(vlc.input.item().uri(current_item) == path) then
  63.                 current = 'current="current"'
  64.             end
  65.         end
  66.         print('<item id="plid_' ..tostring(item.id).. '" uri="' ..tostring(path).. '" name="' ..name.. '" ro="' ..(item.flags.ro and "ro" or "rw").. '" duration ="' ..math.floor(item.duration).. '" ' ..current.. ' ><content><name>' ..name.. '</name></content></item>')
  67.     end
  68. end
  69.  
  70. local p
  71. if _GET["search"] then
  72.   if _GET["search"] ~= "" then
  73.     _G.search_key = _GET["search"]
  74.   else
  75.     _G.search_key = nil
  76.   end
  77.   local key = vlc.strings.decode_uri(_GET["search"])
  78.   p = vlc.playlist.search(key)
  79. else
  80.   p = vlc.playlist.get()
  81. end
  82. --a(p) --Uncomment to debug
  83. print_playlist(p)
  84. ?>
  85. </root>