1*7c478bd9Sstevel@tonic-gate /*
2*7c478bd9Sstevel@tonic-gate * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate *
4*7c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate * with the License.
8*7c478bd9Sstevel@tonic-gate *
9*7c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate *
14*7c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate *
20*7c478bd9Sstevel@tonic-gate * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate */
22*7c478bd9Sstevel@tonic-gate /*
23*7c478bd9Sstevel@tonic-gate * Copyright (c) 1995-1998 by Sun Microsystems, Inc.
24*7c478bd9Sstevel@tonic-gate * All rights reserved.
25*7c478bd9Sstevel@tonic-gate */
26*7c478bd9Sstevel@tonic-gate
27*7c478bd9Sstevel@tonic-gate /* LINTLIBRARY */
28*7c478bd9Sstevel@tonic-gate
29*7c478bd9Sstevel@tonic-gate /*
30*7c478bd9Sstevel@tonic-gate * keypad.c
31*7c478bd9Sstevel@tonic-gate *
32*7c478bd9Sstevel@tonic-gate * XCurses Library
33*7c478bd9Sstevel@tonic-gate *
34*7c478bd9Sstevel@tonic-gate * Copyright 1990, 1995 by Mortice Kern Systems Inc. All rights reserved.
35*7c478bd9Sstevel@tonic-gate *
36*7c478bd9Sstevel@tonic-gate */
37*7c478bd9Sstevel@tonic-gate
38*7c478bd9Sstevel@tonic-gate #ifdef M_RCSID
39*7c478bd9Sstevel@tonic-gate #ifndef lint
40*7c478bd9Sstevel@tonic-gate static char rcsID[] =
41*7c478bd9Sstevel@tonic-gate "$Header: /team/ps/sun_xcurses/archive/local_changes/xcurses/src/lib/"
42*7c478bd9Sstevel@tonic-gate "libxcurses/src/libc/xcurses/rcs/keypad.c 1.6 1998/06/03 12:56:59 "
43*7c478bd9Sstevel@tonic-gate "cbates Exp $";
44*7c478bd9Sstevel@tonic-gate #endif
45*7c478bd9Sstevel@tonic-gate #endif
46*7c478bd9Sstevel@tonic-gate
47*7c478bd9Sstevel@tonic-gate #include <private.h>
48*7c478bd9Sstevel@tonic-gate #include <stdlib.h>
49*7c478bd9Sstevel@tonic-gate
50*7c478bd9Sstevel@tonic-gate /*
51*7c478bd9Sstevel@tonic-gate * Add a function key string to the decode tree.
52*7c478bd9Sstevel@tonic-gate * Return -1 on error, else the length of the key sequence.
53*7c478bd9Sstevel@tonic-gate */
54*7c478bd9Sstevel@tonic-gate static int
decode_add(t_decode ** root,const char * str,short code)55*7c478bd9Sstevel@tonic-gate decode_add(t_decode **root, const char *str, short code)
56*7c478bd9Sstevel@tonic-gate {
57*7c478bd9Sstevel@tonic-gate const char *start;
58*7c478bd9Sstevel@tonic-gate t_decode *node, *saved;
59*7c478bd9Sstevel@tonic-gate
60*7c478bd9Sstevel@tonic-gate if (root == NULL)
61*7c478bd9Sstevel@tonic-gate return (-1);
62*7c478bd9Sstevel@tonic-gate
63*7c478bd9Sstevel@tonic-gate if (str == NULL)
64*7c478bd9Sstevel@tonic-gate return (0);
65*7c478bd9Sstevel@tonic-gate
66*7c478bd9Sstevel@tonic-gate start = str;
67*7c478bd9Sstevel@tonic-gate saved = NULL;
68*7c478bd9Sstevel@tonic-gate
69*7c478bd9Sstevel@tonic-gate if (*root == NULL) {
70*7c478bd9Sstevel@tonic-gate /* First node of tree. */
71*7c478bd9Sstevel@tonic-gate node = (t_decode *) malloc(sizeof (*node));
72*7c478bd9Sstevel@tonic-gate if (node == NULL)
73*7c478bd9Sstevel@tonic-gate return (-1);
74*7c478bd9Sstevel@tonic-gate
75*7c478bd9Sstevel@tonic-gate *root = saved = node;
76*7c478bd9Sstevel@tonic-gate
77*7c478bd9Sstevel@tonic-gate node->child = node->sibling = NULL;
78*7c478bd9Sstevel@tonic-gate node->ch = *str++;
79*7c478bd9Sstevel@tonic-gate node->key = 0;
80*7c478bd9Sstevel@tonic-gate } else {
81*7c478bd9Sstevel@tonic-gate /* Find node to insert function key sequence into the tree. */
82*7c478bd9Sstevel@tonic-gate for (node = *root; *str != '\0'; ++str, node = node->child) {
83*7c478bd9Sstevel@tonic-gate while (node->ch != *str &&
84*7c478bd9Sstevel@tonic-gate node->sibling != NULL)
85*7c478bd9Sstevel@tonic-gate node = node->sibling;
86*7c478bd9Sstevel@tonic-gate
87*7c478bd9Sstevel@tonic-gate if (node->ch != *str) {
88*7c478bd9Sstevel@tonic-gate node->sibling = (t_decode *)
89*7c478bd9Sstevel@tonic-gate malloc(sizeof (*node));
90*7c478bd9Sstevel@tonic-gate if (node->sibling == NULL)
91*7c478bd9Sstevel@tonic-gate return (-1);
92*7c478bd9Sstevel@tonic-gate
93*7c478bd9Sstevel@tonic-gate saved = node = node->sibling;
94*7c478bd9Sstevel@tonic-gate node->child = node->sibling = NULL;
95*7c478bd9Sstevel@tonic-gate node->ch = *str++;
96*7c478bd9Sstevel@tonic-gate node->key = 0;
97*7c478bd9Sstevel@tonic-gate break;
98*7c478bd9Sstevel@tonic-gate }
99*7c478bd9Sstevel@tonic-gate
100*7c478bd9Sstevel@tonic-gate if (node->child == NULL)
101*7c478bd9Sstevel@tonic-gate break;
102*7c478bd9Sstevel@tonic-gate }
103*7c478bd9Sstevel@tonic-gate }
104*7c478bd9Sstevel@tonic-gate
105*7c478bd9Sstevel@tonic-gate /* Insert string into the tree; node->child == null. */
106*7c478bd9Sstevel@tonic-gate while (*str != '\0') {
107*7c478bd9Sstevel@tonic-gate node->child = (t_decode *) malloc(sizeof (*node));
108*7c478bd9Sstevel@tonic-gate if (node->child == NULL) {
109*7c478bd9Sstevel@tonic-gate __m_decode_free(&saved);
110*7c478bd9Sstevel@tonic-gate return (-1);
111*7c478bd9Sstevel@tonic-gate }
112*7c478bd9Sstevel@tonic-gate
113*7c478bd9Sstevel@tonic-gate node = node->child;
114*7c478bd9Sstevel@tonic-gate node->child = node->sibling = NULL;
115*7c478bd9Sstevel@tonic-gate node->ch = *str++;
116*7c478bd9Sstevel@tonic-gate node->key = 0;
117*7c478bd9Sstevel@tonic-gate }
118*7c478bd9Sstevel@tonic-gate
119*7c478bd9Sstevel@tonic-gate node->key = code;
120*7c478bd9Sstevel@tonic-gate
121*7c478bd9Sstevel@tonic-gate /* (str - start) should be enough small to fit in "int" */
122*7c478bd9Sstevel@tonic-gate return ((int)(str - start));
123*7c478bd9Sstevel@tonic-gate }
124*7c478bd9Sstevel@tonic-gate
125*7c478bd9Sstevel@tonic-gate
126*7c478bd9Sstevel@tonic-gate void
__m_decode_free(t_decode ** tree)127*7c478bd9Sstevel@tonic-gate __m_decode_free(t_decode **tree)
128*7c478bd9Sstevel@tonic-gate {
129*7c478bd9Sstevel@tonic-gate if (*tree != NULL) {
130*7c478bd9Sstevel@tonic-gate __m_decode_free(&(*tree)->sibling);
131*7c478bd9Sstevel@tonic-gate __m_decode_free(&(*tree)->child);
132*7c478bd9Sstevel@tonic-gate free(*tree);
133*7c478bd9Sstevel@tonic-gate *tree = NULL;
134*7c478bd9Sstevel@tonic-gate }
135*7c478bd9Sstevel@tonic-gate }
136*7c478bd9Sstevel@tonic-gate
137*7c478bd9Sstevel@tonic-gate /*
138*7c478bd9Sstevel@tonic-gate * Initialise the function key decode tree.
139*7c478bd9Sstevel@tonic-gate */
140*7c478bd9Sstevel@tonic-gate int
__m_decode_init(t_decode ** tree)141*7c478bd9Sstevel@tonic-gate __m_decode_init(t_decode **tree)
142*7c478bd9Sstevel@tonic-gate {
143*7c478bd9Sstevel@tonic-gate int max, len;
144*7c478bd9Sstevel@tonic-gate const short (*p)[2];
145*7c478bd9Sstevel@tonic-gate
146*7c478bd9Sstevel@tonic-gate *tree = NULL;
147*7c478bd9Sstevel@tonic-gate
148*7c478bd9Sstevel@tonic-gate for (max = -1, p = __m_keyindex; **p != -1; ++p) {
149*7c478bd9Sstevel@tonic-gate len = decode_add(tree, cur_term->_str[**p], (*p)[1]);
150*7c478bd9Sstevel@tonic-gate if (len < 0)
151*7c478bd9Sstevel@tonic-gate return (-1);
152*7c478bd9Sstevel@tonic-gate if (max < len)
153*7c478bd9Sstevel@tonic-gate max = len;
154*7c478bd9Sstevel@tonic-gate }
155*7c478bd9Sstevel@tonic-gate
156*7c478bd9Sstevel@tonic-gate return (max);
157*7c478bd9Sstevel@tonic-gate }
158*7c478bd9Sstevel@tonic-gate
159*7c478bd9Sstevel@tonic-gate /*
160*7c478bd9Sstevel@tonic-gate * When true for a given window, then multibyte function key processing
161*7c478bd9Sstevel@tonic-gate * is done for all input throough that window, see wgetch().
162*7c478bd9Sstevel@tonic-gate */
163*7c478bd9Sstevel@tonic-gate int
keypad(WINDOW * w,bool bf)164*7c478bd9Sstevel@tonic-gate keypad(WINDOW *w, bool bf)
165*7c478bd9Sstevel@tonic-gate {
166*7c478bd9Sstevel@tonic-gate if (bf) {
167*7c478bd9Sstevel@tonic-gate if (keypad_xmit)
168*7c478bd9Sstevel@tonic-gate (void) TPUTS(keypad_xmit, 1, __m_outc);
169*7c478bd9Sstevel@tonic-gate w->_flags |= W_USE_KEYPAD;
170*7c478bd9Sstevel@tonic-gate } else {
171*7c478bd9Sstevel@tonic-gate if (keypad_local)
172*7c478bd9Sstevel@tonic-gate (void) TPUTS(keypad_local, 1, __m_outc);
173*7c478bd9Sstevel@tonic-gate w->_flags &= ~W_USE_KEYPAD;
174*7c478bd9Sstevel@tonic-gate }
175*7c478bd9Sstevel@tonic-gate return (OK);
176*7c478bd9Sstevel@tonic-gate }
177