]> ncurses.scripts.mit.edu Git - ncurses.git/blob - ncurses/base/lib_insstr.c
ncurses 5.2
[ncurses.git] / ncurses / base / lib_insstr.c
1 /****************************************************************************
2  * Copyright (c) 1998,1999,2000 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  ****************************************************************************/
33
34 /*
35 **      lib_insstr.c
36 **
37 **      The routine winsnstr().
38 **
39 */
40
41 #include <curses.priv.h>
42 #include <ctype.h>
43
44 MODULE_ID("$Id: lib_insstr.c,v 1.14 2000/04/29 21:16:41 tom Exp $")
45
46 int
47 winsnstr(WINDOW *win, const char *s, int n)
48 {
49     int code = ERR;
50     NCURSES_SIZE_T oy;
51     NCURSES_SIZE_T ox;
52     const unsigned char *str = (const unsigned char *) s;
53     const unsigned char *cp;
54
55     T((T_CALLED("winsnstr(%p,%s,%d)"), win, _nc_visbuf(s), n));
56
57     if (win && str) {
58         oy = win->_cury;
59         ox = win->_curx;
60         for (cp = str; *cp && (n <= 0 || (cp - str) < n); cp++) {
61             if (*cp == '\n' || *cp == '\r' || *cp == '\t' || *cp == '\b')
62                 _nc_waddch_nosync(win, (chtype) (*cp));
63             else if (is7bits(*cp) && iscntrl(*cp)) {
64                 winsch(win, ' ' + (chtype) (*cp));
65                 winsch(win, '^');
66                 win->_curx += 2;
67             } else {
68                 winsch(win, (chtype) (*cp));
69                 win->_curx++;
70             }
71             if (win->_curx > win->_maxx)
72                 win->_curx = win->_maxx;
73         }
74
75         win->_curx = ox;
76         win->_cury = oy;
77         _nc_synchook(win);
78         code = OK;
79     }
80     returnCode(code);
81 }