24bdc54bb7
From https://web.archive.org/web/20021210035511/http://lucille.dhs.org/washerDryer-1.1.tar.bz2
445 lines
12 KiB
C
445 lines
12 KiB
C
/*
|
|
Best viewed with vim5, using ts=4
|
|
|
|
wmgeneral was taken from wmppp.
|
|
|
|
It has a lot of routines which most of the wm* programs use.
|
|
|
|
------------------------------------------------------------
|
|
|
|
Author: Martijn Pieterse (pieterse@xs4all.nl)
|
|
|
|
---
|
|
CHANGES:
|
|
---
|
|
14/09/1998 (Dave Clark, clarkd@skyia.com)
|
|
* Updated createXBMfromXPM routine
|
|
* Now supports >256 colors
|
|
11/09/1998 (Martijn Pieterse, pieterse@xs4all.nl)
|
|
* Removed a bug from parse_rcfile. You could
|
|
not use "start" in a command if a label was
|
|
also start.
|
|
* Changed the needed geometry string.
|
|
We don't use window size, and don't support
|
|
negative positions.
|
|
03/09/1998 (Martijn Pieterse, pieterse@xs4all.nl)
|
|
* Added parse_rcfile2
|
|
02/09/1998 (Martijn Pieterse, pieterse@xs4all.nl)
|
|
* Added -geometry support (untested)
|
|
28/08/1998 (Martijn Pieterse, pieterse@xs4all.nl)
|
|
* Added createXBMfromXPM routine
|
|
* Saves a lot of work with changing xpm's.
|
|
02/05/1998 (Martijn Pieterse, pieterse@xs4all.nl)
|
|
* changed the read_rc_file to parse_rcfile, as suggested by Marcelo E. Magallon
|
|
* debugged the parse_rc file.
|
|
30/04/1998 (Martijn Pieterse, pieterse@xs4all.nl)
|
|
* Ripped similar code from all the wm* programs,
|
|
and put them in a single file.
|
|
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <ctype.h>
|
|
#include <stdarg.h>
|
|
|
|
#include <X11/Xlib.h>
|
|
#include <X11/xpm.h>
|
|
#include <X11/extensions/shape.h>
|
|
|
|
#include "wmgeneral.h"
|
|
|
|
/*****************/
|
|
/* X11 Variables */
|
|
/*****************/
|
|
|
|
Window Root;
|
|
int screen;
|
|
int x_fd;
|
|
int d_depth;
|
|
XSizeHints mysizehints;
|
|
XWMHints mywmhints;
|
|
Pixel back_pix, fore_pix;
|
|
char *Geometry = "";
|
|
Window iconwin, win;
|
|
GC NormalGC;
|
|
XpmIcon wmgen;
|
|
Pixmap pixmask;
|
|
|
|
/*****************/
|
|
/* Mouse Regions */
|
|
/*****************/
|
|
|
|
typedef struct
|
|
{
|
|
int enable;
|
|
int top;
|
|
int bottom;
|
|
int left;
|
|
int right;
|
|
}
|
|
MOUSE_REGION;
|
|
|
|
MOUSE_REGION mouse_region[MAX_MOUSE_REGION];
|
|
|
|
/***********************/
|
|
/* Function Prototypes */
|
|
/***********************/
|
|
|
|
static void GetXPM (XpmIcon *, char **);
|
|
static Pixel GetColor (char *);
|
|
void RedrawWindow (void);
|
|
void AddMouseRegion (int, int, int, int, int);
|
|
int CheckMouseRegion (int, int);
|
|
|
|
/*******************************************************************************\
|
|
|* GetXPM *|
|
|
\*******************************************************************************/
|
|
|
|
static void GetXPM (XpmIcon * wmgen, char *pixmap_bytes[])
|
|
{
|
|
|
|
XWindowAttributes attributes;
|
|
int err;
|
|
|
|
/* For the colormap */
|
|
XGetWindowAttributes (display, Root, &attributes);
|
|
|
|
wmgen->attributes.valuemask |= (XpmReturnPixels | XpmReturnExtensions);
|
|
|
|
err = XpmCreatePixmapFromData (display, Root, pixmap_bytes, &(wmgen->pixmap),
|
|
&(wmgen->mask), &(wmgen->attributes));
|
|
|
|
if (err != XpmSuccess)
|
|
{
|
|
fprintf (stderr, "Not enough free colorcells.\n");
|
|
exit (1);
|
|
}
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* GetColor *|
|
|
\*******************************************************************************/
|
|
|
|
static Pixel GetColor (char *name)
|
|
{
|
|
|
|
XColor color;
|
|
XWindowAttributes attributes;
|
|
|
|
XGetWindowAttributes (display, Root, &attributes);
|
|
|
|
color.pixel = 0;
|
|
if (!XParseColor (display, attributes.colormap, name, &color))
|
|
{
|
|
fprintf (stderr, "wm.app: can't parse %s.\n", name);
|
|
}
|
|
else if (!XAllocColor (display, attributes.colormap, &color))
|
|
{
|
|
fprintf (stderr, "wm.app: can't allocate %s.\n", name);
|
|
}
|
|
return color.pixel;
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* flush_expose *|
|
|
\*******************************************************************************/
|
|
|
|
static int flush_expose (Window w)
|
|
{
|
|
|
|
XEvent dummy;
|
|
int i = 0;
|
|
|
|
while (XCheckTypedWindowEvent (display, w, Expose, &dummy))
|
|
i++;
|
|
|
|
return i;
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* RedrawWindow *|
|
|
\*******************************************************************************/
|
|
|
|
void RedrawWindow (void)
|
|
{
|
|
|
|
flush_expose (iconwin);
|
|
XCopyArea (display, wmgen.pixmap, iconwin, NormalGC,
|
|
0, 0, wmgen.attributes.width, wmgen.attributes.height, 0, 0);
|
|
flush_expose (win);
|
|
XCopyArea (display, wmgen.pixmap, win, NormalGC,
|
|
0, 0, wmgen.attributes.width, wmgen.attributes.height, 0, 0);
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* RedrawWindowXY *|
|
|
\*******************************************************************************/
|
|
|
|
void RedrawWindowXY (int x, int y)
|
|
{
|
|
|
|
flush_expose (iconwin);
|
|
XCopyArea (display, wmgen.pixmap, iconwin, NormalGC,
|
|
x, y, wmgen.attributes.width, wmgen.attributes.height, 0, 0);
|
|
flush_expose (win);
|
|
XCopyArea (display, wmgen.pixmap, win, NormalGC,
|
|
x, y, wmgen.attributes.width, wmgen.attributes.height, 0, 0);
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* AddMouseRegion *|
|
|
\*******************************************************************************/
|
|
|
|
void AddMouseRegion (int index, int left, int top, int right, int bottom)
|
|
{
|
|
|
|
if (index < MAX_MOUSE_REGION)
|
|
{
|
|
mouse_region[index].enable = 1;
|
|
mouse_region[index].top = top;
|
|
mouse_region[index].left = left;
|
|
mouse_region[index].bottom = bottom;
|
|
mouse_region[index].right = right;
|
|
}
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* CheckMouseRegion *|
|
|
\*******************************************************************************/
|
|
|
|
int CheckMouseRegion (int x, int y)
|
|
{
|
|
|
|
int i;
|
|
int found;
|
|
|
|
found = 0;
|
|
|
|
for (i = 0; i < MAX_MOUSE_REGION && !found; i++)
|
|
{
|
|
if (mouse_region[i].enable &&
|
|
x <= mouse_region[i].right &&
|
|
x >= mouse_region[i].left &&
|
|
y <= mouse_region[i].bottom &&
|
|
y >= mouse_region[i].top)
|
|
found = 1;
|
|
}
|
|
if (!found)
|
|
return -1;
|
|
return (i - 1);
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* createXBMfromXPM *|
|
|
\*******************************************************************************/
|
|
void createXBMfromXPM (char *xbm, char **xpm, int sx, int sy)
|
|
{
|
|
|
|
int i, j, k;
|
|
int width, height, numcol, depth;
|
|
int zero = 0;
|
|
unsigned char bwrite;
|
|
int bcount;
|
|
int curpixel;
|
|
|
|
sscanf (*xpm, "%d %d %d %d", &width, &height, &numcol, &depth);
|
|
|
|
|
|
for (k = 0; k != depth; k++)
|
|
{
|
|
zero <<= 8;
|
|
zero |= xpm[1][k];
|
|
}
|
|
|
|
for (i = numcol + 1; i < numcol + sy + 1; i++)
|
|
{
|
|
bcount = 0;
|
|
bwrite = 0;
|
|
for (j = 0; j < sx * depth; j += depth)
|
|
{
|
|
bwrite >>= 1;
|
|
|
|
curpixel = 0;
|
|
for (k = 0; k != depth; k++)
|
|
{
|
|
curpixel <<= 8;
|
|
curpixel |= xpm[i][j + k];
|
|
}
|
|
|
|
if (curpixel != zero)
|
|
{
|
|
bwrite += 128;
|
|
}
|
|
bcount++;
|
|
if (bcount == 8)
|
|
{
|
|
*xbm = bwrite;
|
|
xbm++;
|
|
bcount = 0;
|
|
bwrite = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* copyXPMArea *|
|
|
\*******************************************************************************/
|
|
|
|
void copyXPMArea (int x, int y, int sx, int sy, int dx, int dy)
|
|
{
|
|
|
|
XCopyArea (display, wmgen.pixmap, wmgen.pixmap, NormalGC, x, y, sx, sy, dx, dy);
|
|
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* copyXBMArea *|
|
|
\*******************************************************************************/
|
|
|
|
void copyXBMArea (int x, int y, int sx, int sy, int dx, int dy)
|
|
{
|
|
|
|
XCopyArea (display, wmgen.mask, wmgen.pixmap, NormalGC, x, y, sx, sy, dx, dy);
|
|
}
|
|
|
|
|
|
/*******************************************************************************\
|
|
|* setMaskXY *|
|
|
\*******************************************************************************/
|
|
|
|
void setMaskXY (int x, int y)
|
|
{
|
|
|
|
XShapeCombineMask (display, win, ShapeBounding, x, y, pixmask, ShapeSet);
|
|
XShapeCombineMask (display, iconwin, ShapeBounding, x, y, pixmask, ShapeSet);
|
|
}
|
|
|
|
/*******************************************************************************\
|
|
|* openXwindow *|
|
|
\*******************************************************************************/
|
|
void openXwindow (int argc, char *argv[], char *pixmap_bytes[], char *pixmask_bits, int pixmask_width, int pixmask_height)
|
|
{
|
|
|
|
unsigned int borderwidth = 1;
|
|
XClassHint classHint;
|
|
char *display_name = NULL;
|
|
char *wname = argv[0];
|
|
XTextProperty name;
|
|
|
|
XGCValues gcv;
|
|
unsigned long gcm;
|
|
|
|
char *geometry = NULL;
|
|
|
|
int dummy = 0;
|
|
int i, wx, wy;
|
|
|
|
for (i = 1; argv[i]; i++)
|
|
{
|
|
if (!strcmp (argv[i], "-display"))
|
|
{
|
|
display_name = argv[i + 1];
|
|
i++;
|
|
}
|
|
if (!strcmp (argv[i], "-geometry"))
|
|
{
|
|
geometry = argv[i + 1];
|
|
i++;
|
|
}
|
|
}
|
|
|
|
if (!(display = XOpenDisplay (display_name)))
|
|
{
|
|
fprintf (stderr, "%s: can't open display %s\n",
|
|
wname, XDisplayName (display_name));
|
|
exit (1);
|
|
}
|
|
screen = DefaultScreen (display);
|
|
Root = RootWindow (display, screen);
|
|
d_depth = DefaultDepth (display, screen);
|
|
x_fd = XConnectionNumber (display);
|
|
|
|
/* Convert XPM to XImage */
|
|
GetXPM (&wmgen, pixmap_bytes);
|
|
|
|
/* Create a window to hold the stuff */
|
|
mysizehints.flags = USSize | USPosition;
|
|
mysizehints.x = 0;
|
|
mysizehints.y = 0;
|
|
|
|
back_pix = GetColor ("white");
|
|
fore_pix = GetColor ("black");
|
|
|
|
XWMGeometry (display, screen, Geometry, NULL, borderwidth, &mysizehints,
|
|
&mysizehints.x, &mysizehints.y, &mysizehints.width, &mysizehints.height, &dummy);
|
|
|
|
mysizehints.width = 64;
|
|
mysizehints.height = 64;
|
|
|
|
win = XCreateSimpleWindow (display, Root, mysizehints.x, mysizehints.y,
|
|
mysizehints.width, mysizehints.height, borderwidth, fore_pix, back_pix);
|
|
|
|
iconwin = XCreateSimpleWindow (display, win, mysizehints.x, mysizehints.y,
|
|
mysizehints.width, mysizehints.height, borderwidth, fore_pix, back_pix);
|
|
|
|
/* Activate hints */
|
|
XSetWMNormalHints (display, win, &mysizehints);
|
|
classHint.res_name = wname;
|
|
classHint.res_class = wname;
|
|
XSetClassHint (display, win, &classHint);
|
|
|
|
XSelectInput (display, win, ButtonPressMask | ExposureMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask);
|
|
XSelectInput (display, iconwin, ButtonPressMask | ExposureMask | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask);
|
|
|
|
if (XStringListToTextProperty (&wname, 1, &name) == 0)
|
|
{
|
|
fprintf (stderr, "%s: can't allocate window name\n", wname);
|
|
exit (1);
|
|
}
|
|
|
|
XSetWMName (display, win, &name);
|
|
|
|
/* Create GC for drawing */
|
|
|
|
gcm = GCForeground | GCBackground | GCGraphicsExposures;
|
|
gcv.foreground = fore_pix;
|
|
gcv.background = back_pix;
|
|
gcv.graphics_exposures = 0;
|
|
NormalGC = XCreateGC (display, Root, gcm, &gcv);
|
|
|
|
/* ONLYSHAPE ON */
|
|
|
|
pixmask = XCreateBitmapFromData (display, win, pixmask_bits, pixmask_width, pixmask_height);
|
|
|
|
XShapeCombineMask (display, win, ShapeBounding, 0, 0, pixmask, ShapeSet);
|
|
XShapeCombineMask (display, iconwin, ShapeBounding, 0, 0, pixmask, ShapeSet);
|
|
|
|
/* ONLYSHAPE OFF */
|
|
|
|
mywmhints.initial_state = WithdrawnState;
|
|
mywmhints.icon_window = iconwin;
|
|
mywmhints.icon_x = mysizehints.x;
|
|
mywmhints.icon_y = mysizehints.y;
|
|
mywmhints.window_group = win;
|
|
mywmhints.flags = StateHint | IconWindowHint | IconPositionHint | WindowGroupHint;
|
|
|
|
XSetWMHints (display, win, &mywmhints);
|
|
|
|
XSetCommand (display, win, argv, argc);
|
|
XMapWindow (display, win);
|
|
|
|
if (geometry)
|
|
{
|
|
if (sscanf (geometry, "+%d+%d", &wx, &wy) != 2)
|
|
{
|
|
fprintf (stderr, "Bad geometry string.\n");
|
|
exit (1);
|
|
}
|
|
XMoveWindow (display, win, wx, wy);
|
|
}
|
|
}
|