lib_insch.c revision 262629
1/****************************************************************************
2 * Copyright (c) 1998-2008,2009 Free Software Foundation, Inc.              *
3 *                                                                          *
4 * Permission is hereby granted, free of charge, to any person obtaining a  *
5 * copy of this software and associated documentation files (the            *
6 * "Software"), to deal in the Software without restriction, including      *
7 * without limitation the rights to use, copy, modify, merge, publish,      *
8 * distribute, distribute with modifications, sublicense, and/or sell       *
9 * copies of the Software, and to permit persons to whom the Software is    *
10 * furnished to do so, subject to the following conditions:                 *
11 *                                                                          *
12 * The above copyright notice and this permission notice shall be included  *
13 * in all copies or substantial portions of the Software.                   *
14 *                                                                          *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
22 *                                                                          *
23 * Except as contained in this notice, the name(s) of the above copyright   *
24 * holders shall not be used in advertising or otherwise to promote the     *
25 * sale, use or other dealings in this Software without prior written       *
26 * authorization.                                                           *
27 ****************************************************************************/
28
29/****************************************************************************
30 *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
31 *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
32 *     and: Sven Verdoolaege                                                *
33 *     and: Thomas E. Dickey                                                *
34 ****************************************************************************/
35
36/*
37**	lib_insch.c
38**
39**	The routine winsch().
40**
41*/
42
43#include <curses.priv.h>
44#include <ctype.h>
45
46MODULE_ID("$Id: lib_insch.c,v 1.32 2009/10/24 22:04:35 tom Exp $")
47
48/*
49 * Insert the given character, updating the current location to simplify
50 * inserting a string.
51 */
52NCURSES_EXPORT(int)
53_nc_insert_ch(SCREEN *sp, WINDOW *win, chtype ch)
54{
55    int code = OK;
56    NCURSES_CH_T wch;
57    int count;
58    NCURSES_CONST char *s;
59    int tabsize = (
60#if USE_REENTRANT
61		      sp->_TABSIZE
62#else
63		      TABSIZE
64#endif
65    );
66
67    switch (ch) {
68    case '\t':
69	for (count = (tabsize - (win->_curx % tabsize)); count > 0; count--) {
70	    if ((code = _nc_insert_ch(sp, win, ' ')) != OK)
71		break;
72	}
73	break;
74    case '\n':
75    case '\r':
76    case '\b':
77	SetChar2(wch, ch);
78	_nc_waddch_nosync(win, wch);
79	break;
80    default:
81	if (
82#if USE_WIDEC_SUPPORT
83	       WINDOW_EXT(win, addch_used) == 0 &&
84#endif
85	       is8bits(ChCharOf(ch)) &&
86	       (isprint(ChCharOf(ch)) ||
87		(ChAttrOf(ch) & A_ALTCHARSET) ||
88		(sp != 0 && sp->_legacy_coding && !iscntrl(ChCharOf(ch))))) {
89	    if (win->_curx <= win->_maxx) {
90		struct ldat *line = &(win->_line[win->_cury]);
91		NCURSES_CH_T *end = &(line->text[win->_curx]);
92		NCURSES_CH_T *temp1 = &(line->text[win->_maxx]);
93		NCURSES_CH_T *temp2 = temp1 - 1;
94
95		SetChar2(wch, ch);
96
97		CHANGED_TO_EOL(line, win->_curx, win->_maxx);
98		while (temp1 > end)
99		    *temp1-- = *temp2--;
100
101		*temp1 = _nc_render(win, wch);
102		win->_curx++;
103	    }
104	} else if (is8bits(ChCharOf(ch)) && iscntrl(ChCharOf(ch))) {
105	    s = NCURSES_SP_NAME(unctrl) (NCURSES_SP_ARGx ChCharOf(ch));
106	    while (*s != '\0') {
107		code = _nc_insert_ch(sp, win, ChAttrOf(ch) | UChar(*s));
108		if (code != OK)
109		    break;
110		++s;
111	    }
112	}
113#if USE_WIDEC_SUPPORT
114	else {
115	    /*
116	     * Handle multibyte characters here
117	     */
118	    SetChar2(wch, ch);
119	    wch = _nc_render(win, wch);
120	    count = _nc_build_wch(win, &wch);
121	    if (count > 0) {
122		code = _nc_insert_wch(win, &wch);
123	    } else if (count == -1) {
124		/* handle EILSEQ */
125		if (is8bits(ch)) {
126		    s = NCURSES_SP_NAME(unctrl) (NCURSES_SP_ARGx ChCharOf(ch));
127		    if (strlen(s) > 1) {
128			while (*s != '\0') {
129			    code = _nc_insert_ch(sp, win,
130						 ChAttrOf(ch) | UChar(*s));
131			    if (code != OK)
132				break;
133			    ++s;
134			}
135		    } else {
136			code = ERR;
137		    }
138		} else {
139		    code = ERR;
140		}
141	    }
142	}
143#endif
144	break;
145    }
146    return code;
147}
148
149NCURSES_EXPORT(int)
150winsch(WINDOW *win, chtype c)
151{
152    NCURSES_SIZE_T oy;
153    NCURSES_SIZE_T ox;
154    int code = ERR;
155
156    T((T_CALLED("winsch(%p, %s)"), (void *) win, _tracechtype(c)));
157
158    if (win != 0) {
159	oy = win->_cury;
160	ox = win->_curx;
161
162	code = _nc_insert_ch(_nc_screen_of(win), win, c);
163
164	win->_curx = ox;
165	win->_cury = oy;
166	_nc_synchook(win);
167    }
168    returnCode(code);
169}
170