Head

GCC Code Coverage Report

Directory:	./		Exec	Total	Coverage
File:	usr.bin/talk/display.c	Lines:	0	82	0.0 %
Date:	2017-11-07	Branches:	0	72	0.0 %


/*	$OpenBSD: display.c,v 1.18 2016/02/01 07:29:25 mestre Exp $	*/
/*	$NetBSD: display.c,v 1.3 1994/12/09 02:14:13 jtc Exp $	*/

/*
 * Copyright (c) 1983, 1993
 *	The 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. 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.
 */

/*
 * The window 'manager', initializes curses and handles the actual
 * displaying of text
 */
#include <ctype.h>

#include "talk.h"

xwin_t	my_win;
xwin_t	his_win;
WINDOW	*line_win;

int	curses_initialized;
int	high_print;
bool	smooth_scroll;

/*
 * max HAS to be a function, it is called with
 * an argument of the form --foo at least once.
 */
int
max(int a, int b)
{

	return (a > b ? a : b);
}

/*
 * Display some text on somebody's window, processing some control
 * characters while we are at it.
 */
void
display(xwin_t *win, char *text, int size)
{
	int i;
	char cch;

	for (i = 0; i < size; i++) {
		/*
		 * Since we do not use curses's input routines we must
		 * convert '\r' -> '\n' ourselves.
		 */
		if (*text == '\r')
			*text = '\n';
		if (*text == '\n') {
			xscroll(win, 0);
			text++;
			continue;
		}
		/* erase character */
		if (*text == win->cerase) {
			wmove(win->x_win, win->x_line, max(--win->x_col, 0));
			getyx(win->x_win, win->x_line, win->x_col);
			waddch(win->x_win, ' ');
			wmove(win->x_win, win->x_line, win->x_col);
			getyx(win->x_win, win->x_line, win->x_col);
			text++;
			continue;
		}
		/*
		 * On word erase search backwards until we find
		 * the beginning of a word or the beginning of
		 * the line.
		 */
		if (*text == win->werase) {
			int endcol, xcol, i, c;

			endcol = win->x_col;
			xcol = endcol - 1;
			while (xcol >= 0) {
				c = readwin(win->x_win, win->x_line, xcol);
				if (c != ' ')
					break;
				xcol--;
			}
			while (xcol >= 0) {
				c = readwin(win->x_win, win->x_line, xcol);
				if (c == ' ')
					break;
				xcol--;
			}
			wmove(win->x_win, win->x_line, xcol + 1);
			for (i = xcol + 1; i < endcol; i++)
				waddch(win->x_win, ' ');
			wmove(win->x_win, win->x_line, xcol + 1);
			getyx(win->x_win, win->x_line, win->x_col);
			text++;
			continue;
		}
		/* line kill */
		if (*text == win->kill) {
			wmove(win->x_win, win->x_line, 0);
			wclrtoeol(win->x_win);
			getyx(win->x_win, win->x_line, win->x_col);
			text++;
			continue;
		}
		if (*text == '\f') {
			if (win == &my_win)
				wrefresh(curscr);
			text++;
			continue;
		}
		if (win->x_col == COLS-1) {
			/* check for wraparound */
			xscroll(win, 0);
		}
		if (*text != '\t' &&
		    ((!high_print && !isprint((unsigned char)*text)) ||
		      iscntrl((unsigned char)*text))) {
			waddch(win->x_win, '^');
			getyx(win->x_win, win->x_line, win->x_col);
			if (win->x_col == COLS-1) /* check for wraparound */
				xscroll(win, 0);
			cch = (*text & 63) + 64;
			waddch(win->x_win, cch);
		} else
			waddch(win->x_win, (unsigned char)(*text));
		getyx(win->x_win, win->x_line, win->x_col);
		text++;
	}
	wrefresh(win->x_win);
}

/*
 * Read the character at the indicated position in win
 */
int
readwin(WINDOW *win, int line, int col)
{
	int oldline, oldcol;
	int c;

	getyx(win, oldline, oldcol);
	wmove(win, line, col);
	c = winch(win);
	wmove(win, oldline, oldcol);
	return (c);
}

/*
 * Scroll a window, blanking out the line following the current line
 * so that the current position is obvious
 */
void
xscroll(xwin_t *win, int flag)
{

	if (flag == -1) {
		wmove(win->x_win, 0, 0);
		win->x_line = 0;
		win->x_col = 0;
		return;
	}
	win->x_col = 0;
	if (smooth_scroll) {
		if (++win->x_line == win->x_nlines) {
			--win->x_line;
			scroll(win->x_win);
		}
	} else {
		win->x_line = (win->x_line + 1) % win->x_nlines;
		wmove(win->x_win, win->x_line, win->x_col);
		wclrtoeol(win->x_win);
		wmove(win->x_win, (win->x_line + 1) % win->x_nlines,
		    win->x_col);
		wclrtoeol(win->x_win);
	}
	wmove(win->x_win, win->x_line, win->x_col);
}


Generated by: GCOVR (Version 3.3)

Line	Branch	Exec	Source
1			/* $OpenBSD: display.c,v 1.18 2016/02/01 07:29:25 mestre Exp $ */
2			/* $NetBSD: display.c,v 1.3 1994/12/09 02:14:13 jtc Exp $ */
3
4			/*
5			* Copyright (c) 1983, 1993
6			* The Regents of the University of California. All rights reserved.
7			*
8			* Redistribution and use in source and binary forms, with or without
9			* modification, are permitted provided that the following conditions
10			* are met:
11			* 1. Redistributions of source code must retain the above copyright
12			* notice, this list of conditions and the following disclaimer.
13			* 2. Redistributions in binary form must reproduce the above copyright
14			* notice, this list of conditions and the following disclaimer in the
15			* documentation and/or other materials provided with the distribution.
16			* 3. Neither the name of the University nor the names of its contributors
17			* may be used to endorse or promote products derived from this software
18			* without specific prior written permission.
19			*
20			* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21			* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22			* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23			* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24			* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25			* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26			* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27			* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28			* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29			* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30			* SUCH DAMAGE.
31			*/
32
33			/*
34			* The window 'manager', initializes curses and handles the actual
35			* displaying of text
36			*/
37			#include <ctype.h>
38
39			#include "talk.h"
40
41			xwin_t my_win;
42			xwin_t his_win;
43			WINDOW *line_win;
44
45			int curses_initialized;
46			int high_print;
47			bool smooth_scroll;
48
49			/*
50			* max HAS to be a function, it is called with
51			* an argument of the form --foo at least once.
52			*/
53			int
54			max(int a, int b)
55			{
56
57			return (a > b ? a : b);
58			}
59
60			/*
61			* Display some text on somebody's window, processing some control
62			* characters while we are at it.
63			*/
64			void
65			display(xwin_t win, char text, int size)
66			{
67			int i;
68			char cch;
69
70			for (i = 0; i < size; i++) {
71			/*
72			* Since we do not use curses's input routines we must
73			* convert '\r' -> '\n' ourselves.
74			*/
75			if (*text == '\r')
76			*text = '\n';
77			if (*text == '\n') {
78			xscroll(win, 0);
79			text++;
80			continue;
81			}
82			/* erase character */
83			if (*text == win->cerase) {
84			wmove(win->x_win, win->x_line, max(--win->x_col, 0));
85			getyx(win->x_win, win->x_line, win->x_col);
86			waddch(win->x_win, ' ');
87			wmove(win->x_win, win->x_line, win->x_col);
88			getyx(win->x_win, win->x_line, win->x_col);
89			text++;
90			continue;
91			}
92			/*
93			* On word erase search backwards until we find
94			* the beginning of a word or the beginning of
95			* the line.
96			*/
97			if (*text == win->werase) {
98			int endcol, xcol, i, c;
99
100			endcol = win->x_col;
101			xcol = endcol - 1;
102			while (xcol >= 0) {
103			c = readwin(win->x_win, win->x_line, xcol);
104			if (c != ' ')
105			break;
106			xcol--;
107			}
108			while (xcol >= 0) {
109			c = readwin(win->x_win, win->x_line, xcol);
110			if (c == ' ')
111			break;
112			xcol--;
113			}
114			wmove(win->x_win, win->x_line, xcol + 1);
115			for (i = xcol + 1; i < endcol; i++)
116			waddch(win->x_win, ' ');
117			wmove(win->x_win, win->x_line, xcol + 1);
118			getyx(win->x_win, win->x_line, win->x_col);
119			text++;
120			continue;
121			}
122			/* line kill */
123			if (*text == win->kill) {
124			wmove(win->x_win, win->x_line, 0);
125			wclrtoeol(win->x_win);
126			getyx(win->x_win, win->x_line, win->x_col);
127			text++;
128			continue;
129			}
130			if (*text == '\f') {
131			if (win == &my_win)
132			wrefresh(curscr);
133			text++;
134			continue;
135			}
136			if (win->x_col == COLS-1) {
137			/* check for wraparound */
138			xscroll(win, 0);
139			}
140			if (*text != '\t' &&
141			((!high_print && !isprint((unsigned char)*text)) \|\|
142			iscntrl((unsigned char)*text))) {
143			waddch(win->x_win, '^');
144			getyx(win->x_win, win->x_line, win->x_col);
145			if (win->x_col == COLS-1) /* check for wraparound */
146			xscroll(win, 0);
147			cch = (*text & 63) + 64;
148			waddch(win->x_win, cch);
149			} else
150			waddch(win->x_win, (unsigned char)(*text));
151			getyx(win->x_win, win->x_line, win->x_col);
152			text++;
153			}
154			wrefresh(win->x_win);
155			}
156
157			/*
158			* Read the character at the indicated position in win
159			*/
160			int
161			readwin(WINDOW *win, int line, int col)
162			{
163			int oldline, oldcol;
164			int c;
165
166			getyx(win, oldline, oldcol);
167			wmove(win, line, col);
168			c = winch(win);
169			wmove(win, oldline, oldcol);
170			return (c);
171			}
172
173			/*
174			* Scroll a window, blanking out the line following the current line
175			* so that the current position is obvious
176			*/
177			void
178			xscroll(xwin_t *win, int flag)
179			{
180
181			if (flag == -1) {
182			wmove(win->x_win, 0, 0);
183			win->x_line = 0;
184			win->x_col = 0;
185			return;
186			}
187			win->x_col = 0;
188			if (smooth_scroll) {
189			if (++win->x_line == win->x_nlines) {
190			--win->x_line;
191			scroll(win->x_win);
192			}
193			} else {
194			win->x_line = (win->x_line + 1) % win->x_nlines;
195			wmove(win->x_win, win->x_line, win->x_col);
196			wclrtoeol(win->x_win);
197			wmove(win->x_win, (win->x_line + 1) % win->x_nlines,
198			win->x_col);
199			wclrtoeol(win->x_win);
200			}
201			wmove(win->x_win, win->x_line, win->x_col);
202			}