From 754007b34492402c4d8adc114c33e5393d53345e Mon Sep 17 00:00:00 2001 From: Wim Taymans Date: Fri, 16 Apr 2010 19:35:12 +0200 Subject: [PATCH] qcelpdepay: add first version of a QCELP depayloader --- gst/rtp/Makefile.am | 1 + gst/rtp/gstrtp.c | 4 + gst/rtp/gstrtpqcelpdepay.c | 435 +++++++++++++++++++++++++++++++++++++++++++++ gst/rtp/gstrtpqcelpdepay.h | 62 +++++++ 4 files changed, 502 insertions(+) create mode 100644 gst/rtp/gstrtpqcelpdepay.c create mode 100644 gst/rtp/gstrtpqcelpdepay.h diff --git a/gst/rtp/Makefile.am b/gst/rtp/Makefile.am index 9292d4f..dc9a593 100644 --- a/gst/rtp/Makefile.am +++ b/gst/rtp/Makefile.am @@ -54,6 +54,7 @@ libgstrtp_la_SOURCES = \ gstrtpmp4gpay.c \ gstrtpmp4adepay.c \ gstrtpmp4apay.c \ + gstrtpqcelpdepay.c \ gstrtpqdmdepay.c \ gstrtpsirenpay.c \ gstrtpsirendepay.c \ diff --git a/gst/rtp/gstrtp.c b/gst/rtp/gstrtp.c index 05bb5e3..b35e854 100644 --- a/gst/rtp/gstrtp.c +++ b/gst/rtp/gstrtp.c @@ -71,6 +71,7 @@ #include "gstrtpmp4apay.h" #include "gstrtpmp4gdepay.h" #include "gstrtpmp4gpay.h" +#include "gstrtpqcelpdepay.h" #include "gstrtpqdmdepay.h" #include "gstrtpsirenpay.h" #include "gstrtpsirendepay.h" @@ -237,6 +238,9 @@ plugin_init (GstPlugin * plugin) if (!gst_rtp_mp4g_pay_plugin_init (plugin)) return FALSE; + if (!gst_rtp_qcelp_depay_plugin_init (plugin)) + return FALSE; + if (!gst_rtp_qdm2_depay_plugin_init (plugin)) return FALSE; diff --git a/gst/rtp/gstrtpqcelpdepay.c b/gst/rtp/gstrtpqcelpdepay.c new file mode 100644 index 0000000..f370c9f --- /dev/null +++ b/gst/rtp/gstrtpqcelpdepay.c @@ -0,0 +1,435 @@ +/* GStreamer + * Copyright (C) <2010> Wim Taymans + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Library General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Library General Public License for more details. + * + * You should have received a copy of the GNU Library General Public + * License along with this library; if not, write to the + * Free Software Foundation, Inc., 59 Temple Place - Suite 330, + * Boston, MA 02111-1307, USA. + */ + +#ifdef HAVE_CONFIG_H +# include "config.h" +#endif + +#include + +#include +#include +#include "gstrtpqcelpdepay.h" + +GST_DEBUG_CATEGORY_STATIC (rtpqcelpdepay_debug); +#define GST_CAT_DEFAULT (rtpqcelpdepay_debug) + +/* references: + * + * RFC 2658 - RTP Payload Format for PureVoice(tm) Audio + */ +#define FRAME_DURATION (20 * GST_MSECOND) + +/* RtpQCELPDepay signals and args */ +enum +{ + /* FILL ME */ + LAST_SIGNAL +}; + +enum +{ + ARG_0 +}; + +static GstStaticPadTemplate gst_rtp_qcelp_depay_sink_template = + GST_STATIC_PAD_TEMPLATE ("sink", + GST_PAD_SINK, + GST_PAD_ALWAYS, + GST_STATIC_CAPS ("application/x-rtp, " + "media = (string) \"audio\", " + "payload = (int) " GST_RTP_PAYLOAD_DYNAMIC_STRING ", " + "clock-rate = (int) 8000, " + "encoding-name = (string) \"QCELP\"; " + "application/x-rtp, " + "media = (string) \"audio\", " + "payload = (int) " GST_RTP_PAYLOAD_QCELP_STRING ", " + "clock-rate = (int) 8000") + ); + +static GstStaticPadTemplate gst_rtp_qcelp_depay_src_template = +GST_STATIC_PAD_TEMPLATE ("src", + GST_PAD_SRC, + GST_PAD_ALWAYS, + GST_STATIC_CAPS ("audio/qcelp, " "channels = (int) 1," "rate = (int) 8000") + ); + +static void gst_rtp_qcelp_depay_finalize (GObject * object); + +static gboolean gst_rtp_qcelp_depay_setcaps (GstBaseRTPDepayload * depayload, + GstCaps * caps); +static GstBuffer *gst_rtp_qcelp_depay_process (GstBaseRTPDepayload * depayload, + GstBuffer * buf); + +GST_BOILERPLATE (GstRtpQCELPDepay, gst_rtp_qcelp_depay, GstBaseRTPDepayload, + GST_TYPE_BASE_RTP_DEPAYLOAD); + +static void +gst_rtp_qcelp_depay_base_init (gpointer klass) +{ + GstElementClass *element_class = GST_ELEMENT_CLASS (klass); + + gst_element_class_add_pad_template (element_class, + gst_static_pad_template_get (&gst_rtp_qcelp_depay_src_template)); + gst_element_class_add_pad_template (element_class, + gst_static_pad_template_get (&gst_rtp_qcelp_depay_sink_template)); + + gst_element_class_set_details_simple (element_class, "RTP QCELP depayloader", + "Codec/Depayloader/Network", + "Extracts QCELP (PureVoice) audio from RTP packets (RFC 2658)", + "Wim Taymans "); +} + +static void +gst_rtp_qcelp_depay_class_init (GstRtpQCELPDepayClass * klass) +{ + GObjectClass *gobject_class; + GstBaseRTPDepayloadClass *gstbasertpdepayload_class; + + gobject_class = (GObjectClass *) klass; + gstbasertpdepayload_class = (GstBaseRTPDepayloadClass *) klass; + + gobject_class->finalize = gst_rtp_qcelp_depay_finalize; + + gstbasertpdepayload_class->process = gst_rtp_qcelp_depay_process; + gstbasertpdepayload_class->set_caps = gst_rtp_qcelp_depay_setcaps; + + GST_DEBUG_CATEGORY_INIT (rtpqcelpdepay_debug, "rtpqcelpdepay", 0, + "QCELP RTP Depayloader"); +} + +static void +gst_rtp_qcelp_depay_init (GstRtpQCELPDepay * rtpqcelpdepay, + GstRtpQCELPDepayClass * klass) +{ + GstBaseRTPDepayload *depayload; + + depayload = GST_BASE_RTP_DEPAYLOAD (rtpqcelpdepay); +} + +static void +gst_rtp_qcelp_depay_finalize (GObject * object) +{ + GstRtpQCELPDepay *depay; + + depay = GST_RTP_QCELP_DEPAY (object); + + if (depay->packets != NULL) { + g_ptr_array_foreach (depay->packets, (GFunc) gst_buffer_unref, NULL); + g_ptr_array_free (depay->packets, TRUE); + depay->packets = NULL; + } + + G_OBJECT_CLASS (parent_class)->finalize (object); +} + + +static gboolean +gst_rtp_qcelp_depay_setcaps (GstBaseRTPDepayload * depayload, GstCaps * caps) +{ + GstCaps *srccaps; + GstRtpQCELPDepay *rtpqcelpdepay; + gboolean res; + + rtpqcelpdepay = GST_RTP_QCELP_DEPAY (depayload); + + srccaps = gst_caps_new_simple ("audio/qcelp", + "channels", G_TYPE_INT, 1, "rate", G_TYPE_INT, 8000, NULL); + res = gst_pad_set_caps (GST_BASE_RTP_DEPAYLOAD_SRCPAD (depayload), srccaps); + gst_caps_unref (srccaps); + + return res; +} + +static gint frame_size[16] = { + 1, 4, 8, 17, 35, -8, 0, 0, + 0, 0, 0, 0, 0, 0, 1, 0 +}; + +/* get the frame length, 0 is invalid, negative values are invalid but can be + * recovered from. */ +static gint +get_frame_len (GstRtpQCELPDepay * depay, guint8 frame_type) +{ + if (frame_type > 16) + return 0; + + return frame_size[frame_type]; +} + +static guint +count_packets (GstRtpQCELPDepay * depay, guint8 * data, guint size) +{ + guint count = 0; + + while (size > 0) { + gint frame_len; + + frame_len = get_frame_len (depay, data[0]); + + /* 0 is invalid and we throw away the remainder of the frames */ + if (frame_len == 0) + break; + + if (frame_len < 0) + frame_len = -frame_len; + + if (frame_len > size) + break; + + size -= frame_len; + data += frame_len; + count++; + } + return count; +} + +static void +flush_packets (GstRtpQCELPDepay * depay) +{ + guint i, size; + + GST_DEBUG_OBJECT (depay, "flushing packets"); + + size = depay->packets->len; + + for (i = 0; i < size; i++) { + GstBuffer *outbuf; + + outbuf = g_ptr_array_index (depay->packets, i); + g_ptr_array_index (depay->packets, i) = NULL; + + gst_base_rtp_depayload_push (GST_BASE_RTP_DEPAYLOAD (depay), outbuf); + } + + /* and reset interleaving state */ + depay->interleaved = FALSE; + depay->bundling = 0; +} + +static void +add_packet (GstRtpQCELPDepay * depay, guint LLL, guint NNN, guint index, + GstBuffer * outbuf) +{ + guint idx; + GstBuffer *old; + + /* figure out the position in the array, note that index is never 0 because we + * push those packets immediately. */ + idx = NNN + ((LLL + 1) * (index - 1)); + + GST_DEBUG_OBJECT (depay, "adding packet at index %u", idx); + /* free old buffer (should not happen) */ + old = g_ptr_array_index (depay->packets, idx); + if (old) + gst_buffer_unref (old); + + /* store new buffer */ + g_ptr_array_index (depay->packets, idx) = outbuf; +} + +static GstBuffer * +create_erasure_buffer (GstRtpQCELPDepay * depay) +{ + GstBuffer *outbuf; + + outbuf = gst_buffer_new_and_alloc (1); + GST_BUFFER_DATA (outbuf)[0] = 14; + + return outbuf; +} + +static GstBuffer * +gst_rtp_qcelp_depay_process (GstBaseRTPDepayload * depayload, GstBuffer * buf) +{ + GstRtpQCELPDepay *depay; + GstBuffer *outbuf; + GstClockTime timestamp; + guint payload_len, offset, index; + guint8 *payload; + guint RR, LLL, NNN; + + depay = GST_RTP_QCELP_DEPAY (depayload); + + payload_len = gst_rtp_buffer_get_payload_len (buf); + + if (payload_len < 2) + goto too_small; + + timestamp = GST_BUFFER_TIMESTAMP (buf); + + payload = gst_rtp_buffer_get_payload (buf); + + /* 0 1 2 3 4 5 6 7 + * +-+-+-+-+-+-+-+-+ + * |RR | LLL | NNN | + * +-+-+-+-+-+-+-+-+ + */ + RR = payload[0] >> 6; + LLL = (payload[0] & 0x38) >> 3; + NNN = (payload[0] & 0x07); + + payload_len--; + payload++; + + GST_DEBUG_OBJECT (depay, "LLL %u, NNN %u", LLL, NNN); + + if (LLL > 5) + goto invalid_lll; + + if (NNN > LLL) + goto invalid_nnn; + + if (LLL != 0) { + /* we are interleaved */ + if (!depay->interleaved) { + guint size; + + GST_DEBUG_OBJECT (depay, "starting interleaving group"); + /* bundling is not allowed to change in one interleave group */ + depay->bundling = count_packets (depay, payload, payload_len); + GST_DEBUG_OBJECT (depay, "got bundling of %u", depay->bundling); + /* we have one bundle where NNN goes from 0 to L, we don't store the index + * 0 frames, so L+1 packets. Each packet has 'bundling - 1' packets */ + size = (depay->bundling - 1) * (LLL + 1); + /* create the array to hold the packets */ + if (depay->packets == NULL) + depay->packets = g_ptr_array_sized_new (size); + GST_DEBUG_OBJECT (depay, "created packet array of size %u", size); + g_ptr_array_set_size (depay->packets, size); + /* we were previously not interleaved, figure out how much space we + * need to deinterleave */ + depay->interleaved = TRUE; + } + } else { + /* we are not interleaved */ + if (depay->interleaved) { + GST_DEBUG_OBJECT (depay, "stopping interleaving"); + /* flush packets if we were previously interleaved */ + flush_packets (depay); + } + depay->bundling = 0; + } + + index = 0; + offset = 1; + + while (payload_len > 0) { + gint frame_len; + gboolean do_erasure; + + frame_len = get_frame_len (depay, payload[0]); + GST_DEBUG_OBJECT (depay, "got frame len %d", frame_len); + + if (frame_len == 0) + goto invalid_frame; + + if (frame_len < 0) { + /* need to add an erasure frame but we can recover */ + frame_len = -frame_len; + do_erasure = TRUE; + } else { + do_erasure = FALSE; + } + + if (frame_len > payload_len) + goto invalid_frame; + + if (do_erasure) { + /* create erasure frame */ + outbuf = create_erasure_buffer (depay); + } else { + /* each frame goes into its buffer */ + outbuf = gst_rtp_buffer_get_payload_subbuffer (buf, offset, frame_len); + } + + GST_BUFFER_TIMESTAMP (outbuf) = timestamp; + GST_BUFFER_DURATION (outbuf) = FRAME_DURATION; + + if (!depay->interleaved || index == 0) { + /* not interleaved or first frame in packet, just push */ + gst_base_rtp_depayload_push (depayload, outbuf); + + if (timestamp != -1) + timestamp += FRAME_DURATION; + } else { + /* put in interleave buffer */ + add_packet (depay, LLL, NNN, index, outbuf); + + if (timestamp != -1) + timestamp += (FRAME_DURATION * (LLL + 1)); + } + + payload_len -= frame_len; + payload += frame_len; + offset += frame_len; + index++; + + /* discard excess packets */ + if (depay->bundling > 0 && depay->bundling <= index) + break; + } + while (index < depay->bundling) { + GST_DEBUG_OBJECT (depay, "filling with erasure buffer"); + /* fill remainder with erasure packets */ + outbuf = create_erasure_buffer (depay); + add_packet (depay, LLL, NNN, index, outbuf); + index++; + } + if (depay->interleaved && LLL == NNN) { + GST_DEBUG_OBJECT (depay, "interleave group ended, flushing"); + /* we have the complete interleave group, flush */ + flush_packets (depay); + } + + return NULL; + + /* ERRORS */ +too_small: + { + GST_ELEMENT_WARNING (depay, STREAM, DECODE, + (NULL), ("QCELP RTP payload too small (%d)", payload_len)); + return NULL; + } +invalid_lll: + { + GST_ELEMENT_WARNING (depay, STREAM, DECODE, + (NULL), ("QCELP RTP invalid LLL received (%d)", LLL)); + return NULL; + } +invalid_nnn: + { + GST_ELEMENT_WARNING (depay, STREAM, DECODE, + (NULL), ("QCELP RTP invalid NNN received (%d)", NNN)); + return NULL; + } +invalid_frame: + { + GST_ELEMENT_WARNING (depay, STREAM, DECODE, + (NULL), ("QCELP RTP invalid frame received")); + return NULL; + } +} + +gboolean +gst_rtp_qcelp_depay_plugin_init (GstPlugin * plugin) +{ + return gst_element_register (plugin, "rtpqcelpdepay", + GST_RANK_MARGINAL, GST_TYPE_RTP_QCELP_DEPAY); +} diff --git a/gst/rtp/gstrtpqcelpdepay.h b/gst/rtp/gstrtpqcelpdepay.h new file mode 100644 index 0000000..e78c906 --- /dev/null +++ b/gst/rtp/gstrtpqcelpdepay.h @@ -0,0 +1,62 @@ +/* GStreamer + * Copyright (C) <2010> Wim Taymans + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Library General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) any later version. + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Library General Public License for more details. + * + * You should have received a copy of the GNU Library General Public + * License along with this library; if not, write to the + * Free Software Foundation, Inc., 59 Temple Place - Suite 330, + * Boston, MA 02111-1307, USA. + */ + +#ifndef __GST_RTP_QCELP_DEPAY_H__ +#define __GST_RTP_QCELP_DEPAY_H__ + +#include +#include + +G_BEGIN_DECLS + +#define GST_TYPE_RTP_QCELP_DEPAY \ + (gst_rtp_qcelp_depay_get_type()) +#define GST_RTP_QCELP_DEPAY(obj) \ + (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_RTP_QCELP_DEPAY,GstRtpQCELPDepay)) +#define GST_RTP_QCELP_DEPAY_CLASS(klass) \ + (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_RTP_QCELP_DEPAY,GstRtpQCELPDepayClass)) +#define GST_IS_RTP_QCELP_DEPAY(obj) \ + (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_RTP_QCELP_DEPAY)) +#define GST_IS_RTP_QCELP_DEPAY_CLASS(klass) \ + (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_RTP_QCELP_DEPAY)) + +typedef struct _GstRtpQCELPDepay GstRtpQCELPDepay; +typedef struct _GstRtpQCELPDepayClass GstRtpQCELPDepayClass; + +struct _GstRtpQCELPDepay +{ + GstBaseRTPDepayload depayload; + + gboolean interleaved; + guint bundling; + GPtrArray *packets; +}; + +struct _GstRtpQCELPDepayClass +{ + GstBaseRTPDepayloadClass parent_class; +}; + +GType gst_rtp_qcelp_depay_get_type (void); + +gboolean gst_rtp_qcelp_depay_plugin_init (GstPlugin * plugin); + +G_END_DECLS + +#endif /* __GST_RTP_QCELP_DEPAY_H__ */ -- 2.7.4