1 1.22 rin /* $NetBSD: delwin.c,v 1.22 2021/09/06 07:03:49 rin Exp $ */ 2 1.7 mikel 3 1.1 cgd /* 4 1.6 cgd * Copyright (c) 1981, 1993, 1994 5 1.4 cgd * The Regents of the University of California. All rights reserved. 6 1.1 cgd * 7 1.1 cgd * Redistribution and use in source and binary forms, with or without 8 1.1 cgd * modification, are permitted provided that the following conditions 9 1.1 cgd * are met: 10 1.1 cgd * 1. Redistributions of source code must retain the above copyright 11 1.1 cgd * notice, this list of conditions and the following disclaimer. 12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright 13 1.1 cgd * notice, this list of conditions and the following disclaimer in the 14 1.1 cgd * documentation and/or other materials provided with the distribution. 15 1.13 agc * 3. Neither the name of the University nor the names of its contributors 16 1.1 cgd * may be used to endorse or promote products derived from this software 17 1.1 cgd * without specific prior written permission. 18 1.1 cgd * 19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 1.1 cgd * SUCH DAMAGE. 30 1.1 cgd */ 31 1.1 cgd 32 1.7 mikel #include <sys/cdefs.h> 33 1.1 cgd #ifndef lint 34 1.7 mikel #if 0 35 1.6 cgd static char sccsid[] = "@(#)delwin.c 8.2 (Berkeley) 5/4/94"; 36 1.7 mikel #else 37 1.22 rin __RCSID("$NetBSD: delwin.c,v 1.22 2021/09/06 07:03:49 rin Exp $"); 38 1.7 mikel #endif 39 1.9 mrg #endif /* not lint */ 40 1.1 cgd 41 1.3 mycroft #include <stdlib.h> 42 1.6 cgd 43 1.6 cgd #include "curses.h" 44 1.10 blymn #include "curses_private.h" 45 1.1 cgd 46 1.1 cgd /* 47 1.3 mycroft * delwin -- 48 1.3 mycroft * Delete a window and release it back to the system. 49 1.1 cgd */ 50 1.3 mycroft int 51 1.11 blymn delwin(WINDOW *win) 52 1.3 mycroft { 53 1.8 perry WINDOW *wp, *np; 54 1.12 dsl struct __winlist *wl, *pwl; 55 1.12 dsl SCREEN *screen; 56 1.1 cgd 57 1.15 jdc __CTRACE(__CTRACE_WINDOW, "delwin(%p)\n", win); 58 1.18 roy 59 1.18 roy if (win == NULL) 60 1.20 roy return OK; 61 1.18 roy 62 1.16 blymn /* 63 1.16 blymn * Free any storage used by non-spacing characters in the window. 64 1.16 blymn */ 65 1.16 blymn #ifdef HAVE_WCHAR 66 1.16 blymn __cursesi_win_free_nsp(win); 67 1.16 blymn #endif 68 1.16 blymn 69 1.4 cgd if (win->orig == NULL) { 70 1.1 cgd /* 71 1.3 mycroft * If we are the original window, delete the space for all 72 1.12 dsl * the subwindows and the window space. 73 1.1 cgd */ 74 1.4 cgd free(win->wspace); 75 1.4 cgd wp = win->nextp; 76 1.1 cgd while (wp != win) { 77 1.4 cgd np = wp->nextp; 78 1.1 cgd delwin(wp); 79 1.1 cgd wp = np; 80 1.1 cgd } 81 1.12 dsl /* Remove ourselves from the list of windows on the screen. */ 82 1.12 dsl pwl = NULL; 83 1.12 dsl screen = win->screen; 84 1.12 dsl for (wl = screen->winlistp; wl; pwl = wl, wl = wl->nextp) { 85 1.12 dsl if (wl->winp != win) 86 1.12 dsl continue; 87 1.12 dsl if (pwl != NULL) 88 1.12 dsl pwl->nextp = wl->nextp; 89 1.12 dsl else 90 1.12 dsl screen->winlistp = wl->nextp; 91 1.12 dsl free(wl); 92 1.12 dsl break; 93 1.12 dsl } 94 1.3 mycroft } else { 95 1.1 cgd /* 96 1.3 mycroft * If we are a subwindow, take ourselves out of the list. 97 1.3 mycroft * NOTE: if we are a subwindow, the minimum list is orig 98 1.3 mycroft * followed by this subwindow, so there are always at least 99 1.3 mycroft * two windows in the list. 100 1.1 cgd */ 101 1.4 cgd for (wp = win->nextp; wp->nextp != win; wp = wp->nextp) 102 1.1 cgd continue; 103 1.4 cgd wp->nextp = win->nextp; 104 1.1 cgd } 105 1.12 dsl free(win->lspace); 106 1.17 roy free(win->alines); 107 1.14 jdc if (win == _cursesi_screen->curscr) 108 1.14 jdc _cursesi_screen->curscr = NULL; 109 1.14 jdc if (win == _cursesi_screen->stdscr) 110 1.14 jdc _cursesi_screen->stdscr = NULL; 111 1.14 jdc if (win == _cursesi_screen->__virtscr) 112 1.14 jdc _cursesi_screen->__virtscr = NULL; 113 1.19 christos if (win->fp) 114 1.19 christos fclose(win->fp); 115 1.21 roy free(win->buf); 116 1.1 cgd free(win); 117 1.20 roy return OK; 118 1.1 cgd } 119