ncurses 6.2 - patch 20210213
[ncurses.git] / ncurses / base / define_key.c
index 52dc6927bd5500b403beebfee5a28426d50d44e6..fb9ae36be8779093fc57f010f75f9f6e0f739e88 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998 Free Software Foundation, Inc.                        *
+ * Copyright 2020 Thomas E. Dickey                                          *
+ * Copyright 1998-2009,2014 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: Thomas E. Dickey <dickey@clark.net> 1997                        *
+ *  Author: Thomas E. Dickey                        1997-on                 *
+ *     and: Juergen Pfeifer                         2009                    *
  ****************************************************************************/
 
 #include <curses.priv.h>
 
-MODULE_ID("$Id: define_key.c,v 1.4 1999/02/21 13:03:55 tom Exp $")
+MODULE_ID("$Id: define_key.c,v 1.22 2020/02/02 23:34:34 tom Exp $")
 
-int
-define_key(char *str, int keycode)
+NCURSES_EXPORT(int)
+NCURSES_SP_NAME(define_key) (NCURSES_SP_DCLx const char *str, int keycode)
 {
-       int code = ERR;
-
-       T((T_CALLED("define_key(%s,%d)"), _nc_visbuf(str), keycode));
-       if (keycode > 0) {
-               if (str != 0) {
-                       define_key(str, 0);
-               } else if (has_key(keycode)) {
-                       while (_nc_remove_key(&(SP->_keytry), keycode))
-                               code = OK;
-               }
-               if (str != 0) {
-                       (void) _nc_add_to_try(&(SP->_keytry), str, keycode);
-                       code = OK;
+    int code = ERR;
+
+    T((T_CALLED("define_key(%p, %s,%d)"), (void *) SP_PARM, _nc_visbuf(str), keycode));
+    if (SP_PARM == 0 || !HasTInfoTerminal(SP_PARM)) {
+       code = ERR;
+    } else if (keycode > 0) {
+       unsigned ukey = (unsigned) keycode;
+
+#ifdef USE_TERM_DRIVER
+#define CallHasKey(keycode) CallDriver_1(SP_PARM, td_kyExist, keycode)
+#else
+#define CallHasKey(keycode) NCURSES_SP_NAME(has_key)(NCURSES_SP_ARGx keycode)
+#endif
+
+       if (str != 0) {
+           NCURSES_SP_NAME(define_key) (NCURSES_SP_ARGx str, 0);
+       } else if (CallHasKey(keycode)) {
+           while (_nc_remove_key(&(SP_PARM->_keytry), ukey))
+               code = OK;
+       }
+       if (str != 0) {
+           if (NCURSES_SP_NAME(key_defined) (NCURSES_SP_ARGx str) == 0) {
+               if (_nc_add_to_try(&(SP_PARM->_keytry), str, ukey) == OK) {
+                   code = OK;
+               } else {
+                   code = ERR;
                }
-       } else {
-               while (_nc_remove_string(&(SP->_keytry), str))
-                       code = OK;
+           } else {
+               code = ERR;
+           }
        }
-       returnCode(code);
+    } else {
+       while (_nc_remove_string(&(SP_PARM->_keytry), str))
+           code = OK;
+    }
+    returnCode(code);
+}
+
+#if NCURSES_SP_FUNCS
+NCURSES_EXPORT(int)
+define_key(const char *str, int keycode)
+{
+    return NCURSES_SP_NAME(define_key) (CURRENT_SCREEN, str, keycode);
 }
+#endif