ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/keyboard.C
(Generate patch)

Comparing rxvt-unicode/src/keyboard.C (file contents):
Revision 1.37 by sf-exg, Tue Aug 24 23:57:04 2010 UTC vs.
Revision 1.53 by sf-exg, Fri Dec 2 09:13:50 2011 UTC

… …
2 * File: keyboard.C 2 * File: keyboard.C
3 *----------------------------------------------------------------------* 3 *----------------------------------------------------------------------*
4 * 4 *
5 * All portions of code are copyright by their respective author/s. 5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 2005 WU Fengguang 6 * Copyright (c) 2005 WU Fengguang
7 * Copyright (c) 2005-2006 Marc Lehmann <pcg@goof.com> 7 * Copyright (c) 2005-2006 Marc Lehmann <schmorp@schmorp.de>
8 * 8 *
9 * This program is free software; you can redistribute it and/or modify 9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by 10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or 11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version. 12 * (at your option) any later version.
… …
63 * n(the number of groups) = the number of non-zero member of hash_bucket_size[]; 63 * n(the number of groups) = the number of non-zero member of hash_bucket_size[];
64 * Ni(the size of group i) = hash_bucket_size[Ii]. 64 * Ni(the size of group i) = hash_bucket_size[Ii].
65 */ 65 */
66 66
67static void 67static void
68output_string (rxvt_term *rt, const char *str) 68output_string (rxvt_term *term, const char *str)
69{ 69{
70 if (strncmp (str, "command:", 8) == 0) 70 if (strncmp (str, "command:", 8) == 0)
71 rt->cmd_write (str + 8, strlen (str) - 8); 71 term->cmdbuf_append (str + 8, strlen (str) - 8);
72 else if (strncmp (str, "perl:", 5) == 0) 72 else if (strncmp (str, "perl:", 5) == 0)
73 HOOK_INVOKE((rt, HOOK_USER_COMMAND, DT_STR, str + 5, DT_END)); 73 HOOK_INVOKE((term, HOOK_USER_COMMAND, DT_STR, str + 5, DT_END));
74 else 74 else
75 rt->tt_write (str, strlen (str)); 75 term->tt_write (str, strlen (str));
76} 76}
77 77
78// return: priority_of_a - priority_of_b 78// return: priority_of_a - priority_of_b
79static int 79static int
80compare_priority (keysym_t *a, keysym_t *b) 80compare_priority (keysym_t *a, keysym_t *b)
81{ 81{
82 // (the more '1's in state; the less range): the greater priority 82 // (the more '1's in state; the less range): the greater priority
83 int ca = rxvt_popcount (a->state /* & OtherModMask */); 83 int ca = ecb_popcount32 (a->state /* & OtherModMask */);
84 int cb = rxvt_popcount (b->state /* & OtherModMask */); 84 int cb = ecb_popcount32 (b->state /* & OtherModMask */);
85 85
86 if (ca != cb) 86 if (ca != cb)
87 return ca - cb; 87 return ca - cb;
88//else if (a->state != b->state) // this behavior is to be discussed 88//else if (a->state != b->state) // this behavior is to be discussed
89// return b->state - a->state; 89// return b->state - a->state;
90 else 90 else
91 return b->range - a->range; 91 return 0;
92} 92}
93 93
94//////////////////////////////////////////////////////////////////////////////// 94////////////////////////////////////////////////////////////////////////////////
95keyboard_manager::keyboard_manager () 95keyboard_manager::keyboard_manager ()
96{ 96{
… …
98 hash [0] = 1; // hash[0] != 0 indicates uninitialized data 98 hash [0] = 1; // hash[0] != 0 indicates uninitialized data
99} 99}
100 100
101keyboard_manager::~keyboard_manager () 101keyboard_manager::~keyboard_manager ()
102{ 102{
103 clear (); 103 for (unsigned int i = 0; i < keymap.size (); ++i)
104 {
105 free (keymap [i]->str);
106 delete keymap [i];
107 }
104} 108}
105 109
110// a wrapper for register_translation that converts the input string
111// to utf-8 and expands 'list' syntax.
106void 112void
107keyboard_manager::clear () 113keyboard_manager::register_user_translation (KeySym keysym, unsigned int state, const wchar_t *ws)
108{ 114{
109 hash [0] = 2; 115 char *translation = rxvt_wcstoutf8 (ws);
110 116
111 for (unsigned int i = 0; i < keymap.size (); ++i) 117 register_translation (keysym, state, translation);
112 {
113 free ((void *)keymap [i]->str);
114 delete keymap [i];
115 keymap [i] = 0;
116 }
117
118 keymap.clear ();
119} 118}
120 119
121// a wrapper for register_keymap,
122// so that outside codes don't have to know so much details.
123//
124// the string 'trans' is copied to an internal managed buffer,
125// so the caller can free memory of 'trans' at any time.
126void 120void
127keyboard_manager::register_user_translation (KeySym keysym, unsigned int state, const char *trans) 121keyboard_manager::register_translation (KeySym keysym, unsigned int state, char *translation)
128{ 122{
129 keysym_t *key = new keysym_t; 123 keysym_t *key = new keysym_t;
130 wchar_t *wc = rxvt_mbstowcs (trans);
131 char *translation = rxvt_wcstoutf8 (wc);
132 free (wc);
133 124
134 if (key && translation) 125 if (key && translation)
135 { 126 {
136 key->keysym = keysym; 127 key->keysym = keysym;
137 key->state = state; 128 key->state = state;
138 key->range = 1;
139 key->str = translation; 129 key->str = translation;
140 key->type = keysym_t::STRING; 130 key->type = keysym_t::STRING;
141 131
142 if (strncmp (translation, "list", 4) == 0 && translation [4])
143 {
144 char *middle = strchr (translation + 5, translation [4]);
145 char *suffix = strrchr (translation + 5, translation [4]);
146
147 if (suffix && middle && suffix > middle + 1)
148 {
149 key->type = keysym_t::LIST;
150 key->range = suffix - middle - 1;
151
152 memmove (translation, translation + 4, strlen (translation + 4) + 1);
153 }
154 else
155 rxvt_warn ("cannot parse list-type keysym '%s', treating as normal keysym.\n", translation);
156 }
157 else if (strncmp (translation, "builtin:", 8) == 0) 132 if (strncmp (translation, "builtin:", 8) == 0)
158 key->type = keysym_t::BUILTIN; 133 key->type = keysym_t::BUILTIN;
159 134
160 register_keymap (key); 135 if (keymap.size () == keymap.capacity ())
136 keymap.reserve (keymap.size () * 2);
137
138 keymap.push_back (key);
139 hash[0] = 3;
161 } 140 }
162 else 141 else
163 { 142 {
164 delete key; 143 delete key;
165 free ((void *)translation); 144 free (translation);
166 rxvt_fatal ("out of memory, aborting.\n"); 145 rxvt_fatal ("memory allocation failure. aborting.\n");
167 } 146 }
168}
169
170void
171keyboard_manager::register_keymap (keysym_t *key)
172{
173 if (keymap.size () == keymap.capacity ())
174 keymap.reserve (keymap.size () * 2);
175
176 keymap.push_back (key);
177 hash[0] = 3;
178}
179
180void
181keyboard_manager::register_done ()
182{
183 setup_hash ();
184} 147}
185 148
186bool 149bool
187keyboard_manager::dispatch (rxvt_term *term, KeySym keysym, unsigned int state) 150keyboard_manager::dispatch (rxvt_term *term, KeySym keysym, unsigned int state)
188{ 151{
189 assert (hash[0] == 0 && "register_done() need to be called"); 152 assert (("register_done() need to be called", hash[0] == 0));
190 153
191 state &= OtherModMask; // mask out uninteresting modifiers 154 state &= OtherModMask; // mask out uninteresting modifiers
192 155
193 if (state & term->ModMetaMask) state |= MetaMask; 156 if (state & term->ModMetaMask) state |= MetaMask;
194 if (state & term->ModNumLockMask) state |= NumLockMask; 157 if (state & term->ModNumLockMask) state |= NumLockMask;
… …
199 162
200 int index = find_keysym (keysym, state); 163 int index = find_keysym (keysym, state);
201 164
202 if (index >= 0) 165 if (index >= 0)
203 { 166 {
204 const keysym_t &key = *keymap [index]; 167 keysym_t *key = keymap [index];
205 168
206 if (key.type != keysym_t::BUILTIN) 169 if (key->type != keysym_t::BUILTIN)
207 { 170 {
208 int keysym_offset = keysym - key.keysym;
209
210 wchar_t *wc = rxvt_utf8towcs (key.str); 171 wchar_t *ws = rxvt_utf8towcs (key->str);
211 char *str = rxvt_wcstombs (wc); 172 char *str = rxvt_wcstombs (ws);
212 // TODO: do (some) translations, unescaping etc, here (allow \u escape etc.) 173 // TODO: do (some) translations, unescaping etc, here (allow \u escape etc.)
213 free (wc); 174 free (ws);
214 175
215 switch (key.type)
216 {
217 case keysym_t::STRING:
218 output_string (term, str); 176 output_string (term, str);
219 break;
220
221 case keysym_t::LIST:
222 {
223 char buf[STRING_MAX];
224
225 char *prefix, *middle, *suffix;
226
227 prefix = str;
228 middle = strchr (prefix + 1, *prefix);
229 suffix = strrchr (middle + 1, *prefix);
230
231 memcpy (buf, prefix + 1, middle - prefix - 1);
232 buf [middle - prefix - 1] = middle [keysym_offset + 1];
233 strcpy (buf + (middle - prefix), suffix + 1);
234
235 output_string (term, buf);
236 }
237 break;
238 }
239 177
240 free (str); 178 free (str);
241 179
242 return true; 180 return true;
243 } 181 }
… …
245 183
246 return false; 184 return false;
247} 185}
248 186
249void 187void
250keyboard_manager::setup_hash () 188keyboard_manager::register_done ()
251{ 189{
252 unsigned int i, index, hashkey; 190 unsigned int i, index, hashkey;
253 vector <keysym_t *> sorted_keymap; 191 vector <keysym_t *> sorted_keymap;
254 uint16_t hash_bucket_size[KEYSYM_HASH_BUCKETS]; // size of each bucket 192 uint16_t hash_bucket_size[KEYSYM_HASH_BUCKETS]; // size of each bucket
255 uint16_t hash_bucket_counter[KEYSYM_HASH_BUCKETS]; // #elements in each bucket
256 193
257 memset (hash_bucket_size, 0, sizeof (hash_bucket_size)); 194 memset (hash_bucket_size, 0, sizeof (hash_bucket_size));
258 memset (hash_bucket_counter, 0, sizeof (hash_bucket_counter));
259 195
260 // determine hash bucket size 196 // determine hash bucket size
261 for (i = 0; i < keymap.size (); ++i) 197 for (i = 0; i < keymap.size (); ++i)
262 for (int j = min (keymap [i]->range, KEYSYM_HASH_BUCKETS) - 1; j >= 0; --j)
263 { 198 {
264 hashkey = (keymap [i]->keysym + j) & KEYSYM_HASH_MASK; 199 hashkey = keymap [i]->keysym & KEYSYM_HASH_MASK;
265 ++hash_bucket_size [hashkey]; 200 ++hash_bucket_size [hashkey];
266 } 201 }
267 202
268 // now we know the size of each bucket 203 // now we know the size of each bucket
269 // compute the index of each bucket 204 // compute the index of each bucket
270 hash [0] = 0; 205 hash [0] = 0;
271 for (index = 0, i = 1; i < KEYSYM_HASH_BUCKETS; ++i) 206 for (index = 0, i = 1; i < KEYSYM_HASH_BUCKETS; ++i)
… …
275 } 210 }
276 211
277 // and allocate just enough space 212 // and allocate just enough space
278 sorted_keymap.insert (sorted_keymap.begin (), index + hash_bucket_size [i - 1], 0); 213 sorted_keymap.insert (sorted_keymap.begin (), index + hash_bucket_size [i - 1], 0);
279 214
215 memset (hash_bucket_size, 0, sizeof (hash_bucket_size));
216
280 // fill in sorted_keymap 217 // fill in sorted_keymap
281 // it is sorted in each bucket 218 // it is sorted in each bucket
282 for (i = 0; i < keymap.size (); ++i) 219 for (i = 0; i < keymap.size (); ++i)
283 for (int j = min (keymap [i]->range, KEYSYM_HASH_BUCKETS) - 1; j >= 0; --j)
284 { 220 {
285 hashkey = (keymap [i]->keysym + j) & KEYSYM_HASH_MASK; 221 hashkey = keymap [i]->keysym & KEYSYM_HASH_MASK;
286 222
287 index = hash [hashkey] + hash_bucket_counter [hashkey]; 223 index = hash [hashkey] + hash_bucket_size [hashkey];
288 224
289 while (index > hash [hashkey] 225 while (index > hash [hashkey]
290 && compare_priority (keymap [i], sorted_keymap [index - 1]) > 0) 226 && compare_priority (keymap [i], sorted_keymap [index - 1]) > 0)
291 { 227 {
292 sorted_keymap [index] = sorted_keymap [index - 1]; 228 sorted_keymap [index] = sorted_keymap [index - 1];
293 --index; 229 --index;
294 } 230 }
295 231
296 sorted_keymap [index] = keymap [i]; 232 sorted_keymap [index] = keymap [i];
297 ++hash_bucket_counter [hashkey]; 233 ++hash_bucket_size [hashkey];
298 } 234 }
299 235
300 keymap.swap (sorted_keymap); 236 keymap.swap (sorted_keymap);
301 237
302#ifndef NDEBUG 238#ifndef NDEBUG
303 // check for invariants 239 // check for invariants
304 for (i = 0; i < KEYSYM_HASH_BUCKETS; ++i) 240 for (i = 0; i < KEYSYM_HASH_BUCKETS; ++i)
305 { 241 {
306 index = hash[i]; 242 index = hash[i];
307 for (int j = 0; j < hash_bucket_size [i]; ++j) 243 for (int j = 0; j < hash_bucket_size [i]; ++j)
308 { 244 {
309 if (keymap [index + j]->range == 1)
310 assert (i == (keymap [index + j]->keysym & KEYSYM_HASH_MASK)); 245 assert (i == (keymap [index + j]->keysym & KEYSYM_HASH_MASK));
311 246
312 if (j) 247 if (j)
313 assert (compare_priority (keymap [index + j - 1], 248 assert (compare_priority (keymap [index + j - 1],
314 keymap [index + j]) >= 0); 249 keymap [index + j]) >= 0);
315 } 250 }
… …
317 252
318 // this should be able to detect most possible bugs 253 // this should be able to detect most possible bugs
319 for (i = 0; i < sorted_keymap.size (); ++i) 254 for (i = 0; i < sorted_keymap.size (); ++i)
320 { 255 {
321 keysym_t *a = sorted_keymap[i]; 256 keysym_t *a = sorted_keymap[i];
322 for (int j = 0; j < a->range; ++j)
323 {
324 int index = find_keysym (a->keysym + j, a->state); 257 int index = find_keysym (a->keysym, a->state);
325 258
326 assert (index >= 0); 259 assert (index >= 0);
327 keysym_t *b = keymap [index]; 260 keysym_t *b = keymap [index];
328 assert (i == index // the normally expected result 261 assert (i == index // the normally expected result
329 || IN_RANGE_INC (a->keysym + j, b->keysym, b->keysym + b->range) 262 || a->keysym == b->keysym
330 && compare_priority (a, b) <= 0); // is effectively the same or a closer match 263 && compare_priority (a, b) <= 0); // is effectively the same or a closer match
331 }
332 } 264 }
333#endif 265#endif
334} 266}
335 267
336int 268int
… …
344 276
345 for (; index < end; ++index) 277 for (; index < end; ++index)
346 { 278 {
347 keysym_t *key = keymap [index]; 279 keysym_t *key = keymap [index];
348 280
349 if (key->keysym <= keysym && keysym < key->keysym + key->range 281 if (key->keysym == keysym
350 // match only the specified bits in state and ignore others 282 // match only the specified bits in state and ignore others
351 && (key->state & state) == key->state) 283 && (key->state & state) == key->state)
352 return index; 284 return index;
353 } 285 }
354 286

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines