summaryrefslogtreecommitdiffstats
path: root/tests/check/elements/souphttpsrc.c
diff options
context:
space:
mode:
authorJan Schmidt <thaytan@mad.scientist.com>2008-04-12 23:32:14 +0000
committerJan Schmidt <thaytan@mad.scientist.com>2008-04-12 23:32:14 +0000
commit92bb41c8f8ec1ac0ab1fb44104b8201142c100b4 (patch)
treeb39e8ba425daa594cf8efdab3017261f11b2d411 /tests/check/elements/souphttpsrc.c
parentd5484250627113671bc82bd61bb9f5fa16df4258 (diff)
downloadgst-plugins-bad-92bb41c8f8ec1ac0ab1fb44104b8201142c100b4.tar.gz
gst-plugins-bad-92bb41c8f8ec1ac0ab1fb44104b8201142c100b4.tar.bz2
gst-plugins-bad-92bb41c8f8ec1ac0ab1fb44104b8201142c100b4.zip
Remove soup plugin that's moved to -good (#523124)
Original commit message from CVS: * configure.ac: * docs/plugins/Makefile.am: * docs/plugins/gst-plugins-bad-plugins-docs.sgml: * docs/plugins/gst-plugins-bad-plugins-sections.txt: * docs/plugins/gst-plugins-bad-plugins.args: * docs/plugins/inspect/plugin-soup.xml: * ext/Makefile.am: * ext/soup/Makefile.am: * ext/soup/gstsouphttpsrc.c: * ext/soup/gstsouphttpsrc.h: * tests/check/Makefile.am: * tests/check/elements/souphttpsrc.c: * tests/check/test-cert.pem: * tests/check/test-key.pem: Remove soup plugin that's moved to -good (#523124)
Diffstat (limited to 'tests/check/elements/souphttpsrc.c')
-rw-r--r--tests/check/elements/souphttpsrc.c453
1 files changed, 0 insertions, 453 deletions
diff --git a/tests/check/elements/souphttpsrc.c b/tests/check/elements/souphttpsrc.c
deleted file mode 100644
index be7aa728..00000000
--- a/tests/check/elements/souphttpsrc.c
+++ /dev/null
@@ -1,453 +0,0 @@
-/* GStreamer unit tests for the souphttpsrc element
- * Copyright (C) 2006-2007 Tim-Philipp Müller <tim centricular net>
- * Copyright (C) 2008 Wouter Cloetens <wouter@mind.be>
- * Copyright (C) 2001-2003, Ximian, Inc.
- *
- * 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., 59 Temple Place - Suite 330,
- * Boston, MA 02111-1307, USA.
- */
-
-#ifdef HAVE_CONFIG_H
-# include "config.h"
-#endif
-
-#include <glib.h>
-#include <glib/gprintf.h>
-#include <libsoup/soup-address.h>
-#include <libsoup/soup-message.h>
-#include <libsoup/soup-server.h>
-#include <gst/check/gstcheck.h>
-
-static int http_port = 0, https_port = 0;
-gboolean redirect = TRUE;
-static const char **cookies = NULL;
-
-static int run_server (int *http_port, int *https_port);
-
-
-static void
-handoff_cb (GstElement * fakesink, GstBuffer * buf, GstPad * pad,
- GstBuffer ** p_outbuf)
-{
- GST_LOG ("handoff, buf = %p", buf);
- if (*p_outbuf == NULL)
- *p_outbuf = gst_buffer_ref (buf);
-}
-
-int
-run_test (const char *format, ...)
-{
- GstStateChangeReturn ret;
- GstElement *pipe, *src, *sink;
- GstBuffer *buf = NULL;
- GstMessage *msg;
- gchar *url;
- va_list args;
- int rc = -1;
-
- pipe = gst_pipeline_new (NULL);
-
- src = gst_element_factory_make ("souphttpsrc", NULL);
- fail_unless (src != NULL);
-
- sink = gst_element_factory_make ("fakesink", NULL);
- fail_unless (sink != NULL);
-
- gst_bin_add (GST_BIN (pipe), src);
- gst_bin_add (GST_BIN (pipe), sink);
- fail_unless (gst_element_link (src, sink));
-
- if (http_port == 0) {
- GST_DEBUG ("failed to start soup http server");
- }
- fail_unless (http_port != 0);
- va_start (args, format);
- g_vasprintf (&url, format, args);
- va_end (args);
- fail_unless (url != NULL);
- g_object_set (src, "location", url, NULL);
- g_free (url);
-
- g_object_set (src, "automatic-redirect", redirect, NULL);
- if (cookies != NULL)
- g_object_set (src, "cookies", cookies, NULL);
- g_object_set (sink, "signal-handoffs", TRUE, NULL);
- g_signal_connect (sink, "preroll-handoff", G_CALLBACK (handoff_cb), &buf);
-
- ret = gst_element_set_state (pipe, GST_STATE_PAUSED);
- if (ret != GST_STATE_CHANGE_ASYNC) {
- GST_DEBUG ("failed to start up soup http src, ret = %d", ret);
- goto done;
- }
-
- gst_element_set_state (pipe, GST_STATE_PLAYING);
- msg = gst_bus_poll (GST_ELEMENT_BUS (pipe),
- GST_MESSAGE_EOS | GST_MESSAGE_ERROR, -1);
- if (GST_MESSAGE_TYPE (msg) == GST_MESSAGE_ERROR) {
- gchar *debug = NULL;
- GError *err = NULL;
-
- gst_message_parse_error (msg, &err, &debug);
- GST_INFO ("error: %s", err->message);
- if (g_str_has_suffix (err->message, "Not Found"))
- rc = 404;
- else if (g_str_has_suffix (err->message, "Forbidden"))
- rc = 403;
- else if (g_str_has_suffix (err->message, "Found"))
- rc = 302;
- GST_INFO ("debug: %s", debug);
- g_error_free (err);
- g_free (debug);
- gst_message_unref (msg);
- goto done;
- }
- gst_message_unref (msg);
-
- /* don't wait for more than 10 seconds */
- ret = gst_element_get_state (pipe, NULL, NULL, 10 * GST_SECOND);
- GST_LOG ("ret = %u", ret);
-
- if (buf == NULL) {
- /* we want to test the buffer offset, nothing else; if there's a failure
- * it might be for lots of reasons (no network connection, whatever), we're
- * not interested in those */
- GST_DEBUG ("didn't manage to get data within 10 seconds, skipping test");
- goto done;
- }
-
- GST_DEBUG ("buffer offset = %" G_GUINT64_FORMAT, GST_BUFFER_OFFSET (buf));
-
- /* first buffer should have a 0 offset */
- fail_unless (GST_BUFFER_OFFSET (buf) == 0);
- gst_buffer_unref (buf);
- rc = 0;
-
-done:
-
- gst_element_set_state (pipe, GST_STATE_NULL);
- gst_object_unref (pipe);
- return rc;
-}
-
-GST_START_TEST (test_first_buffer_has_offset)
-{
- fail_unless (run_test ("http://127.0.0.1:%d/", http_port) == 0);
-}
-
-GST_END_TEST;
-
-GST_START_TEST (test_not_found)
-{
- fail_unless (run_test ("http://127.0.0.1:%d/404", http_port) == 404);
-}
-
-GST_END_TEST;
-
-GST_START_TEST (test_forbidden)
-{
- fail_unless (run_test ("http://127.0.0.1:%d/403", http_port) == 403);
-}
-
-GST_END_TEST;
-
-GST_START_TEST (test_redirect_no)
-{
- redirect = FALSE;
- fail_unless (run_test ("http://127.0.0.1:%d/302", http_port) == 302);
-}
-
-GST_END_TEST;
-
-GST_START_TEST (test_redirect_yes)
-{
- redirect = TRUE;
- fail_unless (run_test ("http://127.0.0.1:%d/302", http_port) == 0);
-}
-
-GST_END_TEST;
-
-GST_START_TEST (test_https)
-{
- if (!https_port)
- GST_INFO ("Failed to start an HTTPS server; let's just skip this test.");
- else
- fail_unless (run_test ("https://127.0.0.1:%d/", https_port) == 0);
-}
-
-GST_END_TEST;
-
-GST_START_TEST (test_cookies)
-{
- static const char *biscotti[] = { "delacre=yummie", "koekje=lu", NULL };
- int rc;
-
- cookies = biscotti;
- rc = run_test ("http://127.0.0.1:%d/", http_port);
- cookies = NULL;
- fail_unless (rc == 0);
-}
-
-GST_END_TEST;
-
-static gboolean icy_caps = FALSE;
-
-static void
-got_buffer (GstElement * fakesink, GstBuffer * buf, GstPad * pad,
- gpointer user_data)
-{
- GstStructure *s;
-
- /* Caps can be anything if we don't except icy caps */
- if (!icy_caps)
- return;
-
- /* Otherwise they _must_ be "application/x-icy" */
- fail_unless (GST_BUFFER_CAPS (buf) != NULL);
- s = gst_caps_get_structure (GST_BUFFER_CAPS (buf), 0);
- fail_unless_equals_string (gst_structure_get_name (s), "application/x-icy");
-}
-
-GST_START_TEST (test_icy_stream)
-{
- GstElement *pipe, *src, *sink;
- GstMessage *msg;
-
- pipe = gst_pipeline_new (NULL);
-
- src = gst_element_factory_make ("souphttpsrc", NULL);
- fail_unless (src != NULL);
- g_object_set (src, "iradio-mode", TRUE, NULL);
-
- sink = gst_element_factory_make ("fakesink", NULL);
- fail_unless (sink != NULL);
- g_object_set (sink, "signal-handoffs", TRUE, NULL);
- g_signal_connect (sink, "handoff", G_CALLBACK (got_buffer), NULL);
-
- gst_bin_add (GST_BIN (pipe), src);
- gst_bin_add (GST_BIN (pipe), sink);
- fail_unless (gst_element_link (src, sink));
-
- /* First try Virgin Radio Ogg stream, to see if there's connectivity and all
- * (which is an attempt to work around the completely horrid error reporting
- * and that we can't distinguish different types of failures here). */
-
- g_object_set (src, "location", "http://ogg2.smgradio.com/vr32.ogg", NULL);
- g_object_set (src, "num-buffers", 1, NULL);
- icy_caps = FALSE;
- gst_element_set_state (pipe, GST_STATE_PLAYING);
-
- msg = gst_bus_poll (GST_ELEMENT_BUS (pipe),
- GST_MESSAGE_EOS | GST_MESSAGE_ERROR, -1);
- if (GST_MESSAGE_TYPE (msg) == GST_MESSAGE_ERROR) {
- GST_INFO ("looks like there's no net connectivity or sgmradio.com is "
- "down. In any case, let's just skip this test");
- gst_message_unref (msg);
- goto done;
- }
- gst_message_unref (msg);
- msg = NULL;
- gst_element_set_state (pipe, GST_STATE_NULL);
-
- /* Now, if the ogg stream works, the mp3 shoutcast stream should work as
- * well (time will tell if that's true) */
-
- /* Virgin Radio 32kbps mp3 shoutcast stream */
- g_object_set (src, "location", "http://mp3-vr-32.smgradio.com:80/", NULL);
-
-
- /* EOS after the first buffer */
- g_object_set (src, "num-buffers", 1, NULL);
- icy_caps = TRUE;
- gst_element_set_state (pipe, GST_STATE_PLAYING);
- msg = gst_bus_poll (GST_ELEMENT_BUS (pipe),
- GST_MESSAGE_EOS | GST_MESSAGE_ERROR, -1);
-
- if (GST_MESSAGE_TYPE (msg) == GST_MESSAGE_EOS) {
- GST_DEBUG ("success, we're done here");
- gst_message_unref (msg);
- goto done;
- }
-
- {
- GError *err = NULL;
-
- gst_message_parse_error (msg, &err, NULL);
- gst_message_unref (msg);
- g_error ("Error with ICY mp3 shoutcast stream: %s", err->message);
- g_error_free (err);
- }
-
-done:
- icy_caps = FALSE;
-
- gst_element_set_state (pipe, GST_STATE_NULL);
- gst_object_unref (pipe);
-}
-
-GST_END_TEST;
-
-static Suite *
-souphttpsrc_suite (void)
-{
- g_type_init ();
- g_thread_init (NULL);
-
- Suite *s = suite_create ("souphttpsrc");
- TCase *tc_chain = tcase_create ("general");
- TCase *tc_internet = tcase_create ("internet");
-
- suite_add_tcase (s, tc_chain);
- run_server (&http_port, &https_port);
- tcase_add_test (tc_chain, test_first_buffer_has_offset);
- tcase_add_test (tc_chain, test_https);
- tcase_add_test (tc_chain, test_redirect_yes);
- tcase_add_test (tc_chain, test_redirect_no);
- tcase_add_test (tc_chain, test_not_found);
- tcase_add_test (tc_chain, test_forbidden);
- tcase_add_test (tc_chain, test_cookies);
-
- suite_add_tcase (s, tc_internet);
- tcase_set_timeout (tc_internet, 250);
- tcase_add_test (tc_internet, test_icy_stream);
-
- return s;
-}
-
-GST_CHECK_MAIN (souphttpsrc);
-
-static void
-do_get (SoupMessage * msg, const char *path)
-{
- char *uri;
- int buflen = 4096;
- SoupKnownStatusCode status = SOUP_STATUS_OK;
-
- uri = soup_uri_to_string (soup_message_get_uri (msg), FALSE);
- GST_DEBUG ("request: \"%s\"", uri);
-
- if (!strcmp (path, "/301"))
- status = SOUP_STATUS_MOVED_PERMANENTLY;
- else if (!strcmp (path, "/302"))
- status = SOUP_STATUS_MOVED_TEMPORARILY;
- else if (!strcmp (path, "/307"))
- status = SOUP_STATUS_TEMPORARY_REDIRECT;
- else if (!strcmp (path, "/403"))
- status = SOUP_STATUS_FORBIDDEN;
- else if (!strcmp (path, "/404"))
- status = SOUP_STATUS_NOT_FOUND;
-
- if (SOUP_STATUS_IS_REDIRECTION (status)) {
- char *redir_uri;
-
- redir_uri = g_strdup_printf ("%s-redirected", uri);
- soup_message_headers_append (msg->response_headers, "Location", redir_uri);
- g_free (redir_uri);
- }
- if (status != SOUP_STATUS_OK)
- goto leave;
-
- if (msg->method == SOUP_METHOD_GET) {
- char *buf;
-
- buf = g_malloc (buflen);
- memset (buf, 0, buflen);
- soup_message_body_append (msg->response_body, SOUP_MEMORY_TAKE,
- buf, buflen);
- } else { /* msg->method == SOUP_METHOD_HEAD */
-
- char *length;
-
- /* We could just use the same code for both GET and
- * HEAD. But we'll optimize and avoid the extra
- * malloc.
- */
- length = g_strdup_printf ("%lu", (gulong) buflen);
- soup_message_headers_append (msg->response_headers,
- "Content-Length", length);
- g_free (length);
- }
-
-leave:
- soup_message_set_status (msg, status);
- g_free (uri);
-}
-
-static void
-print_header (const char *name, const char *value, gpointer data)
-{
- GST_DEBUG ("header: %s: %s", name, value);
-}
-
-static void
-server_callback (SoupServer * server, SoupMessage * msg,
- const char *path, GHashTable * query,
- SoupClientContext * context, gpointer data)
-{
- GST_DEBUG ("%s %s HTTP/1.%d", msg->method, path,
- soup_message_get_http_version (msg));
- soup_message_headers_foreach (msg->request_headers, print_header, NULL);
- if (msg->request_body->length)
- GST_DEBUG ("%s", msg->request_body->data);
-
- if (msg->method == SOUP_METHOD_GET || msg->method == SOUP_METHOD_HEAD)
- do_get (msg, path);
- else
- soup_message_set_status (msg, SOUP_STATUS_NOT_IMPLEMENTED);
-
- GST_DEBUG (" -> %d %s", msg->status_code, msg->reason_phrase);
-}
-
-int
-run_server (int *http_port, int *https_port)
-{
- SoupServer *server, *ssl_server;
- int port = SOUP_ADDRESS_ANY_PORT;
- int ssl_port = SOUP_ADDRESS_ANY_PORT;
- const char *ssl_cert_file = "test-cert.pem", *ssl_key_file = "test-key.pem";
- static int server_running = 0;
-
- if (server_running)
- return 0;
- server_running = 1;
-
- *http_port = *https_port = 0;
-
- server = soup_server_new (SOUP_SERVER_PORT, port, NULL);
- if (!server) {
- GST_DEBUG ("Unable to bind to server port %d", port);
- return 1;
- }
- *http_port = soup_server_get_port (server);
- GST_INFO ("HTTP server listening on port %d", *http_port);
- soup_server_add_handler (server, NULL, server_callback, NULL, NULL);
- soup_server_run_async (server);
-
- if (ssl_cert_file && ssl_key_file) {
- ssl_server = soup_server_new (SOUP_SERVER_PORT, ssl_port,
- SOUP_SERVER_SSL_CERT_FILE, ssl_cert_file,
- SOUP_SERVER_SSL_KEY_FILE, ssl_key_file, NULL);
-
- if (!ssl_server) {
- GST_DEBUG ("Unable to bind to SSL server port %d", ssl_port);
- return 1;
- }
- *https_port = soup_server_get_port (ssl_server);
- GST_INFO ("HTTPS server listening on port %d", *https_port);
- soup_server_add_handler (ssl_server, NULL, server_callback, NULL, NULL);
- soup_server_run_async (ssl_server);
- }
-
- return 0;
-}