vrshoot

annotate libs/drawtext/font.c @ 0:b2f14e535253

find changesets by author, revision, files, or words in the commit message
initial commit
author John Tsiombikas <nuclear@member.fsf.org>
date Sat, 01 Feb 2014 19:58:19 +0200
parents
children
rev   line source
nuclear@0 1 /*
nuclear@0 2 libdrawtext - a simple library for fast text rendering in OpenGL
nuclear@0 3 Copyright (C) 2011 John Tsiombikas <nuclear@member.fsf.org>
nuclear@0 4
nuclear@0 5 This program is free software: you can redistribute it and/or modify
nuclear@0 6 it under the terms of the GNU Lesser General Public License as published by
nuclear@0 7 the Free Software Foundation, either version 3 of the License, or
nuclear@0 8 (at your option) any later version.
nuclear@0 9
nuclear@0 10 This program is distributed in the hope that it will be useful,
nuclear@0 11 but WITHOUT ANY WARRANTY; without even the implied warranty of
nuclear@0 12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
nuclear@0 13 GNU Lesser General Public License for more details.
nuclear@0 14
nuclear@0 15 You should have received a copy of the GNU Lesser General Public License
nuclear@0 16 along with this program. If not, see <http://www.gnu.org/licenses/>.
nuclear@0 17 */
nuclear@0 18 #ifndef NO_FREETYPE
nuclear@0 19 #define USE_FREETYPE
nuclear@0 20 #endif
nuclear@0 21
nuclear@0 22 #include <stdio.h>
nuclear@0 23 #include <stdlib.h>
nuclear@0 24 #include <string.h>
nuclear@0 25 #include <math.h>
nuclear@0 26 #include <limits.h>
nuclear@0 27 #include <ctype.h>
nuclear@0 28 #include <float.h>
nuclear@0 29 #include <errno.h>
nuclear@0 30 #ifdef USE_FREETYPE
nuclear@0 31 #include <ft2build.h>
nuclear@0 32 #include FT_FREETYPE_H
nuclear@0 33 #endif
nuclear@0 34 #include "drawtext.h"
nuclear@0 35 #include "drawtext_impl.h"
nuclear@0 36
nuclear@0 37 #define FTSZ_TO_PIXELS(x) ((x) / 64)
nuclear@0 38 #define MAX_IMG_WIDTH 4096
nuclear@0 39
nuclear@0 40
nuclear@0 41 #ifdef USE_FREETYPE
nuclear@0 42 static int init_freetype(void);
nuclear@0 43 static void cleanup(void);
nuclear@0 44
nuclear@0 45 static void calc_best_size(int total_width, int max_glyph_height, int padding, int pow2, int *imgw, int *imgh);
nuclear@0 46 static int next_pow2(int x);
nuclear@0 47
nuclear@0 48 static FT_Library ft;
nuclear@0 49
nuclear@0 50
nuclear@0 51 static int init_done;
nuclear@0 52
nuclear@0 53 static int init_freetype(void)
nuclear@0 54 {
nuclear@0 55 if(!init_done) {
nuclear@0 56 if(FT_Init_FreeType(&ft) != 0) {
nuclear@0 57 return -1;
nuclear@0 58 }
nuclear@0 59 atexit(cleanup);
nuclear@0 60 init_done = 1;
nuclear@0 61 }
nuclear@0 62 return 0;
nuclear@0 63 }
nuclear@0 64
nuclear@0 65 static void cleanup(void)
nuclear@0 66 {
nuclear@0 67 if(init_done) {
nuclear@0 68 FT_Done_FreeType(ft);
nuclear@0 69 }
nuclear@0 70 }
nuclear@0 71
nuclear@0 72 struct dtx_font *dtx_open_font(const char *fname, int sz)
nuclear@0 73 {
nuclear@0 74 struct dtx_font *fnt;
nuclear@0 75
nuclear@0 76 init_freetype();
nuclear@0 77
nuclear@0 78 if(!(fnt = calloc(1, sizeof *fnt))) {
nuclear@0 79 fperror("failed to allocate font structure");
nuclear@0 80 return 0;
nuclear@0 81 }
nuclear@0 82
nuclear@0 83 if(FT_New_Face(ft, fname, 0, (FT_Face*)&fnt->face) != 0) {
nuclear@0 84 fprintf(stderr, "failed to open font file: %s\n", fname);
nuclear@0 85 return 0;
nuclear@0 86 }
nuclear@0 87
nuclear@0 88 /* pre-create the extended ASCII range glyphmap */
nuclear@0 89 if(sz) {
nuclear@0 90 dtx_prepare_range(fnt, sz, 0, 256);
nuclear@0 91
nuclear@0 92 if(!dtx_font) {
nuclear@0 93 dtx_use_font(fnt, sz);
nuclear@0 94 }
nuclear@0 95 }
nuclear@0 96
nuclear@0 97 return fnt;
nuclear@0 98 }
nuclear@0 99
nuclear@0 100 void dtx_close_font(struct dtx_font *fnt)
nuclear@0 101 {
nuclear@0 102 if(!fnt) return;
nuclear@0 103
nuclear@0 104 FT_Done_Face(fnt->face);
nuclear@0 105
nuclear@0 106 /* destroy the glyphmaps */
nuclear@0 107 while(fnt->gmaps) {
nuclear@0 108 void *tmp = fnt->gmaps;
nuclear@0 109 fnt->gmaps = fnt->gmaps->next;
nuclear@0 110 dtx_free_glyphmap(tmp);
nuclear@0 111 }
nuclear@0 112
nuclear@0 113 free(fnt);
nuclear@0 114 }
nuclear@0 115
nuclear@0 116 void dtx_prepare(struct dtx_font *fnt, int sz)
nuclear@0 117 {
nuclear@0 118 dtx_get_font_glyphmap_range(fnt, sz, 0, 256);
nuclear@0 119 }
nuclear@0 120
nuclear@0 121 void dtx_prepare_range(struct dtx_font *fnt, int sz, int cstart, int cend)
nuclear@0 122 {
nuclear@0 123 dtx_get_font_glyphmap_range(fnt, sz, cstart, cend);
nuclear@0 124 }
nuclear@0 125
nuclear@0 126 struct dtx_glyphmap *dtx_get_font_glyphmap(struct dtx_font *fnt, int sz, int code)
nuclear@0 127 {
nuclear@0 128 struct dtx_glyphmap *gm;
nuclear@0 129
nuclear@0 130 /* check to see if the last we've given out fits the bill */
nuclear@0 131 if(fnt->last_gmap && code >= fnt->last_gmap->cstart && code < fnt->last_gmap->cend && fnt->last_gmap->ptsize == sz) {
nuclear@0 132 return fnt->last_gmap;
nuclear@0 133 }
nuclear@0 134
nuclear@0 135 /* otherwise search for the appropriate glyphmap */
nuclear@0 136 gm = fnt->gmaps;
nuclear@0 137 while(gm) {
nuclear@0 138 if(code >= gm->cstart && code < gm->cend && sz == gm->ptsize) {
nuclear@0 139 fnt->last_gmap = gm;
nuclear@0 140 return gm;
nuclear@0 141 }
nuclear@0 142 gm = gm->next;
nuclear@0 143 }
nuclear@0 144 return 0;
nuclear@0 145 }
nuclear@0 146
nuclear@0 147 struct dtx_glyphmap *dtx_get_font_glyphmap_range(struct dtx_font *fnt, int sz, int cstart, int cend)
nuclear@0 148 {
nuclear@0 149 struct dtx_glyphmap *gm;
nuclear@0 150
nuclear@0 151 /* search the available glyphmaps to see if we've got one that includes
nuclear@0 152 * the requested range
nuclear@0 153 */
nuclear@0 154 gm = fnt->gmaps;
nuclear@0 155 while(gm) {
nuclear@0 156 if(gm->cstart <= cstart && gm->cend >= cend && gm->ptsize == sz) {
nuclear@0 157 return gm;
nuclear@0 158 }
nuclear@0 159 gm = gm->next;
nuclear@0 160 }
nuclear@0 161
nuclear@0 162 /* not found, create one and add it to the list */
nuclear@0 163 if(!(gm = dtx_create_glyphmap_range(fnt, sz, cstart, cend))) {
nuclear@0 164 return 0;
nuclear@0 165 }
nuclear@0 166 return gm;
nuclear@0 167 }
nuclear@0 168
nuclear@0 169 struct dtx_glyphmap *dtx_create_glyphmap_range(struct dtx_font *fnt, int sz, int cstart, int cend)
nuclear@0 170 {
nuclear@0 171 FT_Face face = fnt->face;
nuclear@0 172 struct dtx_glyphmap *gmap;
nuclear@0 173 int i, j;
nuclear@0 174 int gx, gy;
nuclear@0 175 int padding = 4;
nuclear@0 176 int total_width = padding;
nuclear@0 177 int max_height = 0;
nuclear@0 178
nuclear@0 179 FT_Set_Char_Size(fnt->face, 0, sz * 64, 72, 72);
nuclear@0 180
nuclear@0 181 if(!(gmap = calloc(1, sizeof *gmap))) {
nuclear@0 182 return 0;
nuclear@0 183 }
nuclear@0 184
nuclear@0 185 gmap->ptsize = sz;
nuclear@0 186 gmap->cstart = cstart;
nuclear@0 187 gmap->cend = cend;
nuclear@0 188 gmap->crange = cend - cstart;
nuclear@0 189 gmap->line_advance = FTSZ_TO_PIXELS((float)face->size->metrics.height);
nuclear@0 190 gmap->baseline = -FTSZ_TO_PIXELS((float)face->size->metrics.descender);
nuclear@0 191
nuclear@0 192 if(!(gmap->glyphs = malloc(gmap->crange * sizeof *gmap->glyphs))) {
nuclear@0 193 free(gmap);
nuclear@0 194 return 0;
nuclear@0 195 }
nuclear@0 196
nuclear@0 197 for(i=0; i<gmap->crange; i++) {
nuclear@0 198 int h;
nuclear@0 199
nuclear@0 200 FT_Load_Char(face, i + cstart, 0);
nuclear@0 201 h = FTSZ_TO_PIXELS(face->glyph->metrics.height);
nuclear@0 202
nuclear@0 203 if(h > max_height) {
nuclear@0 204 max_height = h;
nuclear@0 205 }
nuclear@0 206 total_width += FTSZ_TO_PIXELS(face->glyph->metrics.width) + padding;
nuclear@0 207 }
nuclear@0 208
nuclear@0 209 calc_best_size(total_width, max_height, padding, 1, &gmap->xsz, &gmap->ysz);
nuclear@0 210
nuclear@0 211 if(!(gmap->pixels = malloc(gmap->xsz * gmap->ysz))) {
nuclear@0 212 free(gmap->glyphs);
nuclear@0 213 free(gmap);
nuclear@0 214 return 0;
nuclear@0 215 }
nuclear@0 216 memset(gmap->pixels, 0, gmap->xsz * gmap->ysz);
nuclear@0 217
nuclear@0 218 gx = padding;
nuclear@0 219 gy = padding;
nuclear@0 220
nuclear@0 221 for(i=0; i<gmap->crange; i++) {
nuclear@0 222 float gwidth, gheight;
nuclear@0 223 unsigned char *src, *dst;
nuclear@0 224 FT_GlyphSlot glyph;
nuclear@0 225
nuclear@0 226 FT_Load_Char(face, i + cstart, FT_LOAD_RENDER);
nuclear@0 227 glyph = face->glyph;
nuclear@0 228 gwidth = FTSZ_TO_PIXELS((float)glyph->metrics.width);
nuclear@0 229 gheight = FTSZ_TO_PIXELS((float)glyph->metrics.height);
nuclear@0 230
nuclear@0 231 if(gx > gmap->xsz - gwidth - padding) {
nuclear@0 232 gx = padding;
nuclear@0 233 gy += max_height + padding;
nuclear@0 234 }
nuclear@0 235
nuclear@0 236 src = glyph->bitmap.buffer;
nuclear@0 237 dst = gmap->pixels + gy * gmap->xsz + gx;
nuclear@0 238
nuclear@0 239 for(j=0; j<glyph->bitmap.rows; j++) {
nuclear@0 240 memcpy(dst, src, glyph->bitmap.width);
nuclear@0 241 dst += gmap->xsz;
nuclear@0 242 src += glyph->bitmap.pitch;
nuclear@0 243 }
nuclear@0 244
nuclear@0 245 gmap->glyphs[i].code = i;
nuclear@0 246 gmap->glyphs[i].x = gx - 1;
nuclear@0 247 gmap->glyphs[i].y = gy - 1;
nuclear@0 248 gmap->glyphs[i].width = gwidth + 2;
nuclear@0 249 gmap->glyphs[i].height = gheight + 2;
nuclear@0 250 gmap->glyphs[i].orig_x = -FTSZ_TO_PIXELS((float)glyph->metrics.horiBearingX) + 1;
nuclear@0 251 gmap->glyphs[i].orig_y = FTSZ_TO_PIXELS((float)glyph->metrics.height - glyph->metrics.horiBearingY) + 1;
nuclear@0 252 gmap->glyphs[i].advance = FTSZ_TO_PIXELS((float)glyph->metrics.horiAdvance);
nuclear@0 253 /* also precalc normalized */
nuclear@0 254 gmap->glyphs[i].nx = (float)gmap->glyphs[i].x / (float)gmap->xsz;
nuclear@0 255 gmap->glyphs[i].ny = (float)gmap->glyphs[i].y / (float)gmap->ysz;
nuclear@0 256 gmap->glyphs[i].nwidth = (float)gmap->glyphs[i].width / (float)gmap->xsz;
nuclear@0 257 gmap->glyphs[i].nheight = (float)gmap->glyphs[i].height / (float)gmap->ysz;
nuclear@0 258
nuclear@0 259 gx += gwidth + padding;
nuclear@0 260 }
nuclear@0 261
nuclear@0 262 /* add it to the glyphmaps list of the font */
nuclear@0 263 gmap->next = fnt->gmaps;
nuclear@0 264 fnt->gmaps = gmap;
nuclear@0 265
nuclear@0 266 return gmap;
nuclear@0 267 }
nuclear@0 268 #endif /* USE_FREETYPE */
nuclear@0 269
nuclear@0 270 void dtx_free_glyphmap(struct dtx_glyphmap *gmap)
nuclear@0 271 {
nuclear@0 272 if(gmap) {
nuclear@0 273 free(gmap->pixels);
nuclear@0 274 free(gmap->glyphs);
nuclear@0 275 free(gmap);
nuclear@0 276 }
nuclear@0 277 }
nuclear@0 278
nuclear@0 279 unsigned char *dtx_get_glyphmap_pixels(struct dtx_glyphmap *gmap)
nuclear@0 280 {
nuclear@0 281 return gmap->pixels;
nuclear@0 282 }
nuclear@0 283
nuclear@0 284 int dtx_get_glyphmap_width(struct dtx_glyphmap *gmap)
nuclear@0 285 {
nuclear@0 286 return gmap->xsz;
nuclear@0 287 }
nuclear@0 288
nuclear@0 289 int dtx_get_glyphmap_height(struct dtx_glyphmap *gmap)
nuclear@0 290 {
nuclear@0 291 return gmap->ysz;
nuclear@0 292 }
nuclear@0 293
nuclear@0 294 struct dtx_glyphmap *dtx_load_glyphmap(const char *fname)
nuclear@0 295 {
nuclear@0 296 FILE *fp;
nuclear@0 297 struct dtx_glyphmap *gmap;
nuclear@0 298
nuclear@0 299 if(!(fp = fopen(fname, "r"))) {
nuclear@0 300 return 0;
nuclear@0 301 }
nuclear@0 302 gmap = dtx_load_glyphmap_stream(fp);
nuclear@0 303 fclose(fp);
nuclear@0 304 return gmap;
nuclear@0 305 }
nuclear@0 306
nuclear@0 307 struct dtx_glyphmap *dtx_load_glyphmap_stream(FILE *fp)
nuclear@0 308 {
nuclear@0 309 char buf[512];
nuclear@0 310 int hdr_lines = 0;
nuclear@0 311 struct dtx_glyphmap *gmap;
nuclear@0 312 struct glyph *glyphs = 0;
nuclear@0 313 int min_code = INT_MAX;
nuclear@0 314 int max_code = INT_MIN;
nuclear@0 315 int i, max_pixval, num_pixels;
nuclear@0 316
nuclear@0 317 if(!(gmap = calloc(1, sizeof *gmap))) {
nuclear@0 318 fperror("failed to allocate glyphmap");
nuclear@0 319 return 0;
nuclear@0 320 }
nuclear@0 321
nuclear@0 322 while(hdr_lines < 3) {
nuclear@0 323 char *line = buf;
nuclear@0 324 if(!fgets(buf, sizeof buf, fp)) {
nuclear@0 325 fperror("unexpected end of file");
nuclear@0 326 goto err;
nuclear@0 327 }
nuclear@0 328
nuclear@0 329 while(isspace(*line)) {
nuclear@0 330 line++;
nuclear@0 331 }
nuclear@0 332
nuclear@0 333 if(line[0] == '#') {
nuclear@0 334 struct glyph *g;
nuclear@0 335 int c;
nuclear@0 336 float x, y, xsz, ysz, res;
nuclear@0 337
nuclear@0 338 res = sscanf(line + 1, "%d: %fx%f+%f+%f\n", &c, &xsz, &ysz, &x, &y);
nuclear@0 339 if(res != 5) {
nuclear@0 340 fprintf(stderr, "%s: invalid glyph info line\n", __FUNCTION__);
nuclear@0 341 goto err;
nuclear@0 342 }
nuclear@0 343
nuclear@0 344 if(!(g = malloc(sizeof *g))) {
nuclear@0 345 fperror("failed to allocate glyph");
nuclear@0 346 goto err;
nuclear@0 347 }
nuclear@0 348 g->code = c;
nuclear@0 349 g->x = x;
nuclear@0 350 g->y = y;
nuclear@0 351 g->width = xsz;
nuclear@0 352 g->height = ysz;
nuclear@0 353 g->next = glyphs;
nuclear@0 354 glyphs = g;
nuclear@0 355
nuclear@0 356 if(c < min_code) {
nuclear@0 357 min_code = c;
nuclear@0 358 }
nuclear@0 359 if(c > max_code) {
nuclear@0 360 max_code = c;
nuclear@0 361 }
nuclear@0 362 } else {
nuclear@0 363 switch(hdr_lines) {
nuclear@0 364 case 0:
nuclear@0 365 if(0[line] != 'P' || 1[line] != '6') {
nuclear@0 366 fprintf(stderr, "%s: invalid file format (magic)\n", __FUNCTION__);
nuclear@0 367 goto err;
nuclear@0 368 }
nuclear@0 369 break;
nuclear@0 370
nuclear@0 371 case 1:
nuclear@0 372 if(sscanf(line, "%d %d", &gmap->xsz, &gmap->ysz) != 2) {
nuclear@0 373 fprintf(stderr, "%s: invalid file format (dim)\n", __FUNCTION__);
nuclear@0 374 goto err;
nuclear@0 375 }
nuclear@0 376 break;
nuclear@0 377
nuclear@0 378 case 2:
nuclear@0 379 {
nuclear@0 380 char *endp;
nuclear@0 381 max_pixval = strtol(line, &endp, 10);
nuclear@0 382 if(endp == line) {
nuclear@0 383 fprintf(stderr, "%s: invalid file format (maxval)\n", __FUNCTION__);
nuclear@0 384 goto err;
nuclear@0 385 }
nuclear@0 386 }
nuclear@0 387 break;
nuclear@0 388
nuclear@0 389 default:
nuclear@0 390 break; /* can't happen */
nuclear@0 391 }
nuclear@0 392 hdr_lines++;
nuclear@0 393 }
nuclear@0 394 }
nuclear@0 395
nuclear@0 396 num_pixels = gmap->xsz * gmap->ysz;
nuclear@0 397 if(!(gmap->pixels = malloc(num_pixels))) {
nuclear@0 398 fperror("failed to allocate pixels");
nuclear@0 399 goto err;
nuclear@0 400 }
nuclear@0 401
nuclear@0 402 for(i=0; i<num_pixels; i++) {
nuclear@0 403 long c = fgetc(fp);
nuclear@0 404 if(c == -1) {
nuclear@0 405 fprintf(stderr, "unexpected end of file while reading pixels\n");
nuclear@0 406 goto err;
nuclear@0 407 }
nuclear@0 408 gmap->pixels[i] = 255 * c / max_pixval;
nuclear@0 409 fseek(fp, 2, SEEK_CUR);
nuclear@0 410 }
nuclear@0 411
nuclear@0 412 gmap->cstart = min_code;
nuclear@0 413 gmap->cend = max_code + 1;
nuclear@0 414 gmap->crange = gmap->cend - gmap->cstart;
nuclear@0 415
nuclear@0 416 if(!(gmap->glyphs = calloc(gmap->crange, sizeof *gmap->glyphs))) {
nuclear@0 417 fperror("failed to allocate glyph info");
nuclear@0 418 goto err;
nuclear@0 419 }
nuclear@0 420
nuclear@0 421 while(glyphs) {
nuclear@0 422 struct glyph *g = glyphs;
nuclear@0 423 glyphs = glyphs->next;
nuclear@0 424
nuclear@0 425 gmap->glyphs[g->code - gmap->cstart] = *g;
nuclear@0 426 free(g);
nuclear@0 427 }
nuclear@0 428 return gmap;
nuclear@0 429
nuclear@0 430 err:
nuclear@0 431 dtx_free_glyphmap(gmap);
nuclear@0 432 while(glyphs) {
nuclear@0 433 void *tmp = glyphs;
nuclear@0 434 glyphs = glyphs->next;
nuclear@0 435 free(tmp);
nuclear@0 436 }
nuclear@0 437 return 0;
nuclear@0 438 }
nuclear@0 439
nuclear@0 440 int dtx_save_glyphmap(const char *fname, const struct dtx_glyphmap *gmap)
nuclear@0 441 {
nuclear@0 442 FILE *fp;
nuclear@0 443 int res;
nuclear@0 444
nuclear@0 445 if(!(fp = fopen(fname, "wb"))) {
nuclear@0 446 fprintf(stderr, "%s: failed to open file: %s: %s\n", __FUNCTION__, fname, strerror(errno));
nuclear@0 447 return -1;
nuclear@0 448 }
nuclear@0 449 res = dtx_save_glyphmap_stream(fp, gmap);
nuclear@0 450 fclose(fp);
nuclear@0 451 return res;
nuclear@0 452 }
nuclear@0 453
nuclear@0 454 int dtx_save_glyphmap_stream(FILE *fp, const struct dtx_glyphmap *gmap)
nuclear@0 455 {
nuclear@0 456 int i, num_pixels;
nuclear@0 457 struct glyph *g = gmap->glyphs;
nuclear@0 458
nuclear@0 459 fprintf(fp, "P6\n%d %d\n", gmap->xsz, gmap->ysz);
nuclear@0 460 for(i=0; i<gmap->crange; i++) {
nuclear@0 461 fprintf(fp, "# %d: %fx%f+%f+%f\n", g->code, g->width, g->height, g->x, g->y);
nuclear@0 462 g++;
nuclear@0 463 }
nuclear@0 464 fprintf(fp, "255\n");
nuclear@0 465
nuclear@0 466 num_pixels = gmap->xsz * gmap->ysz;
nuclear@0 467 for(i=0; i<num_pixels; i++) {
nuclear@0 468 int c = gmap->pixels[i];
nuclear@0 469 fputc(c, fp);
nuclear@0 470 fputc(c, fp);
nuclear@0 471 fputc(c, fp);
nuclear@0 472 }
nuclear@0 473 return 0;
nuclear@0 474 }
nuclear@0 475
nuclear@0 476
nuclear@0 477 void dtx_use_font(struct dtx_font *fnt, int sz)
nuclear@0 478 {
nuclear@0 479 dtx_gl_init();
nuclear@0 480
nuclear@0 481 dtx_font = fnt;
nuclear@0 482 dtx_font_sz = sz;
nuclear@0 483 }
nuclear@0 484
nuclear@0 485 float dtx_line_height(void)
nuclear@0 486 {
nuclear@0 487 struct dtx_glyphmap *gmap = dtx_get_font_glyphmap(dtx_font, dtx_font_sz, '\n');
nuclear@0 488
nuclear@0 489 return gmap->line_advance;
nuclear@0 490 }
nuclear@0 491
nuclear@0 492 float dtx_baseline(void)
nuclear@0 493 {
nuclear@0 494 struct dtx_glyphmap *gmap = dtx_get_font_glyphmap(dtx_font, dtx_font_sz, '\n');
nuclear@0 495
nuclear@0 496 return gmap->baseline;
nuclear@0 497 }
nuclear@0 498
nuclear@0 499 void dtx_glyph_box(int code, struct dtx_box *box)
nuclear@0 500 {
nuclear@0 501 int cidx;
nuclear@0 502 struct dtx_glyphmap *gmap;
nuclear@0 503 gmap = dtx_get_font_glyphmap(dtx_font, dtx_font_sz, code);
nuclear@0 504
nuclear@0 505 cidx = code - gmap->cstart;
nuclear@0 506
nuclear@0 507 box->x = gmap->glyphs[cidx].orig_x;
nuclear@0 508 box->y = gmap->glyphs[cidx].orig_y;
nuclear@0 509 box->width = gmap->glyphs[cidx].width;
nuclear@0 510 box->height = gmap->glyphs[cidx].height;
nuclear@0 511 }
nuclear@0 512
nuclear@0 513 float dtx_glyph_width(int code)
nuclear@0 514 {
nuclear@0 515 struct dtx_box box;
nuclear@0 516 dtx_glyph_box(code, &box);
nuclear@0 517 return box.width;
nuclear@0 518 }
nuclear@0 519
nuclear@0 520 float dtx_glyph_height(int code)
nuclear@0 521 {
nuclear@0 522 struct dtx_box box;
nuclear@0 523 dtx_glyph_box(code, &box);
nuclear@0 524 return box.height;
nuclear@0 525 }
nuclear@0 526
nuclear@0 527 void dtx_string_box(const char *str, struct dtx_box *box)
nuclear@0 528 {
nuclear@0 529 int code;
nuclear@0 530 float pos_x = 0.0f, pos_y = 0.0f;
nuclear@0 531 struct glyph *g = 0;
nuclear@0 532 float x0, y0, x1, y1;
nuclear@0 533
nuclear@0 534 x0 = y0 = FLT_MAX;
nuclear@0 535 x1 = y1 = -FLT_MAX;
nuclear@0 536
nuclear@0 537 while(*str) {
nuclear@0 538 float px, py;
nuclear@0 539 struct dtx_glyphmap *gmap;
nuclear@0 540
nuclear@0 541 code = dtx_utf8_char_code(str);
nuclear@0 542 str = dtx_utf8_next_char((char*)str);
nuclear@0 543
nuclear@0 544 px = pos_x;
nuclear@0 545 py = pos_y;
nuclear@0 546
nuclear@0 547 if((gmap = dtx_proc_char(code, &pos_x, &pos_y))) {
nuclear@0 548 g = gmap->glyphs + code - gmap->cstart;
nuclear@0 549
nuclear@0 550 if(px + g->orig_x < x0) {
nuclear@0 551 x0 = px + g->orig_x;
nuclear@0 552 }
nuclear@0 553 if(py - g->orig_y < y0) {
nuclear@0 554 y0 = py - g->orig_y;
nuclear@0 555 }
nuclear@0 556 if(px + g->orig_x + g->width > x1) {
nuclear@0 557 x1 = px + g->orig_x + g->width;
nuclear@0 558 }
nuclear@0 559 if(py - g->orig_y + g->height > y1) {
nuclear@0 560 y1 = py - g->orig_y + g->height;
nuclear@0 561 }
nuclear@0 562 }
nuclear@0 563 }
nuclear@0 564
nuclear@0 565 box->x = x0;
nuclear@0 566 box->y = y0;
nuclear@0 567 box->width = x1 - x0;
nuclear@0 568 box->height = y1 - y0;
nuclear@0 569 }
nuclear@0 570
nuclear@0 571 float dtx_string_width(const char *str)
nuclear@0 572 {
nuclear@0 573 struct dtx_box box;
nuclear@0 574
nuclear@0 575 dtx_string_box(str, &box);
nuclear@0 576 return box.width;
nuclear@0 577 }
nuclear@0 578
nuclear@0 579 float dtx_string_height(const char *str)
nuclear@0 580 {
nuclear@0 581 struct dtx_box box;
nuclear@0 582
nuclear@0 583 dtx_string_box(str, &box);
nuclear@0 584 return box.height;
nuclear@0 585 }
nuclear@0 586
nuclear@0 587 float dtx_char_pos(const char *str, int n)
nuclear@0 588 {
nuclear@0 589 int i;
nuclear@0 590 float pos = 0.0;
nuclear@0 591 struct dtx_glyphmap *gmap;
nuclear@0 592
nuclear@0 593 for(i=0; i<n; i++) {
nuclear@0 594 int code = dtx_utf8_char_code(str);
nuclear@0 595 str = dtx_utf8_next_char((char*)str);
nuclear@0 596
nuclear@0 597 gmap = dtx_get_font_glyphmap(dtx_font, dtx_font_sz, code);
nuclear@0 598 pos += gmap->glyphs[i].advance;
nuclear@0 599 }
nuclear@0 600 return pos;
nuclear@0 601 }
nuclear@0 602
nuclear@0 603 int dtx_char_at_pt(const char *str, float pt)
nuclear@0 604 {
nuclear@0 605 int i;
nuclear@0 606 float prev_pos = 0.0f, pos = 0.0f;
nuclear@0 607 struct dtx_glyphmap *gmap;
nuclear@0 608
nuclear@0 609 for(i=0; *str; i++) {
nuclear@0 610 int code = dtx_utf8_char_code(str);
nuclear@0 611 str = dtx_utf8_next_char((char*)str);
nuclear@0 612
nuclear@0 613 gmap = dtx_get_font_glyphmap(dtx_font, dtx_font_sz, code);
nuclear@0 614 pos += gmap->glyphs[i].advance;
nuclear@0 615
nuclear@0 616 if(fabs(pt - prev_pos) < fabs(pt - pos)) {
nuclear@0 617 break;
nuclear@0 618 }
nuclear@0 619 prev_pos = pos;
nuclear@0 620 }
nuclear@0 621 return i;
nuclear@0 622 }
nuclear@0 623
nuclear@0 624 struct dtx_glyphmap *dtx_proc_char(int code, float *xpos, float *ypos)
nuclear@0 625 {
nuclear@0 626 struct dtx_glyphmap *gmap;
nuclear@0 627 gmap = dtx_get_font_glyphmap(dtx_font, dtx_font_sz, code);
nuclear@0 628
nuclear@0 629 switch(code) {
nuclear@0 630 case '\n':
nuclear@0 631 *xpos = 0.0;
nuclear@0 632 if(gmap) {
nuclear@0 633 *ypos -= gmap->line_advance;
nuclear@0 634 }
nuclear@0 635 return 0;
nuclear@0 636
nuclear@0 637 case '\t':
nuclear@0 638 if(gmap) {
nuclear@0 639 *xpos = (fmod(*xpos, 4.0) + 4.0) * gmap->glyphs[0].advance;
nuclear@0 640 }
nuclear@0 641 return 0;
nuclear@0 642
nuclear@0 643 case '\r':
nuclear@0 644 *xpos = 0.0;
nuclear@0 645 return 0;
nuclear@0 646
nuclear@0 647 default:
nuclear@0 648 break;
nuclear@0 649 }
nuclear@0 650
nuclear@0 651 if(gmap) {
nuclear@0 652 *xpos += gmap->glyphs[code - gmap->cstart].advance;
nuclear@0 653 }
nuclear@0 654 return gmap;
nuclear@0 655 }
nuclear@0 656
nuclear@0 657 static void calc_best_size(int total_width, int max_glyph_height, int padding, int pow2, int *imgw, int *imgh)
nuclear@0 658 {
nuclear@0 659 int xsz, ysz, num_rows;
nuclear@0 660 float aspect;
nuclear@0 661
nuclear@0 662 for(xsz=2; xsz<=MAX_IMG_WIDTH; xsz *= 2) {
nuclear@0 663 num_rows = total_width / xsz + 1;
nuclear@0 664
nuclear@0 665 /* take into account the one extra padding for each row after the first */
nuclear@0 666 num_rows = (total_width + padding * (num_rows - 1)) / xsz + 1;
nuclear@0 667
nuclear@0 668 ysz = num_rows * (max_glyph_height + padding) + padding;
nuclear@0 669 if(pow2) {
nuclear@0 670 ysz = next_pow2(ysz);
nuclear@0 671 }
nuclear@0 672 aspect = (float)xsz / (float)ysz;
nuclear@0 673
nuclear@0 674 if(aspect >= 1.0) {
nuclear@0 675 break;
nuclear@0 676 }
nuclear@0 677 }
nuclear@0 678
nuclear@0 679 if(xsz > MAX_IMG_WIDTH) {
nuclear@0 680 xsz = MAX_IMG_WIDTH;
nuclear@0 681 }
nuclear@0 682
nuclear@0 683 *imgw = xsz;
nuclear@0 684 *imgh = ysz;
nuclear@0 685 }
nuclear@0 686
nuclear@0 687
nuclear@0 688 static int next_pow2(int x)
nuclear@0 689 {
nuclear@0 690 x--;
nuclear@0 691 x = (x >> 1) | x;
nuclear@0 692 x = (x >> 2) | x;
nuclear@0 693 x = (x >> 4) | x;
nuclear@0 694 x = (x >> 8) | x;
nuclear@0 695 x = (x >> 16) | x;
nuclear@0 696 return x + 1;
nuclear@0 697 }