+void init_font(Font *font, FT_Face face, unsigned first, unsigned last, int autohinter)
+{
+ unsigned i;
+ unsigned size = 0;
+
+ font->ascent = (face->size->metrics.ascender+63)>>6;
+ font->descent = (face->size->metrics.descender+63)>>6;
+
+ if(verbose>=1)
+ {
+ printf("Ascent: %d\n", font->ascent);
+ printf("Descent: %d\n", font->descent);
+ }
+
+ font->n_glyphs = 0;
+ font->glyphs = NULL;
+ for(i=first; i<=last; ++i)
+ {
+ unsigned n;
+ FT_Bitmap *bmp = &face->glyph->bitmap;
+ int x, y;
+ int flags = 0;
+ Glyph *glyph;
+
+ n = FT_Get_Char_Index(face, i);
+ if(!n)
+ continue;
+
+ if(autohinter)
+ flags |= FT_LOAD_FORCE_AUTOHINT;
+ FT_Load_Glyph(face, n, flags);
+ FT_Render_Glyph(face->glyph, FT_RENDER_MODE_NORMAL);
+
+ if(verbose>=2)
+ printf(" Char %u: glyph %u, size %dx%d\n", i, n, bmp->width, bmp->rows);
+
+ if(bmp->pixel_mode!=FT_PIXEL_MODE_GRAY)
+ {
+ fprintf(stderr, "Warning: Glyph %u skipped, not grayscale\n", n);
+ continue;
+ }
+
+ if(font->n_glyphs>=size)
+ {
+ size += 16;
+ font->glyphs = (Glyph *)realloc(font->glyphs, size*sizeof(Glyph));
+ }
+
+ glyph = &font->glyphs[font->n_glyphs++];
+ glyph->code = i;
+ glyph->image.w = bmp->width;
+ glyph->image.h = bmp->rows;
+ glyph->image.data = (char *)malloc(bmp->width*bmp->rows);
+ glyph->offset_x = face->glyph->bitmap_left;
+ glyph->offset_y = face->glyph->bitmap_top-bmp->rows;
+ glyph->advance = (int)(face->glyph->advance.x+32)/64;
+
+ if(bmp->pitch<0)
+ {
+ for(y=0; y<bmp->rows; ++y) for(x=0; x<bmp->width; ++x)
+ glyph->image.data[x+(glyph->image.h-1-y)*glyph->image.w] = bmp->buffer[x-y*bmp->pitch];
+ }
+ else
+ {
+ for(y=0; y<bmp->rows; ++y) for(x=0; x<bmp->width; ++x)
+ glyph->image.data[x+y*glyph->image.w] = bmp->buffer[x+y*bmp->pitch];
+ }
+ }
+
+ if(verbose>=1)
+ printf("Loaded %u glyphs\n", font->n_glyphs);
+}
+
+void render_grid(Font *font, unsigned cellw, unsigned cellh, unsigned cpl, int seq)
+{
+ unsigned i;
+ int top = 0, bot = 0;
+ unsigned first, last;
+ unsigned maxw = 0, maxh = 0;
+
+ for(i=1;; i<<=1)
+ {
+ first = font->glyphs[0].code&~(i-1);
+ last = first+i-1;
+ if(last>=font->glyphs[font->n_glyphs-1].code)
+ break;
+ }
+
+ for(i=0; i<font->n_glyphs; ++i)
+ {
+ int y;
+
+ y = font->glyphs[i].offset_y+font->glyphs[i].image.h;
+ if(y>top)
+ top = y;
+ if(font->glyphs[i].offset_y<bot)
+ bot = font->glyphs[i].offset_y;
+ if(font->glyphs[i].image.w>maxw)
+ maxw = font->glyphs[i].image.w;
+ if(font->glyphs[i].image.h>maxh)
+ maxh = font->glyphs[i].image.h;
+ }
+
+ if(cellw==0)
+ {
+ int square = (cellh==cellw);
+ cellw = maxw;
+ cellh = top-bot;
+ if(square)
+ {
+ if(cellh>cellw)
+ cellw = cellh;
+ else
+ cellh = cellw;
+ }
+ }
+
+ if(verbose>=1)
+ {
+ printf("Max size: %u x %u\n", maxw, maxh);
+ printf("Y range: [%d %d]\n", bot, top);
+ printf("Cell size: %u x %u\n", cellw, cellh);
+ if(maxw>cellw || top-bot>cellh)
+ fprintf(stderr, "Warning: character size exceeds cell size\n");
+ }
+
+ if(cpl==0)
+ {
+ unsigned count = (seq ? font->n_glyphs : last-first+1);
+ for(i=1;; i<<=1)
+ {
+ cpl = i/cellw;
+ if(cpl>0 && (count+cpl-1)/cpl*cellh<=cpl*cellw)
+ break;
+ }
+ }
+
+ font->image.w = round_to_pot(cpl*cellw);
+ if(seq && font->n_glyphs<last-first+1)
+ font->image.h = (font->n_glyphs+cpl-1)/cpl*cellh;
+ else
+ font->image.h = (last-first+cpl)/cpl*cellh;
+ font->image.h = round_to_pot(font->image.h);
+
+ font->image.data = (char *)malloc(font->image.w*font->image.h);
+ memset(font->image.data, 255, font->image.w*font->image.h);
+
+ for(i=0; i<font->n_glyphs; ++i)
+ {
+ Glyph *glyph;
+ int ci, cx, cy;
+ unsigned x, y;
+
+ glyph = &font->glyphs[i];
+
+ if(seq)
+ ci = i;
+ else
+ ci = glyph->code-first;
+
+ cx = (ci%cpl)*cellw;
+ cy = (ci/cpl)*cellh;
+
+ if(cellw>glyph->image.w)
+ cx += (cellw-glyph->image.w)/2;
+ cy += top-glyph->offset_y-glyph->image.h;
+
+ glyph->x = cx;
+ glyph->y = cy;
+
+ for(y=0; y<glyph->image.h; ++y) for(x=0; x<glyph->image.w; ++x)
+ {
+ if(cx+x<0 || cx+x>=font->image.w || cy+y<0 || cy+y>=font->image.h)
+ continue;
+ font->image.data[cx+x+(cy+y)*font->image.w] = 255-glyph->image.data[x+y*glyph->image.w];
+ }
+ }
+}
+
+void render_packed(Font *font)