ncurses 6.2 - patch 20200912
[ncurses.git] / ncurses / base / resizeterm.c
index 9cc8081b9115ef48de76a567706d89feb6491978..9b04287cb56f64d0de4165d821575649c2460983 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998-2001,2002 Free Software Foundation, Inc.              *
+ * Copyright 2020 Thomas E. Dickey                                          *
+ * Copyright 1998-2015,2016 Free Software Foundation, Inc.                  *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -28,6 +29,7 @@
 
 /****************************************************************************
  *  Author: Thomas E. Dickey                                                *
+ *     and: Juergen Pfeifer                                                 *
  ****************************************************************************/
 
 /*
  */
 
 #include <curses.priv.h>
-#include <term.h>
 
-MODULE_ID("$Id: resizeterm.c,v 1.14 2002/07/13 21:32:57 tom Exp $")
+#ifndef CUR
+#define CUR SP_TERMTYPE
+#endif
+
+MODULE_ID("$Id: resizeterm.c,v 1.50 2020/02/02 23:34:34 tom Exp $")
+
+/*
+ * If we're trying to be reentrant, do not want any local statics.
+ */
+#if USE_REENTRANT
+#define EXTRA_ARGS ,     CurLines,     CurCols
+#define EXTRA_DCLS , int CurLines, int CurCols
+#else
+static int current_lines;
+static int current_cols;
+#define CurLines current_lines
+#define CurCols  current_cols
+#define EXTRA_ARGS             /* nothing */
+#define EXTRA_DCLS             /* nothing */
+#endif
+
+#if NCURSES_SP_FUNCS && !defined(USE_SP_WINDOWLIST)
+#define UNUSED_SP  (void) sp
+#else
+#define UNUSED_SP              /* nothing */
+#endif
+
+#ifdef TRACE
+static void
+show_window_sizes(const char *name)
+{
+    SCREEN *sp;
+    WINDOWLIST *wp;
+
+    _nc_lock_global(curses);
+    for (each_screen(sp)) {
+       _tracef("%s resizing: %p: %2d x %2d (%2d x %2d)", name, (void *) sp,
+               *(ptrLines(sp)),
+               *(ptrCols(sp)),
+               screen_lines(sp), screen_columns(sp));
+       for (each_window(sp, wp)) {
+           _tracef("  window %p is %2ld x %2ld at %2ld,%2ld",
+                   (void *) &(wp->win),
+                   (long) wp->win._maxy + 1,
+                   (long) wp->win._maxx + 1,
+                   (long) wp->win._begy,
+                   (long) wp->win._begx);
+       }
+    }
+    _nc_unlock_global(curses);
+}
+#endif
 
-#define stolen_lines (screen_lines - SP->_lines_avail)
+/*
+ * Return true if the given dimensions do not match the internal terminal
+ * structure's size.
+ */
+NCURSES_EXPORT(bool)
+NCURSES_SP_NAME(is_term_resized) (NCURSES_SP_DCLx int ToLines, int ToCols)
+{
+    T((T_CALLED("is_term_resized(%p, %d, %d)"), (void *) SP_PARM, ToLines, ToCols));
+    returnCode(ToLines > 0
+              && ToCols > 0
+              && (ToLines != screen_lines(SP_PARM)
+                  || ToCols != screen_columns(SP_PARM)));
+}
 
+#if NCURSES_SP_FUNCS
 NCURSES_EXPORT(bool)
 is_term_resized(int ToLines, int ToCols)
 {
-    return (ToLines != screen_lines
-           || ToCols != screen_columns);
+    return NCURSES_SP_NAME(is_term_resized) (CURRENT_SCREEN, ToLines, ToCols);
+}
+#endif
+
+/*
+ */
+static ripoff_t *
+ripped_window(WINDOW *win)
+{
+    ripoff_t *result = 0;
+    ripoff_t *rop;
+
+    if (win != 0) {
+#ifdef USE_SP_RIPOFF
+       SCREEN *sp = _nc_screen_of(win);
+#endif
+       for (each_ripoff(rop)) {
+           if (rop->win == win && rop->line != 0) {
+               result = rop;
+               break;
+           }
+       }
+    }
+    return result;
+}
+
+/*
+ * Returns the number of lines from the bottom for the beginning of a ripped
+ * off window.
+ */
+static int
+ripped_bottom(WINDOW *win)
+{
+    int result = 0;
+
+    if (win != 0) {
+       ripoff_t *rop;
+
+#ifdef USE_SP_RIPOFF
+       SCREEN *sp = _nc_screen_of(win);
+#endif
+       for (each_ripoff(rop)) {
+           if (rop->line < 0) {
+               result -= rop->line;
+               if (rop->win == win) {
+                   break;
+               }
+           }
+       }
+    }
+    return result;
 }
 
 /*
@@ -61,9 +175,12 @@ child_depth(WINDOW *cmp)
     int depth = 0;
 
     if (cmp != 0) {
+#ifdef USE_SP_WINDOWLIST
+       SCREEN *sp = _nc_screen_of(cmp);
+#endif
        WINDOWLIST *wp;
 
-       for (wp = _nc_windows; wp != 0; wp = wp->next) {
+       for (each_window(sp, wp)) {
            WINDOW *tst = &(wp->win);
            if (tst->_parent == cmp) {
                depth = 1 + child_depth(tst);
@@ -96,41 +213,59 @@ parent_depth(WINDOW *cmp)
  * FIXME: must adjust position so it's within the parent!
  */
 static int
-adjust_window(WINDOW *win, int ToLines, int ToCols, int stolen)
+adjust_window(WINDOW *win, int ToLines, int ToCols, int stolen EXTRA_DCLS)
 {
     int result;
-    int bottom = screen_lines + SP->_topstolen - stolen;
+    int bottom = CurLines + _nc_screen_of(win)->_topstolen - stolen;
     int myLines = win->_maxy + 1;
     int myCols = win->_maxx + 1;
-
-    T((T_CALLED("adjust_window(%p,%d,%d) currently %dx%d at %d,%d"),
-       win, ToLines, ToCols,
-       getmaxy(win), getmaxx(win),
-       getbegy(win), getbegx(win)));
-
-    if (win->_begy >= bottom) {
-       win->_begy += (ToLines - screen_lines);
+    ripoff_t *rop = ripped_window(win);
+
+    T((T_CALLED("adjust_window(%p,%d,%d)%s depth %d/%d currently %ldx%ld at %ld,%ld"),
+       (void *) win, ToLines, ToCols,
+       (rop != 0) ? " (rip)" : "",
+       parent_depth(win),
+       child_depth(win),
+       (long) getmaxy(win), (long) getmaxx(win),
+       (long) getbegy(win) + win->_yoffset, (long) getbegx(win)));
+
+    if (rop != 0 && rop->line < 0) {
+       /*
+        * If it is a ripped-off window at the bottom of the screen, simply
+        * move it to the same relative position.
+        */
+       win->_begy = (NCURSES_SIZE_T) (ToLines - ripped_bottom(win) - 0 - win->_yoffset);
+       if (rop->hook == _nc_slk_initialize)
+           _nc_format_slks(
+#if NCURSES_SP_FUNCS
+                              _nc_screen_of(win),
+#endif
+                              ToCols);
+    } else if (win->_begy >= bottom) {
+       /*
+        * If it is below the bottom of the new screen, move up by the same
+        * amount that the screen shrank.
+        */
+       win->_begy = (NCURSES_SIZE_T) (win->_begy + (ToLines - CurLines));
     } else {
-       if (myLines == screen_lines - stolen
-           && ToLines != screen_lines)
+       if (myLines == (CurLines - stolen)
+           && ToLines != CurLines) {
            myLines = ToLines - stolen;
-       else if (myLines == screen_lines
-                && ToLines != screen_lines)
+       } else if (myLines == CurLines
+                  && ToLines != CurLines) {
            myLines = ToLines;
+       }
     }
 
-    if (myLines > ToLines)
+    if (myLines > ToLines) {
        myLines = ToLines;
+    }
 
     if (myCols > ToCols)
        myCols = ToCols;
 
-    if (myLines == screen_lines
-       && ToLines != screen_lines)
-       myCols = ToLines;
-
-    if (myCols == screen_columns
-       && ToCols != screen_columns)
+    if (myCols == CurCols
+       && ToCols != CurCols)
        myCols = ToCols;
 
     result = wresize(win, myLines, myCols);
@@ -142,24 +277,27 @@ adjust_window(WINDOW *win, int ToLines, int ToCols, int stolen)
  * children, decrease those to fit, then decrease the containing window, etc.
  */
 static int
-decrease_size(int ToLines, int ToCols, int stolen)
+decrease_size(NCURSES_SP_DCLx int ToLines, int ToCols, int stolen EXTRA_DCLS)
 {
     bool found;
     int depth = 0;
     WINDOWLIST *wp;
 
-    T((T_CALLED("decrease_size(%d, %d)"), ToLines, ToCols));
+    T((T_CALLED("decrease_size(%p, %d, %d)"), (void *) SP_PARM, ToLines, ToCols));
+    UNUSED_SP;
 
     do {
        found = FALSE;
        TR(TRACE_UPDATE, ("decreasing size of windows to %dx%d, depth=%d",
                          ToLines, ToCols, depth));
-       for (wp = _nc_windows; wp != 0; wp = wp->next) {
+       for (each_window(SP_PARM, wp)) {
            WINDOW *win = &(wp->win);
 
            if (!(win->_flags & _ISPAD)) {
                if (child_depth(win) == depth) {
-                   if (adjust_window(win, ToLines, ToCols, stolen) != OK)
+                   found = TRUE;
+                   if (adjust_window(win, ToLines, ToCols,
+                                     stolen EXTRA_ARGS) != OK)
                        returnCode(ERR);
                }
            }
@@ -174,24 +312,27 @@ decrease_size(int ToLines, int ToCols, int stolen)
  * parent, increase those to fit, then increase the contained window, etc.
  */
 static int
-increase_size(int ToLines, int ToCols, int stolen)
+increase_size(NCURSES_SP_DCLx int ToLines, int ToCols, int stolen EXTRA_DCLS)
 {
     bool found;
     int depth = 0;
     WINDOWLIST *wp;
 
-    T((T_CALLED("increase_size(%d, %d)"), ToLines, ToCols));
+    T((T_CALLED("increase_size(%p, %d, %d)"), (void *) SP_PARM, ToLines, ToCols));
+    UNUSED_SP;
 
     do {
        found = FALSE;
        TR(TRACE_UPDATE, ("increasing size of windows to %dx%d, depth=%d",
                          ToLines, ToCols, depth));
-       for (wp = _nc_windows; wp != 0; wp = wp->next) {
+       for (each_window(SP_PARM, wp)) {
            WINDOW *win = &(wp->win);
 
            if (!(win->_flags & _ISPAD)) {
                if (parent_depth(win) == depth) {
-                   if (adjust_window(win, ToLines, ToCols, stolen) != OK)
+                   found = TRUE;
+                   if (adjust_window(win, ToLines, ToCols,
+                                     stolen EXTRA_ARGS) != OK)
                        returnCode(ERR);
                }
            }
@@ -206,55 +347,117 @@ increase_size(int ToLines, int ToCols, int stolen)
  * such as ungetch().
  */
 NCURSES_EXPORT(int)
-resize_term(int ToLines, int ToCols)
+NCURSES_SP_NAME(resize_term) (NCURSES_SP_DCLx int ToLines, int ToCols)
 {
-    int result = OK;
-    int was_stolen = (screen_lines - SP->_lines_avail);
+    int result = OK EXTRA_ARGS;
+    int was_stolen;
+
+    T((T_CALLED("resize_term(%p,%d,%d) old(%d,%d)"),
+       (void *) SP_PARM, ToLines, ToCols,
+       (SP_PARM == 0) ? -1 : screen_lines(SP_PARM),
+       (SP_PARM == 0) ? -1 : screen_columns(SP_PARM)));
+
+    if (SP_PARM == 0 || ToLines <= 0 || ToCols <= 0) {
+       returnCode(ERR);
+    }
 
-    T((T_CALLED("resize_term(%d,%d) old(%d,%d)"),
-       ToLines, ToCols,
-       screen_lines, screen_columns));
+    _nc_nonsp_lock_global(curses);
 
-    if (is_term_resized(ToLines, ToCols)) {
-       int myLines = screen_lines;
-       int myCols = screen_columns;
+    was_stolen = (screen_lines(SP_PARM) - SP_PARM->_lines_avail);
+    if (NCURSES_SP_NAME(is_term_resized) (NCURSES_SP_ARGx ToLines, ToCols)) {
+       int myLines = CurLines = screen_lines(SP_PARM);
+       int myCols = CurCols = screen_columns(SP_PARM);
 
-       if (ToLines > screen_lines) {
-           increase_size(myLines = ToLines, myCols, was_stolen);
+#ifdef TRACE
+       if (USE_TRACEF(TRACE_UPDATE)) {
+           show_window_sizes("before");
+           _nc_unlock_global(tracef);
+       }
+#endif
+       if (ToLines > screen_lines(SP_PARM)) {
+           result = increase_size(NCURSES_SP_ARGx
+                                  myLines = ToLines,
+                                  myCols,
+                                  was_stolen EXTRA_ARGS);
+           CurLines = myLines;
+           CurCols = myCols;
        }
 
-       if (ToCols > screen_columns) {
-           increase_size(myLines, myCols = ToCols, was_stolen);
+       if ((result == OK)
+           && (ToCols > screen_columns(SP_PARM))) {
+           result = increase_size(NCURSES_SP_ARGx
+                                  myLines,
+                                  myCols = ToCols,
+                                  was_stolen EXTRA_ARGS);
+           CurLines = myLines;
+           CurCols = myCols;
        }
 
-       if (ToLines < myLines ||
-           ToCols < myCols) {
-           decrease_size(ToLines, ToCols, was_stolen);
+       if ((result == OK)
+           && (ToLines < myLines ||
+               ToCols < myCols)) {
+           result = decrease_size(NCURSES_SP_ARGx
+                                  ToLines,
+                                  ToCols,
+                                  was_stolen EXTRA_ARGS);
        }
 
-       screen_lines = lines = ToLines;
-       screen_columns = columns = ToCols;
+       if (result == OK) {
+           screen_lines(SP_PARM) = (NCURSES_SIZE_T) ToLines;
+           screen_columns(SP_PARM) = (NCURSES_SIZE_T) ToCols;
 
-       SP->_lines_avail = lines - was_stolen;
+#ifdef USE_TERM_DRIVER
+           CallDriver_2(SP_PARM, td_setsize, ToLines, ToCols);
+#else
+           lines = (NCURSES_SIZE_T) ToLines;
+           columns = (NCURSES_SIZE_T) ToCols;
+#endif
 
-       if (SP->oldhash) {
-           FreeAndNull(SP->oldhash);
-       }
-       if (SP->newhash) {
-           FreeAndNull(SP->newhash);
+           SP_PARM->_lines_avail = (NCURSES_SIZE_T) (ToLines - was_stolen);
+
+           if (SP_PARM->oldhash) {
+               FreeAndNull(SP_PARM->oldhash);
+           }
+           if (SP_PARM->newhash) {
+               FreeAndNull(SP_PARM->newhash);
+           }
+#ifdef TRACE
+           if (USE_TRACEF(TRACE_UPDATE)) {
+               SET_LINES(ToLines - was_stolen);
+               SET_COLS(ToCols);
+               show_window_sizes("after");
+               _nc_unlock_global(tracef);
+           }
+#endif
        }
     }
 
-    /*
-     * Always update LINES, to allow for call from lib_doupdate.c which
-     * needs to have the count adjusted by the stolen (ripped off) lines.
-     */
-    LINES = ToLines - was_stolen;
-    COLS = ToCols;
+    if (result == OK) {
+       /*
+        * Always update LINES, to allow for call from lib_doupdate.c which
+        * needs to have the count adjusted by the stolen (ripped off) lines.
+        */
+       SET_LINES(ToLines - was_stolen);
+       SET_COLS(ToCols);
+    }
+
+    _nc_nonsp_unlock_global(curses);
 
     returnCode(result);
 }
 
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(int)
+resize_term(int ToLines, int ToCols)
+{
+    int res;
+    _nc_sp_lock_global(curses);
+    res = NCURSES_SP_NAME(resize_term) (CURRENT_SCREEN, ToLines, ToCols);
+    _nc_sp_unlock_global(curses);
+    return (res);
+}
+#endif
+
 /*
  * This function reallocates NCURSES window structures.  It is invoked in
  * response to a SIGWINCH interrupt.  Other user-defined windows may also need
@@ -264,25 +467,74 @@ resize_term(int ToLines, int ToCols)
  * invoked directly from the signal handler.
  */
 NCURSES_EXPORT(int)
-resizeterm(int ToLines, int ToCols)
+NCURSES_SP_NAME(resizeterm) (NCURSES_SP_DCLx int ToLines, int ToCols)
 {
-    int result = OK;
-
-    SP->_sig_winch = FALSE;
+    int result = ERR;
 
-    T((T_CALLED("resizeterm(%d,%d) old(%d,%d)"),
-       ToLines, ToCols,
-       screen_lines, screen_columns));
+    T((T_CALLED("resizeterm(%p, %d,%d) old(%d,%d)"),
+       (void *) SP_PARM, ToLines, ToCols,
+       (SP_PARM == 0) ? -1 : screen_lines(SP_PARM),
+       (SP_PARM == 0) ? -1 : screen_columns(SP_PARM)));
 
-    if (is_term_resized(ToLines, ToCols)) {
+    if (SP_PARM != 0 && ToLines > 0 && ToCols > 0) {
+       result = OK;
+       SP_PARM->_sig_winch = FALSE;
 
+       if (NCURSES_SP_NAME(is_term_resized) (NCURSES_SP_ARGx ToLines, ToCols)) {
 #if USE_SIGWINCH
-       ungetch(KEY_RESIZE);    /* so application can know this */
-       clearok(curscr, TRUE);  /* screen contents are unknown */
+           ripoff_t *rop;
+           bool slk_visible = (SP_PARM != 0
+                               && SP_PARM->_slk != 0
+                               && !(SP_PARM->_slk->hidden));
+
+           if (slk_visible) {
+               slk_clear();
+           }
 #endif
+           result = NCURSES_SP_NAME(resize_term) (NCURSES_SP_ARGx ToLines, ToCols);
+
+#if USE_SIGWINCH
+           clearok(CurScreen(SP_PARM), TRUE);  /* screen contents are unknown */
+
+           /* ripped-off lines are a special case: if we did not lengthen
+            * them, we haven't moved them either.  repaint them, too.
+            *
+            * for the rest - stdscr and other windows - the client has to
+            * decide which to repaint, since without panels, ncurses does
+            * not know which are really on top.
+            */
+           for (each_ripoff(rop)) {
+               if (rop->win != StdScreen(SP_PARM)
+                   && rop->win != 0
+                   && rop->line < 0) {
+
+                   if (rop->hook != _nc_slk_initialize) {
+                       touchwin(rop->win);
+                       wnoutrefresh(rop->win);
+                   }
+               }
+           }
 
-       result = resize_term(ToLines, ToCols);
+           /* soft-keys are a special case: we _know_ how to repaint them */
+           if (slk_visible) {
+               NCURSES_SP_NAME(slk_restore) (NCURSES_SP_ARG);
+               NCURSES_SP_NAME(slk_touch) (NCURSES_SP_ARG);
+               NCURSES_SP_NAME(slk_refresh) (NCURSES_SP_ARG);
+           }
+#endif
+       }
+#if USE_SIGWINCH
+       safe_ungetch(SP_PARM, KEY_RESIZE);      /* so application can know this */
+#endif
     }
 
     returnCode(result);
 }
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(int)
+resizeterm(int ToLines, int ToCols)
+{
+    return NCURSES_SP_NAME(resizeterm) (CURRENT_SCREEN, ToLines, ToCols);
+}
+#endif