1 #include <lib/gdi/font.h>
10 // use this for init Freetype...
12 #include FT_FREETYPE_H
14 #include <lib/base/eerror.h>
15 #include <lib/gdi/lcd.h>
16 #include <lib/gdi/grc.h>
17 #include <lib/base/elock.h>
18 #include <lib/base/init.h>
19 #include <lib/base/init_num.h>
21 //#define HAVE_FRIBIDI
22 // until we have it in the cdk
25 #include <fribidi/fribidi.h>
30 fontRenderClass *fontRenderClass::instance;
32 static pthread_mutex_t ftlock=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
33 static pthread_mutex_t refcntlck=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
35 static FTC_Font cache_current_font=0;
37 struct fntColorCacheKey
40 fntColorCacheKey(const gRGB &start, const gRGB &end)
41 : start(start), end(end)
44 bool operator <(const fntColorCacheKey &c) const
48 else if (start == c.start)
54 std::map<fntColorCacheKey,gLookup> colorcache;
56 static gLookup &getColor(const gPalette &pal, const gRGB &start, const gRGB &end)
58 fntColorCacheKey key(start, end);
59 std::map<fntColorCacheKey,gLookup>::iterator i=colorcache.find(key);
60 if (i != colorcache.end())
62 gLookup &n=colorcache.insert(std::pair<fntColorCacheKey,gLookup>(key,gLookup())).first->second;
63 // eDebug("[FONT] creating new font color cache entry %02x%02x%02x%02x .. %02x%02x%02x%02x", start.a, start.r, start.g, start.b,
64 // end.a, end.r, end.g, end.b);
65 n.build(16, pal, start, end);
66 // for (int i=0; i<16; i++)
67 // eDebugNoNewLine("%02x|%02x%02x%02x%02x ", (int)n.lookup[i], pal.data[n.lookup[i]].a, pal.data[n.lookup[i]].r, pal.data[n.lookup[i]].g, pal.data[n.lookup[i]].b);
72 fontRenderClass *fontRenderClass::getInstance()
77 FT_Error myFTC_Face_Requester(FTC_FaceID face_id,
79 FT_Pointer request_data,
82 return ((fontRenderClass*)request_data)->FTC_Face_Requester(face_id, aface);
86 FT_Error fontRenderClass::FTC_Face_Requester(FTC_FaceID face_id, FT_Face* aface)
88 fontListEntry *font=(fontListEntry *)face_id;
92 // eDebug("[FONT] FTC_Face_Requester (%s)", font->face.c_str());
95 if ((error=FT_New_Face(library, font->filename.c_str(), 0, aface)))
97 eDebug(" failed: %s", strerror(error));
100 FT_Select_Charmap(*aface, ft_encoding_unicode);
104 FTC_FaceID fontRenderClass::getFaceID(const std::string &face)
106 for (fontListEntry *f=font; f; f=f->next)
109 return (FTC_FaceID)f;
114 FT_Error fontRenderClass::getGlyphBitmap(FTC_Image_Desc *font, FT_ULong glyph_index, FTC_SBit *sbit)
116 FT_Error res=FTC_SBit_Cache_Lookup(sbitsCache, font, glyph_index, sbit);
120 std::string fontRenderClass::AddFont(const std::string &filename, const std::string &name, int scale)
122 eDebugNoNewLine("[FONT] adding font %s...", filename.c_str());
125 fontListEntry *n=new fontListEntry;
129 singleLock s(ftlock);
131 if ((error=FT_New_Face(library, filename.c_str(), 0, &face)))
132 eFatal(" failed: %s", strerror(error));
134 n->filename=filename;
139 eDebug("OK (%s)", n->face.c_str());
145 fontRenderClass::fontListEntry::~fontListEntry()
149 fontRenderClass::fontRenderClass(): fb(fbClass::getInstance())
152 eDebug("[FONT] initializing lib...");
154 if (FT_Init_FreeType(&library))
156 eDebug("[FONT] initializing failed.");
160 eDebug("[FONT] loading fonts...");
164 int maxbytes=4*1024*1024;
165 eDebug("[FONT] Intializing font cache, using max. %dMB...", maxbytes/1024/1024);
168 if (FTC_Manager_New(library, 8, 8, maxbytes, myFTC_Face_Requester, this, &cacheManager))
170 eDebug("[FONT] initializing font cache failed!");
175 eDebug("[FONT] initializing font cache manager error.");
178 if (FTC_SBit_Cache_New(cacheManager, &sbitsCache))
180 eDebug("[FONT] initializing font cache sbit failed!");
183 if (FTC_Image_Cache_New(cacheManager, &imageCache))
185 eDebug("[FONT] initializing font cache imagecache failed!");
191 float fontRenderClass::getLineHeight(const gFont& font)
196 getFont(fnt, font.family.c_str(), font.pointSize);
199 singleLock s(ftlock);
200 FT_Face current_face;
201 if (FTC_Manager_Lookup_Size(cacheManager, &fnt->font.font, ¤t_face, &fnt->size)<0)
204 eDebug("FTC_Manager_Lookup_Size failed!");
207 int linegap=current_face->size->metrics.height-(current_face->size->metrics.ascender+current_face->size->metrics.descender);
208 float height=(current_face->size->metrics.ascender+current_face->size->metrics.descender+linegap/2.0)/64;
214 fontRenderClass::~fontRenderClass()
216 singleLock s(ftlock);
219 fontListEntry *f=font;
223 // auskommentiert weil freetype und enigma die kritische masse des suckens ueberschreiten.
224 // FTC_Manager_Done(cacheManager);
225 // FT_Done_FreeType(library);
228 int fontRenderClass::getFont(ePtr<Font> &font, const std::string &face, int size, int tabwidth)
230 FTC_FaceID id=getFaceID(face);
236 font = new Font(this, id, size * ((fontListEntry*)id)->scale / 100, tabwidth);
242 Font::Font(fontRenderClass *render, FTC_FaceID faceid, int isize, int tw): tabwidth(tw)
245 font.font.face_id=faceid;
246 font.font.pix_width = isize;
247 font.font.pix_height = isize;
248 font.image_type = ftc_image_grays;
252 // font.image_type |= ftc_image_flag_autohinted;
255 FT_Error Font::getGlyphBitmap(FT_ULong glyph_index, FTC_SBit *sbit)
257 return renderer->getGlyphBitmap(&font, glyph_index, sbit);
264 DEFINE_REF(eTextPara);
266 int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt glyphIndex, int flags, int rflags)
269 if (current_font->getGlyphBitmap(glyphIndex, &glyph))
282 glyphString::reverse_iterator i(glyphs.rbegin());
283 while (i != glyphs.rend())
285 if (i->flags&(GS_ISSPACE|GS_ISFIRST))
290 if (i != glyphs.rend()
291 && ((i->flags&(GS_ISSPACE|GS_ISFIRST))==GS_ISSPACE)
295 int linelength=cursor.x()-i->x;
296 i->flags|=GS_ISFIRST;
297 ePoint offset=ePoint(i->x, i->y);
304 i->bbox.moveBy(-offset.x(), -offset.y());
306 while (i-- != glyphs.rbegin()); // rearrange them into the next line
307 cursor+=ePoint(linelength, 0); // put the cursor after that line
319 int xadvance=glyph->xadvance, kern=0;
321 if (previous && use_kerning)
324 FT_Get_Kerning(current_face, previous, glyphIndex, ft_kerning_default, &delta);
329 ng.bbox.setLeft( (flags&GS_ISFIRST|cursor.x()-1)+glyph->left );
330 ng.bbox.setTop( cursor.y() - glyph->top );
331 ng.bbox.setWidth( glyph->width );
332 ng.bbox.setHeight( glyph->height );
335 ng.bbox.setWidth(xadvance);
337 ng.x=cursor.x()+kern;
340 ng.font=current_font;
341 ng.glyph_index=glyphIndex;
343 glyphs.push_back(ng);
345 cursor+=ePoint(xadvance, 0);
350 void eTextPara::calc_bbox()
352 boundBox.setLeft( 32000 );
353 boundBox.setTop( 32000 );
354 boundBox.setRight( -32000 ); // for each glyph image, compute its bounding box, translate it,
355 boundBox.setBottom( -32000 );
356 // and grow the string bbox
358 for ( glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
360 if ( i->flags & GS_ISSPACE )
362 if ( i->bbox.left() < boundBox.left() )
363 boundBox.setLeft( i->bbox.left() );
364 if ( i->bbox.top() < boundBox.top() )
365 boundBox.setTop( i->bbox.top() );
366 if ( i->bbox.right() > boundBox.right() )
367 boundBox.setRight( i->bbox.right() );
368 if ( i->bbox.bottom() > boundBox.bottom() )
369 boundBox.setBottom( i->bbox.bottom() );
371 // eDebug("boundBox left = %i, top = %i, right = %i, bottom = %i", boundBox.left(), boundBox.top(), boundBox.right(), boundBox.bottom() );
376 void eTextPara::newLine(int flags)
378 if (maximum.width()<cursor.x())
379 maximum.setWidth(cursor.x());
382 int linegap=current_face->size->metrics.height-(current_face->size->metrics.ascender+current_face->size->metrics.descender);
383 cursor+=ePoint(0, (current_face->size->metrics.ascender+current_face->size->metrics.descender+linegap*1/2)>>6);
384 if (maximum.height()<cursor.y())
385 maximum.setHeight(cursor.y());
389 eTextPara::~eTextPara()
394 void eTextPara::setFont(const gFont *font)
396 ePtr<Font> fnt, replacement;
397 fontRenderClass::getInstance()->getFont(fnt, font->family.c_str(), font->pointSize);
399 eWarning("FONT '%s' MISSING!", font->family.c_str());
400 fontRenderClass::getInstance()->getFont(replacement, replacement_facename.c_str(), font->pointSize);
401 setFont(fnt, replacement);
404 std::string eTextPara::replacement_facename;
406 void eTextPara::setFont(Font *fnt, Font *replacement)
411 replacement_font=replacement;
412 singleLock s(ftlock);
414 // we ask for replacment_font first becauseof the cache
415 if (replacement_font)
417 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager,
418 &replacement_font->font.font, &replacement_face,
419 &replacement_font->size)<0)
421 eDebug("FTC_Manager_Lookup_Size failed!");
427 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, ¤t_font->font.font, ¤t_face, ¤t_font->size)<0)
429 eDebug("FTC_Manager_Lookup_Size failed!");
433 cache_current_font=¤t_font->font.font;
435 use_kerning=FT_HAS_KERNING(current_face);
439 shape (std::vector<unsigned long> &string, const std::vector<unsigned long> &text);
441 int eTextPara::renderString(const std::string &string, int rflags)
443 singleLock s(ftlock);
450 cursor=ePoint(area.x(), area.y()+(current_face->size->metrics.ascender>>6));
454 if (¤t_font->font.font != cache_current_font)
456 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, ¤t_font->font.font, ¤t_face, ¤t_font->size)<0)
458 eDebug("FTC_Manager_Lookup_Size failed!");
461 cache_current_font=¤t_font->font.font;
464 std::vector<unsigned long> uc_string, uc_visual;
465 uc_string.reserve(string.length());
467 std::string::const_iterator p(string.begin());
469 while(p != string.end())
471 unsigned int unicode=(unsigned char)*p++;
473 if (unicode & 0x80) // we have (hopefully) UTF8 here, and we assume that the encoding is VALID
475 if ((unicode & 0xE0)==0xC0) // two bytes
479 if (p != string.end())
480 unicode|=(*p++)&0x3F;
481 } else if ((unicode & 0xF0)==0xE0) // three bytes
485 if (p != string.end())
486 unicode|=(*p++)&0x3F;
488 if (p != string.end())
489 unicode|=(*p++)&0x3F;
490 } else if ((unicode & 0xF8)==0xF0) // four bytes
494 if (p != string.end())
495 unicode|=(*p++)&0x3F;
497 if (p != string.end())
498 unicode|=(*p++)&0x3F;
500 if (p != string.end())
501 unicode|=(*p++)&0x3F;
504 uc_string.push_back(unicode);
507 std::vector<unsigned long> uc_shape;
509 // character -> glyph conversion
510 shape(uc_shape, uc_string);
512 // now do the usual logical->visual reordering
514 FriBidiCharType dir=FRIBIDI_TYPE_ON;
516 int size=uc_shape.size();
517 uc_visual.resize(size);
518 // gaaanz lahm, aber anders geht das leider nicht, sorry.
519 FriBidiChar array[size], target[size];
520 std::copy(uc_shape.begin(), uc_shape.end(), array);
521 fribidi_log2vis(array, size, &dir, target, 0, 0, 0);
522 uc_visual.assign(target, target+size);
528 glyphs.reserve(uc_visual.size());
532 for (std::vector<unsigned long>::const_iterator i(uc_visual.begin());
533 i != uc_visual.end(); ++i)
536 int flags = nextflags;
538 if (!(rflags&RS_DIRECT))
544 unsigned long c = *(i+1);
563 cursor+=ePoint(current_font->tabwidth, 0);
564 cursor-=ePoint(cursor.x()%current_font->tabwidth, 0);
569 newline:isprintable=0;
571 nextflags|=GS_ISFIRST;
574 case 0x86: case 0xE086:
575 case 0x87: case 0xE087:
576 nprint: isprintable=0;
588 index=(rflags&RS_DIRECT)? *i : FT_Get_Char_Index(current_face, *i);
592 if (replacement_face)
593 index=(rflags&RS_DIRECT)? *i : FT_Get_Char_Index(replacement_face, *i);
596 eDebug("unicode %d ('%c') not present", *i, *i);
598 appendGlyph(replacement_font, replacement_face, index, flags, rflags);
600 appendGlyph(current_font, current_face, index, flags, rflags);
606 if (dir & FRIBIDI_MASK_RTL)
612 void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, const gRGB &foreground)
614 singleLock s(ftlock);
619 if (¤t_font->font.font != cache_current_font)
621 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, ¤t_font->font.font, ¤t_face, ¤t_font->size)<0)
623 eDebug("FTC_Manager_Lookup_Size failed!");
626 cache_current_font=¤t_font->font.font;
629 ePtr<gPixmap> target;
630 dc.getPixmap(target);
631 gSurface *surface = target->surface;
635 gColor *lookup8, lookup8_invert[16];
636 gColor *lookup8_normal=0;
638 __u32 lookup32_normal[16], lookup32_invert[16], *lookup32;
640 if (surface->bpp == 8)
642 if (surface->clut.data)
644 lookup8_normal=getColor(surface->clut, background, foreground).lookup;
648 lookup8_invert[i] = lookup8_normal[i^0xF];
653 } else if (surface->bpp == 32)
656 if (surface->clut.data)
658 lookup8=getColor(surface->clut, background, foreground).lookup;
659 for (int i=0; i<16; ++i)
660 lookup32_normal[i]=((surface->clut.data[lookup8[i]].a<<24)|
661 (surface->clut.data[lookup8[i]].r<<16)|
662 (surface->clut.data[lookup8[i]].g<<8)|
663 (surface->clut.data[lookup8[i]].b))^0xFF000000;
666 for (int i=0; i<16; ++i)
667 lookup32_normal[i]=(0x010101*i)|0xFF000000;
669 for (int i=0; i<16; ++i)
670 lookup32_invert[i]=lookup32_normal[i^0xF];
673 eWarning("can't render to %dbpp", surface->bpp);
677 gRegion area(eRect(0, 0, surface->x, surface->y));
678 gRegion clip = dc.getClip() & area;
680 int buffer_stride=surface->stride;
682 for (glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
684 if (!(i->flags & GS_INVERT))
686 lookup8 = lookup8_normal;
687 lookup32 = lookup32_normal;
690 lookup8 = lookup8_invert;
691 lookup32 = lookup32_invert;
694 static FTC_SBit glyph_bitmap;
695 if (fontRenderClass::instance->getGlyphBitmap(&i->font->font, i->glyph_index, &glyph_bitmap))
697 int rx=i->x+glyph_bitmap->left + offset.x();
698 int ry=i->y-glyph_bitmap->top + offset.y();
700 __u8 *d=(__u8*)(surface->data)+buffer_stride*ry+rx*surface->bypp;
701 __u8 *s=glyph_bitmap->buffer;
702 register int sx=glyph_bitmap->width;
703 int sy=glyph_bitmap->height;
704 if ((sy+ry) >= clip.extends.bottom())
705 sy=clip.extends.bottom()-ry;
706 if ((sx+rx) >= clip.extends.right())
707 sx=clip.extends.right()-rx;
708 if (rx < clip.extends.left())
710 int diff=clip.extends.left()-rx;
714 d+=diff*surface->bypp;
716 if (ry < clip.extends.top())
718 int diff=clip.extends.top()-ry;
719 s+=diff*glyph_bitmap->pitch;
722 d+=diff*buffer_stride;
725 for (int ay=0; ay<sy; ay++)
727 if (!opcode) // 4bit lookup to 8bit
732 for (ax=0; ax<sx; ax++)
734 register int b=(*s++)>>4;
740 } else if (opcode == 1) // 8bit direct
744 for (ax=0; ax<sx; ax++)
751 register __u32 *td=(__u32*)d;
753 for (ax=0; ax<sx; ax++)
755 register int b=(*s++)>>4;
762 s+=glyph_bitmap->pitch-sx;
768 void eTextPara::realign(int dir) // der code hier ist ein wenig merkwuerdig.
770 glyphString::iterator begin(glyphs.begin()), c(glyphs.begin()), end(glyphs.begin()), last;
773 while (c != glyphs.end())
776 int numspaces=0, num=0;
779 ASSERT( end != glyphs.end());
785 } while ((end != glyphs.end()) && (!(end->flags&GS_ISFIRST)));
786 // end zeigt jetzt auf begin der naechsten zeile
788 for (c=begin; c!=end; ++c)
790 // space am zeilenende skippen
791 if ((c==last) && (c->flags&GS_ISSPACE))
794 if (c->flags&GS_ISSPACE)
800 if (!num) // line mit nur einem space
808 int offset=area.width()-linelength;
814 begin->bbox.moveBy(offset-begin->x,0);
823 if (end == glyphs.end()) // letzte zeile linksbuendig lassen
830 if ((!spacemode) && (num<2))
832 int off=(area.width()-linelength)*256/(spacemode?numspaces:(num-1));
837 if ((!spacemode) || (begin->flags&GS_ISSPACE))
840 begin->bbox.moveBy(curoff>>8,0);
853 void eTextPara::clear()
855 singleLock s(ftlock);
858 replacement_font = 0;
863 eAutoInitP0<fontRenderClass> init_fontRenderClass(eAutoInitNumbers::graphic-1, "Font Render Class");