lib_insch.c revision 262685 
1/****************************************************************************
2 * Copyright (c) 1998-2012,2013 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.35 2013/05/18 21:58:56 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    int ch8 = (int) ChCharOf(ch);
57    NCURSES_CH_T wch;
58    int count;
59    NCURSES_CONST char *s;
60    int tabsize = (
61#if USE_REENTRANT
62		      sp->_TABSIZE
63#else
64		      TABSIZE
65#endif
66    );
67
68    switch (ch) {
69    case '\t':
70	for (count = (tabsize - (win->_curx % tabsize)); count > 0; count--) {
71	    if ((code = _nc_insert_ch(sp, win, ' ')) != OK)
72		break;
73	}
74	break;
75    case '\n':
76    case '\r':
77    case '\b':
78	SetChar2(wch, ch);
79	_nc_waddch_nosync(win, wch);
80	break;
81    default:
82	if (
83#if USE_WIDEC_SUPPORT
84	       WINDOW_EXT(win, addch_used) == 0 &&
85#endif
86	       (isprint(ch8) ||
87		(ChAttrOf(ch) & A_ALTCHARSET) ||
88		(sp != 0 && sp->_legacy_coding && !iscntrl(ch8)))) {
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 (iscntrl(ch8)) {
105	    s = NCURSES_SP_NAME(unctrl) (NCURSES_SP_ARGx (chtype) ch8);
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		s = NCURSES_SP_NAME(unctrl) (NCURSES_SP_ARGx (chtype) ch8);
126		if (strlen(s) > 1) {
127		    while (*s != '\0') {
128			code = _nc_insert_ch(sp, win,
129					     ChAttrOf(ch) | UChar(*s));
130			if (code != OK)
131			    break;
132			++s;
133		    }
134		} else {
135		    code = ERR;
136		}
137	    }
138	}
139#endif
140	break;
141    }
142    return code;
143}
144
145NCURSES_EXPORT(int)
146winsch(WINDOW *win, chtype c)
147{
148    NCURSES_SIZE_T oy;
149    NCURSES_SIZE_T ox;
150    int code = ERR;
151
152    T((T_CALLED("winsch(%p, %s)"), (void *) win, _tracechtype(c)));
153
154    if (win != 0) {
155	oy = win->_cury;
156	ox = win->_curx;
157
158	code = _nc_insert_ch(_nc_screen_of(win), win, c);
159
160	win->_curx = ox;
161	win->_cury = oy;
162	_nc_synchook(win);
163    }
164    returnCode(code);
165}
166