garbeam@2: /*
garbeam@2:  * (C)opyright MMIV-MMVI Anselm R. Garbe <garbeam at gmail dot com>
garbeam@2:  * See LICENSE file for license details.
garbeam@2:  */
garbeam@2: 
garbeam@2: #include <stdio.h>
garbeam@2: #include <string.h>
garbeam@2: 
garbeam@32: #include <X11/Xlocale.h>
garbeam@32: 
garbeam@32: #include "wm.h"
garbeam@2: 
garbeam@2: static void
garbeam@33: drawborder(Brush *b)
garbeam@2: {
garbeam@2: 	XPoint points[5];
garbeam@2: 	XSetLineAttributes(dpy, b->gc, 1, LineSolid, CapButt, JoinMiter);
garbeam@3: 	XSetForeground(dpy, b->gc, b->border);
garbeam@26: 	points[0].x = b->x;
garbeam@26: 	points[0].y = b->y;
garbeam@26: 	points[1].x = b->w - 1;
garbeam@2: 	points[1].y = 0;
garbeam@2: 	points[2].x = 0;
garbeam@26: 	points[2].y = b->h - 1;
garbeam@26: 	points[3].x = -(b->w - 1);
garbeam@2: 	points[3].y = 0;
garbeam@2: 	points[4].x = 0;
garbeam@26: 	points[4].y = -(b->h - 1);
garbeam@2: 	XDrawLines(dpy, b->drawable, b->gc, points, 5, CoordModePrevious);
garbeam@2: }
garbeam@2: 
garbeam@2: void
garbeam@33: draw(Brush *b, Bool border, const char *text)
garbeam@2: {
garbeam@33: 	int x, y, w, h;
garbeam@33: 	unsigned int len;
garbeam@2: 	static char buf[256];
garbeam@2: 	XGCValues gcv;
garbeam@26: 	XRectangle r = { b->x, b->y, b->w, b->h };
garbeam@2: 
garbeam@3: 	XSetForeground(dpy, b->gc, b->bg);
garbeam@26: 	XFillRectangles(dpy, b->drawable, b->gc, &r, 1);
garbeam@2: 
garbeam@30: 	w = 0;
garbeam@3: 	if(border)
garbeam@33: 		drawborder(b);
garbeam@2: 
garbeam@3: 	if(!text)
garbeam@2: 		return;
garbeam@2: 
garbeam@3: 	len = strlen(text);
garbeam@2: 	if(len >= sizeof(buf))
garbeam@2: 		len = sizeof(buf) - 1;
garbeam@3: 	memcpy(buf, text, len);
garbeam@2: 	buf[len] = 0;
garbeam@2: 
garbeam@3: 	h = b->font.ascent + b->font.descent;
garbeam@26: 	y = b->y + (b->h / 2) - (h / 2) + b->font.ascent;
garbeam@26: 	x = b->x + (h / 2);
garbeam@2: 
garbeam@2: 	/* shorten text if necessary */
garbeam@26: 	while(len && (w = textnw(&b->font, buf, len)) > b->w - h)
garbeam@2: 		buf[--len] = 0;
garbeam@2: 
garbeam@26: 	if(w > b->w)
garbeam@2: 		return; /* too long */
garbeam@2: 
garbeam@3: 	gcv.foreground = b->fg;
garbeam@3: 	gcv.background = b->bg;
garbeam@3: 	if(b->font.set) {
garbeam@2: 		XChangeGC(dpy, b->gc, GCForeground | GCBackground, &gcv);
garbeam@3: 		XmbDrawImageString(dpy, b->drawable, b->font.set, b->gc,
garbeam@2: 				x, y, buf, len);
garbeam@2: 	}
garbeam@2: 	else {
garbeam@3: 		gcv.font = b->font.xfont->fid;
garbeam@2: 		XChangeGC(dpy, b->gc, GCForeground | GCBackground | GCFont, &gcv);
garbeam@2: 		XDrawImageString(dpy, b->drawable, b->gc, x, y, buf, len);
garbeam@2: 	}
garbeam@2: }
garbeam@2: 
garbeam@2: static unsigned long
garbeam@33: xloadcolors(Colormap cmap, const char *colstr)
garbeam@2: {
garbeam@2: 	XColor color;
garbeam@2: 	XAllocNamedColor(dpy, cmap, colstr, &color, &color);
garbeam@2: 	return color.pixel;
garbeam@2: }
garbeam@2: 
garbeam@2: void
garbeam@33: loadcolors(int scr, Brush *b,
garbeam@2: 		const char *bg, const char *fg, const char *border)
garbeam@2: {
garbeam@33: 	Colormap cmap = DefaultColormap(dpy, scr);
garbeam@33: 	b->bg = xloadcolors(cmap, bg);
garbeam@33: 	b->fg = xloadcolors(cmap, fg);
garbeam@33: 	b->border = xloadcolors(cmap, border);
garbeam@2: }
garbeam@2: 
garbeam@2: unsigned int
garbeam@26: textnw(Fnt *font, char *text, unsigned int len)
garbeam@2: {
garbeam@26: 	XRectangle r;
garbeam@2: 	if(font->set) {
garbeam@26: 		XmbTextExtents(font->set, text, len, NULL, &r);
garbeam@2: 		return r.width;
garbeam@2: 	}
garbeam@2: 	return XTextWidth(font->xfont, text, len);
garbeam@2: }
garbeam@2: 
garbeam@2: unsigned int
garbeam@26: textw(Fnt *font, char *text)
garbeam@2: {
garbeam@26: 	return textnw(font, text, strlen(text));
garbeam@26: }
garbeam@26: 
garbeam@26: unsigned int
garbeam@26: texth(Fnt *font)
garbeam@26: {
garbeam@26: 	return font->height + 4;
garbeam@2: }
garbeam@2: 
garbeam@2: void
garbeam@33: loadfont(Fnt *font, const char *fontstr)
garbeam@2: {
garbeam@2: 	char **missing, *def;
garbeam@33: 	int i, n;
garbeam@2: 
garbeam@7: 	missing = NULL;
garbeam@2: 	setlocale(LC_ALL, "");
garbeam@2: 	if(font->set)
garbeam@2: 		XFreeFontSet(dpy, font->set);
garbeam@2: 	font->set = XCreateFontSet(dpy, fontstr, &missing, &n, &def);
garbeam@2: 	if(missing) {
garbeam@2: 		while(n--)
garbeam@2: 			fprintf(stderr, "missing fontset: %s\n", missing[n]);
garbeam@2: 		XFreeStringList(missing);
garbeam@2: 		if(font->set) {
garbeam@2: 			XFreeFontSet(dpy, font->set);
garbeam@7: 			font->set = NULL;
garbeam@2: 		}
garbeam@2: 	}
garbeam@2: 	if(font->set) {
garbeam@2: 		XFontSetExtents *font_extents;
garbeam@2: 		XFontStruct **xfonts;
garbeam@2: 		char **font_names;
garbeam@2: 
garbeam@2: 		font->ascent = font->descent = 0;
garbeam@2: 		font_extents = XExtentsOfFontSet(font->set);
garbeam@2: 		n = XFontsOfFontSet(font->set, &xfonts, &font_names);
garbeam@2: 		for(i = 0, font->ascent = 0, font->descent = 0; i < n; i++) {
garbeam@2: 			if(font->ascent < (*xfonts)->ascent)
garbeam@2: 				font->ascent = (*xfonts)->ascent;
garbeam@2: 			if(font->descent < (*xfonts)->descent)
garbeam@2: 				font->descent = (*xfonts)->descent;
garbeam@2: 			xfonts++;
garbeam@2: 		}
garbeam@2: 	}
garbeam@2: 	else {
garbeam@2: 		if(font->xfont)
garbeam@2: 			XFreeFont(dpy, font->xfont);
garbeam@7: 		font->xfont = NULL;
garbeam@2: 		font->xfont = XLoadQueryFont(dpy, fontstr);
garbeam@2: 		if (!font->xfont)
garbeam@2: 			font->xfont = XLoadQueryFont(dpy, "fixed");
garbeam@2: 		if (!font->xfont)
garbeam@2: 			error("error, cannot load 'fixed' font\n");
garbeam@2: 		font->ascent = font->xfont->ascent;
garbeam@2: 		font->descent = font->xfont->descent;
garbeam@2: 	}
garbeam@3: 	font->height = font->ascent + font->descent;
garbeam@2: }