along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- $Id$
*/
#include <cstdlib>
#include <cctype>
+#include <fstream>
+#include <sys/stat.h>
#include <libart_lgpl/art_misc.h>
#include <gtkmm/window.h>
#include <gtkmm/combo.h>
#include <gtk/gtkpaned.h>
#include <gtkmm2ext/utils.h>
+#include <ardour/ardour.h>
#include "ardour_ui.h"
+#include "keyboard.h"
#include "utils.h"
#include "i18n.h"
#include "rgb_macros.h"
+#include "canvas_impl.h"
using namespace std;
using namespace Gtk;
+using namespace sigc;
+using namespace Glib;
+using namespace PBD;
-string
-short_version (string orig, string::size_type target_length)
+int
+pixel_width (const ustring& str, Pango::FontDescription& font)
{
- /* this tries to create a recognizable abbreviation
- of "orig" by removing characters until we meet
- a certain target length.
-
- note that we deliberately leave digits in the result
- without modification.
- */
-
-
- string::size_type pos;
-
- /* remove white-space and punctuation, starting at end */
-
- while (orig.length() > target_length) {
- if ((pos = orig.find_last_of (_("\"\n\t ,<.>/?:;'[{}]~`!@#$%^&*()_-+="))) == string::npos) {
- break;
- }
- orig.replace (pos, 1, "");
- }
-
- /* remove lower-case vowels, starting at end */
-
- while (orig.length() > target_length) {
- if ((pos = orig.find_last_of (_("aeiou"))) == string::npos) {
- break;
- }
- orig.replace (pos, 1, "");
- }
-
- /* remove upper-case vowels, starting at end */
-
- while (orig.length() > target_length) {
- if ((pos = orig.find_last_of (_("AEIOU"))) == string::npos) {
- break;
- }
- orig.replace (pos, 1, "");
- }
-
- /* remove lower-case consonants, starting at end */
-
- while (orig.length() > target_length) {
- if ((pos = orig.find_last_of (_("bcdfghjklmnpqrtvwxyz"))) == string::npos) {
- break;
- }
- orig.replace (pos, 1, "");
- }
-
- /* remove upper-case consonants, starting at end */
+ Label foo;
+ Glib::RefPtr<Pango::Layout> layout = foo.create_pango_layout ("");
- while (orig.length() > target_length) {
- if ((pos = orig.find_last_of (_("BCDFGHJKLMNPQRTVWXYZ"))) == string::npos) {
- break;
- }
- orig.replace (pos, 1, "");
- }
+ layout->set_font_description (font);
+ layout->set_text (str);
- /* whatever the length is now, use it */
-
- return orig;
+ int width, height;
+ Gtkmm2ext::get_ink_pixel_size (layout, width, height);
+ return width;
}
-string
-fit_to_pixels (string str, int32_t pixel_width, Gdk_Font& font)
+ustring
+fit_to_pixels (const ustring& str, int pixel_width, Pango::FontDescription& font, int& actual_width, bool with_ellipses)
{
- gint width;
- gint lbearing;
- gint rbearing;
- gint ascent;
- gint descent;
-
- int namelen = str.length();
- char cstr[namelen+1];
- strcpy (cstr, str.c_str());
-
- while (namelen) {
-
- gdk_string_extents (font,
- cstr,
- &lbearing,
- &rbearing,
- &width,
- &ascent,
- &descent);
-
- if (width < (pixel_width)) {
- break;
- }
+ Label foo;
+ Glib::RefPtr<Pango::Layout> layout = foo.create_pango_layout ("");
+ ustring::size_type shorter_by = 0;
+ ustring txt;
- --namelen;
- cstr[namelen] = '\0';
+ layout->set_font_description (font);
- }
+ actual_width = 0;
- return cstr;
-}
+ ustring ustr = str;
+ ustring::iterator last = ustr.end();
+ --last; /* now points at final entry */
-int
-atoi (const string& s)
-{
- return atoi (s.c_str());
-}
+ txt = ustr;
-double
-atof (const string& s)
-{
- return atof (s.c_str());
-}
+ while (!ustr.empty()) {
-void
-strip_whitespace_edges (string& str)
-{
- string::size_type i;
- string::size_type len;
- string::size_type s;
+ layout->set_text (txt);
- len = str.length();
+ int width, height;
+ Gtkmm2ext::get_ink_pixel_size (layout, width, height);
- for (i = 0; i < len; ++i) {
- if (isgraph (str[i])) {
+ if (width < pixel_width) {
+ actual_width = width;
break;
}
- }
-
- s = i;
+
+ ustr.erase (last--);
+ shorter_by++;
- for (i = len - 1; i >= 0; --i) {
- if (isgraph (str[i])) {
- break;
+ if (with_ellipses && shorter_by > 3) {
+ txt = ustr;
+ txt += "...";
+ } else {
+ txt = ustr;
}
}
- str = str.substr (s, (i - s) + 1);
-}
-
-vector<string>
-internationalize (const char **array)
-{
- vector<string> v;
-
- for (uint32_t i = 0; array[i]; ++i) {
- v.push_back (_(array[i]));
- }
-
- return v;
+ return txt;
}
gint
just_hide_it (GdkEventAny *ev, Gtk::Window *win)
{
- ARDOUR_UI::instance()->allow_focus (false);
win->hide_all ();
return TRUE;
}
-void
-allow_keyboard_focus (bool yn)
-{
- ARDOUR_UI::instance()->allow_focus (yn);
-}
-
/* xpm2rgb copied from nixieclock, which bore the legend:
nixieclock - a nixie desktop timepiece
// PARSE HEADER
if ( sscanf(xpm[0], "%u%u%u%u", &w, &h, &colors, &cpp) != 4 ) {
- error << compose (_("bad XPM header %1"), xpm[0])
+ error << string_compose (_("bad XPM header %1"), xpm[0])
<< endmsg;
return 0;
}
- savergb = rgb = (unsigned char*)art_alloc (h * w * 3);
+ savergb = rgb = (unsigned char*) malloc (h * w * 3);
// LOAD XPM COLORMAP LONG ENOUGH TO DO CONVERSION
for (t = 0; t < colors; ++t) {
// PARSE HEADER
if ( sscanf(xpm[0], "%u%u%u%u", &w, &h, &colors, &cpp) != 4 ) {
- error << compose (_("bad XPM header %1"), xpm[0])
+ error << string_compose (_("bad XPM header %1"), xpm[0])
<< endmsg;
return 0;
}
- savergb = rgb = (unsigned char*)art_alloc (h * w * 4);
+ savergb = rgb = (unsigned char*) malloc (h * w * 4);
// LOAD XPM COLORMAP LONG ENOUGH TO DO CONVERSION
return (savergb);
}
-GtkCanvasPoints*
+ArdourCanvas::Points*
get_canvas_points (string who, uint32_t npoints)
{
// cerr << who << ": wants " << npoints << " canvas points" << endl;
abort ();
}
#endif
- return gtk_canvas_points_new (npoints);
+ return new ArdourCanvas::Points (npoints);
}
-int
-channel_combo_get_channel_count (Gtk::Combo& combo)
+Pango::FontDescription
+get_font_for_style (string widgetname)
{
- string str = combo.get_entry()->get_text();
- int chns;
-
- if (str == _("mono")) {
- return 1;
- } else if (str == _("stereo")) {
- return 2;
- } else if ((chns = atoi (str)) != 0) {
- return chns;
- } else {
- return 0;
- }
+ Gtk::Window window (WINDOW_TOPLEVEL);
+ Gtk::Label foobar;
+ Glib::RefPtr<Gtk::Style> style;
+
+ window.add (foobar);
+ foobar.set_name (widgetname);
+ foobar.ensure_style();
+
+ style = foobar.get_style ();
+
+ Glib::RefPtr<const Pango::Layout> layout = foobar.get_layout();
+
+ PangoFontDescription *pfd = (PangoFontDescription *)pango_layout_get_font_description((PangoLayout *)layout->gobj());
+
+ if (!pfd) {
+
+ /* layout inherited its font description from a PangoContext */
+
+ PangoContext* ctxt = (PangoContext*) pango_layout_get_context ((PangoLayout*) layout->gobj());
+ pfd = pango_context_get_font_description (ctxt);
+ return Pango::FontDescription (pfd, true); /* make a copy */
+ }
+
+ return Pango::FontDescription (pfd, true); /* make a copy */
}
-static int32_t
-int_from_hex (char hic, char loc)
+uint32_t
+rgba_from_style (string style, uint32_t r, uint32_t g, uint32_t b, uint32_t a, string attr, int state, bool rgba)
{
- int hi; /* hi byte */
- int lo; /* low byte */
+ /* In GTK+2, styles aren't set up correctly if the widget is not
+ attached to a toplevel window that has a screen pointer.
+ */
- hi = (int) hic;
+ static Gtk::Window* window = 0;
- if( ('0'<=hi) && (hi<='9') ) {
- hi -= '0';
- } else if( ('a'<= hi) && (hi<= 'f') ) {
- hi -= ('a'-10);
- } else if( ('A'<=hi) && (hi<='F') ) {
- hi -= ('A'-10);
+ if (window == 0) {
+ window = new Window (WINDOW_TOPLEVEL);
}
+
+ Gtk::Label foo;
+
+ window->add (foo);
+
+ foo.set_name (style);
+ foo.ensure_style ();
- lo = (int) loc;
+ GtkRcStyle* waverc = foo.get_style()->gobj()->rc_style;
+
+ if (waverc) {
+ if (attr == "fg") {
+ r = waverc->fg[state].red / 257;
+ g = waverc->fg[state].green / 257;
+ b = waverc->fg[state].blue / 257;
+
+ /* what a hack ... "a" is for "active" */
+ if (state == Gtk::STATE_NORMAL && rgba) {
+ a = waverc->fg[GTK_STATE_ACTIVE].red / 257;
+ }
+ } else if (attr == "bg") {
+ r = g = b = 0;
+ r = waverc->bg[state].red / 257;
+ g = waverc->bg[state].green / 257;
+ b = waverc->bg[state].blue / 257;
+ } else if (attr == "base") {
+ r = waverc->base[state].red / 257;
+ g = waverc->base[state].green / 257;
+ b = waverc->base[state].blue / 257;
+ } else if (attr == "text") {
+ r = waverc->text[state].red / 257;
+ g = waverc->text[state].green / 257;
+ b = waverc->text[state].blue / 257;
+ }
+ } else {
+ warning << string_compose (_("missing RGBA style for \"%1\""), style) << endl;
+ }
+
+ window->remove ();
- if( ('0'<=lo) && (lo<='9') ) {
- lo -= '0';
- } else if( ('a'<=lo) && (lo<='f') ) {
- lo -= ('a'-10);
- } else if( ('A'<=lo) && (lo<='F') ) {
- lo -= ('A'-10);
+ if (state == Gtk::STATE_NORMAL && rgba) {
+ return (uint32_t) RGBA_TO_UINT(r,g,b,a);
+ } else {
+ return (uint32_t) RGB_TO_UINT(r,g,b);
}
+}
- return lo + (16 * hi);
+bool
+canvas_item_visible (ArdourCanvas::Item* item)
+{
+ return (item->gobj()->object.flags & GNOME_CANVAS_ITEM_VISIBLE) ? true : false;
}
void
-url_decode (string& url)
+set_color (Gdk::Color& c, int rgb)
{
- string::iterator last;
- string::iterator next;
+ c.set_rgb((rgb >> 16)*256, ((rgb & 0xff00) >> 8)*256, (rgb & 0xff)*256);
+}
- for (string::iterator i = url.begin(); i != url.end(); ++i) {
- if ((*i) == '+') {
- *i = ' ';
- }
- }
+bool
+key_press_focus_accelerator_handler (Gtk::Window& window, GdkEventKey* ev)
+{
+ GtkWindow* win = window.gobj();
+ GtkWidget* focus = gtk_window_get_focus (win);
+ bool special_handling_of_unmodified_accelerators = false;
+
+#undef DEBUG_ACCELERATOR_HANDLING
+#ifdef DEBUG_ACCELERATOR_HANDLING
+ bool debug = (getenv ("ARDOUR_DEBUG_ACCELERATOR_HANDLING") != 0);
+#endif
- if (url.length() <= 3) {
- return;
+ if (focus) {
+ if (GTK_IS_ENTRY(focus)) {
+ special_handling_of_unmodified_accelerators = true;
+ }
+ }
+
+#ifdef DEBUG_ACCELERATOR_HANDLING
+ if (debug) {
+ cerr << "Key event: code = " << ev->keyval << " state = " << hex << ev->state << dec << " focus is an entry ? "
+ << special_handling_of_unmodified_accelerators
+ << endl;
}
+#endif
- last = url.end();
+ /* This exists to allow us to override the way GTK handles
+ key events. The normal sequence is:
+
+ a) event is delivered to a GtkWindow
+ b) accelerators/mnemonics are activated
+ c) if (b) didn't handle the event, propagate to
+ the focus widget and/or focus chain
+
+ The problem with this is that if the accelerators include
+ keys without modifiers, such as the space bar or the
+ letter "e", then pressing the key while typing into
+ a text entry widget results in the accelerator being
+ activated, instead of the desired letter appearing
+ in the text entry.
+
+ There is no good way of fixing this, but this
+ represents a compromise. The idea is that
+ key events involving modifiers (not Shift)
+ get routed into the activation pathway first, then
+ get propagated to the focus widget if necessary.
+
+ If the key event doesn't involve modifiers,
+ we deliver to the focus widget first, thus allowing
+ it to get "normal text" without interference
+ from acceleration.
+
+ Of course, this can also be problematic: if there
+ is a widget with focus, then it will swallow
+ all "normal text" accelerators.
+ */
- --last; /* points at last char */
- --last; /* points at last char - 1 */
- for (string::iterator i = url.begin(); i != last; ) {
+ if (!special_handling_of_unmodified_accelerators) {
- if (*i == '%') {
+ /* pretend that certain key events that GTK does not allow
+ to be used as accelerators are actually something that
+ it does allow.
+ */
- next = i;
+ int ret = false;
- url.erase (i);
-
- i = next;
- ++next;
-
- if (isxdigit (*i) && isxdigit (*next)) {
- /* replace first digit with char */
- *i = int_from_hex (*i,*next);
- ++i; /* points at 2nd of 2 digits */
- url.erase (i);
- }
- } else {
- ++i;
- }
- }
-}
+ switch (ev->keyval) {
+ case GDK_Up:
+ ret = gtk_accel_groups_activate(G_OBJECT(win), GDK_uparrow, GdkModifierType(ev->state));
+ break;
-string
-get_font_for_style (string widgetname)
-{
- Gtk::Label foobar;
+ case GDK_Down:
+ ret = gtk_accel_groups_activate(G_OBJECT(win), GDK_downarrow, GdkModifierType(ev->state));
+ break;
- foobar.set_name (widgetname);
- foobar.ensure_style();
+ case GDK_Right:
+ ret = gtk_accel_groups_activate(G_OBJECT(win), GDK_rightarrow, GdkModifierType(ev->state));
+ break;
+
+ case GDK_Left:
+ ret = gtk_accel_groups_activate(G_OBJECT(win), GDK_leftarrow, GdkModifierType(ev->state));
+ break;
+
+ default:
+ break;
+ }
- if (foobar.get_style() == 0 || foobar.get_style()->gobj()->rc_style == 0 || foobar.get_style()->gobj()->rc_style->font_name == 0) {
- return "fixed";
+ if (ret) {
+ return true;
+ }
+ }
+
+ if (!special_handling_of_unmodified_accelerators ||
+ ev->state & (Gdk::MOD1_MASK|
+ Gdk::MOD3_MASK|
+ Gdk::MOD4_MASK|
+ Gdk::MOD5_MASK|
+ Gdk::CONTROL_MASK)) {
+
+ /* no special handling or modifiers in effect: accelerate first */
+
+#ifdef DEBUG_ACCELERATOR_HANDLING
+ if (debug) {
+ cerr << "\tactivate, then propagate\n";
+ }
+#endif
+ if (!gtk_window_activate_key (win, ev)) {
+ return gtk_window_propagate_key_event (win, ev);
+ } else {
+#ifdef DEBUG_ACCELERATOR_HANDLING
+ if (debug) {
+ cerr << "\tnot handled\n";
+ }
+#endif
+ return true;
+ }
}
+
+ /* no modifiers, propagate first */
+
+#ifdef DEBUG_ACCELERATOR_HANDLING
+ if (debug) {
+ cerr << "\tactivate, then propagate\n";
+ }
+#endif
+ if (!gtk_window_propagate_key_event (win, ev)) {
+ return gtk_window_activate_key (win, ev);
+ }
- string str = foobar.get_style()->gobj()->rc_style->font_name;
- if (str.empty()) {
- return "fixed"; // standard X Window fallback font
- } else {
- return str;
+#ifdef DEBUG_ACCELERATOR_HANDLING
+ if (debug) {
+ cerr << "\tnot handled\n";
}
+#endif
+ return true;
}
-gint
-pane_handler (GdkEventButton* ev, Gtk::Paned* pane)
+
+Glib::RefPtr<Gdk::Pixbuf>
+get_xpm (std::string name)
{
- if (ev->window != Gtkmm2ext::get_paned_handle (*pane)) {
- return FALSE;
+ if (!xpm_map[name]) {
+ xpm_map[name] = Gdk::Pixbuf::create_from_file (ARDOUR::find_data_file(name, "pixmaps"));
}
+
+ return (xpm_map[name]);
+}
- if (Keyboard::is_delete_event (ev)) {
+Glib::RefPtr<Gdk::Pixbuf>
+get_icon (const char* cname)
+{
+ string name = cname;
+ name += X_(".png");
- gint pos;
- gint cmp;
+ string path = ARDOUR::find_data_file (name, "icons");
- pos = Gtkmm2ext::gtk_paned_get_position (pane->gobj());
+ if (path.empty()) {
+ fatal << string_compose (_("cannot find icon image for %1"), name) << endmsg;
+ /*NOTREACHED*/
+ }
- if (dynamic_cast<VPaned*>(pane)) {
- cmp = pane->height();
- } else {
- cmp = pane->width();
- }
+ return Gdk::Pixbuf::create_from_file (path);
+}
- /* we have to use approximations here because we can't predict the
- exact position or sizes of the pane (themes, etc)
- */
+string
+longest (vector<string>& strings)
+{
+ if (strings.empty()) {
+ return string ("");
+ }
- if (pos < 10 || abs (pos - cmp) < 10) {
+ vector<string>::iterator longest = strings.begin();
+ string::size_type longest_length = (*longest).length();
+
+ vector<string>::iterator i = longest;
+ ++i;
- /* already collapsed: restore it (note that this is cast from a pointer value to int, which is tricky on 64bit */
-
- pane->set_position ((gint64) pane->get_data ("rpos"));
+ while (i != strings.end()) {
+
+ string::size_type len = (*i).length();
+
+ if (len > longest_length) {
+ longest = i;
+ longest_length = len;
+ }
+
+ ++i;
+ }
+
+ return *longest;
+}
- } else {
+bool
+key_is_legal_for_numeric_entry (guint keyval)
+{
+ switch (keyval) {
+ case GDK_minus:
+ case GDK_plus:
+ case GDK_period:
+ case GDK_comma:
+ case GDK_0:
+ case GDK_1:
+ case GDK_2:
+ case GDK_3:
+ case GDK_4:
+ case GDK_5:
+ case GDK_6:
+ case GDK_7:
+ case GDK_8:
+ case GDK_9:
+ case GDK_KP_Add:
+ case GDK_KP_Subtract:
+ case GDK_KP_Decimal:
+ case GDK_KP_0:
+ case GDK_KP_1:
+ case GDK_KP_2:
+ case GDK_KP_3:
+ case GDK_KP_4:
+ case GDK_KP_5:
+ case GDK_KP_6:
+ case GDK_KP_7:
+ case GDK_KP_8:
+ case GDK_KP_9:
+ case GDK_Return:
+ case GDK_BackSpace:
+ case GDK_Delete:
+ case GDK_KP_Enter:
+ case GDK_Home:
+ case GDK_End:
+ case GDK_Left:
+ case GDK_Right:
+ return true;
+
+ default:
+ break;
+ }
- int collapse_direction;
+ return false;
+}
- /* store the current position */
- pane->set_data ("rpos", (gpointer) pos);
+ustring
+short_path (ustring path, uint32_t target_characters)
+{
+ ustring::size_type last_sep;
+ ustring::size_type len = path.length();
+ const char separator = '/';
- /* collapse to show the relevant child in full */
-
- collapse_direction = (gint64) pane->get_data ("collapse-direction");
+ if (len <= target_characters) {
+ return path;
+ }
- if (collapse_direction) {
- pane->set_position (1);
- } else {
- if (dynamic_cast<VPaned*>(pane)) {
- pane->set_position (pane->height());
- } else {
- pane->set_position (pane->width());
- }
- }
- }
+ if ((last_sep = path.find_last_of (separator)) == ustring::npos) {
- return TRUE;
- }
+ /* just a filename, but its too long anyway */
- return FALSE;
-}
-uint32_t
-rgba_from_style (string style, uint32_t r, uint32_t g, uint32_t b, uint32_t a)
-{
- Gtk::Label foo;
-
- foo.set_name (style);
- foo.ensure_style ();
-
- GtkRcStyle* waverc = foo.get_style()->gobj()->rc_style;
+ if (target_characters > 3) {
+ return path.substr (0, target_characters - 3) + ustring ("...");
+ } else {
+ /* stupid caller, just hand back the whole thing */
+ return path;
+ }
+ }
- if (waverc) {
- r = waverc->fg[Gtk::STATE_NORMAL].red / 257;
- g = waverc->fg[Gtk::STATE_NORMAL].green / 257;
- b = waverc->fg[Gtk::STATE_NORMAL].blue / 257;
+ if (len - last_sep >= target_characters) {
- /* what a hack ... "a" is for "active" */
+ /* even the filename itself is too long */
- a = waverc->fg[GTK_STATE_ACTIVE].red / 257;
+ if (target_characters > 3) {
+ return path.substr (last_sep+1, target_characters - 3) + ustring ("...");
+ } else {
+ /* stupid caller, just hand back the whole thing */
+ return path;
+ }
+ }
+
+ uint32_t so_far = (len - last_sep);
+ uint32_t space_for = target_characters - so_far;
+ if (space_for >= 3) {
+ ustring res = "...";
+ res += path.substr (last_sep - space_for);
+ return res;
} else {
- warning << compose (_("missing RGBA style for \"%1\""), style) << endl;
+ /* remove part of the end */
+ ustring res = "...";
+ res += path.substr (last_sep - space_for, len - last_sep + space_for - 3);
+ res += "...";
+ return res;
+
}
-
- return (uint32_t) RGBA_TO_UINT(r,g,b,a);
}
+