libmpcodecs/ae_twolame.c

   1 /*
   2  * This file is part of MPlayer.
   3  *
   4  * MPlayer is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * MPlayer 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
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17  */
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <inttypes.h>
  22 #include <unistd.h>
  23 #include <string.h>
  24 #include <sys/types.h>
  25 #include "m_option.h"
  26 #include "mp_msg.h"
  27 #include "libmpdemux/aviheader.h"
  28 #include "libaf/af_format.h"
  29 #include "libmpdemux/ms_hdr.h"
  30 #include "stream/stream.h"
  31 #include "libmpdemux/muxer.h"
  32 #include "ae_twolame.h"
  33 #include "libmpdemux/mp3_hdr.h"
  34
  35
  36 static int
  37     param_bitrate = 192,
  38     param_psy = 3,
  39     param_maxvbr = 0,
  40     param_errprot = 0,
  41     param_debug = 0;
  42
  43 static float param_vbr = 0;
  44 static char *param_mode = "stereo";
  45
  46 const m_option_t twolameopts_conf[] = {
  47         {"br", &param_bitrate, CONF_TYPE_INT, 0, 0, 0, NULL},
  48         {"mode", &param_mode, CONF_TYPE_STRING, 0, 0, 0, NULL},
  49         {"psy", &param_psy, CONF_TYPE_INT, CONF_RANGE, -1, 4, NULL},
  50         {"vbr", &param_vbr, CONF_TYPE_FLOAT, CONF_RANGE, -50, 50, NULL},
  51         {"maxvbr", &param_maxvbr, CONF_TYPE_INT, 0, 0, 0, NULL},
  52         {"errprot", &param_errprot, CONF_TYPE_INT, CONF_RANGE, 0, 1, NULL},
  53         {"debug", &param_debug, CONF_TYPE_INT, CONF_RANGE, 0, 100000000, NULL},
  54         {NULL, NULL, 0, 0, 0, 0, NULL}
  55 };
  56
  57
  58 static int bind_twolame(audio_encoder_t *encoder, muxer_stream_t *mux_a)
  59 {
  60         mpae_twolame_ctx *ctx = encoder->priv;
  61
  62         mux_a->wf = malloc(sizeof(WAVEFORMATEX)+256);
  63         mux_a->wf->wFormatTag = 0x50;
  64         mux_a->wf->nChannels = encoder->params.channels;
  65         mux_a->wf->nSamplesPerSec = encoder->params.sample_rate;
  66         mux_a->wf->nAvgBytesPerSec = encoder->params.bitrate / 8;
  67
  68         if(ctx->vbr || ((mux_a->wf->nAvgBytesPerSec * encoder->params.samples_per_frame) % mux_a->wf->nSamplesPerSec))
  69         {
  70                 mux_a->h.dwScale = encoder->params.samples_per_frame;
  71                 mux_a->h.dwRate = encoder->params.sample_rate;
  72                 mux_a->h.dwSampleSize = 0; // Blocksize not constant
  73         }
  74         else
  75         {
  76                 mux_a->h.dwScale = (mux_a->wf->nAvgBytesPerSec * encoder->params.samples_per_frame)/ mux_a->wf->nSamplesPerSec; /* for cbr */
  77                 mux_a->h.dwRate = mux_a->wf->nAvgBytesPerSec;
  78                 mux_a->h.dwSampleSize = mux_a->h.dwScale;
  79         }
  80         mux_a->wf->nBlockAlign = mux_a->h.dwScale;
  81         mux_a->h.dwSuggestedBufferSize = (encoder->params.audio_preload*mux_a->wf->nAvgBytesPerSec)/1000;
  82         mux_a->h.dwSuggestedBufferSize -= mux_a->h.dwSuggestedBufferSize % mux_a->wf->nBlockAlign;
  83
  84         mux_a->wf->cbSize = 0; //12;
  85         mux_a->wf->wBitsPerSample = 0; /* does not apply */
  86         ((MPEGLAYER3WAVEFORMAT *) (mux_a->wf))->wID = 1;
  87         ((MPEGLAYER3WAVEFORMAT *) (mux_a->wf))->fdwFlags = 2;
  88         ((MPEGLAYER3WAVEFORMAT *) (mux_a->wf))->nBlockSize = mux_a->wf->nBlockAlign;
  89         ((MPEGLAYER3WAVEFORMAT *) (mux_a->wf))->nFramesPerBlock = 1;
  90         ((MPEGLAYER3WAVEFORMAT *) (mux_a->wf))->nCodecDelay = 0;
  91
  92         // Fix allocation
  93         mux_a->wf = realloc(mux_a->wf, sizeof(WAVEFORMATEX)+mux_a->wf->cbSize);
  94
  95         encoder->input_format = AF_FORMAT_S16_NE;
  96         encoder->min_buffer_size = mux_a->h.dwSuggestedBufferSize;
  97         encoder->max_buffer_size = mux_a->h.dwSuggestedBufferSize*2;
  98
  99         return 1;
 100 }
 101
 102 static int encode_twolame(audio_encoder_t *encoder, uint8_t *dest, void *src, int len, int max_size)
 103 {
 104         mpae_twolame_ctx *ctx = encoder->priv;
 105         int ret_size = 0, r2;
 106
 107         len /= (2*encoder->params.channels);
 108         ret_size = twolame_encode_buffer_interleaved(ctx->twolame_ctx, src, len, dest, max_size);
 109         r2 = mp_decode_mp3_header(dest);
 110         mp_msg(MSGT_MENCODER, MSGL_DBG2, "\nSIZE: %d, max: %d, r2: %d\n", ret_size, max_size, r2);
 111         if(r2 > 0)
 112                 ret_size = r2;
 113         return ret_size;
 114 }
 115
 116 static int close_twolame(audio_encoder_t *encoder)
 117 {
 118         free(encoder->priv);
 119         return 1;
 120 }
 121
 122 static int get_frame_size(audio_encoder_t *encoder)
 123 {
 124         int sz;
 125         if(encoder->stream->buffer_len < 4)
 126                 return 0;
 127         sz = mp_decode_mp3_header(encoder->stream->buffer);
 128         if(sz <= 0)
 129                 return 0;
 130         return sz;
 131 }
 132
 133
 134 int mpae_init_twolame(audio_encoder_t *encoder)
 135 {
 136         int mode;
 137         mpae_twolame_ctx *ctx = NULL;
 138
 139         if(encoder->params.channels == 1)
 140         {
 141                 mp_msg(MSGT_MENCODER, MSGL_INFO, "ae_twolame, 1 audio channel, forcing mono mode\n");
 142                 mode = TWOLAME_MONO;
 143         }
 144         else if(encoder->params.channels == 2)
 145         {
 146                 if(! strcasecmp(param_mode, "dual"))
 147                         mode = TWOLAME_DUAL_CHANNEL;
 148                 else if(! strcasecmp(param_mode, "jstereo"))
 149                         mode = TWOLAME_JOINT_STEREO;
 150                 else if(! strcasecmp(param_mode, "stereo"))
 151                         mode = TWOLAME_STEREO;
 152                 else
 153                 {
 154                         mp_msg(MSGT_MENCODER, MSGL_ERR, "ae_twolame, unknown mode %s, exiting\n", param_mode);
 155                 }
 156         }
 157         else
 158                 mp_msg(MSGT_MENCODER, MSGL_ERR, "ae_twolame, Twolame can't encode > 2 channels, exiting\n");
 159
 160         ctx = calloc(1, sizeof(mpae_twolame_ctx));
 161         if(ctx == NULL)
 162         {
 163                 mp_msg(MSGT_MENCODER, MSGL_ERR, "ae_twolame, couldn't alloc a %d bytes context, exiting\n", sizeof(mpae_twolame_ctx));
 164                 return 0;
 165         }
 166
 167         ctx->twolame_ctx = twolame_init();
 168         if(ctx->twolame_ctx == NULL)
 169         {
 170                 mp_msg(MSGT_MENCODER, MSGL_ERR, "ae_twolame, couldn't initial parameters from libtwolame, exiting\n");
 171                 free(ctx);
 172                 return 0;
 173         }
 174         ctx->vbr = 0;
 175
 176         if(twolame_set_num_channels(ctx->twolame_ctx, encoder->params.channels) != 0)
 177                 return 0;
 178         if(twolame_set_mode(ctx->twolame_ctx, mode) != 0)
 179                 return 0;
 180
 181         if(twolame_set_in_samplerate(ctx->twolame_ctx, encoder->params.sample_rate) != 0)
 182                 return 0;
 183
 184         if(twolame_set_out_samplerate(ctx->twolame_ctx, encoder->params.sample_rate) != 0)
 185                 return 0;
 186
 187         if(encoder->params.sample_rate < 32000)
 188                 twolame_set_version(ctx->twolame_ctx, TWOLAME_MPEG2);
 189         else
 190                 twolame_set_version(ctx->twolame_ctx, TWOLAME_MPEG1);
 191
 192         if(twolame_set_psymodel(ctx->twolame_ctx, param_psy) != 0)
 193                 return 0;
 194
 195         if(twolame_set_bitrate(ctx->twolame_ctx, param_bitrate) != 0)
 196                 return 0;
 197
 198         if(param_errprot)
 199                 if(twolame_set_error_protection(ctx->twolame_ctx, TRUE) != 0)
 200                         return 0;
 201
 202         if(param_vbr != 0)
 203         {
 204                 if(twolame_set_VBR(ctx->twolame_ctx, TRUE) != 0)
 205                         return 0;
 206                 if(twolame_set_VBR_q(ctx->twolame_ctx, param_vbr) != 0)
 207                         return 0;
 208                 if(twolame_set_padding(ctx->twolame_ctx, FALSE) != 0)
 209                         return 0;
 210                 if(param_maxvbr)
 211                 {
 212                         if(twolame_set_VBR_max_bitrate_kbps(ctx->twolame_ctx, param_maxvbr) != 0)
 213                                 return 0;
 214                 }
 215                 ctx->vbr = 1;
 216         }
 217
 218         if(twolame_set_verbosity(ctx->twolame_ctx, param_debug) != 0)
 219                 return 0;
 220
 221         if(twolame_init_params(ctx->twolame_ctx) != 0)
 222                 return 0;
 223
 224         encoder->params.bitrate = param_bitrate * 1000;
 225         encoder->params.samples_per_frame = 1152;
 226         encoder->priv = ctx;
 227         encoder->decode_buffer_size = 1152 * 2 * encoder->params.channels;
 228
 229         encoder->bind = bind_twolame;
 230         encoder->get_frame_size = get_frame_size;
 231         encoder->encode = encode_twolame;
 232         encoder->close = close_twolame;
 233
 234         return 1;
 235 }