Blame


1 28994509 2004-04-21 devnull #include <u.h>
2 28994509 2004-04-21 devnull #include <libc.h>
3 28994509 2004-04-21 devnull #include <bio.h>
4 28994509 2004-04-21 devnull #include <draw.h>
5 28994509 2004-04-21 devnull #include <event.h>
6 28994509 2004-04-21 devnull #include "imagefile.h"
7 28994509 2004-04-21 devnull
8 28994509 2004-04-21 devnull extern int debug;
9 28994509 2004-04-21 devnull int cflag = 0;
10 28994509 2004-04-21 devnull int dflag = 0;
11 28994509 2004-04-21 devnull int eflag = 0;
12 28994509 2004-04-21 devnull int nineflag = 0;
13 28994509 2004-04-21 devnull int threeflag = 0;
14 28994509 2004-04-21 devnull int colorspace = CRGB;
15 28994509 2004-04-21 devnull int output = 0;
16 28994509 2004-04-21 devnull ulong outchan = CMAP8;
17 28994509 2004-04-21 devnull Image *image;
18 28994509 2004-04-21 devnull int defaultcolor = 1;
19 28994509 2004-04-21 devnull
20 28994509 2004-04-21 devnull enum{
21 28994509 2004-04-21 devnull Border = 2,
22 28994509 2004-04-21 devnull Edge = 5
23 28994509 2004-04-21 devnull };
24 28994509 2004-04-21 devnull
25 28994509 2004-04-21 devnull char *show(int, char*, int);
26 28994509 2004-04-21 devnull
27 28994509 2004-04-21 devnull void
28 28994509 2004-04-21 devnull eresized(int new)
29 28994509 2004-04-21 devnull {
30 28994509 2004-04-21 devnull Rectangle r;
31 28994509 2004-04-21 devnull
32 28994509 2004-04-21 devnull if(new && getwindow(display, Refnone) < 0){
33 28994509 2004-04-21 devnull fprint(2, "png: can't reattach to window\n");
34 28994509 2004-04-21 devnull exits("resize");
35 28994509 2004-04-21 devnull }
36 28994509 2004-04-21 devnull if(image == nil)
37 28994509 2004-04-21 devnull return;
38 28994509 2004-04-21 devnull r = insetrect(screen->clipr, Edge+Border);
39 28994509 2004-04-21 devnull r.max.x = r.min.x+Dx(image->r);
40 28994509 2004-04-21 devnull r.max.y = r.min.y+Dy(image->r);
41 28994509 2004-04-21 devnull border(screen, r, -Border, nil, ZP);
42 28994509 2004-04-21 devnull draw(screen, r, image, nil, image->r.min);
43 28994509 2004-04-21 devnull flushimage(display, 1);
44 28994509 2004-04-21 devnull }
45 28994509 2004-04-21 devnull
46 28994509 2004-04-21 devnull void
47 be36ff68 2004-04-29 devnull usage(void)
48 be36ff68 2004-04-29 devnull {
49 be36ff68 2004-04-29 devnull fprint(2, "usage: png -39cdekrtv -W winsize [file.png ...]\n");
50 be36ff68 2004-04-29 devnull exits("usage");
51 be36ff68 2004-04-29 devnull }
52 be36ff68 2004-04-29 devnull
53 be36ff68 2004-04-29 devnull void
54 28994509 2004-04-21 devnull main(int argc, char *argv[])
55 28994509 2004-04-21 devnull {
56 28994509 2004-04-21 devnull int fd, i;
57 28994509 2004-04-21 devnull char *err;
58 28994509 2004-04-21 devnull char buf[12+1];
59 28994509 2004-04-21 devnull
60 28994509 2004-04-21 devnull ARGBEGIN{
61 be36ff68 2004-04-29 devnull case 'W':
62 be36ff68 2004-04-29 devnull winsize = EARGF(usage());
63 be36ff68 2004-04-29 devnull break;
64 28994509 2004-04-21 devnull case 'c': /* produce encoded, compressed, bitmap file; no display by default */
65 28994509 2004-04-21 devnull cflag++;
66 28994509 2004-04-21 devnull dflag++;
67 28994509 2004-04-21 devnull output++;
68 28994509 2004-04-21 devnull if(defaultcolor)
69 28994509 2004-04-21 devnull outchan = CMAP8;
70 28994509 2004-04-21 devnull break;
71 28994509 2004-04-21 devnull case 'D':
72 28994509 2004-04-21 devnull debug++;
73 28994509 2004-04-21 devnull break;
74 28994509 2004-04-21 devnull case 'd': /* suppress display of image */
75 28994509 2004-04-21 devnull dflag++;
76 28994509 2004-04-21 devnull break;
77 28994509 2004-04-21 devnull case 'e': /* disable floyd-steinberg error diffusion */
78 28994509 2004-04-21 devnull eflag++;
79 28994509 2004-04-21 devnull break;
80 28994509 2004-04-21 devnull case 'k': /* force black and white */
81 28994509 2004-04-21 devnull defaultcolor = 0;
82 28994509 2004-04-21 devnull outchan = GREY8;
83 28994509 2004-04-21 devnull break;
84 28994509 2004-04-21 devnull case 'r':
85 28994509 2004-04-21 devnull colorspace = CRGB;
86 28994509 2004-04-21 devnull break;
87 28994509 2004-04-21 devnull case '3': /* produce encoded, compressed, three-color bitmap file; no display by default */
88 28994509 2004-04-21 devnull threeflag++;
89 28994509 2004-04-21 devnull /* fall through */
90 28994509 2004-04-21 devnull case 't': /* produce encoded, compressed, true-color bitmap file; no display by default */
91 28994509 2004-04-21 devnull cflag++;
92 28994509 2004-04-21 devnull dflag++;
93 28994509 2004-04-21 devnull output++;
94 28994509 2004-04-21 devnull defaultcolor = 0;
95 28994509 2004-04-21 devnull outchan = RGB24;
96 28994509 2004-04-21 devnull break;
97 28994509 2004-04-21 devnull case 'v': /* force RGBV */
98 28994509 2004-04-21 devnull defaultcolor = 0;
99 28994509 2004-04-21 devnull outchan = CMAP8;
100 28994509 2004-04-21 devnull break;
101 28994509 2004-04-21 devnull case '9': /* produce plan 9, uncompressed, bitmap file; no display by default */
102 28994509 2004-04-21 devnull nineflag++;
103 28994509 2004-04-21 devnull dflag++;
104 28994509 2004-04-21 devnull output++;
105 28994509 2004-04-21 devnull if(defaultcolor)
106 28994509 2004-04-21 devnull outchan = CMAP8;
107 28994509 2004-04-21 devnull break;
108 28994509 2004-04-21 devnull default:
109 be36ff68 2004-04-29 devnull usage();
110 28994509 2004-04-21 devnull }ARGEND;
111 28994509 2004-04-21 devnull
112 28994509 2004-04-21 devnull if(dflag==0 && colorspace==CYCbCr){ /* see if we should convert right to RGB */
113 28994509 2004-04-21 devnull fd = open("/dev/screen", OREAD);
114 28994509 2004-04-21 devnull if(fd > 0){
115 28994509 2004-04-21 devnull buf[12] = '\0';
116 28994509 2004-04-21 devnull if(read(fd, buf, 12)==12 && chantodepth(strtochan(buf))>8)
117 28994509 2004-04-21 devnull colorspace = CRGB;
118 28994509 2004-04-21 devnull close(fd);
119 28994509 2004-04-21 devnull }
120 28994509 2004-04-21 devnull }
121 28994509 2004-04-21 devnull
122 28994509 2004-04-21 devnull err = nil;
123 28994509 2004-04-21 devnull if(argc == 0)
124 28994509 2004-04-21 devnull err = show(0, "<stdin>", outchan);
125 28994509 2004-04-21 devnull else{
126 28994509 2004-04-21 devnull for(i=0; i<argc; i++){
127 28994509 2004-04-21 devnull fd = open(argv[i], OREAD);
128 28994509 2004-04-21 devnull if(fd < 0){
129 28994509 2004-04-21 devnull fprint(2, "png: can't open %s: %r\n", argv[i]);
130 28994509 2004-04-21 devnull err = "open";
131 28994509 2004-04-21 devnull }else{
132 28994509 2004-04-21 devnull err = show(fd, argv[i], outchan);
133 28994509 2004-04-21 devnull close(fd);
134 28994509 2004-04-21 devnull }
135 28994509 2004-04-21 devnull if((nineflag || cflag) && argc>1 && err==nil){
136 28994509 2004-04-21 devnull fprint(2, "png: exiting after one file\n");
137 28994509 2004-04-21 devnull break;
138 28994509 2004-04-21 devnull }
139 28994509 2004-04-21 devnull }
140 28994509 2004-04-21 devnull }
141 28994509 2004-04-21 devnull exits(err);
142 28994509 2004-04-21 devnull }
143 28994509 2004-04-21 devnull
144 28994509 2004-04-21 devnull char*
145 28994509 2004-04-21 devnull show(int fd, char *name, int outc)
146 28994509 2004-04-21 devnull {
147 28994509 2004-04-21 devnull Rawimage **array, *r, *c;
148 28994509 2004-04-21 devnull static int inited;
149 28994509 2004-04-21 devnull Image *i;
150 28994509 2004-04-21 devnull int j, ch, outchan;
151 28994509 2004-04-21 devnull Biobuf b;
152 28994509 2004-04-21 devnull char buf[32];
153 28994509 2004-04-21 devnull
154 28994509 2004-04-21 devnull if(Binit(&b, fd, OREAD) < 0)
155 28994509 2004-04-21 devnull return nil;
156 28994509 2004-04-21 devnull outchan = outc;
157 28994509 2004-04-21 devnull array = Breadpng(&b, colorspace);
158 28994509 2004-04-21 devnull if(array == nil || array[0]==nil){
159 28994509 2004-04-21 devnull fprint(2, "png: decode %s failed: %r\n", name);
160 28994509 2004-04-21 devnull return "decode";
161 28994509 2004-04-21 devnull }
162 28994509 2004-04-21 devnull Bterm(&b);
163 28994509 2004-04-21 devnull
164 28994509 2004-04-21 devnull r = array[0];
165 28994509 2004-04-21 devnull if(!dflag && !inited){
166 28994509 2004-04-21 devnull if(initdraw(0, 0, 0) < 0){
167 28994509 2004-04-21 devnull fprint(2, "png: initdraw failed: %r\n");
168 28994509 2004-04-21 devnull return "initdraw";
169 28994509 2004-04-21 devnull }
170 28994509 2004-04-21 devnull einit(Ekeyboard|Emouse);
171 28994509 2004-04-21 devnull if(defaultcolor && screen->depth>8 && outchan==CMAP8)
172 28994509 2004-04-21 devnull outchan = RGB24;
173 28994509 2004-04-21 devnull inited++;
174 28994509 2004-04-21 devnull }
175 28994509 2004-04-21 devnull if(outchan == CMAP8)
176 28994509 2004-04-21 devnull c = torgbv(r, !eflag);
177 28994509 2004-04-21 devnull else{
178 28994509 2004-04-21 devnull if(outchan==GREY8 || (r->chandesc==CY && threeflag==0)){
179 28994509 2004-04-21 devnull c = totruecolor(r, CY);
180 28994509 2004-04-21 devnull outchan = GREY8;
181 28994509 2004-04-21 devnull }else
182 28994509 2004-04-21 devnull c = totruecolor(r, CRGB24);
183 28994509 2004-04-21 devnull }
184 28994509 2004-04-21 devnull if(c == nil){
185 28994509 2004-04-21 devnull fprint(2, "png: conversion of %s failed: %r\n", name);
186 28994509 2004-04-21 devnull return "torgbv";
187 28994509 2004-04-21 devnull }
188 28994509 2004-04-21 devnull if(!dflag){
189 28994509 2004-04-21 devnull if(c->chandesc == CY)
190 28994509 2004-04-21 devnull i = allocimage(display, c->r, GREY8, 0, 0);
191 28994509 2004-04-21 devnull else
192 28994509 2004-04-21 devnull i = allocimage(display, c->r, outchan, 0, 0);
193 28994509 2004-04-21 devnull if(i == nil){
194 28994509 2004-04-21 devnull fprint(2, "png: allocimage %s failed: %r\n", name);
195 28994509 2004-04-21 devnull return "allocimage";
196 28994509 2004-04-21 devnull }
197 28994509 2004-04-21 devnull if(loadimage(i, i->r, c->chans[0], c->chanlen) < 0){
198 28994509 2004-04-21 devnull fprint(2, "png: loadimage %s failed: %r\n", name);
199 28994509 2004-04-21 devnull return "loadimage";
200 28994509 2004-04-21 devnull }
201 28994509 2004-04-21 devnull image = i;
202 28994509 2004-04-21 devnull eresized(0);
203 28994509 2004-04-21 devnull if((ch=ekbd())=='q' || ch==0x7F || ch==0x04)
204 28994509 2004-04-21 devnull exits(nil);
205 28994509 2004-04-21 devnull draw(screen, screen->clipr, display->white, nil, ZP);
206 28994509 2004-04-21 devnull image = nil;
207 28994509 2004-04-21 devnull freeimage(i);
208 28994509 2004-04-21 devnull }
209 28994509 2004-04-21 devnull if(nineflag){
210 28994509 2004-04-21 devnull chantostr(buf, outchan);
211 28994509 2004-04-21 devnull print("%11s %11d %11d %11d %11d ", buf,
212 28994509 2004-04-21 devnull c->r.min.x, c->r.min.y, c->r.max.x, c->r.max.y);
213 28994509 2004-04-21 devnull if(write(1, c->chans[0], c->chanlen) != c->chanlen){
214 28994509 2004-04-21 devnull fprint(2, "png: %s: write error %r\n", name);
215 28994509 2004-04-21 devnull return "write";
216 28994509 2004-04-21 devnull }
217 28994509 2004-04-21 devnull }else if(cflag){
218 28994509 2004-04-21 devnull if(writerawimage(1, c) < 0){
219 28994509 2004-04-21 devnull fprint(2, "png: %s: write error: %r\n", name);
220 28994509 2004-04-21 devnull return "write";
221 28994509 2004-04-21 devnull }
222 28994509 2004-04-21 devnull }
223 28994509 2004-04-21 devnull for(j=0; j<r->nchans; j++)
224 28994509 2004-04-21 devnull free(r->chans[j]);
225 28994509 2004-04-21 devnull free(r->cmap);
226 28994509 2004-04-21 devnull free(r);
227 28994509 2004-04-21 devnull free(array);
228 28994509 2004-04-21 devnull if(c){
229 28994509 2004-04-21 devnull free(c->chans[0]);
230 28994509 2004-04-21 devnull free(c);
231 28994509 2004-04-21 devnull }
232 28994509 2004-04-21 devnull return nil;
233 28994509 2004-04-21 devnull }