lib/libcurses/insch.c

   1 /*      $NetBSD: insch.c,v 1.21 2007/05/28 15:01:56 blymn 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.21 2007/05/28 15:01:56 blymn Exp $");
  38 #endif
  39 #endif                          /* not lint */
  40
  41 #include <string.h>
  42 #include <stdlib.h>
  43
  44 #include "curses.h"
  45 #include "curses_private.h"
  46
  47 #ifndef _CURSES_USE_MACROS
  48
  49 /*
  50  * insch --
  51  *      Do an insert-char on the line, leaving (cury, curx) unchanged.
  52  */
  53 int
  54 insch(chtype ch)
  55 {
  56         return winsch(stdscr, ch);
  57 }
  58
  59 /*
  60  * mvinsch --
  61  *      Do an insert-char on the line at (y, x).
  62  */
  63 int
  64 mvinsch(int y, int x, chtype ch)
  65 {
  66         return mvwinsch(stdscr, y, x, ch);
  67 }
  68
  69 /*
  70  * mvwinsch --
  71  *      Do an insert-char on the line at (y, x) in the given window.
  72  */
  73 int
  74 mvwinsch(WINDOW *win, int y, int x, chtype ch)
  75 {
  76         if (wmove(win, y, x) == ERR)
  77                 return ERR;
  78
  79         return winsch(stdscr, ch);
  80 }
  81
  82 #endif
  83
  84 /*
  85  * winsch --
  86  *      Do an insert-char on the line, leaving (cury, curx) unchanged.
  87  */
  88 int
  89 winsch(WINDOW *win, chtype ch)
  90 {
  91
  92         __LDATA *end, *temp1, *temp2;
  93         attr_t attr;
  94
  95         if (__using_color)
  96                 attr = win->battr & __COLOR;
  97         else
  98                 attr = 0;
  99         end = &win->alines[win->cury]->line[win->curx];
 100         temp1 = &win->alines[win->cury]->line[win->maxx - 1];
 101         temp2 = temp1 - 1;
 102         while (temp1 > end) {
 103                 (void) memcpy(temp1, temp2, sizeof(__LDATA));
 104                 temp1--, temp2--;
 105         }
 106         temp1->ch = (wchar_t) ch & __CHARTEXT;
 107         if (temp1->ch == ' ')
 108                 temp1->ch = win->bch;
 109         temp1->attr = (attr_t) ch & __ATTRIBUTES;
 110         if (temp1->attr & __COLOR)
 111                 temp1->attr |= (win->battr & ~__COLOR);
 112         else
 113                 temp1->attr |= win->battr;
 114 #ifdef HAVE_WCHAR
 115         if (_cursesi_copy_nsp(win->bnsp, temp1) == ERR)
 116                 return ERR;
 117         SET_WCOL(*temp1, 1);
 118 #endif /* HAVE_WCHAR */
 119         __touchline(win, (int) win->cury, (int) win->curx, (int) win->maxx - 1);
 120         if (win->cury == LINES - 1 &&
 121             (win->alines[LINES - 1]->line[COLS - 1].ch != ' ' ||
 122                 win->alines[LINES - 1]->line[COLS - 1].attr != attr)) {
 123                 if (win->flags & __SCROLLOK) {
 124                         wrefresh(win);
 125                         scroll(win);
 126                         win->cury--;
 127                 } else
 128                         return (ERR);
 129         }
 130         return (OK);
 131 }