1 76193d7c 2003-09-30 devnull #include <u.h>
 2 76193d7c 2003-09-30 devnull #include <libc.h>
 3 76193d7c 2003-09-30 devnull #include <draw.h>
 4 76193d7c 2003-09-30 devnull 
 5 76193d7c 2003-09-30 devnull static char channames[] = "rgbkamx";
 6 76193d7c 2003-09-30 devnull char*
 7 76193d7c 2003-09-30 devnull chantostr(char *buf, u32int cc)
 8 76193d7c 2003-09-30 devnull {
 9 76193d7c 2003-09-30 devnull 	u32int c, rc;
10 76193d7c 2003-09-30 devnull 	char *p;
11 76193d7c 2003-09-30 devnull 
12 76193d7c 2003-09-30 devnull 	if(chantodepth(cc) == 0)
13 76193d7c 2003-09-30 devnull 		return nil;
14 76193d7c 2003-09-30 devnull 
15 76193d7c 2003-09-30 devnull 	/* reverse the channel descriptor so we can easily generate the string in the right order */
16 76193d7c 2003-09-30 devnull 	rc = 0;
17 76193d7c 2003-09-30 devnull 	for(c=cc; c; c>>=8){
18 76193d7c 2003-09-30 devnull 		rc <<= 8;
19 76193d7c 2003-09-30 devnull 		rc |= c&0xFF;
20 76193d7c 2003-09-30 devnull 	}
21 76193d7c 2003-09-30 devnull 
22 76193d7c 2003-09-30 devnull 	p = buf;
23 76193d7c 2003-09-30 devnull 	for(c=rc; c; c>>=8) {
24 76193d7c 2003-09-30 devnull 		*p++ = channames[TYPE(c)];
25 76193d7c 2003-09-30 devnull 		*p++ = '0'+NBITS(c);
26 76193d7c 2003-09-30 devnull 	}
27 76193d7c 2003-09-30 devnull 	*p = 0;
28 76193d7c 2003-09-30 devnull 
29 76193d7c 2003-09-30 devnull 	return buf;
30 76193d7c 2003-09-30 devnull }
31 76193d7c 2003-09-30 devnull 
32 76193d7c 2003-09-30 devnull /* avoid pulling in ctype when using with drawterm etc. */
33 76193d7c 2003-09-30 devnull static int
34 76193d7c 2003-09-30 devnull isspace(char c)
35 76193d7c 2003-09-30 devnull {
36 76193d7c 2003-09-30 devnull 	return c==' ' || c== '\t' || c=='\r' || c=='\n';
37 76193d7c 2003-09-30 devnull }
38 76193d7c 2003-09-30 devnull 
39 76193d7c 2003-09-30 devnull u32int
40 76193d7c 2003-09-30 devnull strtochan(char *s)
41 76193d7c 2003-09-30 devnull {
42 76193d7c 2003-09-30 devnull 	char *p, *q;
43 76193d7c 2003-09-30 devnull 	u32int c;
44 76193d7c 2003-09-30 devnull 	int t, n;
45 76193d7c 2003-09-30 devnull 
46 76193d7c 2003-09-30 devnull 	c = 0;
47 76193d7c 2003-09-30 devnull 	p=s;
48 76193d7c 2003-09-30 devnull 	while(*p && isspace(*p))
49 76193d7c 2003-09-30 devnull 		p++;
50 76193d7c 2003-09-30 devnull 
51 76193d7c 2003-09-30 devnull 	while(*p && !isspace(*p)){
52 76193d7c 2003-09-30 devnull 		if((q = strchr(channames, p[0])) == nil) 
53 76193d7c 2003-09-30 devnull 			return 0;
54 76193d7c 2003-09-30 devnull 		t = q-channames;
55 76193d7c 2003-09-30 devnull 		if(p[1] < '0' || p[1] > '9')
56 76193d7c 2003-09-30 devnull 			return 0;
57 76193d7c 2003-09-30 devnull 		n = p[1]-'0';
58 76193d7c 2003-09-30 devnull 		c = (c<<8) | __DC(t, n);
59 76193d7c 2003-09-30 devnull 		p += 2;
60 76193d7c 2003-09-30 devnull 	}
61 76193d7c 2003-09-30 devnull 	return c;
62 76193d7c 2003-09-30 devnull }
63 76193d7c 2003-09-30 devnull 
64 76193d7c 2003-09-30 devnull int
65 76193d7c 2003-09-30 devnull chantodepth(u32int c)
66 76193d7c 2003-09-30 devnull {
67 76193d7c 2003-09-30 devnull 	int n;
68 76193d7c 2003-09-30 devnull 
69 76193d7c 2003-09-30 devnull 	for(n=0; c; c>>=8){
70 76193d7c 2003-09-30 devnull 		if(TYPE(c) >= NChan || NBITS(c) > 8 || NBITS(c) <= 0)
71 76193d7c 2003-09-30 devnull 			return 0;
72 76193d7c 2003-09-30 devnull 		n += NBITS(c);
73 76193d7c 2003-09-30 devnull 	}
74 76193d7c 2003-09-30 devnull 	if(n==0 || (n>8 && n%8) || (n<8 && 8%n))
75 76193d7c 2003-09-30 devnull 		return 0;
76 76193d7c 2003-09-30 devnull 	return n;
77 76193d7c 2003-09-30 devnull }