tests/media/media_arte.c

   1 /* libquvi-scripts
   2  * Copyright (C) 2012,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: Media hosted at videos.arte.tv expire after some time. For this
  23  * test, we need to fetch the front page and parse a test media URL from
  24  * it.
  25  */
  26
  27 #include "config.h"
  28
  29 #include <string.h>
  30 #include <glib.h>
  31 #include <quvi.h>
  32
  33 #include "tests.h"
  34
  35 static const gchar PATTERN[] = "<h2><a href=\"(.*)\"";
  36 static const gchar WWW[] = "http://videos.arte.tv";
  37
  38 static void test_media_arte()
  39 {
  40   struct qm_test_opts_s o;
  41   gchar *p, *u, *r;
  42   capture_t c;
  43   GSList *l;
  44
  45   if (chk_geoblocked() == FALSE)
  46     return;
  47
  48   memset(&o, 0, sizeof(o));
  49
  50   /* Normally done in qm_test, due to fetch-parse, do it here. */
  51
  52   if (chk_skip(__func__) == TRUE)
  53     return;
  54
  55   p = fetch(WWW);
  56   g_assert(p != NULL);
  57
  58   l = NULL;
  59   u = NULL;
  60
  61   c = capture_new(p, PATTERN, 0);
  62   g_assert(c != NULL);
  63
  64   while (capture_matches(c) == TRUE)
  65     {
  66       r = capture_fetch(c, 1);
  67       l = g_slist_prepend(l, g_strdup_printf("%s%s", WWW, r));
  68       capture_next(c);
  69       g_free(r);
  70     }
  71   l = g_slist_reverse(l);
  72   g_assert_cmpint(g_slist_length(l), >, 0);
  73
  74   /* Pick a random URL from the stack. */
  75   {
  76     const gint32 n = g_random_int_range(0, g_slist_length(l));
  77     u = (gchar*) g_slist_nth_data(l, n);
  78   }
  79   g_assert(u != NULL);
  80
  81   g_test_message("media URL=%s", u);
  82   qm_test(__func__, u, NULL, &o);
  83
  84   slist_free_full(l, (GFunc) g_free);
  85   capture_free(c);
  86   g_free(p);
  87 }
  88
  89 gint main(gint argc, gchar **argv)
  90 {
  91   g_test_init(&argc, &argv, NULL);
  92   g_test_add_func("/media/arte", test_media_arte);
  93   return (g_test_run());
  94 }
  95
  96 /* vim: set ts=2 sw=2 tw=72 expandtab: */