lib/libcurses/screen.c

   1 /*      $NetBSD: screen.c,v 1.20 2007/05/28 15:01:57 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[] = "@(#)screen.c    8.2 (blymn) 11/27/2001";
  36 #else
  37 __RCSID("$NetBSD: screen.c,v 1.20 2007/05/28 15:01:57 blymn 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 = (SCREEN *) malloc(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 (!new_screen->tc_ho && !new_screen->tc_cm)
 159                 goto error_exit;
 160
 161         new_screen->winlistp = NULL;
 162
 163         if ((new_screen->curscr = __newwin(new_screen, 0,
 164             0, 0, 0, FALSE)) == NULL)
 165                 goto error_exit;
 166
 167         if ((new_screen->stdscr = __newwin(new_screen, 0,
 168             0, 0, 0, FALSE)) == NULL) {
 169                 delwin(new_screen->curscr);
 170                 goto error_exit;
 171         }
 172
 173         clearok(new_screen->stdscr, 1);
 174
 175         if ((new_screen->__virtscr = __newwin(new_screen, 0,
 176             0, 0, 0, FALSE)) == NULL) {
 177                 delwin(new_screen->curscr);
 178                 delwin(new_screen->stdscr);
 179                 goto error_exit;
 180         }
 181
 182         __init_getch(new_screen);
 183         __init_acs(new_screen);
 184 #ifdef HAVE_WCHAR
 185         __init_get_wch( new_screen );
 186         __init_wacs(new_screen);
 187 #endif /* HAVE_WCHAR */
 188
 189         __set_stophandler();
 190         __set_winchhandler();
 191
 192           /*
 193            * bleh - it seems that apps expect the first newterm to set
 194            * up the curses screen.... emulate this.
 195            */
 196         if (_cursesi_screen == NULL || _cursesi_screen->endwin) {
 197                 set_term(new_screen);
 198         }
 199
 200 #ifdef DEBUG
 201         __CTRACE(__CTRACE_SCREEN, "newterm: LINES = %d, COLS = %d\n",
 202             LINES, COLS);
 203 #endif
 204         __startwin(new_screen);
 205
 206         return new_screen;
 207
 208   error_exit:
 209         free(new_screen);
 210         return NULL;
 211 }
 212
 213 /*
 214  * delscreen --
 215  *   Free resources used by the given screen and destroy it.
 216  *
 217  */
 218 void
 219 delscreen(SCREEN *screen)
 220 {
 221         struct __winlist *list;
 222
 223 #ifdef DEBUG
 224         __CTRACE(__CTRACE_SCREEN, "delscreen(%p)\n", screen);
 225 #endif
 226           /* free up the termcap entry stuff */
 227         t_freent(screen->cursesi_genbuf);
 228
 229           /* walk the window list and kill all the parent windows */
 230         while ((list = screen->winlistp) != NULL) {
 231                 delwin(list->winp);
 232                 if (list == screen->winlistp)
 233                         /* sanity - abort if window didn't remove itself */
 234                         break;
 235         }
 236
 237           /* free the storage of the keymaps */
 238         _cursesi_free_keymap(screen->base_keymap);
 239
 240         free(screen->stdbuf);
 241         screen->stdbuf = NULL;
 242         if (_cursesi_screen == screen)
 243                 _cursesi_screen = NULL;
 244         free(screen);
 245 }