1 /* GStreamer interactive test for the videocrop element
2 * Copyright (C) 2006 Tim-Philipp Müller <tim centricular net>
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Library General Public
6 * License as published by the Free Software Foundation; either
7 * version 2 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Library General Public License for more details.
14 * You should have received a copy of the GNU Library General Public
15 * License along with this library; if not, write to the
16 * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
17 * Boston, MA 02110-1301, USA.
29 GST_DEBUG_CATEGORY_STATIC (videocrop_test_debug);
30 #define GST_CAT_DEFAULT videocrop_test_debug
33 #define OUT_HEIGHT 480
34 #define TIME_PER_TEST 10 /* seconds each format is tested */
35 #define FRAMERATE 15 /* frames per second */
37 #ifndef DEFAULT_VIDEOSINK
38 #define DEFAULT_VIDEOSINK "xvimagesink"
42 check_bus_for_errors (GstBus * bus, GstClockTime max_wait_time)
46 msg = gst_bus_poll (bus, GST_MESSAGE_ERROR, max_wait_time);
52 g_assert (GST_MESSAGE_TYPE (msg) == GST_MESSAGE_ERROR);
53 gst_message_parse_error (msg, &err, &debug);
54 GST_ERROR ("ERROR: %s [%s]", err->message, debug);
55 g_print ("\n===========> ERROR: %s\n%s\n\n", err->message, debug);
58 gst_message_unref (msg);
65 test_with_caps (GstElement * src, GstElement * videocrop, GstCaps * caps)
67 GstClockTime time_run;
75 /* caps must be writable, we can't check that here though */
76 g_assert (GST_CAPS_REFCOUNT_VALUE (caps) == 1);
78 timer = g_timer_new ();
82 pipeline = GST_ELEMENT (gst_element_get_parent (videocrop));
83 g_assert (GST_IS_PIPELINE (pipeline));
85 /* at this point the pipeline is in PLAYING state; we only want to capture
86 * errors resulting from our on-the-fly changing of the filtercaps */
87 bus = gst_pipeline_get_bus (GST_PIPELINE (pipeline));
90 pad = gst_element_get_static_pad (src, "src");
94 GstClockTime wait_time, waited_for_block;
96 if (check_bus_for_errors (bus, 0))
99 wait_time = GST_SECOND / FRAMERATE;
101 GST_LOG ("hcrop = %3d, vcrop = %3d", vcrop, hcrop);
103 g_timer_reset (timer);
105 /* need to block the streaming thread while changing these properties,
106 * otherwise we might get random not-negotiated errors (when caps are
107 * changed in between upstream calling pad_alloc_buffer() and pushing
108 * the processed buffer?) FIXME should not be needed */
109 /* gst_pad_set_blocked (pad, TRUE); */
110 g_object_set (videocrop, "left", hcrop, "top", vcrop, NULL);
111 /* gst_pad_set_blocked (pad, FALSE); */
113 waited_for_block = g_timer_elapsed (timer, NULL) * (double) GST_SECOND;
114 /* GST_LOG ("waited: %" GST_TIME_FORMAT ", frame len: %" GST_TIME_FORMAT,
115 GST_TIME_ARGS (waited_for_block), GST_TIME_ARGS (wait_time)); */
119 if (wait_time > waited_for_block) {
120 g_usleep ((wait_time - waited_for_block) / GST_MSECOND);
123 time_run += wait_time;
125 while (time_run < (TIME_PER_TEST * GST_SECOND));
127 g_timer_destroy (timer);
128 gst_object_unref (bus);
129 gst_object_unref (pad);
130 gst_object_unref (pipeline);
133 /* return a list of caps where we only need to set
134 * width and height to get fixed caps */
136 video_crop_get_test_caps (GstElement * videocrop)
138 const GstCaps *allowed_caps;
143 srcpad = gst_element_get_static_pad (videocrop, "src");
144 g_assert (srcpad != NULL);
145 allowed_caps = gst_pad_get_pad_template_caps (srcpad);
146 g_assert (allowed_caps != NULL);
148 for (i = 0; i < gst_caps_get_size (allowed_caps); ++i) {
149 GstStructure *new_structure;
150 GstCaps *single_caps;
152 single_caps = gst_caps_new_empty ();
154 gst_structure_copy (gst_caps_get_structure (allowed_caps, i));
155 gst_structure_set (new_structure, "framerate", GST_TYPE_FRACTION,
157 gst_structure_remove_field (new_structure, "width");
158 gst_structure_remove_field (new_structure, "height");
159 gst_caps_append_structure (single_caps, new_structure);
161 /* should be fixed without width/height */
162 g_assert (gst_caps_is_fixed (single_caps));
164 list = g_list_prepend (list, single_caps);
167 gst_object_unref (srcpad);
172 static gchar *opt_videosink_str; /* NULL */
173 static gchar *opt_filtercaps_str; /* NULL */
174 static gboolean opt_with_videoconvert; /* FALSE */
177 main (int argc, char **argv)
179 static const GOptionEntry test_goptions[] = {
180 {"videosink", '\0', 0, G_OPTION_ARG_STRING, &opt_videosink_str,
181 "videosink to use (default: " DEFAULT_VIDEOSINK ")", NULL},
182 {"caps", '\0', 0, G_OPTION_ARG_STRING, &opt_filtercaps_str,
183 "filter caps to narrow down formats to test", NULL},
184 {"with-videoconvert", '\0', 0, G_OPTION_ARG_NONE,
185 &opt_with_videoconvert,
186 "whether to add an videoconvert element in front of the sink",
188 {NULL, '\0', 0, 0, NULL, NULL, NULL}
191 GError *opt_err = NULL;
193 GstElement *pipeline, *src, *filter1, *crop, *scale, *filter2, *csp, *sink;
194 GstCaps *filter_caps = NULL;
195 GList *caps_list, *l;
197 /* command line option parsing */
198 ctx = g_option_context_new ("");
199 g_option_context_add_group (ctx, gst_init_get_option_group ());
200 g_option_context_add_main_entries (ctx, test_goptions, NULL);
202 if (!g_option_context_parse (ctx, &argc, &argv, &opt_err)) {
203 g_error ("Error parsing command line options: %s", opt_err->message);
204 g_option_context_free (ctx);
205 g_clear_error (&opt_err);
208 g_option_context_free (ctx);
210 GST_DEBUG_CATEGORY_INIT (videocrop_test_debug, "videocroptest", 0, "vctest");
212 pipeline = gst_pipeline_new ("pipeline");
213 src = gst_element_factory_make ("videotestsrc", "videotestsrc");
214 g_assert (src != NULL);
215 filter1 = gst_element_factory_make ("capsfilter", "capsfilter1");
216 g_assert (filter1 != NULL);
217 crop = gst_element_factory_make ("videocrop", "videocrop");
218 g_assert (crop != NULL);
219 scale = gst_element_factory_make ("videoscale", "videoscale");
220 g_assert (scale != NULL);
221 filter2 = gst_element_factory_make ("capsfilter", "capsfilter2");
222 g_assert (filter2 != NULL);
224 if (opt_with_videoconvert) {
225 g_print ("Adding videoconvert\n");
226 csp = gst_element_factory_make ("videoconvert", "colorspace");
228 csp = gst_element_factory_make ("identity", "colorspace");
230 g_assert (csp != NULL);
232 if (opt_filtercaps_str) {
233 filter_caps = gst_caps_from_string (opt_filtercaps_str);
234 if (filter_caps == NULL) {
235 g_error ("Invalid filter caps string '%s'", opt_filtercaps_str);
237 g_print ("Using filter caps '%s'\n", opt_filtercaps_str);
241 if (opt_videosink_str) {
242 g_print ("Trying videosink '%s' ...", opt_videosink_str);
243 sink = gst_element_factory_make (opt_videosink_str, "sink");
244 g_print ("%s\n", (sink) ? "ok" : "element couldn't be created");
250 g_print ("Trying videosink '%s' ...", DEFAULT_VIDEOSINK);
251 sink = gst_element_factory_make (DEFAULT_VIDEOSINK, "sink");
252 g_print ("%s\n", (sink) ? "ok" : "element couldn't be created");
255 g_print ("Trying videosink '%s' ...", "xvimagesink");
256 sink = gst_element_factory_make ("xvimagesink", "sink");
257 g_print ("%s\n", (sink) ? "ok" : "element couldn't be created");
260 g_print ("Trying videosink '%s' ...", "ximagesink");
261 sink = gst_element_factory_make ("ximagesink", "sink");
262 g_print ("%s\n", (sink) ? "ok" : "element couldn't be created");
265 g_assert (sink != NULL);
267 gst_bin_add_many (GST_BIN (pipeline), src, filter1, crop, scale, filter2,
270 if (!gst_element_link (src, filter1))
271 g_error ("Failed to link videotestsrc to capsfilter1");
273 if (!gst_element_link (filter1, crop))
274 g_error ("Failed to link capsfilter1 to videocrop");
276 if (!gst_element_link (crop, scale))
277 g_error ("Failed to link videocrop to videoscale");
279 if (!gst_element_link (scale, filter2))
280 g_error ("Failed to link videoscale to capsfilter2");
282 if (!gst_element_link (filter2, csp))
283 g_error ("Failed to link capsfilter2 to videoconvert");
285 if (!gst_element_link (csp, sink))
286 g_error ("Failed to link videoconvert to video sink");
288 caps_list = video_crop_get_test_caps (crop);
289 for (l = caps_list; l != NULL; l = l->next) {
290 GstStateChangeReturn ret;
291 GstCaps *caps, *out_caps;
292 gboolean skip = FALSE;
298 icaps = gst_caps_intersect (filter_caps, GST_CAPS (l->data));
299 skip = gst_caps_is_empty (icaps);
300 gst_caps_unref (icaps);
303 /* this is the size of our window (stays fixed) */
304 out_caps = gst_caps_copy (GST_CAPS (l->data));
305 gst_structure_set (gst_caps_get_structure (out_caps, 0), "width",
306 G_TYPE_INT, OUT_WIDTH, "height", G_TYPE_INT, OUT_HEIGHT, NULL);
308 g_object_set (filter2, "caps", out_caps, NULL);
310 /* filter1 gets these too to prevent videotestsrc from renegotiating */
311 g_object_set (filter1, "caps", out_caps, NULL);
312 gst_caps_unref (out_caps);
314 caps = gst_caps_copy (GST_CAPS (l->data));
315 GST_INFO ("testing format: %" GST_PTR_FORMAT, caps);
317 s = gst_caps_to_string (caps);
320 g_print ("Skipping format: %s\n", s);
325 g_print ("Format: %s\n", s);
327 caps = gst_caps_make_writable (caps);
329 /* FIXME: check return values */
330 ret = gst_element_set_state (pipeline, GST_STATE_PLAYING);
331 if (ret != GST_STATE_CHANGE_FAILURE) {
332 ret = gst_element_get_state (pipeline, NULL, NULL, -1);
334 if (ret != GST_STATE_CHANGE_FAILURE) {
335 test_with_caps (src, crop, caps);
337 g_print ("Format: %s not supported (failed to go to PLAYING)\n", s);
340 g_print ("Format: %s not supported\n", s);
343 gst_element_set_state (pipeline, GST_STATE_NULL);
345 gst_caps_unref (caps);
349 g_list_foreach (caps_list, (GFunc) gst_caps_unref, NULL);
350 g_list_free (caps_list);
352 gst_element_set_state (pipeline, GST_STATE_NULL);
353 gst_object_unref (pipeline);