homebrew-core/Formula/wmctrl.rb
2017-01-27 09:09:54 +00:00

67 lines
2.1 KiB
Ruby

class Wmctrl < Formula
desc "UNIX/Linux command-line tool to interact with an EWMH/NetWM"
homepage "https://sites.google.com/site/tstyblo/wmctrl"
url "https://sites.google.com/site/tstyblo/wmctrl/wmctrl-1.07.tar.gz"
sha256 "d78a1efdb62f18674298ad039c5cbdb1edb6e8e149bb3a8e3a01a4750aa3cca9"
depends_on "pkg-config" => :build
depends_on "glib"
depends_on "gettext"
depends_on :x11
# Fix for 64-bit arch. See:
# http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=362068
patch :DATA
def install
system "./configure", "--disable-debug", "--disable-dependency-tracking",
"--prefix=#{prefix}",
"--mandir=#{man}"
system "make", "install"
end
test do
system "#{bin}/wmctrl", "--version"
end
end
__END__
--- wmctrl-1.07.orig/main.c
+++ wmctrl-1.07/main.c
@@ -1425,6 +1425,16 @@
*
* long_length = Specifies the length in 32-bit multiples of the
* data to be retrieved.
+ *
+ * NOTE: see
+ * http://mail.gnome.org/archives/wm-spec-list/2003-March/msg00067.html
+ * In particular:
+ *
+ * When the X window system was ported to 64-bit architectures, a
+ * rather peculiar design decision was made. 32-bit quantities such
+ * as Window IDs, atoms, etc, were kept as longs in the client side
+ * APIs, even when long was changed to 64 bits.
+ *
*/
if (XGetWindowProperty(disp, win, xa_prop_name, 0, MAX_PROPERTY_VALUE_LEN / 4, False,
xa_prop_type, &xa_ret_type, &ret_format,
@@ -1440,7 +1450,18 @@ static gchar *get_property (Display *disp, Window win, /*{{{*/
}
/* null terminate the result to make string handling easier */
- tmp_size = (ret_format / 8) * ret_nitems;
+ switch (ret_format) {
+ case 8:
+ tmp_size = sizeof(char) * ret_nitems;
+ break;
+ case 16:
+ tmp_size = sizeof(short) * ret_nitems;
+ break;
+ case 32:
+ default:
+ tmp_size = sizeof(long) * ret_nitems;
+ break;
+ }
ret = g_malloc(tmp_size + 1);
memcpy(ret, ret_prop, tmp_size);
ret[tmp_size] = '\0';