[unix-history] / usr / src / usr.bin / talk / io.c

/*
 * Copyright (c) 1983 Regents of the University of California.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the University of
 *	California, Berkeley and its contributors.
 * 4. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#ifndef lint
static char sccsid[] = "@(#)io.c	5.6 (Berkeley) 3/1/91";
#endif /* not lint */

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

#include <sys/time.h>
#include "talk.h"
#include <stdio.h>
#include <errno.h>
#include <string.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
 */
talk()
{
	register int read_template, sockt_mask;
	int read_set, nb;
	char buf[BUFSIZ];
	struct timeval wait;

	message("Connection established\007\007\007");
	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;
	for (;;) {
		read_set = read_template;
		wait.tv_sec = A_LONG_TIME;
		wait.tv_usec = 0;
		nb = select(32, &read_set, 0, 0, &wait);
		if (nb <= 0) {
			if (errno == EINTR) {
				read_set = read_template;
				continue;
			}
			/* panic, we don't know what happened */
			p_error("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("Connection closed. Exiting");
				quit();
			}
			display(&his_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);
			/* might lose data here because sockt is non-blocking */
			write(sockt, buf, nb);
		}
	}
}

extern	int errno;
extern	int sys_nerr;

/*
 * p_error prints the system error message on the standard location
 * on the screen and then exits. (i.e. a curses version of perror)
 */
p_error(string) 
	char *string;
{
	wmove(my_win.x_win, current_line%my_win.x_nlines, 0);
	wprintw(my_win.x_win, "[%s : %s (%d)]\n",
	    string, strerror(errno), errno);
	wrefresh(my_win.x_win);
	move(LINES-1, 0);
	refresh();
	quit();
}

/*
 * Display string in the standard location
 */
message(string)
	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);
}
Commit	Line	Data
31c4d32d WJ	1	/*
	2	* Copyright (c) 1983 Regents of the University of California.
	3	* All rights reserved.
	4	*
	5	* Redistribution and use in source and binary forms, with or without
	6	* modification, are permitted provided that the following conditions
	7	* are met:
	8	* 1. Redistributions of source code must retain the above copyright
	9	* notice, this list of conditions and the following disclaimer.
	10	* 2. Redistributions in binary form must reproduce the above copyright
	11	* notice, this list of conditions and the following disclaimer in the
	12	* documentation and/or other materials provided with the distribution.
	13	* 3. All advertising materials mentioning features or use of this software
	14	* must display the following acknowledgement:
	15	* This product includes software developed by the University of
	16	* California, Berkeley and its contributors.
	17	* 4. Neither the name of the University nor the names of its contributors
	18	* may be used to endorse or promote products derived from this software
	19	* without specific prior written permission.
	20	*
	21	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
	22	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	23	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	24	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
	25	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	26	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	27	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	28	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	29	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	30	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	31	* SUCH DAMAGE.
	32	*/
	33
	34	#ifndef lint
	35	static char sccsid[] = "@(#)io.c 5.6 (Berkeley) 3/1/91";
	36	#endif /* not lint */
	37
	38	/*
	39	* This file contains the I/O handling and the exchange of
	40	* edit characters. This connection itself is established in
	41	* ctl.c
	42	*/
	43
	44	#include <sys/time.h>
	45	#include "talk.h"
	46	#include <stdio.h>
	47	#include <errno.h>
	48	#include <string.h>
	49
	50	#define A_LONG_TIME 10000000
	51	#define STDIN_MASK (1<<fileno(stdin)) /* the bit mask for standard
	52	input */
	53
	54	/*
	55	* The routine to do the actual talking
	56	*/
	57	talk()
	58	{
	59	register int read_template, sockt_mask;
	60	int read_set, nb;
	61	char buf[BUFSIZ];
	62	struct timeval wait;
	63
	64	message("Connection established\007\007\007");
65	current_line = 0;
66	sockt_mask = (1<<sockt);
67
68	/*
69	* Wait on both the other process (sockt_mask) and
70	* standard input ( STDIN_MASK )
71	*/
72	read_template = sockt_mask \| STDIN_MASK;
73	for (;;) {
74	read_set = read_template;
75	wait.tv_sec = A_LONG_TIME;
76	wait.tv_usec = 0;
77	nb = select(32, &read_set, 0, 0, &wait);
78	if (nb <= 0) {
79	if (errno == EINTR) {
80	read_set = read_template;
81	continue;
82	}
83	/* panic, we don't know what happened */
84	p_error("Unexpected error from select");
85	quit();
86	}
87	if (read_set & sockt_mask) {
88	/* There is data on sockt */
89	nb = read(sockt, buf, sizeof buf);
90	if (nb <= 0) {
91	message("Connection closed. Exiting");
92	quit();
93	}
94	display(&his_win, buf, nb);
95	}
96	if (read_set & STDIN_MASK) {
97	/*
98	* We can't make the tty non_blocking, because
99	* curses's output routines would screw up
100	*/
101	ioctl(0, FIONREAD, (struct sgttyb *) &nb);
102	nb = read(0, buf, nb);
103	display(&my_win, buf, nb);
104	/* might lose data here because sockt is non-blocking */
105	write(sockt, buf, nb);
106	}
107	}
108	}
109
110	extern int errno;
111	extern int sys_nerr;
112
113	/*
114	* p_error prints the system error message on the standard location
115	* on the screen and then exits. (i.e. a curses version of perror)
116	*/
117	p_error(string)
118	char *string;
119	{
120	wmove(my_win.x_win, current_line%my_win.x_nlines, 0);
121	wprintw(my_win.x_win, "[%s : %s (%d)]\n",
122	string, strerror(errno), errno);
123	wrefresh(my_win.x_win);
124	move(LINES-1, 0);
125	refresh();
126	quit();
127	}
128
129	/*
130	* Display string in the standard location
131	*/
132	message(string)
133	char *string;
134	{
135
136	wmove(my_win.x_win, current_line%my_win.x_nlines, 0);
137	wprintw(my_win.x_win, "[%s]\n", string);
138	wrefresh(my_win.x_win);
139	}