first step to move systray to e/src/modules.
authorGustavo Sverzut Barbieri <barbieri@gmail.com>
Wed, 13 May 2009 00:06:08 +0000 (00:06 +0000)
committerGustavo Sverzut Barbieri <barbieri@gmail.com>
Wed, 13 May 2009 00:06:08 +0000 (00:06 +0000)
SVN revision: 40609

src/modules/systray/Makefile.am [new file with mode: 0644]
src/modules/systray/e_mod_main.c [new file with mode: 0644]
src/modules/systray/e_mod_main.h [new file with mode: 0644]
src/modules/systray/module.desktop.in [new file with mode: 0644]

diff --git a/src/modules/systray/Makefile.am b/src/modules/systray/Makefile.am
new file mode 100644 (file)
index 0000000..181083b
--- /dev/null
@@ -0,0 +1,18 @@
+MAINTAINERCLEANFILES = Makefile.in
+
+INCLUDES = -I. \
+        -I$(top_srcdir) \
+        -I$(includedir) \
+        @E_CFLAGS@
+
+pkgdir = $(datadir)/$(MODULE_ARCH)
+pkg_LTLIBRARIES = module.la
+module_la_SOURCES = e_mod_main.h \
+                   e_mod_main.c
+
+module_la_LIBADD = @E_LIBS@
+module_la_LDFLAGS = -module -avoid-version
+module_la_DEPENDENCIES = $(top_builddir)/config.h
+
+clean-local:
+       rm -rf *~
diff --git a/src/modules/systray/e_mod_main.c b/src/modules/systray/e_mod_main.c
new file mode 100644 (file)
index 0000000..0dd5f80
--- /dev/null
@@ -0,0 +1,1143 @@
+/**
+ * systray implementation following freedesktop.org specification.
+ *
+ * @see: http://standards.freedesktop.org/systemtray-spec/latest/
+ *
+ * @todo: implement xembed, mostly done, at least relevant parts are done.
+ *        http://standards.freedesktop.org/xembed-spec/latest/
+ *
+ * @todo: implement messages/popup part of the spec (anyone using this at all?)
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <e.h>
+#include <X11/Xlib.h>
+#include <X11/Xatom.h>
+#include "e_mod_main.h"
+
+#define RETRY_TIMEOUT 2.0
+
+#define SYSTEM_TRAY_REQUEST_DOCK 0
+#define SYSTEM_TRAY_BEGIN_MESSAGE 1
+#define SYSTEM_TRAY_CANCEL_MESSAGE 2
+#define _NET_SYSTEM_TRAY_ORIENTATION_HORZ 0
+#define _NET_SYSTEM_TRAY_ORIENTATION_VERT 1
+
+/* XEMBED messages */
+#define XEMBED_EMBEDDED_NOTIFY         0
+#define XEMBED_WINDOW_ACTIVATE         1
+#define XEMBED_WINDOW_DEACTIVATE       2
+#define XEMBED_REQUEST_FOCUS           3
+#define XEMBED_FOCUS_IN                4
+#define XEMBED_FOCUS_OUT               5
+#define XEMBED_FOCUS_NEXT              6
+#define XEMBED_FOCUS_PREV              7
+/* 8-9 were used for XEMBED_GRAB_KEY/XEMBED_UNGRAB_KEY */
+#define XEMBED_MODALITY_ON             10
+#define XEMBED_MODALITY_OFF            11
+#define XEMBED_REGISTER_ACCELERATOR     12
+#define XEMBED_UNREGISTER_ACCELERATOR   13
+#define XEMBED_ACTIVATE_ACCELERATOR     14
+
+/* Details for  XEMBED_FOCUS_IN: */
+#define XEMBED_FOCUS_CURRENT           0
+#define XEMBED_FOCUS_FIRST             1
+#define XEMBED_FOCUS_LAST              2
+
+typedef struct _Instance Instance;
+typedef struct _Icon Icon;
+
+struct _Icon
+{
+   Ecore_X_Window win;
+   Evas_Object *o;
+   Instance *inst;
+};
+
+struct _Instance
+{
+   E_Gadcon_Client *gcc;
+   E_Container *con;
+   Evas *evas;
+   struct
+   {
+      Ecore_X_Window parent;
+      Ecore_X_Window base;
+      Ecore_X_Window selection;
+   } win;
+   struct
+   {
+      Evas_Object *gadget;
+   } ui;
+   struct
+   {
+      Ecore_Event_Handler *message;
+      Ecore_Event_Handler *destroy;
+      Ecore_Event_Handler *show;
+      Ecore_Event_Handler *reparent;
+      Ecore_Event_Handler *sel_clear;
+   } handler;
+   struct
+   {
+      Ecore_Timer *retry;
+   } timer;
+   struct
+   {
+      Ecore_Idler *size_apply;
+   } idler;
+   Eina_List *icons;
+   E_Menu *menu;
+};
+
+static const char _Name[] = "Systray";
+static const char _name[] = "systray";
+static const char _group_gadget[] = "e/modules/systray/main";
+static const char _part_box[] = "e.box";
+static const char _part_size[] = "e.size";
+static const char _sig_source[] = "e";
+static const char _sig_enable[] = "e,action,enable";
+static const char _sig_disable[] = "e,action,disable";
+
+static Ecore_X_Atom _atom_manager = 0;
+static Ecore_X_Atom _atom_st_orient = 0;
+static Ecore_X_Atom _atom_st_visual = 0;
+static Ecore_X_Atom _atom_st_op_code = 0;
+static Ecore_X_Atom _atom_st_msg_data = 0;
+static Ecore_X_Atom _atom_xembed = 0;
+static Ecore_X_Atom _atom_xembed_info = 0;
+static Ecore_X_Atom _atom_st_num = 0;
+static int _last_st_num = -1;
+
+static E_Module *systray_mod = NULL;
+static Instance *instance = NULL; /* only one systray ever possible */
+static char tmpbuf[PATH_MAX]; /* general purpose buffer, just use immediately */
+
+static const char *
+_systray_theme_path(void)
+{
+#define TF "/e-module-systray.edj"
+   unsigned int dirlen;
+   const char *moddir = e_module_dir_get(systray_mod);
+
+   dirlen = strlen(moddir);
+   if (dirlen >= sizeof(tmpbuf) - sizeof(TF))
+     return NULL;
+
+   memcpy(tmpbuf, moddir, dirlen);
+   memcpy(tmpbuf + dirlen, TF, sizeof(TF));
+
+   return tmpbuf;
+#undef TF
+}
+
+static void
+_systray_menu_cb_post(void *data, E_Menu *menu __UNUSED__)
+{
+   Instance *inst = data;
+   if (!inst->menu) return;
+   e_object_del(E_OBJECT(inst->menu));
+   inst->menu = NULL;
+}
+
+static void
+_systray_menu_new(Instance *inst, Evas_Event_Mouse_Down *ev)
+{
+   E_Zone *zone;
+   E_Menu *mn;
+   int x, y;
+
+   zone = e_util_zone_current_get(e_manager_current_get());
+
+   mn = e_menu_new();
+   e_menu_post_deactivate_callback_set(mn, _systray_menu_cb_post, inst);
+   inst->menu = mn;
+
+   e_gadcon_client_util_menu_items_append(inst->gcc, mn, 0);
+   e_gadcon_canvas_zone_geometry_get(inst->gcc->gadcon, &x, &y, NULL, NULL);
+   e_menu_activate_mouse(mn, zone, x + ev->output.x, y + ev->output.y,
+                        1, 1, E_MENU_POP_DIRECTION_AUTO, ev->timestamp);
+   evas_event_feed_mouse_up(inst->evas, ev->button,
+                           EVAS_BUTTON_NONE, ev->timestamp, NULL);
+}
+
+static void
+_systray_cb_mouse_down(void *data, Evas *evas __UNUSED__, Evas_Object *obj __UNUSED__, void *event __UNUSED__)
+{
+   Instance *inst = data;
+   Evas_Event_Mouse_Down *ev = event;
+
+   if ((ev->button == 3) && (!inst->menu))
+     _systray_menu_new(inst, ev);
+}
+
+static void
+_systray_size_apply_do(Instance *inst)
+{
+   const Evas_Object *o;
+   Evas_Coord x, y, w, h;
+
+   edje_object_message_signal_process(inst->ui.gadget);
+   o = edje_object_part_object_get(inst->ui.gadget, _part_box);
+   if (!o) return;
+   evas_object_size_hint_min_get(o, &w, &h);
+
+   if (w < 1) w = 1;
+   if (h < 1) h = 1;
+
+   e_gadcon_client_aspect_set(inst->gcc, w, h);
+   e_gadcon_client_min_size_set(inst->gcc, w, h);
+
+   evas_object_geometry_get(o, &x, &y, &w, &h);
+   ecore_x_window_move_resize(inst->win.base, x, y, w, h);
+}
+
+static int
+_systray_size_apply_delayed(void *data)
+{
+   Instance *inst = data;
+   _systray_size_apply_do(inst);
+   inst->idler.size_apply = NULL;
+   return 0;
+}
+
+static void
+_systray_size_apply(Instance *inst)
+{
+   if (inst->idler.size_apply) return;
+   inst->idler.size_apply = ecore_idler_add(_systray_size_apply_delayed, inst);
+}
+
+static void
+_systray_cb_move(void *data, Evas *evas __UNUSED__, Evas_Object *o __UNUSED__, void *event __UNUSED__)
+{
+   Instance *inst = data;
+   _systray_size_apply(inst);
+}
+
+static void
+_systray_cb_resize(void *data, Evas *evas __UNUSED__, Evas_Object *o __UNUSED__, void *event __UNUSED__)
+{
+   Instance *inst = data;
+   _systray_size_apply(inst);
+}
+
+static void
+_systray_icon_geometry_apply(Icon *icon)
+{
+   const Evas_Object *o;
+   Evas_Coord x, y, w, h, wx, wy;
+
+   o = edje_object_part_object_get(icon->inst->ui.gadget, _part_size);
+   if (!o) return;
+
+   evas_object_geometry_get(icon->o, &x, &y, &w, &h);
+   evas_object_geometry_get(o, &wx, &wy, NULL, NULL);
+   ecore_x_window_move_resize(icon->win, x - wx, y - wy, w, h);
+}
+
+static void
+_systray_icon_cb_move(void *data, Evas *evas __UNUSED__, Evas_Object *o __UNUSED__, void *event __UNUSED__)
+{
+   Icon *icon = data;
+   _systray_icon_geometry_apply(icon);
+}
+
+static void
+_systray_icon_cb_resize(void *data, Evas *evas __UNUSED__, Evas_Object *o __UNUSED__, void *event __UNUSED__)
+{
+   Icon *icon = data;
+   _systray_icon_geometry_apply(icon);
+}
+
+static Ecore_X_Gravity
+_systray_gravity(const Instance *inst)
+{
+   switch (inst->gcc->gadcon->orient)
+     {
+      case E_GADCON_ORIENT_FLOAT:
+        return ECORE_X_GRAVITY_STATIC;
+      case E_GADCON_ORIENT_HORIZ:
+        return ECORE_X_GRAVITY_CENTER;
+      case E_GADCON_ORIENT_VERT:
+        return ECORE_X_GRAVITY_CENTER;
+      case E_GADCON_ORIENT_LEFT:
+        return ECORE_X_GRAVITY_CENTER;
+      case E_GADCON_ORIENT_RIGHT:
+        return ECORE_X_GRAVITY_CENTER;
+      case E_GADCON_ORIENT_TOP:
+        return ECORE_X_GRAVITY_CENTER;
+      case E_GADCON_ORIENT_BOTTOM:
+        return ECORE_X_GRAVITY_CENTER;
+      case E_GADCON_ORIENT_CORNER_TL:
+        return ECORE_X_GRAVITY_S;
+      case E_GADCON_ORIENT_CORNER_TR:
+        return ECORE_X_GRAVITY_S;
+      case E_GADCON_ORIENT_CORNER_BL:
+        return ECORE_X_GRAVITY_N;
+      case E_GADCON_ORIENT_CORNER_BR:
+        return ECORE_X_GRAVITY_N;
+      case E_GADCON_ORIENT_CORNER_LT:
+        return ECORE_X_GRAVITY_E;
+      case E_GADCON_ORIENT_CORNER_RT:
+        return ECORE_X_GRAVITY_W;
+      case E_GADCON_ORIENT_CORNER_LB:
+        return ECORE_X_GRAVITY_E;
+      case E_GADCON_ORIENT_CORNER_RB:
+        return ECORE_X_GRAVITY_W;
+      default:
+        return ECORE_X_GRAVITY_STATIC;
+     }
+}
+
+static Evas_Coord
+_systray_icon_size_normalize(Evas_Coord size)
+{
+   const Evas_Coord *itr, sizes[] = {
+     16, 22, 24, 32, 36, 48, 64, 72, 96, 128, 192, 256, -1
+   };
+   for (itr = sizes; *itr > 0; itr++)
+     if (*itr == size)
+       return size;
+     else if (*itr > size)
+       {
+         if (itr > sizes)
+           return itr[-1];
+         else
+           return sizes[0];
+       }
+   return sizes[0];
+}
+
+static Icon *
+_systray_icon_add(Instance *inst, const Ecore_X_Window win)
+{
+   Ecore_X_Gravity gravity;
+   Evas_Object *o;
+   Evas_Coord w, h;
+   Icon *icon;
+
+   edje_object_part_geometry_get(inst->ui.gadget, _part_size,
+                                NULL, NULL, &w, &h);
+   if (w > h)
+     w = h;
+   else
+     h = w;
+
+   w = h = _systray_icon_size_normalize(w);
+
+   o = evas_object_rectangle_add(inst->evas);
+   if (!o)
+     return NULL;
+   evas_object_color_set(o, 0, 0, 0, 0);
+   evas_object_resize(o, w, h);
+   evas_object_show(o);
+
+   icon = malloc(sizeof(*icon));
+   if (!icon)
+     {
+       evas_object_del(o);
+       return NULL;
+     }
+   icon->win = win;
+   icon->inst = inst;
+   icon->o = o;
+
+   gravity = _systray_gravity(inst);
+   ecore_x_icccm_size_pos_hints_set(win, 1, gravity,
+                                   w, h, w, h, w, h, 0, 0,
+                                   1.0, (double)w / (double)h);
+
+   ecore_x_window_reparent(win, inst->win.base, 0, 0);
+   ecore_x_window_resize(win, w, h);
+   ecore_x_window_raise(win);
+   ecore_x_window_client_manage(win);
+   ecore_x_window_save_set_add(win);
+   ecore_x_window_shape_events_select(win, 1);
+
+   ecore_x_window_geometry_get(win, NULL, NULL, &w, &h);
+
+   evas_object_event_callback_add
+     (o, EVAS_CALLBACK_MOVE, _systray_icon_cb_move, icon);
+   evas_object_event_callback_add
+     (o, EVAS_CALLBACK_RESIZE, _systray_icon_cb_resize, icon);
+
+   inst->icons = eina_list_append(inst->icons, icon);
+   edje_object_part_box_append(inst->ui.gadget, _part_box, o);
+   _systray_size_apply_do(inst);
+   _systray_icon_geometry_apply(icon);
+
+   ecore_x_window_show(win);
+
+   return icon;
+}
+
+static void
+_systray_icon_del_list(Instance *inst, Eina_List *l, Icon *icon)
+{
+   inst->icons = eina_list_remove_list(inst->icons, l);
+
+   ecore_x_window_save_set_del(icon->win);
+   ecore_x_window_reparent(icon->win, None, 0, 0);
+   evas_object_del(icon->o);
+   free(icon);
+
+   _systray_size_apply(inst);
+}
+
+static Ecore_X_Atom
+_systray_atom_st_get(int screen_num)
+{
+   if ((_last_st_num == -1) || (_last_st_num != screen_num))
+     {
+       char buf[32];
+       snprintf(buf, sizeof(buf), "_NET_SYSTEM_TRAY_S%d", screen_num);
+       _atom_st_num = ecore_x_atom_get(buf);
+       _last_st_num = screen_num;
+     }
+
+   return _atom_st_num;
+}
+
+/* XXX TODO: should be in ecore_x */
+static Eina_Bool
+_systray_selection_owner_set(int screen_num, Ecore_X_Window win)
+{
+   Ecore_X_Atom atom;
+   Ecore_X_Display *disp = ecore_x_display_get();
+   Ecore_X_Window cur_selection;
+   Eina_Bool ret;
+
+   atom = _systray_atom_st_get(screen_num);
+   XSetSelectionOwner(disp, atom, win, ecore_x_current_time_get());
+   ecore_x_sync();
+   cur_selection = XGetSelectionOwner(disp, atom);
+
+   ret = (cur_selection == win);
+   if (!ret)
+     fprintf(stderr, "SYSTRAY: tried to set selection to %#x, but got %#x\n",
+            win, cur_selection);
+
+   return ret;
+}
+
+static Eina_Bool
+_systray_selection_owner_set_current(Instance *inst)
+{
+   return _systray_selection_owner_set
+     (inst->con->manager->num, inst->win.selection);
+}
+
+static void
+_systray_deactivate(Instance *inst)
+{
+   Ecore_X_Window old;
+
+   if (inst->win.selection == None) return;
+
+   edje_object_signal_emit(inst->ui.gadget, _sig_disable, _sig_source);
+
+   while (inst->icons)
+     _systray_icon_del_list(inst, inst->icons, inst->icons->data);
+
+   old = inst->win.selection;
+   inst->win.selection = None;
+   _systray_selection_owner_set_current(inst);
+   ecore_x_sync();
+   ecore_x_window_free(old);
+   ecore_x_window_free(inst->win.base);
+   inst->win.base = None;
+}
+
+static Eina_Bool
+_systray_base_create(Instance *inst)
+{
+   const Evas_Object *o;
+   Evas_Coord x, y, w, h;
+   unsigned short r, g, b;
+   const char *color;
+
+   color = edje_object_data_get(inst->ui.gadget, inst->gcc->style);
+   if (!color)
+     color = edje_object_data_get(inst->ui.gadget, "default");
+
+   if (color && (sscanf(color, "%hu %hu %hu", &r, &g, &b) == 3))
+     {
+       r = (65535 * (unsigned int)r) / 255;
+       g = (65535 * (unsigned int)g) / 255;
+       b = (65535 * (unsigned int)b) / 255;
+     }
+   else
+     r = g = b = (unsigned short)65535;
+
+   o = edje_object_part_object_get(inst->ui.gadget, _part_size);
+   if (!o)
+     return 0;
+
+   evas_object_geometry_get(o, &x, &y, &w, &h);
+   if (w < 1) w = 1;
+   if (h < 1) h = 1;
+   inst->win.base = ecore_x_window_new(inst->win.parent, x, y, w, h);
+   ecore_x_window_background_color_set(inst->win.base, r, g, b);
+   ecore_x_window_show(inst->win.base);
+   return 1;
+}
+
+static Eina_Bool
+_systray_activate(Instance *inst)
+{
+   unsigned int visual;
+   Ecore_X_Atom atom;
+   Ecore_X_Window old_win;
+   Ecore_X_Window_Attributes attr;
+   Ecore_X_Display *dpy;
+
+   if (inst->win.selection != None) return 1;
+
+   atom = _systray_atom_st_get(inst->con->manager->num);
+   dpy = ecore_x_display_get();
+   old_win = XGetSelectionOwner(dpy, atom);
+   if (old_win != None) return 0;
+
+   if (inst->win.base == None)
+     {
+       if (!_systray_base_create(inst))
+         return 0;
+     }
+
+   inst->win.selection = ecore_x_window_input_new(inst->win.base, 0, 0, 1, 1);
+   if (inst->win.selection == None)
+     {
+       ecore_x_window_free(inst->win.base);
+       inst->win.base = None;
+       return 0;
+     }
+
+   if (!_systray_selection_owner_set_current(inst))
+     {
+       ecore_x_window_free(inst->win.selection);
+       inst->win.selection = None;
+       ecore_x_window_free(inst->win.base);
+       inst->win.base = None;
+       return 0;
+     }
+
+   ecore_x_window_attributes_get(inst->win.base, &attr);
+
+   visual = XVisualIDFromVisual(attr.visual);
+   XChangeProperty(dpy, inst->win.selection, _atom_st_visual, XA_VISUALID,
+                  32, PropModeReplace, (void *)&visual, 1);
+
+   ecore_x_client_message32_send(inst->con->manager->root, _atom_manager,
+                                ECORE_X_EVENT_MASK_WINDOW_CONFIGURE,
+                                ecore_x_current_time_get(), atom,
+                                inst->win.selection, 0, 0);
+
+   edje_object_signal_emit(inst->ui.gadget, _sig_enable, _sig_source);
+
+   return 1;
+}
+
+static int
+_systray_activate_retry(void *data)
+{
+   Instance *inst = data;
+   Eina_Bool ret;
+
+   fputs("SYSTRAY: reactivate...\n", stderr);
+   ret = _systray_activate(inst);
+   if (ret)
+     fputs("SYSTRAY: activate success!\n", stderr);
+   else
+     fprintf(stderr, "SYSTRAY: activate failure! retrying in %0.1f seconds\n",
+            RETRY_TIMEOUT);
+
+   if (!ret)
+     return 1;
+
+   inst->timer.retry = NULL;
+   return 0;
+}
+
+static void
+_systray_retry(Instance *inst)
+{
+   if (inst->timer.retry) return;
+   inst->timer.retry = ecore_timer_add
+     (RETRY_TIMEOUT, _systray_activate_retry, inst);
+}
+
+static int
+_systray_activate_retry_first(void *data)
+{
+   Instance *inst = data;
+   Eina_Bool ret;
+
+   fputs("SYSTRAY: reactivate (first time)...\n", stderr);
+   ret = _systray_activate(inst);
+   if (ret)
+     {
+       fputs("SYSTRAY: activate success!\n", stderr);
+       inst->timer.retry = NULL;
+       return 0;
+     }
+
+   edje_object_signal_emit(inst->ui.gadget, _sig_disable, _sig_source);
+
+   fprintf(stderr, "SYSTRAY: activate failure! retrying in %0.1f seconds\n",
+          RETRY_TIMEOUT);
+
+   inst->timer.retry = NULL;
+   _systray_retry(inst);
+   return 0;
+}
+
+static void
+_systray_handle_request_dock(Instance *inst, Ecore_X_Event_Client_Message *ev)
+{
+   Ecore_X_Window win = (Ecore_X_Window)ev->data.l[2];
+   Ecore_X_Time time;
+   Ecore_X_Window_Attributes attr;
+   const Eina_List *l;
+   Icon *icon;
+   unsigned int val[2];
+   int r;
+
+   EINA_LIST_FOREACH(inst->icons, l, icon)
+     if (icon->win == win)
+       return;
+
+   if (!ecore_x_window_attributes_get(win, &attr))
+     {
+       fprintf(stderr, "SYSTRAY: could not get attributes of win %#x\n", win);
+       return;
+     }
+
+   icon = _systray_icon_add(inst, win);
+   if (!icon)
+     return;
+
+   r  = ecore_x_window_prop_card32_get(win, _atom_xembed_info, val, 2);
+   if (r < 2)
+     {
+       /*
+       fprintf(stderr, "SYSTRAY: win %#x does not support _XEMBED_INFO (%d)\n",
+               win, r);
+       */
+       return;
+     }
+
+   time = ecore_x_current_time_get();
+   ecore_x_client_message32_send(win, _atom_xembed,
+                                ECORE_X_EVENT_MASK_NONE,
+                                time, XEMBED_EMBEDDED_NOTIFY, 0,
+                                inst->win.selection, 0);
+}
+
+static void
+_systray_handle_op_code(Instance *inst, Ecore_X_Event_Client_Message *ev)
+{
+   unsigned long message = ev->data.l[1];
+
+   switch (message)
+     {
+      case SYSTEM_TRAY_REQUEST_DOCK:
+        _systray_handle_request_dock(inst, ev);
+        break;
+      case SYSTEM_TRAY_BEGIN_MESSAGE:
+      case SYSTEM_TRAY_CANCEL_MESSAGE:
+        fputs("SYSTRAY TODO: handle messages (anyone uses this?)\n", stderr);
+        break;
+      default:
+        fprintf(stderr,
+                "SYSTRAY: error, unknown message op code: %ld, win: %#lx\n",
+                message, ev->data.l[2]);
+     }
+}
+
+static void
+_systray_handle_message(Instance *inst __UNUSED__, Ecore_X_Event_Client_Message *ev)
+{
+   fprintf(stderr, "SYSTRAY TODO: message op: %ld, data: %ld, %ld, %ld\n",
+          ev->data.l[1], ev->data.l[2], ev->data.l[3], ev->data.l[4]);
+}
+
+static void
+_systray_handle_xembed(Instance *inst __UNUSED__, Ecore_X_Event_Client_Message *ev __UNUSED__)
+{
+   unsigned long message = ev->data.l[1];
+
+   switch (message)
+     {
+      case XEMBED_EMBEDDED_NOTIFY:
+      case XEMBED_WINDOW_ACTIVATE:
+      case XEMBED_WINDOW_DEACTIVATE:
+      case XEMBED_REQUEST_FOCUS:
+      case XEMBED_FOCUS_IN:
+      case XEMBED_FOCUS_OUT:
+      case XEMBED_FOCUS_NEXT:
+      case XEMBED_FOCUS_PREV:
+      case XEMBED_MODALITY_ON:
+      case XEMBED_MODALITY_OFF:
+      case XEMBED_REGISTER_ACCELERATOR:
+      case XEMBED_UNREGISTER_ACCELERATOR:
+      case XEMBED_ACTIVATE_ACCELERATOR:
+      default:
+        fprintf(stderr,
+                "SYSTRAY: unsupported xembed: %#lx, %#lx, %#lx, %#lx\n",
+                ev->data.l[1], ev->data.l[2], ev->data.l[3], ev->data.l[4]);
+     }
+}
+
+static int
+_systray_cb_client_message(void *data, int type __UNUSED__, void *event)
+{
+   Ecore_X_Event_Client_Message *ev = event;
+   Instance *inst = data;
+
+   if (ev->message_type == _atom_st_op_code)
+     _systray_handle_op_code(inst, ev);
+   else if (ev->message_type == _atom_st_msg_data)
+     _systray_handle_message(inst, ev);
+   else if (ev->message_type == _atom_xembed)
+     _systray_handle_xembed(inst, ev);
+
+   return 1;
+}
+
+static int
+_systray_cb_window_destroy(void *data, int type __UNUSED__, void *event)
+{
+   Ecore_X_Event_Window_Destroy *ev = event;
+   Instance *inst = data;
+   Icon *icon;
+   Eina_List *l;
+
+   EINA_LIST_FOREACH(inst->icons, l, icon)
+     if (icon->win == ev->win)
+       {
+         _systray_icon_del_list(inst, l, icon);
+         break;
+       }
+
+   return 1;
+}
+
+static int
+_systray_cb_window_show(void *data, int type __UNUSED__, void *event)
+{
+   Ecore_X_Event_Window_Show *ev = event;
+   Instance *inst = data;
+   Icon *icon;
+   Eina_List *l;
+
+   EINA_LIST_FOREACH(inst->icons, l, icon)
+     if (icon->win == ev->win)
+       {
+         _systray_icon_geometry_apply(icon);
+         break;
+       }
+
+   return 1;
+}
+
+static int
+_systray_cb_reparent_notify(void *data, int type __UNUSED__, void *event)
+{
+   Ecore_X_Event_Window_Reparent *ev = event;
+   Instance *inst = data;
+   Icon *icon;
+   Eina_List *l;
+
+   EINA_LIST_FOREACH(inst->icons, l, icon)
+     if ((icon->win == ev->win) && (ev->parent != inst->win.base))
+       {
+         _systray_icon_del_list(inst, l, icon);
+         break;
+       }
+
+   return 1;
+}
+
+static int
+_systray_cb_selection_clear(void *data, int type __UNUSED__, void *event)
+{
+   Ecore_X_Event_Selection_Clear *ev = event;
+   Instance *inst = data;
+
+   if ((ev->win == inst->win.selection) && (inst->win.selection != None) &&
+       (ev->atom == _systray_atom_st_get(inst->con->manager->num)))
+     {
+       edje_object_signal_emit(inst->ui.gadget, _sig_disable, _sig_source);
+
+       while (inst->icons)
+         _systray_icon_del_list(inst, inst->icons, inst->icons->data);
+
+       ecore_x_window_free(inst->win.selection);
+       inst->win.selection = None;
+       ecore_x_window_free(inst->win.base);
+       inst->win.base = None;
+       _systray_retry(inst);
+     }
+   return 1;
+}
+
+static void
+_systray_theme(Evas_Object *o, const char *shelf_style, const char *gc_style)
+{
+   const char base_theme[] = "base/theme/modules/systray";
+   const char *path = _systray_theme_path();
+   char buf[128], *p;
+   size_t len, avail;
+
+   len = ecore_strlcpy(buf, _group_gadget, sizeof(buf));
+   if (len >= sizeof(buf))
+     goto fallback;
+   p = buf + len;
+   *p = '/';
+   p++;
+   avail = sizeof(buf) - len - 1;
+
+   if (shelf_style && gc_style)
+     {
+       size_t r;
+       r = snprintf(p, avail, "%s/%s", shelf_style, gc_style);
+       if (r < avail && e_theme_edje_object_set(o, base_theme, buf))
+         return;
+     }
+
+   if (shelf_style)
+     {
+       size_t r;
+       r = ecore_strlcpy(p, shelf_style, avail);
+       if (r < avail && e_theme_edje_object_set(o, base_theme, buf))
+         return;
+     }
+
+   if (gc_style)
+     {
+       size_t r;
+       r = ecore_strlcpy(p, gc_style, avail);
+       if (r < avail && e_theme_edje_object_set(o, base_theme, buf))
+         return;
+     }
+
+   if (e_theme_edje_object_set(o, base_theme, _group_gadget))
+     return;
+
+   if (shelf_style && gc_style)
+     {
+       size_t r;
+       r = snprintf(p, avail, "%s/%s", shelf_style, gc_style);
+       if (r < avail && edje_object_file_set(o, path, buf))
+         return;
+     }
+
+   if (shelf_style)
+     {
+       size_t r;
+       r = ecore_strlcpy(p, shelf_style, avail);
+       if (r < avail && edje_object_file_set(o, path, buf))
+         return;
+     }
+
+   if (gc_style)
+     {
+       size_t r;
+       r = ecore_strlcpy(p, gc_style, avail);
+       if (r < avail && edje_object_file_set(o, path, buf))
+         return;
+     }
+
+ fallback:
+   edje_object_file_set(o, path, _group_gadget);
+}
+
+
+static E_Gadcon_Client *
+_gc_init(E_Gadcon *gc, const char *name, const char *id, const char *style)
+{
+   Instance *inst;
+
+   fprintf(stderr, "SYSTRAY: init name=%s, id=%s, style=%s\n", name, id, style);
+
+   if (!systray_mod)
+     return NULL;
+   if ((!id) || (instance))
+     {
+       e_util_dialog_internal
+         (D_("Another systray exists"),
+          D_("There can be only one systray gadget and "
+             "another one already exists."));
+       return NULL;
+     }
+
+   inst = E_NEW(Instance, 1);
+   if (!inst)
+     return NULL;
+   inst->evas = gc->evas;
+   inst->con = e_container_current_get(e_manager_current_get());
+   if (!inst->con)
+     {
+       E_FREE(inst);
+       return NULL;
+     }
+   if ((gc->shelf) && (gc->shelf->popup))
+     inst->win.parent = gc->shelf->popup->evas_win;
+   else
+     inst->win.parent = inst->con->bg_win;
+
+   inst->win.base = None;
+   inst->win.selection = None;
+
+   inst->ui.gadget = edje_object_add(inst->evas);
+
+   _systray_theme(inst->ui.gadget, gc->shelf ? gc->shelf->style : NULL, style);
+
+   inst->gcc = e_gadcon_client_new(gc, name, id, style, inst->ui.gadget);
+   if (!inst->gcc)
+     {
+       evas_object_del(inst->ui.gadget);
+       E_FREE(inst);
+       return NULL;
+     }
+
+   inst->gcc->data = inst;
+
+   if (!_systray_activate(inst))
+     {
+       if (!inst->timer.retry)
+         inst->timer.retry = ecore_timer_add
+           (0.1, _systray_activate_retry_first, inst);
+       else
+         edje_object_signal_emit(inst->ui.gadget, _sig_disable, _sig_source);
+     }
+
+   evas_object_event_callback_add(inst->ui.gadget, EVAS_CALLBACK_MOUSE_DOWN,
+                                 _systray_cb_mouse_down, inst);
+   evas_object_event_callback_add(inst->ui.gadget, EVAS_CALLBACK_MOVE,
+                                 _systray_cb_move, inst);
+   evas_object_event_callback_add(inst->ui.gadget, EVAS_CALLBACK_RESIZE,
+                                 _systray_cb_resize, inst);
+
+   inst->handler.message = ecore_event_handler_add
+     (ECORE_X_EVENT_CLIENT_MESSAGE, _systray_cb_client_message, inst);
+   inst->handler.destroy = ecore_event_handler_add
+     (ECORE_X_EVENT_WINDOW_DESTROY, _systray_cb_window_destroy, inst);
+   inst->handler.show = ecore_event_handler_add
+     (ECORE_X_EVENT_WINDOW_SHOW, _systray_cb_window_show, inst);
+   inst->handler.reparent = ecore_event_handler_add
+     (ECORE_X_EVENT_WINDOW_REPARENT, _systray_cb_reparent_notify, inst);
+   inst->handler.sel_clear = ecore_event_handler_add
+     (ECORE_X_EVENT_SELECTION_CLEAR, _systray_cb_selection_clear, inst);
+
+   instance = inst;
+   return inst->gcc;
+}
+
+/* Called when Gadget_Container says stop */
+static void
+_gc_shutdown(E_Gadcon_Client *gcc)
+{
+   Instance *inst = gcc->data;
+
+   fprintf(stderr, "SYSTRAY: shutdown %p, inst=%p\n", gcc, inst);
+
+   if (!inst)
+     return;
+
+   if (inst->menu)
+     {
+       e_menu_post_deactivate_callback_set(inst->menu, NULL, NULL);
+       e_object_del(E_OBJECT(inst->menu));
+     }
+
+   _systray_deactivate(inst);
+   evas_object_del(inst->ui.gadget);
+
+   if (inst->handler.message)
+     ecore_event_handler_del(inst->handler.message);
+   if (inst->handler.destroy)
+     ecore_event_handler_del(inst->handler.destroy);
+   if (inst->handler.show)
+     ecore_event_handler_del(inst->handler.show);
+   if (inst->handler.reparent)
+     ecore_event_handler_del(inst->handler.reparent);
+   if (inst->handler.sel_clear)
+     ecore_event_handler_del(inst->handler.sel_clear);
+   if (inst->timer.retry)
+     ecore_timer_del(inst->timer.retry);
+   if (inst->idler.size_apply)
+     ecore_idler_del(inst->idler.size_apply);
+
+   if (instance == inst)
+     instance = NULL;
+
+   E_FREE(inst);
+   gcc->data = NULL;
+}
+
+static void
+_gc_orient(E_Gadcon_Client *gcc, E_Gadcon_Orient orient)
+{
+   Instance *inst = gcc->data;
+   const char *signal;
+   unsigned int systray_orient;
+
+   if (!inst)
+     return;
+
+   switch (orient)
+     {
+      case E_GADCON_ORIENT_FLOAT:
+        signal = "e,action,orient,float";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_HORIZ:
+        signal = "e,action,orient,horiz";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_VERT:
+        signal = "e,action,orient,vert";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_VERT;
+        break;
+      case E_GADCON_ORIENT_LEFT:
+        signal = "e,action,orient,left";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_VERT;
+        break;
+      case E_GADCON_ORIENT_RIGHT:
+        signal = "e,action,orient,right";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_VERT;
+        break;
+      case E_GADCON_ORIENT_TOP:
+        signal = "e,action,orient,top";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_BOTTOM:
+        signal = "e,action,orient,bottom";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_TL:
+        signal = "e,action,orient,corner_tl";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_TR:
+        signal = "e,action,orient,corner_tr";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_BL:
+        signal = "e,action,orient,corner_bl";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_BR:
+        signal = "e,action,orient,corner_br";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_LT:
+        signal = "e,action,orient,corner_lt";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_RT:
+        signal = "e,action,orient,corner_rt";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_LB:
+        signal = "e,action,orient,corner_lb";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      case E_GADCON_ORIENT_CORNER_RB:
+        signal = "e,action,orient,corner_rb";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+        break;
+      default:
+        signal = "e,action,orient,horiz";
+        systray_orient = _NET_SYSTEM_TRAY_ORIENTATION_HORZ;
+     }
+
+   ecore_x_window_prop_card32_set
+     (inst->win.selection, _atom_st_orient, &systray_orient, 1);
+
+   edje_object_signal_emit(inst->ui.gadget, signal, _sig_source);
+   edje_object_message_signal_process(inst->ui.gadget);
+   _systray_size_apply(inst);
+}
+
+static char *
+_gc_label(E_Gadcon_Client_Class *client_class __UNUSED__)
+{
+   return D_(_Name);
+}
+
+static Evas_Object *
+_gc_icon(E_Gadcon_Client_Class *client_class __UNUSED__, Evas *evas)
+{
+   Evas_Object *o;
+
+   o = edje_object_add(evas);
+   edje_object_file_set(o, _systray_theme_path(), "icon");
+   return o;
+}
+
+static const char *
+_gc_id_new(E_Gadcon_Client_Class *client_class __UNUSED__)
+{
+   if (!instance)
+     return _name;
+   else
+     return NULL;
+}
+
+static const E_Gadcon_Client_Class _gc_class =
+{
+  GADCON_CLIENT_CLASS_VERSION, _name,
+  {_gc_init, _gc_shutdown, _gc_orient, _gc_label, _gc_icon, _gc_id_new, NULL},
+  E_GADCON_CLIENT_STYLE_INSET
+};
+
+EAPI E_Module_Api e_modapi = {E_MODULE_API_VERSION, _Name};
+
+EAPI void *
+e_modapi_init(E_Module *m)
+{
+   systray_mod = m;
+
+   if (snprintf(tmpbuf, sizeof(tmpbuf), "%s/locale", e_module_dir_get(m)) >= (int)sizeof(tmpbuf))
+     return NULL;
+   bindtextdomain(PACKAGE, tmpbuf);
+   bind_textdomain_codeset(PACKAGE, "UTF-8");
+
+   e_gadcon_provider_register(&_gc_class);
+
+   if (!_atom_manager)
+     _atom_manager = ecore_x_atom_get("MANAGER");
+   if (!_atom_st_orient)
+     _atom_st_orient = ecore_x_atom_get("_NET_SYSTEM_TRAY_ORIENTATION");
+   if (!_atom_st_visual)
+     _atom_st_visual = ecore_x_atom_get("_NET_SYSTEM_TRAY_VISUAL");
+   if (!_atom_st_op_code)
+     _atom_st_op_code = ecore_x_atom_get("_NET_SYSTEM_TRAY_OPCODE");
+   if (!_atom_st_msg_data)
+     _atom_st_msg_data = ecore_x_atom_get("_NET_SYSTEM_TRAY_MESSAGE_DATA");
+   if (!_atom_xembed)
+     _atom_xembed = ecore_x_atom_get("_XEMBED");
+   if (!_atom_xembed_info)
+     _atom_xembed_info = ecore_x_atom_get("_XEMBED_INFO");
+
+   return m;
+}
+
+EAPI int
+e_modapi_shutdown(E_Module *m __UNUSED__)
+{
+   e_gadcon_provider_unregister(&_gc_class);
+   systray_mod = NULL;
+   return 1;
+}
+
+EAPI int
+e_modapi_save(E_Module *m __UNUSED__)
+{
+   return 1;
+}
diff --git a/src/modules/systray/e_mod_main.h b/src/modules/systray/e_mod_main.h
new file mode 100644 (file)
index 0000000..8d10ecf
--- /dev/null
@@ -0,0 +1,12 @@
+#ifndef E_MOD_MAIN_H
+#define E_MOD_MAIN_H
+
+#define D_(str) dgettext(PACKAGE, str)
+
+EAPI extern E_Module_Api e_modapi;
+
+EAPI void *e_modapi_init(E_Module *m);
+EAPI int e_modapi_shutdown(E_Module *m);
+EAPI int e_modapi_save(E_Module *m);
+
+#endif
diff --git a/src/modules/systray/module.desktop.in b/src/modules/systray/module.desktop.in
new file mode 100644 (file)
index 0000000..bab1cbc
--- /dev/null
@@ -0,0 +1,11 @@
+[Desktop Entry]
+Type=Link
+Name=Systray
+Name[fr]=Zone de notification
+Name[cs]=Upozorňovací oblast
+Icon=e-module-systray
+Comment=<title>System Tray:</title><br>system tray that hold applications icons like Skype, Pidgin, Kopete and others.
+Comment[cs]=<title>Upozorňovací oblast:</title><br>spravuje aplikace jako Skype, Pidgin, Kopete a jiné.
+Comment[fr]=<title>Zone de notification:</title><br>Une zone qui reçoit les icones des applications comme Skype, Pidgin, Kopete et autres.
+Comment[it]=<title>Vassoio di sistema:</title><br>Un'area che contiene le icone di notifica di applicazioni come Skype, Pidgin, Kopete e altre.
+X-Enlightenment-ModuleType=shelf