1 /* $Id$ */
2 /* Copyright (c) 2011-2016 Pierre Pronchery <khorben@defora.org> */
3 /* This file is part of DeforaOS Desktop libDesktop */
4 /* All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions are
8  * met:
9  *
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  *
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
21  * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
22  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
23  * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
28 /* TODO:
29  * - proxy for the libApp framework instead */
30 
31 
32 
33 #include <stdlib.h>
34 #ifdef DEBUG
35 # include <stdio.h>
36 #endif
37 #include <string.h>
38 #include <errno.h>
39 #include <gtk/gtk.h>
40 #if GTK_CHECK_VERSION(3, 0, 0)
41 # include <gtk/gtkx.h>
42 #else
43 # include <gdk/gdkx.h>
44 #endif
45 #include <System.h>
46 #include "Desktop.h"
47 
48 
49 /* Message */
50 /* private */
51 /* types */
52 typedef struct _MessageCallback
53 {
54 	GtkWidget * window;
55 #if GTK_CHECK_VERSION(3, 0, 0)
56 	Atom atom;
57 #else
58 	GtkWidget * widget;
59 	Window xwindow;
60 #endif
61 	DesktopMessageCallback callback;
62 	void * data;
63 } MessageCallback;
64 
65 
66 /* variables */
67 static MessageCallback ** _callbacks = NULL;
68 static size_t _callbacks_cnt = 0;
69 
70 
71 /* prototypes */
72 /* callbacks */
73 static GdkFilterReturn _desktop_message_on_callback(GdkXEvent * xevent,
74 		GdkEvent * event, gpointer data);
75 
76 
77 /* public */
78 /* functions */
79 /* desktop_message_register */
desktop_message_register(GtkWidget * window,char const * destination,DesktopMessageCallback callback,void * data)80 int desktop_message_register(GtkWidget * window, char const * destination,
81 		DesktopMessageCallback callback, void * data)
82 {
83 	MessageCallback ** p;
84 	MessageCallback * mc;
85 	GdkWindow * gwindow;
86 #if !GTK_CHECK_VERSION(3, 0, 0)
87 	GdkAtom atom;
88 #endif
89 
90 #ifdef DEBUG
91 	fprintf(stderr, "DEBUG: %s(%p, \"%s\", %p, %p)\n", __func__, window,
92 			destination, callback, data);
93 #endif
94 	if((p = realloc(_callbacks, sizeof(*p) * (_callbacks_cnt + 1))) == NULL)
95 		return -1;
96 	_callbacks = p;
97 	if((mc = object_new(sizeof(*mc))) == NULL)
98 		return -1;
99 	_callbacks[_callbacks_cnt++] = mc;
100 	mc->callback = callback;
101 	mc->data = data;
102 #if GTK_CHECK_VERSION(3, 0, 0)
103 	mc->atom = XInternAtom(gdk_x11_get_default_xdisplay(), destination,
104 			FALSE);
105 	gwindow = (window != NULL) ? gtk_widget_get_window(window) : NULL;
106 	gdk_window_add_filter(gwindow, _desktop_message_on_callback, mc);
107 #else
108 	if((mc->window = window) == NULL)
109 	{
110 		mc->widget = gtk_window_new(GTK_WINDOW_TOPLEVEL);
111 		gtk_widget_realize(mc->widget);
112 	}
113 	else
114 		mc->widget = window;
115 	gwindow = gtk_widget_get_window(mc->widget);
116 	mc->xwindow = GDK_WINDOW_XWINDOW(gwindow);
117 	atom = gdk_atom_intern(destination, FALSE);
118 	gdk_add_client_message_filter(atom, _desktop_message_on_callback, mc);
119 #endif
120 	return 0;
121 }
122 
123 
124 /* desktop_message_send */
desktop_message_send(char const * destination,uint32_t value1,uint32_t value2,uint32_t value3)125 int desktop_message_send(char const * destination, uint32_t value1,
126 		uint32_t value2, uint32_t value3)
127 {
128 #if GTK_CHECK_VERSION(3, 0, 0)
129 	XEvent xev;
130 	XClientMessageEvent * xcme = &xev.xclient;
131 
132 	memset(&xev, 0, sizeof(xev));
133 	xev.type = ClientMessage;
134 	xcme->serial = 0;
135 	xcme->send_event = True;
136 	xcme->message_type = XInternAtom(gdk_x11_get_default_xdisplay(),
137 			destination, FALSE);
138 	xcme->format = 32;
139 	xcme->data.l[0] = value1;
140 	xcme->data.l[1] = value2;
141 	xcme->data.l[2] = value3;
142 	gdk_error_trap_push();
143 	XSendEvent(gdk_x11_get_default_xdisplay(),
144 			gdk_x11_get_default_root_xwindow(), False,
145 			StructureNotifyMask | /* FIXME check the mask */
146 			SubstructureNotifyMask | SubstructureRedirectMask,
147 			&xev);
148 	return (gdk_error_trap_pop() == 0) ? 0 : -1;
149 #else
150 	GdkAtom atom;
151 	GdkEvent event;
152 	GdkEventClient * client = &event.client;
153 
154 	atom = gdk_atom_intern(destination, FALSE);
155 	memset(&event, 0, sizeof(event));
156 	client->type = GDK_CLIENT_EVENT;
157 	client->window = NULL;
158 	client->send_event = TRUE;
159 	client->message_type = atom;
160 	client->data_format = 32;
161 	client->data.l[0] = value1;
162 	client->data.l[1] = value2;
163 	client->data.l[2] = value3;
164 	gdk_event_send_clientmessage_toall(&event);
165 	return 0;
166 #endif
167 }
168 
169 
170 /* desktop_message_unregister */
desktop_message_unregister(GtkWidget * window,DesktopMessageCallback callback,void * data)171 void desktop_message_unregister(GtkWidget * window,
172 		DesktopMessageCallback callback, void * data)
173 {
174 	size_t i;
175 	MessageCallback ** p;
176 	MessageCallback * mc;
177 	GdkWindow * w;
178 
179 # ifdef DEBUG
180 	fprintf(stderr, "DEBUG: %s(%p, %p)\n", __func__, callback, data);
181 # endif
182 	for(i = 0; i < _callbacks_cnt; i++)
183 	{
184 		mc = _callbacks[i];
185 		if(mc->window == window
186 				&& mc->callback == callback
187 				&& mc->data == data)
188 			break;
189 	}
190 	if(i == _callbacks_cnt)
191 		return;
192 #if GTK_CHECK_VERSION(3, 0, 0)
193 	w = (window != NULL) ? gtk_widget_get_window(window) : NULL;
194 #else
195 	w = gtk_widget_get_window(mc->widget);
196 #endif
197 	gdk_window_remove_filter(w, _desktop_message_on_callback, mc);
198 #if !GTK_CHECK_VERSION(3, 0, 0)
199 	if(mc->window == NULL)
200 		gtk_widget_destroy(mc->widget);
201 #endif
202 	object_delete(mc);
203 	p = &_callbacks[i];
204 	memmove(p, p + 1, sizeof(*p) * (_callbacks_cnt - i - 1));
205 	if((p = realloc(_callbacks, sizeof(*p) * (--_callbacks_cnt))) != NULL
206 			|| _callbacks_cnt == 0)
207 		_callbacks = p;
208 }
209 
210 
211 /* private */
212 /* callbacks */
213 /* desktop_message_on_callback */
_desktop_message_on_callback(GdkXEvent * xevent,GdkEvent * event,gpointer data)214 static GdkFilterReturn _desktop_message_on_callback(GdkXEvent * xevent,
215 		GdkEvent * event, gpointer data)
216 {
217 	MessageCallback * mc = data;
218 	XEvent * xev = xevent;
219 	XClientMessageEvent * xcme;
220 	uint32_t value1;
221 	uint32_t value2;
222 	uint32_t value3;
223 	(void) event;
224 
225 	if(xev->type != ClientMessage)
226 		return GDK_FILTER_CONTINUE;
227 	xcme = &xev->xclient;
228 #if GTK_CHECK_VERSION(3, 0, 0)
229 # ifdef DEBUG
230 	fprintf(stderr, "DEBUG: %s(%lu %lu %p)\n", __func__, xcme->serial,
231 			xcme->window, (void *)mc);
232 # endif
233 	if(mc->atom != xcme->message_type)
234 		return GDK_FILTER_CONTINUE;
235 #else
236 # ifdef DEBUG
237 	fprintf(stderr, "DEBUG: %s(%lu %lu %p) %lu\n", __func__, xcme->serial,
238 			xcme->window, mc, (void *)mc->xwindow);
239 # endif
240 	if(mc->xwindow != xcme->window)
241 		return GDK_FILTER_CONTINUE;
242 #endif
243 #ifdef DEBUG
244 	fprintf(stderr, "DEBUG: %s() %p(%p)\n", __func__, (void *)mc->callback,
245 			(void *)mc->data);
246 #endif
247 	value1 = xcme->data.l[0];
248 	value2 = xcme->data.l[1];
249 	value3 = xcme->data.l[2];
250 	if(mc->callback(mc->data, value1, value2, value3) == 0)
251 		return GDK_FILTER_CONTINUE;
252 	desktop_message_unregister(mc->window, mc->callback, mc->data);
253 	return GDK_FILTER_REMOVE;
254 }
255