|
-- <nowplaying>
|
|
-- <ARTIST><![CDATA['artist']]></ARTIST>
|
|
-- <TITLE><![CDATA['title']]></TITLE>
|
|
-- </nowplaying>
|
|
--
|
|
-- ------------------------------------------------------------------
|
|
-- MetaData Filter. Copyright (C) 2011 Tls Corporation
|
|
-- Author: Ioan L. Rus
|
|
--
|
|
-- Lines that start with two dashes (like this line) are comments.
|
|
--
|
|
-- Metadata filters are written in a very simple programming
|
|
-- language named Lua. Additional information about the language
|
|
-- and it's syntax can be found at http://www.lua.org.
|
|
--
|
|
-- This file implements a metadata filter that parses XML data.
|
|
-- For this example,
|
|
--
|
|
-- <?xml version="1.0" ?>
|
|
-- <nowplaying>
|
|
-- <ARTIST><![CDATA[Chris Tomlin]]></ARTIST>
|
|
-- <TITLE><![CDATA[I Will Follow]]></TITLE>
|
|
-- <ARTIST_WEB><![CDATA[ArtistWeb C. Tomlin]]></ARTIST_WEB>
|
|
-- <TITLE_WEB><![CDATA[TitleWeb I Will Folow]]></TITLE_WEB>
|
|
-- </nowplaying>
|
|
--
|
|
-- the XML data expected will look like this:
|
|
--
|
|
-- <CurrentEvent>
|
|
-- <Artist>Chris Tomlin</Artist>
|
|
-- <Title>I Will Follow</Title>
|
|
-- <ArtistWeb>ArtistWeb C. Tomlin</ArtistWeb>
|
|
-- <TitleWeb>TitleWeb I Will Folow</TitleWeb>
|
|
-- </CurrentEvent>
|
|
|
|
|
|
-- ------------------------------------------------------------------
|
|
|
|
-- This tells the application that we wish to use an XML parser.
|
|
-- It is also possible (and in some cases more appropriate) to
|
|
-- use a line or character parser. Please see the other filter
|
|
-- examples for details.
|
|
UseXmlParser()
|
|
|
|
-- This function is called when a connection to the metadata
|
|
-- server is first established.
|
|
function OnConnect(clientAddress)
|
|
-- The print function sends data back to the client.
|
|
-- For this example we don't send anything back.
|
|
-- print("Hello ",clientAddress,"\r\n")
|
|
end
|
|
|
|
-- These functions are called by the application when a piece
|
|
-- of XML data is parsed. The functions extract the metadata
|
|
-- info then call SendMetaDataSong(title,url) to pass the info
|
|
-- back to the application to be included in the out going
|
|
-- streams.
|
|
|
|
-- TODO: Fill in the url to point to your website (or
|
|
-- any website where the listener can get more info
|
|
-- about the artist or song being played.
|
|
url=""
|
|
|
|
-- Work fields
|
|
currentElement=""
|
|
cuttype=""
|
|
artist=""
|
|
title=""
|
|
artist_web=""
|
|
title_web=""
|
|
|
|
-- Called when an XML element start has been parsed. The name
|
|
-- of the element and a table of attributes are provided.
|
|
function OnElementStart(elementName,elementAttributeTable)
|
|
|
|
if elementName=="nowplaying" then
|
|
-- Reset all work fields
|
|
currentElement=""
|
|
artist=""
|
|
title=""
|
|
artist_web=""
|
|
title_web=""
|
|
|
|
else
|
|
-- Remember which element this is
|
|
currentElement=elementName
|
|
|
|
end
|
|
end
|
|
|
|
-- Called when the end of an element is detected.
|
|
function OnElementEnd(elementName)
|
|
-- LogInfo("XML Parser Sample: OnElementEnd\n")
|
|
if elementName=="nowplaying" then
|
|
|
|
local display=artist_web
|
|
if artist_web=="" then
|
|
-- If the artist_web is blank then rerplace artist_web by artist
|
|
display=artist
|
|
end
|
|
|
|
local display_title=title_web
|
|
if display_title=="" then
|
|
-- If the title_web is blank then rerplace it by title
|
|
display_title=title
|
|
end
|
|
|
|
if display~="" then
|
|
-- If the display is not blank then add
|
|
-- a dash as a separator and the title
|
|
display=display .. " - " .. display_title
|
|
else
|
|
display=display_title
|
|
end
|
|
|
|
LogInfo("TractPlugin: SendInfo('",display,"','",url,"')\n")
|
|
SendMetaDataSong(display,url)
|
|
end
|
|
end
|
|
|
|
-- Called when character data (outside of element tags) is
|
|
-- parsed. Please note that this will include any spaces,
|
|
-- tab characters or new line characters used to format the
|
|
-- XML data.
|
|
--
|
|
-- NOTE: You do not need to define functions that are not used.
|
|
function OnCharacterData(ch)
|
|
|
|
local char=string.char(ch) -- Convert character number to letter
|
|
|
|
if currentElement=="TITLE" then
|
|
-- Append character to title variable
|
|
title=title .. char
|
|
|
|
elseif currentElement=="ARTIST" then
|
|
-- Append character to artist variable
|
|
artist=artist .. char
|
|
|
|
elseif currentElement=="ARTIST_WEB" then
|
|
-- Append character to artist_web variable
|
|
artist_web=artist_web .. char
|
|
|
|
elseif currentElement=="TITLE_WEB" then
|
|
-- Append character to title variable
|
|
title_web=title_web .. char
|
|
end
|
|
|
|
end
|
|
|
|
-- Called when an XML comment is detected. The comment string
|
|
-- contains the text of the comment.
|
|
--
|
|
-- NOTE: You do not need to define functions that are not used.
|
|
-- function OnComment(comment)
|
|
-- end
|
|
|
|
-- Marks the start of a CDATA section. Not used very often.
|
|
--
|
|
-- NOTE: You do not need to define functions that are not used.
|
|
-- function OnCdataStart()
|
|
-- end
|
|
|
|
-- Marks the start of a CDATA section. Not used very often.
|
|
--
|
|
-- NOTE: You do not need to define functions that are not used.
|
|
-- function OnCdataEnd()
|
|
-- end
|
|
|
|
-- NOTE: The line and character notification functions are
|
|
-- still called even for the XML parser. If you do not need
|
|
-- them, then just don't define them.
|
|
-- This function is called by the application each time a metadata
|
|
-- character is received.
|
|
function OnCharacterReceived(charNumber)
|
|
-- The lines below will echo the characters sent by the
|
|
-- metadata source back. This is useful when developing
|
|
-- the filter and for debugging. In this example, we
|
|
-- do nothing.
|
|
--
|
|
--local letter=string.char(charNumber) -- Convert character number to letter
|
|
--print(letter)
|
|
end
|
