/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 2005 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*	Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T	*/
/*	  All Rights Reserved  	*/

/*
 * University Copyright- Copyright (c) 1982, 1986, 1988
 * The Regents of the University of California
 * All Rights Reserved
 *
 * University Acknowledgment- Portions of this document are derived from
 * software developed by the University of California, Berkeley, and its
 * contributors.
 */

/*
 * this file contains the I/O handling and the exchange of
 * edit characters. This connection itself is established in ctl.c
 */

#include "talk.h"
#include <stdio.h>
#include <errno.h>
#include <sys/time.h>
#include <sys/filio.h>
#include <libintl.h>

#define	A_LONG_TIME 10000000
#define	STDIN_MASK (1<<fileno(stdin))	/* the bit mask for standard input */

/*
 * The routine to do the actual talking
 */

void
talk()
{
	int read_template, sockt_mask;
	int read_set, nb;
	char buf[BUFSIZ];
	struct timeval wait;

	message(gettext("Connection established"));
	beep(); beep(); beep();
	current_line = 0;

	sockt_mask = (1<<sockt);

	/*
	 * wait on both the other process (sockt_mask) and
	 * standard input ( STDIN_MASK )
	 */

	read_template = sockt_mask | STDIN_MASK;

	forever {

		read_set = read_template;

		wait.tv_sec = A_LONG_TIME;
		wait.tv_usec = 0;

		nb = select(32, (fd_set *)&read_set, 0, 0, &wait);

		if (nb <= 0) {

			/* We may be returning from an interrupt handler */

			if (errno == EINTR) {
				read_set = read_template;
				continue;
			} else {
				/* panic, we don't know what happened */
				p_error(
				gettext("Unexpected error from select"));
				quit();
			}
		}

		if (read_set & sockt_mask) {

			/* There is data on sockt */
			nb = read(sockt, buf, sizeof (buf));

			if (nb <= 0) {
				message(gettext("Connection closed. Exiting"));
				pause();	/* wait for Ctrl-C */
				quit();
			} else {
				display(&rem_win, buf, nb);
			}
		}

		if (read_set & STDIN_MASK) {

			/*
			 * we can't make the tty non_blocking, because
			 * curses's output routines would screw up
			 */

			ioctl(0, FIONREAD, (struct sgttyb *)&nb);
			nb = read(0, buf, nb);
			display(&my_win, buf, nb);
			write(sockt, buf, nb);

			/*
			 * We might lose data here because sockt is
			 * non-blocking
			 */
		}
	}
}


/*
 * p_error prints the system error message on the standard location
 * on the screen and then exits. (i.e. a curses version of perror)
 */

void
p_error(char *string)
{
	wmove(my_win.x_win, current_line%my_win.x_nlines, 0);
	wprintw(my_win.x_win, "[%s : %s]\n", string, strerror(errno));
	wrefresh(my_win.x_win);
	move(LINES-1, 0);
	refresh();
	quit();
}

/* display string in the standard location */

void
message(char *string)
{
	wmove(my_win.x_win, current_line%my_win.x_nlines, 0);
	wprintw(my_win.x_win, "[%s]\n", string);
	wrefresh(my_win.x_win);
}