[gupnp-av/wip/didl-lite-fragments: 19/20] Add a test checking fragment applying.

[Krzesimir Nowak <krnowak src gnome org>]

commit 68a0fa0a7bb385d08285657d7dbb0b0731e6633c
Author: Krzesimir Nowak <krnowak openismus com>
Date:   Thu Oct 25 11:43:06 2012 +0200

    Add a test checking fragment applying.

 configure.ac      |    1 +
 tests/Makefile.am |   34 ++++++---
 tests/fragments.c |  201 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 3 files changed, 225 insertions(+), 11 deletions(-)
---
diff --git a/configure.ac b/configure.ac
index b5e8987..f8eeba3 100644
--- a/configure.ac
+++ b/configure.ac
@@ -16,6 +16,7 @@ AM_SILENT_RULES([yes])
 
 # Check for programs
 AC_PROG_CC
+AM_PROG_CC_C_O
 AC_HEADER_STDC
 AC_FUNC_MMAP
 
diff --git a/tests/Makefile.am b/tests/Makefile.am
index c404b40..de27f44 100644
--- a/tests/Makefile.am
+++ b/tests/Makefile.am
@@ -1,21 +1,33 @@
 SUBDIRS = gtest
 
-AM_CFLAGS = $(LIBGUPNP_CFLAGS) -I$(top_srcdir)
+common_cflags = \
+	$(LIBGUPNP_CFLAGS) \
+	-I$(top_srcdir)
+common_ldadd = \
+	$(top_builddir)/libgupnp-av/libgupnp-av-1.0.la \
+	$(LIBGUPNP_LIBS)
 
 noinst_PROGRAMS = test-search-criteria-parser
+
 test_search_criteria_parser_SOURCES = test-search-criteria-parser.c
-test_search_criteria_parser_LDADD = \
-			$(top_builddir)/libgupnp-av/libgupnp-av-1.0.la \
-			$(LIBGUPNP_LIBS)
+test_search_criteria_parser_LDADD = $(common_ldadd)
+test_search_criteria_parser_CFLAGS = $(common_cflags)
+
+check_PROGRAMS = \
+	check-search \
+	check-feature-list-parser \
+	fragments
 
-check_PROGRAMS = check-search \
-		 check-feature-list-parser
 check_search_SOURCES = check-search.c
-check_search_LDADD = $(top_builddir)/libgupnp-av/libgupnp-av-1.0.la \
-		     $(LIBGUPNP_LIBS)
+check_search_LDADD = $(common_ldadd)
+check_search_CFLAGS = $(common_cflags)
+
 check_feature_list_parser_SOURCES = check-feature-list-parser.c
-check_feature_list_parser_LDADD = \
-			$(top_builddir)/libgupnp-av/libgupnp-av-1.0.la \
-			$(LIBGUPNP_LIBS)
+check_feature_list_parser_LDADD = $(common_ldadd)
+check_feature_list_parser_CFLAGS = $(common_cflags)
+
+fragments_SOURCES = fragments.c
+fragments_LDADD = $(common_ldadd)
+fragments_CFLAGS = $(common_cflags) -DABS_TOP_SRCDIR="\"$(abs_top_srcdir)\""
 
 TESTS = $(check_PROGRAMS)
diff --git a/tests/fragments.c b/tests/fragments.c
new file mode 100644
index 0000000..0ecb47b
--- /dev/null
+++ b/tests/fragments.c
@@ -0,0 +1,201 @@
+/*
+ * Copyright (C) 2012 Intel Corporation
+ *
+ * Authors: Krzesimir Nowak <krnowak openismus com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#include <glib-object.h>
+#include <libgupnp-av/gupnp-didl-lite-object.h>
+#include <libgupnp-av/gupnp-didl-lite-writer.h>
+#include <libgupnp-av/gupnp-didl-lite-item.h>
+
+/* creates an item described by:
+static const gchar * const didllite =
+        "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+        "<DIDL-Lite\n"
+        "xmlns:dc=\"http://purl.org/dc/elements/1.1/\"\n";
+        "xmlns=\"urn:schemas-upnp-org:metadata-1-0/DIDL-Lite/\"\n"
+        "xmlns:upnp=\"urn:schemas-upnp-org:metadata-1-0/upnp/\"\n"
+        "xmlns:xsi=\"http://www.w3.org/2001/XMLSchema-instance\"\n";
+        "xsi:schemaLocation=\"\n"
+        "urn:schemas-upnp-org:metadata-1-0/DIDL-Lite/\n"
+        "http://www.upnp.org/schemas/av/didl-lite.xsd\n";
+        "urn:schemas-upnp-org:metadata-1-0/upnp/\n"
+        "http://www.upnp.org/schemas/av/upnp.xsd\";>\n"
+        "<item id=\"$id\" parentID=\"$parent_id\" restricted=\"0\">\n"
+        "<dc:title>Try a little tenderness</dc:title>\n"
+        "<upnp:class>object.item.audioItem.musicTrack</upnp:class>\n"
+        "<res protocolInfo=\"http-get:*:audio/mpeg:*\" size=\"3558000\">\n"
+        "http://168.192.1.1/audio197.mp3\n";
+        "</res>\n"
+        "<upnp:artist>Unknown</upnp:artist>\n"
+        "</item>\n"
+        "</DIDL-Lite>\n";
+*/
+static GUPnPDIDLLiteObject *
+get_item (GUPnPDIDLLiteWriter *writer, guint id, guint parent_id)
+{
+        GUPnPDIDLLiteItem *item = gupnp_didl_lite_writer_add_item (writer);
+        GUPnPDIDLLiteObject *object = GUPNP_DIDL_LITE_OBJECT (item);
+        GUPnPDIDLLiteContributor *artist;
+        GUPnPDIDLLiteResource *resource;
+        GUPnPProtocolInfo *info;
+        gchar *str_id = g_strdup_printf ("%u", id);
+
+        gupnp_didl_lite_object_set_id (object, str_id);
+        g_free (str_id);
+        str_id = g_strdup_printf ("%u", parent_id);
+        gupnp_didl_lite_object_set_parent_id (object, str_id);
+        g_free (str_id);
+        gupnp_didl_lite_object_set_restricted (object, FALSE);
+        gupnp_didl_lite_object_set_title (object, "Try a little tenderness");
+        gupnp_didl_lite_object_set_upnp_class
+                                        (object,
+                                         "object.item.audioItem.musicTrack");
+        artist = gupnp_didl_lite_object_add_artist (object);
+        gupnp_didl_lite_contributor_set_name (artist, "Unknown");
+        g_object_unref (artist);
+        resource = gupnp_didl_lite_object_add_resource (object);
+        info = gupnp_protocol_info_new ();
+        gupnp_protocol_info_set_protocol (info, "http-get");
+        gupnp_protocol_info_set_network (info, "*");
+        gupnp_protocol_info_set_mime_type (info, "audio/mpeg");
+        gupnp_didl_lite_resource_set_protocol_info (resource, info);
+        g_object_unref (info);
+        gupnp_didl_lite_resource_set_size (resource, 3558000);
+        gupnp_didl_lite_resource_set_uri (resource,
+                                          "http://168.192.1.1/audio197.mp3";);
+        g_object_unref (resource);
+
+        return object;
+}
+
+static gchar *current_fragments[] = {
+        /* 1 */
+        "<upnp:class>object.item.audioItem.musicTrack</upnp:class>",
+        /* 2 */
+        "",
+        /* 3 */
+        "<upnp:artist>Unknown</upnp:artist>",
+        /* 4 */
+        "<dc:title>Try a little tenderness</dc:title>"
+};
+
+static gchar *new_fragments[] = {
+        /* 1 */
+        "<upnp:class>object.item.audioItem.musicTrack</upnp:class>"
+        "<upnp:genre>Obscure</upnp:genre>",
+        /* 2 */
+        "<upnp:genre>Even more obscure</upnp:genre>",
+        /* 3 */
+        "",
+        /* 4 */
+        "<dc:title>Cthulhu fhtagn</dc:title>"
+};
+
+static void
+debug_dump (GUPnPDIDLLiteObject *object)
+{
+        xmlChar *dump = NULL;
+        xmlNodePtr node = gupnp_didl_lite_object_get_xml_node (object);
+        xmlDocPtr doc = node->doc;
+
+        xmlDocDumpMemory (doc, &dump, NULL);
+        g_debug ("Obj dump:\n%s", dump);
+        xmlFree (dump);
+}
+
+int main (void)
+{
+        GUPnPDIDLLiteObject *temp_object;
+        GUPnPDIDLLiteObject *object;
+        GUPnPDIDLLiteFragmentResult result;
+        GUPnPDIDLLiteWriter *writer;
+        int retval = 1;
+        const gchar *value;
+        GList* artists;
+        GUPnPDIDLLiteContributor *artist;
+
+        g_type_init ();
+        g_setenv ("GUPNP_AV_DATADIR", ABS_TOP_SRCDIR G_DIR_SEPARATOR_S "data", FALSE);
+
+        writer = gupnp_didl_lite_writer_new (NULL);
+        temp_object = get_item (writer, 3, 2);
+        object = get_item (writer, 18, 13);
+        debug_dump (object);
+        result = gupnp_didl_lite_object_apply_fragments (object,
+                                                         current_fragments,
+                                                         G_N_ELEMENTS (current_fragments),
+                                                         new_fragments,
+                                                         G_N_ELEMENTS (new_fragments));
+        debug_dump (object);
+        if (result != GUPNP_DIDL_LITE_FRAGMENT_RESULT_OK) {
+                g_warning ("Applying fragments failed.");
+                goto out;
+        }
+
+        value = gupnp_didl_lite_object_get_title (object);
+
+        if (g_strcmp0 (value, "Cthulhu fhtagn")) {
+                g_warning ("Title is '%s', should be 'Cthulhu fhtagn'.", value);
+                goto out;
+        }
+
+        artists = gupnp_didl_lite_object_get_artists (object);
+
+        if (artists) {
+                g_warning ("Should be no artists.");
+                g_list_free_full (artists, g_object_unref);
+                goto out;
+        }
+
+        value = gupnp_didl_lite_object_get_title (temp_object);
+
+        if (g_strcmp0 (value, "Try a little tenderness")) {
+                g_warning ("Title is '%s', should be 'Try a little tenderness'.", value);
+                goto out;
+        }
+
+        artists = gupnp_didl_lite_object_get_artists (temp_object);
+
+        if (!artists) {
+                g_warning ("Should be one artist, there are none.");
+                goto out;
+        }
+        if (artists->next) {
+                g_list_free_full (artists, g_object_unref);
+                g_warning ("Should be one artist, there are more.");
+                goto out;
+        }
+        artist = g_object_ref (artists->data);
+        g_list_free_full (artists, g_object_unref);
+        value = gupnp_didl_lite_contributor_get_name (artist);
+        if (g_strcmp0 (value, "Unknown")) {
+                g_object_unref (artist);
+                g_warning ("Artist is '%s', but should be 'Unknown'.", value);
+                goto out;
+        }
+        g_object_unref (artist);
+
+        retval = 0;
+ out:
+        g_object_unref (object);
+        g_object_unref (temp_object);
+        g_object_unref (writer);
+        return retval;
+}