xref: /netbsd-src/lib/libcurses/insch.c (revision b7ae68fde0d8ef1c03714e8bbb1ee7c6118ea93b)
1 /*	$NetBSD: insch.c,v 1.20 2006/02/05 17:04:46 jdc Exp $	*/
2 
3 /*
4  * Copyright (c) 1981, 1993, 1994
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 #ifndef lint
34 #if 0
35 static char sccsid[] = "@(#)insch.c	8.2 (Berkeley) 5/4/94";
36 #else
37 __RCSID("$NetBSD: insch.c,v 1.20 2006/02/05 17:04:46 jdc Exp $");
38 #endif
39 #endif				/* not lint */
40 
41 #include <string.h>
42 
43 #include "curses.h"
44 #include "curses_private.h"
45 
46 #ifndef _CURSES_USE_MACROS
47 
48 /*
49  * insch --
50  *	Do an insert-char on the line, leaving (cury, curx) unchanged.
51  */
52 int
53 insch(chtype ch)
54 {
55 	return winsch(stdscr, ch);
56 }
57 
58 /*
59  * mvinsch --
60  *      Do an insert-char on the line at (y, x).
61  */
62 int
63 mvinsch(int y, int x, chtype ch)
64 {
65 	return mvwinsch(stdscr, y, x, ch);
66 }
67 
68 /*
69  * mvwinsch --
70  *      Do an insert-char on the line at (y, x) in the given window.
71  */
72 int
73 mvwinsch(WINDOW *win, int y, int x, chtype ch)
74 {
75 	if (wmove(win, y, x) == ERR)
76 		return ERR;
77 
78 	return winsch(stdscr, ch);
79 }
80 
81 #endif
82 
83 /*
84  * winsch --
85  *	Do an insert-char on the line, leaving (cury, curx) unchanged.
86  */
87 int
88 winsch(WINDOW *win, chtype ch)
89 {
90 
91 	__LDATA	*end, *temp1, *temp2;
92 	attr_t attr;
93 
94 	if (__using_color)
95 		attr = win->battr & __COLOR;
96 	else
97 		attr = 0;
98 	end = &win->lines[win->cury]->line[win->curx];
99 	temp1 = &win->lines[win->cury]->line[win->maxx - 1];
100 	temp2 = temp1 - 1;
101 	while (temp1 > end) {
102 		(void) memcpy(temp1, temp2, sizeof(__LDATA));
103 		temp1--, temp2--;
104 	}
105 	temp1->ch = (wchar_t) ch & __CHARTEXT;
106 	if (temp1->ch == ' ')
107 		temp1->ch = win->bch;
108 	temp1->attr = (attr_t) ch & __ATTRIBUTES;
109 	if (temp1->attr & __COLOR)
110 		temp1->attr |= (win->battr & ~__COLOR);
111 	else
112 		temp1->attr |= win->battr;
113 	__touchline(win, (int) win->cury, (int) win->curx, (int) win->maxx - 1);
114 	if (win->cury == LINES - 1 &&
115 	    (win->lines[LINES - 1]->line[COLS - 1].ch != ' ' ||
116 		win->lines[LINES - 1]->line[COLS - 1].attr != attr)) {
117 		if (win->flags & __SCROLLOK) {
118 			wrefresh(win);
119 			scroll(win);
120 			win->cury--;
121 		} else
122 			return (ERR);
123 	}
124 	return (OK);
125 }
126