Added gst-plugins-base-subtitles0.10-0.10.34 for Meego Harmattan 1.2
[mafwsubrenderer] / gst-plugins-base-subtitles0.10 / tests / icles / audio-trickplay.c
1 /*
2  * audio-trickplay.c
3  *
4  * Builds a pipeline with two audiotestsources mixed with adder. Assigns
5  * controller patterns to the audio generators and test various trick modes.
6  *
7  * There are currently several issues:
8  * - adder only work with flushing seeks
9  * - there is a gap of almost 4 seconds before backwards playback
10  *   - it is "waiting for free space"
11  *   - using sync=false on the sink does not help (but has some other weird effects)
12  *   - using fakesink shows same behaviour
13  *
14  * GST_DEBUG_NO_COLOR=1 GST_DEBUG="*:2,default:3,*sink*:4,*ring*:4,*pulse*:5" ./audio-trickplay 2>log.txt
15  * GST_DEBUG_NO_COLOR=1 GST_DEBUG="*:2,default:3,*sink*:4,*ring*:4,*pulse*:5" ./audio-trickplay -a -f 2>log-af.txt
16  */
17
18 #include <gst/gst.h>
19 #include <gst/controller/gstcontroller.h>
20 #include <gst/controller/gstinterpolationcontrolsource.h>
21
22 static void
23 check_position (GstElement * elem, GstQuery * pos, const gchar * info)
24 {
25   if (gst_element_query (elem, pos)) {
26     gint64 play_pos;
27     gst_query_parse_position (pos, NULL, &play_pos);
28     GST_INFO ("pos : %" GST_TIME_FORMAT " %s", GST_TIME_ARGS (play_pos), info);
29   } else {
30     GST_WARNING ("position query failed");
31   }
32 }
33
34 static gboolean
35 print_buffer_ts (GstPad * pad, GstBuffer * buffer, gpointer user_data)
36 {
37   GST_DEBUG_OBJECT (pad, "  ts: %" GST_TIME_FORMAT,
38       GST_TIME_ARGS (GST_BUFFER_TIMESTAMP (buffer)));
39   return TRUE;
40 }
41
42 gint
43 main (gint argc, gchar ** argv)
44 {
45   gint res = 1;
46   GstElement *src, *mix = NULL, *sink;
47   GstElement *bin;
48   GstController *ctrl;
49   GstInterpolationControlSource *csource1, *csource2;
50   GstClock *clock;
51   GstClockID clock_id;
52   GstClockReturn wait_ret;
53   GValue vol = { 0, };
54   GstEvent *pos_seek, *rate_seek1, *rate_seek2;
55   GstQuery *pos;
56   GstSeekFlags flags;
57   GstPad *src_pad;
58   /* options */
59   gboolean use_adder = FALSE;
60   gboolean use_flush = FALSE;
61   gboolean be_quiet = FALSE;
62
63   gst_init (&argc, &argv);
64   gst_controller_init (&argc, &argv);
65
66   if (argc) {
67     gint arg;
68     for (arg = 0; arg < argc; arg++) {
69       if (!strcmp (argv[arg], "-a"))
70         use_adder = TRUE;
71       else if (!strcmp (argv[arg], "-f"))
72         use_flush = TRUE;
73       else if (!strcmp (argv[arg], "-q"))
74         be_quiet = TRUE;
75     }
76   }
77
78   /* build pipeline */
79   bin = gst_pipeline_new ("pipeline");
80   clock = gst_pipeline_get_clock (GST_PIPELINE (bin));
81   src = gst_element_factory_make ("audiotestsrc", NULL);
82   if (!src) {
83     GST_WARNING ("need audiotestsrc from gst-plugins-base");
84     goto Error;
85   }
86   if (use_adder) {
87     mix = gst_element_factory_make ("adder", NULL);
88     if (!mix) {
89       GST_WARNING ("need adder from gst-plugins-base");
90       goto Error;
91     }
92   }
93   sink = gst_element_factory_make ((be_quiet ? "fakesink" : "autoaudiosink"),
94       NULL);
95   if (!sink) {
96     GST_WARNING ("need autoaudiosink from gst-plugins-base");
97     goto Error;
98   }
99
100   if (use_adder) {
101     gst_bin_add_many (GST_BIN (bin), src, mix, sink, NULL);
102     if (!gst_element_link_many (src, mix, sink, NULL)) {
103       GST_WARNING ("can't link elements");
104       goto Error;
105     }
106   } else {
107     gst_bin_add_many (GST_BIN (bin), src, sink, NULL);
108     if (!gst_element_link_many (src, sink, NULL)) {
109       GST_WARNING ("can't link elements");
110       goto Error;
111     }
112   }
113
114   /* use 10 buffers per second */
115   g_object_set (src, "samplesperbuffer", 44100 / 10, NULL);
116
117   if (be_quiet) {
118     g_object_set (sink, "sync", TRUE, NULL);
119   }
120
121   src_pad = gst_element_get_static_pad (src, "src");
122   gst_pad_add_buffer_probe (src_pad, G_CALLBACK (print_buffer_ts), NULL);
123   gst_object_unref (src_pad);
124
125   /* add a controller to the source */
126   if (!(ctrl = gst_controller_new (G_OBJECT (src), "freq", "volume", NULL))) {
127     GST_WARNING ("can't control source element");
128     goto Error;
129   }
130
131   csource1 = gst_interpolation_control_source_new ();
132   csource2 = gst_interpolation_control_source_new ();
133
134   gst_controller_set_control_source (ctrl, "volume",
135       GST_CONTROL_SOURCE (csource1));
136   gst_controller_set_control_source (ctrl, "freq",
137       GST_CONTROL_SOURCE (csource2));
138
139   /* Set interpolation mode */
140
141   gst_interpolation_control_source_set_interpolation_mode (csource1,
142       GST_INTERPOLATE_LINEAR);
143   gst_interpolation_control_source_set_interpolation_mode (csource2,
144       GST_INTERPOLATE_LINEAR);
145
146   /* set control values */
147   g_value_init (&vol, G_TYPE_DOUBLE);
148   g_value_set_double (&vol, 0.0);
149   gst_interpolation_control_source_set (csource1, 0 * GST_SECOND, &vol);
150   g_value_set_double (&vol, 1.0);
151   gst_interpolation_control_source_set (csource1, 5 * GST_SECOND, &vol);
152
153   g_object_unref (csource1);
154
155   g_value_set_double (&vol, 220.0);
156   gst_interpolation_control_source_set (csource2, 0 * GST_SECOND, &vol);
157   g_value_set_double (&vol, 3520.0);
158   gst_interpolation_control_source_set (csource2, 2 * GST_SECOND, &vol);
159   g_value_set_double (&vol, 440.0);
160   gst_interpolation_control_source_set (csource2, 6 * GST_SECOND, &vol);
161
162   g_object_unref (csource2);
163
164   /* prepare events */
165   flags = use_flush ? GST_SEEK_FLAG_FLUSH : GST_SEEK_FLAG_NONE;
166   pos_seek = gst_event_new_seek (1.0, GST_FORMAT_TIME, flags,
167       GST_SEEK_TYPE_SET, 3 * GST_SECOND,
168       GST_SEEK_TYPE_NONE, GST_CLOCK_TIME_NONE);
169   rate_seek1 = gst_event_new_seek (0.5, GST_FORMAT_TIME, flags,
170       GST_SEEK_TYPE_NONE, GST_CLOCK_TIME_NONE,
171       GST_SEEK_TYPE_NONE, GST_CLOCK_TIME_NONE);
172   rate_seek2 = gst_event_new_seek (-1.0, GST_FORMAT_TIME, flags,
173       GST_SEEK_TYPE_NONE, GST_CLOCK_TIME_NONE,
174       GST_SEEK_TYPE_NONE, GST_CLOCK_TIME_NONE);
175
176   /* prepare queries */
177   pos = gst_query_new_position (GST_FORMAT_TIME);
178
179
180   /* run the show */
181   if (gst_element_set_state (bin, GST_STATE_PAUSED) != GST_STATE_CHANGE_FAILURE) {
182
183     /* run for 5 seconds */
184     clock_id =
185         gst_clock_new_single_shot_id (clock,
186         gst_clock_get_time (clock) + (5 * GST_SECOND));
187
188     if (gst_element_set_state (bin,
189             GST_STATE_PLAYING) != GST_STATE_CHANGE_FAILURE) {
190       check_position (bin, pos, "start");
191       if ((wait_ret = gst_clock_id_wait (clock_id, NULL)) != GST_CLOCK_OK) {
192         GST_WARNING ("clock_id_wait returned: %d", wait_ret);
193       }
194     }
195     gst_clock_id_unref (clock_id);
196
197     check_position (bin, pos, "before seek to new pos");
198
199     /* seek to 3:00 sec (back 2 sec) */
200     if (!gst_element_send_event (sink, pos_seek)) {
201       GST_WARNING ("element failed to seek to new position");
202     }
203
204     check_position (bin, pos, "after seek to new pos");
205
206     /* run for 2 seconds */
207     clock_id =
208         gst_clock_new_single_shot_id (clock,
209         gst_clock_get_time (clock) + (2 * GST_SECOND));
210     if ((wait_ret = gst_clock_id_wait (clock_id, NULL)) != GST_CLOCK_OK) {
211       GST_WARNING ("clock_id_wait returned: %d", wait_ret);
212     }
213     gst_clock_id_unref (clock_id);
214
215     check_position (bin, pos, "before slow down rate change");
216
217     /* change playback rate to 0.5 */
218     if (!gst_element_send_event (sink, rate_seek1)) {
219       GST_WARNING ("element failed to change playback rate");
220     }
221
222     check_position (bin, pos, "after slow down rate change");
223
224     /* run for 4 seconds */
225     clock_id =
226         gst_clock_new_single_shot_id (clock,
227         gst_clock_get_time (clock) + (4 * GST_SECOND));
228     if ((wait_ret = gst_clock_id_wait (clock_id, NULL)) != GST_CLOCK_OK) {
229       GST_WARNING ("clock_id_wait returned: %d", wait_ret);
230     }
231     gst_clock_id_unref (clock_id);
232
233     check_position (bin, pos, "before reverse rate change");
234
235     /* change playback rate to -1.0  */
236     if (!gst_element_send_event (sink, rate_seek2)) {
237       GST_WARNING ("element failed to change playback rate");
238     }
239
240     check_position (bin, pos, "after reverse rate change");
241
242     /* run for 7 seconds */
243     clock_id =
244         gst_clock_new_single_shot_id (clock,
245         gst_clock_get_time (clock) + (7 * GST_SECOND));
246     if ((wait_ret = gst_clock_id_wait (clock_id, NULL)) != GST_CLOCK_OK) {
247       GST_WARNING ("clock_id_wait returned: %d", wait_ret);
248     }
249     gst_clock_id_unref (clock_id);
250
251     check_position (bin, pos, "done");
252
253     gst_element_set_state (bin, GST_STATE_NULL);
254   }
255
256   /* cleanup */
257   gst_query_unref (pos);
258   g_object_unref (G_OBJECT (ctrl));
259   gst_object_unref (G_OBJECT (clock));
260   gst_object_unref (G_OBJECT (bin));
261   res = 0;
262 Error:
263   return (res);
264 }