/* 
   Unix SMB/Netbios implementation.
   Version 3.0
   Samba readline wrapper implementation
   Copyright (C) Simo Sorce 2001
   Copyright (C) Andrew Tridgell 2001
   
   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.
   
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   
   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include "includes.h"


/****************************************************************************
display the prompt and wait for input. Call callback() regularly
****************************************************************************/
static char *smb_readline_replacement(char *prompt, void (*callback)(void), 
                                      char **(completion_fn)(char *text, 
                                                             int start, 
                                                             int end))
{
	fd_set fds;
	static pstring line;
	struct timeval timeout;
	int fd = fileno(stdin);
        char *ret;

	x_fprintf(dbf, "%s", prompt);
	x_fflush(dbf);

	while (1) {
		timeout.tv_sec = 5;
		timeout.tv_usec = 0;

		FD_ZERO(&fds);
		FD_SET(fd,&fds);
	
		if (sys_select_intr(fd+1,&fds,&timeout) == 1) {
			ret = fgets(line, sizeof(line), stdin);
			return ret;
		}
		if (callback) callback();
	}
}

/****************************************************************************
display the prompt and wait for input. Call callback() regularly
****************************************************************************/
char *smb_readline(char *prompt, void (*callback)(void), 
		   char **(completion_fn)(char *text, int start, int end))
{
#if HAVE_LIBREADLINE
	char *ret;

        /* Aargh!  Readline does bizzare things with the terminal width
           that mucks up expect(1).  Set CLI_NO_READLINE in the environment
           to force readline not to be used. */

        if (getenv("CLI_NO_READLINE"))
                return smb_readline_replacement(prompt, callback, 
                                                completion_fn);

	if (completion_fn) {
		/* The cast is here because the callback prototype has
		   changed slightly between different versions of
		   Readline.  The same function works in all of them
		   to date, but we get compiler warnings without the
		   cast. */
		rl_attempted_completion_function =
			(rl_completion_func_t *) completion_fn;
	}

	if (callback) rl_event_hook = (Function *)callback;
	ret = readline(prompt);
	if (ret && *ret) add_history(ret);
	return ret;
#else
        return smb_readline_replacement(prompt, callback, completion_fn);
#endif
}

/****************************************************************************
history
****************************************************************************/
int cmd_history(void)
{
#if defined(HAVE_LIBREADLINE)
	HIST_ENTRY **hlist;
	int i;

	hlist = history_list();
	
	for (i = 0; hlist && hlist[i]; i++) {
		DEBUG(0, ("%d: %s\n", i, hlist[i]->line));
	}
#else
	DEBUG(0,("no history without readline support\n"));
#endif

	return 0;
}