gst/law/alaw-encode.c

   1 /* GStreamer PCM to A-Law conversion
   2  * Copyright (C) 2000 by Abramo Bagnara <abramo@alsa-project.org>
   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.1 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., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19 /**
  20  * SECTION:element-alawenc
  21  *
  22  * This element encode alaw audio. Alaw coding is also known as G.711.
  23  */
  24
  25 #ifdef HAVE_CONFIG_H
  26 #include "config.h"
  27 #endif
  28
  29 #include "alaw-encode.h"
  30
  31 GST_DEBUG_CATEGORY_STATIC (alaw_enc_debug);
  32 #define GST_CAT_DEFAULT alaw_enc_debug
  33
  34 extern GstStaticPadTemplate alaw_enc_src_factory;
  35 extern GstStaticPadTemplate alaw_enc_sink_factory;
  36
  37 static gboolean gst_alaw_enc_event (GstPad * pad, GstObject * parent,
  38     GstEvent * event);
  39 static GstFlowReturn gst_alaw_enc_chain (GstPad * pad, GstObject * parent,
  40     GstBuffer * buffer);
  41
  42 G_DEFINE_TYPE (GstALawEnc, gst_alaw_enc, GST_TYPE_ELEMENT);
  43
  44 /* some day we might have defines in gstconfig.h that tell us about the
  45  * desired cpu/memory/binary size trade-offs */
  46 #define GST_ALAW_ENC_USE_TABLE
  47
  48 #ifdef GST_ALAW_ENC_USE_TABLE
  49
  50 static const guint8 alaw_encode[2048 + 1] = {
  51   0xd5, 0xd4, 0xd7, 0xd6, 0xd1, 0xd0, 0xd3, 0xd2, 0xdd, 0xdc, 0xdf, 0xde,
  52   0xd9, 0xd8, 0xdb, 0xda, 0xc5, 0xc4, 0xc7, 0xc6, 0xc1, 0xc0, 0xc3, 0xc2,
  53   0xcd, 0xcc, 0xcf, 0xce, 0xc9, 0xc8, 0xcb, 0xca, 0xf5, 0xf5, 0xf4, 0xf4,
  54   0xf7, 0xf7, 0xf6, 0xf6, 0xf1, 0xf1, 0xf0, 0xf0, 0xf3, 0xf3, 0xf2, 0xf2,
  55   0xfd, 0xfd, 0xfc, 0xfc, 0xff, 0xff, 0xfe, 0xfe, 0xf9, 0xf9, 0xf8, 0xf8,
  56   0xfb, 0xfb, 0xfa, 0xfa, 0xe5, 0xe5, 0xe5, 0xe5, 0xe4, 0xe4, 0xe4, 0xe4,
  57   0xe7, 0xe7, 0xe7, 0xe7, 0xe6, 0xe6, 0xe6, 0xe6, 0xe1, 0xe1, 0xe1, 0xe1,
  58   0xe0, 0xe0, 0xe0, 0xe0, 0xe3, 0xe3, 0xe3, 0xe3, 0xe2, 0xe2, 0xe2, 0xe2,
  59   0xed, 0xed, 0xed, 0xed, 0xec, 0xec, 0xec, 0xec, 0xef, 0xef, 0xef, 0xef,
  60   0xee, 0xee, 0xee, 0xee, 0xe9, 0xe9, 0xe9, 0xe9, 0xe8, 0xe8, 0xe8, 0xe8,
  61   0xeb, 0xeb, 0xeb, 0xeb, 0xea, 0xea, 0xea, 0xea, 0x95, 0x95, 0x95, 0x95,
  62   0x95, 0x95, 0x95, 0x95, 0x94, 0x94, 0x94, 0x94, 0x94, 0x94, 0x94, 0x94,
  63   0x97, 0x97, 0x97, 0x97, 0x97, 0x97, 0x97, 0x97, 0x96, 0x96, 0x96, 0x96,
  64   0x96, 0x96, 0x96, 0x96, 0x91, 0x91, 0x91, 0x91, 0x91, 0x91, 0x91, 0x91,
  65   0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x90, 0x93, 0x93, 0x93, 0x93,
  66   0x93, 0x93, 0x93, 0x93, 0x92, 0x92, 0x92, 0x92, 0x92, 0x92, 0x92, 0x92,
  67   0x9d, 0x9d, 0x9d, 0x9d, 0x9d, 0x9d, 0x9d, 0x9d, 0x9c, 0x9c, 0x9c, 0x9c,
  68   0x9c, 0x9c, 0x9c, 0x9c, 0x9f, 0x9f, 0x9f, 0x9f, 0x9f, 0x9f, 0x9f, 0x9f,
  69   0x9e, 0x9e, 0x9e, 0x9e, 0x9e, 0x9e, 0x9e, 0x9e, 0x99, 0x99, 0x99, 0x99,
  70   0x99, 0x99, 0x99, 0x99, 0x98, 0x98, 0x98, 0x98, 0x98, 0x98, 0x98, 0x98,
  71   0x9b, 0x9b, 0x9b, 0x9b, 0x9b, 0x9b, 0x9b, 0x9b, 0x9a, 0x9a, 0x9a, 0x9a,
  72   0x9a, 0x9a, 0x9a, 0x9a, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85,
  73   0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x84, 0x84, 0x84, 0x84,
  74   0x84, 0x84, 0x84, 0x84, 0x84, 0x84, 0x84, 0x84, 0x84, 0x84, 0x84, 0x84,
  75   0x87, 0x87, 0x87, 0x87, 0x87, 0x87, 0x87, 0x87, 0x87, 0x87, 0x87, 0x87,
  76   0x87, 0x87, 0x87, 0x87, 0x86, 0x86, 0x86, 0x86, 0x86, 0x86, 0x86, 0x86,
  77   0x86, 0x86, 0x86, 0x86, 0x86, 0x86, 0x86, 0x86, 0x81, 0x81, 0x81, 0x81,
  78   0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81,
  79   0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80, 0x80,
  80   0x80, 0x80, 0x80, 0x80, 0x83, 0x83, 0x83, 0x83, 0x83, 0x83, 0x83, 0x83,
  81   0x83, 0x83, 0x83, 0x83, 0x83, 0x83, 0x83, 0x83, 0x82, 0x82, 0x82, 0x82,
  82   0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x82, 0x82,
  83   0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d, 0x8d,
  84   0x8d, 0x8d, 0x8d, 0x8d, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c,
  85   0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8c, 0x8f, 0x8f, 0x8f, 0x8f,
  86   0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f,
  87   0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e, 0x8e,
  88   0x8e, 0x8e, 0x8e, 0x8e, 0x89, 0x89, 0x89, 0x89, 0x89, 0x89, 0x89, 0x89,
  89   0x89, 0x89, 0x89, 0x89, 0x89, 0x89, 0x89, 0x89, 0x88, 0x88, 0x88, 0x88,
  90   0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88, 0x88,
  91   0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b, 0x8b,
  92   0x8b, 0x8b, 0x8b, 0x8b, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a,
  93   0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0x8a, 0xb5, 0xb5, 0xb5, 0xb5,
  94   0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5,
  95   0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5, 0xb5,
  96   0xb5, 0xb5, 0xb5, 0xb5, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4,
  97   0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4,
  98   0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4, 0xb4,
  99   0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7,
 100   0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7,
 101   0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb7, 0xb6, 0xb6, 0xb6, 0xb6,
 102   0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6,
 103   0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6, 0xb6,
 104   0xb6, 0xb6, 0xb6, 0xb6, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1,
 105   0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1,
 106   0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1, 0xb1,
 107   0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0,
 108   0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0,
 109   0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb0, 0xb3, 0xb3, 0xb3, 0xb3,
 110   0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3,
 111   0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3, 0xb3,
 112   0xb3, 0xb3, 0xb3, 0xb3, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2,
 113   0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2,
 114   0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2, 0xb2,
 115   0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd,
 116   0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd,
 117   0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbd, 0xbc, 0xbc, 0xbc, 0xbc,
 118   0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc,
 119   0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc, 0xbc,
 120   0xbc, 0xbc, 0xbc, 0xbc, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf,
 121   0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf,
 122   0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf, 0xbf,
 123   0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe,
 124   0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe,
 125   0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xbe, 0xb9, 0xb9, 0xb9, 0xb9,
 126   0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9,
 127   0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9, 0xb9,
 128   0xb9, 0xb9, 0xb9, 0xb9, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8,
 129   0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8,
 130   0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8, 0xb8,
 131   0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb,
 132   0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb,
 133   0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xbb, 0xba, 0xba, 0xba, 0xba,
 134   0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba,
 135   0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba, 0xba,
 136   0xba, 0xba, 0xba, 0xba, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
 137   0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
 138   0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
 139   0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
 140   0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
 141   0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa4, 0xa4, 0xa4, 0xa4,
 142   0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4,
 143   0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4,
 144   0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4,
 145   0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4,
 146   0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4, 0xa4,
 147   0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7,
 148   0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7,
 149   0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7,
 150   0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7,
 151   0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7, 0xa7,
 152   0xa7, 0xa7, 0xa7, 0xa7, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6,
 153   0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6,
 154   0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6,
 155   0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6,
 156   0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6,
 157   0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa6, 0xa1, 0xa1, 0xa1, 0xa1,
 158   0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1,
 159   0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1,
 160   0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1,
 161   0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1,
 162   0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1, 0xa1,
 163   0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0,
 164   0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0,
 165   0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0,
 166   0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0,
 167   0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0, 0xa0,
 168   0xa0, 0xa0, 0xa0, 0xa0, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3,
 169   0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3,
 170   0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3,
 171   0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3,
 172   0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3,
 173   0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa3, 0xa2, 0xa2, 0xa2, 0xa2,
 174   0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2,
 175   0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2,
 176   0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2,
 177   0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2,
 178   0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2, 0xa2,
 179   0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad,
 180   0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad,
 181   0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad,
 182   0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad,
 183   0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad, 0xad,
 184   0xad, 0xad, 0xad, 0xad, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac,
 185   0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac,
 186   0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac,
 187   0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac,
 188   0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac,
 189   0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xac, 0xaf, 0xaf, 0xaf, 0xaf,
 190   0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
 191   0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
 192   0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
 193   0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
 194   0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
 195   0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae,
 196   0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae,
 197   0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae,
 198   0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae,
 199   0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae, 0xae,
 200   0xae, 0xae, 0xae, 0xae, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9,
 201   0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9,
 202   0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9,
 203   0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9,
 204   0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9,
 205   0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa9, 0xa8, 0xa8, 0xa8, 0xa8,
 206   0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8,
 207   0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8,
 208   0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8,
 209   0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8,
 210   0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8, 0xa8,
 211   0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab,
 212   0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab,
 213   0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab,
 214   0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab,
 215   0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab, 0xab,
 216   0xab, 0xab, 0xab, 0xab, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
 217   0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
 218   0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
 219   0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
 220   0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
 221   0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0x2a
 222 };
 223
 224 static inline guint8
 225 s16_to_alaw (gint16 pcm_val)
 226 {
 227   if (pcm_val >= 0)
 228     return alaw_encode[pcm_val / 16];
 229   else
 230     return (0x7F & alaw_encode[pcm_val / -16]);
 231 }
 232
 233 #else /* GST_ALAW_ENC_USE_TABLE */
 234
 235 /*
 236  * s16_to_alaw() - Convert a 16-bit linear PCM value to 8-bit A-law
 237  *
 238  * s16_to_alaw() accepts an 16-bit integer and encodes it as A-law data.
 239  *
 240  *              Linear Input Code       Compressed Code
 241  *      ------------------------        ---------------
 242  *      0000000wxyza                    000wxyz
 243  *      0000001wxyza                    001wxyz
 244  *      000001wxyzab                    010wxyz
 245  *      00001wxyzabc                    011wxyz
 246  *      0001wxyzabcd                    100wxyz
 247  *      001wxyzabcde                    101wxyz
 248  *      01wxyzabcdef                    110wxyz
 249  *      1wxyzabcdefg                    111wxyz
 250  *
 251  * For further information see John C. Bellamy's Digital Telephony, 1982,
 252  * John Wiley & Sons, pps 98-111 and 472-476.
 253  */
 254
 255 static inline gint
 256 val_seg (gint val)
 257 {
 258   gint r = 1;
 259
 260   val >>= 8;
 261   if (val & 0xf0) {
 262     val >>= 4;
 263     r += 4;
 264   }
 265   if (val & 0x0c) {
 266     val >>= 2;
 267     r += 2;
 268   }
 269   if (val & 0x02)
 270     r += 1;
 271   return r;
 272 }
 273
 274 static inline guint8
 275 s16_to_alaw (gint pcm_val)
 276 {
 277   gint seg;
 278   guint8 mask;
 279   guint8 aval;
 280
 281   if (pcm_val >= 0) {
 282     mask = 0xD5;
 283   } else {
 284     mask = 0x55;
 285     pcm_val = -pcm_val;
 286     if (pcm_val > 0x7fff)
 287       pcm_val = 0x7fff;
 288   }
 289
 290   if (pcm_val < 256)
 291     aval = pcm_val >> 4;
 292   else {
 293     /* Convert the scaled magnitude to segment number. */
 294     seg = val_seg (pcm_val);
 295     aval = (seg << 4) | ((pcm_val >> (seg + 3)) & 0x0f);
 296   }
 297   return aval ^ mask;
 298 }
 299
 300 #endif /* GST_ALAW_ENC_USE_TABLE */
 301
 302 static GstCaps *
 303 gst_alaw_enc_getcaps (GstPad * pad, GstCaps * filter)
 304 {
 305   GstALawEnc *alawenc;
 306   GstPad *otherpad;
 307   GstCaps *othercaps, *result;
 308   const GstCaps *templ;
 309   const gchar *name;
 310   gint i;
 311
 312   alawenc = GST_ALAW_ENC (GST_PAD_PARENT (pad));
 313
 314   /* figure out the name of the caps we are going to return */
 315   if (pad == alawenc->srcpad) {
 316     name = "audio/x-alaw";
 317     otherpad = alawenc->sinkpad;
 318   } else {
 319     name = "audio/x-raw-int";
 320     otherpad = alawenc->srcpad;
 321   }
 322   /* get caps from the peer, this can return NULL when there is no peer */
 323   othercaps = gst_pad_peer_query_caps (otherpad, filter);
 324
 325   /* get the template caps to make sure we return something acceptable */
 326   templ = gst_pad_get_pad_template_caps (pad);
 327
 328   if (othercaps) {
 329     /* there was a peer */
 330     othercaps = gst_caps_make_writable (othercaps);
 331
 332     /* go through the caps and remove the fields we don't want */
 333     for (i = 0; i < gst_caps_get_size (othercaps); i++) {
 334       GstStructure *structure;
 335
 336       structure = gst_caps_get_structure (othercaps, i);
 337
 338       /* adjust the name */
 339       gst_structure_set_name (structure, name);
 340
 341       if (pad == alawenc->srcpad) {
 342         /* remove the fields we don't want */
 343         gst_structure_remove_fields (structure, "width", "depth", "endianness",
 344             "signed", NULL);
 345       } else {
 346         /* add fixed fields */
 347         gst_structure_set (structure, "width", G_TYPE_INT, 16,
 348             "depth", G_TYPE_INT, 16,
 349             "endianness", G_TYPE_INT, G_BYTE_ORDER,
 350             "signed", G_TYPE_BOOLEAN, TRUE, NULL);
 351       }
 352     }
 353     /* filter against the allowed caps of the pad to return our result */
 354     result = gst_caps_intersect (othercaps, templ);
 355     gst_caps_unref (othercaps);
 356   } else {
 357     /* there was no peer, return the template caps */
 358     result = gst_caps_copy (templ);
 359   }
 360
 361   return result;
 362 }
 363
 364 static gboolean
 365 gst_alaw_enc_query (GstPad * pad, GstObject * parent, GstQuery * query)
 366 {
 367   gboolean res;
 368
 369   switch (GST_QUERY_TYPE (query)) {
 370     case GST_QUERY_CAPS:
 371     {
 372       GstCaps *filter, *caps;
 373
 374       gst_query_parse_caps (query, &filter);
 375       caps = gst_alaw_enc_getcaps (pad, filter);
 376       gst_query_set_caps_result (query, caps);
 377       gst_caps_unref (caps);
 378
 379       res = TRUE;
 380       break;
 381     }
 382     default:
 383       res = gst_pad_query_default (pad, parent, query);
 384       break;
 385   }
 386   return res;
 387 }
 388
 389 static gboolean
 390 gst_alaw_enc_setcaps (GstALawEnc * alawenc, GstCaps * caps)
 391 {
 392   GstStructure *structure;
 393   gboolean ret;
 394   GstCaps *base_caps;
 395
 396   structure = gst_caps_get_structure (caps, 0);
 397   gst_structure_get_int (structure, "channels", &alawenc->channels);
 398   gst_structure_get_int (structure, "rate", &alawenc->rate);
 399
 400   base_caps = gst_caps_copy (gst_pad_get_pad_template_caps (alawenc->srcpad));
 401   structure = gst_caps_get_structure (base_caps, 0);
 402   gst_structure_set (structure, "rate", G_TYPE_INT, alawenc->rate, NULL);
 403   gst_structure_set (structure, "channels", G_TYPE_INT, alawenc->channels,
 404       NULL);
 405
 406   GST_DEBUG_OBJECT (alawenc, "rate=%d, channels=%d", alawenc->rate,
 407       alawenc->channels);
 408
 409   ret = gst_pad_set_caps (alawenc->srcpad, base_caps);
 410
 411   gst_caps_unref (base_caps);
 412
 413   return ret;
 414 }
 415
 416 static void
 417 gst_alaw_enc_class_init (GstALawEncClass * klass)
 418 {
 419   GstElementClass *element_class = GST_ELEMENT_CLASS (klass);
 420
 421   gst_element_class_add_pad_template (element_class,
 422       gst_static_pad_template_get (&alaw_enc_src_factory));
 423   gst_element_class_add_pad_template (element_class,
 424       gst_static_pad_template_get (&alaw_enc_sink_factory));
 425
 426   gst_element_class_set_details_simple (element_class,
 427       "A Law audio encoder", "Codec/Encoder/Audio",
 428       "Convert 16bit PCM to 8bit A law",
 429       "Zaheer Abbas Merali <zaheerabbas at merali dot org>");
 430
 431   GST_DEBUG_CATEGORY_INIT (alaw_enc_debug, "alawenc", 0, "A Law audio encoder");
 432 }
 433
 434 static void
 435 gst_alaw_enc_init (GstALawEnc * alawenc)
 436 {
 437   alawenc->sinkpad =
 438       gst_pad_new_from_static_template (&alaw_enc_sink_factory, "sink");
 439   gst_pad_set_query_function (alawenc->sinkpad,
 440       GST_DEBUG_FUNCPTR (gst_alaw_enc_query));
 441   gst_pad_set_event_function (alawenc->sinkpad,
 442       GST_DEBUG_FUNCPTR (gst_alaw_enc_event));
 443   gst_pad_set_chain_function (alawenc->sinkpad,
 444       GST_DEBUG_FUNCPTR (gst_alaw_enc_chain));
 445   gst_element_add_pad (GST_ELEMENT (alawenc), alawenc->sinkpad);
 446
 447   alawenc->srcpad =
 448       gst_pad_new_from_static_template (&alaw_enc_src_factory, "src");
 449   gst_pad_set_query_function (alawenc->srcpad,
 450       GST_DEBUG_FUNCPTR (gst_alaw_enc_query));
 451   gst_pad_use_fixed_caps (alawenc->srcpad);
 452   gst_element_add_pad (GST_ELEMENT (alawenc), alawenc->srcpad);
 453
 454   /* init rest */
 455   alawenc->channels = 0;
 456   alawenc->rate = 0;
 457 }
 458
 459 static gboolean
 460 gst_alaw_enc_event (GstPad * pad, GstObject * parent, GstEvent * event)
 461 {
 462   GstALawEnc *alawenc;
 463   gboolean res;
 464
 465   alawenc = GST_ALAW_ENC (parent);
 466
 467   switch (GST_EVENT_TYPE (event)) {
 468     case GST_EVENT_CAPS:
 469     {
 470       GstCaps *caps;
 471
 472       gst_event_parse_caps (event, &caps);
 473       gst_alaw_enc_setcaps (alawenc, caps);
 474       gst_event_unref (event);
 475
 476       res = TRUE;
 477       break;
 478     }
 479     default:
 480       res = gst_pad_event_default (pad, parent, event);
 481       break;
 482   }
 483   return res;
 484 }
 485
 486 static GstFlowReturn
 487 gst_alaw_enc_chain (GstPad * pad, GstObject * parent, GstBuffer * buffer)
 488 {
 489   GstALawEnc *alawenc;
 490   gint16 *linear_data;
 491   gsize linear_size;
 492   guint8 *alaw_data;
 493   guint alaw_size;
 494   GstBuffer *outbuf;
 495   gint i;
 496   GstFlowReturn ret;
 497   GstClockTime timestamp, duration;
 498
 499   alawenc = GST_ALAW_ENC (parent);
 500
 501   if (G_UNLIKELY (alawenc->rate == 0 || alawenc->channels == 0))
 502     goto not_negotiated;
 503
 504   linear_data = gst_buffer_map (buffer, &linear_size, NULL, GST_MAP_READ);
 505
 506   alaw_size = linear_size / 2;
 507
 508   timestamp = GST_BUFFER_TIMESTAMP (buffer);
 509   duration = GST_BUFFER_DURATION (buffer);
 510
 511   GST_LOG_OBJECT (alawenc, "buffer with ts=%" GST_TIME_FORMAT,
 512       GST_TIME_ARGS (timestamp));
 513
 514   outbuf = gst_buffer_new_allocate (NULL, alaw_size, 0);
 515
 516   if (duration == GST_CLOCK_TIME_NONE) {
 517     duration = gst_util_uint64_scale_int (alaw_size,
 518         GST_SECOND, alawenc->rate * alawenc->channels);
 519   }
 520
 521   alaw_data = gst_buffer_map (outbuf, NULL, NULL, GST_MAP_WRITE);
 522
 523   /* copy discont flag */
 524   if (GST_BUFFER_FLAG_IS_SET (buffer, GST_BUFFER_FLAG_DISCONT))
 525     GST_BUFFER_FLAG_SET (outbuf, GST_BUFFER_FLAG_DISCONT);
 526
 527   GST_BUFFER_TIMESTAMP (outbuf) = timestamp;
 528   GST_BUFFER_DURATION (outbuf) = duration;
 529
 530   for (i = 0; i < alaw_size; i++) {
 531     alaw_data[i] = s16_to_alaw (linear_data[i]);
 532   }
 533
 534   gst_buffer_unmap (outbuf, alaw_data, -1);
 535   gst_buffer_unmap (buffer, linear_data, -1);
 536   gst_buffer_unref (buffer);
 537
 538   ret = gst_pad_push (alawenc->srcpad, outbuf);
 539
 540   return ret;
 541
 542 not_negotiated:
 543   {
 544     gst_buffer_unref (buffer);
 545     return GST_FLOW_NOT_NEGOTIATED;
 546   }
 547 }