/* 
 * 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;
}





