1 /* GStreamer interactive test for the videocrop element
2 * Copyright (C) 2006 Tim-Philipp Müller <tim centricular net>
3 *
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.
8 *
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.
13 *
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.
18 */
19
20 #ifdef HAVE_CONFIG_H
21 # include "config.h"
22 #endif
23
24 #include <gst/gst.h>
25
26 #include <stdlib.h>
27 #include <math.h>
28
29 GST_DEBUG_CATEGORY_STATIC (videocrop_test_debug);
30 #define GST_CAT_DEFAULT videocrop_test_debug
31
32 #define OUT_WIDTH 640
33 #define OUT_HEIGHT 480
34 #define TIME_PER_TEST 10 /* seconds each format is tested */
35 #define FRAMERATE 15 /* frames per second */
36
37 #ifndef DEFAULT_VIDEOSINK
38 #define DEFAULT_VIDEOSINK "xvimagesink"
39 #endif
40
41 static gboolean
check_bus_for_errors(GstBus * bus,GstClockTime max_wait_time)42 check_bus_for_errors (GstBus * bus, GstClockTime max_wait_time)
43 {
44 GstMessage *msg;
45
46 msg = gst_bus_poll (bus, GST_MESSAGE_ERROR, max_wait_time);
47
48 if (msg) {
49 GError *err = NULL;
50 gchar *debug = NULL;
51
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);
56 g_clear_error (&err);
57 g_free (debug);
58 gst_message_unref (msg);
59 }
60
61 return (msg != NULL);
62 }
63
64 static void
test_with_caps(GstElement * src,GstElement * videocrop,GstCaps * caps)65 test_with_caps (GstElement * src, GstElement * videocrop, GstCaps * caps)
66 {
67 GstClockTime time_run;
68 GstElement *pipeline;
69 GTimer *timer;
70 GstBus *bus;
71 GstPad *pad;
72 guint hcrop;
73 guint vcrop;
74
75 /* caps must be writable, we can't check that here though */
76 g_assert (GST_CAPS_REFCOUNT_VALUE (caps) == 1);
77
78 timer = g_timer_new ();
79 vcrop = 0;
80 hcrop = 0;
81
82 pipeline = GST_ELEMENT (gst_element_get_parent (videocrop));
83 g_assert (GST_IS_PIPELINE (pipeline));
84
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));
88
89 /* pad to block */
90 pad = gst_element_get_static_pad (src, "src");
91
92 time_run = 0;
93 do {
94 GstClockTime wait_time, waited_for_block;
95
96 if (check_bus_for_errors (bus, 0))
97 break;
98
99 wait_time = GST_SECOND / FRAMERATE;
100
101 GST_LOG ("hcrop = %3d, vcrop = %3d", vcrop, hcrop);
102
103 g_timer_reset (timer);
104
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); */
112
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)); */
116 ++vcrop;
117 ++hcrop;
118
119 if (wait_time > waited_for_block) {
120 g_usleep ((wait_time - waited_for_block) / GST_MSECOND);
121 }
122
123 time_run += wait_time;
124 }
125 while (time_run < (TIME_PER_TEST * GST_SECOND));
126
127 g_timer_destroy (timer);
128 gst_object_unref (bus);
129 gst_object_unref (pad);
130 gst_object_unref (pipeline);
131 }
132
133 /* return a list of caps where we only need to set
134 * width and height to get fixed caps */
135 static GList *
video_crop_get_test_caps(GstElement * videocrop)136 video_crop_get_test_caps (GstElement * videocrop)
137 {
138 const GstCaps *allowed_caps;
139 GstPad *srcpad;
140 GList *list = NULL;
141 guint i;
142
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);
147
148 for (i = 0; i < gst_caps_get_size (allowed_caps); ++i) {
149 GstStructure *new_structure;
150 GstCaps *single_caps;
151
152 single_caps = gst_caps_new_empty ();
153 new_structure =
154 gst_structure_copy (gst_caps_get_structure (allowed_caps, i));
155 gst_structure_set (new_structure, "framerate", GST_TYPE_FRACTION,
156 FRAMERATE, 1, NULL);
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);
160
161 /* should be fixed without width/height */
162 g_assert (gst_caps_is_fixed (single_caps));
163
164 list = g_list_prepend (list, single_caps);
165 }
166
167 gst_object_unref (srcpad);
168
169 return list;
170 }
171
172 static gchar *opt_videosink_str; /* NULL */
173 static gchar *opt_filtercaps_str; /* NULL */
174 static gboolean opt_with_videoconvert; /* FALSE */
175
176 int
main(int argc,char ** argv)177 main (int argc, char **argv)
178 {
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",
187 NULL},
188 {NULL, '\0', 0, 0, NULL, NULL, NULL}
189 };
190 GOptionContext *ctx;
191 GError *opt_err = NULL;
192
193 GstElement *pipeline, *src, *filter1, *crop, *scale, *filter2, *csp, *sink;
194 GstCaps *filter_caps = NULL;
195 GList *caps_list, *l;
196
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);
201
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);
206 return -1;
207 }
208 g_option_context_free (ctx);
209
210 GST_DEBUG_CATEGORY_INIT (videocrop_test_debug, "videocroptest", 0, "vctest");
211
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);
223
224 if (opt_with_videoconvert) {
225 g_print ("Adding videoconvert\n");
226 csp = gst_element_factory_make ("videoconvert", "colorspace");
227 } else {
228 csp = gst_element_factory_make ("identity", "colorspace");
229 }
230 g_assert (csp != NULL);
231
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);
236 } else {
237 g_print ("Using filter caps '%s'\n", opt_filtercaps_str);
238 }
239 }
240
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");
245 } else {
246 sink = NULL;
247 }
248
249 if (sink == NULL) {
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");
253 }
254 if (sink == NULL) {
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");
258 }
259 if (sink == NULL) {
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");
263 }
264
265 g_assert (sink != NULL);
266
267 gst_bin_add_many (GST_BIN (pipeline), src, filter1, crop, scale, filter2,
268 csp, sink, NULL);
269
270 if (!gst_element_link (src, filter1))
271 g_error ("Failed to link videotestsrc to capsfilter1");
272
273 if (!gst_element_link (filter1, crop))
274 g_error ("Failed to link capsfilter1 to videocrop");
275
276 if (!gst_element_link (crop, scale))
277 g_error ("Failed to link videocrop to videoscale");
278
279 if (!gst_element_link (scale, filter2))
280 g_error ("Failed to link videoscale to capsfilter2");
281
282 if (!gst_element_link (filter2, csp))
283 g_error ("Failed to link capsfilter2 to videoconvert");
284
285 if (!gst_element_link (csp, sink))
286 g_error ("Failed to link videoconvert to video sink");
287
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;
293 gchar *s;
294
295 if (filter_caps) {
296 GstCaps *icaps;
297
298 icaps = gst_caps_intersect (filter_caps, GST_CAPS (l->data));
299 skip = gst_caps_is_empty (icaps);
300 gst_caps_unref (icaps);
301 }
302
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);
307
308 g_object_set (filter2, "caps", out_caps, NULL);
309
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);
313
314 caps = gst_caps_copy (GST_CAPS (l->data));
315 GST_INFO ("testing format: %" GST_PTR_FORMAT, caps);
316
317 s = gst_caps_to_string (caps);
318
319 if (skip) {
320 g_print ("Skipping format: %s\n", s);
321 g_free (s);
322 continue;
323 }
324
325 g_print ("Format: %s\n", s);
326
327 caps = gst_caps_make_writable (caps);
328
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);
333
334 if (ret != GST_STATE_CHANGE_FAILURE) {
335 test_with_caps (src, crop, caps);
336 } else {
337 g_print ("Format: %s not supported (failed to go to PLAYING)\n", s);
338 }
339 } else {
340 g_print ("Format: %s not supported\n", s);
341 }
342
343 gst_element_set_state (pipeline, GST_STATE_NULL);
344
345 gst_caps_unref (caps);
346 g_free (s);
347 }
348
349 g_list_foreach (caps_list, (GFunc) gst_caps_unref, NULL);
350 g_list_free (caps_list);
351
352 gst_element_set_state (pipeline, GST_STATE_NULL);
353 gst_object_unref (pipeline);
354
355 return 0;
356 }
357