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