Merge remote-tracking branch 'origin/master' into 0.11
[platform/upstream/gst-plugins-good.git] / ext / shout2 / gstshout2.c
1 /* GStreamer
2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
3  * Copyright (C) <2006> Tim-Philipp Müller <tim centricular net>
4  *
5  * This library is free software; you can redistribute it and/or
6  * modify it under the terms of the GNU Library General Public
7  * License as published by the Free Software Foundation; either
8  * version 2 of the License, or (at your option) any later version.
9  *
10  * This library is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * Library General Public License for more details.
14  *
15  * You should have received a copy of the GNU Library General Public
16  * License along with this library; if not, write to the
17  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18  * Boston, MA 02111-1307, USA.
19  */
20
21 #ifdef HAVE_CONFIG_H
22 #include "config.h"
23 #endif
24
25 #include "gstshout2.h"
26 #include <stdlib.h>
27 #include <string.h>
28
29 #include "gst/gst-i18n-plugin.h"
30
31 GST_DEBUG_CATEGORY_STATIC (shout2_debug);
32 #define GST_CAT_DEFAULT shout2_debug
33
34
35 enum
36 {
37   SIGNAL_CONNECTION_PROBLEM,    /* 0.11 FIXME: remove this */
38   LAST_SIGNAL
39 };
40
41 enum
42 {
43   ARG_0,
44   ARG_IP,                       /* the ip of the server */
45   ARG_PORT,                     /* the encoder port number on the server */
46   ARG_PASSWORD,                 /* the encoder password on the server */
47   ARG_USERNAME,                 /* the encoder username on the server */
48   ARG_PUBLIC,                   /* is this stream public? */
49   ARG_STREAMNAME,               /* Name of the stream */
50   ARG_DESCRIPTION,              /* Description of the stream */
51   ARG_GENRE,                    /* Genre of the stream */
52
53   ARG_PROTOCOL,                 /* Protocol to connect with */
54
55   ARG_MOUNT,                    /* mountpoint of stream (icecast only) */
56   ARG_URL                       /* Url of stream (I'm guessing) */
57 };
58
59 #define DEFAULT_IP           "127.0.0.1"
60 #define DEFAULT_PORT         8000
61 #define DEFAULT_PASSWORD     "hackme"
62 #define DEFAULT_USERNAME     "source"
63 #define DEFAULT_PUBLIC     FALSE
64 #define DEFAULT_STREAMNAME   ""
65 #define DEFAULT_DESCRIPTION  ""
66 #define DEFAULT_GENRE        ""
67 #define DEFAULT_MOUNT        ""
68 #define DEFAULT_URL          ""
69 #define DEFAULT_PROTOCOL     SHOUT2SEND_PROTOCOL_HTTP
70
71 static GstElementClass *parent_class = NULL;
72
73 static GstStaticPadTemplate sink_template = GST_STATIC_PAD_TEMPLATE ("sink",
74     GST_PAD_SINK,
75     GST_PAD_ALWAYS,
76     GST_STATIC_CAPS ("application/ogg; "
77         "audio/mpeg, mpegversion = (int) 1, layer = (int) [ 1, 3 ]")
78     );
79 static void gst_shout2send_class_init (GstShout2sendClass * klass);
80 static void gst_shout2send_base_init (GstShout2sendClass * klass);
81 static void gst_shout2send_init (GstShout2send * shout2send);
82 static void gst_shout2send_finalize (GstShout2send * shout2send);
83
84 static gboolean gst_shout2send_event (GstBaseSink * sink, GstEvent * event);
85 static gboolean gst_shout2send_unlock (GstBaseSink * basesink);
86 static gboolean gst_shout2send_unlock_stop (GstBaseSink * basesink);
87 static GstFlowReturn gst_shout2send_render (GstBaseSink * sink,
88     GstBuffer * buffer);
89 static gboolean gst_shout2send_start (GstBaseSink * basesink);
90 static gboolean gst_shout2send_stop (GstBaseSink * basesink);
91
92 static void gst_shout2send_set_property (GObject * object, guint prop_id,
93     const GValue * value, GParamSpec * pspec);
94 static void gst_shout2send_get_property (GObject * object, guint prop_id,
95     GValue * value, GParamSpec * pspec);
96
97 static gboolean gst_shout2send_setcaps (GstPad * pad, GstCaps * caps);
98
99 static guint gst_shout2send_signals[LAST_SIGNAL] = { 0 };
100
101 #define GST_TYPE_SHOUT_PROTOCOL (gst_shout2send_protocol_get_type())
102 static GType
103 gst_shout2send_protocol_get_type (void)
104 {
105   static GType shout2send_protocol_type = 0;
106   static const GEnumValue shout2send_protocol[] = {
107     {SHOUT2SEND_PROTOCOL_XAUDIOCAST,
108         "Xaudiocast Protocol (icecast 1.3.x)", "xaudiocast"},
109     {SHOUT2SEND_PROTOCOL_ICY, "Icy Protocol (ShoutCast)", "icy"},
110     {SHOUT2SEND_PROTOCOL_HTTP, "Http Protocol (icecast 2.x)", "http"},
111     {0, NULL, NULL},
112   };
113
114   if (!shout2send_protocol_type) {
115     shout2send_protocol_type =
116         g_enum_register_static ("GstShout2SendProtocol", shout2send_protocol);
117   }
118
119
120   return shout2send_protocol_type;
121 }
122
123 GType
124 gst_shout2send_get_type (void)
125 {
126   static GType shout2send_type = 0;
127
128   if (!shout2send_type) {
129     static const GTypeInfo shout2send_info = {
130       sizeof (GstShout2sendClass),
131       (GBaseInitFunc) gst_shout2send_base_init,
132       NULL,
133       (GClassInitFunc) gst_shout2send_class_init,
134       NULL,
135       NULL,
136       sizeof (GstShout2send),
137       0,
138       (GInstanceInitFunc) gst_shout2send_init,
139     };
140
141     static const GInterfaceInfo tag_setter_info = {
142       NULL,
143       NULL,
144       NULL
145     };
146
147     shout2send_type =
148         g_type_register_static (GST_TYPE_BASE_SINK, "GstShout2send",
149         &shout2send_info, 0);
150
151     g_type_add_interface_static (shout2send_type, GST_TYPE_TAG_SETTER,
152         &tag_setter_info);
153
154   }
155   return shout2send_type;
156 }
157
158 static void
159 gst_shout2send_base_init (GstShout2sendClass * klass)
160 {
161   GstElementClass *element_class = GST_ELEMENT_CLASS (klass);
162
163   gst_element_class_add_pad_template (element_class,
164       gst_static_pad_template_get (&sink_template));
165   gst_element_class_set_details_simple (element_class, "Icecast network sink",
166       "Sink/Network", "Sends data to an icecast server",
167       "Wim Taymans <wim.taymans@chello.be>, "
168       "Pedro Corte-Real <typo@netcabo.pt>, "
169       "Zaheer Abbas Merali <zaheerabbas at merali dot org>");
170
171   GST_DEBUG_CATEGORY_INIT (shout2_debug, "shout2", 0, "shout2send element");
172 }
173
174 static void
175 gst_shout2send_class_init (GstShout2sendClass * klass)
176 {
177   GObjectClass *gobject_class;
178   GstBaseSinkClass *gstbasesink_class;
179
180   gobject_class = (GObjectClass *) klass;
181   gstbasesink_class = (GstBaseSinkClass *) klass;
182
183   parent_class = g_type_class_peek_parent (klass);
184
185   gobject_class->set_property = gst_shout2send_set_property;
186   gobject_class->get_property = gst_shout2send_get_property;
187   gobject_class->finalize = (GObjectFinalizeFunc) gst_shout2send_finalize;
188
189   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_IP,
190       g_param_spec_string ("ip", "ip", "ip", DEFAULT_IP,
191           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
192   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_PORT,
193       g_param_spec_int ("port", "port", "port", 1, G_MAXUSHORT, DEFAULT_PORT,
194           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
195
196   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_PASSWORD,
197       g_param_spec_string ("password", "password", "password", DEFAULT_PASSWORD,
198           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
199
200   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_USERNAME,
201       g_param_spec_string ("username", "username", "username", DEFAULT_USERNAME,
202           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
203
204   /* metadata */
205   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_PUBLIC,
206       g_param_spec_boolean ("public", "public",
207           "If the stream should be listed on the server's stream directory",
208           DEFAULT_PUBLIC, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
209
210   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_STREAMNAME,
211       g_param_spec_string ("streamname", "streamname", "name of the stream",
212           DEFAULT_STREAMNAME, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
213
214   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_DESCRIPTION,
215       g_param_spec_string ("description", "description", "description",
216           DEFAULT_DESCRIPTION, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
217
218   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_GENRE,
219       g_param_spec_string ("genre", "genre", "genre", DEFAULT_GENRE,
220           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
221
222   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_PROTOCOL,
223       g_param_spec_enum ("protocol", "protocol", "Connection Protocol to use",
224           GST_TYPE_SHOUT_PROTOCOL, DEFAULT_PROTOCOL,
225           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
226
227
228   /* icecast only */
229   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_MOUNT,
230       g_param_spec_string ("mount", "mount", "mount", DEFAULT_MOUNT,
231           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
232
233   g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_URL,
234       g_param_spec_string ("url", "url", "url", DEFAULT_URL,
235           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
236
237   /* signals */
238   gst_shout2send_signals[SIGNAL_CONNECTION_PROBLEM] =
239       g_signal_new ("connection-problem", G_TYPE_FROM_CLASS (klass),
240       G_SIGNAL_RUN_CLEANUP, G_STRUCT_OFFSET (GstShout2sendClass,
241           connection_problem), NULL, NULL, g_cclosure_marshal_VOID__INT,
242       G_TYPE_NONE, 1, G_TYPE_INT);
243
244   gstbasesink_class->start = GST_DEBUG_FUNCPTR (gst_shout2send_start);
245   gstbasesink_class->stop = GST_DEBUG_FUNCPTR (gst_shout2send_stop);
246   gstbasesink_class->unlock = GST_DEBUG_FUNCPTR (gst_shout2send_unlock);
247   gstbasesink_class->unlock_stop =
248       GST_DEBUG_FUNCPTR (gst_shout2send_unlock_stop);
249   gstbasesink_class->render = GST_DEBUG_FUNCPTR (gst_shout2send_render);
250   gstbasesink_class->event = GST_DEBUG_FUNCPTR (gst_shout2send_event);
251 }
252
253 static void
254 gst_shout2send_init (GstShout2send * shout2send)
255 {
256   gst_base_sink_set_sync (GST_BASE_SINK (shout2send), FALSE);
257
258   gst_pad_set_setcaps_function (GST_BASE_SINK_PAD (shout2send),
259       GST_DEBUG_FUNCPTR (gst_shout2send_setcaps));
260
261   shout2send->timer = gst_poll_new_timer ();
262
263   shout2send->ip = g_strdup (DEFAULT_IP);
264   shout2send->port = DEFAULT_PORT;
265   shout2send->password = g_strdup (DEFAULT_PASSWORD);
266   shout2send->username = g_strdup (DEFAULT_USERNAME);
267   shout2send->streamname = g_strdup (DEFAULT_STREAMNAME);
268   shout2send->description = g_strdup (DEFAULT_DESCRIPTION);
269   shout2send->genre = g_strdup (DEFAULT_GENRE);
270   shout2send->mount = g_strdup (DEFAULT_MOUNT);
271   shout2send->url = g_strdup (DEFAULT_URL);
272   shout2send->protocol = DEFAULT_PROTOCOL;
273   shout2send->ispublic = DEFAULT_PUBLIC;
274
275   shout2send->tags = gst_tag_list_new ();
276   shout2send->conn = NULL;
277   shout2send->audio_format = SHOUT_FORMAT_VORBIS;
278   shout2send->connected = FALSE;
279   shout2send->songmetadata = NULL;
280   shout2send->songartist = NULL;
281   shout2send->songtitle = NULL;
282 }
283
284 static void
285 gst_shout2send_finalize (GstShout2send * shout2send)
286 {
287   g_free (shout2send->ip);
288   g_free (shout2send->password);
289   g_free (shout2send->username);
290   g_free (shout2send->streamname);
291   g_free (shout2send->description);
292   g_free (shout2send->genre);
293   g_free (shout2send->mount);
294   g_free (shout2send->url);
295
296   gst_tag_list_free (shout2send->tags);
297
298   gst_poll_free (shout2send->timer);
299
300   G_OBJECT_CLASS (parent_class)->finalize ((GObject *) (shout2send));
301 }
302
303 static void
304 set_shout_metadata (const GstTagList * list, const gchar * tag,
305     gpointer user_data)
306 {
307   GstShout2send *shout2send = (GstShout2send *) user_data;
308   char **shout_metadata = &(shout2send->songmetadata);
309   char **song_artist = &(shout2send->songartist);
310   char **song_title = &(shout2send->songtitle);
311
312   gchar *value;
313
314   GST_DEBUG ("tag: %s being added", tag);
315   if (strcmp (tag, GST_TAG_ARTIST) == 0) {
316     if (gst_tag_get_type (tag) == G_TYPE_STRING) {
317       if (!gst_tag_list_get_string (list, tag, &value)) {
318         GST_DEBUG ("Error reading \"%s\" tag value", tag);
319         return;
320       }
321
322       if (*song_artist != NULL)
323         g_free (*song_artist);
324
325       *song_artist = g_strdup (value);
326     }
327   } else if (strcmp (tag, GST_TAG_TITLE) == 0) {
328     if (gst_tag_get_type (tag) == G_TYPE_STRING) {
329       if (!gst_tag_list_get_string (list, tag, &value)) {
330         GST_DEBUG ("Error reading \"%s\" tag value", tag);
331         return;
332       }
333
334       if (*song_title != NULL)
335         g_free (*song_title);
336
337       *song_title = g_strdup (value);
338     }
339   }
340
341   if (*shout_metadata != NULL)
342     g_free (*shout_metadata);
343
344
345   if (*song_title && *song_artist) {
346     *shout_metadata = g_strdup_printf ("%s - %s", *song_artist, *song_title);
347   } else if (*song_title && *song_artist == NULL) {
348     *shout_metadata = g_strdup_printf ("Unknown - %s", *song_title);
349   } else if (*song_title == NULL && *song_artist) {
350     *shout_metadata = g_strdup_printf ("%s - Unknown", *song_artist);
351   } else {
352     *shout_metadata = g_strdup_printf ("Unknown - Unknown");
353   }
354
355   GST_LOG ("shout metadata is now: %s", *shout_metadata);
356 }
357
358 #if 0
359 static void
360 gst_shout2send_set_metadata (GstShout2send * shout2send)
361 {
362   const GstTagList *user_tags;
363   GstTagList *copy;
364   char *tempmetadata;
365   shout_metadata_t *pmetadata;
366
367   g_return_if_fail (shout2send != NULL);
368   user_tags = gst_tag_setter_get_tag_list (GST_TAG_SETTER (shout2send));
369   if ((shout2send->tags == NULL) && (user_tags == NULL)) {
370     return;
371   }
372   copy = gst_tag_list_merge (user_tags, shout2send->tags,
373       gst_tag_setter_get_tag_merge_mode (GST_TAG_SETTER (shout2send)));
374   /* lets get the artist and song tags */
375   tempmetadata = NULL;
376   gst_tag_list_foreach ((GstTagList *) copy, set_shout_metadata,
377       (gpointer) & tempmetadata);
378   if (tempmetadata) {
379     pmetadata = shout_metadata_new ();
380     shout_metadata_add (pmetadata, "song", tempmetadata);
381     shout_set_metadata (shout2send->conn, pmetadata);
382     shout_metadata_free (pmetadata);
383   }
384
385   gst_tag_list_free (copy);
386 }
387 #endif
388
389
390 static gboolean
391 gst_shout2send_event (GstBaseSink * sink, GstEvent * event)
392 {
393   GstShout2send *shout2send;
394   gboolean ret = TRUE;
395
396   shout2send = GST_SHOUT2SEND (sink);
397
398   GST_LOG_OBJECT (shout2send, "got %s event", GST_EVENT_TYPE_NAME (event));
399
400   switch (GST_EVENT_TYPE (event)) {
401     case GST_EVENT_TAG:{
402       /* vorbis audio doesnt need metadata setting on the icecast level, only mp3 */
403       if (shout2send->tags && shout2send->audio_format == SHOUT_FORMAT_MP3) {
404         GstTagList *list;
405
406         gst_event_parse_tag (event, &list);
407         GST_DEBUG_OBJECT (shout2send, "tags=%" GST_PTR_FORMAT, list);
408         gst_tag_list_insert (shout2send->tags,
409             list,
410             gst_tag_setter_get_tag_merge_mode (GST_TAG_SETTER (shout2send)));
411         /* lets get the artist and song tags */
412         gst_tag_list_foreach ((GstTagList *) list,
413             set_shout_metadata, shout2send);
414         if (shout2send->songmetadata && shout2send->connected) {
415           shout_metadata_t *pmetadata;
416
417           GST_DEBUG_OBJECT (shout2send, "metadata now: %s",
418               shout2send->songmetadata);
419
420           pmetadata = shout_metadata_new ();
421           shout_metadata_add (pmetadata, "song", shout2send->songmetadata);
422           shout_set_metadata (shout2send->conn, pmetadata);
423           shout_metadata_free (pmetadata);
424         }
425       }
426       break;
427     }
428     default:{
429       GST_LOG_OBJECT (shout2send, "let base class handle event");
430       if (GST_BASE_SINK_CLASS (parent_class)->event) {
431         event = gst_event_ref (event);
432         ret = GST_BASE_SINK_CLASS (parent_class)->event (sink, event);
433       }
434       break;
435     }
436   }
437
438   return ret;
439 }
440
441 static gboolean
442 gst_shout2send_start (GstBaseSink * basesink)
443 {
444   GstShout2send *sink = GST_SHOUT2SEND (basesink);
445   const gchar *cur_prop;
446   gshort proto = 3;
447   gchar *version_string;
448
449   GST_DEBUG_OBJECT (sink, "starting");
450
451   sink->conn = shout_new ();
452
453   switch (sink->protocol) {
454     case SHOUT2SEND_PROTOCOL_XAUDIOCAST:
455       proto = SHOUT_PROTOCOL_XAUDIOCAST;
456       break;
457     case SHOUT2SEND_PROTOCOL_ICY:
458       proto = SHOUT_PROTOCOL_ICY;
459       break;
460     case SHOUT2SEND_PROTOCOL_HTTP:
461       proto = SHOUT_PROTOCOL_HTTP;
462       break;
463   }
464
465   cur_prop = "protocol";
466   GST_DEBUG_OBJECT (sink, "setting protocol: %d", sink->protocol);
467   if (shout_set_protocol (sink->conn, proto) != SHOUTERR_SUCCESS)
468     goto set_failed;
469
470   /* --- FIXME: shout requires an ip, and fails if it is given a host. */
471   /* may want to put convert_to_ip(shout2send->ip) here */
472   cur_prop = "ip";
473   GST_DEBUG_OBJECT (sink, "setting ip: %s", sink->ip);
474   if (shout_set_host (sink->conn, sink->ip) != SHOUTERR_SUCCESS)
475     goto set_failed;
476
477   cur_prop = "port";
478   GST_DEBUG_OBJECT (sink, "setting port: %u", sink->port);
479   if (shout_set_port (sink->conn, sink->port) != SHOUTERR_SUCCESS)
480     goto set_failed;
481
482   cur_prop = "password";
483   GST_DEBUG_OBJECT (sink, "setting password: %s", sink->password);
484   if (shout_set_password (sink->conn, sink->password) != SHOUTERR_SUCCESS)
485     goto set_failed;
486
487   cur_prop = "public";
488   GST_DEBUG_OBJECT (sink, "setting %s: %u", cur_prop, sink->ispublic);
489   if (shout_set_public (sink->conn,
490           (sink->ispublic ? 1 : 0)) != SHOUTERR_SUCCESS)
491     goto set_failed;
492
493   cur_prop = "streamname";
494   GST_DEBUG_OBJECT (sink, "setting %s: %s", cur_prop, sink->streamname);
495   if (shout_set_name (sink->conn, sink->streamname) != SHOUTERR_SUCCESS)
496     goto set_failed;
497
498   cur_prop = "description";
499   GST_DEBUG_OBJECT (sink, "setting %s: %s", cur_prop, sink->description);
500   if (shout_set_description (sink->conn, sink->description) != SHOUTERR_SUCCESS)
501     goto set_failed;
502
503   cur_prop = "genre";
504   GST_DEBUG_OBJECT (sink, "setting %s: %s", cur_prop, sink->genre);
505   if (shout_set_genre (sink->conn, sink->genre) != SHOUTERR_SUCCESS)
506     goto set_failed;
507
508   cur_prop = "mount";
509   GST_DEBUG_OBJECT (sink, "setting %s: %s", cur_prop, sink->mount);
510   if (shout_set_mount (sink->conn, sink->mount) != SHOUTERR_SUCCESS)
511     goto set_failed;
512
513   cur_prop = "username";
514   GST_DEBUG_OBJECT (sink, "setting %s: %s", cur_prop, "source");
515   if (shout_set_user (sink->conn, sink->username) != SHOUTERR_SUCCESS)
516     goto set_failed;
517
518   version_string = gst_version_string ();
519   cur_prop = "agent";
520   GST_DEBUG_OBJECT (sink, "setting %s: %s", cur_prop, version_string);
521   if (shout_set_agent (sink->conn, version_string) != SHOUTERR_SUCCESS) {
522     g_free (version_string);
523     goto set_failed;
524   }
525
526   g_free (version_string);
527   return TRUE;
528
529 /* ERROR */
530 set_failed:
531   {
532     GST_ELEMENT_ERROR (sink, LIBRARY, SETTINGS, (NULL),
533         ("Error setting %s: %s", cur_prop, shout_get_error (sink->conn)));
534     return FALSE;
535   }
536 }
537
538 static gboolean
539 gst_shout2send_connect (GstShout2send * sink)
540 {
541   GST_DEBUG_OBJECT (sink, "Connection format is: %s",
542       (sink->audio_format == SHOUT_FORMAT_VORBIS) ? "vorbis" :
543       ((sink->audio_format == SHOUT_FORMAT_MP3) ? "mp3" : "unknown"));
544
545   if (shout_set_format (sink->conn, sink->audio_format) != SHOUTERR_SUCCESS)
546     goto could_not_set_format;
547
548   if (shout_open (sink->conn) != SHOUTERR_SUCCESS)
549     goto could_not_connect;
550
551   GST_DEBUG_OBJECT (sink, "connected to server");
552   sink->connected = TRUE;
553
554   /* let's set metadata */
555   if (sink->songmetadata) {
556     shout_metadata_t *pmetadata;
557
558     GST_DEBUG_OBJECT (sink, "shout metadata now: %s", sink->songmetadata);
559     pmetadata = shout_metadata_new ();
560     shout_metadata_add (pmetadata, "song", sink->songmetadata);
561     shout_set_metadata (sink->conn, pmetadata);
562     shout_metadata_free (pmetadata);
563   }
564
565   return TRUE;
566
567 /* ERRORS */
568 could_not_set_format:
569   {
570     GST_ELEMENT_ERROR (sink, LIBRARY, SETTINGS, (NULL),
571         ("Error setting connection format: %s", shout_get_error (sink->conn)));
572     return FALSE;
573   }
574
575 could_not_connect:
576   {
577     GST_ELEMENT_ERROR (sink, RESOURCE, OPEN_WRITE,
578         (_("Could not connect to server")),
579         ("shout_open() failed: err=%s", shout_get_error (sink->conn)));
580     g_signal_emit (sink, gst_shout2send_signals[SIGNAL_CONNECTION_PROBLEM], 0,
581         shout_get_errno (sink->conn));
582     return FALSE;
583   }
584 }
585
586 static gboolean
587 gst_shout2send_stop (GstBaseSink * basesink)
588 {
589   GstShout2send *sink = GST_SHOUT2SEND (basesink);
590
591   if (sink->conn) {
592     if (sink->connected)
593       shout_close (sink->conn);
594     shout_free (sink->conn);
595     sink->conn = NULL;
596   }
597
598   if (sink->songmetadata) {
599     g_free (sink->songmetadata);
600     sink->songmetadata = NULL;
601   }
602
603   sink->connected = FALSE;
604
605   return TRUE;
606 }
607
608 static gboolean
609 gst_shout2send_unlock (GstBaseSink * basesink)
610 {
611   GstShout2send *sink;
612
613   sink = GST_SHOUT2SEND (basesink);
614
615   GST_DEBUG_OBJECT (basesink, "unlock");
616   gst_poll_set_flushing (sink->timer, TRUE);
617
618   return TRUE;
619 }
620
621 static gboolean
622 gst_shout2send_unlock_stop (GstBaseSink * basesink)
623 {
624   GstShout2send *sink;
625
626   sink = GST_SHOUT2SEND (basesink);
627
628   GST_DEBUG_OBJECT (basesink, "unlock_stop");
629   gst_poll_set_flushing (sink->timer, FALSE);
630
631   return TRUE;
632 }
633
634 static GstFlowReturn
635 gst_shout2send_render (GstBaseSink * basesink, GstBuffer * buf)
636 {
637   GstShout2send *sink;
638   glong ret;
639   gint delay;
640   GstFlowReturn fret;
641
642   sink = GST_SHOUT2SEND (basesink);
643
644   /* presumably we connect here because we need to know the format before
645    * we can set up the connection, which we don't know yet in _start() */
646   if (!sink->connected) {
647     if (!gst_shout2send_connect (sink))
648       return GST_FLOW_ERROR;
649   }
650
651   delay = shout_delay (sink->conn);
652
653   if (delay > 0) {
654     GST_LOG_OBJECT (sink, "waiting %d msec", delay);
655     if (gst_poll_wait (sink->timer, GST_MSECOND * delay) == -1) {
656       GST_LOG_OBJECT (sink, "unlocked");
657
658       fret = gst_base_sink_wait_preroll (basesink);
659       if (fret != GST_FLOW_OK)
660         return fret;
661     }
662   } else {
663     GST_LOG_OBJECT (sink, "we're %d msec late", -delay);
664   }
665
666   GST_LOG_OBJECT (sink, "sending %u bytes of data", GST_BUFFER_SIZE (buf));
667   ret = shout_send (sink->conn, GST_BUFFER_DATA (buf), GST_BUFFER_SIZE (buf));
668   if (ret != SHOUTERR_SUCCESS)
669     goto send_error;
670
671   return GST_FLOW_OK;
672
673 /* ERRORS */
674 send_error:
675   {
676     GST_ELEMENT_ERROR (sink, RESOURCE, WRITE, (NULL),
677         ("shout_send() failed: %s", shout_get_error (sink->conn)));
678     g_signal_emit (sink, gst_shout2send_signals[SIGNAL_CONNECTION_PROBLEM], 0,
679         shout_get_errno (sink->conn));
680     return GST_FLOW_ERROR;
681   }
682 }
683
684 static void
685 gst_shout2send_set_property (GObject * object, guint prop_id,
686     const GValue * value, GParamSpec * pspec)
687 {
688   GstShout2send *shout2send;
689
690   shout2send = GST_SHOUT2SEND (object);
691   switch (prop_id) {
692
693     case ARG_IP:
694       if (shout2send->ip)
695         g_free (shout2send->ip);
696       shout2send->ip = g_strdup (g_value_get_string (value));
697       break;
698     case ARG_PORT:
699       shout2send->port = g_value_get_int (value);
700       break;
701     case ARG_PASSWORD:
702       if (shout2send->password)
703         g_free (shout2send->password);
704       shout2send->password = g_strdup (g_value_get_string (value));
705       break;
706     case ARG_USERNAME:
707       if (shout2send->username)
708         g_free (shout2send->username);
709       shout2send->username = g_strdup (g_value_get_string (value));
710       break;
711     case ARG_PUBLIC:
712       shout2send->ispublic = g_value_get_boolean (value);
713       break;
714     case ARG_STREAMNAME:       /* Name of the stream */
715       if (shout2send->streamname)
716         g_free (shout2send->streamname);
717       shout2send->streamname = g_strdup (g_value_get_string (value));
718       break;
719     case ARG_DESCRIPTION:      /* Description of the stream */
720       if (shout2send->description)
721         g_free (shout2send->description);
722       shout2send->description = g_strdup (g_value_get_string (value));
723       break;
724     case ARG_GENRE:            /* Genre of the stream */
725       if (shout2send->genre)
726         g_free (shout2send->genre);
727       shout2send->genre = g_strdup (g_value_get_string (value));
728       break;
729     case ARG_PROTOCOL:         /* protocol to connect with */
730       shout2send->protocol = g_value_get_enum (value);
731       break;
732     case ARG_MOUNT:            /* mountpoint of stream (icecast only) */
733       if (shout2send->mount)
734         g_free (shout2send->mount);
735       shout2send->mount = g_strdup (g_value_get_string (value));
736       break;
737     case ARG_URL:              /* Url of the stream (I'm guessing) */
738       if (shout2send->url)
739         g_free (shout2send->url);
740       shout2send->url = g_strdup (g_value_get_string (value));
741       break;
742     default:
743       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
744       break;
745   }
746 }
747
748 static void
749 gst_shout2send_get_property (GObject * object, guint prop_id,
750     GValue * value, GParamSpec * pspec)
751 {
752   GstShout2send *shout2send;
753
754   shout2send = GST_SHOUT2SEND (object);
755   switch (prop_id) {
756
757     case ARG_IP:
758       g_value_set_string (value, shout2send->ip);
759       break;
760     case ARG_PORT:
761       g_value_set_int (value, shout2send->port);
762       break;
763     case ARG_PASSWORD:
764       g_value_set_string (value, shout2send->password);
765       break;
766     case ARG_USERNAME:
767       g_value_set_string (value, shout2send->username);
768       break;
769     case ARG_PUBLIC:
770       g_value_set_boolean (value, shout2send->ispublic);
771       break;
772     case ARG_STREAMNAME:       /* Name of the stream */
773       g_value_set_string (value, shout2send->streamname);
774       break;
775     case ARG_DESCRIPTION:      /* Description of the stream */
776       g_value_set_string (value, shout2send->description);
777       break;
778     case ARG_GENRE:            /* Genre of the stream */
779       g_value_set_string (value, shout2send->genre);
780       break;
781     case ARG_PROTOCOL:         /* protocol to connect with */
782       g_value_set_enum (value, shout2send->protocol);
783       break;
784     case ARG_MOUNT:            /* mountpoint of stream (icecast only) */
785       g_value_set_string (value, shout2send->mount);
786       break;
787     case ARG_URL:              /* Url of stream (I'm guessing) */
788       g_value_set_string (value, shout2send->url);
789       break;
790     default:
791       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
792       break;
793   }
794 }
795
796 static gboolean
797 gst_shout2send_setcaps (GstPad * pad, GstCaps * caps)
798 {
799   const gchar *mimetype;
800   GstShout2send *shout2send;
801   gboolean ret = TRUE;
802
803   shout2send = GST_SHOUT2SEND (GST_OBJECT_PARENT (pad));
804
805   mimetype = gst_structure_get_name (gst_caps_get_structure (caps, 0));
806
807   GST_DEBUG_OBJECT (shout2send, "mimetype of caps given is: %s", mimetype);
808
809   if (!strcmp (mimetype, "audio/mpeg")) {
810     shout2send->audio_format = SHOUT_FORMAT_MP3;
811   } else if (!strcmp (mimetype, "application/ogg")) {
812     shout2send->audio_format = SHOUT_FORMAT_VORBIS;
813   } else {
814     ret = FALSE;
815   }
816
817   return ret;
818 }
819
820 static gboolean
821 plugin_init (GstPlugin * plugin)
822 {
823 #ifdef ENABLE_NLS
824   setlocale (LC_ALL, "");
825   bindtextdomain (GETTEXT_PACKAGE, LOCALEDIR);
826   bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
827 #endif /* ENABLE_NLS */
828
829   return gst_element_register (plugin, "shout2send", GST_RANK_NONE,
830       GST_TYPE_SHOUT2SEND);
831 }
832
833 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
834     GST_VERSION_MINOR,
835     "shout2send",
836     "Sends data to an icecast server using libshout2",
837     plugin_init,
838     VERSION, "LGPL", "libshout2", "http://www.icecast.org/download.html")