Re: [9front] mothra: proposal

[umbraticus@prosimetrum.com]

Default colours work for me, and I haven't checked out how libtheme
works, but it occured to me that programs often have an array of
colours, which you could prime with an rc list thus:

; colours = (ff aaaaaaff ffffffff) myprog	# -b

Sure, you need to look at the source to work out which colour is
which, but you don't have to edit it and recompile, just put your
weird preferences in a script.  If that's what you're into.
envcolours() could go in the lib... eg: (excuse my spelling)

#include <u.h>
#include <libc.h>
#include <draw.h>
enum{ONE, TWO, THREE, NCOL};
ulong rgb[NCOL] = {[ONE] 0xff0000ff, [TWO] 0x00ff00ff, [THREE] 0x0000ffff};
void envcolours(Image **a, int n){
	char *s;
	int i;
	if(s = getenv("colours"))
		for(i = 0, s = strtok(s, " "); i < n && s != nil; i++, s = strtok(nil, " "))
			rgb[i] = strtoul(s, nil, 16);
}
void main(int, char**){
	Image *col[NCOL];
	Rectangle r;
	int i;
	if(initdraw(nil, nil, "colours") < 0) sysfatal("initdraw: %r");
	r = Rect(0, 0, 1, 1);
	envcolours(col, NCOL);
	for(i = 0; i < NCOL; i++)
		if((col[i] = allocimage(display, Rect(0,0,1,1), RGBA32, 1, rgb[i])) == nil)
			sysfatal("allocimage: %r");
	r = screen->r;
	i = Dy(r) / 6;
	draw(screen, r, col[ONE], nil, ZP);
	r = insetrect(r, i);
	draw(screen, r, col[TWO], nil, ZP);
	r = insetrect(r, i);
	draw(screen, r, col[THREE], nil, ZP);
	flushimage(display, 1);
	sleep(5000);
}

umbraticus