2 * graphics file reading for page
12 typedef struct Convert Convert;
13 typedef struct GfxInfo GfxInfo;
14 typedef struct Graphic Graphic;
19 char *truecmd; /* cmd for true color */
29 uchar *buf; /* if stdin */
50 * N.B. These commands need to read stdin if %a is replaced
51 * with an empty string.
54 [Ipic] { "plan9", "fb/3to1 rgbv %a |fb/pcp -tplan9" },
55 [Itiff] { "tiff", "fb/tiff2pic %a | fb/3to1 rgbv | fb/pcp -tplan9" },
56 [Iplan9bm] { "plan9bm", nil },
57 [Ijpeg] { "jpeg", "jpg -9 %a", "jpg -t9 %a" },
58 [Igif] { "gif", "gif -9 %a", "gif -t9 %a" },
59 [Iinferno] { "inferno", nil },
60 [Ifax] { "fax", "aux/g3p9bit -g %a" },
61 [Icvt2pic] { "unknown", "fb/cvt2pic %a |fb/3to1 rgbv" },
62 [Ippm] { "ppm", "ppm -9 %a", "ppm -t9 %a" },
63 /* ``temporary'' hack for hobby */
64 [Iccittg4] { "ccitt-g4", "cat %a|rx nslocum /usr/lib/ocr/bin/bcp -M|fb/pcp -tcompressed -l0" },
65 [Ipng] { "png", "png -9 %a", "png -t9 %a" },
66 [Iyuv] { "yuv", "yuv -9 %a", "yuv -t9 %a" },
67 [Ibmp] { "bmp", "bmp -9 %a", "bmp -t9 %a" },
70 static Image* convert(Graphic*);
71 static Image* gfxdrawpage(Document *d, int page);
72 static char* gfxpagename(Document*, int);
73 static int spawnrc(char*, uchar*, int);
74 static int addpage(Document*, char*);
75 static int rmpage(Document*, int);
76 static int genaddpage(Document*, char*, uchar*, int);
79 gfxpagename(Document *doc, int page)
81 GfxInfo *gfx = doc->extra;
82 return gfx->g[page].name;
86 gfxdrawpage(Document *doc, int page)
88 GfxInfo *gfx = doc->extra;
89 return convert(gfx->g+page);
93 initgfx(Biobuf *b, int argc, char **argv, uchar *buf, int nbuf)
100 doc = emalloc(sizeof(*doc));
101 gfx = emalloc(sizeof(*gfx));
105 doc->drawpage = gfxdrawpage;
106 doc->pagename = gfxpagename;
107 doc->addpage = addpage;
108 doc->rmpage = rmpage;
112 fprint(2, "reading through graphics...\n");
114 genaddpage(doc, nil, buf, nbuf);
116 for(i=0; i<argc; i++)
117 if(addpage(doc, argv[i]) < 0)
118 fprint(2, "warning: not including %s: %r\n", argv[i]);
125 genaddpage(Document *doc, char *name, uchar *buf, int nbuf)
136 assert((name == nil) ^ (buf == nil));
137 assert(name != nil || doc->npage == 0);
139 for(i=0; i<doc->npage; i++)
140 if(strcmp(gfx->g[i].name, name) == 0)
145 if((b = Bopen(name, OREAD)) == nil) {
146 werrstr("Bopen: %r");
150 if(Bread(b, xbuf, sizeof xbuf) != sizeof xbuf) {
151 werrstr("short read: %r");
160 gfx->g = erealloc(gfx->g, (doc->npage+1)*(sizeof(*gfx->g)));
161 g = &gfx->g[doc->npage];
163 memset(g, 0, sizeof *g);
164 if(memcmp(buf, "GIF", 3) == 0)
166 else if(memcmp(buf, "\111\111\052\000", 4) == 0)
168 else if(memcmp(buf, "\115\115\000\052", 4) == 0)
170 else if(memcmp(buf, "\377\330\377", 3) == 0)
172 else if(memcmp(buf, "\211PNG\r\n\032\n", 3) == 0)
174 else if(memcmp(buf, "compressed\n", 11) == 0)
176 else if(memcmp(buf, "\0PC Research, Inc", 17) == 0)
178 else if(memcmp(buf, "TYPE=ccitt-g31", 14) == 0)
180 else if(memcmp(buf, "II*", 3) == 0)
182 else if(memcmp(buf, "TYPE=ccitt-g4", 13) == 0)
184 else if(memcmp(buf, "TYPE=", 5) == 0)
186 else if(buf[0] == 'P' && '0' <= buf[1] && buf[1] <= '9')
188 else if(memcmp(buf, "BM", 2) == 0)
190 else if(memcmp(buf, " ", 10) == 0 &&
191 '0' <= buf[10] && buf[10] <= '9' &&
194 else if(strtochan((char*)buf) != 0)
196 else if (l > 4 && strcmp(name + l -4, ".yuv") == 0)
202 g->name = estrdup(name);
204 g->name = estrdup("stdin"); /* so it can be freed */
209 if(chatty) fprint(2, "classified \"%s\" as \"%s\"\n", g->name, cvt[g->type].name);
214 addpage(Document *doc, char *name)
216 return genaddpage(doc, name, nil, 0);
220 rmpage(Document *doc, int n)
225 if(n < 0 || n >= doc->npage)
230 free(gfx->g[n].name);
232 for(i=n; i<doc->npage; i++)
233 gfx->g[i] = gfx->g[i+1];
249 char *name, buf[1000];
256 if(chatty) fprint(2, "no conversion for bitmap \"%s\"...\n", g->name);
257 if(g->buf == nil){ /* not stdin */
258 fd = open(g->name, OREAD);
260 fprint(2, "cannot open file: %r\n");
264 fd = stdinpipe(g->buf, g->nbuf);
267 if(truecolor && c.truecmd)
270 if(g->buf != nil) /* is stdin */
274 if(strlen(cmd)+strlen(name) > sizeof buf) {
275 fprint(2, "command too long\n");
278 snprint(buf, sizeof buf, cmd, name);
279 if(chatty) fprint(2, "using \"%s\" to convert \"%s\"...\n", buf, g->name);
280 fd = spawnrc(buf, g->buf, g->nbuf);
283 fprint(2, "cannot spawn converter: %r\n");
288 im = readimage(display, fd, 0);
290 fprint(2, "warning: couldn't read image: %r\n");
294 /* for some reason rx doesn't work well with wait */
295 /* for some reason 3to1 exits on success with a non-null status of |3to1 */
296 if(rcspawned && g->type != Iccittg4) {
297 if((w=wait())!=nil && w->msg[0] && !strstr(w->msg, "3to1"))
298 fprint(2, "slave wait error: %s\n", w->msg);
305 spawnrc(char *cmd, uchar *stdinbuf, int nstdinbuf)
310 if(chatty) fprint(2, "spawning(%s)...", cmd);
314 if((pid = fork()) < 0)
320 dup(stdinpipe(stdinbuf, nstdinbuf), 0);
322 dup(open("/dev/null", OREAD), 0);
325 execl("/bin/rc", "rc", "-c", cmd, nil);