Dogcows Code - chaz/tint2/blob - src/server.c

   1 /**************************************************************************
   2 *
   3 * Tint2 panel
   4 *
   5 * Copyright (C) 2007 Pål Staurland (staura@gmail.com)
   6 * Modified (C) 2008 thierry lorthiois (lorthiois@bbsoft.fr)
   7 *
   8 * This program is free software; you can redistribute it and/or
   9 * modify it under the terms of the GNU General Public License version 2
  10 * as published by the Free Software Foundation.
  11 *
  12 * This program is distributed in the hope that it will be useful,
  13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 * GNU General Public License for more details.
  16 * You should have received a copy of the GNU General Public License
  17 * along with this program; if not, write to the Free Software
  18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  19 **************************************************************************/
  20
  21 #include <X11/extensions/Xrender.h>
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <unistd.h>
  26
  27 #include "server.h"
  28 #include "task.h"
  29 #include "window.h"
  30
  31 void server_catch_error (Display *d, XErrorEvent *ev){}
  32
  33 static char *name_trayer = 0;
  34
  35
  36 void server_init_atoms ()
  37 {
  38         server.atom._XROOTPMAP_ID = XInternAtom (server.dsp, "_XROOTPMAP_ID", False);
  39         server.atom._NET_CURRENT_DESKTOP = XInternAtom (server.dsp, "_NET_CURRENT_DESKTOP", False);
  40         server.atom._NET_NUMBER_OF_DESKTOPS = XInternAtom (server.dsp, "_NET_NUMBER_OF_DESKTOPS", False);
  41         server.atom._NET_DESKTOP_GEOMETRY = XInternAtom (server.dsp, "_NET_DESKTOP_GEOMETRY", False);
  42         server.atom._NET_DESKTOP_VIEWPORT = XInternAtom (server.dsp, "_NET_DESKTOP_VIEWPORT", False);
  43         server.atom._NET_ACTIVE_WINDOW = XInternAtom (server.dsp, "_NET_ACTIVE_WINDOW", False);
  44         server.atom._NET_WM_WINDOW_TYPE = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE", False);
  45         server.atom._NET_WM_STATE_SKIP_PAGER = XInternAtom (server.dsp, "_NET_WM_STATE_SKIP_PAGER", False);
  46         server.atom._NET_WM_STATE_SKIP_TASKBAR = XInternAtom (server.dsp, "_NET_WM_STATE_SKIP_TASKBAR", False);
  47         server.atom._NET_WM_STATE_STICKY = XInternAtom (server.dsp, "_NET_WM_STATE_STICKY", False);
  48         server.atom._NET_WM_STATE_DEMANDS_ATTENTION = XInternAtom (server.dsp, "_NET_WM_STATE_DEMANDS_ATTENTION", False);
  49         server.atom._NET_WM_WINDOW_TYPE_DOCK = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_DOCK", False);
  50         server.atom._NET_WM_WINDOW_TYPE_DESKTOP = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_DESKTOP", False);
  51         server.atom._NET_WM_WINDOW_TYPE_TOOLBAR = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_TOOLBAR", False);
  52         server.atom._NET_WM_WINDOW_TYPE_MENU = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_MENU", False);
  53         server.atom._NET_WM_WINDOW_TYPE_SPLASH = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_SPLASH", False);
  54         server.atom._NET_WM_WINDOW_TYPE_DIALOG = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_DIALOG", False);
  55         server.atom._NET_WM_WINDOW_TYPE_NORMAL = XInternAtom (server.dsp, "_NET_WM_WINDOW_TYPE_NORMAL", False);
  56         server.atom._NET_WM_DESKTOP = XInternAtom (server.dsp, "_NET_WM_DESKTOP", False);
  57         server.atom.WM_STATE = XInternAtom (server.dsp, "WM_STATE", False);
  58         server.atom._NET_WM_STATE = XInternAtom (server.dsp, "_NET_WM_STATE", False);
  59         server.atom._NET_WM_STATE_MAXIMIZED_VERT = XInternAtom (server.dsp, "_NET_WM_STATE_MAXIMIZED_VERT", False);
  60         server.atom._NET_WM_STATE_MAXIMIZED_HORZ = XInternAtom (server.dsp, "_NET_WM_STATE_MAXIMIZED_HORZ", False);
  61         server.atom._NET_WM_STATE_SHADED = XInternAtom (server.dsp, "_NET_WM_STATE_SHADED", False);
  62         server.atom._NET_WM_STATE_BELOW = XInternAtom (server.dsp, "_NET_WM_STATE_BELOW", False);
  63         server.atom._NET_WM_STATE_MODAL = XInternAtom (server.dsp, "_NET_WM_STATE_MODAL", False);
  64         server.atom._NET_CLIENT_LIST = XInternAtom (server.dsp, "_NET_CLIENT_LIST", False);
  65         server.atom._NET_WM_VISIBLE_NAME = XInternAtom (server.dsp, "_NET_WM_VISIBLE_NAME", False);
  66         server.atom._NET_WM_NAME = XInternAtom (server.dsp, "_NET_WM_NAME", False);
  67         server.atom._NET_WM_STRUT = XInternAtom (server.dsp, "_NET_WM_STRUT", False);
  68         server.atom._NET_WM_ICON = XInternAtom (server.dsp, "_NET_WM_ICON", False);
  69         server.atom._NET_CLOSE_WINDOW = XInternAtom (server.dsp, "_NET_CLOSE_WINDOW", False);
  70         server.atom.UTF8_STRING = XInternAtom (server.dsp, "UTF8_STRING", False);
  71         server.atom._NET_SUPPORTING_WM_CHECK = XInternAtom (server.dsp, "_NET_SUPPORTING_WM_CHECK", False);
  72         server.atom._NET_SUPPORTING_WM_CHECK = XInternAtom (server.dsp, "_NET_WM_NAME", False);
  73         server.atom._NET_WM_STRUT_PARTIAL = XInternAtom (server.dsp, "_NET_WM_STRUT_PARTIAL", False);
  74         server.atom.WM_NAME = XInternAtom(server.dsp, "WM_NAME", False);
  75         server.atom.__SWM_VROOT = XInternAtom(server.dsp, "__SWM_VROOT", False);
  76         server.atom._MOTIF_WM_HINTS = XInternAtom(server.dsp, "_MOTIF_WM_HINTS", False);
  77         server.atom.WM_HINTS = XInternAtom(server.dsp, "WM_HINTS", False);
  78
  79         // systray protocol
  80         name_trayer = g_strdup_printf("_NET_SYSTEM_TRAY_S%d", DefaultScreen(server.dsp));
  81         server.atom._NET_SYSTEM_TRAY_SCREEN = XInternAtom(server.dsp, name_trayer, False);
  82         server.atom._NET_SYSTEM_TRAY_OPCODE = XInternAtom(server.dsp, "_NET_SYSTEM_TRAY_OPCODE", False);
  83         server.atom.MANAGER = XInternAtom(server.dsp, "MANAGER", False);
  84         server.atom._NET_SYSTEM_TRAY_MESSAGE_DATA = XInternAtom(server.dsp, "_NET_SYSTEM_TRAY_MESSAGE_DATA", False);
  85         server.atom._NET_SYSTEM_TRAY_ORIENTATION = XInternAtom(server.dsp, "_NET_SYSTEM_TRAY_ORIENTATION", False);
  86         server.atom._XEMBED = XInternAtom(server.dsp, "_XEMBED", False);
  87         server.atom._XEMBED_INFO = XInternAtom(server.dsp, "_XEMBED_INFO", False);
  88
  89         // drag 'n' drop
  90         server.atom.XdndAware = XInternAtom(server.dsp, "XdndAware", False);
  91         server.atom.XdndPosition = XInternAtom(server.dsp, "XdndPosition", False);
  92         server.atom.XdndStatus = XInternAtom(server.dsp, "XdndStatus", False);
  93 }
  94
  95
  96 void cleanup_server()
  97 {
  98         if (name_trayer) free(name_trayer);
  99         XFreeColormap(server.dsp, server.colormap);
 100 }
 101
 102
 103 void send_event32 (Window win, Atom at, long data1, long data2, long data3)
 104 {
 105         XEvent event;
 106
 107         event.xclient.type = ClientMessage;
 108         event.xclient.serial = 0;
 109         event.xclient.send_event = True;
 110         event.xclient.display = server.dsp;
 111         event.xclient.window = win;
 112         event.xclient.message_type = at;
 113
 114         event.xclient.format = 32;
 115         event.xclient.data.l[0] = data1;
 116         event.xclient.data.l[1] = data2;
 117         event.xclient.data.l[2] = data3;
 118         event.xclient.data.l[3] = 0;
 119         event.xclient.data.l[4] = 0;
 120
 121         XSendEvent(server.dsp, server.root_win, False, SubstructureRedirectMask|SubstructureNotifyMask, &event);
 122 }
 123
 124
 125 int get_property32 (Window win, Atom at, Atom type)
 126 {
 127         Atom type_ret;
 128         int format_ret = 0, data = 0;
 129         unsigned long nitems_ret = 0;
 130         unsigned long bafter_ret = 0;
 131         unsigned char *prop_value = 0;
 132         int result;
 133
 134         if (!win) return 0;
 135
 136         result = XGetWindowProperty(server.dsp, win, at, 0, 0x7fffffff, False, type, &type_ret, &format_ret, &nitems_ret, &bafter_ret, &prop_value);
 137
 138         if (result == Success && prop_value) {
 139                 data = ((gulong*)prop_value)[0];
 140                 XFree (prop_value);
 141         }
 142         return data;
 143 }
 144
 145
 146 void *server_get_property (Window win, Atom at, Atom type, int *num_results)
 147 {
 148         Atom type_ret;
 149         int format_ret = 0;
 150         unsigned long nitems_ret = 0;
 151         unsigned long bafter_ret = 0;
 152         unsigned char *prop_value;
 153         int result;
 154
 155         if (!win) return 0;
 156
 157         result = XGetWindowProperty(server.dsp, win, at, 0, 0x7fffffff, False, type, &type_ret, &format_ret, &nitems_ret, &bafter_ret, &prop_value);
 158
 159         /* Send back resultcount */
 160         if (num_results) *num_results = nitems_ret;
 161
 162         if (result == Success && prop_value) return prop_value;
 163         else return 0;
 164 }
 165
 166
 167 void get_root_pixmap()
 168 {
 169         Pixmap ret = None;
 170
 171         unsigned long *res;
 172         int  c = 2;
 173
 174         do {
 175                 res = server_get_property (server.root_win, server.atom._XROOTPMAP_ID, XA_PIXMAP, 0);
 176                 if (res) {
 177                         ret = *((Pixmap*)res);
 178                         XFree(res);
 179                         break;
 180                 }
 181         } while (--c > 0);
 182         server.root_pmap = ret;
 183
 184         if (server.root_pmap == None)
 185                 fprintf(stderr, "tint2 : pixmap background detection failed\n");
 186         else {
 187                 XGCValues  gcv;
 188                 gcv.ts_x_origin = 0;
 189                 gcv.ts_y_origin = 0;
 190                 gcv.fill_style = FillTiled;
 191                 uint mask = GCTileStipXOrigin | GCTileStipYOrigin | GCFillStyle | GCTile;
 192
 193                 gcv.tile = server.root_pmap;
 194                 XChangeGC(server.dsp, server.gc, mask, &gcv);
 195         }
 196 }
 197
 198
 199 int compareMonitorPos(const void *monitor1, const void *monitor2)
 200 {
 201         Monitor *m1 = (Monitor*)monitor1;
 202         Monitor *m2 = (Monitor*)monitor2;
 203
 204         if (m1->x < m2->x) {
 205                 return -1;
 206         }
 207         else if (m1->x > m2->x) {
 208                 return 1;
 209         }
 210         else if (m1->y < m2->y) {
 211                 return -1;
 212         }
 213         else if (m1->y > m2->y) {
 214                 return 1;
 215         }
 216         else {
 217                 return 0;
 218         }
 219 }
 220
 221
 222 int compareMonitorIncluded(const void *monitor1, const void *monitor2)
 223 {
 224         Monitor *m1 = (Monitor*)monitor1;
 225         Monitor *m2 = (Monitor*)monitor2;
 226
 227         if (m1->x >= m2->x && m1->y >= m2->y && (m1->x+m1->width) <= (m2->x+m2->width) && (m1->y+m1->height) <= (m2->y+m2->height)) {
 228                 // m1 included inside m2
 229                 return 1;
 230         }
 231         else {
 232                 return -1;
 233         }
 234 }
 235
 236
 237 void get_monitors()
 238 {
 239         if (server.monitor) free(server.monitor);
 240         server.nb_monitor = 0;
 241         server.monitor = 0;
 242
 243         int i, j, nbmonitor;
 244         if (XineramaIsActive(server.dsp)) {
 245                 XineramaScreenInfo *info = XineramaQueryScreens(server.dsp, &nbmonitor);
 246
 247                 if (info && nbmonitor > 0) {
 248                         server.monitor = malloc(nbmonitor * sizeof(Monitor));
 249                         for (i=0 ; i < nbmonitor ; i++) {
 250                                 server.monitor[i].x = info[i].x_org;
 251                                 server.monitor[i].y = info[i].y_org;
 252                                 server.monitor[i].width = info[i].width;
 253                                 server.monitor[i].height = info[i].height;
 254                         }
 255                         XFree(info);
 256
 257                         // ordered monitor
 258                         qsort(server.monitor, nbmonitor, sizeof(Monitor), compareMonitorIncluded);
 259
 260                         // remove monitor included into another one
 261                         i = 0;
 262                         while (i < nbmonitor) {
 263                                 for (j=0; j < i ; j++) {
 264                                         if (compareMonitorIncluded(&server.monitor[i], &server.monitor[j]) > 0) {
 265                                                 goto next;
 266                                         }
 267                                 }
 268                                 i++;
 269                         }
 270 next:
 271                         server.nb_monitor = i;
 272                         server.monitor = realloc(server.monitor, server.nb_monitor * sizeof(Monitor));
 273                         qsort(server.monitor, server.nb_monitor, sizeof(Monitor), compareMonitorPos);
 274                 }
 275         }
 276
 277         if (!server.nb_monitor) {
 278                 server.nb_monitor = 1;
 279                 server.monitor = malloc(sizeof(Monitor));
 280                 server.monitor[0].x = server.monitor[0].y = 0;
 281                 server.monitor[0].width = DisplayWidth (server.dsp, server.screen);
 282                 server.monitor[0].height = DisplayHeight (server.dsp, server.screen);
 283         }
 284 }
 285
 286
 287 void get_desktops()
 288 {
 289         int i;
 290
 291         // detect number of desktops
 292         // wait 15s to leave some time for window manager startup
 293         for (i=0 ; i < 15 ; i++) {
 294                 server.nb_desktop = server_get_number_of_desktop ();
 295                 if (server.nb_desktop > 0) break;
 296                 sleep(1);
 297         }
 298         if (server.nb_desktop == 0) {
 299                 server.nb_desktop = 1;
 300                 fprintf(stderr, "warning : WM doesn't respect NETWM specs. tint2 default to 1 desktop.\n");
 301         }
 302 }
 303
 304
 305 void server_init_visual()
 306 {
 307         int real_transparency = 0;
 308         XVisualInfo *xvi;
 309         XVisualInfo templ = { .screen=server.screen, .depth=32, .class=TrueColor };
 310         int nvi;
 311         xvi = XGetVisualInfo(server.dsp, VisualScreenMask|VisualDepthMask|VisualClassMask, &templ, &nvi);
 312
 313         Visual *visual = 0;
 314         if (xvi) {
 315                 int i;
 316                 XRenderPictFormat *format;
 317                 for (i = 0; i < nvi; i++) {
 318                         format = XRenderFindVisualFormat(server.dsp, xvi[i].visual);
 319                         if (format->type == PictTypeDirect && format->direct.alphaMask) {
 320                                 visual = xvi[i].visual;
 321                                 break;
 322                         }
 323                 }
 324         }
 325         XFree (xvi);
 326
 327         if (visual && real_transparency) {
 328                 printf("real transparency on... depth: %d\n", server.depth);
 329                 server.depth = 32;
 330                 server.colormap = XCreateColormap(server.dsp, server.root_win, visual, AllocNone);
 331                 server.visual = visual;
 332         }
 333         else {
 334                 server.depth = DefaultDepth(server.dsp, server.screen);
 335                 printf("real transparency off.... depth: %d\n", server.depth);
 336                 server.colormap = DefaultColormap(server.dsp, server.screen);
 337                 server.visual = DefaultVisual(server.dsp, server.screen);
 338         }
 339 }