ref: fc4bfd57d261e5c99c5d4367adf5c72e8c7e6496
dir: /sys/src/cmd/ttfrender.c/
#include <u.h> #include <libc.h> #include <bio.h> #include <draw.h> #include <ttf.h> #include <ctype.h> void elidenl(char **sp, int *np) { char *s, *e, *t; int nl; s = t = *sp; e = *sp + *np; for(; s < e; s++){ if(isspace(*s)){ nl = 0; do nl += *s == '\n'; while(++s < e && isspace(*s)); if(nl <= 1) *t++ = ' '; else while(nl-- > 0) *t++ = '\n'; if(s == e) break; } *t++ = *s; } } int readtext(char *fn, char **sp, int newline) { int fd, n, a, rc; char *s; enum {B = 4096}; fd = open(fn, OREAD); if(fd < 0) sysfatal("open: %r"); s = nil; n = 0; a = 0; for(;;){ if(n + B > a) s = realloc(s, a += B); if(s == nil) sysfatal("realloc: %r"); rc = read(fd, &s[n], B); if(rc < 0) sysfatal("read: %r"); if(rc == 0) break; n += rc; } if(newline) elidenl(&s, &n); s = realloc(s, n); if(s == nil) sysfatal("realloc: %r"); *sp = s; return n; } void usage(void) { fprint(2, "usage: %s [ -lrjn ] [ -s scale ] [ -w width ] [ -h height ] [ -p ppem ] font [ text ]\n", argv0); exits("usage"); } int number(char *s) { char *p; int n; n = strtol(s, &p, 0); if(p == s || *p != 0 || n <= 0) usage(); return n; } TTBitmap * scaledown(TTBitmap *b, int scale) { TTBitmap *a; int i, j; a = ttfnewbitmap(b->width / scale * 8, b->height / scale); if(a == nil) sysfatal("ttfnewbitmap: %r"); for(j = 0; j < b->height; j++) for(i = 0; i < b->width; i++){ if((b->bit[j * b->stride + (i>>3)] >> 7 - (i & 7) & 1) != 0) a->bit[j/scale * a->stride + i/scale]++; if(j % scale == scale - 1 && i % scale == scale - 1) a->bit[j/scale * a->stride + i/scale] = ~((a->bit[j/scale * a->stride + i/scale] * 255 + scale * scale / 2) / (scale * scale)); } return a; } void cropwrite(TTBitmap *b) { int l, r, u, d, i; l = 0; r = b->stride; u = 0; d = b->height; for(; l < r; l++) for(i = u; i < d; i++) if(b->bit[i * b->stride + l] != 0xff) goto right; right: for(; l < r; r--) for(i = u; i < d; i++) if(b->bit[i * b->stride + r - 1] != 0xff) goto up; up: for(; u < d; u++) for(i = l; i < r; i++) if(b->bit[u * b->stride + i] != 0xff) goto down; down: for(; u < d; d--) for(i = l; i < r; i++) if(b->bit[(d - 1) * b->stride + i] != 0xff) goto out; out: print("%11s %11d %11d %11d %11d ", "k8", 0, 0, r - l, d - u); for(i = u; i < d; i++) write(1, b->bit + i * b->stride + l, r - l); } void main(int argc, char **argv) { static int flags, scale, width, height, ppem, newline, crop; char *font, *txtfn, *txt; int txtn; TTFont *f; TTBitmap *b; TTBitmap *d; width = 640; height = 480; ppem = 18; scale = 1; ARGBEGIN { case 'l': break; case 'r': flags |= TTFRALIGN; break; case 'c': flags |= TTFCENTER; break; case 'j': flags |= TTFJUSTIFY; break; case 'p': ppem = number(EARGF(usage())); break; case 's': scale = number(EARGF(usage())); break; case 'w': width = number(EARGF(usage())); break; case 'h': height = number(EARGF(usage())); break; case 'n': newline++; break; case 'C': crop++; break; } ARGEND; if((uint)(argc - 1) > 1) usage(); font = argv[0]; txtfn = argc > 1 ? argv[1] : "/fd/0"; txtn = readtext(txtfn, &txt, newline); f = ttfopen(font, ppem * scale, 0); if(f == nil) sysfatal("ttfopen: %r"); b = ttfrender(f, txt, txt + txtn, width * scale, height * scale, flags, nil); if(b == nil) sysfatal("ttfrender: %r"); d = scaledown(b, scale); if(crop) cropwrite(d); else{ print("%11s %11d %11d %11d %11d ", "k8", 0, 0, d->width/8, d->height); write(1, d->bit, d->stride * d->height); } }