wmgeneral.c
/* [<][>][^][v][top][bottom][index][help] */
FUNCTIONS
This source file includes following functions.
- parse_rcfile
- parse_rcfile2
- GetXPM
- GetColor
- flush_expose
- RedrawWindow
- RedrawWindowXY
- AddMouseRegion
- CheckMouseRegion
- createXBMfromXPM
- copyXPMArea
- copyXBMArea
- setMaskXY
- openXwindow
/*
* Copyright (C) 2000 Joe MacDonald (joe.macdonald@acm.org)
* Copyright (C) 1998,1999 Martijn Pieterse, Dave Clark, Pontus Klang
*
* This program is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License as published by the Free
* Software Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
* more details.
*
* You should have received a copy of the GNU General Public License along
* with this program; if not, write to the Free Software Foundation, Inc., 59
* Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* $Log: wmgeneral.c,v $
* Revision 1.3 1999/10/30 00:35:28 pontus
* makefilen + lite kodsnyggning
*
* Revision 1.2 1999/10/29 19:45:02 pontus
* First version, it seems to work fine.
*
* Revision 1.1.1.2 1999/10/29 13:24:50 pontus
* WMPLUG STARTED
*
* Revision 1.3 1999/07/19 21:31:46 dan
* Added -c option
*
* Revision 1.2 1999/06/16 01:29:24 dan
* Changed the logs to include changes made by me
*
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 */
/*****************/
static Window Root;
static int screen;
static int x_fd;
static int d_depth;
static XSizeHints mysizehints;
static XWMHints mywmhints;
static Pixel back_pix,
fore_pix;
static char *Geometry = "";
static Window iconwin,
win;
static GC NormalGC;
static XpmIcon wmgen;
static Pixmap pixmask;
/*****************/
/* Mouse Regions */
/*****************/
typedef struct
{
int enable;
int top;
int bottom;
int left;
int right;
}
MOUSE_REGION;
static 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);
/*******************************************************************************\
|* parse_rcfile
\*******************************************************************************/
void parse_rcfile (const char *filename, rckeys * keys)
/* [<][>][^][v][top][bottom][index][help] */
{
char *p,
*q;
char temp[128];
char *tokens = " :\t\n";
FILE *fp;
int i,
key;
fp = fopen (filename, "r");
if (fp)
{
while (fgets (temp, 128, fp))
{
key = 0;
q = strdup (temp);
q = strtok (q, tokens);
while (key >= 0 && keys[key].label)
{
if ((!strcmp (q, keys[key].label)))
{
p = strstr (temp, keys[key].label);
p += strlen (keys[key].label);
p += strspn (p, tokens);
if ((i = strcspn (p, "#\n")))
p[i] = 0;
free (*keys[key].var);
*keys[key].var = strdup (p);
key = -1;
}
else
key++;
}
free (q);
}
fclose (fp);
}
}
/*******************************************************************************\
|* parse_rcfile2
\*******************************************************************************/
void parse_rcfile2 (const char *filename, rckeys2 * keys)
/* [<][>][^][v][top][bottom][index][help] */
{
char *p;
char temp[128];
char *tokens = " :\t\n";
FILE *fp;
int i,
key;
char *family = NULL;
fp = fopen (filename, "r");
if (fp)
{
while (fgets (temp, 128, fp))
{
key = 0;
while (key >= 0 && keys[key].label)
{
if ((p = strstr (temp, keys[key].label)))
{
p += strlen (keys[key].label);
p += strspn (p, tokens);
if ((i = strcspn (p, "#\n")))
p[i] = 0;
free (*keys[key].var);
*keys[key].var = strdup (p);
key = -1;
}
else
key++;
}
}
fclose (fp);
}
free (family);
}
/*******************************************************************************\
|* GetXPM
\*******************************************************************************/
static void GetXPM (XpmIcon * wmgen, char *pixmap_bytes[])
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
XEvent dummy;
int i = 0;
while (XCheckTypedWindowEvent (display, w, Expose, &dummy))
i++;
return i;
}
/*******************************************************************************\
|* RedrawWindow
\*******************************************************************************/
void RedrawWindow (void)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
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)
/* [<][>][^][v][top][bottom][index][help] */
{
XCopyArea (display, wmgen.mask, wmgen.pixmap, NormalGC, x, y, sx, sy, dx,
dy);
}
/*******************************************************************************\
|* setMaskXY *|
\*******************************************************************************/
void setMaskXY (int x, int y)
/* [<][>][^][v][top][bottom][index][help] */
{
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[],
/* [<][>][^][v][top][bottom][index][help] */
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 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);
}
}