ncurses 6.2 - patch 20200404
[ncurses.git] / ncurses / trace / lib_tracechr.c
index 2f33391b5505b951eaabfc113e6a96a5688f4a71..36158d6f45a6725d455ed9db17d293ef155f9f9a 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998-2001,2002 Free Software Foundation, Inc.              *
+ * Copyright 2020 Thomas E. Dickey                                          *
+ * Copyright 1998-2009,2012 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            *
@@ -29,6 +30,7 @@
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
+ *     and: Thomas E. Dickey                        1996-on                 *
  ****************************************************************************/
 
 /*
  */
 #include <curses.priv.h>
 
-MODULE_ID("$Id: lib_tracechr.c,v 1.9 2002/05/25 23:34:19 tom Exp $")
+#include <ctype.h>
+
+MODULE_ID("$Id: lib_tracechr.c,v 1.23 2020/02/02 23:34:34 tom Exp $")
 
 #ifdef TRACE
+
+#define MyBufSize sizeof(_nc_globals.tracechr_buf)
+
+NCURSES_EXPORT(char *)
+_nc_tracechar(SCREEN *sp, int ch)
+{
+    NCURSES_CONST char *name;
+    char *MyBuffer = ((sp != 0)
+                     ? sp->tracechr_buf
+                     : _nc_globals.tracechr_buf);
+
+    if (ch > KEY_MIN || ch < 0) {
+       name = safe_keyname(SP_PARM, ch);
+       if (name == 0 || *name == '\0')
+           name = "NULL";
+       _nc_SPRINTF(MyBuffer, _nc_SLIMIT(MyBufSize)
+                   "'%.30s' = %#03o", name, ch);
+    } else if (!is8bits(ch) || !isprint(UChar(ch))) {
+       /*
+        * workaround for glibc bug:
+        * sprintf changes the result from unctrl() to an empty string if it
+        * does not correspond to a valid multibyte sequence.
+        */
+       _nc_SPRINTF(MyBuffer, _nc_SLIMIT(MyBufSize)
+                   "%#03o", ch);
+    } else {
+       name = safe_unctrl(SP_PARM, (chtype) ch);
+       if (name == 0 || *name == 0)
+           name = "null";      /* shouldn't happen */
+       _nc_SPRINTF(MyBuffer, _nc_SLIMIT(MyBufSize)
+                   "'%.30s' = %#03o", name, ch);
+    }
+    return (MyBuffer);
+}
+
 NCURSES_EXPORT(char *)
 _tracechar(int ch)
 {
-    static char crep[40];
-    (void) sprintf(crep, "'%.30s' = %#03o",
-                  ((ch > KEY_MIN || ch < 0)
-                   ? keyname(ch)
-                   : unctrl(ch)),
-                  ch);
-    return (crep);
+    return _nc_tracechar(CURRENT_SCREEN, ch);
 }
 #else
-empty_module(_nc_lib_tracechr)
+EMPTY_MODULE(_nc_lib_tracechr)
 #endif