150276Speter/****************************************************************************
2166124Srafan * Copyright (c) 1998-2005,2006 Free Software Foundation, Inc.              *
350276Speter *                                                                          *
450276Speter * Permission is hereby granted, free of charge, to any person obtaining a  *
550276Speter * copy of this software and associated documentation files (the            *
650276Speter * "Software"), to deal in the Software without restriction, including      *
750276Speter * without limitation the rights to use, copy, modify, merge, publish,      *
850276Speter * distribute, distribute with modifications, sublicense, and/or sell       *
950276Speter * copies of the Software, and to permit persons to whom the Software is    *
1050276Speter * furnished to do so, subject to the following conditions:                 *
1150276Speter *                                                                          *
1250276Speter * The above copyright notice and this permission notice shall be included  *
1350276Speter * in all copies or substantial portions of the Software.                   *
1450276Speter *                                                                          *
1550276Speter * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
1650276Speter * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
1750276Speter * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
1850276Speter * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
1950276Speter * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
2050276Speter * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
2150276Speter * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
2250276Speter *                                                                          *
2350276Speter * Except as contained in this notice, the name(s) of the above copyright   *
2450276Speter * holders shall not be used in advertising or otherwise to promote the     *
2550276Speter * sale, use or other dealings in this Software without prior written       *
2650276Speter * authorization.                                                           *
2750276Speter ****************************************************************************/
2850276Speter
2950276Speter/****************************************************************************
30166124Srafan *  Author: Thomas E. Dickey                    1997-on                     *
3150276Speter ****************************************************************************/
3250276Speter
3350276Speter#include <curses.priv.h>
3450276Speter
35174993SrafanMODULE_ID("$Id: define_key.c,v 1.13 2006/12/30 23:23:31 tom Exp $")
3650276Speter
3776726SpeterNCURSES_EXPORT(int)
38166124Srafandefine_key(const char *str, int keycode)
3950276Speter{
4076726Speter    int code = ERR;
4150276Speter
4276726Speter    T((T_CALLED("define_key(%s,%d)"), _nc_visbuf(str), keycode));
43166124Srafan    if (SP == 0) {
44166124Srafan	code = ERR;
45166124Srafan    } else if (keycode > 0) {
46174993Srafan	unsigned ukey = (unsigned) keycode;
47174993Srafan
4876726Speter	if (str != 0) {
4976726Speter	    define_key(str, 0);
5076726Speter	} else if (has_key(keycode)) {
51174993Srafan	    while (_nc_remove_key(&(SP->_keytry), ukey))
5276726Speter		code = OK;
5350276Speter	}
5476726Speter	if (str != 0) {
55166124Srafan	    if (key_defined(str) == 0) {
56174993Srafan		if (_nc_add_to_try(&(SP->_keytry), str, ukey) == OK) {
57174993Srafan		    code = OK;
58174993Srafan		} else {
59174993Srafan		    code = ERR;
60174993Srafan		}
61166124Srafan	    } else {
62166124Srafan		code = ERR;
63166124Srafan	    }
6476726Speter	}
6576726Speter    } else {
6676726Speter	while (_nc_remove_string(&(SP->_keytry), str))
6776726Speter	    code = OK;
6876726Speter    }
6976726Speter    returnCode(code);
7050276Speter}
71