gst/dtmf/gstdtmfsrc.c

   1 /* GStreamer DTMF source
   2  *
   3  * gstdtmfsrc.c:
   4  *
   5  * Copyright (C) <2007> Collabora.
   6  *   Contact: Youness Alaoui <youness.alaoui@collabora.co.uk>
   7  * Copyright (C) <2007> Nokia Corporation.
   8  *   Contact: Zeeshan Ali <zeeshan.ali@nokia.com>
   9  * Copyright (C) 1999,2000 Erik Walthinsen <omega@cse.ogi.edu>
  10  *               2000,2005 Wim Taymans <wim@fluendo.com>
  11  *
  12  * This library is free software; you can redistribute it and/or
  13  * modify it under the terms of the GNU Library General Public
  14  * License as published by the Free Software Foundation; either
  15  * version 2 of the License, or (at your option) any later version.
  16  *
  17  * This library is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20  * Library General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Library General Public
  23  * License along with this library; if not, write to the
  24  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  25  * Boston, MA 02111-1307, USA.
  26  */
  27
  28 /**
  29  * SECTION:element-dtmfsrc
  30  * @short_description: Generates DTMF packets
  31  *
  32  * <refsect2>
  33  *
  34  * <para>
  35  * The DTMFSrc element generates DTMF (ITU-T Q.23 Specification) tone packets on request
  36  * from application. The application communicates the beginning and end of a
  37  * DTMF event using custom upstream gstreamer events. To report a DTMF event, an
  38  * application must send an event of type GST_EVENT_CUSTOM_UPSTREAM, having a
  39  * structure of name "dtmf-event" with fields set according to the following
  40  * table:
  41  * </para>
  42  *
  43  * <para>
  44  * <informaltable>
  45  * <tgroup cols='4'>
  46  * <colspec colname='Name' />
  47  * <colspec colname='Type' />
  48  * <colspec colname='Possible values' />
  49  * <colspec colname='Purpose' />
  50  *
  51  * <thead>
  52  * <row>
  53  * <entry>Name</entry>
  54  * <entry>GType</entry>
  55  * <entry>Possible values</entry>
  56  * <entry>Purpose</entry>
  57  * </row>
  58  * </thead>
  59  *
  60  * <tbody>
  61  * <row>
  62  * <entry>type</entry>
  63  * <entry>G_TYPE_INT</entry>
  64  * <entry>0-1</entry>
  65  * <entry>The application uses this field to specify which of the two methods
  66  * specified in RFC 2833 to use. The value should be 0 for tones and 1 for
  67  * named events. This element is only capable of generating tones.
  68  * </entry>
  69  * </row>
  70  * <row>
  71  * <entry>number</entry>
  72  * <entry>G_TYPE_INT</entry>
  73  * <entry>0-16</entry>
  74  * <entry>The event number.</entry>
  75  * </row>
  76  * <row>
  77  * <entry>volume</entry>
  78  * <entry>G_TYPE_INT</entry>
  79  * <entry>0-36</entry>
  80  * <entry>This field describes the power level of the tone, expressed in dBm0
  81  * after dropping the sign. Power levels range from 0 to -63 dBm0. The range of
  82  * valid DTMF is from 0 to -36 dBm0. Can be omitted if start is set to FALSE.
  83  * </entry>
  84  * </row>
  85  * <row>
  86  * <entry>start</entry>
  87  * <entry>G_TYPE_BOOLEAN</entry>
  88  * <entry>True or False</entry>
  89  * <entry>Whether the event is starting or ending.</entry>
  90  * </row>
  91  * <row>
  92  * <entry>method</entry>
  93  * <entry>G_TYPE_INT</entry>
  94  * <entry>1</entry>
  95  * <entry>The method used for sending event, this element will react if this field
  96  * is absent or 2.
  97  * </entry>
  98  * </row>
  99  * </tbody>
 100  * </tgroup>
 101  * </informaltable>
 102  * </para>
 103  *
 104  * <para>For example, the following code informs the pipeline (and in turn, the
 105  * DTMFSrc element inside the pipeline) about the start of a DTMF named
 106  * event '1' of volume -25 dBm0:
 107  * </para>
 108  *
 109  * <para>
 110  * <programlisting>
 111  * structure = gst_structure_new ("dtmf-event",
 112  *                    "type", G_TYPE_INT, 0,
 113  *                    "number", G_TYPE_INT, 1,
 114  *                    "volume", G_TYPE_INT, 25,
 115  *                    "start", G_TYPE_BOOLEAN, TRUE, NULL);
 116  *
 117  * event = gst_event_new_custom (GST_EVENT_CUSTOM_UPSTREAM, structure);
 118  * gst_element_send_event (pipeline, event);
 119  * </programlisting>
 120  * </para>
 121  *
 122  * </refsect2>
 123  */
 124
 125 #ifdef HAVE_CONFIG_H
 126 #  include "config.h"
 127 #endif
 128
 129 #include <stdlib.h>
 130 #include <string.h>
 131 #include <math.h>
 132
 133 #include <glib.h>
 134
 135 #ifndef M_PI
 136 # define M_PI           3.14159265358979323846  /* pi */
 137 #endif
 138
 139
 140 #include "gstdtmfsrc.h"
 141
 142 #define GST_TONE_DTMF_TYPE_EVENT 0
 143 #define DEFAULT_PACKET_INTERVAL  50 /* ms */
 144 #define MIN_PACKET_INTERVAL      10 /* ms */
 145 #define MAX_PACKET_INTERVAL      50 /* ms */
 146 #define SAMPLE_RATE              8000
 147 #define SAMPLE_SIZE              16
 148 #define CHANNELS                 1
 149 #define MIN_EVENT                0
 150 #define MAX_EVENT                16
 151 #define MIN_VOLUME               0
 152 #define MAX_VOLUME               36
 153 #define MIN_INTER_DIGIT_INTERVAL 50
 154 #define MIN_PULSE_DURATION       70
 155 #define MIN_DUTY_CYCLE           (MIN_INTER_DIGIT_INTERVAL + MIN_PULSE_DURATION)
 156
 157
 158 typedef struct st_dtmf_key {
 159         char *event_name;
 160         int event_encoding;
 161         float low_frequency;
 162         float high_frequency;
 163 } DTMF_KEY;
 164
 165 static const DTMF_KEY DTMF_KEYS[] = {
 166         {"DTMF_KEY_EVENT_0",  0, 941, 1336},
 167         {"DTMF_KEY_EVENT_1",  1, 697, 1209},
 168         {"DTMF_KEY_EVENT_2",  2, 697, 1336},
 169         {"DTMF_KEY_EVENT_3",  3, 697, 1477},
 170         {"DTMF_KEY_EVENT_4",  4, 770, 1209},
 171         {"DTMF_KEY_EVENT_5",  5, 770, 1336},
 172         {"DTMF_KEY_EVENT_6",  6, 770, 1477},
 173         {"DTMF_KEY_EVENT_7",  7, 852, 1209},
 174         {"DTMF_KEY_EVENT_8",  8, 852, 1336},
 175         {"DTMF_KEY_EVENT_9",  9, 852, 1477},
 176         {"DTMF_KEY_EVENT_S", 10, 941, 1209},
 177         {"DTMF_KEY_EVENT_P", 11, 941, 1477},
 178         {"DTMF_KEY_EVENT_A", 12, 697, 1633},
 179         {"DTMF_KEY_EVENT_B", 13, 770, 1633},
 180         {"DTMF_KEY_EVENT_C", 14, 852, 1633},
 181         {"DTMF_KEY_EVENT_D", 15, 941, 1633},
 182 };
 183
 184 #define MAX_DTMF_EVENTS 16
 185
 186 enum {
 187 DTMF_KEY_EVENT_1 = 1,
 188 DTMF_KEY_EVENT_2 = 2,
 189 DTMF_KEY_EVENT_3 = 3,
 190 DTMF_KEY_EVENT_4 = 4,
 191 DTMF_KEY_EVENT_5 = 5,
 192 DTMF_KEY_EVENT_6 = 6,
 193 DTMF_KEY_EVENT_7 = 7,
 194 DTMF_KEY_EVENT_8 = 8,
 195 DTMF_KEY_EVENT_9 = 9,
 196 DTMF_KEY_EVENT_0 = 0,
 197 DTMF_KEY_EVENT_STAR = 10,
 198 DTMF_KEY_EVENT_POUND = 11,
 199 DTMF_KEY_EVENT_A = 12,
 200 DTMF_KEY_EVENT_B = 13,
 201 DTMF_KEY_EVENT_C = 14,
 202 DTMF_KEY_EVENT_D = 15,
 203 };
 204
 205 /* elementfactory information */
 206 static const GstElementDetails gst_dtmf_src_details =
 207 GST_ELEMENT_DETAILS ("DTMF tone generator",
 208     "Source/Audio",
 209     "Generates DTMF tones",
 210     "Youness Alaoui <youness.alaoui@collabora.co.uk>");
 211
 212 GST_DEBUG_CATEGORY_STATIC (gst_dtmf_src_debug);
 213 #define GST_CAT_DEFAULT gst_dtmf_src_debug
 214
 215 enum
 216 {
 217   PROP_0,
 218   PROP_INTERVAL,
 219 };
 220
 221 static GstStaticPadTemplate gst_dtmf_src_template =
 222 GST_STATIC_PAD_TEMPLATE ("src",
 223     GST_PAD_SRC,
 224     GST_PAD_ALWAYS,
 225     GST_STATIC_CAPS ("audio/x-raw-int, "
 226         "width = (int) 16, "
 227         "depth = (int) 16, "
 228         "endianness = (int) 1234, "
 229         "signed = (bool) true, "
 230         "rate = (int) 8000, "
 231         "channels = (int) 1")
 232     );
 233
 234 static GstElementClass *parent_class = NULL;
 235
 236 static void gst_dtmf_src_base_init (gpointer g_class);
 237 static void gst_dtmf_src_class_init (GstDTMFSrcClass * klass);
 238 static void gst_dtmf_src_init (GstDTMFSrc * dtmfsrc, gpointer g_class);
 239 static void gst_dtmf_src_finalize (GObject * object);
 240
 241 GType
 242 gst_dtmf_src_get_type (void)
 243 {
 244   static GType base_src_type = 0;
 245
 246   if (G_UNLIKELY (base_src_type == 0)) {
 247     static const GTypeInfo base_src_info = {
 248       sizeof (GstDTMFSrcClass),
 249       (GBaseInitFunc) gst_dtmf_src_base_init,
 250       NULL,
 251       (GClassInitFunc) gst_dtmf_src_class_init,
 252       NULL,
 253       NULL,
 254       sizeof (GstDTMFSrc),
 255       0,
 256       (GInstanceInitFunc) gst_dtmf_src_init,
 257     };
 258
 259     base_src_type = g_type_register_static (GST_TYPE_ELEMENT,
 260         "GstDTMFSrc", &base_src_info, 0);
 261   }
 262   return base_src_type;
 263 }
 264
 265 static void gst_dtmf_src_set_property (GObject * object, guint prop_id,
 266     const GValue * value, GParamSpec * pspec);
 267 static void gst_dtmf_src_get_property (GObject * object, guint prop_id,
 268     GValue * value, GParamSpec * pspec);
 269 static gboolean gst_dtmf_src_handle_event (GstPad * pad, GstEvent * event);
 270 static GstStateChangeReturn gst_dtmf_src_change_state (GstElement * element,
 271     GstStateChange transition);
 272 static void gst_dtmf_src_generate_tone(GstDTMFSrcEvent *event, DTMF_KEY key, float duration,
 273     GstBuffer * buffer);
 274 static void gst_dtmf_src_push_next_tone_packet (GstDTMFSrc *dtmfsrc);
 275 static void gst_dtmf_src_start (GstDTMFSrc *dtmfsrc);
 276 static void gst_dtmf_src_stop (GstDTMFSrc *dtmfsrc);
 277 static void gst_dtmf_src_add_start_event (GstDTMFSrc *dtmfsrc, gint event_number,
 278     gint event_volume);
 279 static void gst_dtmf_src_add_stop_event (GstDTMFSrc *dtmfsrc);
 280
 281 static void
 282 gst_dtmf_src_base_init (gpointer g_class)
 283 {
 284   GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
 285
 286   GST_DEBUG_CATEGORY_INIT (gst_dtmf_src_debug,
 287           "dtmfsrc", 0, "dtmfsrc element");
 288
 289   gst_element_class_add_pad_template (element_class,
 290       gst_static_pad_template_get (&gst_dtmf_src_template));
 291
 292   gst_element_class_set_details (element_class, &gst_dtmf_src_details);
 293 }
 294
 295 static void
 296 gst_dtmf_src_class_init (GstDTMFSrcClass * klass)
 297 {
 298   GObjectClass *gobject_class;
 299   GstElementClass *gstelement_class;
 300
 301   gobject_class = G_OBJECT_CLASS (klass);
 302   gstelement_class = GST_ELEMENT_CLASS (klass);
 303
 304   parent_class = g_type_class_peek_parent (klass);
 305
 306   gobject_class->finalize = GST_DEBUG_FUNCPTR (gst_dtmf_src_finalize);
 307   gobject_class->set_property =
 308       GST_DEBUG_FUNCPTR (gst_dtmf_src_set_property);
 309   gobject_class->get_property =
 310       GST_DEBUG_FUNCPTR (gst_dtmf_src_get_property);
 311
 312   g_object_class_install_property (G_OBJECT_CLASS (klass), PROP_INTERVAL,
 313       g_param_spec_int ("interval", "Interval between tone packets",
 314           "Interval in ms between two tone packets", MIN_PACKET_INTERVAL,
 315           MAX_PACKET_INTERVAL, DEFAULT_PACKET_INTERVAL, G_PARAM_READWRITE));
 316
 317   gstelement_class->change_state =
 318       GST_DEBUG_FUNCPTR (gst_dtmf_src_change_state);
 319 }
 320
 321 static void
 322 gst_dtmf_src_init (GstDTMFSrc * dtmfsrc, gpointer g_class)
 323 {
 324   dtmfsrc->srcpad =
 325       gst_pad_new_from_static_template (&gst_dtmf_src_template, "src");
 326   GST_DEBUG_OBJECT (dtmfsrc, "adding src pad");
 327   gst_element_add_pad (GST_ELEMENT (dtmfsrc), dtmfsrc->srcpad);
 328
 329   gst_pad_set_event_function (dtmfsrc->srcpad, gst_dtmf_src_handle_event);
 330
 331   dtmfsrc->interval = DEFAULT_PACKET_INTERVAL;
 332
 333   dtmfsrc->event_queue = g_async_queue_new ();
 334   dtmfsrc->last_event = NULL;
 335
 336   GST_DEBUG_OBJECT (dtmfsrc, "init done");
 337 }
 338
 339 static void
 340 gst_dtmf_src_finalize (GObject * object)
 341 {
 342   GstDTMFSrc *dtmfsrc;
 343
 344   dtmfsrc = GST_DTMF_SRC (object);
 345
 346
 347   gst_dtmf_src_stop (dtmfsrc);
 348
 349   if (dtmfsrc->event_queue) {
 350     g_async_queue_unref (dtmfsrc->event_queue);
 351     dtmfsrc->event_queue = NULL;
 352   }
 353
 354   G_OBJECT_CLASS (parent_class)->finalize (object);
 355 }
 356
 357 static gboolean
 358 gst_dtmf_src_handle_dtmf_event (GstDTMFSrc *dtmfsrc,
 359         const GstStructure * event_structure)
 360 {
 361   gint event_type;
 362   gboolean start;
 363   gint method;
 364
 365   if (!gst_structure_get_int (event_structure, "type", &event_type) ||
 366       !gst_structure_get_boolean (event_structure, "start", &start) ||
 367       (start == TRUE && event_type != GST_TONE_DTMF_TYPE_EVENT))
 368     goto failure;
 369
 370   if (gst_structure_get_int (event_structure, "method", &method)) {
 371     if (method != 2) {
 372       goto failure;
 373     }
 374   }
 375
 376   if (start) {
 377     gint event_number;
 378     gint event_volume;
 379
 380     if (!gst_structure_get_int (event_structure, "number", &event_number) ||
 381             !gst_structure_get_int (event_structure, "volume", &event_volume))
 382       goto failure;
 383
 384     GST_DEBUG_OBJECT (dtmfsrc, "Received start event %d with volume %d",
 385             event_number, event_volume);
 386     gst_dtmf_src_add_start_event (dtmfsrc, event_number, event_volume);
 387   }
 388
 389   else {
 390     GST_DEBUG_OBJECT (dtmfsrc, "Received stop event");
 391     gst_dtmf_src_add_stop_event (dtmfsrc);
 392   }
 393
 394   return TRUE;
 395 failure:
 396   return FALSE;
 397 }
 398
 399 static gboolean
 400 gst_dtmf_src_handle_custom_upstream (GstDTMFSrc *dtmfsrc,
 401     GstEvent * event)
 402 {
 403   gboolean result = FALSE;
 404   const GstStructure *structure;
 405
 406   if (GST_STATE (dtmfsrc) != GST_STATE_PLAYING) {
 407     GST_DEBUG_OBJECT (dtmfsrc, "Received event while not in PLAYING state");
 408     goto ret;
 409   }
 410
 411   GST_DEBUG_OBJECT (dtmfsrc, "Received event is of our interest");
 412   structure = gst_event_get_structure (event);
 413   if (structure && gst_structure_has_name (structure, "dtmf-event"))
 414     result = gst_dtmf_src_handle_dtmf_event (dtmfsrc, structure);
 415
 416 ret:
 417   return result;
 418 }
 419
 420 static gboolean
 421 gst_dtmf_src_handle_event (GstPad * pad, GstEvent * event)
 422 {
 423   GstDTMFSrc *dtmfsrc;
 424   gboolean result = FALSE;
 425
 426   dtmfsrc = GST_DTMF_SRC (GST_PAD_PARENT (pad));
 427
 428   GST_DEBUG_OBJECT (dtmfsrc, "Received an event on the src pad");
 429   switch (GST_EVENT_TYPE (event)) {
 430     case GST_EVENT_CUSTOM_UPSTREAM:
 431     {
 432       result = gst_dtmf_src_handle_custom_upstream (dtmfsrc, event);
 433       break;
 434     }
 435     /* Ideally this element should not be flushed but let's handle the event
 436      * just in case it is */
 437     case GST_EVENT_FLUSH_START:
 438       gst_dtmf_src_stop (dtmfsrc);
 439       result = TRUE;
 440       break;
 441     case GST_EVENT_FLUSH_STOP:
 442       gst_segment_init (&dtmfsrc->segment, GST_FORMAT_UNDEFINED);
 443       break;
 444     case GST_EVENT_NEWSEGMENT:
 445       {
 446         gboolean update;
 447         gdouble rate;
 448         GstFormat fmt;
 449         gint64 start, stop, position;
 450
 451         gst_event_parse_new_segment (event, &update, &rate, &fmt, &start,
 452             &stop, &position);
 453         gst_segment_set_newsegment (&dtmfsrc->segment, update, rate, fmt,
 454             start, stop, position);
 455       }
 456       /* fallthrough */
 457     default:
 458       result = gst_pad_event_default (pad, event);
 459       break;
 460   }
 461
 462   gst_event_unref (event);
 463   return result;
 464 }
 465
 466 static void
 467 gst_dtmf_src_set_property (GObject * object, guint prop_id,
 468     const GValue * value, GParamSpec * pspec)
 469 {
 470   GstDTMFSrc *dtmfsrc;
 471
 472   dtmfsrc = GST_DTMF_SRC (object);
 473
 474   switch (prop_id) {
 475     case PROP_INTERVAL:
 476       dtmfsrc->interval = g_value_get_int (value);
 477       break;
 478     default:
 479       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 480       break;
 481   }
 482 }
 483
 484 static void
 485 gst_dtmf_src_get_property (GObject * object, guint prop_id, GValue * value,
 486     GParamSpec * pspec)
 487 {
 488   GstDTMFSrc *dtmfsrc;
 489
 490   dtmfsrc = GST_DTMF_SRC (object);
 491
 492   switch (prop_id) {
 493     case PROP_INTERVAL:
 494       g_value_set_uint (value, dtmfsrc->interval);
 495       break;
 496     default:
 497       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 498       break;
 499   }
 500 }
 501
 502 static void
 503 gst_dtmf_src_set_stream_lock (GstDTMFSrc *dtmfsrc, gboolean lock)
 504 {
 505    GstEvent *event;
 506    GstStructure *structure;
 507
 508    structure = gst_structure_new ("stream-lock",
 509                       "lock", G_TYPE_BOOLEAN, lock, NULL);
 510
 511    event = gst_event_new_custom (GST_EVENT_CUSTOM_DOWNSTREAM_OOB, structure);
 512    gst_pad_push_event (dtmfsrc->srcpad, event);
 513 }
 514
 515 static void
 516 gst_dtmf_prepare_timestamps (GstDTMFSrc *dtmfsrc)
 517 {
 518   GstClock *clock;
 519
 520   clock = GST_ELEMENT_CLOCK (dtmfsrc);
 521   if (clock != NULL)
 522     dtmfsrc->timestamp = gst_clock_get_time (GST_ELEMENT_CLOCK (dtmfsrc));
 523
 524   else {
 525     GST_ERROR_OBJECT (dtmfsrc, "No clock set for element %s",
 526         GST_ELEMENT_NAME (dtmfsrc));
 527     dtmfsrc->timestamp = GST_CLOCK_TIME_NONE;
 528   }
 529 }
 530
 531 static void
 532 gst_dtmf_src_start (GstDTMFSrc *dtmfsrc)
 533 {
 534   GstCaps * caps = gst_pad_get_pad_template_caps (dtmfsrc->srcpad);
 535
 536   if (!gst_pad_set_caps (dtmfsrc->srcpad, caps))
 537     GST_ERROR_OBJECT (dtmfsrc,
 538             "Failed to set caps %" GST_PTR_FORMAT " on src pad", caps);
 539   else
 540     GST_DEBUG_OBJECT (dtmfsrc,
 541             "caps %" GST_PTR_FORMAT " set on src pad", caps);
 542
 543
 544   if (!gst_pad_start_task (dtmfsrc->srcpad,
 545       (GstTaskFunction) gst_dtmf_src_push_next_tone_packet, dtmfsrc)) {
 546     GST_ERROR_OBJECT (dtmfsrc, "Failed to start task on src pad");
 547   }
 548 }
 549
 550 static void
 551 gst_dtmf_src_stop (GstDTMFSrc *dtmfsrc)
 552 {
 553   /* Don't forget to release the stream lock */
 554   gst_dtmf_src_set_stream_lock (dtmfsrc, FALSE);
 555
 556
 557   /* Flushing the event queue */
 558   GstDTMFSrcEvent *event = g_async_queue_try_pop (dtmfsrc->event_queue);
 559
 560   while (event != NULL) {
 561     g_free (event);
 562     event = g_async_queue_try_pop (dtmfsrc->event_queue);
 563   }
 564
 565   if (dtmfsrc->last_event) {
 566     g_free (dtmfsrc->last_event);
 567     dtmfsrc->last_event = NULL;
 568   }
 569
 570   if (!gst_pad_pause_task (dtmfsrc->srcpad)) {
 571     GST_ERROR_OBJECT (dtmfsrc, "Failed to pause task on src pad");
 572     return;
 573   }
 574
 575 }
 576
 577 static void
 578 gst_dtmf_src_add_start_event (GstDTMFSrc *dtmfsrc, gint event_number,
 579     gint event_volume)
 580 {
 581
 582   GstDTMFSrcEvent * event = g_malloc (sizeof(GstDTMFSrcEvent));
 583   event->event_type = DTMF_EVENT_TYPE_START;
 584   event->sample = 0;
 585   event->event_number = CLAMP (event_number, MIN_EVENT, MAX_EVENT);
 586   event->volume = CLAMP (event_volume, MIN_VOLUME, MAX_VOLUME);
 587
 588   g_async_queue_push (dtmfsrc->event_queue, event);
 589 }
 590
 591 static void
 592 gst_dtmf_src_add_stop_event (GstDTMFSrc *dtmfsrc)
 593 {
 594
 595   GstDTMFSrcEvent * event = g_malloc (sizeof(GstDTMFSrcEvent));
 596   event->event_type = DTMF_EVENT_TYPE_STOP;
 597   event->sample = 0;
 598   event->event_number = 0;
 599   event->volume = 0;
 600
 601   g_async_queue_push (dtmfsrc->event_queue, event);
 602 }
 603
 604 static void
 605 gst_dtmf_src_generate_silence(GstBuffer * buffer, float duration)
 606 {
 607   gint buf_size;
 608
 609   /* Create a buffer with data set to 0 */
 610   buf_size = ((duration/1000)*SAMPLE_RATE*SAMPLE_SIZE*CHANNELS)/8;
 611   GST_BUFFER_SIZE (buffer) = buf_size;
 612   GST_BUFFER_MALLOCDATA (buffer) = g_malloc0(buf_size);
 613   GST_BUFFER_DATA (buffer) = GST_BUFFER_MALLOCDATA (buffer);
 614
 615 }
 616
 617 static void
 618 gst_dtmf_src_generate_tone(GstDTMFSrcEvent *event, DTMF_KEY key, float duration, GstBuffer * buffer)
 619 {
 620   gint16 *p;
 621   gint tone_size;
 622   double i = 0;
 623   double amplitude, f1, f2;
 624
 625   /* Create a buffer for the tone */
 626   tone_size = ((duration/1000)*SAMPLE_RATE*SAMPLE_SIZE*CHANNELS)/8;
 627   GST_BUFFER_SIZE (buffer) = tone_size;
 628   GST_BUFFER_MALLOCDATA (buffer) = g_malloc(tone_size);
 629   GST_BUFFER_DATA (buffer) = GST_BUFFER_MALLOCDATA (buffer);
 630
 631   p = (gint16 *) GST_BUFFER_MALLOCDATA (buffer);
 632
 633   /*
 634    * For each sample point we calculate 'x' as the
 635    * the amplitude value.
 636    */
 637   for (i = 0; i < (tone_size / (SAMPLE_SIZE/8)); i++) {
 638     /*
 639      * We add the fundamental frequencies together.
 640      */
 641     f1 = sin(2 * M_PI * key.low_frequency * (event->sample / SAMPLE_RATE));
 642     f2 = sin(2 * M_PI * key.high_frequency * (event->sample / SAMPLE_RATE));
 643
 644     amplitude = (f1 + f2) / 2;
 645
 646     /* Make the [-1:1] interval into a [-32767:32767] interval */
 647     amplitude *= 32767;
 648
 649     /* Store it in the data buffer */
 650     *(p++) = (gint16) amplitude;
 651
 652     (event->sample)++;
 653   }
 654 }
 655
 656 static void
 657 gst_dtmf_src_wait_for_buffer_ts (GstDTMFSrc *dtmfsrc, GstBuffer * buf)
 658 {
 659   GstClock *clock;
 660
 661   clock = GST_ELEMENT_CLOCK (dtmfsrc);
 662   if (clock != NULL) {
 663     GstClockID clock_id;
 664     GstClockReturn clock_ret;
 665
 666     clock_id = gst_clock_new_single_shot_id (clock, GST_BUFFER_TIMESTAMP (buf));
 667     clock_ret = gst_clock_id_wait (clock_id, NULL);
 668     if (clock_ret != GST_CLOCK_OK && clock_ret != GST_CLOCK_EARLY) {
 669       GST_ERROR_OBJECT (dtmfsrc, "Failed to wait on clock %s",
 670               GST_ELEMENT_NAME (clock));
 671     }
 672     gst_clock_id_unref (clock_id);
 673   }
 674
 675   else {
 676     GST_ERROR_OBJECT (dtmfsrc, "No clock set for element %s",
 677         GST_ELEMENT_NAME (dtmfsrc));
 678   }
 679 }
 680
 681
 682 static GstBuffer *
 683 gst_dtmf_src_create_next_tone_packet (GstDTMFSrc *dtmfsrc, GstDTMFSrcEvent *event)
 684 {
 685   GstBuffer *buf = NULL;
 686   guint32 duration;
 687
 688
 689   GST_DEBUG_OBJECT (dtmfsrc,
 690       "Creating buffer for tone");
 691
 692   /* create buffer to hold the tone */
 693   buf = gst_buffer_new ();
 694
 695   /* The first packet must be inter digit silence, then the second and third must be the
 696    * minimal pulse duration divided into two packets to make it small
 697    */
 698   switch(event->packet_count) {
 699     case 0:
 700       duration = MIN_INTER_DIGIT_INTERVAL;
 701       gst_dtmf_src_generate_silence (buf, duration);
 702       break;
 703     case 1:
 704     case 2:
 705       /* Generate the tone */
 706       duration = MIN_PULSE_DURATION / 2;
 707       gst_dtmf_src_generate_tone(event, DTMF_KEYS[event->event_number], duration, buf);
 708       break;
 709     default:
 710       duration = dtmfsrc->interval;
 711       gst_dtmf_src_generate_tone(event, DTMF_KEYS[event->event_number], duration, buf);
 712       break;
 713   }
 714   event->packet_count++;
 715
 716
 717   /* timestamp and duration of GstBuffer */
 718   GST_BUFFER_DURATION (buf) = duration * GST_MSECOND;
 719   GST_BUFFER_TIMESTAMP (buf) = dtmfsrc->timestamp;
 720   dtmfsrc->timestamp += GST_BUFFER_DURATION (buf);
 721
 722   /* FIXME: Should we sync to clock ourselves or leave it to sink */
 723   gst_dtmf_src_wait_for_buffer_ts (dtmfsrc, buf);
 724
 725   /* Set caps on the buffer before pushing it */
 726   gst_buffer_set_caps (buf, GST_PAD_CAPS (dtmfsrc->srcpad));
 727
 728   return buf;
 729 }
 730
 731 static void
 732 gst_dtmf_src_push_next_tone_packet (GstDTMFSrc *dtmfsrc)
 733 {
 734   GstBuffer *buf = NULL;
 735   GstFlowReturn ret;
 736   GstDTMFSrcEvent *event;
 737
 738   g_async_queue_ref (dtmfsrc->event_queue);
 739
 740   if (dtmfsrc->last_event == NULL) {
 741     event = g_async_queue_pop (dtmfsrc->event_queue);
 742
 743     if (event->event_type == DTMF_EVENT_TYPE_STOP) {
 744       GST_WARNING_OBJECT (dtmfsrc, "Received a DTMF stop event when already stopped", GST_BUFFER_SIZE (buf));
 745     } else if (event->event_type == DTMF_EVENT_TYPE_START) {
 746       gst_dtmf_prepare_timestamps (dtmfsrc);
 747
 748       /* Don't forget to get exclusive access to the stream */
 749       gst_dtmf_src_set_stream_lock (dtmfsrc, TRUE);
 750
 751       event->packet_count = 0;
 752       dtmfsrc->last_event = event;
 753     }
 754   } else if (dtmfsrc->last_event->packet_count >= 3) {
 755     event = g_async_queue_try_pop (dtmfsrc->event_queue);
 756
 757     if (event != NULL) {
 758       if (event->event_type == DTMF_EVENT_TYPE_START) {
 759         GST_WARNING_OBJECT (dtmfsrc, "Received two consecutive DTMF start events", GST_BUFFER_SIZE (buf));
 760       } else if (event->event_type == DTMF_EVENT_TYPE_STOP) {
 761         gst_dtmf_src_set_stream_lock (dtmfsrc, FALSE);
 762         g_free (dtmfsrc->last_event);
 763         dtmfsrc->last_event = NULL;
 764       }
 765     }
 766   }
 767   g_async_queue_unref (dtmfsrc->event_queue);
 768
 769   if (dtmfsrc->last_event) {
 770     buf = gst_dtmf_src_create_next_tone_packet (dtmfsrc, dtmfsrc->last_event);
 771
 772     gst_buffer_ref(buf);
 773
 774     GST_DEBUG_OBJECT (dtmfsrc,
 775         "pushing buffer on src pad of size %d", GST_BUFFER_SIZE (buf));
 776     ret = gst_pad_push (dtmfsrc->srcpad, buf);
 777     if (ret != GST_FLOW_OK) {
 778       GST_ERROR_OBJECT (dtmfsrc, "Failed to push buffer on src pad", GST_BUFFER_SIZE (buf));
 779     }
 780
 781     gst_buffer_unref(buf);
 782     GST_DEBUG_OBJECT (dtmfsrc, "pushed DTMF tone on src pad");
 783   }
 784
 785 }
 786
 787 static GstStateChangeReturn
 788 gst_dtmf_src_change_state (GstElement * element, GstStateChange transition)
 789 {
 790   GstDTMFSrc *dtmfsrc;
 791   GstStateChangeReturn result;
 792   gboolean no_preroll = FALSE;
 793
 794   dtmfsrc = GST_DTMF_SRC (element);
 795
 796   switch (transition) {
 797     case GST_STATE_CHANGE_READY_TO_PAUSED:
 798       gst_segment_init (&dtmfsrc->segment, GST_FORMAT_UNDEFINED);
 799       /* Indicate that we don't do PRE_ROLL */
 800       no_preroll = TRUE;
 801       break;
 802     case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
 803       gst_dtmf_src_start (dtmfsrc);
 804       break;
 805     default:
 806       break;
 807   }
 808
 809   if ((result =
 810           GST_ELEMENT_CLASS (parent_class)->change_state (element,
 811               transition)) == GST_STATE_CHANGE_FAILURE)
 812     goto failure;
 813
 814   switch (transition) {
 815     case GST_STATE_CHANGE_PLAYING_TO_PAUSED:
 816       /* Indicate that we don't do PRE_ROLL */
 817       gst_dtmf_src_stop (dtmfsrc);
 818       no_preroll = TRUE;
 819       break;
 820     default:
 821       break;
 822   }
 823
 824   if (no_preroll && result == GST_STATE_CHANGE_SUCCESS)
 825     result = GST_STATE_CHANGE_NO_PREROLL;
 826
 827   return result;
 828
 829   /* ERRORS */
 830 failure:
 831   {
 832     GST_ERROR_OBJECT (dtmfsrc, "parent failed state change");
 833     return result;
 834   }
 835 }
 836
 837 gboolean
 838 gst_dtmf_src_plugin_init (GstPlugin * plugin)
 839 {
 840   return gst_element_register (plugin, "dtmfsrc",
 841       GST_RANK_NONE, GST_TYPE_DTMF_SRC);
 842 }
 843