/* 
 * FreeSWITCH Modular Media Switching Software Library / Soft-Switch Application
 * Copyright (C) 2005/2006, Anthony Minessale II <anthmct@yahoo.com>
 *
 * Version: MPL 1.1
 *
 * The contents of this file are subject to the Mozilla Public License Version
 * 1.1 (the "License"); you may not use this file except in compliance with
 * the License. You may obtain a copy of the License at
 * http://www.mozilla.org/MPL/
 *
 * Software distributed under the License is distributed on an "AS IS" basis,
 * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
 * for the specific language governing rights and limitations under the
 * License.
 *
 * The Original Code is FreeSWITCH Modular Media Switching Software Library / Soft-Switch Application
 *
 * The Initial Developer of the Original Code is
 * Anthony Minessale II <anthmct@yahoo.com>
 * Portions created by the Initial Developer are Copyright (C)
 * the Initial Developer. All Rights Reserved.
 *
 * Contributor(s):
 * 
 * Anthony Minessale II <anthmct@yahoo.com>
 * Michael Jerris <mike@jerris.com>
 *
 * mod_codec_g729.c -- G729 Codec Module
 *
 */  
#include "switch.h"
#include "g729.h"

static const char modname[] = "mod_codec_g729";


struct g729_context {
	
struct dec_state decoder_object;
	         
struct cod_state encoder_object;
         
};


static switch_status switch_g729_init(switch_codec *codec, switch_codec_flag flags,
										const struct switch_codec_settings *codec_settings) 
{
	
struct g729_context *context = NULL;
	
int encoding, decoding;
	

encoding = (flags & SWITCH_CODEC_FLAG_ENCODE);
	
decoding = (flags & SWITCH_CODEC_FLAG_DECODE);
	

if (!(encoding || decoding) || (!(context = switch_core_alloc(codec->memory_pool, sizeof(struct g729_context))))) {
		
return SWITCH_STATUS_FALSE;
	
} else {
		
if (encoding) {
			
g729_init_coder(&context->encoder_object, 0);
		
}
		
if (decoding) {
			
g729_init_decoder(&context->decoder_object);
		
}
		

codec->private = context;
		

return SWITCH_STATUS_SUCCESS;
	
}

}


static switch_status switch_g729_destroy(switch_codec *codec) 
{
	
codec->private = NULL;
	
return SWITCH_STATUS_SUCCESS;

}



static switch_status switch_g729_encode(switch_codec *codec, 
switch_codec *other_codec, 
void *decoded_data,
										   
size_t decoded_data_len, 
int decoded_rate, 
void *encoded_data,
										   
size_t *encoded_data_len, 
int *encoded_rate, 
unsigned int *flag) 
{
	
struct g729_context *context = codec->private;
	
int cbret = 0;
	

if (!context) {
		
return SWITCH_STATUS_FALSE;
	
}
	
if (decoded_data_len % 160 == 0) {
		
unsigned int new_len = 0;
		
INT16 * ddp = decoded_data;
		
char *edp = encoded_data;
		
int x;
		
int loops = (int) decoded_data_len / 160;
		

for (x = 0; x < loops && new_len < *encoded_data_len; x++) {
			
g729_coder(&context->encoder_object, ddp, edp, &cbret);
			
edp += 10;
			
ddp += 80;
			
new_len += 10;
		
}
		
if (new_len <= *encoded_data_len) {
			
*encoded_data_len = new_len;
		
} else {
			
switch_console_printf(SWITCH_CHANNEL_CONSOLE, "buffer overflow!!! %u >= %u\n", new_len, *encoded_data_len);
			
return SWITCH_STATUS_FALSE;
		
}
	
}
	
return SWITCH_STATUS_SUCCESS;

}



static switch_status switch_g729_decode(switch_codec *codec, 
switch_codec *other_codec, 
void *encoded_data,
										   
size_t encoded_data_len, 
int encoded_rate, 
void *decoded_data,
										   
size_t *decoded_data_len, 
int *decoded_rate, 
unsigned int *flag) 
{
	
struct g729_context *context = codec->private;
	

if (!context) {
		
return SWITCH_STATUS_FALSE;
	
}
	


if (encoded_data_len % 10 == 0) {
		
int loops = (int) encoded_data_len / 10;
		
char *edp = encoded_data;
		
short *ddp = decoded_data;
		
int x;
		
unsigned int new_len = 0;
		
for (x = 0; x < loops && new_len < *decoded_data_len; x++) {
			
g729_decoder(&context->decoder_object, ddp, edp, 10);
			
ddp += 80;
			
edp += 10;
			
new_len += 160;
		
}
		
if (new_len <= *decoded_data_len) {
			
*decoded_data_len = new_len;
		
} else {
			
switch_console_printf(SWITCH_CHANNEL_CONSOLE, "buffer overflow!!!\n");
			
return SWITCH_STATUS_FALSE;
		
}
	
} else {
		
switch_console_printf(SWITCH_CHANNEL_CONSOLE, "yo this frame is an odd size [%d]\n", encoded_data_len);
	
}
	


return SWITCH_STATUS_SUCCESS;

}



/* Registration */ 

static const switch_codec_implementation g729_8k_implementation = { 
		/*.samples_per_second */ 8000, 
		/*.bits_per_second */ 64000, 
		/*.microseconds_per_frame */ 20000, 
		/*.samples_per_frame */ 160, 
		/*.bytes_per_frame */ 320, 
		/*.encoded_bytes_per_frame */ 20, 
		/*.number_of_channels */ 1, 
		/*.pref_frames_per_packet */ 1, 
		/*.max_frames_per_packet */ 24, 
		/*.init */ switch_g729_init, 
		/*.encode */ switch_g729_encode, 
		/*.decode */ switch_g729_decode, 
		/*.destroy */ switch_g729_destroy, 
};


static const switch_codec_interface g729_codec_interface = { 
		/*.interface_name */ "g729", 
		/*.codec_type */ SWITCH_CODEC_TYPE_AUDIO, 
		/*.ianacode */ 18, 
		/*.iananame */ "G729", 
		/*.implementations */ &g729_8k_implementation, 
};


static switch_loadable_module_interface g729_module_interface = { 
		/*.module_name */ modname, 
		/*.endpoint_interface */ NULL, 
		/*.timer_interface */ NULL, 
		/*.dialplan_interface */ NULL, 
		/*.codec_interface */ &g729_codec_interface, 
		/*.application_interface */ NULL 
};



SWITCH_MOD_DECLARE(switch_status) switch_module_load(const switch_loadable_module_interface **interface,
														char *filename)
{
	
		/* connect my internal structure to the blank pointer passed to me */ 
		*interface = &g729_module_interface;
	

		/* indicate that the module should continue to be loaded */ 
		return SWITCH_STATUS_SUCCESS;

}