1 files changed, 283 insertions, 0 deletions
diff --git a/src/playlist/AsxPlaylistPlugin.cxx b/src/playlist/AsxPlaylistPlugin.cxx
new file mode 100644
index 000000000..25319ca6b
--- /dev/null
+++ b/src/playlist/AsxPlaylistPlugin.cxx
@@ -0,0 +1,283 @@
+/*
+ * Copyright (C) 2003-2013 The Music Player Daemon Project
+ * http://www.musicpd.org
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+ */
+
+#include "config.h"
+#include "AsxPlaylistPlugin.hxx"
+#include "MemoryPlaylistProvider.hxx"
+#include "input_stream.h"
+#include "song.h"
+#include "tag.h"
+
+#include <glib.h>
+
+#include <assert.h>
+#include <string.h>
+
+#undef G_LOG_DOMAIN
+#define G_LOG_DOMAIN "asx"
+
+/**
+ * This is the state object for the GLib XML parser.
+ */
+struct AsxParser {
+	/**
+	 * The list of songs (in reverse order because that's faster
+	 * while adding).
+	 */
+	std::forward_list<SongPointer> songs;
+
+	/**
+	 * The current position in the XML file.
+	 */
+	enum {
+		ROOT, ENTRY,
+	} state;
+
+	/**
+	 * The current tag within the "entry" element.  This is only
+	 * valid if state==ENTRY.  TAG_NUM_OF_ITEM_TYPES means there
+	 * is no (known) tag.
+	 */
+	enum tag_type tag;
+
+	/**
+	 * The current song.  It is allocated after the "location"
+	 * element.
+	 */
+	struct song *song;
+
+	AsxParser()
+		:state(ROOT) {}
+
+};
+
+static const gchar *
+get_attribute(const gchar **attribute_names, const gchar **attribute_values,
+	      const gchar *name)
+{
+	for (unsigned i = 0; attribute_names[i] != NULL; ++i)
+		if (g_ascii_strcasecmp(attribute_names[i], name) == 0)
+			return attribute_values[i];
+
+	return NULL;
+}
+
+static void
+asx_start_element(G_GNUC_UNUSED GMarkupParseContext *context,
+		  const gchar *element_name,
+		  const gchar **attribute_names,
+		  const gchar **attribute_values,
+		  gpointer user_data, G_GNUC_UNUSED GError **error)
+{
+	AsxParser *parser = (AsxParser *)user_data;
+
+	switch (parser->state) {
+	case AsxParser::ROOT:
+		if (g_ascii_strcasecmp(element_name, "entry") == 0) {
+			parser->state = AsxParser::ENTRY;
+			parser->song = song_remote_new("asx:");
+			parser->tag = TAG_NUM_OF_ITEM_TYPES;
+		}
+
+		break;
+
+	case AsxParser::ENTRY:
+		if (g_ascii_strcasecmp(element_name, "ref") == 0) {
+			const gchar *href = get_attribute(attribute_names,
+							  attribute_values,
+							  "href");
+			if (href != NULL) {
+				/* create new song object, and copy
+				   the existing tag over; we cannot
+				   replace the existing song's URI,
+				   because that attribute is
+				   immutable */
+				struct song *song = song_remote_new(href);
+
+				if (parser->song != NULL) {
+					song->tag = parser->song->tag;
+					parser->song->tag = NULL;
+					song_free(parser->song);
+				}
+
+				parser->song = song;
+			}
+		} else if (g_ascii_strcasecmp(element_name, "author") == 0)
+			/* is that correct?  or should it be COMPOSER
+			   or PERFORMER? */
+			parser->tag = TAG_ARTIST;
+		else if (g_ascii_strcasecmp(element_name, "title") == 0)
+			parser->tag = TAG_TITLE;
+
+		break;
+	}
+}
+
+static void
+asx_end_element(G_GNUC_UNUSED GMarkupParseContext *context,
+		const gchar *element_name,
+		gpointer user_data, G_GNUC_UNUSED GError **error)
+{
+	AsxParser *parser = (AsxParser *)user_data;
+
+	switch (parser->state) {
+	case AsxParser::ROOT:
+		break;
+
+	case AsxParser::ENTRY:
+		if (g_ascii_strcasecmp(element_name, "entry") == 0) {
+			if (strcmp(parser->song->uri, "asx:") != 0)
+				parser->songs.emplace_front(parser->song);
+			else
+				song_free(parser->song);
+
+			parser->state = AsxParser::ROOT;
+		} else
+			parser->tag = TAG_NUM_OF_ITEM_TYPES;
+
+		break;
+	}
+}
+
+static void
+asx_text(G_GNUC_UNUSED GMarkupParseContext *context,
+	 const gchar *text, gsize text_len,
+	 gpointer user_data, G_GNUC_UNUSED GError **error)
+{
+	AsxParser *parser = (AsxParser *)user_data;
+
+	switch (parser->state) {
+	case AsxParser::ROOT:
+		break;
+
+	case AsxParser::ENTRY:
+		if (parser->tag != TAG_NUM_OF_ITEM_TYPES) {
+			if (parser->song->tag == NULL)
+				parser->song->tag = tag_new();
+			tag_add_item_n(parser->song->tag, parser->tag,
+				       text, text_len);
+		}
+
+		break;
+	}
+}
+
+static const GMarkupParser asx_parser = {
+	asx_start_element,
+	asx_end_element,
+	asx_text,
+	nullptr,
+	nullptr,
+};
+
+static void
+asx_parser_destroy(gpointer data)
+{
+	AsxParser *parser = (AsxParser *)data;
+
+	if (parser->state >= AsxParser::ENTRY)
+		song_free(parser->song);
+}
+
+/*
+ * The playlist object
+ *
+ */
+
+static struct playlist_provider *
+asx_open_stream(struct input_stream *is)
+{
+	AsxParser parser;
+	GMarkupParseContext *context;
+	char buffer[1024];
+	size_t nbytes;
+	bool success;
+	GError *error = NULL;
+
+	/* parse the ASX XML file */
+
+	context = g_markup_parse_context_new(&asx_parser,
+					     G_MARKUP_TREAT_CDATA_AS_TEXT,
+					     &parser, asx_parser_destroy);
+
+	while (true) {
+		nbytes = input_stream_lock_read(is, buffer, sizeof(buffer),
+						&error);
+		if (nbytes == 0) {
+			if (error != NULL) {
+				g_markup_parse_context_free(context);
+				g_warning("%s", error->message);
+				g_error_free(error);
+				return NULL;
+			}
+
+			break;
+		}
+
+		success = g_markup_parse_context_parse(context, buffer, nbytes,
+						       &error);
+		if (!success) {
+			g_warning("XML parser failed: %s", error->message);
+			g_error_free(error);
+			g_markup_parse_context_free(context);
+			return NULL;
+		}
+	}
+
+	success = g_markup_parse_context_end_parse(context, &error);
+	if (!success) {
+		g_warning("XML parser failed: %s", error->message);
+		g_error_free(error);
+		g_markup_parse_context_free(context);
+		return NULL;
+	}
+
+	parser.songs.reverse();
+	MemoryPlaylistProvider *playlist =
+		new MemoryPlaylistProvider(std::move(parser.songs));
+
+	g_markup_parse_context_free(context);
+
+	return playlist;
+}
+
+static const char *const asx_suffixes[] = {
+	"asx",
+	NULL
+};
+
+static const char *const asx_mime_types[] = {
+	"video/x-ms-asf",
+	NULL
+};
+
+const struct playlist_plugin asx_playlist_plugin = {
+	"asx",
+
+	nullptr,
+	nullptr,
+	nullptr,
+	asx_open_stream,
+	nullptr,
+	nullptr,
+
+	nullptr,
+	asx_suffixes,
+	asx_mime_types,
+};