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