lib/libcurses/screen.c

   1 /*      $NetBSD: screen.c,v 1.23 2010/06/10 05:24:55 dholland 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[] = "@(#)screen.c    8.2 (blymn) 11/27/2001";
  36 #else
  37 __RCSID("$NetBSD: screen.c,v 1.23 2010/06/10 05:24:55 dholland Exp $");
  38 #endif
  39 #endif                                  /* not lint */
  40
  41 #include <stdlib.h>
  42
  43 #include "curses.h"
  44 #include "curses_private.h"
  45
  46 /*
  47  * set_term --
  48  *      Change the term to the given screen.
  49  *
  50  */
  51 SCREEN *
  52 set_term(SCREEN *new)
  53 {
  54         SCREEN *old_screen = _cursesi_screen;
  55
  56         if (_cursesi_screen != NULL) {
  57                   /* save changes made to the current screen... */
  58                 old_screen->echoit = __echoit;
  59                 old_screen->pfast = __pfast;
  60                 old_screen->rawmode = __rawmode;
  61                 old_screen->noqch = __noqch;
  62                 old_screen->COLS = COLS;
  63                 old_screen->LINES = LINES;
  64                 old_screen->COLORS = COLORS;
  65                 old_screen->COLOR_PAIRS = COLOR_PAIRS;
  66                 old_screen->GT = __GT;
  67                 old_screen->NONL = __NONL;
  68                 old_screen->UPPERCASE = __UPPERCASE;
  69         }
  70
  71         _cursesi_screen = new;
  72
  73         __echoit = new->echoit;
  74         __pfast = new->pfast;
  75         __rawmode = new->rawmode;
  76         __noqch = new->noqch;
  77         COLS = new->COLS;
  78         LINES = new->LINES;
  79         COLORS = new->COLORS;
  80         COLOR_PAIRS = new->COLOR_PAIRS;
  81         __GT = new->GT;
  82         __NONL = new->NONL;
  83         __UPPERCASE = new->UPPERCASE;
  84
  85         _cursesi_resetterm(new);
  86
  87         curscr = new->curscr;
  88         clearok(curscr, new->clearok);
  89         stdscr = new->stdscr;
  90         __virtscr = new->__virtscr;
  91
  92         _cursesi_reset_acs(new);
  93 #ifdef HAVE_WCHAR
  94     _cursesi_reset_wacs(new);
  95 #endif /* HAVE_WCHAR */
  96
  97 #ifdef DEBUG
  98         __CTRACE(__CTRACE_SCREEN, "set_term: LINES = %d, COLS = %d\n",
  99             LINES, COLS);
 100 #endif
 101
 102         return old_screen;
 103 }
 104
 105 /*
 106  * newterm --
 107  *      Set up a new screen.
 108  *
 109  */
 110 SCREEN *
 111 newterm(char *type, FILE *outfd, FILE *infd)
 112 {
 113         SCREEN *new_screen;
 114         char *sp;
 115
 116         sp = type;
 117         if ((type == NULL) && (sp = getenv("TERM")) == NULL)
 118                 return NULL;
 119
 120         if ((new_screen = calloc(1, sizeof(SCREEN))) == NULL)
 121                 return NULL;
 122
 123 #ifdef DEBUG
 124         __CTRACE(__CTRACE_INIT, "newterm\n");
 125 #endif
 126
 127         new_screen->infd = infd;
 128         new_screen->outfd = outfd;
 129         new_screen->echoit = new_screen->nl = 1;
 130         new_screen->pfast = new_screen->rawmode = new_screen->noqch = 0;
 131         new_screen->nca = A_NORMAL;
 132         new_screen->color_type = COLOR_NONE;
 133         new_screen->COLOR_PAIRS = 0;
 134         new_screen->old_mode = 2;
 135         new_screen->stdbuf = NULL;
 136         new_screen->stdscr = NULL;
 137         new_screen->curscr = NULL;
 138         new_screen->__virtscr = NULL;
 139         new_screen->curwin = 0;
 140         new_screen->notty = FALSE;
 141         new_screen->half_delay = FALSE;
 142         new_screen->resized = 0;
 143         new_screen->unget_len = 32;
 144
 145         if ((new_screen->unget_list =
 146             malloc(sizeof(wchar_t) * new_screen->unget_len)) == NULL) {
 147                 goto error_exit;
 148         }
 149         new_screen->unget_pos = 0;
 150
 151         if (_cursesi_gettmode(new_screen) == ERR)
 152                 goto error_exit;
 153
 154         if (_cursesi_setterm((char *)sp, new_screen) == ERR)
 155                 goto error_exit;
 156
 157         /* Need either homing or cursor motion for refreshes */
 158         if (!t_cursor_home(new_screen->term) &&
 159             !t_cursor_address(new_screen->term))
 160                 goto error_exit;
 161
 162         new_screen->winlistp = NULL;
 163
 164         if ((new_screen->curscr = __newwin(new_screen, 0,
 165             0, 0, 0, FALSE)) == NULL)
 166                 goto error_exit;
 167
 168         if ((new_screen->stdscr = __newwin(new_screen, 0,
 169             0, 0, 0, FALSE)) == NULL) {
 170                 delwin(new_screen->curscr);
 171                 goto error_exit;
 172         }
 173
 174         clearok(new_screen->stdscr, 1);
 175
 176         if ((new_screen->__virtscr = __newwin(new_screen, 0,
 177             0, 0, 0, FALSE)) == NULL) {
 178                 delwin(new_screen->curscr);
 179                 delwin(new_screen->stdscr);
 180                 goto error_exit;
 181         }
 182
 183         __init_getch(new_screen);
 184         __init_acs(new_screen);
 185 #ifdef HAVE_WCHAR
 186         __init_get_wch( new_screen );
 187         __init_wacs(new_screen);
 188 #endif /* HAVE_WCHAR */
 189
 190         __set_stophandler();
 191         __set_winchhandler();
 192
 193           /*
 194            * bleh - it seems that apps expect the first newterm to set
 195            * up the curses screen.... emulate this.
 196            */
 197         if (_cursesi_screen == NULL || _cursesi_screen->endwin) {
 198                 set_term(new_screen);
 199         }
 200
 201 #ifdef DEBUG
 202         __CTRACE(__CTRACE_SCREEN, "newterm: LINES = %d, COLS = %d\n",
 203             LINES, COLS);
 204 #endif
 205         __startwin(new_screen);
 206
 207         return new_screen;
 208
 209   error_exit:
 210         free(new_screen);
 211         return NULL;
 212 }
 213
 214 /*
 215  * delscreen --
 216  *   Free resources used by the given screen and destroy it.
 217  *
 218  */
 219 void
 220 delscreen(SCREEN *screen)
 221 {
 222         struct __winlist *list;
 223
 224 #ifdef DEBUG
 225         __CTRACE(__CTRACE_SCREEN, "delscreen(%p)\n", screen);
 226 #endif
 227           /* free up the terminfo stuff */
 228         del_curterm(screen->term);
 229
 230           /* walk the window list and kill all the parent windows */
 231         while ((list = screen->winlistp) != NULL) {
 232                 delwin(list->winp);
 233                 if (list == screen->winlistp)
 234                         /* sanity - abort if window didn't remove itself */
 235                         break;
 236         }
 237
 238           /* free the storage of the keymaps */
 239         _cursesi_free_keymap(screen->base_keymap);
 240
 241         free(screen->stdbuf);
 242         screen->stdbuf = NULL;
 243         if (_cursesi_screen == screen)
 244                 _cursesi_screen = NULL;
 245         free(screen);
 246 }