/*
 * Asterisk -- An open source telephony toolkit.
 *
 * Copyright (C) 2006, Digium, Inc.
 * Copyright (C) 2006, Claude Patry
 *
 * See http://www.asterisk.org for more information about
 * the Asterisk project. Please do not directly contact
 * any of the maintainers of this project for assistance;
 * the project provides a web site, mailing lists and IRC
 * channels for your use.
 *
 * This program is free software, distributed under the terms of
 * the GNU General Public License Version 2. See the LICENSE file
 * at the top of the source tree.
 */

/*! \file
 *
 * \brief Generate Random Number
 * 
 * \author Claude Patry <cpatry@gmail.com>
 * \author Tilghman Lesher ( http://asterisk.drunkcoder.com/ )
 */

#include <stdlib.h>
#include <string.h>
#include <sys/types.h>

#include "asterisk.h"

/* ASTERISK_FILE_VERSION(__FILE__, "$Revision: 7682 $") */

#include "asterisk/channel.h"
#include "asterisk/pbx.h"
#include "asterisk/logger.h"
#include "asterisk/utils.h"
#include "asterisk/app.h"
#ifndef BUILTIN_FUNC
#include "asterisk/module.h"
#endif


STANDARD_LOCAL_USER;

LOCAL_USER_DECL;


static char *acf_rand_exec(struct ast_channel *chan, char *cmd, char *data, char *buffer, size_t buflen)
{
	struct localuser *u;
	char *min=NULL;
	char *args=NULL;
	int min_int=0, response_int=0;
	int max_int=RAND_MAX;

	LOCAL_USER_ACF_ADD(u);

	if (!(args = ast_strdupa(data))) {
		ast_log(LOG_WARNING, "Memory Error!\n");
		return NULL;
	}

	min = strsep(&args, "|");

	if (!args || sscanf(args, "%d", &max_int) != 1) {
		max_int = RAND_MAX;
	}
	if (!min || sscanf(min, "%d", &min_int) != 1) {
		min_int = 0;
	}	

	if (ast_strlen_zero(min))
		min="0";
	
	if ( max_int < min_int ) {
		int tmp = max_int;
		ast_log(LOG_DEBUG, "max<min\n");
		max_int = min_int;
		min_int = tmp;
	}
	response_int=  min_int + (random() % (max_int - min_int + 1));
	ast_log(LOG_DEBUG, "%d was the lucky number in range [%d,%d]\n",response_int,min_int,max_int);
	snprintf(buffer, buflen, "%d", response_int);

	LOCAL_USER_REMOVE(u);
	return buffer;
}

#ifndef BUILTIN_FUNC
static
#endif
struct ast_custom_function acf_rand = {
	.name = "RAND",
	.synopsis = "Choose a random number in a range",
	.syntax = "RAND([min][,max])",
	.desc =
"Choose a random number between bornes.\n"
"If no min is provided, 0 will be used\n"
"If no max is provided, RAND_MAX will be used (2147483647 on many systems)\n"
"Examples: exten => 73,1,Set(junky=${RAND(1,8)}); \n"
" Will pickup a random number in [1,8], bornes are include.",
	.read = acf_rand_exec,
};


#ifndef BUILTIN_FUNC

static char *tdesc = "Choose a random number";

int unload_module(void)
{
	ast_custom_function_unregister(&acf_rand);

	STANDARD_HANGUP_LOCALUSERS;

	return 0;
}

int load_module(void)
{
	int res;

	res = ast_custom_function_register(&acf_rand);
	return res;
}

char *description(void)
{
       return tdesc;
}

int usecount(void)
{
	int res;

	STANDARD_USECOUNT(res);

	return res;
}

char *key()
{
       return ASTERISK_GPL_KEY;
}

#endif