[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]))
#define MAX(x,y) ((x)>(y)?(x):(y))

/* 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 width */
	int separator;  /* menu separator width */
};

/* 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 y;
	int h;
	size_t labellen;
	struct Item *next;
	struct Menu *submenu;
};

/* menu structure */
struct Menu {
	struct Menu *parent;
	struct Item *caller;
	struct Item *list;
	struct Item *selected;
	int x, y, w, h;
	unsigned level;
	Drawable pixmap;
	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(const char *label, const char *output);
static struct Menu *allocmenu(struct Menu *parent, struct Item *list, unsigned level);
static void getmenuitem(Window win, 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 freewindow(struct Menu *menu);
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 screengeom;

/* 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;
	geom.separator = SEPARATOR;
}

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

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

	if ((item = malloc(sizeof *item)) == NULL)
		err(1, "malloc");
	if (*label == '\0') {
		item->label = NULL;
		item->output = NULL;
	} else {
		if ((item->label = strdup(label)) == NULL)
			err(1, "strdup");
		if ((item->output = strdup(output)) == NULL)
			err(1, "strdup");
	}
	item->y = 0;
	item->h = item->label ? geom.itemh : geom.separator;
	if (item->label == NULL)
		item->labellen = 0;
	else
		item->labellen = strlen(item->label);
	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->caller = NULL;
	menu->selected = NULL;
	menu->w = geom.itemw;
	menu->h = 0;    /* calculated by calcmenu() */
	menu->x = 0;    /* calculated by calcmenu() */
	menu->y = 0;    /* calculated by calcmenu() */
	menu->level = level;

	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 | LeaveWindowMask;
	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 *curritem = NULL;   /* item currently being read */
 	struct Menu *prevmenu = NULL;   /* menu the previous item was added to */
	struct Item *item;              /* dummy item for for loops */
	struct Menu *menu;              /* dummy menu for for loops */
 	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';

		curritem = allocitem(label, output);

		if (prevmenu == NULL) {                 /* there is no menu yet */
			 menu = allocmenu(NULL, curritem, 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 (item = menu->list; item->next != NULL; item = item->next)
				;

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

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

			item->submenu = menu;
			menu->caller = item;

			prevmenu = menu;
		}
		count++;
	}
}

/* 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, &screengeom.cursx, &screengeom.cursy, &a, &b, &mask);
	screengeom.screenw = DisplayWidth(dpy, screen);
	screengeom.screenh = DisplayHeight(dpy, screen);
}

/* recursivelly calculate height and position of the menus */
static void
calcmenu(struct Menu *menu)
{
	XWindowChanges changes;
	XSizeHints sizeh;
	struct Item *item;
	int labelwidth;

	/* calculate items positions and menu width and height */
	menu->w = geom.itemw;
	for (item = menu->list; item != NULL; item = item->next) {
		item->y = menu->h;
		if (item->label == NULL)   /* height for separator item */
			menu->h += geom.separator;
		else
			menu->h += geom.itemh;

		labelwidth = XTextWidth(dc.font, item->label, item->labellen) + dc.fonth * 2;
		menu->w = MAX(menu->w, labelwidth);
	}

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

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

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

		if (screengeom.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 (screengeom.screenh - (item->y + menu->parent->y) > menu->h)
			menu->y = item->y + menu->parent->y;
		else if (screengeom.screenh - menu->parent->y > menu->h)
			menu->y = menu->parent->y;
		else if (screengeom.screenh > menu->h)
			menu->y = screengeom.screenh - menu->h;
	}

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

	/* set window manager size hints */
	sizeh.flags = PMaxSize | PMinSize;
	sizeh.min_width = sizeh.max_width = menu->w;
	sizeh.min_height = sizeh.max_height = menu->h;
	XSetWMNormalHints(dpy, menu->win, &sizeh);

	/* create pixmap */
	menu->pixmap = XCreatePixmap(dpy, menu->win, menu->w, menu->h,
	                             DefaultDepth(dpy, screen));

	/* calculate positions of submenus */
	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 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 (y >= item->y && y <= item->y + item->h) {
					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;
	struct Item *item;

	if (currmenu_new == currmenu)
		return;

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

	currmenu = currmenu_new;

	item = NULL;
	for (menu = currmenu; menu != NULL; menu = menu->parent) {
		XMapWindow(dpy, menu->win);
		if (item != NULL)
			menu->selected = item;
		item = menu->caller;
	}
}

/* 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) {
		for (item = menu->list; item != NULL; item = item->next) {
			unsigned long *color;
			int labelx, labely;

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

			/* draw item box */
			XSetForeground(dpy, dc.gc, color[ColorBG]);
			XDrawRectangle(dpy, menu->pixmap, dc.gc, 0, item->y,
			               menu->w, item->h);
			XFillRectangle(dpy, menu->pixmap, dc.gc, 0, item->y,
			               menu->w, item->h);

			/* continue if item is a separator */
			if (item->label == NULL)
				continue;

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

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

				XPoint triangle[] = {
					{trianglex, triangley},
					{trianglex + item->h/8 + 1, item->y + item->h/2},
					{trianglex, triangley + item->h/4 + 2},
					{trianglex, triangley}
				};

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

			XCopyArea(dpy, menu->pixmap, menu->win, dc.gc, 0, item->y,
			          menu->w, item->h, 0, item->y);
		}
	}
}

/* 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.y, &menu, &item);
			if (menu != NULL && item != NULL) {
				if (previtem != item) {
					if (item->submenu != NULL)
						setcurrmenu(item->submenu);
					else
						setcurrmenu(menu);
					previtem = item;
					drawmenu();
				} else if (menu->selected != item) {
					menu->selected = item;
					drawmenu();
				}
			}
			break;
		case ButtonRelease:
			getmenuitem(ev.xbutton.window, ev.xbutton.y, &menu, &item);
			if (menu != NULL && item != NULL) {
				if (item->label == NULL)
					break;  /* ignore separators */
				if (item->submenu != NULL) {
					setcurrmenu(item->submenu);
				} else {
					printf("%s\n", item->output);
					cleanupexit();
				}
				drawmenu();
			} else {
				cleanupexit();
			}
			break;
		case LeaveNotify:
			currmenu->selected = NULL;
			drawmenu();
			break;
		}
	}
}

/* recursivelly free a pixmap */
static void
freewindow(struct Menu *menu)
{
	struct Item *item;

	for (item = menu->list; item != NULL; item = item->next)
		if (item->submenu != NULL)
			freewindow(item->submenu);

	XFreePixmap(dpy, menu->pixmap);
	XDestroyWindow(dpy, menu->win);
}

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