ncurses 6.2 - patch 20200404
[ncurses.git] / ncurses / tinfo / lib_longname.c
index 766e56c091e6a87ffe4f121ff6274a01b45e4330..835d15ccafc1b0eef12df34a42cebb056d0fc836 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998 Free Software Foundation, Inc.                        *
+ * Copyright 2020 Thomas E. Dickey                                          *
+ * Copyright 1998-2010,2015 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            *
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
+ *     and: Thomas E. Dickey                        1996-on                 *
+ *     and: Juergen Pfeifer                         2009                    *
  ****************************************************************************/
 
-
 /*
 **     lib_longname.c
 **
 
 #include <curses.priv.h>
 
-MODULE_ID("$Id: lib_longname.c,v 1.7 1999/01/03 01:47:45 tom Exp $")
+MODULE_ID("$Id: lib_longname.c,v 1.14 2020/02/02 23:34:34 tom Exp $")
+
+#if USE_REENTRANT
+NCURSES_EXPORT(char *)
+NCURSES_SP_NAME(longname) (NCURSES_SP_DCL0)
+{
+    static char empty[] =
+    {'\0'};
+    char *ptr;
+
+    T((T_CALLED("longname(%p)"), (void *) SP_PARM));
 
-char *
+    if (SP_PARM) {
+       for (ptr = SP_PARM->_ttytype + strlen(SP_PARM->_ttytype);
+            ptr > SP_PARM->_ttytype;
+            ptr--)
+           if (*ptr == '|')
+               returnPtr(ptr + 1);
+       returnPtr(SP_PARM->_ttytype);
+    }
+    return empty;
+}
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(char *)
 longname(void)
 {
-char   *ptr;
+    return NCURSES_SP_NAME(longname) (CURRENT_SCREEN);
+}
+#endif
 
-       T((T_CALLED("longname()")));
+#else
+
+/* a dummy entrypoint is simpler than generating a conditional in curses.h */
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(char *)
+NCURSES_SP_NAME(longname) (NCURSES_SP_DCL0)
+{
+    (void) SP_PARM;
+    return longname();
+}
+#endif
+
+NCURSES_EXPORT(char *)
+longname(void)
+{
+    char *ptr;
 
-       for (ptr = ttytype + strlen(ttytype); ptr > ttytype; ptr--)
-               if (*ptr == '|')
-                       returnPtr(ptr + 1);
+    T((T_CALLED("longname()")));
 
-       returnPtr(ttytype);
+    for (ptr = ttytype + strlen(ttytype);
+        ptr > ttytype;
+        ptr--)
+       if (*ptr == '|')
+           returnPtr(ptr + 1);
+    returnPtr(ttytype);
 }
+#endif