ncurses 5.7 - patch 20090419

[ncurses.git] / ncurses / base / lib_freeall.c

diff --git a/ncurses/base/lib_freeall.c b/ncurses/base/lib_freeall.c
index 324e7a28274150b3de24b3ac6e108fd48e63b644..dbdf443f00821155f1998aaf361c1a760fe796a2 100644 (file)
--- a/ncurses/base/lib_freeall.c
+++ b/ncurses/base/lib_freeall.c
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 1998 Free Software Foundation, Inc.                        *
+ * Copyright (c) 1998-2008,2009 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            *
@@ -27,11 +27,12 @@
  ****************************************************************************/
 
 /****************************************************************************
- *  Author: Thomas E. Dickey <dickey@clark.net> 1996,1997                   *
+ *  Author: Thomas E. Dickey                    1996-on                     *
  ****************************************************************************/
 
 #include <curses.priv.h>
 #include <term_entry.h>
+#include <tic.h>
 
 #if HAVE_NC_FREEALL
 
@@ -39,94 +40,133 @@
 extern int malloc_errfd;       /* FIXME */
 #endif
 
-MODULE_ID("$Id: lib_freeall.c,v 1.15 1999/10/22 21:40:10 tom Exp $")
-
-static void free_slk(SLK *p)
-{
-       if (p != 0) {
-               FreeIfNeeded(p->ent);
-               FreeIfNeeded(p->buffer);
-               free(p);
-       }
-}
-
-static void free_tries(struct tries *p)
-{
-       struct tries *q;
-
-       while (p != 0) {
-               q = p->sibling;
-               if (p->child != 0)
-                       free_tries(p->child);
-               free(p);
-               p = q;
-       }
-}
+MODULE_ID("$Id: lib_freeall.c,v 1.57 2009/04/19 14:31:26 tom Exp $")
 
 /*
  * Free all ncurses data.  This is used for testing only (there's no practical
  * use for it as an extension).
  */
-void _nc_freeall(void)
+NCURSES_EXPORT(void)
+NCURSES_SP_NAME(_nc_freeall) (NCURSES_SP_DCL0)
 {
-       WINDOWLIST *p, *q;
+    WINDOWLIST *p, *q;
+    static va_list empty_va;
 
+    T((T_CALLED("_nc_freeall()")));
 #if NO_LEAKS
-       _nc_free_tparm();
+    if (SP_PARM != 0) {
+       if (SP_PARM->_oldnum_list != 0) {
+           FreeAndNull(SP_PARM->_oldnum_list);
+       }
+       if (SP_PARM->_panelHook.destroy != 0) {
+           SP_PARM->_panelHook.destroy(SP_PARM->_panelHook.stdscr_pseudo_panel);
+       }
+    }
 #endif
+    if (SP_PARM != 0) {
+       _nc_lock_global(curses);
+
        while (_nc_windows != 0) {
-               /* Delete only windows that're not a parent */
-               for (p = _nc_windows; p != 0; p = p->next) {
-                       bool found = FALSE;
-
-                       for (q = _nc_windows; q != 0; q = q->next) {
-                               if ((p != q)
-                                && (q->win->_flags & _SUBWIN)
-                                && (p->win == q->win->_parent)) {
-                                       found = TRUE;
-                                       break;
-                               }
-                       }
-
-                       if (!found) {
-                               delwin(p->win);
-                               break;
-                       }
+           bool deleted = FALSE;
+
+           /* Delete only windows that're not a parent */
+           for (each_window(p)) {
+               bool found = FALSE;
+
+               for (each_window(q)) {
+                   if ((p != q)
+                       && (q->win._flags & _SUBWIN)
+                       && (&(p->win) == q->win._parent)) {
+                       found = TRUE;
+                       break;
+                   }
                }
-       }
 
-       if (SP != 0) {
-               free_tries (SP->_keytry);
-               free_tries (SP->_key_ok);
-               free_slk(SP->_slk);
-               FreeIfNeeded(SP->_color_pairs);
-               FreeIfNeeded(SP->_color_table);
-#if !BROKEN_LINKER
-               FreeAndNull(SP);
-#endif
-       }
+               if (!found) {
+                   if (delwin(&(p->win)) != ERR)
+                       deleted = TRUE;
+                   break;
+               }
+           }
 
-       if (cur_term != 0) {
-               _nc_free_termtype(&(cur_term->type));
-               free(cur_term);
+           /*
+            * Don't continue to loop if the list is trashed.
+            */
+           if (!deleted)
+               break;
        }
+       delscreen(SP_PARM);
+       _nc_unlock_global(curses);
+    }
 
+    (void) _nc_printf_string(0, empty_va);
 #ifdef TRACE
-       (void) _nc_trace_buf(-1, 0);
+    (void) _nc_trace_buf(-1, 0);
 #endif
+#if USE_WIDEC_SUPPORT
+    FreeIfNeeded(_nc_wacs);
+#endif
+    _nc_leaks_tinfo();
+
 #if HAVE_LIBDBMALLOC
-       malloc_dump(malloc_errfd);
+    malloc_dump(malloc_errfd);
 #elif HAVE_LIBDMALLOC
+#elif HAVE_LIBMPATROL
+    __mp_summary();
 #elif HAVE_PURIFY
-       purify_all_inuse();
+    purify_all_inuse();
 #endif
+    returnVoid;
 }
 
-void _nc_free_and_exit(int code)
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(void)
+_nc_freeall(void)
 {
-       _nc_freeall();
-       exit(code);
+    NCURSES_SP_NAME(_nc_freeall) (CURRENT_SCREEN);
 }
+#endif
+
+NCURSES_EXPORT(void)
+NCURSES_SP_NAME(_nc_free_and_exit) (NCURSES_SP_DCLx int code)
+{
+    char *last_setbuf = (SP_PARM != 0) ? SP_PARM->_setbuf : 0;
+
+    NCURSES_SP_NAME(_nc_freeall) (NCURSES_SP_ARG);
+#ifdef TRACE
+    trace(0);                  /* close trace file, freeing its setbuf */
+    {
+       static va_list fake;
+       free(_nc_varargs("?", fake));
+    }
+#endif
+    fclose(stdout);
+    FreeIfNeeded(last_setbuf);
+    exit(code);
+}
+
 #else
-void _nc_freeall(void) { }
+NCURSES_EXPORT(void)
+_nc_freeall(void)
+{
+}
+
+NCURSES_EXPORT(void)
+NCURSES_SP_NAME(_nc_free_and_exit) (NCURSES_SP_DCLx int code)
+{
+    if (SP_PARM) {
+       delscreen(SP_PARM);
+       if (SP_PARM->_term)
+           NCURSES_SP_NAME(del_curterm) (NCURSES_SP_ARGx SP_PARM->_term);
+    }
+    exit(code);
+}
+#endif
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(void)
+_nc_free_and_exit(int code)
+{
+    NCURSES_SP_NAME(_nc_free_and_exit) (CURRENT_SCREEN, code);
+}
 #endif