/[svn]/gigedit/trunk/src/gigedit/scripteditor.cpp
ViewVC logotype

Contents of /gigedit/trunk/src/gigedit/scripteditor.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3621 - (show annotations) (download)
Tue Oct 1 16:27:13 2019 UTC (6 months ago) by schoenebeck
File size: 31999 byte(s)
* Script Editor: Show warning message in status line if Gigedit was
  compiled without liblinuxsampler support (to make user aware about
  limited features due to that).

1 /*
2 Copyright (c) 2014-2019 Christian Schoenebeck
3
4 This file is part of "gigedit" and released under the terms of the
5 GNU General Public License version 2.
6 */
7
8 #include "scripteditor.h"
9 #include "global.h"
10 #include "compat.h"
11 #include <gtk/gtkwidget.h> // for gtk_widget_modify_*()
12 #if defined(__APPLE__)
13 # include "MacHelper.h"
14 #endif
15 #include <math.h> // for log10()
16
17 #if !USE_LS_SCRIPTVM
18
19 static const std::string _keywords[] = {
20 "on", "end", "declare", "while", "if", "or", "and", "not", "else", "case",
21 "select", "to", "const", "polyphonic", "mod", "synchronized"
22 };
23 static int _keywordsSz = sizeof(_keywords) / sizeof(std::string);
24
25 static const std::string _eventNames[] = {
26 "init", "note", "release", "controller"
27 };
28 static int _eventNamesSz = sizeof(_eventNames) / sizeof(std::string);
29
30 static bool isKeyword(const Glib::ustring& s) {
31 for (int i = 0; i < _keywordsSz; ++i)
32 if (_keywords[i] == s) return true;
33 return false;
34 }
35
36 static bool isEvent(const Glib::ustring& s) {
37 for (int i = 0; i < _eventNamesSz; ++i)
38 if (_eventNames[i] == s) return true;
39 return false;
40 }
41
42 #endif // !USE_LS_SCRIPTVM
43
44 static Glib::RefPtr<Gdk::Pixbuf> createIcon(std::string name, const Glib::RefPtr<Gdk::Screen>& screen) {
45 const int targetH = 16;
46 Glib::RefPtr<Gtk::IconTheme> theme = Gtk::IconTheme::get_for_screen(screen);
47 int w = 0;
48 int h = 0; // ignored
49 Gtk::IconSize::lookup(Gtk::ICON_SIZE_SMALL_TOOLBAR, w, h);
50 if (!theme->has_icon(name))
51 return Glib::RefPtr<Gdk::Pixbuf>();
52 Glib::RefPtr<Gdk::Pixbuf> pixbuf = theme->load_icon(name, w, Gtk::ICON_LOOKUP_GENERIC_FALLBACK);
53 if (pixbuf->get_height() != targetH) {
54 pixbuf = pixbuf->scale_simple(targetH, targetH, Gdk::INTERP_BILINEAR);
55 }
56 return pixbuf;
57 }
58
59 static Glib::RefPtr<Gdk::Pixbuf> createIcon(std::vector<std::string> alternativeNames, const Glib::RefPtr<Gdk::Screen>& screen) {
60 for (int i = 0; i < alternativeNames.size(); ++i) {
61 Glib::RefPtr<Gdk::Pixbuf> buf = createIcon(alternativeNames[i], screen);
62 if (buf) return buf;
63 }
64 return Glib::RefPtr<Gdk::Pixbuf>();
65 }
66
67 ScriptEditor::ScriptEditor() :
68 m_statusLabel("", Gtk::ALIGN_START),
69 #if HAS_GTKMM_STOCK
70 m_applyButton(Gtk::Stock::APPLY),
71 m_cancelButton(Gtk::Stock::CANCEL)
72 #else
73 m_applyButton(_("_Apply"), true),
74 m_cancelButton(_("_Cancel"), true)
75 #endif
76 {
77 m_script = NULL;
78 #if USE_LS_SCRIPTVM
79 m_vm = NULL;
80 #endif
81
82 if (!Settings::singleton()->autoRestoreWindowDimension) {
83 set_default_size(800, 700);
84 set_position(Gtk::WIN_POS_MOUSE);
85 }
86
87 // depending on GTK version and installed themes, there may be different
88 // icons, and different names for them, so for each type of icon we use,
89 // we provide a list of possible icon names, the first one found to be
90 // installed on the local system from the list will be used and loaded for
91 // the respective purpose (so order matters in those lists)
92 //
93 // (see https://developer.gnome.org/gtkmm/stable/namespaceGtk_1_1Stock.html for
94 // available icon names)
95 std::vector<std::string> errorIconNames;
96 errorIconNames.push_back("dialog-error");
97 errorIconNames.push_back("media-record");
98 errorIconNames.push_back("process-stop");
99
100 std::vector<std::string> warningIconNames;
101 warningIconNames.push_back("dialog-warning-symbolic");
102 warningIconNames.push_back("dialog-warning");
103
104 std::vector<std::string> successIconNames;
105 successIconNames.push_back("emblem-default");
106 successIconNames.push_back("tools-check-spelling");
107
108 m_errorIcon = createIcon(errorIconNames, get_screen());
109 m_warningIcon = createIcon(warningIconNames, get_screen());
110 m_successIcon = createIcon(successIconNames, get_screen());
111
112 add(m_vbox);
113
114 m_tagTable = Gtk::TextBuffer::TagTable::create();
115
116 m_keywordTag = Gtk::TextBuffer::Tag::create();
117 m_keywordTag->property_foreground() = "#000000"; // black
118 m_keywordTag->property_weight() = PANGO_WEIGHT_BOLD;
119 m_tagTable->add(m_keywordTag);
120
121 m_eventTag = Gtk::TextBuffer::Tag::create();
122 m_eventTag->property_foreground() = "#07c0cf"; // cyan 1
123 m_eventTag->property_weight() = PANGO_WEIGHT_BOLD;
124 m_tagTable->add(m_eventTag);
125
126 m_variableTag = Gtk::TextBuffer::Tag::create();
127 m_variableTag->property_foreground() = "#790cc4"; // magenta
128 m_tagTable->add(m_variableTag);
129
130 m_functionTag = Gtk::TextBuffer::Tag::create();
131 m_functionTag->property_foreground() = "#1ba1dd"; // cyan 2
132 m_tagTable->add(m_functionTag);
133
134 m_numberTag = Gtk::TextBuffer::Tag::create();
135 m_numberTag->property_foreground() = "#c4950c"; // yellow
136 m_tagTable->add(m_numberTag);
137
138 m_stringTag = Gtk::TextBuffer::Tag::create();
139 m_stringTag->property_foreground() = "#c40c0c"; // red
140 m_tagTable->add(m_stringTag);
141
142 m_commentTag = Gtk::TextBuffer::Tag::create();
143 m_commentTag->property_foreground() = "#9c9c9c"; // gray
144 m_tagTable->add(m_commentTag);
145
146 #define PREPROC_TOKEN_COLOR "#2f8a33" // green
147
148 m_preprocTag = Gtk::TextBuffer::Tag::create();
149 m_preprocTag->property_foreground() = PREPROC_TOKEN_COLOR;
150 m_tagTable->add(m_preprocTag);
151
152 m_preprocCommentTag = Gtk::TextBuffer::Tag::create();
153 m_preprocCommentTag->property_strikethrough() = true;
154 m_preprocCommentTag->property_background() = "#e5e5e5";
155 m_tagTable->add(m_preprocCommentTag);
156
157 m_errorTag = Gtk::TextBuffer::Tag::create();
158 m_errorTag->property_background() = "#ff9393"; // red
159 m_tagTable->add(m_errorTag);
160
161 m_warningTag = Gtk::TextBuffer::Tag::create();
162 m_warningTag->property_background() = "#fffd7c"; // yellow
163 m_tagTable->add(m_warningTag);
164
165 m_lineNrTag = Gtk::TextBuffer::Tag::create();
166 m_lineNrTag->property_foreground() = "#CCCCCC";
167 m_tagTable->add(m_lineNrTag);
168
169 m_metricTag = Gtk::TextBuffer::Tag::create();
170 m_metricTag->property_foreground() = "#000000"; // black
171 m_tagTable->add(m_metricTag);
172
173 m_stdUnitTag = Gtk::TextBuffer::Tag::create();
174 m_stdUnitTag->property_foreground() = "#50BC00"; // greenish
175 m_tagTable->add(m_stdUnitTag);
176
177 // create menu
178 #if USE_GTKMM_BUILDER
179 m_actionGroup = Gio::SimpleActionGroup::create();
180 m_actionGroup->add_action(
181 "Apply", sigc::mem_fun(*this, &ScriptEditor::onButtonApply)
182 );
183 m_actionGroup->add_action(
184 "Close", sigc::mem_fun(*this, &ScriptEditor::onButtonCancel)
185 );
186 m_actionGroup->add_action(
187 "ChangeFont", sigc::mem_fun(*this, &ScriptEditor::onMenuChangeFontSize)
188 );
189 insert_action_group("ScriptEditor", m_actionGroup);
190
191 m_uiManager = Gtk::Builder::create();
192 Glib::ustring ui_info =
193 "<interface>"
194 " <menubar id='MenuBar'>"
195 " <menu id='MenuScript'>"
196 " <section>"
197 " <item id='Apply'>"
198 " <attribute name='label' translatable='yes'>_Apply</attribute>"
199 " <attribute name='action'>ScriptEditor.Apply</attribute>"
200 " <attribute name='accel'>&lt;Primary&gt;s</attribute>"
201 " </item>"
202 " </section>"
203 " <section>"
204 " <item id='Close'>"
205 " <attribute name='label' translatable='yes'>_Close</attribute>"
206 " <attribute name='action'>ScriptEditor.Close</attribute>"
207 " <attribute name='accel'>&lt;Primary&gt;q</attribute>"
208 " </item>"
209 " </section>"
210 " </menu>"
211 " <menu id='MenuEditor'>"
212 " <section>"
213 " <item id='ChangeFont'>"
214 " <attribute name='label' translatable='yes'>_Font Size ...</attribute>"
215 " <attribute name='action'>ScriptEditor.ChangeFont</attribute>"
216 " </item>"
217 " </section>"
218 " </menu>"
219 " </menubar>"
220 "</interface>";
221 m_uiManager->add_from_string(ui_info);
222 /*{
223 auto object = uiManager->get_object("MenuBar");
224 auto gmenu = Glib::RefPtr<Gio::Menu>::cast_dynamic(object);
225 set_menubar(gmenu);
226 }*/
227 #else
228 m_actionGroup = Gtk::ActionGroup::create();
229 m_actionGroup->add(Gtk::Action::create("MenuScript", _("_Script")));
230 m_actionGroup->add(Gtk::Action::create("Apply", _("_Apply")),
231 Gtk::AccelKey("<control>s"),
232 sigc::mem_fun(*this, &ScriptEditor::onButtonApply));
233 m_actionGroup->add(Gtk::Action::create("Close", _("_Close")),
234 Gtk::AccelKey("<control>q"),
235 sigc::mem_fun(*this, &ScriptEditor::onButtonCancel));
236 m_actionGroup->add(Gtk::Action::create("MenuEditor", _("_Editor")));
237 m_actionGroup->add(Gtk::Action::create("ChangeFont", _("_Font Size ...")),
238 sigc::mem_fun(*this, &ScriptEditor::onMenuChangeFontSize));
239 m_uiManager = Gtk::UIManager::create();
240 m_uiManager->insert_action_group(m_actionGroup);
241 add_accel_group(m_uiManager->get_accel_group());
242 m_uiManager->add_ui_from_string(
243 "<ui>"
244 " <menubar name='MenuBar'>"
245 " <menu action='MenuScript'>"
246 " <menuitem action='Apply'/>"
247 " <separator/>"
248 " <menuitem action='Close'/>"
249 " </menu>"
250 " <menu action='MenuEditor'>"
251 " <menuitem action='ChangeFont'/>"
252 " </menu>"
253 " </menubar>"
254 "</ui>"
255 );
256 #endif
257
258 m_lineNrBuffer = Gtk::TextBuffer::create(m_tagTable);
259 m_lineNrView.set_size_request(22,14);
260 m_lineNrView.set_buffer(m_lineNrBuffer);
261 m_lineNrView.set_left_margin(3);
262 m_lineNrView.set_right_margin(3);
263 m_lineNrView.property_editable() = false;
264 m_lineNrView.property_sensitive() = false;
265 m_lineNrTextViewSpacer.set_size_request(5,14);
266 m_lineNrTextViewSpacer.property_editable() = false;
267 m_lineNrTextViewSpacer.property_sensitive() = false;
268 {
269 #if 1 //(GTKMM_MAJOR_VERSION == 2 && GTKMM_MINOR_VERSION < 90) || GTKMM_MAJOR_VERSION < 2
270 Gdk::Color color;
271 #else
272 Gdk::RGBA color;
273 #endif
274 color.set("#F5F5F5");
275 GtkWidget* widget = (GtkWidget*) m_lineNrView.gobj();
276 #if GTK_MAJOR_VERSION < 3 || (GTK_MAJOR_VERSION == 3 && GTK_MINOR_VERSION <= 24)
277 gtk_widget_modify_base(widget, GTK_STATE_NORMAL, color.gobj());
278 gtk_widget_modify_bg(widget, GTK_STATE_NORMAL, color.gobj());
279 #endif
280 }
281 {
282 #if 1 //(GTKMM_MAJOR_VERSION == 2 && GTKMM_MINOR_VERSION < 90) || GTKMM_MAJOR_VERSION < 2
283 Gdk::Color color;
284 #else
285 Gdk::RGBA color;
286 #endif
287 color.set("#EEEEEE");
288 GtkWidget* widget = (GtkWidget*) m_lineNrTextViewSpacer.gobj();
289 #if GTK_MAJOR_VERSION < 3 || (GTK_MAJOR_VERSION == 3 && GTK_MINOR_VERSION <= 24)
290 gtk_widget_modify_base(widget, GTK_STATE_NORMAL, color.gobj());
291 gtk_widget_modify_bg(widget, GTK_STATE_NORMAL, color.gobj());
292 #endif
293 }
294 m_textBuffer = Gtk::TextBuffer::create(m_tagTable);
295 m_textView.set_buffer(m_textBuffer);
296 m_textView.set_left_margin(5);
297 setFontSize(currentFontSize(), false);
298 m_textViewHBox.pack_start(m_lineNrView, Gtk::PACK_SHRINK);
299 m_textViewHBox.pack_start(m_lineNrTextViewSpacer, Gtk::PACK_SHRINK);
300 m_textViewHBox.add(m_textView);
301 m_scrolledWindow.add(m_textViewHBox);
302 m_scrolledWindow.set_policy(Gtk::POLICY_AUTOMATIC, Gtk::POLICY_AUTOMATIC);
303
304 #if USE_GTKMM_BUILDER
305 Gtk::Widget* menuBar = new Gtk::MenuBar(
306 Glib::RefPtr<Gio::Menu>::cast_dynamic(
307 m_uiManager->get_object("MenuBar")
308 )
309 );
310 #else
311 Gtk::Widget* menuBar = m_uiManager->get_widget("/MenuBar");
312 #endif
313
314 m_vbox.pack_start(*menuBar, Gtk::PACK_SHRINK);
315 m_vbox.pack_start(m_scrolledWindow);
316
317 m_buttonBox.set_layout(Gtk::BUTTONBOX_END);
318 m_buttonBox.pack_start(m_applyButton);
319 m_buttonBox.pack_start(m_cancelButton);
320 m_applyButton.set_can_default();
321 m_applyButton.set_sensitive(false);
322 m_applyButton.grab_focus();
323
324 #if GTKMM_MAJOR_VERSION < 3
325 m_statusHBox.set_spacing(6);
326 #elif GTKMM_MAJOR_VERSION == 3 && GTKMM_MINOR_VERSION < 12
327 m_statusImage.set_margin_left(6);
328 m_statusImage.set_margin_right(6);
329 #else
330 m_statusImage.set_margin_start(6);
331 m_statusImage.set_margin_end(6);
332 #endif
333
334 m_statusHBox.pack_start(m_statusImage, Gtk::PACK_SHRINK);
335 m_statusHBox.pack_start(m_statusLabel);
336 #if HAS_GTKMM_SHOW_ALL_CHILDREN
337 m_statusHBox.show_all_children();
338 #endif
339
340 m_footerHBox.pack_start(m_statusHBox);
341 m_footerHBox.pack_start(m_buttonBox, Gtk::PACK_SHRINK);
342
343 m_vbox.pack_start(m_footerHBox, Gtk::PACK_SHRINK);
344
345 m_applyButton.signal_clicked().connect(
346 sigc::mem_fun(*this, &ScriptEditor::onButtonApply)
347 );
348
349 m_cancelButton.signal_clicked().connect(
350 sigc::mem_fun(*this, &ScriptEditor::onButtonCancel)
351 );
352
353 m_textBuffer->signal_insert().connect(
354 sigc::mem_fun(*this, &ScriptEditor::onTextInserted)
355 );
356
357 m_textBuffer->signal_erase().connect(
358 sigc::mem_fun(*this, &ScriptEditor::onTextErased)
359 );
360
361 m_textBuffer->signal_modified_changed().connect(
362 sigc::mem_fun(*this, &ScriptEditor::onModifiedChanged)
363 );
364
365 signal_hide().connect(
366 sigc::mem_fun(*this, &ScriptEditor::onWindowHide)
367 );
368
369 signal_delete_event().connect(
370 #if GTKMM_MAJOR_VERSION > 3 || (GTKMM_MAJOR_VERSION == 3 && (GTKMM_MINOR_VERSION > 91 || (GTKMM_MINOR_VERSION == 91 && GTKMM_MICRO_VERSION >= 2))) // GTKMM >= 3.91.2
371 sigc::mem_fun(*this, &ScriptEditor::onWindowDelete)
372 #else
373 sigc::mem_fun(*this, &ScriptEditor::onWindowDeleteP)
374 #endif
375 );
376
377 #if HAS_GTKMM_SHOW_ALL_CHILDREN
378 show_all_children();
379 #endif
380
381 #if !USE_LS_SCRIPTVM
382 // make user aware about gigedit had been compiled without liblinuxsampler support
383 m_statusLabel.set_markup(_("Limited editor features (since Gigedit was compiled without liblinuxsampler support)!"));
384 m_statusImage.set(m_warningIcon);
385 #endif
386 }
387
388 ScriptEditor::~ScriptEditor() {
389 printf("ScriptEditor destruct\n");
390 #if USE_LS_SCRIPTVM
391 if (m_vm) delete m_vm;
392 #endif
393 }
394
395 int ScriptEditor::currentFontSize() const {
396 #if defined(__APPLE__)
397 const int defaultFontSize = 11;
398 #else
399 const int defaultFontSize = 10;
400 #endif
401 const int settingFontSize = Settings::singleton()->scriptEditorFontSize;
402 const int fontSize = (settingFontSize > 0) ? settingFontSize : defaultFontSize;
403 return fontSize;
404 }
405
406 void ScriptEditor::setFontSize(int sizePt, bool save) {
407 //printf("setFontSize(%d,%d)\n", size, save);
408
409 // make sure the real size on the screen for the editor's font is consistent
410 // on all screens (which otherwise may vary between models and DPI settings)
411 const double referenceDPI = 96;
412 double dpi = Gdk::Screen::get_default()->get_resolution();
413 double sizePx = sizePt * dpi / referenceDPI;
414
415 #if GTKMM_MAJOR_VERSION < 3 || (GTKMM_MAJOR_VERSION == 3 && GTKMM_MINOR_VERSION < 20)
416 Pango::FontDescription fdesc;
417 fdesc.set_family("monospace");
418 # if defined(__APPLE__)
419 // fixes poor readability of default monospace font on Macs
420 if (macIsMinMac10_6())
421 fdesc.set_family("Menlo");
422 # endif
423 fdesc.set_size(sizePx * PANGO_SCALE);
424 # if GTKMM_MAJOR_VERSION < 3
425 m_lineNrView.modify_font(fdesc);
426 m_textView.modify_font(fdesc);
427 # else
428 m_lineNrView.override_font(fdesc);
429 m_textView.override_font(fdesc);
430 # endif
431 #else
432 Glib::ustring family = "monospace";
433 # if defined(__APPLE__)
434 // fixes poor readability of default monospace font on Macs
435 if (macIsMinMac10_6())
436 family = "Menlo";
437 # endif
438 if (!m_css) {
439 m_css = Gtk::CssProvider::create();
440 m_lineNrView.get_style_context()->add_provider(m_css, GTK_STYLE_PROVIDER_PRIORITY_FALLBACK);
441 m_textView.get_style_context()->add_provider(m_css, GTK_STYLE_PROVIDER_PRIORITY_FALLBACK);
442 }
443 m_css->load_from_data(
444 "* {"
445 " font: " + ToString(sizePt) + "pt " + family + ";"
446 "}"
447 );
448 #endif
449 if (save) Settings::singleton()->scriptEditorFontSize = sizePt;
450 }
451
452 void ScriptEditor::setScript(gig::Script* script) {
453 m_script = script;
454 if (!script) {
455 set_title(_("No Script"));
456 return;
457 }
458
459 set_title(std::string(_("Instrument Script")) + " - \"" + script->Name + "\"");
460
461 std::string txt = script->GetScriptAsText();
462 //printf("text : '%s'\n", txt.c_str());
463 m_textBuffer->set_text(txt);
464 m_textBuffer->set_modified(false);
465
466 // on Gtk 3 the respective text change callback would not be called, so force this update here
467 if (txt.empty())
468 updateLineNumbers();
469 }
470
471 void ScriptEditor::updateLineNumbers() {
472 int n = m_textBuffer->get_line_count();
473 int old = m_lineNrBuffer->get_line_count();
474 if (n == old && old > 1) return;
475 if (n < 1) n = 1;
476 const int digits = log10(n) + 1;
477 const int bufSz = digits + 2;
478 char* buf = new char[bufSz];
479 std::string sFmt1 = "%" + ToString(digits) + "d";
480 std::string sFmt2 = "\n%" + ToString(digits) + "d";
481 Glib::ustring s;
482 for (int i = 0; i < n; ++i) {
483 snprintf(buf, bufSz, i ? sFmt2.c_str() : sFmt1.c_str(), i+1);
484 s += buf;
485 }
486 m_lineNrBuffer->remove_all_tags(m_lineNrBuffer->begin(), m_lineNrBuffer->end());
487 m_lineNrBuffer->set_text(s);
488 m_lineNrBuffer->apply_tag(m_lineNrTag, m_lineNrBuffer->begin(), m_lineNrBuffer->end());
489 if (buf) delete[] buf;
490 }
491
492 void ScriptEditor::onTextInserted(const Gtk::TextBuffer::iterator& itEnd, const Glib::ustring& txt, int length) {
493 //printf("onTextInserted()\n");
494 #if USE_LS_SCRIPTVM
495 m_textBuffer->remove_all_tags(m_textBuffer->begin(), m_textBuffer->end());
496 updateSyntaxHighlightingByVM();
497 updateParserIssuesByVM();
498 updateStatusBar();
499 #else
500 //printf("inserted %d\n", length);
501 Gtk::TextBuffer::iterator itStart = itEnd;
502 itStart.backward_chars(length);
503
504 Gtk::TextBuffer::iterator it = itStart;
505 it.backward_word_start();
506
507 bool eofReached = false;
508 while (it <= itEnd) {
509 Gtk::TextBuffer::iterator itWordStart = it;
510 if (!it.forward_word_end()) {
511 eofReached = true;
512 it = itEnd;
513 }
514
515 Glib::ustring s = m_textBuffer->get_text(itWordStart, it, false);
516 //printf("{%s}\n", s.c_str());
517 if (isKeyword(s))
518 m_textBuffer->apply_tag(m_keywordTag, itWordStart, it);
519 else if (isEvent(s)) {
520 // check if previous word is "on"
521 Gtk::TextBuffer::iterator itPreviousWordStart = itWordStart;
522 if (itPreviousWordStart.backward_word_start()) {
523 Gtk::TextBuffer::iterator itPreviousWordEnd = itPreviousWordStart;
524 itPreviousWordEnd.forward_word_end();
525 if (m_textBuffer->get_text(itPreviousWordStart, itPreviousWordEnd, false) == "on") {
526 m_textBuffer->apply_tag(m_eventTag, itWordStart, it);
527 }
528 }
529 }
530
531 if (eofReached) break;
532
533 while (!it.inside_word())
534 if (!it.forward_char())
535 goto EOF_REACHED;
536 }
537
538 EOF_REACHED:
539 ;
540
541 #endif // USE_LS_SCRIPTVM
542 updateLineNumbers();
543 }
544
545 #if USE_LS_SCRIPTVM
546
547 LinuxSampler::ScriptVM* ScriptEditor::GetScriptVM() {
548 if (!m_vm) m_vm = LinuxSampler::ScriptVMFactory::Create("gig");
549 return m_vm;
550 }
551
552 template<class T>
553 static void getIteratorsForIssue(Glib::RefPtr<Gtk::TextBuffer>& txtbuf, const T& issue, Gtk::TextBuffer::iterator& start, Gtk::TextBuffer::iterator& end) {
554 Gtk::TextBuffer::iterator itLine =
555 txtbuf->get_iter_at_line_index(issue.firstLine - 1, 0);
556 const int charsInLine = itLine.get_bytes_in_line();
557 start = txtbuf->get_iter_at_line_index(
558 issue.firstLine - 1,
559 // check we are not getting past the end of the line here, otherwise Gtk crashes
560 issue.firstColumn - 1 < charsInLine ? issue.firstColumn - 1 : charsInLine - 1
561 );
562 end = start;
563 end.forward_lines(issue.lastLine - issue.firstLine);
564 end.forward_chars(
565 (issue.lastLine != issue.firstLine)
566 ? issue.lastColumn - 1
567 : issue.lastColumn - issue.firstColumn + 1
568 );
569 }
570
571 static void applyCodeTag(Glib::RefPtr<Gtk::TextBuffer>& txtbuf, const LinuxSampler::VMSourceToken& token, Glib::RefPtr<Gtk::TextBuffer::Tag>& tag) {
572 Gtk::TextBuffer::iterator itLine =
573 txtbuf->get_iter_at_line_index(token.firstLine(), 0);
574 const int charsInLine = itLine.get_bytes_in_line();
575 Gtk::TextBuffer::iterator itStart = txtbuf->get_iter_at_line_index(
576 token.firstLine(),
577 // check we are not getting past the end of the line here, otherwise Gtk crashes
578 token.firstColumn() < charsInLine ? token.firstColumn() : charsInLine - 1
579 );
580 Gtk::TextBuffer::iterator itEnd = itStart;
581 const int length = token.text().length();
582 itEnd.forward_chars(length);
583 txtbuf->apply_tag(tag, itStart, itEnd);
584 }
585
586 static void applyCodeTag(Glib::RefPtr<Gtk::TextBuffer>& txtbuf, const LinuxSampler::ParserIssue& issue, Glib::RefPtr<Gtk::TextBuffer::Tag>& tag) {
587 Gtk::TextBuffer::iterator itStart, itEnd;
588 getIteratorsForIssue(txtbuf, issue, itStart, itEnd);
589 txtbuf->apply_tag(tag, itStart, itEnd);
590 }
591
592 static void applyPreprocessorComment(Glib::RefPtr<Gtk::TextBuffer>& txtbuf, const LinuxSampler::CodeBlock& block, Glib::RefPtr<Gtk::TextBuffer::Tag>& tag) {
593 Gtk::TextBuffer::iterator itStart, itEnd;
594 getIteratorsForIssue(txtbuf, block, itStart, itEnd);
595 txtbuf->apply_tag(tag, itStart, itEnd);
596 }
597
598 void ScriptEditor::updateSyntaxHighlightingByVM() {
599 GetScriptVM();
600 const std::string s = m_textBuffer->get_text();
601 if (s.empty()) return;
602 std::vector<LinuxSampler::VMSourceToken> tokens = m_vm->syntaxHighlighting(s);
603
604 for (int i = 0; i < tokens.size(); ++i) {
605 const LinuxSampler::VMSourceToken& token = tokens[i];
606
607 if (token.isKeyword()) {
608 applyCodeTag(m_textBuffer, token, m_keywordTag);
609 } else if (token.isVariableName()) {
610 applyCodeTag(m_textBuffer, token, m_variableTag);
611 } else if (token.isIdentifier()) {
612 if (token.isEventHandlerName()) {
613 applyCodeTag(m_textBuffer, token, m_eventTag);
614 } else { // a function ...
615 applyCodeTag(m_textBuffer, token, m_functionTag);
616 }
617 } else if (token.isNumberLiteral()) {
618 applyCodeTag(m_textBuffer, token, m_numberTag);
619 } else if (token.isStringLiteral()) {
620 applyCodeTag(m_textBuffer, token, m_stringTag);
621 } else if (token.isComment()) {
622 applyCodeTag(m_textBuffer, token, m_commentTag);
623 } else if (token.isPreprocessor()) {
624 applyCodeTag(m_textBuffer, token, m_preprocTag);
625 } else if (token.isMetricPrefix()) {
626 applyCodeTag(m_textBuffer, token, m_metricTag);
627 } else if (token.isStdUnit()) {
628 applyCodeTag(m_textBuffer, token, m_stdUnitTag);
629 } else if (token.isNewLine()) {
630 }
631 }
632 }
633
634 void ScriptEditor::updateParserIssuesByVM() {
635 GetScriptVM();
636 const std::string s = m_textBuffer->get_text();
637 LinuxSampler::VMParserContext* parserContext = m_vm->loadScript(s);
638 m_issues = parserContext->issues();
639 m_errors = parserContext->errors();
640 m_warnings = parserContext->warnings();
641 m_preprocComments = parserContext->preprocessorComments();
642
643 if (!s.empty()) {
644 for (int i = 0; i < m_issues.size(); ++i) {
645 const LinuxSampler::ParserIssue& issue = m_issues[i];
646
647 if (issue.isErr()) {
648 applyCodeTag(m_textBuffer, issue, m_errorTag);
649 } else if (issue.isWrn()) {
650 applyCodeTag(m_textBuffer, issue, m_warningTag);
651 }
652 }
653 }
654
655 for (int i = 0; i < m_preprocComments.size(); ++i) {
656 applyPreprocessorComment(m_textBuffer, m_preprocComments[i],
657 m_preprocCommentTag);
658 }
659
660 delete parserContext;
661 }
662
663 void ScriptEditor::updateIssueTooltip(GdkEventMotion* e) {
664 int x, y;
665 m_textView.window_to_buffer_coords(Gtk::TEXT_WINDOW_TEXT, int(e->x), int(e->y), x, y);
666
667 Gtk::TextBuffer::iterator it;
668 m_textView.get_iter_at_location(it, x, y);
669
670 const int line = it.get_line();
671 const int column = it.get_line_offset();
672
673 //printf("mouse at l%d c%d\n", line, column);
674
675 for (int i = 0; i < m_issues.size(); ++i) {
676 const LinuxSampler::ParserIssue& issue = m_issues[i];
677 const int firstLine = issue.firstLine - 1;
678 const int firstColumn = issue.firstColumn - 1;
679 const int lastLine = issue.lastLine - 1;
680 const int lastColumn = issue.lastColumn - 1;
681 if (firstLine <= line && line <= lastLine &&
682 (firstLine != line || firstColumn <= column) &&
683 (lastLine != line || lastColumn >= column))
684 {
685 m_textView.set_tooltip_markup(
686 (issue.isErr() ? "<span foreground=\"#ff9393\">ERROR:</span> " : "<span foreground=\"#c4950c\">Warning:</span> ") +
687 issue.txt
688 );
689 return;
690 }
691 }
692
693 for (int i = 0; i < m_preprocComments.size(); ++i) {
694 const LinuxSampler::CodeBlock& block = m_preprocComments[i];
695 const int firstLine = block.firstLine - 1;
696 const int firstColumn = block.firstColumn - 1;
697 const int lastLine = block.lastLine - 1;
698 const int lastColumn = block.lastColumn - 1;
699 if (firstLine <= line && line <= lastLine &&
700 (firstLine != line || firstColumn <= column) &&
701 (lastLine != line || lastColumn >= column))
702 {
703 m_textView.set_tooltip_markup(
704 "Code block filtered out by preceding <span foreground=\"" PREPROC_TOKEN_COLOR "\">preprocessor</span> statement."
705 );
706 return;
707 }
708 }
709
710 m_textView.set_tooltip_markup("");
711 }
712
713 static std::string warningsCountTxt(const std::vector<LinuxSampler::ParserIssue> warnings) {
714 std::string txt = "<span foreground=\"#c4950c\">" + ToString(warnings.size());
715 txt += (warnings.size() == 1) ? " Warning" : " Warnings";
716 txt += "</span>";
717 return txt;
718 }
719
720 static std::string errorsCountTxt(const std::vector<LinuxSampler::ParserIssue> errors) {
721 std::string txt = "<span foreground=\"#c40c0c\">" + ToString(errors.size());
722 txt += (errors.size() == 1) ? " Error" : " Errors";
723 txt += "</span>";
724 return txt;
725 }
726
727 void ScriptEditor::updateStatusBar() {
728 // update status text
729 std::string txt;
730 if (m_issues.empty()) {
731 txt = "No issues with this script.";
732 } else {
733 const char* txtWontLoad = ". Sampler won't load instruments using this script!";
734 txt = "There ";
735 txt += (m_errors.size() <= 1 && m_warnings.size() <= 1) ? "is " : "are ";
736 if (m_errors.empty()) {
737 txt += warningsCountTxt(m_warnings) + ". Script will load, but might not behave as expected!";
738 } else if (m_warnings.empty()) {
739 txt += errorsCountTxt(m_errors) + txtWontLoad;
740 } else {
741 txt += errorsCountTxt(m_errors) + " and " +
742 warningsCountTxt(m_warnings) + txtWontLoad;
743 }
744 }
745 m_statusLabel.set_markup(txt);
746
747 // update status icon
748 m_statusImage.set(
749 m_issues.empty() ? m_successIcon : !m_errors.empty() ? m_errorIcon : m_warningIcon
750 );
751 }
752
753 #endif // USE_LS_SCRIPTVM
754
755 void ScriptEditor::onTextErased(const Gtk::TextBuffer::iterator& itStart, const Gtk::TextBuffer::iterator& itEnd) {
756 //printf("erased\n");
757 #if USE_LS_SCRIPTVM
758 m_textBuffer->remove_all_tags(m_textBuffer->begin(), m_textBuffer->end());
759 updateSyntaxHighlightingByVM();
760 updateParserIssuesByVM();
761 updateStatusBar();
762 #else
763 Gtk::TextBuffer::iterator itStart2 = itStart;
764 if (itStart2.inside_word() || itStart2.ends_word())
765 itStart2.backward_word_start();
766
767 Gtk::TextBuffer::iterator itEnd2 = itEnd;
768 if (itEnd2.inside_word()) itEnd2.forward_word_end();
769
770 m_textBuffer->remove_all_tags(itStart2, itEnd2);
771 #endif // USE_LS_SCRIPTVM
772 updateLineNumbers();
773 }
774
775 bool ScriptEditor::on_motion_notify_event(GdkEventMotion* e) {
776 #if USE_LS_SCRIPTVM
777 //TODO: event throttling would be a good idea here
778 updateIssueTooltip(e);
779 #endif
780 #if GTKMM_MAJOR_VERSION < 3 || (GTKMM_MAJOR_VERSION == 3 && GTKMM_MINOR_VERSION <= 24)
781 return ManagedWindow::on_motion_notify_event(e);
782 #else
783 Gdk::EventMotion em = Glib::wrap(e, true);
784 return ManagedWindow::on_motion_notify_event(em);
785 #endif
786 }
787
788 void ScriptEditor::onMenuChangeFontSize() {
789 //TODO: for GTKMM >= 3.2 class Gtk::FontChooser could be used instead
790 Gtk::Dialog dialog(_("Font Size"), true /*modal*/);
791 HBox hbox;
792 hbox.set_spacing(6);
793
794 Gtk::Label label(_("Editor's Font Size:"), Gtk::ALIGN_START);
795 hbox.pack_start(label, Gtk::PACK_SHRINK);
796
797 Gtk::SpinButton spinButton;
798 spinButton.set_range(4, 80);
799 spinButton.set_increments(1, 10);
800 spinButton.set_value(currentFontSize());
801 hbox.pack_start(spinButton);
802
803 #if USE_GTKMM_BOX
804 dialog.get_content_area()->pack_start(hbox);
805 #else
806 dialog.get_vbox()->pack_start(hbox);
807 #endif
808 dialog.add_button(_("_OK"), 0);
809 dialog.add_button(_("_Cancel"), 1);
810
811 #if HAS_GTKMM_SHOW_ALL_CHILDREN
812 dialog.show_all_children();
813 #endif
814
815 if (!dialog.run()) { // OK selected ...
816 const int newFontSize = spinButton.get_value_as_int();
817 if (newFontSize >= 4)
818 setFontSize(newFontSize, true);
819 }
820 }
821
822 #if GTKMM_MAJOR_VERSION > 3 || (GTKMM_MAJOR_VERSION == 3 && (GTKMM_MINOR_VERSION > 91 || (GTKMM_MINOR_VERSION == 91 && GTKMM_MICRO_VERSION >= 2))) // GTKMM >= 3.91.2
823 bool ScriptEditor::onWindowDelete(Gdk::Event& e) {
824 return onWindowDeleteP(NULL);
825 }
826 #endif
827
828 bool ScriptEditor::onWindowDeleteP(GdkEventAny* /*e*/) {
829 //printf("onWindowDelete\n");
830
831 if (!isModified()) return false; // propagate event further (which will close this window)
832
833 gchar* msg = g_strdup_printf(_("Apply changes to instrument script \"%s\" before closing?"),
834 m_script->Name.c_str());
835 Gtk::MessageDialog dialog(*this, msg, false, Gtk::MESSAGE_WARNING, Gtk::BUTTONS_NONE);
836 g_free(msg);
837 dialog.set_secondary_text(_("If you close without applying, your changes will be lost."));
838 dialog.add_button(_("Close _Without Applying"), Gtk::RESPONSE_NO);
839 dialog.add_button(_("_Cancel"), Gtk::RESPONSE_CANCEL);
840 dialog.add_button(_("_Apply"), Gtk::RESPONSE_YES);
841 dialog.set_default_response(Gtk::RESPONSE_YES);
842 int response = dialog.run();
843 dialog.hide();
844
845 // user decided to close script editor without saving
846 if (response == Gtk::RESPONSE_NO)
847 return false; // propagate event further (which will close this window)
848
849 // user cancelled dialog, thus don't close script editor
850 if (response == Gtk::RESPONSE_CANCEL) {
851 show();
852 return true; // drop event (prevents closing this window)
853 }
854
855 // user wants to apply the changes, afterwards close window
856 if (response == Gtk::RESPONSE_YES) {
857 onButtonApply();
858 return false; // propagate event further (which will close this window)
859 }
860
861 // should never ever make it to this point actually
862 return false;
863 }
864
865 bool ScriptEditor::isModified() const {
866 return m_textBuffer->get_modified();
867 }
868
869 void ScriptEditor::onModifiedChanged() {
870 m_applyButton.set_sensitive(isModified());
871 #if USE_LS_SCRIPTVM
872 updateStatusBar();
873 #endif
874 }
875
876 void ScriptEditor::onButtonCancel() {
877 bool dropEvent = onWindowDeleteP(NULL);
878 if (dropEvent) return;
879 hide();
880 }
881
882 void ScriptEditor::onButtonApply() {
883 signal_script_to_be_changed.emit(m_script);
884 m_script->SetScriptAsText(m_textBuffer->get_text());
885 signal_script_changed.emit(m_script);
886 m_textBuffer->set_modified(false);
887 }
888
889 void ScriptEditor::onWindowHide() {
890 delete this; // this is the end, my friend
891 }

  ViewVC Help
Powered by ViewVC