]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - ncurses/base/lib_slk.c
ncurses 5.7 - patch 20090808
[ncurses.git] / ncurses / base / lib_slk.c
index 2f1a92118382e9811f094d2e3f04cdef8b294f05..a1dea62660ebd75ba2ea9cd87cf5363da3505821 100644 (file)
  */
 
 #include <curses.priv.h>
-
 #include <ctype.h>
-#include <term.h>              /* num_labels, label_*, plab_norm */
 
 #ifndef CUR
-#define CUR SP_TERMTYPE 
+#define CUR SP_TERMTYPE
 #endif
 
-MODULE_ID("$Id: lib_slk.c,v 1.38 2009/05/10 00:48:29 tom Exp $")
+MODULE_ID("$Id: lib_slk.c,v 1.40 2009/07/19 00:34:07 tom Exp $")
 
 /*
  * Free any memory related to soft labels, return an error.
  */
 static int
-slk_failed(void)
+slk_failed(NCURSES_SP_DCL0)
 {
-    if (SP->_slk) {
-       FreeIfNeeded(SP->_slk->ent);
-       free(SP->_slk);
-       SP->_slk = (SLK *) 0;
+    if ((0 != SP_PARM) && SP_PARM->_slk) {
+       FreeIfNeeded(SP_PARM->_slk->ent);
+       free(SP_PARM->_slk);
+       SP_PARM->_slk = (SLK *) 0;
     }
     return ERR;
 }
 
-/*
- * Initialize soft labels.
- * Called from newterm()
- */
 NCURSES_EXPORT(int)
-_nc_slk_initialize(WINDOW *stwin, int cols)
+_nc_format_slks(NCURSES_SP_DCLx int cols)
 {
-#if NCURSES_SP_FUNCS
-    SCREEN *sp = CURRENT_SCREEN;
-#endif
-    int i, x;
-    int res = OK;
+    int gap, i, x;
     unsigned max_length;
 
-    T((T_CALLED("_nc_slk_initialize()")));
-
-    if (SP->_slk) {            /* we did this already, so simply return */
-       returnCode(OK);
-    } else if ((SP->_slk = typeCalloc(SLK, 1)) == 0)
-       returnCode(ERR);
+    if (!SP_PARM || !SP_PARM->_slk)
+       return ERR;
 
-    SP->_slk->ent = NULL;
-
-    /*
-     * If we use colors, vidputs() will suppress video attributes that conflict
-     * with colors.  In that case, we're still guaranteed that "reverse" would
-     * work.
-     */
-    if ((no_color_video & 1) == 0)
-       SetAttr(SP->_slk->attr, A_STANDOUT);
-    else
-       SetAttr(SP->_slk->attr, A_REVERSE);
-
-    SP->_slk->maxlab = ((num_labels > 0)
-                       ? num_labels
-                       : MAX_SKEY(_nc_globals.slk_format));
-    SP->_slk->maxlen = ((num_labels > 0)
-                       ? label_width * label_height
-                       : MAX_SKEY_LEN(_nc_globals.slk_format));
-    SP->_slk->labcnt = ((SP->_slk->maxlab < MAX_SKEY(_nc_globals.slk_format))
-                       ? MAX_SKEY(_nc_globals.slk_format)
-                       : SP->_slk->maxlab);
-
-    if (SP->_slk->maxlen <= 0
-       || SP->_slk->labcnt <= 0
-       || (SP->_slk->ent = typeCalloc(slk_ent,
-                                      (unsigned) SP->_slk->labcnt)) == NULL)
-       returnCode(slk_failed());
-
-    max_length = SP->_slk->maxlen;
-    for (i = 0; i < SP->_slk->labcnt; i++) {
-       size_t used = max_length + 1;
-
-       if ((SP->_slk->ent[i].ent_text = (char *) _nc_doalloc(0, used)) == 0)
-           returnCode(slk_failed());
-       memset(SP->_slk->ent[i].ent_text, 0, used);
-
-       if ((SP->_slk->ent[i].form_text = (char *) _nc_doalloc(0, used)) == 0)
-           returnCode(slk_failed());
-       memset(SP->_slk->ent[i].form_text, 0, used);
-
-       memset(SP->_slk->ent[i].form_text, ' ', max_length);
-       SP->_slk->ent[i].visible = (char) (i < SP->_slk->maxlab);
-    }
-    if (_nc_globals.slk_format >= 3) { /* PC style */
-       int gap = (cols - 3 * (3 + 4 * max_length)) / 2;
+    max_length = SP_PARM->_slk->maxlen;
+    if (SP_PARM->slk_format >= 3) {    /* PC style */
+       gap = (cols - 3 * (3 + 4 * max_length)) / 2;
 
        if (gap < 1)
            gap = 1;
 
-       for (i = x = 0; i < SP->_slk->maxlab; i++) {
-           SP->_slk->ent[i].ent_x = x;
+       for (i = x = 0; i < SP_PARM->_slk->maxlab; i++) {
+           SP_PARM->_slk->ent[i].ent_x = x;
            x += max_length;
            x += (i == 3 || i == 7) ? gap : 1;
        }
     } else {
-       if (_nc_globals.slk_format == 2) {      /* 4-4 */
-           int gap = cols - (SP->_slk->maxlab * max_length) - 6;
+       if (SP_PARM->slk_format == 2) {         /* 4-4 */
+           gap = cols - (SP_PARM->_slk->maxlab * max_length) - 6;
 
            if (gap < 1)
                gap = 1;
-           for (i = x = 0; i < SP->_slk->maxlab; i++) {
-               SP->_slk->ent[i].ent_x = x;
+           for (i = x = 0; i < SP_PARM->_slk->maxlab; i++) {
+               SP_PARM->_slk->ent[i].ent_x = x;
                x += max_length;
                x += (i == 3) ? gap : 1;
            }
        } else {
-           if (_nc_globals.slk_format == 1) {  /* 1 -> 3-2-3 */
-               int gap = (cols - (SP->_slk->maxlab * max_length) - 5)
-               / 2;
+           if (SP_PARM->slk_format == 1) {     /* 1 -> 3-2-3 */
+               gap = (cols - (SP_PARM->_slk->maxlab * max_length) - 5)
+                   / 2;
 
                if (gap < 1)
                    gap = 1;
-               for (i = x = 0; i < SP->_slk->maxlab; i++) {
-                   SP->_slk->ent[i].ent_x = x;
+               for (i = x = 0; i < SP_PARM->_slk->maxlab; i++) {
+                   SP_PARM->_slk->ent[i].ent_x = x;
                    x += max_length;
                    x += (i == 2 || i == 4) ? gap : 1;
                }
            } else
-               returnCode(slk_failed());
+               returnCode(slk_failed(NCURSES_SP_ARG));
        }
     }
-    SP->_slk->dirty = TRUE;
-    if ((SP->_slk->win = stwin) == NULL) {
-       returnCode(slk_failed());
+    SP_PARM->_slk->dirty = TRUE;
+
+    return OK;
+}
+
+/*
+ * Initialize soft labels.
+ * Called from newterm()
+ */
+NCURSES_EXPORT(int)
+_nc_slk_initialize(WINDOW *stwin, int cols)
+{
+    int i;
+    int res = OK;
+    unsigned max_length;
+    SCREEN *sp;
+    TERMINAL *term;
+    int numlab;
+
+    T((T_CALLED("_nc_slk_initialize()")));
+
+    assert(stwin);
+
+    sp = _nc_screen_of(stwin);
+    if (0 == sp)
+       returnCode(ERR);
+
+    term = TerminalOf(SP_PARM);
+    assert(term);
+
+    numlab = InfoOf(SP_PARM).numlabels;
+
+    if (SP_PARM->_slk) {       /* we did this already, so simply return */
+       returnCode(OK);
+    } else if ((SP_PARM->_slk = typeCalloc(SLK, 1)) == 0)
+       returnCode(ERR);
+
+    SP_PARM->_slk->hidden = TRUE;
+    SP_PARM->_slk->ent = NULL;
+    if (!SP_PARM->slk_format)
+       SP_PARM->slk_format = _nc_globals.slk_format;
+
+    /*
+     * If we use colors, vidputs() will suppress video attributes that conflict
+     * with colors.  In that case, we're still guaranteed that "reverse" would
+     * work.
+     */
+    if ((InfoOf(SP_PARM).nocolorvideo & 1) == 0)
+       SetAttr(SP_PARM->_slk->attr, A_STANDOUT);
+    else
+       SetAttr(SP_PARM->_slk->attr, A_REVERSE);
+
+    SP_PARM->_slk->maxlab = ((numlab > 0)
+                            ? numlab
+                            : MAX_SKEY(SP_PARM->slk_format));
+    SP_PARM->_slk->maxlen = ((numlab > 0)
+                            ? InfoOf(SP_PARM).labelwidth * InfoOf(SP_PARM).labelheight
+                            : MAX_SKEY_LEN(SP_PARM->slk_format));
+    SP_PARM->_slk->labcnt = ((SP_PARM->_slk->maxlab < MAX_SKEY(SP_PARM->slk_format))
+                            ? MAX_SKEY(SP_PARM->slk_format)
+                            : SP_PARM->_slk->maxlab);
+
+    if (SP_PARM->_slk->maxlen <= 0
+       || SP_PARM->_slk->labcnt <= 0
+       || (SP_PARM->_slk->ent = typeCalloc(slk_ent,
+                                           (unsigned) SP_PARM->_slk->labcnt))
+       == NULL)
+       returnCode(slk_failed(NCURSES_SP_ARG));
+
+    max_length = SP_PARM->_slk->maxlen;
+    for (i = 0; i < SP_PARM->_slk->labcnt; i++) {
+       size_t used = max_length + 1;
+
+       SP_PARM->_slk->ent[i].ent_text = (char *) _nc_doalloc(0, used);
+       if (SP_PARM->_slk->ent[i].ent_text == 0)
+           returnCode(slk_failed(NCURSES_SP_ARG));
+       memset(SP_PARM->_slk->ent[i].ent_text, 0, used);
+
+       SP_PARM->_slk->ent[i].form_text = (char *) _nc_doalloc(0, used);
+       if (SP_PARM->_slk->ent[i].form_text == 0)
+           returnCode(slk_failed(NCURSES_SP_ARG));
+       memset(SP_PARM->_slk->ent[i].form_text, 0, used);
+
+       memset(SP_PARM->_slk->ent[i].form_text, ' ', max_length);
+       SP_PARM->_slk->ent[i].visible = (char) (i < SP_PARM->_slk->maxlab);
+    }
+
+    res = _nc_format_slks(NCURSES_SP_ARGx cols);
+
+    if ((SP_PARM->_slk->win = stwin) == NULL) {
+       returnCode(slk_failed(NCURSES_SP_ARG));
     }
 
     /* We now reset the format so that the next newterm has again
      * per default no SLK keys and may call slk_init again to
      * define a new layout. (juergen 03-Mar-1999)
      */
-    SP->slk_format = _nc_globals.slk_format;
     _nc_globals.slk_format = 0;
     returnCode(res);
 }
@@ -187,14 +218,16 @@ _nc_slk_initialize(WINDOW *stwin, int cols)
 NCURSES_EXPORT(int)
 NCURSES_SP_NAME(slk_restore) (NCURSES_SP_DCL0)
 {
-    T((T_CALLED("slk_restore()")));
+    T((T_CALLED("slk_restore(%p)"), SP_PARM));
 
+    if (0 == SP_PARM)
+       returnCode(ERR);
     if (SP_PARM->_slk == NULL)
-       return (ERR);
+       returnCode(ERR);
     SP_PARM->_slk->hidden = FALSE;
     SP_PARM->_slk->dirty = TRUE;
 
-    returnCode(slk_refresh());
+    returnCode(NCURSES_SP_NAME(slk_refresh) (NCURSES_SP_ARG));
 }
 
 #if NCURSES_SP_FUNCS