[xmenu] / xmenu.c

#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <X11/Xlib.h>
#include <X11/Xutil.h>

/* macros */
#define LEN(x) (sizeof (x) / sizeof (x[0]))

/* color enum */
enum {ColorFG, ColorBG, ColorLast};

/* draw context structure */
struct DC {
	unsigned long unpressed[ColorLast];
	unsigned long pressed[ColorLast];
	unsigned long decoration[ColorLast];

	Drawable d;
	GC gc;
	XFontStruct *font;
	int fonth;
};

/* menu geometry structure */
struct Geometry {
	int itemb;      /* item border */
	int itemw;      /* item width */
	int itemh;      /* item height */
	int border;     /* window border */
};

/* screen geometry structure */
struct ScreenGeometry {
	int cursx, cursy;       /* cursor position */
	int screenw, screenh;   /* screen width and height */
};

/* menu item structure */
struct Item {
	char *label;
	char *output;
	int x, y;
	struct Item *next;
	struct Menu *submenu;
};

/* menu structure */
struct Menu {
	struct Menu *parent;
	struct Item *list;
	struct Item *selected;
	int x, y, w, h;
	unsigned level;
	unsigned nitems;
	Window win;
};

/* function declarations */
static unsigned long getcolor(const char *s);
static void setupdc(void);
static void setupgeom(void);
static void setupgrab(void);
static struct Item *allocitem(size_t count, const char *label, const char *output);
static struct Menu *allocmenu(struct Menu *parent, struct Item *list, unsigned level);
static void getmenuitem(Window win, int x, int y,
                        struct Menu **menu_ret, struct Item **item_ret);
static void drawmenu(void);
static void calcscreengeom(void);
static void calcmenu(struct Menu *menu);
static void setcurrmenu(struct Menu *currmenu_new);
static void parsestdin(void);
static void run(void);
static void cleanupexit(void);
static void usage(void);

/* X variables */
static Colormap colormap;
static Display *dpy;
static Window rootwin;
static int screen;
static struct DC dc;

/* menu variables */
static struct Menu *rootmenu = NULL;
static struct Menu *currmenu = NULL;

/* geometry variables */
static struct Geometry geom;
static struct ScreenGeometry sgeom;

/* flag variables */
static Bool override_redirect = True;

#include "config.h"

int
main(int argc, char *argv[])
{
	int ch;

	while ((ch = getopt(argc, argv, "w")) != -1) {
		switch (ch) {
		case 'w':
			override_redirect = False;
			break;
		default:
			usage();
			break;
		}
	}
	argc -= optind;
	argv += optind;

	/* open connection to server and set X variables */
	if ((dpy = XOpenDisplay(NULL)) == NULL)
		errx(1, "cannot open display");
	screen = DefaultScreen(dpy);
	rootwin = RootWindow(dpy, screen);
	colormap = DefaultColormap(dpy, screen);

	/* setup */
	setupdc();
	setupgeom();
	setupgrab();

	/* generate menus and recalculate them */
	parsestdin();
	if (rootmenu == NULL)
		errx(1, "no menu generated");
	calcscreengeom();
	calcmenu(rootmenu);

	/* run event loop */
	run();

	return 1;   /* UNREACHABLE */
}

/* get color from color string */
static unsigned long
getcolor(const char *s)
{
	XColor color;

	if(!XAllocNamedColor(dpy, colormap, s, &color, &color))
		errx(1, "cannot allocate color: %s", s);
	return color.pixel;
}

/* init draw context */
static void
setupdc(void)
{
	/* get color pixels */
	dc.unpressed[ColorBG] = getcolor(UNPRESSEDBG);
	dc.unpressed[ColorFG] = getcolor(UNPRESSEDFG);
	dc.pressed[ColorBG] = getcolor(PRESSEDBG);
	dc.pressed[ColorFG] = getcolor(PRESSEDFG);
	dc.decoration[ColorBG] = getcolor(DECORATIONBG);
	dc.decoration[ColorFG] = getcolor(DECORATIONFG);

	/* try to get font */
	if ((dc.font = XLoadQueryFont(dpy, FONT)) == NULL)
		errx(1, "cannot load font");
	dc.fonth = dc.font->ascent + dc.font->descent;

	/* create GC and set its font */
	dc.gc = XCreateGC(dpy, rootwin, 0, NULL);
	XSetFont(dpy, dc.gc, dc.font->fid);
}

/* init menu geometry values */
static void
setupgeom(void)
{
	geom.itemb = ITEMB;
	geom.itemh = dc.fonth + ITEMB * 2;
	geom.itemw = ITEMW;
	geom.border = BORDER;
}

/* grab pointer */
static void
setupgrab(void)
{
	XGrabPointer(dpy, rootwin, True, ButtonPressMask | ButtonReleaseMask,
	             GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
}

/* allocate an item */
static struct Item *
allocitem(size_t count, const char *label, const char *output)
{
	struct Item *item;

	if ((item = malloc(sizeof *item)) == NULL)
		err(1, "malloc");
	if ((item->label = strdup(label)) == NULL)
		err(1, "strdup");
	if ((item->output = strdup(output)) == NULL)
		err(1, "strdup");
	item->x = 0;
	item->y = count * geom.itemh;
	item->next = NULL;
	item->submenu = NULL;

	return item;
}

/* allocate a menu */
static struct Menu *
allocmenu(struct Menu *parent, struct Item *list, unsigned level)
{
	XSetWindowAttributes swa;
	struct Menu *menu;

	if ((menu = malloc(sizeof *menu)) == NULL)
		err(1, "malloc");
	menu->parent = parent;
	menu->list = list;
	menu->selected = NULL;
	menu->x = 0;
	menu->y = 0;
	menu->w = geom.itemw;
	menu->h = geom.itemh;
	menu->level = level;
	menu->nitems = 0;

	swa.override_redirect = override_redirect;
	swa.background_pixel = dc.decoration[ColorBG];
	swa.border_pixel = dc.decoration[ColorFG];
	swa.event_mask = ExposureMask | KeyPressMask | ButtonPressMask | ButtonReleaseMask
	               | PointerMotionMask;
	menu->win = XCreateWindow(dpy, rootwin, 0, 0, geom.itemw, geom.itemh, geom.border,
	                          CopyFromParent, CopyFromParent, CopyFromParent,
	                          CWOverrideRedirect | CWBackPixel | CWBorderPixel | CWEventMask,
	                          &swa);

	return menu;
}

/* create menus and items from the stdin */
static void
parsestdin(void)
{
	char *s, buf[BUFSIZ];
	char *label, *output;
	unsigned level = 0;
	unsigned i;
	struct Item *item, *p;
	struct Menu *menu;
 	struct Menu *prevmenu = NULL;
 	size_t count = 0;   /* number of items in the current menu */

	while (fgets(buf, BUFSIZ, stdin) != NULL) {
		level = 0;
		s = buf;

		while (*s == '\t') {
			level++;
			s++;
		}

		label = output = s;

		while (*s != '\0' && *s != '\t' && *s != '\n')
			s++;

		while (*s == '\t')
			*s++ = '\0';

		if (*s != '\0' && *s != '\n')
			output = s;

		while (*s != '\0' && *s != '\n')
			s++;

		if (*s == '\n')
			*s = '\0';

		item = allocitem(count, label, output);

		if (prevmenu == NULL) {                 /* there is no menu yet */
			 menu = allocmenu(NULL, item, level);
			 rootmenu = menu;
			 prevmenu = menu;
			 count = 1;
		} else if (level < prevmenu->level) {   /* item is continuation of a parent menu*/
			for (menu = prevmenu, i = level;
			      menu != NULL && i < prevmenu->level;
			      menu = menu->parent, i++)
				;

			if (menu == NULL)
				errx(1, "reached NULL menu");

			for (p = menu->list; p->next != NULL; p = p->next)
				;

			p->next = item;
			prevmenu = menu;
		} else if (level == prevmenu->level) {  /* item is a continuation of current menu */
			for (p = prevmenu->list; p->next != NULL; p = p->next)
				;
			p->next = item;
		} else if (level > prevmenu->level) {   /* item begins a new menu */
			menu = allocmenu(prevmenu, item, level);

			for (p = prevmenu->list; p->next != NULL; p = p->next)
				;

			p->submenu = menu;

			prevmenu = menu;
		}
	}
}

/* calculate screen geometry */
static void
calcscreengeom(void)
{
	Window w1, w2;  /* unused variables */
	int a, b;       /* unused variables */
	unsigned mask;  /* unused variable */

	XQueryPointer(dpy, rootwin, &w1, &w2, &sgeom.cursx, &sgeom.cursy, &a, &b, &mask);
	sgeom.screenw = DisplayWidth(dpy, screen);
	sgeom.screenh = DisplayHeight(dpy, screen);
}

/* recursivelly calculate height and position of the menus */
static void
calcmenu(struct Menu *menu)
{
	XWindowChanges changes;
	struct Item *item, *p;
	size_t i;

	/* calculate number of items */
	i = 0;
	for (item = menu->list; item != NULL; item = item->next)
		i++;
	menu->nitems = i;
	menu->h = geom.itemh * i;

	/* calculate menu's x and y positions */
	if (menu->parent == NULL) { /* if root menu, calculate in respect to cursor */
		if (sgeom.screenw - sgeom.cursx >= menu->w)
			menu->x = sgeom.cursx;
		else if (sgeom.cursx > menu->w)
			menu->x = sgeom.cursx - menu->w;

		if (sgeom.screenh - sgeom.cursy >= menu->h)
			menu->y = sgeom.cursy;
		else if (sgeom.screenh > menu->h)
			menu->y = sgeom.screenh - menu->h;
	} else {                    /* else, calculate in respect to parent menu */

		/* search for the item in parent menu that generates this menu */
		for (p = menu->parent->list; p->submenu != menu; p = p->next)
			;

		if (sgeom.screenw - (menu->parent->x + menu->parent->w) >= menu->w)
			menu->x = menu->parent->x + menu->parent->w;
		else if (menu->parent->x > menu->w)
			menu->x = menu->parent->x - menu->w;

		if (sgeom.screenh - p->y > menu->h)
			menu->y = p->y;
		else if (sgeom.screenh - menu->parent->y > menu->h)
			menu->y = menu->parent->y;
		else if (sgeom.screenh > menu->h)
			menu->y = sgeom.screenh - menu->h;
	}

	/* calculate position of each item in the menu */
	for (i = 0, item = menu->list; item != NULL; item = item->next, i++) {
		item->x = menu->x;
		item->y = menu->y + i * geom.itemh;
	}

	/* update menu geometry */
	changes.height = menu->h;
	changes.x = menu->x;
	changes.y = menu->y;
	XConfigureWindow(dpy, menu->win, CWHeight | CWX | CWY, &changes);

	for (item = menu->list; item != NULL; item = item->next) {
		if (item->submenu != NULL)
			calcmenu(item->submenu);
	}
}

/* get menu and item of given window and position */
static void
getmenuitem(Window win, int x, int y,
            struct Menu **menu_ret, struct Item **item_ret)
{
	struct Menu *menu = NULL;
	struct Item *item = NULL;

	for (menu = currmenu; menu != NULL; menu = menu->parent) {
		if (menu->win == win) {
			for (item = menu->list; item != NULL; item = item->next) {
				if (x >= item->x && x <= item->x + geom.itemw &&
				    y >= item->y && y <= item->y + geom.itemh) {
					goto done;
				}
			}
		}
	}


done:
	*menu_ret = menu;
	*item_ret = item;
}

/* set currentmenu to menu, umap previous menus and map current menu and its parents */
static void
setcurrmenu(struct Menu *currmenu_new)
{
	struct Menu *menu;

	if (currmenu_new == currmenu)
		return;

	for (menu = currmenu; menu != NULL; menu = menu->parent) {
		XUnmapWindow(dpy, menu->win);
	}

	currmenu = currmenu_new;

	for (menu = currmenu; menu != NULL; menu = menu->parent)
		XMapWindow(dpy, menu->win);
}

/* draw items of the current menu and of its ancestors */
static void
drawmenu(void)
{
	struct Menu *menu;
	struct Item *item;

	for (menu = currmenu; menu != NULL; menu = menu->parent) {
		size_t nitems;      /* number of items before current item */

		nitems = 0;
		for (item = menu->list; item != NULL; item = item->next) {
			unsigned long *color;
			size_t labellen;
			int labelx, labely;
			int y;

			/* determine item color */
			if (item == menu->selected)
				color = dc.pressed;
			else
				color = dc.unpressed;

			/* calculate item's y position */
			y = nitems * geom.itemh;

			/* draw item box */
			XSetForeground(dpy, dc.gc, color[ColorBG]);
			XFillRectangle(dpy, menu->win, dc.gc, 0, y,
			               geom.itemw, geom.itemh);

			/* draw item label */
			labellen = strlen(item->label);
			labelx = 0 + dc.fonth;
			labely = y + dc.fonth + geom.itemb;
			XSetForeground(dpy, dc.gc, color[ColorFG]);
			XDrawString(dpy, menu->win, dc.gc, labelx, labely, item->label, labellen);

			/* draw triangle, if item contains a submenu */
			if (item->submenu != NULL) {
				int trianglex = geom.itemw - (geom.itemb + dc.fonth);
				int triangley = y + geom.itemb;

				XPoint triangle[] = {
					{trianglex, triangley},
					{trianglex + dc.fonth, triangley + dc.fonth/2},
					{trianglex, triangley + dc.fonth},
					{trianglex, triangley}
				};

				XFillPolygon(dpy, menu->win, dc.gc, triangle, LEN(triangle),
				             Convex, CoordModeOrigin);
			}

			nitems++;
		}
	}
}

/* run event loop */
static void
run(void)
{
	struct Menu *menu;
	struct Item *item;
	struct Item *previtem = NULL;
	XEvent ev;

	setcurrmenu(rootmenu);

	while (!XNextEvent(dpy, &ev)) {
		switch(ev.type) {
		case Expose:
			drawmenu();
			break;
		case MotionNotify:
			getmenuitem(ev.xbutton.window, ev.xbutton.x_root, ev.xbutton.y_root,
			            &menu, &item);
			if (menu != NULL && item != NULL) {
				if (previtem != item) {
					if (item->submenu != NULL)
						setcurrmenu(item->submenu);
					else
						setcurrmenu(menu);
					previtem = item;
				} else if (menu->selected != item)
					menu->selected = item;
			}
			drawmenu();
			break;
		case ButtonRelease:
			getmenuitem(ev.xbutton.window, ev.xbutton.x_root, ev.xbutton.y_root,
			            &menu, &item);
			if (menu != NULL && item != NULL) {
				if (item->submenu != NULL) {
					setcurrmenu(item->submenu);
				} else {
					printf("%s\n", item->output);
					cleanupexit();
				}
				drawmenu();
			} else {
				cleanupexit();
			}
			break;
		}
	}
}

/* cleanup and exit */
static void
cleanupexit(void)
{
	XCloseDisplay(dpy);
	exit(0);
}

/* show usage */
static void
usage(void)
{
	(void)fprintf(stderr, "usage: xmenu [-w] menuname\n");
	exit(1);
}
Commit	Line	Data
a7732690	1	#include <err.h>
	2	#include <stdio.h>
	3	#include <stdlib.h>
	4	#include <string.h>
	5	#include <unistd.h>
	6	#include <X11/Xlib.h>
	7	#include <X11/Xutil.h>
	8
	9	/* macros */
	10	#define LEN(x) (sizeof (x) / sizeof (x[0]))
	11
	12	/* color enum */
	13	enum {ColorFG, ColorBG, ColorLast};
	14
	15	/* draw context structure */
	16	struct DC {
	17	unsigned long unpressed[ColorLast];
	18	unsigned long pressed[ColorLast];
	19	unsigned long decoration[ColorLast];
	20
	21	Drawable d;
	22	GC gc;
	23	XFontStruct *font;
	24	int fonth;
	25	};
	26
	27	/* menu geometry structure */
	28	struct Geometry {
	29	int itemb; /* item border */
	30	int itemw; /* item width */
	31	int itemh; /* item height */
	32	int border; /* window border */
	33	};
	34
	35	/* screen geometry structure */
	36	struct ScreenGeometry {
	37	int cursx, cursy; /* cursor position */
	38	int screenw, screenh; /* screen width and height */
	39	};
	40
	41	/* menu item structure */
	42	struct Item {
	43	char *label;
	44	char *output;
	45	int x, y;
	46	struct Item *next;
	47	struct Menu *submenu;
	48	};
	49
	50	/* menu structure */
	51	struct Menu {
	52	struct Menu *parent;
	53	struct Item *list;
	54	struct Item *selected;
	55	int x, y, w, h;
	56	unsigned level;
	57	unsigned nitems;
	58	Window win;
	59	};
	60
	61	/* function declarations */
	62	static unsigned long getcolor(const char *s);
	63	static void setupdc(void);
	64	static void setupgeom(void);
65	static void setupgrab(void);
66	static struct Item allocitem(size_t count, const char label, const char *output);
67	static struct Menu allocmenu(struct Menu parent, struct Item *list, unsigned level);
68	static void getmenuitem(Window win, int x, int y,
69	struct Menu menu_ret, struct Item item_ret);
70	static void drawmenu(void);
71	static void calcscreengeom(void);
72	static void calcmenu(struct Menu *menu);
73	static void setcurrmenu(struct Menu *currmenu_new);
74	static void parsestdin(void);
75	static void run(void);
76	static void cleanupexit(void);
77	static void usage(void);
78
79	/* X variables */
80	static Colormap colormap;
81	static Display *dpy;
82	static Window rootwin;
83	static int screen;
84	static struct DC dc;
85
86	/* menu variables */
87	static struct Menu *rootmenu = NULL;
88	static struct Menu *currmenu = NULL;
89
90	/* geometry variables */
91	static struct Geometry geom;
92	static struct ScreenGeometry sgeom;
93
94	/* flag variables */
95	static Bool override_redirect = True;
96
97	#include "config.h"
98
99	int
100	main(int argc, char *argv[])
101	{
102	int ch;
103
104	while ((ch = getopt(argc, argv, "w")) != -1) {
105	switch (ch) {
106	case 'w':
107	override_redirect = False;
108	break;
109	default:
110	usage();
111	break;
112	}
113	}
114	argc -= optind;
115	argv += optind;
116
117	/* open connection to server and set X variables */
118	if ((dpy = XOpenDisplay(NULL)) == NULL)
119	errx(1, "cannot open display");
120	screen = DefaultScreen(dpy);
121	rootwin = RootWindow(dpy, screen);
122	colormap = DefaultColormap(dpy, screen);
123
124	/* setup */
125	setupdc();
126	setupgeom();
127	setupgrab();
128
129	/* generate menus and recalculate them */
130	parsestdin();
131	if (rootmenu == NULL)
132	errx(1, "no menu generated");
133	calcscreengeom();
134	calcmenu(rootmenu);
135
136	/* run event loop */
137	run();
138
139	return 1; /* UNREACHABLE */
140	}
141
142	/* get color from color string */
143	static unsigned long
144	getcolor(const char *s)
145	{
146	XColor color;
147
148	if(!XAllocNamedColor(dpy, colormap, s, &color, &color))
149	errx(1, "cannot allocate color: %s", s);
150	return color.pixel;
151	}
152
153	/* init draw context */
154	static void
155	setupdc(void)
156	{
157	/* get color pixels */
158	dc.unpressed[ColorBG] = getcolor(UNPRESSEDBG);
159	dc.unpressed[ColorFG] = getcolor(UNPRESSEDFG);
160	dc.pressed[ColorBG] = getcolor(PRESSEDBG);
161	dc.pressed[ColorFG] = getcolor(PRESSEDFG);
162	dc.decoration[ColorBG] = getcolor(DECORATIONBG);
163	dc.decoration[ColorFG] = getcolor(DECORATIONFG);
164
165	/* try to get font */
166	if ((dc.font = XLoadQueryFont(dpy, FONT)) == NULL)
167	errx(1, "cannot load font");
168	dc.fonth = dc.font->ascent + dc.font->descent;
169
170	/* create GC and set its font */
171	dc.gc = XCreateGC(dpy, rootwin, 0, NULL);
172	XSetFont(dpy, dc.gc, dc.font->fid);
173	}
174
175	/* init menu geometry values */
176	static void
177	setupgeom(void)
178	{
179	geom.itemb = ITEMB;
180	geom.itemh = dc.fonth + ITEMB * 2;
181	geom.itemw = ITEMW;
182	geom.border = BORDER;
183	}
184
185	/* grab pointer */
186	static void
187	setupgrab(void)
188	{
189	XGrabPointer(dpy, rootwin, True, ButtonPressMask \| ButtonReleaseMask,
190	GrabModeAsync, GrabModeAsync, None, None, CurrentTime);
191	}
192
193	/* allocate an item */
194	static struct Item *
195	allocitem(size_t count, const char label, const char output)
196	{
197	struct Item *item;
198
199	if ((item = malloc(sizeof *item)) == NULL)
200	err(1, "malloc");
201	if ((item->label = strdup(label)) == NULL)
202	err(1, "strdup");
203	if ((item->output = strdup(output)) == NULL)
204	err(1, "strdup");
205	item->x = 0;
206	item->y = count * geom.itemh;
207	item->next = NULL;
208	item->submenu = NULL;
209
210	return item;
211	}
212
213	/* allocate a menu */
214	static struct Menu *
215	allocmenu(struct Menu parent, struct Item list, unsigned level)
216	{
217	XSetWindowAttributes swa;
218	struct Menu *menu;
219
220	if ((menu = malloc(sizeof *menu)) == NULL)
221	err(1, "malloc");
222	menu->parent = parent;
223	menu->list = list;
224	menu->selected = NULL;
225	menu->x = 0;
226	menu->y = 0;
227	menu->w = geom.itemw;
228	menu->h = geom.itemh;
229	menu->level = level;
230	menu->nitems = 0;
231
232	swa.override_redirect = override_redirect;
233	swa.background_pixel = dc.decoration[ColorBG];
234	swa.border_pixel = dc.decoration[ColorFG];
235	swa.event_mask = ExposureMask \| KeyPressMask \| ButtonPressMask \| ButtonReleaseMask
236	\| PointerMotionMask;
237	menu->win = XCreateWindow(dpy, rootwin, 0, 0, geom.itemw, geom.itemh, geom.border,
238	CopyFromParent, CopyFromParent, CopyFromParent,
239	CWOverrideRedirect \| CWBackPixel \| CWBorderPixel \| CWEventMask,
240	&swa);
241
242	return menu;
243	}
244
245	/* create menus and items from the stdin */
246	static void
247	parsestdin(void)
248	{
249	char *s, buf[BUFSIZ];
250	char label, output;
251	unsigned level = 0;
252	unsigned i;
253	struct Item item, p;
254	struct Menu *menu;
255	struct Menu *prevmenu = NULL;
256	size_t count = 0; /* number of items in the current menu */
257
258	while (fgets(buf, BUFSIZ, stdin) != NULL) {
259	level = 0;
260	s = buf;
261
262	while (*s == '\t') {
263	level++;
264	s++;
265	}
266
267	label = output = s;
268
269	while (s != '\0' && s != '\t' && *s != '\n')
270	s++;
271
272	while (*s == '\t')
273	*s++ = '\0';
274
275	if (s != '\0' && s != '\n')
276	output = s;
277
278	while (s != '\0' && s != '\n')
279	s++;
280
281	if (*s == '\n')
282	*s = '\0';
283
284	item = allocitem(count, label, output);
285
286	if (prevmenu == NULL) { /* there is no menu yet */
287	menu = allocmenu(NULL, item, level);
288	rootmenu = menu;
289	prevmenu = menu;
290	count = 1;
291	} else if (level < prevmenu->level) { /* item is continuation of a parent menu*/
292	for (menu = prevmenu, i = level;
293	menu != NULL && i < prevmenu->level;
294	menu = menu->parent, i++)
295	;
296
297	if (menu == NULL)
298	errx(1, "reached NULL menu");
299
300	for (p = menu->list; p->next != NULL; p = p->next)
301	;
302
303	p->next = item;
304	prevmenu = menu;
305	} else if (level == prevmenu->level) { /* item is a continuation of current menu */
306	for (p = prevmenu->list; p->next != NULL; p = p->next)
307	;
308	p->next = item;
309	} else if (level > prevmenu->level) { /* item begins a new menu */
310	menu = allocmenu(prevmenu, item, level);
311
312	for (p = prevmenu->list; p->next != NULL; p = p->next)
313	;
314
315	p->submenu = menu;
316
317	prevmenu = menu;
318	}
319	}
320	}
321
322	/* calculate screen geometry */
323	static void
324	calcscreengeom(void)
325	{
326	Window w1, w2; /* unused variables */
327	int a, b; /* unused variables */
328	unsigned mask; /* unused variable */
329
330	XQueryPointer(dpy, rootwin, &w1, &w2, &sgeom.cursx, &sgeom.cursy, &a, &b, &mask);
331	sgeom.screenw = DisplayWidth(dpy, screen);
332	sgeom.screenh = DisplayHeight(dpy, screen);
333	}
334
335	/* recursivelly calculate height and position of the menus */
336	static void
337	calcmenu(struct Menu *menu)
338	{
339	XWindowChanges changes;
340	struct Item item, p;
341	size_t i;
342
343	/* calculate number of items */
344	i = 0;
345	for (item = menu->list; item != NULL; item = item->next)
346	i++;
347	menu->nitems = i;
348	menu->h = geom.itemh * i;
349
350	/* calculate menu's x and y positions */
351	if (menu->parent == NULL) { /* if root menu, calculate in respect to cursor */
352	if (sgeom.screenw - sgeom.cursx >= menu->w)
353	menu->x = sgeom.cursx;
354	else if (sgeom.cursx > menu->w)
355	menu->x = sgeom.cursx - menu->w;
356
357	if (sgeom.screenh - sgeom.cursy >= menu->h)
358	menu->y = sgeom.cursy;
359	else if (sgeom.screenh > menu->h)
360	menu->y = sgeom.screenh - menu->h;
361	} else { /* else, calculate in respect to parent menu */
362
363	/* search for the item in parent menu that generates this menu */
364	for (p = menu->parent->list; p->submenu != menu; p = p->next)
365	;
366
367	if (sgeom.screenw - (menu->parent->x + menu->parent->w) >= menu->w)
368	menu->x = menu->parent->x + menu->parent->w;
369	else if (menu->parent->x > menu->w)
370	menu->x = menu->parent->x - menu->w;
371
372	if (sgeom.screenh - p->y > menu->h)
373	menu->y = p->y;
374	else if (sgeom.screenh - menu->parent->y > menu->h)
375	menu->y = menu->parent->y;
376	else if (sgeom.screenh > menu->h)
377	menu->y = sgeom.screenh - menu->h;
378	}
379
380	/* calculate position of each item in the menu */
381	for (i = 0, item = menu->list; item != NULL; item = item->next, i++) {
382	item->x = menu->x;
383	item->y = menu->y + i * geom.itemh;
384	}
385
386	/* update menu geometry */
387	changes.height = menu->h;
388	changes.x = menu->x;
389	changes.y = menu->y;
390	XConfigureWindow(dpy, menu->win, CWHeight \| CWX \| CWY, &changes);
391
392	for (item = menu->list; item != NULL; item = item->next) {
393	if (item->submenu != NULL)
394	calcmenu(item->submenu);
395	}
396	}
397
398	/* get menu and item of given window and position */
399	static void
400	getmenuitem(Window win, int x, int y,
401	struct Menu menu_ret, struct Item item_ret)
402	{
403	struct Menu *menu = NULL;
404	struct Item *item = NULL;
405
406	for (menu = currmenu; menu != NULL; menu = menu->parent) {
407	if (menu->win == win) {
408	for (item = menu->list; item != NULL; item = item->next) {
409	if (x >= item->x && x <= item->x + geom.itemw &&
410	y >= item->y && y <= item->y + geom.itemh) {
411	goto done;
412	}
413	}
414	}
415	}
416
417
418	done:
419	*menu_ret = menu;
420	*item_ret = item;
421	}
422
423	/* set currentmenu to menu, umap previous menus and map current menu and its parents */
424	static void
425	setcurrmenu(struct Menu *currmenu_new)
426	{
427	struct Menu *menu;
428
429	if (currmenu_new == currmenu)
430	return;
431
432	for (menu = currmenu; menu != NULL; menu = menu->parent) {
433	XUnmapWindow(dpy, menu->win);
434	}
435
436	currmenu = currmenu_new;
437
438	for (menu = currmenu; menu != NULL; menu = menu->parent)
439	XMapWindow(dpy, menu->win);
440	}
441
442	/* draw items of the current menu and of its ancestors */
443	static void
444	drawmenu(void)
445	{
446	struct Menu *menu;
447	struct Item *item;
448
449	for (menu = currmenu; menu != NULL; menu = menu->parent) {
450	size_t nitems; /* number of items before current item */
451
452	nitems = 0;
453	for (item = menu->list; item != NULL; item = item->next) {
454	unsigned long *color;
455	size_t labellen;
456	int labelx, labely;
457	int y;
458
459	/* determine item color */
460	if (item == menu->selected)
461	color = dc.pressed;
462	else
463	color = dc.unpressed;
464
465	/* calculate item's y position */
466	y = nitems * geom.itemh;
467
468	/* draw item box */
469	XSetForeground(dpy, dc.gc, color[ColorBG]);
470	XFillRectangle(dpy, menu->win, dc.gc, 0, y,
471	geom.itemw, geom.itemh);
472
473	/* draw item label */
474	labellen = strlen(item->label);
475	labelx = 0 + dc.fonth;
476	labely = y + dc.fonth + geom.itemb;
477	XSetForeground(dpy, dc.gc, color[ColorFG]);
478	XDrawString(dpy, menu->win, dc.gc, labelx, labely, item->label, labellen);
479
480	/* draw triangle, if item contains a submenu */
481	if (item->submenu != NULL) {
482	int trianglex = geom.itemw - (geom.itemb + dc.fonth);
483	int triangley = y + geom.itemb;
484
485	XPoint triangle[] = {
486	{trianglex, triangley},
487	{trianglex + dc.fonth, triangley + dc.fonth/2},
488	{trianglex, triangley + dc.fonth},
489	{trianglex, triangley}
490	};
491
492	XFillPolygon(dpy, menu->win, dc.gc, triangle, LEN(triangle),
493	Convex, CoordModeOrigin);
494	}
495
496	nitems++;
497	}
498	}
499	}
500
501	/* run event loop */
502	static void
503	run(void)
504	{
505	struct Menu *menu;
506	struct Item *item;
507	struct Item *previtem = NULL;
508	XEvent ev;
509
510	setcurrmenu(rootmenu);
511
512	while (!XNextEvent(dpy, &ev)) {
513	switch(ev.type) {
514	case Expose:
515	drawmenu();
516	break;
517	case MotionNotify:
518	getmenuitem(ev.xbutton.window, ev.xbutton.x_root, ev.xbutton.y_root,
519	&menu, &item);
520	if (menu != NULL && item != NULL) {
521	if (previtem != item) {
522	if (item->submenu != NULL)
523	setcurrmenu(item->submenu);
524	else
525	setcurrmenu(menu);
526	previtem = item;
527	} else if (menu->selected != item)
528	menu->selected = item;
529	}
530	drawmenu();
531	break;
532	case ButtonRelease:
533	getmenuitem(ev.xbutton.window, ev.xbutton.x_root, ev.xbutton.y_root,
534	&menu, &item);
535	if (menu != NULL && item != NULL) {
536	if (item->submenu != NULL) {
537	setcurrmenu(item->submenu);
538	} else {
539	printf("%s\n", item->output);
540	cleanupexit();
541	}
542	drawmenu();
543	} else {
544	cleanupexit();
545	}
546	break;
547	}
548	}
549	}
550
551	/* cleanup and exit */
552	static void
553	cleanupexit(void)
554	{
555	XCloseDisplay(dpy);
556	exit(0);
557	}
558
559	/* show usage */
560	static void
561	usage(void)
562	{
563	(void)fprintf(stderr, "usage: xmenu [-w] menuname\n");
564	exit(1);
565	}