wmcpufreq/wmgeneral/wmgeneral.c

   1 /*
   2         Best viewed with vim5, using ts=4
   3
   4         wmgeneral was taken from wmppp.
   5
   6         It has a lot of routines which most of the wm* programs use.
   7
   8         ------------------------------------------------------------
   9
  10         Author: Martijn Pieterse (pieterse@xs4all.nl)
  11
  12         ---
  13         CHANGES:
  14     ---
  15     14/09/1998 (Dave Clark, clarkd@skyia.com)
  16         * Updated createXBMfromXPM routine
  17         * Now supports >256 colors
  18         11/09/1998 (Martijn Pieterse, pieterse@xs4all.nl)
  19                 * Removed a bug from parse_rcfile. You could
  20                   not use "start" in a command if a label was
  21                   also start.
  22                 * Changed the needed geometry string.
  23                   We don't use window size, and don't support
  24                   negative positions.
  25         03/09/1998 (Martijn Pieterse, pieterse@xs4all.nl)
  26                 * Added parse_rcfile2
  27         02/09/1998 (Martijn Pieterse, pieterse@xs4all.nl)
  28                 * Added -geometry support (untested)
  29         28/08/1998 (Martijn Pieterse, pieterse@xs4all.nl)
  30                 * Added createXBMfromXPM routine
  31                 * Saves a lot of work with changing xpm's.
  32         02/05/1998 (Martijn Pieterse, pieterse@xs4all.nl)
  33                 * changed the read_rc_file to parse_rcfile, as suggested by Marcelo E. Magallon
  34                 * debugged the parse_rc file.
  35         30/04/1998 (Martijn Pieterse, pieterse@xs4all.nl)
  36                 * Ripped similar code from all the wm* programs,
  37                   and put them in a single file.
  38
  39 */
  40
  41 #include <stdlib.h>
  42 #include <stdio.h>
  43 #include <string.h>
  44 #include <unistd.h>
  45 #include <ctype.h>
  46 #include <stdarg.h>
  47
  48 #include <X11/Xlib.h>
  49 #include <X11/xpm.h>
  50 #include <X11/extensions/shape.h>
  51
  52 #include "wmgeneral.h"
  53
  54   /*****************/
  55  /* X11 Variables */
  56 /*****************/
  57
  58 Window          Root;
  59 int                     screen;
  60 int                     x_fd;
  61 int                     d_depth;
  62 XSizeHints      mysizehints;
  63 XWMHints        mywmhints;
  64 Pixel           back_pix, fore_pix;
  65 char            *Geometry = "";
  66 Window          iconwin, win;
  67 GC                      NormalGC;
  68 XpmIcon         wmgen;
  69 Pixmap          pixmask;
  70
  71   /*****************/
  72  /* Mouse Regions */
  73 /*****************/
  74
  75 typedef struct {
  76         int             enable;
  77         int             top;
  78         int             bottom;
  79         int             left;
  80         int             right;
  81 } MOUSE_REGION;
  82
  83 MOUSE_REGION    mouse_region[MAX_MOUSE_REGION];
  84
  85   /***********************/
  86  /* Function Prototypes */
  87 /***********************/
  88
  89 static void GetXPM(XpmIcon *, char **);
  90 static Pixel GetColor(char *);
  91 void RedrawWindow(void);
  92 void AddMouseRegion(int, int, int, int, int);
  93 int CheckMouseRegion(int, int);
  94
  95 /*******************************************************************************\
  96 |* parse_rcfile                                                                                                                            *|
  97 \*******************************************************************************/
  98
  99 void parse_rcfile(const char *filename, rckeys *keys) {
 100
 101         char    *p,*q;
 102         char    temp[128];
 103         char    *tokens = " :\t\n";
 104         FILE    *fp;
 105         int             i,key;
 106
 107         fp = fopen(filename, "r");
 108         if (fp) {
 109                 while (fgets(temp, 128, fp)) {
 110                         key = 0;
 111                         q = strdup(temp);
 112                         q = strtok(q, tokens);
 113                         while (key >= 0 && keys[key].label) {
 114                                 if ((!strcmp(q, keys[key].label))) {
 115                                         p = strstr(temp, keys[key].label);
 116                                         p += strlen(keys[key].label);
 117                                         p += strspn(p, tokens);
 118                                         if ((i = strcspn(p, "#\n"))) p[i] = 0;
 119                                         free(*keys[key].var);
 120                                         *keys[key].var = strdup(p);
 121                                         key = -1;
 122                                 } else key++;
 123                         }
 124                         free(q);
 125                 }
 126                 fclose(fp);
 127         }
 128 }
 129
 130 /*******************************************************************************\
 131 |* parse_rcfile2                                                                                                                           *|
 132 \*******************************************************************************/
 133
 134 void parse_rcfile2(const char *filename, rckeys2 *keys) {
 135
 136         char    *p;
 137         char    temp[128];
 138         char    *tokens = " :\t\n";
 139         FILE    *fp;
 140         int             i,key;
 141         char    *family = NULL;
 142
 143         fp = fopen(filename, "r");
 144         if (fp) {
 145                 while (fgets(temp, 128, fp)) {
 146                         key = 0;
 147                         while (key >= 0 && keys[key].label) {
 148                                 if ((p = strstr(temp, keys[key].label))) {
 149                                         p += strlen(keys[key].label);
 150                                         p += strspn(p, tokens);
 151                                         if ((i = strcspn(p, "#\n"))) p[i] = 0;
 152                                         free(*keys[key].var);
 153                                         *keys[key].var = strdup(p);
 154                                         key = -1;
 155                                 } else key++;
 156                         }
 157                 }
 158                 fclose(fp);
 159         }
 160         free(family);
 161 }
 162
 163
 164 /*******************************************************************************\
 165 |* GetXPM                                                                                                                                          *|
 166 \*******************************************************************************/
 167
 168 static void GetXPM(XpmIcon *wmgen, char *pixmap_bytes[]) {
 169
 170         XWindowAttributes       attributes;
 171         int                                     err;
 172
 173         /* For the colormap */
 174         XGetWindowAttributes(display, Root, &attributes);
 175
 176         wmgen->attributes.valuemask |= (XpmReturnPixels | XpmReturnExtensions);
 177
 178         err = XpmCreatePixmapFromData(display, Root, pixmap_bytes, &(wmgen->pixmap),
 179                                         &(wmgen->mask), &(wmgen->attributes));
 180
 181         if (err != XpmSuccess) {
 182                 fprintf(stderr, "Not enough free colorcells.\n");
 183                 exit(1);
 184         }
 185 }
 186
 187 /*******************************************************************************\
 188 |* GetColor                                                                                                                                        *|
 189 \*******************************************************************************/
 190
 191 static Pixel GetColor(char *name) {
 192
 193         XColor                          color;
 194         XWindowAttributes       attributes;
 195
 196         XGetWindowAttributes(display, Root, &attributes);
 197
 198         color.pixel = 0;
 199         if (!XParseColor(display, attributes.colormap, name, &color)) {
 200                 fprintf(stderr, "wm.app: can't parse %s.\n", name);
 201         } else if (!XAllocColor(display, attributes.colormap, &color)) {
 202                 fprintf(stderr, "wm.app: can't allocate %s.\n", name);
 203         }
 204         return color.pixel;
 205 }
 206
 207 /*******************************************************************************\
 208 |* flush_expose                                                                                                                            *|
 209 \*******************************************************************************/
 210
 211 static int flush_expose(Window w) {
 212
 213         XEvent          dummy;
 214         int                     i=0;
 215
 216         while (XCheckTypedWindowEvent(display, w, Expose, &dummy))
 217                 i++;
 218
 219         return i;
 220 }
 221
 222 /*******************************************************************************\
 223 |* RedrawWindow                                                                                                                            *|
 224 \*******************************************************************************/
 225
 226 void RedrawWindow(void) {
 227
 228         flush_expose(iconwin);
 229         XCopyArea(display, wmgen.pixmap, iconwin, NormalGC,
 230                                 0,0, wmgen.attributes.width, wmgen.attributes.height, 0,0);
 231         flush_expose(win);
 232         XCopyArea(display, wmgen.pixmap, win, NormalGC,
 233                                 0,0, wmgen.attributes.width, wmgen.attributes.height, 0,0);
 234 }
 235
 236 /*******************************************************************************\
 237 |* RedrawWindowXY                                                                                                                          *|
 238 \*******************************************************************************/
 239
 240 void RedrawWindowXY(int x, int y) {
 241
 242         flush_expose(iconwin);
 243         XCopyArea(display, wmgen.pixmap, iconwin, NormalGC,
 244                                 x,y, wmgen.attributes.width, wmgen.attributes.height, 0,0);
 245         flush_expose(win);
 246         XCopyArea(display, wmgen.pixmap, win, NormalGC,
 247                                 x,y, wmgen.attributes.width, wmgen.attributes.height, 0,0);
 248 }
 249
 250 /*******************************************************************************\
 251 |* AddMouseRegion                                                                                                                          *|
 252 \*******************************************************************************/
 253
 254 void AddMouseRegion(int index, int left, int top, int right, int bottom) {
 255
 256         if (index < MAX_MOUSE_REGION) {
 257                 mouse_region[index].enable = 1;
 258                 mouse_region[index].top = top;
 259                 mouse_region[index].left = left;
 260                 mouse_region[index].bottom = bottom;
 261                 mouse_region[index].right = right;
 262         }
 263 }
 264
 265 /*******************************************************************************\
 266 |* CheckMouseRegion                                                                                                                        *|
 267 \*******************************************************************************/
 268
 269 int CheckMouseRegion(int x, int y) {
 270
 271         int             i;
 272         int             found;
 273
 274         found = 0;
 275
 276         for (i=0; i<MAX_MOUSE_REGION && !found; i++) {
 277                 if (mouse_region[i].enable &&
 278                         x <= mouse_region[i].right &&
 279                         x >= mouse_region[i].left &&
 280                         y <= mouse_region[i].bottom &&
 281                         y >= mouse_region[i].top)
 282                         found = 1;
 283         }
 284         if (!found) return -1;
 285         return (i-1);
 286 }
 287
 288 /*******************************************************************************\
 289 |* createXBMfromXPM                                                                                                                        *|
 290 \*******************************************************************************/
 291 void createXBMfromXPM(char *xbm, char **xpm, int sx, int sy) {
 292
 293         int             i,j,k;
 294         int             width, height, numcol, depth;
 295     int         zero=0;
 296         unsigned char   bwrite;
 297     int         bcount;
 298     int     curpixel;
 299
 300         sscanf(*xpm, "%d %d %d %d", &width, &height, &numcol, &depth);
 301
 302
 303     for (k=0; k!=depth; k++)
 304     {
 305         zero <<=8;
 306         zero |= xpm[1][k];
 307     }
 308
 309         for (i=numcol+1; i < numcol+sy+1; i++) {
 310                 bcount = 0;
 311                 bwrite = 0;
 312                 for (j=0; j<sx*depth; j+=depth) {
 313             bwrite >>= 1;
 314
 315             curpixel=0;
 316             for (k=0; k!=depth; k++)
 317             {
 318                 curpixel <<=8;
 319                 curpixel |= xpm[i][j+k];
 320             }
 321
 322             if ( curpixel != zero ) {
 323                                 bwrite += 128;
 324                         }
 325                         bcount++;
 326                         if (bcount == 8) {
 327                                 *xbm = bwrite;
 328                                 xbm++;
 329                                 bcount = 0;
 330                                 bwrite = 0;
 331                         }
 332                 }
 333         }
 334 }
 335
 336 /*******************************************************************************\
 337 |* copyXPMArea                                                                                                                             *|
 338 \*******************************************************************************/
 339
 340 void copyXPMArea(int x, int y, int sx, int sy, int dx, int dy) {
 341
 342         XCopyArea(display, wmgen.pixmap, wmgen.pixmap, NormalGC, x, y, sx, sy, dx, dy);
 343
 344 }
 345
 346 /*******************************************************************************\
 347 |* copyXBMArea                                                                                                                             *|
 348 \*******************************************************************************/
 349
 350 void copyXBMArea(int x, int y, int sx, int sy, int dx, int dy) {
 351
 352         XCopyArea(display, wmgen.mask, wmgen.pixmap, NormalGC, x, y, sx, sy, dx, dy);
 353 }
 354
 355
 356 /*******************************************************************************\
 357 |* setMaskXY                                                                                                                               *|
 358 \*******************************************************************************/
 359
 360 void setMaskXY(int x, int y) {
 361
 362          XShapeCombineMask(display, win, ShapeBounding, x, y, pixmask, ShapeSet);
 363          XShapeCombineMask(display, iconwin, ShapeBounding, x, y, pixmask, ShapeSet);
 364 }
 365
 366 /*******************************************************************************\
 367 |* openXwindow                                                                                                                             *|
 368 \*******************************************************************************/
 369 void openXwindow(int argc, char *argv[], char *pixmap_bytes[], char *pixmask_bits, int pixmask_width, int pixmask_height) {
 370
 371         unsigned int    borderwidth = 1;
 372         XClassHint              classHint;
 373         char                    *display_name = NULL;
 374         char                    *wname = argv[0];
 375         XTextProperty   name;
 376
 377         XGCValues               gcv;
 378         unsigned long   gcm;
 379
 380         char                    *geometry = NULL;
 381
 382         int                             dummy=0;
 383         int                             i, wx, wy;
 384
 385         for (i=1; argv[i]; i++) {
 386                 if (!strcmp(argv[i], "-display")) {
 387                         display_name = argv[i+1];
 388                         i++;
 389                 }
 390                 if (!strcmp(argv[i], "-geometry")) {
 391                         geometry = argv[i+1];
 392                         i++;
 393                 }
 394         }
 395
 396         if (!(display = XOpenDisplay(display_name))) {
 397                 fprintf(stderr, "%s: can't open display %s\n",
 398                                                 wname, XDisplayName(display_name));
 399                 exit(1);
 400         }
 401         screen  = DefaultScreen(display);
 402         Root    = RootWindow(display, screen);
 403         d_depth = DefaultDepth(display, screen);
 404         x_fd    = XConnectionNumber(display);
 405
 406         /* Convert XPM to XImage */
 407         GetXPM(&wmgen, pixmap_bytes);
 408
 409         /* Create a window to hold the stuff */
 410         mysizehints.flags = USSize | USPosition;
 411         mysizehints.x = 0;
 412         mysizehints.y = 0;
 413
 414         back_pix = GetColor("white");
 415         fore_pix = GetColor("black");
 416
 417         XWMGeometry(display, screen, Geometry, NULL, borderwidth, &mysizehints,
 418                                 &mysizehints.x, &mysizehints.y,&mysizehints.width,&mysizehints.height, &dummy);
 419
 420         mysizehints.width = 64;
 421         mysizehints.height = 64;
 422
 423         win = XCreateSimpleWindow(display, Root, mysizehints.x, mysizehints.y,
 424                                 mysizehints.width, mysizehints.height, borderwidth, fore_pix, back_pix);
 425
 426         iconwin = XCreateSimpleWindow(display, win, mysizehints.x, mysizehints.y,
 427                                 mysizehints.width, mysizehints.height, borderwidth, fore_pix, back_pix);
 428
 429         /* Activate hints */
 430         XSetWMNormalHints(display, win, &mysizehints);
 431         classHint.res_name = wname;
 432         classHint.res_class = wname;
 433         XSetClassHint(display, win, &classHint);
 434
 435         XSelectInput(display, win, ButtonPressMask | ExposureMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask);
 436         XSelectInput(display, iconwin, ButtonPressMask | ExposureMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask);
 437
 438         if (XStringListToTextProperty(&wname, 1, &name) == 0) {
 439                 fprintf(stderr, "%s: can't allocate window name\n", wname);
 440                 exit(1);
 441         }
 442
 443         XSetWMName(display, win, &name);
 444
 445         /* Create GC for drawing */
 446
 447         gcm = GCForeground | GCBackground | GCGraphicsExposures;
 448         gcv.foreground = fore_pix;
 449         gcv.background = back_pix;
 450         gcv.graphics_exposures = 0;
 451         NormalGC = XCreateGC(display, Root, gcm, &gcv);
 452
 453         /* ONLYSHAPE ON */
 454
 455         pixmask = XCreateBitmapFromData(display, win, pixmask_bits, pixmask_width, pixmask_height);
 456
 457         XShapeCombineMask(display, win, ShapeBounding, 0, 0, pixmask, ShapeSet);
 458         XShapeCombineMask(display, iconwin, ShapeBounding, 0, 0, pixmask, ShapeSet);
 459
 460         /* ONLYSHAPE OFF */
 461
 462         mywmhints.initial_state = WithdrawnState;
 463         mywmhints.icon_window = iconwin;
 464         mywmhints.icon_x = mysizehints.x;
 465         mywmhints.icon_y = mysizehints.y;
 466         mywmhints.window_group = win;
 467         mywmhints.flags = StateHint | IconWindowHint | IconPositionHint | WindowGroupHint;
 468
 469         XSetWMHints(display, win, &mywmhints);
 470
 471         XSetCommand(display, win, argv, argc);
 472         XMapWindow(display, win);
 473
 474         if (geometry) {
 475                 if (sscanf(geometry, "+%d+%d", &wx, &wy) != 2) {
 476                         fprintf(stderr, "Bad geometry string.\n");
 477                         exit(1);
 478                 }
 479                 XMoveWindow(display, win, wx, wy);
 480         }
 481 }