ncurses 6.2 - patch 20210313

[ncurses.git] / panel / p_new.c

diff --git a/panel/p_new.c b/panel/p_new.c
index f2f208d6ec7b68cb2a9ebb9eaa302d4fbdd5b8fb..a7c5a4e2db214d9f3c15a54632d5349bd6b4467b 100644 (file)
--- a/panel/p_new.c
+++ b/panel/p_new.c
@@ -1,5 +1,6 @@
 /****************************************************************************
 /****************************************************************************

- * Copyright (c) 1998 Free Software Foundation, Inc.                        *
+ * Copyright 2020 Thomas E. Dickey                                          *
+ * Copyright 1998-2009,2010 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            *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *


@@ -29,6 +30,8 @@
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1995                    *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1995                    *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *

+ *     and: Juergen Pfeifer                         1997-1999               *
+ *     and: Thomas E. Dickey                        2000-on                 *

  ****************************************************************************/
 
 /* p_new.c
  ****************************************************************************/
 
 /* p_new.c


@@ -36,56 +39,91 @@
  */
 #include "panel.priv.h"
 
  */
 #include "panel.priv.h"
 

-MODULE_ID("$Id: p_new.c,v 1.4 1999/09/29 15:22:32 juergen Exp $")
+MODULE_ID("$Id: p_new.c,v 1.22 2020/12/26 18:25:48 tom Exp $")
+
+#ifdef TRACE
+static char *stdscr_id;
+static char *new_id;
+
+static PANEL *
+AllocPanel(const char *name)
+{
+  PANEL *result = typeMalloc(PANEL, 1);
+
+  _tracef("create :%s %p", name, (void *)result);
+  return result;
+}
+#define InitUser(name) \
+       if (!name ## _id) \
+           name ## _id = strdup(#name); \
+       pan->user = name ## _id; \
+       _tracef("create :user_ptr %p", pan->user)
+#else
+#define AllocPanel(name) typeMalloc(PANEL, 1)
+#define InitUser(name) \
+         pan->user = (void *)0
+#endif

 
 /*+-------------------------------------------------------------------------
   Get root (i.e. stdscr's) panel.
   Establish the pseudo panel for stdscr if necessary.
 --------------------------------------------------------------------------*/
 
 /*+-------------------------------------------------------------------------
   Get root (i.e. stdscr's) panel.
   Establish the pseudo panel for stdscr if necessary.
 --------------------------------------------------------------------------*/

-static PANEL*
-root_panel(void)
+static PANEL *
+root_panel(NCURSES_SP_DCL0)

 {
 {

-  if(_nc_stdscr_pseudo_panel == (PANEL*)0)
+#if NCURSES_SP_FUNCS
+  struct panelhook *ph = NCURSES_SP_NAME(_nc_panelhook) (sp);
+
+#elif NO_LEAKS
+  struct panelhook *ph = _nc_panelhook();
+#endif
+
+  if (_nc_stdscr_pseudo_panel == (PANEL *)0)

     {
     {

-      
-      assert(stdscr && !_nc_bottom_panel && !_nc_top_panel);
-      _nc_stdscr_pseudo_panel = (PANEL*)malloc(sizeof(PANEL));
-      if (_nc_stdscr_pseudo_panel != 0) {
-       PANEL* pan  = _nc_stdscr_pseudo_panel;
-       WINDOW* win = stdscr;
-       pan->win = win;
-       pan->below   = (PANEL*)0;
-       pan->above   = (PANEL*)0;
-#ifdef TRACE
-       pan->user = "stdscr";
-#else
-       pan->user = (void*)0;
+
+      assert(SP_PARM && SP_PARM->_stdscr && !_nc_bottom_panel && !_nc_top_panel);
+#if NO_LEAKS
+      ph->destroy = del_panel;

 #endif
 #endif

-       _nc_bottom_panel = _nc_top_panel = pan;
-      }
+      _nc_stdscr_pseudo_panel = AllocPanel("root_panel");
+      if (_nc_stdscr_pseudo_panel != 0)
+       {
+         PANEL *pan = _nc_stdscr_pseudo_panel;
+         WINDOW *win = SP_PARM->_stdscr;
+
+         pan->win = win;
+         pan->below = (PANEL *)0;
+         pan->above = (PANEL *)0;
+         InitUser(stdscr);
+         _nc_bottom_panel = _nc_top_panel = pan;
+       }

     }
   return _nc_stdscr_pseudo_panel;
 }
 
     }
   return _nc_stdscr_pseudo_panel;
 }
 

-PANEL *
+PANEL_EXPORT(PANEL *)

 new_panel(WINDOW *win)
 {
 new_panel(WINDOW *win)
 {

-  PANEL *pan = (PANEL*)0;
+  PANEL *pan = (PANEL *)0;
+
+  GetWindowHook(win);

 
 

-  (void)root_panel();
+  T((T_CALLED("new_panel(%p)"), (void *)win));
+
+  if (!win)
+    returnPanel(pan);
+
+  if (!_nc_stdscr_pseudo_panel)
+    (void)root_panel(NCURSES_SP_ARG);

   assert(_nc_stdscr_pseudo_panel);
 
   assert(_nc_stdscr_pseudo_panel);
 

-  if (!(win->_flags & _ISPAD) && (pan = (PANEL*)malloc(sizeof(PANEL))))
+  if (!(win->_flags & _ISPAD) && (pan = AllocPanel("new_panel")))

     {
       pan->win = win;
       pan->above = (PANEL *)0;
       pan->below = (PANEL *)0;
     {
       pan->win = win;
       pan->above = (PANEL *)0;
       pan->below = (PANEL *)0;

-#ifdef TRACE
-      pan->user = "new";
-#else
-      pan->user = (char *)0;
-#endif
+      InitUser(new);

       (void)show_panel(pan);
     }
       (void)show_panel(pan);
     }

-  return(pan);
+  returnPanel(pan);

 }
 }