]> git.lyx.org Git - lyx.git/blob - src/kbmap.C
remove redundant lyxerr.debugging checks; macro LYXERR already checks whether the...
[lyx.git] / src / kbmap.C
1 /**
2  * \file kbmap.C
3  * This file is part of LyX, the document processor.
4  * Licence details can be found in the file COPYING.
5  *
6  * \author Lars Gullik Bjønnes
7  * \author Jean-Marc Lasgouttes
8  * \author John Levon
9  * \author André Pönitz
10  *
11  * Full author contact details are available in file CREDITS.
12  */
13
14 #include <config.h>
15
16 #include "kbmap.h"
17
18 #include "debug.h"
19 #include "kbsequence.h"
20 #include "LyXAction.h"
21 #include "lyxlex.h"
22
23 #include "frontends/LyXKeySym.h"
24
25 #include "support/filetools.h"
26
27 #include <sstream>
28
29
30 namespace lyx {
31
32 using support::FileName;
33 using support::i18nLibFileSearch;
34
35 using std::endl;
36 using std::string;
37
38
39 string const kb_keymap::printKeySym(LyXKeySym const & key,
40                                     key_modifier::state mod)
41 {
42         string buf;
43
44         string const s = key.getSymbolName();
45
46         if (mod & key_modifier::shift)
47                 buf += "S-";
48         if (mod & key_modifier::ctrl)
49                 buf += "C-";
50         if (mod & key_modifier::alt)
51                 buf += "M-";
52
53         buf += s;
54         return buf;
55 }
56
57
58 string::size_type kb_keymap::bind(string const & seq, FuncRequest const & func)
59 {
60         LYXERR(Debug::KBMAP) << "BIND: Sequence `"
61                << seq << "' Action `"
62                << func.action << '\'' << endl;
63
64         kb_sequence k(0, 0);
65
66         string::size_type const res = k.parse(seq);
67         if (res == string::npos) {
68                 defkey(&k, func);
69         } else {
70                 LYXERR(Debug::KBMAP) << "Parse error at position " << res
71                                      << " in key sequence '" << seq << "'."
72                                      << endl;
73         }
74
75         return res;
76 }
77
78
79 namespace {
80
81 enum BindTags {
82         BN_BIND,
83         BN_BINDFILE
84 };
85
86 keyword_item bindTags[] = {
87         { "\\bind", BN_BIND },
88         { "\\bind_file", BN_BINDFILE }
89 };
90
91 }
92
93
94 bool kb_keymap::read(string const & bind_file)
95 {
96         const int bindCount = sizeof(bindTags) / sizeof(keyword_item);
97
98         LyXLex lexrc(bindTags, bindCount);
99         if (lyxerr.debugging(Debug::PARSER))
100                 lexrc.printTable(lyxerr);
101
102         FileName const tmp(i18nLibFileSearch("bind", bind_file, "bind"));
103         lexrc.setFile(tmp);
104         if (!lexrc.isOK()) {
105                 lyxerr << "kb_keymap::read: cannot open bind file:"
106                        << tmp << endl;
107                 return false;
108         }
109
110         LYXERR(Debug::KBMAP) << "Reading bind file:" << tmp << endl;
111
112         bool error = false;
113         while (lexrc.isOK()) {
114                 switch (lexrc.lex()) {
115                 case LyXLex::LEX_UNDEF:
116                         lexrc.printError("Unknown tag `$$Token'");
117                         error = true;
118                         continue;
119                 case LyXLex::LEX_FEOF:
120                         continue;
121                 case BN_BIND:
122                 {
123                         string seq, cmd;
124
125                         if (lexrc.next()) {
126                                 seq = lexrc.getString();
127                         } else {
128                                 lexrc.printError("BN_BIND: Missing key sequence");
129                                 error = true;
130                                 break;
131                         }
132
133                         if (lexrc.next(true)) {
134                                 cmd = lexrc.getString();
135                         } else {
136                                 lexrc.printError("BN_BIND: missing command");
137                                 error = true;
138                                 break;
139                         }
140
141                         FuncRequest func = lyxaction.lookupFunc(cmd);
142                         if (func. action == LFUN_UNKNOWN_ACTION) {
143                                 lexrc.printError("BN_BIND: Unknown LyX"
144                                                  " function `$$Token'");
145                                 error = true;
146                                 break;
147                         }
148
149                         bind(seq, func);
150                         break;
151                 }
152                 case BN_BINDFILE:
153                         if (lexrc.next()) {
154                                 string const tmp(lexrc.getString());
155                                 error |= !read(tmp);
156                         } else {
157                                 lexrc.printError("BN_BINDFILE: Missing file name");
158                                 error = true;
159                                 break;
160
161                         }
162                         break;
163                 }
164         }
165
166         if (error)
167                 lyxerr << "kb_keymap::read: error while reading bind file:"
168                        << tmp << endl;
169         return !error;
170 }
171
172
173 FuncRequest const &
174 kb_keymap::lookup(LyXKeySymPtr key,
175                   key_modifier::state mod, kb_sequence * seq) const
176 {
177         static FuncRequest const unknown(LFUN_UNKNOWN_ACTION);
178
179         if (table.empty()) {
180                 seq->curmap = seq->stdmap;
181                 seq->mark_deleted();
182                 return unknown;
183         }
184
185         Table::const_iterator end = table.end();
186         for (Table::const_iterator cit = table.begin(); cit != end; ++cit) {
187                 key_modifier::state mask(cit->mod.second);
188                 key_modifier::state check =
189                         static_cast<key_modifier::state>(mod & ~mask);
190
191                 if (*(cit->code) == *key && cit->mod.first == check) {
192                         // match found
193                         if (cit->table.get()) {
194                                 // this is a prefix key - set new map
195                                 seq->curmap = cit->table.get();
196                                 static FuncRequest prefix(LFUN_COMMAND_PREFIX);
197                                 return prefix;
198                         } else {
199                                 // final key - reset map
200                                 seq->curmap = seq->stdmap;
201                                 seq->mark_deleted();
202                                 return cit->func;
203                         }
204                 }
205         }
206
207         // error - key not found:
208         seq->curmap = seq->stdmap;
209         seq->mark_deleted();
210
211         return unknown;
212 }
213
214
215 docstring const kb_keymap::print(bool forgui) const
216 {
217         docstring buf;
218         Table::const_iterator end = table.end();
219         for (Table::const_iterator cit = table.begin(); cit != end; ++cit) {
220                 buf += cit->code->print(cit->mod.first, forgui);
221                 buf += ' ';
222         }
223         return buf;
224 }
225
226
227 void kb_keymap::defkey(kb_sequence * seq,
228                        FuncRequest const & func, unsigned int r)
229 {
230         LyXKeySymPtr code = seq->sequence[r];
231         if (!code->isOK())
232                 return;
233
234         key_modifier::state const mod1 = seq->modifiers[r].first;
235         key_modifier::state const mod2 = seq->modifiers[r].second;
236
237         // check if key is already there
238         Table::iterator end = table.end();
239         for (Table::iterator it = table.begin(); it != end; ++it) {
240                 if (*(code) == *(it->code)
241                     && mod1 == it->mod.first
242                     && mod2 == it->mod.second) {
243                         // overwrite binding
244                         if (r + 1 == seq->length()) {
245                                 LYXERR(Debug::KBMAP)
246                                         << "Warning: New binding for '"
247                                         << to_utf8(seq->print(false))
248                                         << "' is overriding old binding..."
249                                         << endl;
250                                 if (it->table.get()) {
251                                         it->table.reset();
252                                 }
253                                 it->func = func;
254                                 it->func.origin = FuncRequest::KEYBOARD;
255                                 return;
256                         } else if (!it->table.get()) {
257                                 lyxerr << "Error: New binding for '" 
258                                        << to_utf8(seq->print(false))
259                                        << "' is overriding old binding..."
260                                                << endl;
261                                 return;
262                         } else {
263                                 it->table->defkey(seq, func, r + 1);
264                                 return;
265                         }
266                 }
267         }
268
269         Table::iterator newone = table.insert(table.end(), kb_key());
270         newone->code = code;
271         newone->mod = seq->modifiers[r];
272         if (r + 1 == seq->length()) {
273                 newone->func = func;
274                 newone->func.origin = FuncRequest::KEYBOARD;
275                 newone->table.reset();
276         } else {
277                 newone->table.reset(new kb_keymap);
278                 newone->table->defkey(seq, func, r + 1);
279         }
280 }
281
282
283 docstring const kb_keymap::printbindings(FuncRequest const & func) const
284 {
285         odocstringstream res;
286         Bindings bindings = findbindings(func);
287         for (Bindings::const_iterator cit = bindings.begin();
288              cit != bindings.end() ; ++cit)
289                 res << '[' << cit->print(true) << ']';
290         return res.str();
291 }
292
293
294 kb_keymap::Bindings
295 kb_keymap::findbindings(FuncRequest const & func) const
296 {
297         return findbindings(func, kb_sequence(0, 0));
298 }
299
300
301 kb_keymap::Bindings
302 kb_keymap::findbindings(FuncRequest const & func,
303                         kb_sequence const & prefix) const
304 {
305         Bindings res;
306         if (table.empty()) return res;
307
308         Table::const_iterator end = table.end();
309         for (Table::const_iterator cit = table.begin();
310             cit != end; ++cit) {
311                 if (cit->table.get()) {
312                         kb_sequence seq = prefix;
313                         seq.addkey(cit->code, cit->mod.first);
314                         Bindings res2 =
315                                 cit->table->findbindings(func, seq);
316                         res.insert(res.end(), res2.begin(), res2.end());
317                 } else if (cit->func == func) {
318                         kb_sequence seq = prefix;
319                         seq.addkey(cit->code, cit->mod.first);
320                         res.push_back(seq);
321                 }
322         }
323
324         return res;
325 }
326
327
328 std::pair<LyXKeySym const *, key_modifier::state>
329 kb_keymap::find1keybinding(FuncRequest const & func) const
330 {
331         Table::const_iterator end = table.end();
332         for (Table::const_iterator cit = table.begin();
333             cit != end; ++cit) {
334                 if (!cit->table.get() && cit->func == func)
335                         return std::make_pair(cit->code.get(), cit->mod.first);
336         }
337
338         return std::make_pair<LyXKeySym const *, key_modifier::state>(0, key_modifier::none);
339 }
340
341
342 } // namespace lyx