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