Subversion Repositories planix.SVN

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#include <u.h>
2 
#include <libc.h>
3 
#include <draw.h>
4 
#include <event.h>
5 
 
6 
char *argv0;
7 
 
8 
static void
9 
_sysfatalimpl(char *fmt, va_list arg)
10 
{
11 
	char buf[1024];
12 
 
13 
	vseprint(buf, buf+sizeof(buf), fmt, arg);
14 
	if(argv0)
15 
		fprint(2, "%s: %s\n", argv0, buf);
16 
	else
17 
		fprint(2, "%s\n", buf);
18 
	exits(buf);
19 
}
20 
 
21 
void (*_sysfatal)(char *fmt, va_list arg) = _sysfatalimpl;
22 
 
23 
void
24 
sysfatal(char *fmt, ...)
25 
{
26 
	va_list arg;
27 
 
28 
	va_start(arg, fmt);
29 
	(*_sysfatal)(fmt, arg);
30 
	va_end(arg);
31 
}
32 
 
33 
int nbit, npix;
34 
Image *pixel;
35 
Rectangle crect[256];
36 
 
37 
Image *color[256];
38 
 
39 
void
40 
eresized(int new)
41 
{
42 
	int x, y, i, n, nx, ny;
43 
	Rectangle r, b;
44 
 
45 
	if(new && getwindow(display, Refnone) < 0){
46 
		fprint(2, "colors: can't reattach to window: %r\n");
47 
		exits("resized");
48 
	}
49 
	if(screen->depth > 8){
50 
		n = 256;
51 
		nx = 16;
52 
	}else{
53 
		n = 1<<screen->depth;
54 
		nx = 1<<(screen->depth/2);
55 
	}
56 
 
57 
	ny = n/nx;
58 
	draw(screen, screen->r, display->white, nil, ZP);
59 
	r = insetrect(screen->r, 5);
60 
	r.min.y+=20;
61 
	b.max.y=r.min.y;
62 
	for(i=n-1, y=0; y!=ny; y++){
63 
		b.min.y=b.max.y;
64 
		b.max.y=r.min.y+(r.max.y-r.min.y)*(y+1)/ny;
65 
		b.max.x=r.min.x;
66 
		for(x=0; x!=nx; x++, --i){
67 
			b.min.x=b.max.x;
68 
			b.max.x=r.min.x+(r.max.x-r.min.x)*(x+1)/nx;
69 
			crect[i]=insetrect(b, 1);
70 
			draw(screen, crect[i], color[i], nil, ZP);
71 
		}
72 
	}
73 
	flushimage(display, 1);
74 
}
75 
 
76 
char *buttons[] =
77 
{
78 
	"exit",
79 
 
80 
};
81 
 
82 
ulong
83 
grey(int i)
84 
{
85 
	if(i < 0)
86 
		return grey(0);
87 
	if(i > 255)
88 
		return grey(255);
89 
	return (i<<16)+(i<<8)+i;
90 
}
91 
 
92 
Menu menu =
93 
{
94 
	buttons
95 
};
96 
 
97 
int
98 
dither[16] =  {
99 
	0, 8, 2, 10,
100 
	12, 4, 14, 6,
101 
	3, 11, 1, 9,
102 
	15, 7, 13, 5
103 
};
104 
 
105 
void
106 
main(int argc, char *argv[])
107 
{
108 
	Point p;
109 
	Mouse m;
110 
	int i, j, k, l, n, ramp, prev;
111 
	char buf[100];
112 
	char *fmt;
113 
	Image *dark;
114 
	ulong rgb;
115 
 
116 
	ramp = 0;
117 
 
118 
	fmt = "index %3d r %3lud g %3lud b %3lud 0x%.8luX        ";
119 
/*
120 
	ARGBEGIN{
121 
	default:
122 
		goto Usage;
123 
	case 'x':
124 
		fmt = "index %2luX r %3luX g %3luX b %3luX 0x%.8luX       ";
125 
		break;
126 
	case 'r':
127 
		ramp = 1;
128 
		break;
129 
	}ARGEND
130 
*/
131 
	argv0 = argv[0];
132 
	if(argc != 1){
133 
	Usage:
134 
		fprint(2, "Usage: %s [-rx]\n", argv0);
135 
		exits("usage");
136 
	}
137 
 
138 
	if(initdraw(nil, nil, "colors") < 0)
139 
		sysfatal("initdraw failed: %r");
140 
	einit(Emouse);
141 
 
142 
	for(i=0; i<256; i++){
143 
		if(ramp){
144 
			if(screen->chan == CMAP8){
145 
				/* dither the fine grey */
146 
				j = i-(i%17);
147 
				dark = allocimage(display, Rect(0,0,1,1), screen->chan, 1, (grey(j)<<8)+0xFF);
148 
				color[i] = allocimage(display, Rect(0,0,4,4), screen->chan, 1, (grey(j+17)<<8)+0xFF);
149 
				for(j=0; j<16; j++){
150 
					k = j%4;
151 
					l = j/4;
152 
					if(dither[j] > (i%17))
153 
						draw(color[i], Rect(k, l, k+1, l+1), dark, nil, ZP);
154 
				}
155 
				freeimage(dark);
156 
			}else
157 
				color[i] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, (grey(i)<<8)+0xFF);
158 
		}else
159 
			color[i] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, (cmap2rgb(i)<<8)+0xFF);
160 
		if(color[i] == nil)
161 
			sysfatal("can't allocate image: %r");
162 
	}
163 
	eresized(0);
164 
	prev = -1;
165 
	for(;;){
166 
		m = emouse();
167 
		switch(m.buttons){
168 
		case 1:
169 
			while(m.buttons){
170 
				if(screen->depth > 8)
171 
					n = 256;
172 
				else
173 
					n = 1<<screen->depth;
174 
				for(i=0; i!=n; i++)
175 
					if(i!=prev && ptinrect(m.xy, crect[i])){
176 
						if(ramp)
177 
							rgb = grey(i);
178 
						else
179 
							rgb = cmap2rgb(i);
180 
						sprint(buf, fmt,
181 
							i,
182 
							(rgb>>16)&0xFF,
183 
							(rgb>>8)&0xFF,
184 
							rgb&0xFF,
185 
							(rgb<<8) | 0xFF);
186 
						p = addpt(screen->r.min, Pt(2,2));
187 
						draw(screen, Rpt(p, addpt(p, stringsize(font, buf))), display->white, nil, p);
188 
						string(screen, p, display->black, ZP, font, buf);
189 
						prev=i;
190 
						break;
191 
					}
192 
				m = emouse();
193 
			}
194 
			break;
195 
 
196 
		case 4:
197 
			switch(emenuhit(3, &m, &menu)){
198 
			case 0:
199 
				exits(0);
200 
			}
201 
		}
202 
	}
203 
}