code.vuplus.com Git - vuplus_dvbapp/blob - lib/gdi/font.cpp

   1 #include <lib/gdi/font.h>
   2
   3 #include <stdio.h>
   4 #include <stdlib.h>
   5 #include <ctype.h>
   6 #include <pthread.h>
   7 #include <sys/types.h>
   8 #include <unistd.h>
   9
  10 // use this for init Freetype...
  11 #include <ft2build.h>
  12 #include FT_FREETYPE_H
  13 #ifdef HAVE_FREETYPE2
  14 #define FTC_Image_Cache_New(a,b)        FTC_ImageCache_New(a,b)
  15 #define FTC_Image_Cache_Lookup(a,b,c,d) FTC_ImageCache_Lookup(a,b,c,d,NULL)
  16 #define FTC_SBit_Cache_New(a,b)         FTC_SBitCache_New(a,b)
  17 #define FTC_SBit_Cache_Lookup(a,b,c,d)  FTC_SBitCache_Lookup(a,b,c,d,NULL)
  18 #endif
  19
  20 #include <lib/base/eerror.h>
  21 #include <lib/gdi/lcd.h>
  22 #include <lib/gdi/grc.h>
  23 #include <lib/base/elock.h>
  24 #include <lib/base/init.h>
  25 #include <lib/base/init_num.h>
  26
  27 #define HAVE_FRIBIDI
  28 // until we have it in the cdk
  29
  30 #ifdef HAVE_FRIBIDI
  31 #include <fribidi/fribidi.h>
  32 #endif
  33
  34 #include <map>
  35
  36 fontRenderClass *fontRenderClass::instance;
  37
  38 static pthread_mutex_t ftlock=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
  39
  40 #ifndef HAVE_FREETYPE2
  41 static FTC_Font cache_current_font=0;
  42 #endif
  43
  44 #define RBG565
  45
  46 struct fntColorCacheKey
  47 {
  48         gRGB start, end;
  49         fntColorCacheKey(const gRGB &start, const gRGB &end)
  50                 : start(start), end(end)
  51         {
  52         }
  53         bool operator <(const fntColorCacheKey &c) const
  54         {
  55                 if (start < c.start)
  56                         return 1;
  57                 else if (start == c.start)
  58                         return end < c.end;
  59                 return 0;
  60         }
  61 };
  62
  63 std::map<fntColorCacheKey,gLookup> colorcache;
  64
  65 static gLookup &getColor(const gPalette &pal, const gRGB &start, const gRGB &end)
  66 {
  67         fntColorCacheKey key(start, end);
  68         std::map<fntColorCacheKey,gLookup>::iterator i=colorcache.find(key);
  69         if (i != colorcache.end())
  70                 return i->second;
  71         gLookup &n=colorcache.insert(std::pair<fntColorCacheKey,gLookup>(key,gLookup())).first->second;
  72 //      eDebug("[FONT] creating new font color cache entry %02x%02x%02x%02x .. %02x%02x%02x%02x", start.a, start.r, start.g, start.b,
  73 //              end.a, end.r, end.g, end.b);
  74         n.build(16, pal, start, end);
  75 //      for (int i=0; i<16; i++)
  76 //              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);
  77 //      eDebug("");
  78         return n;
  79 }
  80
  81 fontRenderClass *fontRenderClass::getInstance()
  82 {
  83         return instance;
  84 }
  85
  86 FT_Error myFTC_Face_Requester(FTC_FaceID        face_id,
  87                                                                                                                         FT_Library      library,
  88                                                                                                                         FT_Pointer      request_data,
  89                                                                                                                         FT_Face*                aface)
  90 {
  91         return ((fontRenderClass*)request_data)->FTC_Face_Requester(face_id, aface);
  92 }
  93
  94
  95 FT_Error fontRenderClass::FTC_Face_Requester(FTC_FaceID face_id, FT_Face* aface)
  96 {
  97         fontListEntry *font=(fontListEntry *)face_id;
  98         if (!font)
  99                 return -1;
 100
 101 //      eDebug("[FONT] FTC_Face_Requester (%s)", font->face.c_str());
 102
 103         int error;
 104         if ((error=FT_New_Face(library, font->filename.c_str(), 0, aface)))
 105         {
 106                 eDebug(" failed: %s", strerror(error));
 107                 return error;
 108         }
 109         FT_Select_Charmap(*aface, ft_encoding_unicode);
 110         return 0;
 111 }
 112
 113 FTC_FaceID fontRenderClass::getFaceID(const std::string &face)
 114 {
 115         for (fontListEntry *f=font; f; f=f->next)
 116         {
 117                 if (f->face == face)
 118                         return (FTC_FaceID)f;
 119         }
 120         return 0;
 121 }
 122
 123 FT_Error fontRenderClass::getGlyphBitmap(FTC_Image_Desc *font, FT_ULong glyph_index, FTC_SBit *sbit)
 124 {
 125         FT_Error res=FTC_SBit_Cache_Lookup(sbitsCache, font, glyph_index, sbit);
 126         return res;
 127 }
 128
 129 std::string fontRenderClass::AddFont(const std::string &filename, const std::string &name, int scale)
 130 {
 131         eDebugNoNewLine("[FONT] adding font %s...", filename.c_str());
 132         fflush(stdout);
 133         int error;
 134         fontListEntry *n=new fontListEntry;
 135
 136         n->scale=scale;
 137         FT_Face face;
 138         singleLock s(ftlock);
 139
 140         if ((error=FT_New_Face(library, filename.c_str(), 0, &face)))
 141                 eFatal(" failed: %s", strerror(error));
 142
 143         n->filename=filename;
 144         n->face=name;
 145         FT_Done_Face(face);
 146
 147         n->next=font;
 148         eDebug("OK (%s)", n->face.c_str());
 149         font=n;
 150
 151         return n->face;
 152 }
 153
 154 fontRenderClass::fontListEntry::~fontListEntry()
 155 {
 156 }
 157
 158 fontRenderClass::fontRenderClass(): fb(fbClass::getInstance())
 159 {
 160         instance=this;
 161         eDebug("[FONT] initializing lib...");
 162         {
 163                 if (FT_Init_FreeType(&library))
 164                 {
 165                         eDebug("[FONT] initializing failed.");
 166                         return;
 167                 }
 168         }
 169         eDebug("[FONT] loading fonts...");
 170         fflush(stdout);
 171         font=0;
 172
 173         int maxbytes=4*1024*1024;
 174         eDebug("[FONT] Intializing font cache, using max. %dMB...", maxbytes/1024/1024);
 175         fflush(stdout);
 176         {
 177                 if (FTC_Manager_New(library, 8, 8, maxbytes, myFTC_Face_Requester, this, &cacheManager))
 178                 {
 179                         eDebug("[FONT] initializing font cache failed!");
 180                         return;
 181                 }
 182                 if (!cacheManager)
 183                 {
 184                         eDebug("[FONT] initializing font cache manager error.");
 185                         return;
 186                 }
 187                 if (FTC_SBit_Cache_New(cacheManager, &sbitsCache))
 188                 {
 189                         eDebug("[FONT] initializing font cache sbit failed!");
 190                         return;
 191                 }
 192                 if (FTC_Image_Cache_New(cacheManager, &imageCache))
 193                 {
 194                         eDebug("[FONT] initializing font cache imagecache failed!");
 195                 }
 196         }
 197         return;
 198 }
 199
 200 float fontRenderClass::getLineHeight(const gFont& font)
 201 {
 202         if (!instance)
 203                 return 0;
 204         ePtr<Font> fnt;
 205         getFont(fnt, font.family.c_str(), font.pointSize);
 206         if (!fnt)
 207                 return 0;
 208         singleLock s(ftlock);
 209         FT_Face current_face;
 210 #ifdef HAVE_FREETYPE2
 211         if ((FTC_Manager_LookupFace(cacheManager, fnt->scaler.face_id, &current_face) < 0) ||
 212             (FTC_Manager_LookupSize(cacheManager, &fnt->scaler, &fnt->size) < 0))
 213 #else
 214         if (FTC_Manager_Lookup_Size(cacheManager, &fnt->font.font, &current_face, &fnt->size)<0)
 215 #endif
 216         {
 217                 eDebug("FTC_Manager_Lookup_Size failed!");
 218                 return 0;
 219         }
 220         int linegap=current_face->size->metrics.height-(current_face->size->metrics.ascender+current_face->size->metrics.descender);
 221         float height=(current_face->size->metrics.ascender+current_face->size->metrics.descender+linegap)/64.0;
 222         return height;
 223 }
 224
 225 fontRenderClass::~fontRenderClass()
 226 {
 227         singleLock s(ftlock);
 228         while(font)
 229         {
 230                 fontListEntry *f=font;
 231                 font=font->next;
 232                 delete f;
 233         }
 234 //      auskommentiert weil freetype und enigma die kritische masse des suckens ueberschreiten.
 235 //      FTC_Manager_Done(cacheManager);
 236 //      FT_Done_FreeType(library);
 237 }
 238
 239 int fontRenderClass::getFont(ePtr<Font> &font, const std::string &face, int size, int tabwidth)
 240 {
 241         FTC_FaceID id=getFaceID(face);
 242         if (!id)
 243         {
 244                 font = 0;
 245                 return -1;
 246         }
 247         font = new Font(this, id, size * ((fontListEntry*)id)->scale / 100, tabwidth);
 248         return 0;
 249 }
 250
 251 void addFont(const char *filename, const char *alias, int scale_factor, int is_replacement)
 252 {
 253         fontRenderClass::getInstance()->AddFont(filename, alias, scale_factor);
 254         if (is_replacement)
 255                 eTextPara::setReplacementFont(alias);
 256 }
 257
 258 DEFINE_REF(Font);
 259
 260 Font::Font(fontRenderClass *render, FTC_FaceID faceid, int isize, int tw): tabwidth(tw)
 261 {
 262         renderer=render;
 263 #ifdef HAVE_FREETYPE2
 264         font.face_id = faceid;
 265         font.width = isize;
 266         font.height = isize;
 267         font.flags = FT_LOAD_DEFAULT;
 268         scaler.face_id = faceid;
 269         scaler.width = isize;
 270         scaler.height = isize;
 271         scaler.pixel = 1;
 272 #else
 273         font.font.face_id=faceid;
 274         font.font.pix_width     = isize;
 275         font.font.pix_height = isize;
 276         font.image_type = ftc_image_grays;
 277 #endif
 278         height=isize;
 279         if (tabwidth==-1)
 280                 tabwidth=8*isize;
 281 //      font.image_type |= ftc_image_flag_autohinted;
 282 }
 283
 284 FT_Error Font::getGlyphBitmap(FT_ULong glyph_index, FTC_SBit *sbit)
 285 {
 286         return renderer->getGlyphBitmap(&font, glyph_index, sbit);
 287 }
 288
 289 Font::~Font()
 290 {
 291 }
 292
 293 DEFINE_REF(eTextPara);
 294
 295 int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt glyphIndex, int flags, int rflags)
 296 {
 297         FTC_SBit glyph;
 298         if (current_font->getGlyphBitmap(glyphIndex, &glyph))
 299                 return 1;
 300
 301         int nx=cursor.x();
 302
 303         nx+=glyph->xadvance;
 304
 305         if (
 306                         (rflags&RS_WRAP) &&
 307                         (nx >= area.right())
 308                 )
 309         {
 310                 int cnt = 0;
 311                 glyphString::reverse_iterator i(glyphs.rbegin());
 312                         /* find first possibility (from end to begin) to break */
 313                 while (i != glyphs.rend())
 314                 {
 315                         if (i->flags&(GS_CANBREAK|GS_ISFIRST)) /* stop on either space/hyphen/shy or start of line (giving up) */
 316                                 break;
 317                         cnt++;
 318                         ++i;
 319                 }
 320
 321                         /* if ... */
 322                 if (i != glyphs.rend()  /* ... we found anything */
 323                         && (i->flags&GS_CANBREAK) /* ...and this is a space/hyphen/soft-hyphen */
 324                         && (!(i->flags & GS_ISFIRST)) /* ...and this is not an start of line (line with just a single space/hyphen) */
 325                         && cnt ) /* ... and there are actual non-space characters after this */
 326                 {
 327                                 /* if we have a soft-hyphen, and used that for breaking, turn it into a real hyphen */
 328                         if (i->flags & GS_SOFTHYPHEN)
 329                         {
 330                                 i->flags &= ~GS_SOFTHYPHEN;
 331                                 i->flags |= GS_HYPHEN;
 332                         }
 333                         --i; /* skip the space/hypen/softhyphen */
 334                         int linelength=cursor.x()-i->x;
 335                         i->flags|=GS_ISFIRST; /* make this a line start */
 336                         ePoint offset=ePoint(i->x, i->y);
 337                         newLine(rflags);
 338                         offset-=cursor;
 339
 340                                 /* and move everything to the end into the next line. */
 341                         do
 342                         {
 343                                 i->x-=offset.x();
 344                                 i->y-=offset.y();
 345                                 i->bbox.moveBy(-offset.x(), -offset.y());
 346                         } while (i-- != glyphs.rbegin()); // rearrange them into the next line
 347                         cursor+=ePoint(linelength, 0);  // put the cursor after that line
 348                 } else
 349                 {
 350                         if (cnt)
 351                         {
 352                                 newLine(rflags);
 353                                 flags|=GS_ISFIRST;
 354                         }
 355                 }
 356         }
 357
 358         int xadvance=glyph->xadvance, kern=0;
 359
 360         if (previous && use_kerning)
 361         {
 362                 FT_Vector delta;
 363                 FT_Get_Kerning(current_face, previous, glyphIndex, ft_kerning_default, &delta);
 364                 kern=delta.x>>6;
 365         }
 366
 367         pGlyph ng;
 368         ng.bbox.setLeft( ((flags&GS_ISFIRST)|(cursor.x()-1))+glyph->left );
 369         ng.bbox.setTop( cursor.y() - glyph->top );
 370         ng.bbox.setWidth( glyph->width );
 371         ng.bbox.setHeight( glyph->height );
 372
 373         xadvance += kern;
 374         ng.bbox.setWidth(xadvance);
 375
 376         ng.x = cursor.x()+kern;
 377         ng.y = cursor.y();
 378         ng.w = xadvance;
 379         ng.font = current_font;
 380         ng.glyph_index = glyphIndex;
 381         ng.flags = flags;
 382         glyphs.push_back(ng);
 383
 384                 /* when we have a SHY, don't xadvance. It will either be the last in the line (when used for breaking), or not displayed. */
 385         if (!(flags & GS_SOFTHYPHEN))
 386                 cursor += ePoint(xadvance, 0);
 387         previous = glyphIndex;
 388         return 0;
 389 }
 390
 391 void eTextPara::calc_bbox()
 392 {
 393         if (!glyphs.size())
 394         {
 395                 bboxValid = 0;
 396                 boundBox = eRect();
 397                 return;
 398         }
 399
 400         bboxValid = 1;
 401
 402         glyphString::iterator i(glyphs.begin());
 403
 404         boundBox = i->bbox;
 405         ++i;
 406
 407         for (; i != glyphs.end(); ++i)
 408         {
 409                 if (i->flags & (GS_ISSPACE|GS_SOFTHYPHEN))
 410                         continue;
 411                 if ( i->bbox.left() < boundBox.left() )
 412                         boundBox.setLeft( i->bbox.left() );
 413                 if ( i->bbox.top() < boundBox.top() )
 414                         boundBox.setTop( i->bbox.top() );
 415                 if ( i->bbox.right() > boundBox.right() )
 416                         boundBox.setRight( i->bbox.right() );
 417                 if ( i->bbox.bottom() > boundBox.bottom() )
 418                         boundBox.setBottom( i->bbox.bottom() );
 419         }
 420 //      eDebug("boundBox left = %i, top = %i, right = %i, bottom = %i", boundBox.left(), boundBox.top(), boundBox.right(), boundBox.bottom() );
 421 }
 422
 423 void eTextPara::newLine(int flags)
 424 {
 425         if (maximum.width()<cursor.x())
 426                 maximum.setWidth(cursor.x());
 427         cursor.setX(left);
 428         previous=0;
 429         int linegap=current_face->size->metrics.height-(current_face->size->metrics.ascender+current_face->size->metrics.descender);
 430         cursor+=ePoint(0, (current_face->size->metrics.ascender+current_face->size->metrics.descender+linegap)>>6);
 431         if (maximum.height()<cursor.y())
 432                 maximum.setHeight(cursor.y());
 433         previous=0;
 434 }
 435
 436 eTextPara::~eTextPara()
 437 {
 438         clear();
 439 }
 440
 441 void eTextPara::setFont(const gFont *font)
 442 {
 443         ePtr<Font> fnt, replacement;
 444         fontRenderClass::getInstance()->getFont(fnt, font->family.c_str(), font->pointSize);
 445         if (!fnt)
 446                 eWarning("FONT '%s' MISSING!", font->family.c_str());
 447         fontRenderClass::getInstance()->getFont(replacement, replacement_facename.c_str(), font->pointSize);
 448         setFont(fnt, replacement);
 449 }
 450
 451 std::string eTextPara::replacement_facename;
 452 std::set<int> eTextPara::forced_replaces;
 453
 454 void eTextPara::setFont(Font *fnt, Font *replacement)
 455 {
 456         if (!fnt)
 457                 return;
 458         current_font=fnt;
 459         replacement_font=replacement;
 460         singleLock s(ftlock);
 461
 462                         // we ask for replacment_font first becauseof the cache
 463         if (replacement_font)
 464         {
 465 #ifdef HAVE_FREETYPE2
 466                 if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
 467                                             replacement_font->scaler.face_id,
 468                                             &replacement_face) < 0) ||
 469                     (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
 470                                             &replacement_font->scaler,
 471                                             &replacement_font->size) < 0))
 472 #else
 473                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager,
 474                                 &replacement_font->font.font, &replacement_face,
 475                                 &replacement_font->size)<0)
 476 #endif
 477                 {
 478                         eDebug("FTC_Manager_Lookup_Size failed!");
 479                         return;
 480                 }
 481         }
 482         if (current_font)
 483         {
 484 #ifdef HAVE_FREETYPE2
 485                 if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
 486                                             current_font->scaler.face_id,
 487                                             &current_face) < 0) ||
 488                     (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
 489                                             &current_font->scaler,
 490                                             &current_font->size) < 0))
 491 #else
 492                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
 493 #endif
 494                 {
 495                         eDebug("FTC_Manager_Lookup_Size failed!");
 496                         return;
 497                 }
 498         }
 499 #ifndef HAVE_FREETYPE2
 500         cache_current_font=&current_font->font.font;
 501 #endif
 502         previous=0;
 503         use_kerning=FT_HAS_KERNING(current_face);
 504 }
 505
 506 void
 507 shape (std::vector<unsigned long> &string, const std::vector<unsigned long> &text);
 508
 509 int eTextPara::renderString(const char *string, int rflags)
 510 {
 511         singleLock s(ftlock);
 512
 513         if (!current_font)
 514                 return -1;
 515
 516 #ifdef HAVE_FREETYPE2
 517         if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
 518                                     current_font->scaler.face_id,
 519                                     &current_face) < 0) ||
 520             (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
 521                                     &current_font->scaler,
 522                                     &current_font->size) < 0))
 523         {
 524                 eDebug("FTC_Manager_Lookup_Size failed!");
 525                 return -1;
 526         }
 527 #else
 528         if (&current_font->font.font != cache_current_font)
 529         {
 530                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
 531                 {
 532                         eDebug("FTC_Manager_Lookup_Size failed!");
 533                         return -1;
 534                 }
 535                 cache_current_font=&current_font->font.font;
 536         }
 537 #endif
 538
 539         if (!current_face)
 540                 eFatal("eTextPara::renderString: no current_face");
 541         if (!current_face->size)
 542                 eFatal("eTextPara::renderString: no current_face->size");
 543
 544         if (cursor.y()==-1)
 545         {
 546                 cursor=ePoint(area.x(), area.y()+(current_face->size->metrics.ascender>>6));
 547                 left=cursor.x();
 548         }
 549
 550         std::vector<unsigned long> uc_string, uc_visual;
 551         if (string)
 552                 uc_string.reserve(strlen(string));
 553
 554         const char *p = string ? string : "";
 555
 556         while (*p)
 557         {
 558                 unsigned int unicode=(unsigned char)*p++;
 559
 560                 if (unicode & 0x80) // we have (hopefully) UTF8 here, and we assume that the encoding is VALID
 561                 {
 562                         if ((unicode & 0xE0)==0xC0) // two bytes
 563                         {
 564                                 unicode&=0x1F;
 565                                 unicode<<=6;
 566                                 if (*p)
 567                                         unicode|=(*p++)&0x3F;
 568                         } else if ((unicode & 0xF0)==0xE0) // three bytes
 569                         {
 570                                 unicode&=0x0F;
 571                                 unicode<<=6;
 572                                 if (*p)
 573                                         unicode|=(*p++)&0x3F;
 574                                 unicode<<=6;
 575                                 if (*p)
 576                                         unicode|=(*p++)&0x3F;
 577                         } else if ((unicode & 0xF8)==0xF0) // four bytes
 578                         {
 579                                 unicode&=0x07;
 580                                 unicode<<=6;
 581                                 if (*p)
 582                                         unicode|=(*p++)&0x3F;
 583                                 unicode<<=6;
 584                                 if (*p)
 585                                         unicode|=(*p++)&0x3F;
 586                                 unicode<<=6;
 587                                 if (*p)
 588                                         unicode|=(*p++)&0x3F;
 589                         }
 590                 }
 591                 uc_string.push_back(unicode);
 592         }
 593
 594         std::vector<unsigned long> uc_shape;
 595
 596                 // character -> glyph conversion
 597         shape(uc_shape, uc_string);
 598
 599                 // now do the usual logical->visual reordering
 600 #ifdef HAVE_FRIBIDI
 601         FriBidiCharType dir=FRIBIDI_TYPE_ON;
 602         {
 603                 int size=uc_shape.size();
 604                 uc_visual.resize(size);
 605                 // gaaanz lahm, aber anders geht das leider nicht, sorry.
 606                 FriBidiChar array[size], target[size];
 607                 std::copy(uc_shape.begin(), uc_shape.end(), array);
 608                 fribidi_log2vis(array, size, &dir, target, 0, 0, 0);
 609                 uc_visual.assign(target, target+size);
 610         }
 611 #else
 612         uc_visual=uc_shape;
 613 #endif
 614
 615         glyphs.reserve(uc_visual.size());
 616
 617         int nextflags = 0;
 618
 619         for (std::vector<unsigned long>::const_iterator i(uc_visual.begin());
 620                 i != uc_visual.end(); ++i)
 621         {
 622                 int isprintable=1;
 623                 int flags = nextflags;
 624                 nextflags = 0;
 625                 unsigned long chr = *i;
 626
 627                 if (!(rflags&RS_DIRECT))
 628                 {
 629                         switch (chr)
 630                         {
 631                         case '\\':
 632                         {
 633                                 unsigned long c = *(i+1);
 634                                 switch (c)
 635                                 {
 636                                         case 'n':
 637                                                 i++;
 638                                                 goto newline;
 639                                         case 't':
 640                                                 i++;
 641                                                 goto tab;
 642                                         case 'r':
 643                                                 i++;
 644                                                 goto nprint;
 645                                         default:
 646                                         ;
 647                                 }
 648                                 break;
 649                         }
 650                         case '\t':
 651 tab:            isprintable=0;
 652                                 cursor+=ePoint(current_font->tabwidth, 0);
 653                                 cursor-=ePoint(cursor.x()%current_font->tabwidth, 0);
 654                                 break;
 655                         case 0x8A:
 656                         case 0xE08A:
 657                         case '\n':
 658 newline:isprintable=0;
 659                                 newLine(rflags);
 660                                 nextflags|=GS_ISFIRST;
 661                                 break;
 662                         case '\r':
 663                         case 0x86: case 0xE086:
 664                         case 0x87: case 0xE087:
 665 nprint: isprintable=0;
 666                                 break;
 667                         case 0xAD: // soft-hyphen
 668                                 flags |= GS_SOFTHYPHEN;
 669                                 chr = 0x2010; /* hyphen */
 670                                 break;
 671                         case 0x2010:
 672                         case '-':
 673                                 flags |= GS_HYPHEN;
 674                                 break;
 675                         case ' ':
 676                                 flags|=GS_ISSPACE;
 677                         default:
 678                                 break;
 679                         }
 680                 }
 681                 if (isprintable)
 682                 {
 683                         FT_UInt index = 0;
 684
 685                                 /* FIXME: our font doesn't seem to have a hyphen, so use hyphen-minus for it. */
 686                         if (chr == 0x2010)
 687                                 chr = '-';
 688
 689                         if (forced_replaces.find(chr) == forced_replaces.end())
 690                                 index=(rflags&RS_DIRECT)? chr : FT_Get_Char_Index(current_face, chr);
 691
 692                         if (!index)
 693                         {
 694                                 if (replacement_face)
 695                                         index=(rflags&RS_DIRECT)? chr : FT_Get_Char_Index(replacement_face, chr);
 696
 697                                 if (!index)
 698                                         eDebug("unicode U+%4lx not present", chr);
 699                                 else
 700                                         appendGlyph(replacement_font, replacement_face, index, flags, rflags);
 701                         } else
 702                                 appendGlyph(current_font, current_face, index, flags, rflags);
 703                 }
 704         }
 705         bboxValid=false;
 706         calc_bbox();
 707 #ifdef HAVE_FRIBIDI
 708         if (dir & FRIBIDI_MASK_RTL)
 709                 realign(dirRight);
 710 #endif
 711         return 0;
 712 }
 713
 714 void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, const gRGB &foreground)
 715 {
 716         singleLock s(ftlock);
 717
 718         if (!current_font)
 719                 return;
 720
 721 #ifdef HAVE_FREETYPE2
 722         if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
 723                                     current_font->scaler.face_id,
 724                                     &current_face) < 0) ||
 725             (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
 726                                     &current_font->scaler,
 727                                     &current_font->size) < 0))
 728         {
 729                 eDebug("FTC_Manager_Lookup_Size failed!");
 730                 return;
 731         }
 732 #else
 733         if (&current_font->font.font != cache_current_font)
 734         {
 735                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
 736                 {
 737                         eDebug("FTC_Manager_Lookup_Size failed!");
 738                         return;
 739                 }
 740                 cache_current_font=&current_font->font.font;
 741         }
 742 #endif
 743
 744         ePtr<gPixmap> target;
 745         dc.getPixmap(target);
 746         gSurface *surface = target->surface;
 747
 748         register int opcode;
 749
 750         gColor *lookup8, lookup8_invert[16];
 751         gColor *lookup8_normal=0;
 752
 753         __u16 lookup16_normal[16], lookup16_invert[16], *lookup16;
 754         __u32 lookup32_normal[16], lookup32_invert[16], *lookup32;
 755
 756         if (surface->bpp == 8)
 757         {
 758                 if (surface->clut.data)
 759                 {
 760                         lookup8_normal=getColor(surface->clut, background, foreground).lookup;
 761
 762                         int i;
 763                         for (i=0; i<16; ++i)
 764                                 lookup8_invert[i] = lookup8_normal[i^0xF];
 765
 766                         opcode=0;
 767                 } else
 768                         opcode=1;
 769         } else if (surface->bpp == 16)
 770         {
 771                 opcode=2;
 772                 for (int i=0; i<16; ++i)
 773                 {
 774 #define BLEND(y, x, a) (y + (((x-y) * a)>>8))
 775
 776                         unsigned char dr = background.r, dg = background.g, db = background.b;
 777                         int sa = i * 16;
 778                         if (sa < 256)
 779                         {
 780                                 dr = BLEND(background.r, foreground.r, sa) & 0xFF;
 781                                 dg = BLEND(background.g, foreground.g, sa) & 0xFF;
 782                                 db = BLEND(background.b, foreground.b, sa) & 0xFF;
 783                         }
 784 #undef BLEND
 785 #ifdef RBG565
 786                         lookup16_normal[i] = ((dr >> 3) << 11) | ((db >> 2) << 5) | (dg >> 3);
 787 #else
 788                         lookup16_normal[i] = ((dr >> 3) << 11) | ((dg >> 2) << 5) | (db >> 3);
 789 #endif
 790                 }
 791                 for (int i=0; i<16; ++i)
 792                         lookup16_invert[i]=lookup16_normal[i^0xF];
 793         } else if (surface->bpp == 32)
 794         {
 795                 opcode=3;
 796                 for (int i=0; i<16; ++i)
 797                 {
 798 #define BLEND(y, x, a) (y + (((x-y) * a)>>8))
 799
 800                         unsigned char da = background.a, dr = background.r, dg = background.g, db = background.b;
 801                         int sa = i * 16;
 802                         if (sa < 256)
 803                         {
 804                                 da = BLEND(background.a, foreground.a, sa) & 0xFF;
 805                                 dr = BLEND(background.r, foreground.r, sa) & 0xFF;
 806                                 dg = BLEND(background.g, foreground.g, sa) & 0xFF;
 807                                 db = BLEND(background.b, foreground.b, sa) & 0xFF;
 808                         }
 809 #undef BLEND
 810                         da ^= 0xFF;
 811                         lookup32_normal[i]=db | (dg << 8) | (dr << 16) | (da << 24);;
 812                 }
 813                 for (int i=0; i<16; ++i)
 814                         lookup32_invert[i]=lookup32_normal[i^0xF];
 815         } else
 816         {
 817                 eWarning("can't render to %dbpp", surface->bpp);
 818                 return;
 819         }
 820
 821         gRegion area(eRect(0, 0, surface->x, surface->y));
 822         gRegion clip = dc.getClip() & area;
 823
 824         int buffer_stride=surface->stride;
 825
 826         for (unsigned int c = 0; c < clip.rects.size(); ++c)
 827         {
 828                 for (glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
 829                 {
 830                         if (i->flags & GS_SOFTHYPHEN)
 831                                 continue;
 832
 833                         if (!(i->flags & GS_INVERT))
 834                         {
 835                                 lookup8 = lookup8_normal;
 836                                 lookup16 = lookup16_normal;
 837                                 lookup32 = lookup32_normal;
 838                         } else
 839                         {
 840                                 lookup8 = lookup8_invert;
 841                                 lookup16 = lookup16_invert;
 842                                 lookup32 = lookup32_invert;
 843                         }
 844
 845                         static FTC_SBit glyph_bitmap;
 846                         if (fontRenderClass::instance->getGlyphBitmap(&i->font->font, i->glyph_index, &glyph_bitmap))
 847                                 continue;
 848                         int rx=i->x+glyph_bitmap->left + offset.x();
 849                         int ry=i->y-glyph_bitmap->top  + offset.y();
 850
 851                         __u8 *d=(__u8*)(surface->data)+buffer_stride*ry+rx*surface->bypp;
 852                         __u8 *s=glyph_bitmap->buffer;
 853                         register int sx=glyph_bitmap->width;
 854                         int sy=glyph_bitmap->height;
 855                         if ((sy+ry) >= clip.rects[c].bottom())
 856                                 sy=clip.rects[c].bottom()-ry;
 857                         if ((sx+rx) >= clip.rects[c].right())
 858                                 sx=clip.rects[c].right()-rx;
 859                         if (rx < clip.rects[c].left())
 860                         {
 861                                 int diff=clip.rects[c].left()-rx;
 862                                 s+=diff;
 863                                 sx-=diff;
 864                                 rx+=diff;
 865                                 d+=diff*surface->bypp;
 866                         }
 867                         if (ry < clip.rects[c].top())
 868                         {
 869                                 int diff=clip.rects[c].top()-ry;
 870                                 s+=diff*glyph_bitmap->pitch;
 871                                 sy-=diff;
 872                                 ry+=diff;
 873                                 d+=diff*buffer_stride;
 874                         }
 875                         if (sx>0)
 876                         {
 877                                 switch(opcode) {
 878                                 case 0: // 4bit lookup to 8bit
 879                                         for (int ay=0; ay<sy; ay++)
 880                                         {
 881                                                 register __u8 *td=d;
 882                                                 register int ax;
 883                                                 for (ax=0; ax<sx; ax++)
 884                                                 {
 885                                                         register int b=(*s++)>>4;
 886                                                         if(b)
 887                                                                 *td++=lookup8[b];
 888                                                         else
 889                                                                 td++;
 890                                                 }
 891                                                 s+=glyph_bitmap->pitch-sx;
 892                                                 d+=buffer_stride;
 893                                         }
 894                                         break;
 895                                 case 1: // 8bit direct
 896                                         for (int ay=0; ay<sy; ay++)
 897                                         {
 898                                                 register __u8 *td=d;
 899                                                 register int ax;
 900                                                 for (ax=0; ax<sx; ax++)
 901                                                 {
 902                                                         register int b=*s++;
 903                                                         *td++^=b;
 904                                                 }
 905                                                 s+=glyph_bitmap->pitch-sx;
 906                                                 d+=buffer_stride;
 907                                         }
 908                                         break;
 909                                 case 2: // 16bit
 910                                         for (int ay=0; ay<sy; ay++)
 911                                         {
 912                                                 register __u16 *td=(__u16*)d;
 913                                                 register int ax;
 914                                                 for (ax=0; ax<sx; ax++)
 915                                                 {
 916                                                         register int b=(*s++)>>4;
 917                                                         if(b)
 918                                                                 *td++=lookup16[b];
 919                                                         else
 920                                                                 td++;
 921                                                 }
 922                                                 s+=glyph_bitmap->pitch-sx;
 923                                                 d+=buffer_stride;
 924                                         }
 925                                         break;
 926                                 case 3: // 32bit
 927                                         for (int ay=0; ay<sy; ay++)
 928                                         {
 929                                                 register __u32 *td=(__u32*)d;
 930                                                 register int ax;
 931                                                 for (ax=0; ax<sx; ax++)
 932                                                 {
 933                                                         register int b=(*s++)>>4;
 934                                                         if(b)
 935                                                                 *td++=lookup32[b];
 936                                                         else
 937                                                                 td++;
 938                                                 }
 939                                                 s+=glyph_bitmap->pitch-sx;
 940                                                 d+=buffer_stride;
 941                                         }
 942                                 default:
 943                                         break;
 944                                 }
 945                         }
 946                 }
 947         }
 948 }
 949
 950 void eTextPara::realign(int dir)        // der code hier ist ein wenig merkwuerdig.
 951 {
 952         glyphString::iterator begin(glyphs.begin()), c(glyphs.begin()), end(glyphs.begin()), last;
 953         if (dir==dirLeft)
 954                 return;
 955         while (c != glyphs.end())
 956         {
 957                 int linelength=0;
 958                 int numspaces=0, num=0;
 959                 begin=end;
 960
 961                 ASSERT( end != glyphs.end());
 962
 963                         // zeilenende suchen
 964                 do {
 965                         last=end;
 966                         ++end;
 967                 } while ((end != glyphs.end()) && (!(end->flags&GS_ISFIRST)));
 968                         // end zeigt jetzt auf begin der naechsten zeile
 969
 970                 for (c=begin; c!=end; ++c)
 971                 {
 972                                 // space am zeilenende skippen
 973                         if ((c==last) && (c->flags&GS_ISSPACE))
 974                                 continue;
 975
 976                         if (c->flags&GS_ISSPACE)
 977                                 numspaces++;
 978                         linelength+=c->w;
 979                         num++;
 980                 }
 981
 982                 switch (dir)
 983                 {
 984                 case dirRight:
 985                 case dirCenter:
 986                 {
 987                         int offset=area.width()-linelength;
 988                         if (dir==dirCenter)
 989                                 offset/=2;
 990                         offset+=area.left();
 991                         while (begin != end)
 992                         {
 993                                 begin->bbox.moveBy(offset-begin->x,0);
 994                                 begin->x=offset;
 995                                 offset+=begin->w;
 996                                 ++begin;
 997                         }
 998                         break;
 999                 }
1000                 case dirBlock:
1001                 {
1002                         if (end == glyphs.end())                // letzte zeile linksbuendig lassen
1003                                 continue;
1004                         int spacemode;
1005                         if (numspaces)
1006                                 spacemode=1;
1007                         else
1008                                 spacemode=0;
1009                         if ((!spacemode) && (num<2))
1010                                 break;
1011                         int off=(area.width()-linelength)*256/(spacemode?numspaces:(num-1));
1012                         int curoff=0;
1013                         while (begin != end)
1014                         {
1015                                 int doadd=0;
1016                                 if ((!spacemode) || (begin->flags&GS_ISSPACE))
1017                                         doadd=1;
1018                                 begin->x+=curoff>>8;
1019                                 begin->bbox.moveBy(curoff>>8,0);
1020                                 if (doadd)
1021                                         curoff+=off;
1022                                 ++begin;
1023                         }
1024                         break;
1025                 }
1026                 }
1027         }
1028         bboxValid=false;
1029         calc_bbox();
1030 }
1031
1032 void eTextPara::clear()
1033 {
1034         singleLock s(ftlock);
1035
1036         current_font = 0;
1037         replacement_font = 0;
1038
1039         glyphs.clear();
1040 }
1041
1042 eAutoInitP0<fontRenderClass> init_fontRenderClass(eAutoInitNumbers::graphic-1, "Font Render Class");