]> ncurses.scripts.mit.edu Git - ncurses.git/blob - panel/p_above.c
ncurses 5.9 - patch 20150404
[ncurses.git] / panel / p_above.c
1 /****************************************************************************
2  * Copyright (c) 1998-2010,2012 Free Software Foundation, Inc.              *
3  *                                                                          *
4  * Permission is hereby granted, free of charge, to any person obtaining a  *
5  * copy of this software and associated documentation files (the            *
6  * "Software"), to deal in the Software without restriction, including      *
7  * without limitation the rights to use, copy, modify, merge, publish,      *
8  * distribute, distribute with modifications, sublicense, and/or sell       *
9  * copies of the Software, and to permit persons to whom the Software is    *
10  * furnished to do so, subject to the following conditions:                 *
11  *                                                                          *
12  * The above copyright notice and this permission notice shall be included  *
13  * in all copies or substantial portions of the Software.                   *
14  *                                                                          *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
22  *                                                                          *
23  * Except as contained in this notice, the name(s) of the above copyright   *
24  * holders shall not be used in advertising or otherwise to promote the     *
25  * sale, use or other dealings in this Software without prior written       *
26  * authorization.                                                           *
27  ****************************************************************************/
28
29 /****************************************************************************
30  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1995                    *
31  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
32  *     and: Juergen Pfeifer                         1997-1999,2008          *
33  ****************************************************************************/
34
35 /* p_above.c
36  */
37 #include "panel.priv.h"
38
39 MODULE_ID("$Id: p_above.c,v 1.9 2012/03/10 23:43:41 tom Exp $")
40
41 #if NCURSES_SP_FUNCS
42 NCURSES_EXPORT(PANEL *)
43 ground_panel(SCREEN * sp)
44 {
45   T((T_CALLED("ground_panel(%p)"), (void *)sp));
46   if (sp)
47     {
48       struct panelhook *ph = NCURSES_SP_NAME(_nc_panelhook) (sp);
49
50       if (_nc_bottom_panel)     /* this is the pseudo panel */
51         returnPanel(_nc_bottom_panel->above);
52       else
53         returnPanel(0);
54     }
55   else
56     {
57       if (0 == CURRENT_SCREEN)
58         returnPanel(0);
59       else
60         returnPanel(ground_panel(CURRENT_SCREEN));
61     }
62 }
63 #endif
64
65 NCURSES_EXPORT(PANEL *)
66 panel_above(const PANEL * pan)
67 {
68   PANEL *result;
69
70   T((T_CALLED("panel_above(%p)"), (const void *)pan));
71   if (pan)
72     result = pan->above;
73   else
74     {
75 #if NCURSES_SP_FUNCS
76       result = ground_panel(CURRENT_SCREEN);
77 #else
78       /* if top and bottom are equal, we have no or only the pseudo panel;
79          if not, we return the panel above the pseudo panel */
80       result = EMPTY_STACK()? (PANEL *) 0 : _nc_bottom_panel->above;
81 #endif
82     }
83   returnPanel(result);
84 }