2 Copyright (C) 2003 Paul Davis
4 This program is free software; you an redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 #include <pango/pangoft2.h> // for fontmap resolution control for GnomeCanvas
21 #include <pango/pangocairo.h> // for fontmap resolution control for GnomeCanvas
27 #include <libart_lgpl/art_misc.h>
29 #include <gtkmm/window.h>
30 #include <gtkmm/combo.h>
31 #include <gtkmm/label.h>
32 #include <gtkmm/paned.h>
33 #include <gtk/gtkpaned.h>
35 #include <pbd/file_utils.h>
37 #include <gtkmm2ext/utils.h>
38 #include <ardour/configuration.h>
39 #include <ardour/configuration.h>
41 #include <ardour/filesystem_paths.h>
43 #include "ardour_ui.h"
47 #include "rgb_macros.h"
48 #include "canvas_impl.h"
56 sigc::signal<void> DPIReset;
59 pixel_width (const ustring& str, Pango::FontDescription& font)
62 Glib::RefPtr<Pango::Layout> layout = foo.create_pango_layout ("");
64 layout->set_font_description (font);
65 layout->set_text (str);
68 Gtkmm2ext::get_ink_pixel_size (layout, width, height);
73 fit_to_pixels (const ustring& str, int pixel_width, Pango::FontDescription& font, int& actual_width, bool with_ellipses)
76 Glib::RefPtr<Pango::Layout> layout = foo.create_pango_layout ("");
77 ustring::size_type shorter_by = 0;
80 layout->set_font_description (font);
85 ustring::iterator last = ustr.end();
86 --last; /* now points at final entry */
90 while (!ustr.empty()) {
92 layout->set_text (txt);
95 Gtkmm2ext::get_ink_pixel_size (layout, width, height);
97 if (width < pixel_width) {
105 if (with_ellipses && shorter_by > 3) {
117 just_hide_it (GdkEventAny *ev, Gtk::Window *win)
123 /* xpm2rgb copied from nixieclock, which bore the legend:
125 nixieclock - a nixie desktop timepiece
126 Copyright (C) 2000 Greg Ercolano, erco@3dsite.com
128 and was released under the GPL.
132 xpm2rgb (const char** xpm, uint32_t& w, uint32_t& h)
134 static long vals[256], val;
135 uint32_t t, x, y, colors, cpp;
137 unsigned char *savergb, *rgb;
141 if ( sscanf(xpm[0], "%u%u%u%u", &w, &h, &colors, &cpp) != 4 ) {
142 error << string_compose (_("bad XPM header %1"), xpm[0])
147 savergb = rgb = (unsigned char*) malloc (h * w * 3);
149 // LOAD XPM COLORMAP LONG ENOUGH TO DO CONVERSION
150 for (t = 0; t < colors; ++t) {
151 sscanf (xpm[t+1], "%c c #%lx", &c, &val);
155 // COLORMAP -> RGB CONVERSION
156 // Get low 3 bytes from vals[]
160 for (y = h-1; y > 0; --y) {
162 for (p = xpm[1+colors+(h-y-1)], x = 0; x < w; x++, rgb += 3) {
163 val = vals[(int)*p++];
164 *(rgb+2) = val & 0xff; val >>= 8; // 2:B
165 *(rgb+1) = val & 0xff; val >>= 8; // 1:G
166 *(rgb+0) = val & 0xff; // 0:R
174 xpm2rgba (const char** xpm, uint32_t& w, uint32_t& h)
176 static long vals[256], val;
177 uint32_t t, x, y, colors, cpp;
179 unsigned char *savergb, *rgb;
184 if ( sscanf(xpm[0], "%u%u%u%u", &w, &h, &colors, &cpp) != 4 ) {
185 error << string_compose (_("bad XPM header %1"), xpm[0])
190 savergb = rgb = (unsigned char*) malloc (h * w * 4);
192 // LOAD XPM COLORMAP LONG ENOUGH TO DO CONVERSION
194 if (strstr (xpm[1], "None")) {
195 sscanf (xpm[1], "%c", &transparent);
202 for (; t < colors; ++t) {
203 sscanf (xpm[t+1], "%c c #%lx", &c, &val);
207 // COLORMAP -> RGB CONVERSION
208 // Get low 3 bytes from vals[]
212 for (y = h-1; y > 0; --y) {
216 for (p = xpm[1+colors+(h-y-1)], x = 0; x < w; x++, rgb += 4) {
218 if (transparent && (*p++ == transparent)) {
226 *(rgb+3) = alpha; // 3: alpha
227 *(rgb+2) = val & 0xff; val >>= 8; // 2:B
228 *(rgb+1) = val & 0xff; val >>= 8; // 1:G
229 *(rgb+0) = val & 0xff; // 0:R
236 ArdourCanvas::Points*
237 get_canvas_points (string who, uint32_t npoints)
239 // cerr << who << ": wants " << npoints << " canvas points" << endl;
240 #ifdef TRAP_EXCESSIVE_POINT_REQUESTS
241 if (npoints > (uint32_t) gdk_screen_width() + 4) {
245 return new ArdourCanvas::Points (npoints);
248 Pango::FontDescription*
249 get_font_for_style (string widgetname)
251 Gtk::Window window (WINDOW_TOPLEVEL);
253 Glib::RefPtr<Gtk::Style> style;
256 foobar.set_name (widgetname);
257 foobar.ensure_style();
259 style = foobar.get_style ();
261 Glib::RefPtr<const Pango::Layout> layout = foobar.get_layout();
263 PangoFontDescription *pfd = (PangoFontDescription *)pango_layout_get_font_description((PangoLayout *)layout->gobj());
267 /* layout inherited its font description from a PangoContext */
269 PangoContext* ctxt = (PangoContext*) pango_layout_get_context ((PangoLayout*) layout->gobj());
270 pfd = pango_context_get_font_description (ctxt);
271 return new Pango::FontDescription (pfd, true); /* make a copy */
274 return new Pango::FontDescription (pfd, true); /* make a copy */
278 rgba_from_style (string style, uint32_t r, uint32_t g, uint32_t b, uint32_t a, string attr, int state, bool rgba)
280 /* In GTK+2, styles aren't set up correctly if the widget is not
281 attached to a toplevel window that has a screen pointer.
284 static Gtk::Window* window = 0;
287 window = new Window (WINDOW_TOPLEVEL);
294 foo.set_name (style);
297 GtkRcStyle* waverc = foo.get_style()->gobj()->rc_style;
301 r = waverc->fg[state].red / 257;
302 g = waverc->fg[state].green / 257;
303 b = waverc->fg[state].blue / 257;
305 /* what a hack ... "a" is for "active" */
306 if (state == Gtk::STATE_NORMAL && rgba) {
307 a = waverc->fg[GTK_STATE_ACTIVE].red / 257;
309 } else if (attr == "bg") {
311 r = waverc->bg[state].red / 257;
312 g = waverc->bg[state].green / 257;
313 b = waverc->bg[state].blue / 257;
314 } else if (attr == "base") {
315 r = waverc->base[state].red / 257;
316 g = waverc->base[state].green / 257;
317 b = waverc->base[state].blue / 257;
318 } else if (attr == "text") {
319 r = waverc->text[state].red / 257;
320 g = waverc->text[state].green / 257;
321 b = waverc->text[state].blue / 257;
324 warning << string_compose (_("missing RGBA style for \"%1\""), style) << endl;
329 if (state == Gtk::STATE_NORMAL && rgba) {
330 return (uint32_t) RGBA_TO_UINT(r,g,b,a);
332 return (uint32_t) RGB_TO_UINT(r,g,b);
338 color_from_style (string widget_style_name, int state, string attr)
342 style = gtk_rc_get_style_by_paths (gtk_settings_get_default(),
343 widget_style_name.c_str(),
347 error << string_compose (_("no style found for %1, using red"), style) << endmsg;
348 return Gdk::Color ("red");
352 return Gdk::Color (&style->fg[state]);
356 return Gdk::Color (&style->bg[state]);
359 if (attr == "light") {
360 return Gdk::Color (&style->light[state]);
363 if (attr == "dark") {
364 return Gdk::Color (&style->dark[state]);
368 return Gdk::Color (&style->mid[state]);
371 if (attr == "text") {
372 return Gdk::Color (&style->text[state]);
375 if (attr == "base") {
376 return Gdk::Color (&style->base[state]);
379 if (attr == "text_aa") {
380 return Gdk::Color (&style->text_aa[state]);
383 error << string_compose (_("unknown style attribute %1 requested for color; using \"red\""), attr) << endmsg;
384 return Gdk::Color ("red");
388 canvas_item_visible (ArdourCanvas::Item* item)
390 return (item->gobj()->object.flags & GNOME_CANVAS_ITEM_VISIBLE) ? true : false;
394 set_color (Gdk::Color& c, int rgb)
396 c.set_rgb((rgb >> 16)*256, ((rgb & 0xff00) >> 8)*256, (rgb & 0xff)*256);
401 gboolean gdk_quartz_possibly_forward (GdkEvent*);
406 key_press_focus_accelerator_handler (Gtk::Window& window, GdkEventKey* ev)
408 GtkWindow* win = window.gobj();
409 GtkWidget* focus = gtk_window_get_focus (win);
410 bool special_handling_of_unmodified_accelerators = false;
411 bool allow_activating = true;
413 #undef DEBUG_ACCELERATOR_HANDLING
414 #ifdef DEBUG_ACCELERATOR_HANDLING
415 //bool debug = (getenv ("ARDOUR_DEBUG_ACCELERATOR_HANDLING") != 0);
419 if (GTK_IS_ENTRY(focus) || Keyboard::some_magic_widget_has_focus()) {
420 special_handling_of_unmodified_accelerators = true;
425 /* should this be universally true? */
426 if (Keyboard::some_magic_widget_has_focus ()) {
427 allow_activating = false;
431 #ifdef DEBUG_ACCELERATOR_HANDLING
433 cerr << "Win = " << win << " Key event: code = " << ev->keyval << " state = " << hex << ev->state << dec << " special handling ? "
434 << special_handling_of_unmodified_accelerators
435 << " magic widget focus ? "
436 << Keyboard::some_magic_widget_has_focus()
437 << " allow_activation ? "
443 /* This exists to allow us to override the way GTK handles
444 key events. The normal sequence is:
446 a) event is delivered to a GtkWindow
447 b) accelerators/mnemonics are activated
448 c) if (b) didn't handle the event, propagate to
449 the focus widget and/or focus chain
451 The problem with this is that if the accelerators include
452 keys without modifiers, such as the space bar or the
453 letter "e", then pressing the key while typing into
454 a text entry widget results in the accelerator being
455 activated, instead of the desired letter appearing
458 There is no good way of fixing this, but this
459 represents a compromise. The idea is that
460 key events involving modifiers (not Shift)
461 get routed into the activation pathway first, then
462 get propagated to the focus widget if necessary.
464 If the key event doesn't involve modifiers,
465 we deliver to the focus widget first, thus allowing
466 it to get "normal text" without interference
469 Of course, this can also be problematic: if there
470 is a widget with focus, then it will swallow
471 all "normal text" accelerators.
475 if (!special_handling_of_unmodified_accelerators) {
477 /* pretend that certain key events that GTK does not allow
478 to be used as accelerators are actually something that
482 uint32_t fakekey = ev->keyval;
484 if (possibly_translate_keyval_to_make_legal_accelerator (fakekey)) {
485 if (allow_activating && gtk_accel_groups_activate(G_OBJECT(win), fakekey, GdkModifierType(ev->state))) {
490 if (allow_activating) {
491 int oldval = ev->keyval;
492 ev->keyval = fakekey;
493 if (gdk_quartz_possibly_forward ((GdkEvent*) ev)) {
502 /* consider all relevant modifiers but not LOCK or SHIFT */
504 guint mask = (Keyboard::RelevantModifierKeyMask & ~(Gdk::SHIFT_MASK|Gdk::LOCK_MASK));
506 if (!special_handling_of_unmodified_accelerators || (ev->state & mask)) {
508 /* no special handling or there are modifiers in effect: accelerate first */
510 #ifdef DEBUG_ACCELERATOR_HANDLING
512 cerr << "\tactivate, then propagate\n";
516 if (allow_activating) {
518 if (gdk_quartz_possibly_forward ((GdkEvent*) ev)) {
522 if (gtk_window_activate_key (win, ev)) {
527 #ifdef DEBUG_ACCELERATOR_HANDLING
529 cerr << "\tnot accelerated, now propagate\n";
532 return gtk_window_propagate_key_event (win, ev);
535 /* no modifiers, propagate first */
537 #ifdef DEBUG_ACCELERATOR_HANDLING
539 cerr << "\tpropagate, then activate\n";
542 if (!gtk_window_propagate_key_event (win, ev)) {
543 #ifdef DEBUG_ACCELERATOR_HANDLING
545 cerr << "\tpropagation didn't handle, so activate\n";
549 if (allow_activating) {
552 if (gdk_quartz_possibly_forward ((GdkEvent*) ev)) {
556 return gtk_window_activate_key (win, ev);
560 #ifdef DEBUG_ACCELERATOR_HANDLING
562 cerr << "\thandled by propagate\n";
568 #ifdef DEBUG_ACCELERATOR_HANDLING
570 cerr << "\tnot handled\n";
576 Glib::RefPtr<Gdk::Pixbuf>
577 get_xpm (std::string name)
579 if (!xpm_map[name]) {
581 SearchPath spath(ARDOUR::ardour_search_path());
582 spath += ARDOUR::system_data_search_path();
584 spath.add_subdirectory_to_paths("pixmaps");
586 sys::path data_file_path;
588 if(!find_file_in_search_path (spath, name, data_file_path)) {
589 fatal << string_compose (_("cannot find XPM file for %1"), name) << endmsg;
593 xpm_map[name] = Gdk::Pixbuf::create_from_file (data_file_path.to_string());
594 } catch(const Glib::Error& e) {
595 warning << "Caught Glib::Error: " << e.what() << endmsg;
599 return xpm_map[name];
603 Glib::RefPtr<Gdk::Pixbuf>
604 get_icon (const char* cname)
609 SearchPath spath(ARDOUR::ardour_search_path());
610 spath += ARDOUR::system_data_search_path();
612 spath.add_subdirectory_to_paths("icons");
614 sys::path data_file_path;
616 if (!find_file_in_search_path (spath, name, data_file_path)) {
617 fatal << string_compose (_("cannot find icon image for %1"), name) << endmsg;
620 Glib::RefPtr<Gdk::Pixbuf> img;
622 img = Gdk::Pixbuf::create_from_file (data_file_path.to_string());
623 } catch (const Gdk::PixbufError &e) {
624 cerr << "Caught PixbufError: " << e.what() << endl;
626 g_message("Caught ... ");
633 longest (vector<string>& strings)
635 if (strings.empty()) {
639 vector<string>::iterator longest = strings.begin();
640 string::size_type longest_length = (*longest).length();
642 vector<string>::iterator i = longest;
645 while (i != strings.end()) {
647 string::size_type len = (*i).length();
649 if (len > longest_length) {
651 longest_length = len;
661 key_is_legal_for_numeric_entry (guint keyval)
679 case GDK_KP_Subtract:
708 set_pango_fontsize ()
710 long val = ARDOUR::Config->get_font_scale();
712 /* FT2 rendering - used by GnomeCanvas, sigh */
714 pango_ft2_font_map_set_resolution ((PangoFT2FontMap*) pango_ft2_font_map_for_display(), val/1024, val/1024);
716 /* Cairo rendering, in case there is any */
718 pango_cairo_font_map_set_resolution ((PangoCairoFontMap*) pango_cairo_font_map_get_default(), val/1024);
724 long val = ARDOUR::Config->get_font_scale();
725 set_pango_fontsize ();
728 gtk_settings_set_long_property (gtk_settings_get_default(),
729 "gtk-xft-dpi", val, "ardour");
730 DPIReset();//Emit Signal
734 possibly_translate_keyval_to_make_legal_accelerator (uint32_t& keyval)
736 int fakekey = GDK_VoidSymbol;
740 case GDK_ISO_Left_Tab:
745 fakekey = GDK_uparrow;
749 fakekey = GDK_downarrow;
753 fakekey = GDK_rightarrow;
757 fakekey = GDK_leftarrow;
764 if (fakekey != GDK_VoidSymbol) {