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
  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>
  20
  21 //#define HAVE_FRIBIDI
  22 // until we have it in the cdk
  23
  24 #ifdef HAVE_FRIBIDI
  25 #include <fribidi/fribidi.h>
  26 #endif
  27
  28 #include <map>
  29
  30 fontRenderClass *fontRenderClass::instance;
  31
  32 static pthread_mutex_t ftlock=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
  33 static pthread_mutex_t refcntlck=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
  34
  35 static FTC_Font cache_current_font=0;
  36
  37 struct fntColorCacheKey
  38 {
  39         gRGB start, end;
  40         fntColorCacheKey(const gRGB &start, const gRGB &end)
  41                 : start(start), end(end)
  42         {
  43         }
  44         bool operator <(const fntColorCacheKey &c) const
  45         {
  46                 if (start < c.start)
  47                         return 1;
  48                 else if (start == c.start)
  49                         return end < c.end;
  50                 return 0;
  51         }
  52 };
  53
  54 std::map<fntColorCacheKey,gLookup> colorcache;
  55
  56 static gLookup &getColor(const gPalette &pal, const gRGB &start, const gRGB &end)
  57 {
  58         fntColorCacheKey key(start, end);
  59         std::map<fntColorCacheKey,gLookup>::iterator i=colorcache.find(key);
  60         if (i != colorcache.end())
  61                 return i->second;
  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);
  68         eDebug("");*/
  69         return n;
  70 }
  71
  72 fontRenderClass *fontRenderClass::getInstance()
  73 {
  74         return instance;
  75 }
  76
  77 FT_Error myFTC_Face_Requester(FTC_FaceID        face_id,
  78                                                                                                                         FT_Library      library,
  79                                                                                                                         FT_Pointer      request_data,
  80                                                                                                                         FT_Face*                aface)
  81 {
  82         return ((fontRenderClass*)request_data)->FTC_Face_Requester(face_id, aface);
  83 }
  84
  85
  86 FT_Error fontRenderClass::FTC_Face_Requester(FTC_FaceID face_id, FT_Face* aface)
  87 {
  88         fontListEntry *font=(fontListEntry *)face_id;
  89         if (!font)
  90                 return -1;
  91
  92 //      eDebug("[FONT] FTC_Face_Requester (%s)", font->face.c_str());
  93
  94         int error;
  95         if ((error=FT_New_Face(library, font->filename.c_str(), 0, aface)))
  96         {
  97                 eDebug(" failed: %s", strerror(error));
  98                 return error;
  99         }
 100         FT_Select_Charmap(*aface, ft_encoding_unicode);
 101         return 0;
 102 }
 103
 104 FTC_FaceID fontRenderClass::getFaceID(const std::string &face)
 105 {
 106         for (fontListEntry *f=font; f; f=f->next)
 107         {
 108                 if (f->face == face)
 109                         return (FTC_FaceID)f;
 110         }
 111         return 0;
 112 }
 113
 114 FT_Error fontRenderClass::getGlyphBitmap(FTC_Image_Desc *font, FT_ULong glyph_index, FTC_SBit *sbit)
 115 {
 116         FT_Error res=FTC_SBit_Cache_Lookup(sbitsCache, font, glyph_index, sbit);
 117         return res;
 118 }
 119
 120 std::string fontRenderClass::AddFont(const std::string &filename, const std::string &name, int scale)
 121 {
 122         eDebugNoNewLine("[FONT] adding font %s...", filename.c_str());
 123         fflush(stdout);
 124         int error;
 125         fontListEntry *n=new fontListEntry;
 126
 127         n->scale=scale;
 128         FT_Face face;
 129         singleLock s(ftlock);
 130
 131         if ((error=FT_New_Face(library, filename.c_str(), 0, &face)))
 132                 eFatal(" failed: %s", strerror(error));
 133
 134         n->filename=filename;
 135         n->face=name;
 136         FT_Done_Face(face);
 137
 138         n->next=font;
 139         eDebug("OK (%s)", n->face.c_str());
 140         font=n;
 141
 142         return n->face;
 143 }
 144
 145 fontRenderClass::fontListEntry::~fontListEntry()
 146 {
 147 }
 148
 149 fontRenderClass::fontRenderClass(): fb(fbClass::getInstance())
 150 {
 151         instance=this;
 152         eDebug("[FONT] initializing lib...");
 153         {
 154                 if (FT_Init_FreeType(&library))
 155                 {
 156                         eDebug("[FONT] initializing failed.");
 157                         return;
 158                 }
 159         }
 160         eDebug("[FONT] loading fonts...");
 161         fflush(stdout);
 162         font=0;
 163
 164         int maxbytes=4*1024*1024;
 165         eDebug("[FONT] Intializing font cache, using max. %dMB...", maxbytes/1024/1024);
 166         fflush(stdout);
 167         {
 168                 if (FTC_Manager_New(library, 8, 8, maxbytes, myFTC_Face_Requester, this, &cacheManager))
 169                 {
 170                         eDebug("[FONT] initializing font cache failed!");
 171                         return;
 172                 }
 173                 if (!cacheManager)
 174                 {
 175                         eDebug("[FONT] initializing font cache manager error.");
 176                         return;
 177                 }
 178                 if (FTC_SBit_Cache_New(cacheManager, &sbitsCache))
 179                 {
 180                         eDebug("[FONT] initializing font cache sbit failed!");
 181                         return;
 182                 }
 183                 if (FTC_Image_Cache_New(cacheManager, &imageCache))
 184                 {
 185                         eDebug("[FONT] initializing font cache imagecache failed!");
 186                 }
 187         }
 188         return;
 189 }
 190
 191 float fontRenderClass::getLineHeight(const gFont& font)
 192 {
 193         if (!instance)
 194                 return 0;
 195         ePtr<Font> fnt;
 196         getFont(fnt, font.family.c_str(), font.pointSize);
 197         if (!fnt)
 198                 return 0;
 199         singleLock s(ftlock);
 200         FT_Face current_face;
 201         if (FTC_Manager_Lookup_Size(cacheManager, &fnt->font.font, &current_face, &fnt->size)<0)
 202         {
 203                 delete fnt;
 204                 eDebug("FTC_Manager_Lookup_Size failed!");
 205                 return 0;
 206         }
 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;
 209         delete fnt;
 210         return height;
 211 }
 212
 213
 214 fontRenderClass::~fontRenderClass()
 215 {
 216         singleLock s(ftlock);
 217         while(font)
 218         {
 219                 fontListEntry *f=font;
 220                 font=font->next;
 221                 delete f;
 222         }
 223 //      auskommentiert weil freetype und enigma die kritische masse des suckens ueberschreiten.
 224 //      FTC_Manager_Done(cacheManager);
 225 //      FT_Done_FreeType(library);
 226 }
 227
 228 int fontRenderClass::getFont(ePtr<Font> &font, const std::string &face, int size, int tabwidth)
 229 {
 230         FTC_FaceID id=getFaceID(face);
 231         if (!id)
 232         {
 233                 font = 0;
 234                 return -1;
 235         }
 236         font = new Font(this, id, size * ((fontListEntry*)id)->scale / 100, tabwidth);
 237         return 0;
 238 }
 239
 240 DEFINE_REF(Font);
 241
 242 Font::Font(fontRenderClass *render, FTC_FaceID faceid, int isize, int tw): tabwidth(tw)
 243 {
 244         renderer=render;
 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;
 249         height=isize;
 250         if (tabwidth==-1)
 251                 tabwidth=8*isize;
 252 //      font.image_type |= ftc_image_flag_autohinted;
 253 }
 254
 255 FT_Error Font::getGlyphBitmap(FT_ULong glyph_index, FTC_SBit *sbit)
 256 {
 257         return renderer->getGlyphBitmap(&font, glyph_index, sbit);
 258 }
 259
 260 Font::~Font()
 261 {
 262 }
 263
 264 DEFINE_REF(eTextPara);
 265
 266 int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt glyphIndex, int flags, int rflags)
 267 {
 268         FTC_SBit glyph;
 269         if (current_font->getGlyphBitmap(glyphIndex, &glyph))
 270                 return 1;
 271
 272         int nx=cursor.x();
 273
 274         nx+=glyph->xadvance;
 275
 276         if (
 277                         (rflags&RS_WRAP) &&
 278                         (nx >= area.right())
 279                 )
 280         {
 281                 int cnt = 0;
 282                 glyphString::reverse_iterator i(glyphs.rbegin());
 283                 while (i != glyphs.rend())
 284                 {
 285                         if (i->flags&(GS_ISSPACE|GS_ISFIRST))
 286                                 break;
 287                         cnt++;
 288                         ++i;
 289                 }
 290                 if (i != glyphs.rend()
 291                         && ((i->flags&(GS_ISSPACE|GS_ISFIRST))==GS_ISSPACE)
 292                         && cnt )
 293                 {
 294                         --i;
 295                         int linelength=cursor.x()-i->x;
 296                         i->flags|=GS_ISFIRST;
 297                         ePoint offset=ePoint(i->x, i->y);
 298                         newLine(rflags);
 299                         offset-=cursor;
 300                         do
 301                         {
 302                                 i->x-=offset.x();
 303                                 i->y-=offset.y();
 304                                 i->bbox.moveBy(-offset.x(), -offset.y());
 305                         }
 306                         while (i-- != glyphs.rbegin()); // rearrange them into the next line
 307                         cursor+=ePoint(linelength, 0);  // put the cursor after that line
 308                 }
 309                 else
 310                 {
 311                         if (cnt)
 312                         {
 313                                 newLine(rflags);
 314                                 flags|=GS_ISFIRST;
 315                         }
 316                 }
 317         }
 318
 319         int xadvance=glyph->xadvance, kern=0;
 320
 321         if (previous && use_kerning)
 322         {
 323                 FT_Vector delta;
 324                 FT_Get_Kerning(current_face, previous, glyphIndex, ft_kerning_default, &delta);
 325                 kern=delta.x>>6;
 326         }
 327
 328         pGlyph ng;
 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 );
 333
 334         xadvance+=kern;
 335
 336         ng.x=cursor.x()+kern;
 337         ng.y=cursor.y();
 338         ng.w=xadvance;
 339         ng.font=current_font;
 340         ng.glyph_index=glyphIndex;
 341         ng.flags=flags;
 342         glyphs.push_back(ng);
 343
 344         cursor+=ePoint(xadvance, 0);
 345         previous=glyphIndex;
 346         return 0;
 347 }
 348
 349 void eTextPara::calc_bbox()
 350 {
 351         boundBox.setLeft( 32000 );
 352         boundBox.setTop( 32000 );
 353         boundBox.setRight( -32000 );         // for each glyph image, compute its bounding box, translate it,
 354         boundBox.setBottom( -32000 );
 355         // and grow the string bbox
 356
 357         for ( glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
 358         {
 359                 if ( i->flags & GS_ISSPACE )
 360                         continue;
 361                 if ( i->bbox.left() < boundBox.left() )
 362                         boundBox.setLeft( i->bbox.left() );
 363                 if ( i->bbox.top() < boundBox.top() )
 364                         boundBox.setTop( i->bbox.top() );
 365                 if ( i->bbox.right() > boundBox.right() )
 366                         boundBox.setRight( i->bbox.right() );
 367                 if ( i->bbox.bottom() > boundBox.bottom() )
 368                         boundBox.setBottom( i->bbox.bottom() );
 369         }
 370 //      eDebug("boundBox left = %i, top = %i, right = %i, bottom = %i", boundBox.left(), boundBox.top(), boundBox.right(), boundBox.bottom() );
 371         if ( glyphs.size() )
 372                 bboxValid=1;
 373 }
 374
 375 void eTextPara::newLine(int flags)
 376 {
 377         if (maximum.width()<cursor.x())
 378                 maximum.setWidth(cursor.x());
 379         cursor.setX(left);
 380         previous=0;
 381         int linegap=current_face->size->metrics.height-(current_face->size->metrics.ascender+current_face->size->metrics.descender);
 382         cursor+=ePoint(0, (current_face->size->metrics.ascender+current_face->size->metrics.descender+linegap*1/2)>>6);
 383         if (maximum.height()<cursor.y())
 384                 maximum.setHeight(cursor.y());
 385         previous=0;
 386 }
 387
 388 eTextPara::~eTextPara()
 389 {
 390         clear();
 391 }
 392
 393 void eTextPara::setFont(const gFont *font)
 394 {
 395         ePtr<Font> fnt, replacement;
 396         fontRenderClass::getInstance()->getFont(fnt, font->family.c_str(), font->pointSize);
 397         if (!fnt)
 398                 eWarning("FONT '%s' MISSING!", font->family.c_str());
 399         fontRenderClass::getInstance()->getFont(replacement, replacement_facename.c_str(), font->pointSize);
 400         setFont(fnt, replacement);
 401 }
 402
 403 std::string eTextPara::replacement_facename;
 404
 405 void eTextPara::setFont(Font *fnt, Font *replacement)
 406 {
 407         if (!fnt)
 408                 return;
 409         current_font=fnt;
 410         replacement_font=replacement;
 411         singleLock s(ftlock);
 412
 413                         // we ask for replacment_font first becauseof the cache
 414         if (replacement_font)
 415         {
 416                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager,
 417                                 &replacement_font->font.font, &replacement_face,
 418                                 &replacement_font->size)<0)
 419                 {
 420                         eDebug("FTC_Manager_Lookup_Size failed!");
 421                         return;
 422                 }
 423         }
 424         if (current_font)
 425         {
 426                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
 427                 {
 428                         eDebug("FTC_Manager_Lookup_Size failed!");
 429                         return;
 430                 }
 431         }
 432         cache_current_font=&current_font->font.font;
 433         previous=0;
 434         use_kerning=FT_HAS_KERNING(current_face);
 435 }
 436
 437 void
 438 shape (std::vector<unsigned long> &string, const std::vector<unsigned long> &text);
 439
 440 int eTextPara::renderString(const std::string &string, int rflags)
 441 {
 442         singleLock s(ftlock);
 443
 444         if (!current_font)
 445                 return -1;
 446
 447         if (cursor.y()==-1)
 448         {
 449                 cursor=ePoint(area.x(), area.y()+(current_face->size->metrics.ascender>>6));
 450                 left=cursor.x();
 451         }
 452
 453         if (&current_font->font.font != cache_current_font)
 454         {
 455                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
 456                 {
 457                         eDebug("FTC_Manager_Lookup_Size failed!");
 458                         return -1;
 459                 }
 460                 cache_current_font=&current_font->font.font;
 461         }
 462
 463         std::vector<unsigned long> uc_string, uc_visual;
 464         uc_string.reserve(string.length());
 465
 466         std::string::const_iterator p(string.begin());
 467
 468         while(p != string.end())
 469         {
 470                 unsigned int unicode=*p++;
 471
 472                 if (unicode & 0x80) // we have (hopefully) UTF8 here, and we assume that the encoding is VALID
 473                 {
 474                         if ((unicode & 0xE0)==0xC0) // two bytes
 475                         {
 476                                 unicode&=0x1F;
 477                                 unicode<<=6;
 478                                 if (p != string.end())
 479                                         unicode|=(*p++)&0x3F;
 480                         } else if ((unicode & 0xF0)==0xE0) // three bytes
 481                         {
 482                                 unicode&=0x0F;
 483                                 unicode<<=6;
 484                                 if (p != string.end())
 485                                         unicode|=(*p++)&0x3F;
 486                                 unicode<<=6;
 487                                 if (p != string.end())
 488                                         unicode|=(*p++)&0x3F;
 489                         } else if ((unicode & 0xF8)==0xF0) // four bytes
 490                         {
 491                                 unicode&=0x07;
 492                                 unicode<<=6;
 493                                 if (p != string.end())
 494                                         unicode|=(*p++)&0x3F;
 495                                 unicode<<=6;
 496                                 if (p != string.end())
 497                                         unicode|=(*p++)&0x3F;
 498                                 unicode<<=6;
 499                                 if (p != string.end())
 500                                         unicode|=(*p++)&0x3F;
 501                         }
 502                 }
 503                 uc_string.push_back(unicode);
 504         }
 505
 506         std::vector<unsigned long> uc_shape;
 507
 508                 // character -> glyph conversion
 509         shape(uc_shape, uc_string);
 510
 511                 // now do the usual logical->visual reordering
 512 #ifdef HAVE_FRIBIDI
 513         FriBidiCharType dir=FRIBIDI_TYPE_ON;
 514         {
 515                 int size=uc_shape.size();
 516                 uc_visual.resize(size);
 517                 // gaaanz lahm, aber anders geht das leider nicht, sorry.
 518                 FriBidiChar array[size], target[size];
 519                 std::copy(uc_shape.begin(), uc_shape.end(), array);
 520                 fribidi_log2vis(array, size, &dir, target, 0, 0, 0);
 521                 uc_visual.assign(target, target+size);
 522         }
 523 #else
 524         uc_visual=uc_shape;
 525 #endif
 526
 527         glyphs.reserve(uc_visual.size());
 528
 529         int nextflags = 0;
 530
 531         for (std::vector<unsigned long>::const_iterator i(uc_visual.begin());
 532                 i != uc_visual.end(); ++i)
 533         {
 534                 int isprintable=1;
 535                 int flags = nextflags;
 536                 nextflags = 0;
 537                 if (!(rflags&RS_DIRECT))
 538                 {
 539                         switch (*i)
 540                         {
 541                         case '\\':
 542                         {
 543                                 unsigned long c = *(i+1);
 544                                 switch (c)
 545                                 {
 546                                         case 'n':
 547                                                 i++;
 548                                                 goto newline;
 549                                         case 't':
 550                                                 i++;
 551                                                 goto tab;
 552                                         case 'r':
 553                                                 i++;
 554                                                 goto nprint;
 555                                         default:
 556                                         ;
 557                                 }
 558                                 break;
 559                         }
 560                         case '\t':
 561 tab:            isprintable=0;
 562                                 cursor+=ePoint(current_font->tabwidth, 0);
 563                                 cursor-=ePoint(cursor.x()%current_font->tabwidth, 0);
 564                                 break;
 565                         case 0x8A:
 566                         case 0xE08A:
 567                         case '\n':
 568 newline:isprintable=0;
 569                                 newLine(rflags);
 570                                 nextflags|=GS_ISFIRST;
 571                                 break;
 572                         case '\r':
 573                         case 0x86: case 0xE086:
 574                         case 0x87: case 0xE087:
 575 nprint: isprintable=0;
 576                                 break;
 577                         case ' ':
 578                                 flags|=GS_ISSPACE;
 579                         default:
 580                                 break;
 581                         }
 582                 }
 583                 if (isprintable)
 584                 {
 585                         FT_UInt index;
 586
 587                         index=(rflags&RS_DIRECT)? *i : FT_Get_Char_Index(current_face, *i);
 588
 589                         if (!index)
 590                         {
 591                                 if (replacement_face)
 592                                         index=(rflags&RS_DIRECT)? *i : FT_Get_Char_Index(replacement_face, *i);
 593
 594                                 if (!index)
 595                                         eDebug("unicode %d ('%c') not present", *i, *i);
 596                                 else
 597                                         appendGlyph(replacement_font, replacement_face, index, flags, rflags);
 598                         } else
 599                                 appendGlyph(current_font, current_face, index, flags, rflags);
 600                 }
 601         }
 602         bboxValid=false;
 603         calc_bbox();
 604 #ifdef HAVE_FRIBIDI
 605         if (dir & FRIBIDI_MASK_RTL)
 606                 realign(dirRight);
 607 #endif
 608         return 0;
 609 }
 610
 611 void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, const gRGB &foreground)
 612 {
 613         singleLock s(ftlock);
 614
 615         if (!current_font)
 616                 return;
 617
 618         if (&current_font->font.font != cache_current_font)
 619         {
 620                 if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
 621                 {
 622                         eDebug("FTC_Manager_Lookup_Size failed!");
 623                         return;
 624                 }
 625                 cache_current_font=&current_font->font.font;
 626         }
 627
 628         ePtr<gPixmap> target;
 629         dc.getPixmap(target);
 630         gSurface *surface = target->surface;
 631
 632         register int opcode;
 633         gColor *lookup8=0;
 634         __u32 lookup32[16];
 635
 636         if (surface->bpp == 8)
 637         {
 638                 if (surface->clut.data)
 639                 {
 640                         lookup8=getColor(surface->clut, background, foreground).lookup;
 641                         opcode=0;
 642                 } else
 643                         opcode=1;
 644         } else if (surface->bpp == 32)
 645         {
 646                 opcode=3;
 647                 if (surface->clut.data)
 648                 {
 649                         lookup8=getColor(surface->clut, background, foreground).lookup;
 650                         for (int i=0; i<16; ++i)
 651                                 lookup32[i]=((surface->clut.data[lookup8[i]].a<<24)|
 652                                         (surface->clut.data[lookup8[i]].r<<16)|
 653                                         (surface->clut.data[lookup8[i]].g<<8)|
 654                                         (surface->clut.data[lookup8[i]].b))^0xFF000000;
 655                 } else
 656                 {
 657                         for (int i=0; i<16; ++i)
 658                                 lookup32[i]=(0x010101*i)|0xFF000000;
 659                 }
 660         } else
 661         {
 662                 eWarning("can't render to %dbpp", surface->bpp);
 663                 return;
 664         }
 665
 666         gRegion area(eRect(0, 0, surface->x, surface->y));
 667         gRegion clip = dc.getClip() & area;
 668
 669         int buffer_stride=surface->stride;
 670
 671         for (glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
 672         {
 673                 static FTC_SBit glyph_bitmap;
 674                 if (fontRenderClass::instance->getGlyphBitmap(&i->font->font, i->glyph_index, &glyph_bitmap))
 675                         continue;
 676                 int rx=i->x+glyph_bitmap->left + offset.x();
 677                 int ry=i->y-glyph_bitmap->top  + offset.y();
 678                 __u8 *d=(__u8*)(surface->data)+buffer_stride*ry+rx*surface->bypp;
 679                 __u8 *s=glyph_bitmap->buffer;
 680                 register int sx=glyph_bitmap->width;
 681                 int sy=glyph_bitmap->height;
 682                 if ((sy+ry) >= clip.extends.bottom())
 683                         sy=clip.extends.bottom()-ry;
 684                 if ((sx+rx) >= clip.extends.right())
 685                         sx=clip.extends.right()-rx;
 686                 if (rx < clip.extends.left())
 687                 {
 688                         int diff=clip.extends.left()-rx;
 689                         s+=diff;
 690                         sx-=diff;
 691                         rx+=diff;
 692                         d+=diff*surface->bypp;
 693                 }
 694                 if (ry < clip.extends.top())
 695                 {
 696                         int diff=clip.extends.top()-ry;
 697                         s+=diff*glyph_bitmap->pitch;
 698                         sy-=diff;
 699                         ry+=diff;
 700                         d+=diff*buffer_stride;
 701                 }
 702                 if (sx>0)
 703                         for (int ay=0; ay<sy; ay++)
 704                         {
 705                                 if (!opcode)            // 4bit lookup to 8bit
 706                                 {
 707                                         register __u8 *td=d;
 708                                         register int ax;
 709                                         for (ax=0; ax<sx; ax++)
 710                                         {
 711                                                 register int b=(*s++)>>4;
 712                                                 if(b)
 713                                                         *td++=lookup8[b];
 714                                                 else
 715                                                         td++;
 716                                         }
 717                                 } else if (opcode == 1) // 8bit direct
 718                                 {
 719                                         register __u8 *td=d;
 720                                         register int ax;
 721                                         for (ax=0; ax<sx; ax++)
 722                                         {
 723                                                 register int b=*s++;
 724                                                 *td++^=b;
 725                                         }
 726                                 } else
 727                                 {
 728                                         register __u32 *td=(__u32*)d;
 729                                         register int ax;
 730                                         for (ax=0; ax<sx; ax++)
 731                                         {
 732                                                 register int b=(*s++)>>4;
 733                                                 if(b)
 734                                                         *td++=lookup32[b];
 735                                                 else
 736                                                         td++;
 737                                         }
 738                                 }
 739                                 s+=glyph_bitmap->pitch-sx;
 740                                 d+=buffer_stride;
 741                         }
 742         }
 743 }
 744
 745 void eTextPara::realign(int dir)        // der code hier ist ein wenig merkwuerdig.
 746 {
 747         glyphString::iterator begin(glyphs.begin()), c(glyphs.begin()), end(glyphs.begin()), last;
 748         if (dir==dirLeft)
 749                 return;
 750         while (c != glyphs.end())
 751         {
 752                 int linelength=0;
 753                 int numspaces=0, num=0;
 754                 begin=end;
 755
 756                 ASSERT( end != glyphs.end());
 757
 758                         // zeilenende suchen
 759                 do {
 760                         last=end;
 761                         ++end;
 762                 } while ((end != glyphs.end()) && (!(end->flags&GS_ISFIRST)));
 763                         // end zeigt jetzt auf begin der naechsten zeile
 764
 765                 for (c=begin; c!=end; ++c)
 766                 {
 767                                 // space am zeilenende skippen
 768                         if ((c==last) && (c->flags&GS_ISSPACE))
 769                                 continue;
 770
 771                         if (c->flags&GS_ISSPACE)
 772                                 numspaces++;
 773                         linelength+=c->w;
 774                         num++;
 775                 }
 776
 777                 if (!num)               // line mit nur einem space
 778                         continue;
 779
 780                 switch (dir)
 781                 {
 782                 case dirRight:
 783                 case dirCenter:
 784                 {
 785                         int offset=area.width()-linelength;
 786                         if (dir==dirCenter)
 787                                 offset/=2;
 788                         offset+=area.left();
 789                         while (begin != end)
 790                         {
 791                                 begin->bbox.moveBy(offset-begin->x,0);
 792                                 begin->x=offset;
 793                                 offset+=begin->w;
 794                                 ++begin;
 795                         }
 796                         break;
 797                 }
 798                 case dirBlock:
 799                 {
 800                         if (end == glyphs.end())                // letzte zeile linksbuendig lassen
 801                                 continue;
 802                         int spacemode;
 803                         if (numspaces)
 804                                 spacemode=1;
 805                         else
 806                                 spacemode=0;
 807                         if ((!spacemode) && (num<2))
 808                                 break;
 809                         int off=(area.width()-linelength)*256/(spacemode?numspaces:(num-1));
 810                         int curoff=0;
 811                         while (begin != end)
 812                         {
 813                                 int doadd=0;
 814                                 if ((!spacemode) || (begin->flags&GS_ISSPACE))
 815                                         doadd=1;
 816                                 begin->x+=curoff>>8;
 817                                 begin->bbox.moveBy(curoff>>8,0);
 818                                 if (doadd)
 819                                         curoff+=off;
 820                                 ++begin;
 821                         }
 822                         break;
 823                 }
 824                 }
 825         }
 826         bboxValid=false;
 827         calc_bbox();
 828 }
 829
 830 void eTextPara::clear()
 831 {
 832         singleLock s(ftlock);
 833
 834         current_font = 0;
 835         replacement_font = 0;
 836
 837         glyphs.clear();
 838 }
 839
 840 eAutoInitP0<fontRenderClass> init_fontRenderClass(eAutoInitNumbers::graphic-1, "Font Render Class");