From 124e4cd78814e368488d8e86c15f95223f365a44 Mon Sep 17 00:00:00 2001 From: John Mark Bell Date: Wed, 5 Jan 2011 21:02:22 +0000 Subject: Atari frontend (credit: Ole Loots) svn path=/trunk/netsurf/; revision=11218 --- atari/plot/font_freetype.c | 512 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 512 insertions(+) create mode 100644 atari/plot/font_freetype.c (limited to 'atari/plot/font_freetype.c') diff --git a/atari/plot/font_freetype.c b/atari/plot/font_freetype.c new file mode 100644 index 000000000..0a1addfdf --- /dev/null +++ b/atari/plot/font_freetype.c @@ -0,0 +1,512 @@ +/* + * Copyright 2005 James Bursa + * 2008 Vincent Sanders + * 2011 Ole Loots + * This file is part of NetSurf, http://www.netsurf-browser.org/ + * + * NetSurf is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; version 2 of the License. + * + * NetSurf is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + */ + +#include +#include +#include +#include +#include +#include +#include +#include +#include FT_CACHE_H + +#include "desktop/plot_style.h" +#include "image/bitmap.h" +#include "atari/bitmap.h" +#include "atari/plot/plotter.h" +#include "atari/plot/font_freetype.h" +#include "atari/gui.h" +#include "atari/font.h" +#include "atari/options.h" +#include "atari/findfile.h" +#include "utils/utf8.h" +#include "utils/log.h" + +#define DEJAVU_PATH "/usr/share/fonts/truetype/ttf-dejavu/" + +static FT_Library library; +static FTC_Manager ft_cmanager; +static FTC_CMapCache ft_cmap_cache ; +static FTC_ImageCache ft_image_cache; + +int ft_load_type; + +/* cache manager faceID data to create freetype faceid on demand */ +typedef struct ftc_faceid_s { + char *fontfile; /* path to font */ + int index; /* index of font */ + int cidx; /* character map index for unicode */ +} ftc_faceid_t; + +static struct bitmap * fontbmp; + +static ftc_faceid_t *font_faces[FONT_FACE_COUNT]; + +static int dtor( FONT_PLOTTER self ); +static int str_width( FONT_PLOTTER self,const plot_font_style_t *fstyle, + const char * str, size_t length, int * width ); +static int str_split( FONT_PLOTTER self, const plot_font_style_t *fstyle, + const char *string, size_t length,int x, + size_t *char_offset, int *actual_x ); +static int pixel_position( FONT_PLOTTER self, const plot_font_style_t *fstyle, + const char *string, size_t length,int x, + size_t *char_offset, int *actual_x ); +static int text( FONT_PLOTTER self, int x, int y, const char *text, + size_t length, const plot_font_style_t *fstyle ); + +static bool init = false; + + + +/* map cache manager handle to face id */ +static FT_Error ft_face_requester(FTC_FaceID face_id, FT_Library library, FT_Pointer request_data, FT_Face *face ) +{ + FT_Error error; + ftc_faceid_t *ft_face = (ftc_faceid_t *)face_id; + int cidx; + + error = FT_New_Face(library, ft_face->fontfile, ft_face->index, face); + if (error) { + LOG(("Could not find font (code %d)\n", error)); + } else { + error = FT_Select_Charmap(*face, FT_ENCODING_UNICODE); + if (error) { + LOG(("Could not select charmap (code %d)\n", error)); + } else { + for (cidx = 0; cidx < (*face)->num_charmaps; cidx++) { + if ((*face)->charmap == (*face)->charmaps[cidx]) { + ft_face->cidx = cidx; + break; + } + } + } + } + LOG(("Loaded face from %s\n", ft_face->fontfile)); + return error; +} + +/* create new framebuffer face and cause it to be loaded to check its ok */ +static ftc_faceid_t * +ft_new_face(const char *option, const char *resname, const char *fontfile) +{ + ftc_faceid_t *newf; + FT_Error error; + FT_Face aface; + char buf[PATH_MAX]; + char resname2[PATH_MAX]; + + newf = calloc(1, sizeof(ftc_faceid_t)); + if (option != NULL) { + newf->fontfile = strdup(option); + } else { + atari_find_resource(buf, resname, fontfile); + newf->fontfile = strdup(buf); + } + error = FTC_Manager_LookupFace(ft_cmanager, (FTC_FaceID)newf, &aface); + if (error) { + LOG(("Could not find font face %s (code %d)\n", fontfile, error)); + free(newf); + newf = font_faces[FONT_FACE_DEFAULT]; /* use default */ + } + return newf; +} + +static void ft_fill_scalar(const plot_font_style_t *fstyle, FTC_Scaler srec) +{ + int selected_face = FONT_FACE_DEFAULT; + + switch (fstyle->family) { +/* + case PLOT_FONT_FAMILY_CURSIVE: + break; + case PLOT_FONT_FAMILY_FANTASY: + break; +*/ + case PLOT_FONT_FAMILY_SERIF: + if (fstyle->weight >= 700) + selected_face = FONT_FACE_SERIF_BOLD; + else + selected_face = FONT_FACE_SERIF; + + break; + + case PLOT_FONT_FAMILY_MONOSPACE: + selected_face = FONT_FACE_MONOSPACE; + break; + + case PLOT_FONT_FAMILY_SANS_SERIF: + default: + if ((fstyle->flags & FONTF_ITALIC) || (fstyle->flags & FONTF_OBLIQUE)) { + if (fstyle->weight >= 700) + selected_face = FONT_FACE_SANS_SERIF_ITALIC_BOLD; + else + selected_face = FONT_FACE_SANS_SERIF_ITALIC; + } else { + if (fstyle->weight >= 700) + selected_face = FONT_FACE_SANS_SERIF_BOLD; + else + selected_face = FONT_FACE_SANS_SERIF; + } + } + + srec->face_id = (FTC_FaceID)font_faces[selected_face]; + srec->width = srec->height = (fstyle->size * 64) / FONT_SIZE_SCALE; + srec->pixel = 0; + srec->x_res = srec->y_res = 72; +} + +static FT_Glyph ft_getglyph(const plot_font_style_t *fstyle, uint32_t ucs4) +{ + FT_UInt glyph_index; + FTC_ScalerRec srec; + FT_Glyph glyph; + FT_Error error; + ftc_faceid_t *ft_face; + + ft_fill_scalar(fstyle, &srec); + ft_face = (ftc_faceid_t *)srec.face_id; + glyph_index = FTC_CMapCache_Lookup(ft_cmap_cache, srec.face_id, ft_face->cidx, ucs4); + error = FTC_ImageCache_LookupScaler(ft_image_cache, + &srec, + FT_LOAD_RENDER | + FT_LOAD_FORCE_AUTOHINT | + ft_load_type, + glyph_index, + &glyph, + NULL); + + return glyph; +} + + + +/* initialise font handling */ +static bool ft_font_init(void) +{ + FT_Error error; + FT_ULong max_cache_size; + FT_UInt max_faces = 6; + + /* freetype library initialise */ + error = FT_Init_FreeType( &library ); + if (error) { + LOG(("Freetype could not initialised (code %d)\n", error)); + return false; + } + + max_cache_size = 2 * 1024 *1024; /* 2MB should be enough */ + + /* cache manager initialise */ + error = FTC_Manager_New(library, + max_faces, + 0, + max_cache_size, + ft_face_requester, + NULL, + &ft_cmanager); + if (error) { + LOG(("Freetype could not initialise cache manager (code %d)\n", error)); + FT_Done_FreeType(library); + return false; + } + + error = FTC_CMapCache_New(ft_cmanager, &ft_cmap_cache); + error = FTC_ImageCache_New(ft_cmanager, &ft_image_cache); + + font_faces[FONT_FACE_SANS_SERIF] = NULL; + font_faces[FONT_FACE_SANS_SERIF] = ft_new_face( + option_atari_face_sans_serif, + "fonts/ss.ttf", + DEJAVU_PATH"DejaVuSans.ttf" + ); + if (font_faces[FONT_FACE_SANS_SERIF] == NULL) { + LOG(("Could not find default font (code %d)\n", error)); + FTC_Manager_Done(ft_cmanager ); + FT_Done_FreeType(library); + return false; + } + + font_faces[FONT_FACE_SANS_SERIF_BOLD] = + ft_new_face(option_atari_face_sans_serif_bold, + "fonts/ssb.ttf", + DEJAVU_PATH"DejaVuSans-Bold.ttf"); + + font_faces[FONT_FACE_SANS_SERIF_ITALIC] = + ft_new_face(option_atari_face_sans_serif_italic, + "fonts/ssi.ttf", + DEJAVU_PATH"DejaVuSans-Oblique.ttf"); + + font_faces[FONT_FACE_SANS_SERIF_ITALIC_BOLD] = + ft_new_face(option_atari_face_sans_serif_italic_bold, + "fonts/ssib.ttf", + DEJAVU_PATH"DejaVuSans-BoldOblique.ttf"); + + font_faces[FONT_FACE_MONOSPACE] = + ft_new_face(option_atari_face_monospace, + "fonts/mono.ttf", + DEJAVU_PATH"DejaVuSansMono.ttf"); + + font_faces[FONT_FACE_MONOSPACE_BOLD] = + ft_new_face(option_atari_face_monospace_bold, + "fonts/monob.ttf", + DEJAVU_PATH"DejaVuSansMono-Bold.ttf"); + + font_faces[FONT_FACE_SERIF] = + ft_new_face(option_atari_face_serif, + "fonts/s.ttf", + DEJAVU_PATH"DejaVuSerif.ttf"); + + font_faces[FONT_FACE_SERIF_BOLD] = + ft_new_face(option_atari_face_serif_bold, + "fonts/sb.ttf", + DEJAVU_PATH"DejaVuSerif-Bold.ttf"); + + font_faces[FONT_FACE_CURSIVE] = + ft_new_face(option_atari_face_cursive, + "fonts/cursive.ttf", + DEJAVU_PATH"DejaVuSansMono-Oblique.ttf"); + + font_faces[FONT_FACE_FANTASY] = + ft_new_face(option_atari_face_fantasy, + "fonts/fantasy.ttf", + DEJAVU_PATH"DejaVuSerifCondensed-Bold.ttf"); + + /* set the default render mode */ + if (option_atari_font_monochrom == true) + ft_load_type = FT_LOAD_MONOCHROME; + else + ft_load_type = 0; + + return true; +} + + +static bool ft_font_finalise(void) +{ + FTC_Manager_Done(ft_cmanager ); + FT_Done_FreeType(library); + return true; +} + +static int str_width( FONT_PLOTTER self,const plot_font_style_t *fstyle, + const char *string, size_t length, + int *width) +{ + uint32_t ucs4; + size_t nxtchr = 0; + FT_Glyph glyph; + + *width = 0; + while (nxtchr < length) { + ucs4 = utf8_to_ucs4(string + nxtchr, length - nxtchr); + nxtchr = utf8_next(string, length, nxtchr); + + glyph = ft_getglyph(fstyle, ucs4); + if (glyph == NULL) + continue; + *width += glyph->advance.x >> 16; + } + return(1); +} + + +static int str_split( FONT_PLOTTER self, const plot_font_style_t *fstyle, + const char *string, size_t length, + int x, size_t *char_offset, int *actual_x) +{ + uint32_t ucs4; + size_t nxtchr = 0; + int last_space_x = 0; + int last_space_idx = 0; + FT_Glyph glyph; + + *actual_x = 0; + while (nxtchr < length) { + ucs4 = utf8_to_ucs4(string + nxtchr, length - nxtchr); + glyph = ft_getglyph(fstyle, ucs4); + if (glyph == NULL) + continue; + if (ucs4 == 0x20) { + last_space_x = *actual_x; + last_space_idx = nxtchr; + } + *actual_x += glyph->advance.x >> 16; + if (*actual_x > x) { + /* string has exceeded available width return previous space*/ + *actual_x = last_space_x; + *char_offset = last_space_idx; + return true; + } + nxtchr = utf8_next(string, length, nxtchr); + } + *char_offset = nxtchr; + return (1); +} + + +static int pixel_position( FONT_PLOTTER self, const plot_font_style_t *fstyle, + const char *string, size_t length, + int x, size_t *char_offset, int *actual_x) +{ + uint32_t ucs4; + size_t nxtchr = 0; + FT_Glyph glyph; + + *actual_x = 0; + while (nxtchr < length) { + ucs4 = utf8_to_ucs4(string + nxtchr, length - nxtchr); + glyph = ft_getglyph(fstyle, ucs4); + if (glyph == NULL) + continue; + *actual_x += glyph->advance.x >> 16; + if (*actual_x > x) + break; + nxtchr = utf8_next(string, length, nxtchr); + } + *char_offset = nxtchr; + return ( 1 ); +} + +static void draw_glyph8(FONT_PLOTTER self, GRECT * loc, uint8_t * pixdata, int pitch, uint32_t colour) +{ + GRECT clip; + uint32_t * linebuf; + uint32_t fontpix; + size_t bmpstride; + int xloop,yloop,xoff,yoff; + int x,y,w,h; + + x = loc->g_x; + y = loc->g_y; + w = loc->g_w; + h = loc->g_h; + + clip.g_x = self->plotter->clipping.x0; + clip.g_y = self->plotter->clipping.y0; + clip.g_w = self->plotter->clipping.x1 - self->plotter->clipping.x0; + clip.g_h = self->plotter->clipping.y1 - self->plotter->clipping.y0; + + if( !rc_intersect( &clip, loc ) ){ + return; + } + + assert( loc->g_w > 0 ); + assert( loc->g_h > 0 ); + xoff = loc->g_x - x; + yoff = loc->g_y - y; + + if (h > loc->g_h) + h = loc->g_h; + + if (w > loc->g_w) + w = loc->g_w; + fontbmp = bitmap_realloc( w, h, + fontbmp->bpp, w * fontbmp->bpp, + BITMAP_GROW, fontbmp ); + assert( fontbmp ); + assert( fontbmp->pixdata ); + bmpstride = bitmap_get_rowstride(fontbmp); + for( yloop = 0; yloop < h; yloop++) { + linebuf = (uint32_t *)(fontbmp->pixdata + (bmpstride * yloop)); + for(xloop = 0; xloop < w; xloop++){ + fontpix = (uint32_t)(pixdata[(( yoff + yloop ) * pitch) + xloop + xoff]); + linebuf[xloop] = (uint32_t)(colour | fontpix); + } + } + self->plotter->bitmap( self->plotter, fontbmp, loc->g_x, loc->g_y, 0, 0); +} + +static int text( FONT_PLOTTER self, int x, int y, const char *text, size_t length, + const plot_font_style_t *fstyle ) +{ + uint32_t ucs4; + size_t nxtchr = 0; + FT_Glyph glyph; + FT_BitmapGlyph bglyph; + GRECT loc, clip; + uint32_t c = fstyle->foreground ; + /* in -> BGR */ + /* out -> ARGB */ + c = ABGR_TO_RGB(c); + + clip.g_x = self->plotter->clipping.x0; + clip.g_y = self->plotter->clipping.y0; + clip.g_w = self->plotter->clipping.x1 - self->plotter->clipping.x0; + clip.g_h = self->plotter->clipping.y1 - self->plotter->clipping.y0; + while (nxtchr < length) { + ucs4 = utf8_to_ucs4(text + nxtchr, length - nxtchr); + nxtchr = utf8_next(text, length, nxtchr); + + glyph = ft_getglyph(fstyle, ucs4); + if (glyph == NULL) + continue; + + if (glyph->format == FT_GLYPH_FORMAT_BITMAP) { + bglyph = (FT_BitmapGlyph)glyph; + loc.g_x = x + bglyph->left; + loc.g_y = y - bglyph->top; + loc.g_w = bglyph->bitmap.width; + loc.g_h = bglyph->bitmap.rows; + + if (bglyph->bitmap.pixel_mode == FT_PIXEL_MODE_MONO) { + assert( 1 == 0 ); + } else { + if( loc.g_w > 0) { + draw_glyph8( self, + &loc, + bglyph->bitmap.buffer, + bglyph->bitmap.pitch, + c + ); + } + } + } + x += glyph->advance.x >> 16; + + } + return( 0 ); +} + + +int ctor_font_plotter_freetype( FONT_PLOTTER self ) +{ + self->dtor = dtor; + self->str_width = str_width; + self->str_split = str_split; + self->pixel_position = pixel_position; + self->text = text; + LOG(("%s: %s\n", (char*)__FILE__, __FUNCTION__)); + if( !init ) { + ft_font_init(); + fontbmp = bitmap_create(48, 48, 0); + fontbmp->opaque = false; + init = true; + } + + return( 1 ); +} + +static int dtor( FONT_PLOTTER self ) +{ + ft_font_finalise(); + if( fontbmp == NULL ) + bitmap_destroy( fontbmp ); + return( 1 ); +} \ No newline at end of file -- cgit v1.2.3