tests/media/media_ardmediathek.c

   1 /* libquvi-scripts
   2  * Copyright (C) 2013  Toni Gundogdu <legatvs@gmail.com>
   3  *
   4  * This file is part of libquvi-scripts <http://quvi.sourceforge.net>.
   5  *
   6  * This program is free software: you can redistribute it and/or
   7  * modify it under the terms of the GNU Affero General Public
   8  * License as published by the Free Software Foundation, either
   9  * version 3 of the License, or (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU Affero General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Affero General
  17  * Public License along with this program.  If not, see
  18  * <http://www.gnu.org/licenses/>.
  19  */
  20
  21 /*
  22  * NOTE
  23  *
  24  * Media hosted at ardmediathek.de will reportedly expire after a few
  25  * weeks. This test attempts to work around this by trying to find a
  26  * media URL from the website that can be used to test the media script.
  27  *
  28  * The front page will not contain any media URLs unless javascript is
  29  * enabled. We cannot emulate js so, instead, we fetch the "Neueste
  30  * Clips" which should media URLs.
  31  */
  32
  33 #include "config.h"
  34
  35 #include <string.h>
  36 #include <glib.h>
  37 #include <quvi.h>
  38
  39 #include "tests.h"
  40
  41 static const gchar WWW[] = "http://www.ardmediathek.de";
  42
  43 static gchar *fetch_neueste_clips_page()
  44 {
  45   static const gchar PATTERN[] =
  46     "href=\"(.*)\" title=\".*\" data-xtclib=\"Neueste\\+Clips\"";
  47
  48   gchar *p, *u, *s;
  49   capture_t c;
  50
  51   p = fetch(WWW);
  52   g_assert(p != NULL);
  53
  54   c = capture_new(p, PATTERN, 0);
  55   g_assert(c != NULL);
  56
  57   g_assert(capture_matches(c) == TRUE);
  58   s = capture_fetch(c, 1);
  59
  60   capture_free(c);
  61   g_free(p);
  62
  63   u = g_strdup_printf("%s%s", WWW, s);
  64   g_free(s);
  65
  66   p = fetch(u);
  67   g_free(u);
  68
  69   return (p);
  70 }
  71
  72 static void test_media_ardmediathek()
  73 {
  74   static const gchar PATTERN[] = "href=\"(.*documentId=.*)\" class";
  75
  76   struct qm_test_opts_s o;
  77   gchar *p, *u, *r;
  78   capture_t c;
  79   GSList *l;
  80
  81   memset(&o, 0, sizeof(o));
  82
  83   /* Normally done in qm_test, due to fetch-parse, do it here. */
  84
  85   if (chk_skip(__func__) == TRUE)
  86     return;
  87
  88   p = fetch_neueste_clips_page();
  89   g_assert(p != NULL);
  90
  91   l = NULL;
  92   u = NULL;
  93
  94   c = capture_new(p, PATTERN, 0);
  95   g_assert(c != NULL);
  96
  97   while (capture_matches(c) == TRUE)
  98     {
  99       r = capture_fetch(c, 1);
 100       l = g_slist_prepend(l, g_strdup_printf("%s%s", WWW, r));
 101       capture_next(c);
 102       g_free(r);
 103     }
 104   l = g_slist_reverse(l);
 105   g_assert_cmpint(g_slist_length(l), >, 0);
 106
 107   /* Pick a random URL from the stack. */
 108   {
 109     const gint32 n = g_random_int_range(0, g_slist_length(l));
 110     u = (gchar*) g_slist_nth_data(l, n);
 111   }
 112   g_assert(u != NULL);
 113
 114   g_test_message("media URL=%s", u);
 115   qm_test(__func__, u, NULL, &o);
 116
 117   slist_free_full(l, (GFunc) g_free);
 118   capture_free(c);
 119   g_free(p);
 120 }
 121
 122 gint main(gint argc, gchar **argv)
 123 {
 124   g_test_init(&argc, &argv, NULL);
 125   g_test_add_func("/media/ardmediathek", test_media_ardmediathek);
 126   return (g_test_run());
 127 }
 128
 129 /* vim: set ts=2 sw=2 tw=72 expandtab: */