add DefaultServicesScanner plugin to do automatic services scans and build a lamedb...
[enigma2.git] / lib / gdi / font.cpp
index b1b4fa99bf262ea0641e0b4454ad9cbff0538f7f..09154de088ea0be759126655a514f085e8bc883b 100644 (file)
 // use this for init Freetype...
 #include <ft2build.h>
 #include FT_FREETYPE_H
+#ifdef HAVE_FREETYPE2
+#define FTC_Image_Cache_New(a,b)       FTC_ImageCache_New(a,b)
+#define FTC_Image_Cache_Lookup(a,b,c,d)        FTC_ImageCache_Lookup(a,b,c,d,NULL)
+#define FTC_SBit_Cache_New(a,b)                FTC_SBitCache_New(a,b)
+#define FTC_SBit_Cache_Lookup(a,b,c,d) FTC_SBitCache_Lookup(a,b,c,d,NULL)
+#endif
 
 #include <lib/base/eerror.h>
 #include <lib/gdi/lcd.h>
@@ -18,7 +24,7 @@
 #include <lib/base/init.h>
 #include <lib/base/init_num.h>
 
-//#define HAVE_FRIBIDI
+#define HAVE_FRIBIDI
 // until we have it in the cdk
 
 #ifdef HAVE_FRIBIDI
 fontRenderClass *fontRenderClass::instance;
 
 static pthread_mutex_t ftlock=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
-static pthread_mutex_t refcntlck=PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP;
 
+#ifndef HAVE_FREETYPE2
 static FTC_Font cache_current_font=0;
+#endif
 
 struct fntColorCacheKey
 {
@@ -198,7 +205,12 @@ float fontRenderClass::getLineHeight(const gFont& font)
                return 0;
        singleLock s(ftlock);
        FT_Face current_face;
+#ifdef HAVE_FREETYPE2
+       if ((FTC_Manager_LookupFace(cacheManager, fnt->scaler.face_id, &current_face) < 0) ||
+           (FTC_Manager_LookupSize(cacheManager, &fnt->scaler, &fnt->size) < 0))
+#else
        if (FTC_Manager_Lookup_Size(cacheManager, &fnt->font.font, &current_face, &fnt->size)<0)
+#endif
        {
                delete fnt;
                eDebug("FTC_Manager_Lookup_Size failed!");
@@ -206,11 +218,9 @@ float fontRenderClass::getLineHeight(const gFont& font)
        }
        int linegap=current_face->size->metrics.height-(current_face->size->metrics.ascender+current_face->size->metrics.descender);
        float height=(current_face->size->metrics.ascender+current_face->size->metrics.descender+linegap)/64.0;
-       delete fnt;
        return height;
 }
 
-
 fontRenderClass::~fontRenderClass()
 {
        singleLock s(ftlock);
@@ -237,15 +247,33 @@ int fontRenderClass::getFont(ePtr<Font> &font, const std::string &face, int size
        return 0;
 }
 
+void addFont(const char *filename, const char *alias, int scale_factor, int is_replacement)
+{
+       fontRenderClass::getInstance()->AddFont(filename, alias, scale_factor);
+       if (is_replacement)
+               eTextPara::setReplacementFont(alias);
+}
+
 DEFINE_REF(Font);
 
 Font::Font(fontRenderClass *render, FTC_FaceID faceid, int isize, int tw): tabwidth(tw)
 {
        renderer=render;
+#ifdef HAVE_FREETYPE2
+       font.face_id = faceid;
+       font.width = isize;
+       font.height = isize;
+       font.flags = FT_LOAD_DEFAULT;
+       scaler.face_id = faceid;
+       scaler.width = isize;
+       scaler.height = isize;
+       scaler.pixel = 1;
+#else
        font.font.face_id=faceid;
        font.font.pix_width     = isize;
        font.font.pix_height = isize;
        font.image_type = ftc_image_grays;
+#endif
        height=isize;
        if (tabwidth==-1)
                tabwidth=8*isize;
@@ -272,7 +300,7 @@ int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt gly
        int nx=cursor.x();
 
        nx+=glyph->xadvance;
-       
+
        if (
                        (rflags&RS_WRAP) && 
                        (nx >= area.right())
@@ -280,33 +308,43 @@ int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt gly
        {
                int cnt = 0;
                glyphString::reverse_iterator i(glyphs.rbegin());
+                       /* find first possibility (from end to begin) to break */
                while (i != glyphs.rend())
                {
-                       if (i->flags&(GS_ISSPACE|GS_ISFIRST))
+                       if (i->flags&(GS_CANBREAK|GS_ISFIRST)) /* stop on either space/hyphen/shy or start of line (giving up) */
                                break;
                        cnt++;
                        ++i;
-               } 
-               if (i != glyphs.rend()
-                       && ((i->flags&(GS_ISSPACE|GS_ISFIRST))==GS_ISSPACE)
-                       && cnt )
+               }
+
+                       /* if ... */
+               if (i != glyphs.rend()  /* ... we found anything */
+                       && (i->flags&GS_CANBREAK) /* ...and this is a space/hyphen/soft-hyphen */
+                       && (!(i->flags & GS_ISFIRST)) /* ...and this is not an start of line (line with just a single space/hyphen) */
+                       && cnt ) /* ... and there are actual non-space characters after this */
                {
-                       --i;
+                               /* if we have a soft-hyphen, and used that for breaking, turn it into a real hyphen */
+                       if (i->flags & GS_SOFTHYPHEN)
+                       {
+                               i->flags &= ~GS_SOFTHYPHEN;
+                               i->flags |= GS_HYPHEN;
+                       }
+                       --i; /* skip the space/hypen/softhyphen */
                        int linelength=cursor.x()-i->x;
-                       i->flags|=GS_ISFIRST;
+                       i->flags|=GS_ISFIRST; /* make this a line start */
                        ePoint offset=ePoint(i->x, i->y);
                        newLine(rflags);
                        offset-=cursor;
+
+                               /* and move everything to the end into the next line. */
                        do
                        {
                                i->x-=offset.x();
                                i->y-=offset.y();
                                i->bbox.moveBy(-offset.x(), -offset.y());
-                       }
-                       while (i-- != glyphs.rbegin()); // rearrange them into the next line
+                       } while (i-- != glyphs.rbegin()); // rearrange them into the next line
                        cursor+=ePoint(linelength, 0);  // put the cursor after that line
-               }
-               else
+               } else
                {
                        if (cnt)
                        {
@@ -317,7 +355,7 @@ int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt gly
        }
 
        int xadvance=glyph->xadvance, kern=0;
-       
+
        if (previous && use_kerning)
        {
                FT_Vector delta;
@@ -342,7 +380,9 @@ int eTextPara::appendGlyph(Font *current_font, FT_Face current_face, FT_UInt gly
        ng.flags = flags;
        glyphs.push_back(ng);
 
-       cursor += ePoint(xadvance, 0);
+               /* when we have a SHY, don't xadvance. It will either be the last in the line (when used for breaking), or not displayed. */
+       if (!(flags & GS_SOFTHYPHEN))
+               cursor += ePoint(xadvance, 0);
        previous = glyphIndex;
        return 0;
 }
@@ -363,9 +403,9 @@ void eTextPara::calc_bbox()
        boundBox = i->bbox; 
        ++i;
 
-       for (; i != glyphs.end(); ++i)
+       for (; i != glyphs.end(); ++i)
        {
-               if ( i->flags & GS_ISSPACE )
+               if (i->flags & (GS_ISSPACE|GS_SOFTHYPHEN))
                        continue;
                if ( i->bbox.left() < boundBox.left() )
                        boundBox.setLeft( i->bbox.left() );
@@ -408,6 +448,7 @@ void eTextPara::setFont(const gFont *font)
 }
 
 std::string eTextPara::replacement_facename;
+std::set<int> eTextPara::forced_replaces;
 
 void eTextPara::setFont(Font *fnt, Font *replacement)
 {
@@ -420,9 +461,18 @@ void eTextPara::setFont(Font *fnt, Font *replacement)
                        // we ask for replacment_font first becauseof the cache
        if (replacement_font)
        {
+#ifdef HAVE_FREETYPE2
+               if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
+                                           replacement_font->scaler.face_id,
+                                           &replacement_face) < 0) ||
+                   (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
+                                           &replacement_font->scaler,
+                                           &replacement_font->size) < 0))
+#else
                if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, 
                                &replacement_font->font.font, &replacement_face, 
                                &replacement_font->size)<0)
+#endif
                {
                        eDebug("FTC_Manager_Lookup_Size failed!");
                        return;
@@ -430,13 +480,24 @@ void eTextPara::setFont(Font *fnt, Font *replacement)
        }
        if (current_font)
        {
+#ifdef HAVE_FREETYPE2
+               if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
+                                           current_font->scaler.face_id,
+                                           &current_face) < 0) ||
+                   (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
+                                           &current_font->scaler,
+                                           &current_font->size) < 0))
+#else
                if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
+#endif
                {
                        eDebug("FTC_Manager_Lookup_Size failed!");
                        return;
                }
        }
+#ifndef HAVE_FREETYPE2
        cache_current_font=&current_font->font.font;
+#endif
        previous=0;
        use_kerning=FT_HAS_KERNING(current_face);
 }
@@ -444,7 +505,7 @@ void eTextPara::setFont(Font *fnt, Font *replacement)
 void
 shape (std::vector<unsigned long> &string, const std::vector<unsigned long> &text);
 
-int eTextPara::renderString(const std::string &string, int rflags)
+int eTextPara::renderString(const char *string, int rflags)
 {
        singleLock s(ftlock);
        
@@ -457,6 +518,18 @@ int eTextPara::renderString(const std::string &string, int rflags)
                left=cursor.x();
        }
                
+#ifdef HAVE_FREETYPE2
+       if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
+                                   current_font->scaler.face_id,
+                                   &current_face) < 0) ||
+           (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
+                                   &current_font->scaler,
+                                   &current_font->size) < 0))
+       {
+               eDebug("FTC_Manager_Lookup_Size failed!");
+               return -1;
+       }
+#else
        if (&current_font->font.font != cache_current_font)
        {
                if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
@@ -466,13 +539,15 @@ int eTextPara::renderString(const std::string &string, int rflags)
                }
                cache_current_font=&current_font->font.font;
        }
+#endif
        
        std::vector<unsigned long> uc_string, uc_visual;
-       uc_string.reserve(string.length());
+       if (string)
+               uc_string.reserve(strlen(string));
        
-       std::string::const_iterator p(string.begin());
+       const char *p = string ? string : "";
 
-       while(p != string.end())
+       while (*p)
        {
                unsigned int unicode=(unsigned char)*p++;
 
@@ -482,28 +557,28 @@ int eTextPara::renderString(const std::string &string, int rflags)
                        {
                                unicode&=0x1F;
                                unicode<<=6;
-                               if (p != string.end())
+                               if (*p)
                                        unicode|=(*p++)&0x3F;
                        } else if ((unicode & 0xF0)==0xE0) // three bytes
                        {
                                unicode&=0x0F;
                                unicode<<=6;
-                               if (p != string.end())
+                               if (*p)
                                        unicode|=(*p++)&0x3F;
                                unicode<<=6;
-                               if (p != string.end())
+                               if (*p)
                                        unicode|=(*p++)&0x3F;
                        } else if ((unicode & 0xF8)==0xF0) // four bytes
                        {
                                unicode&=0x07;
                                unicode<<=6;
-                               if (p != string.end())
+                               if (*p)
                                        unicode|=(*p++)&0x3F;
                                unicode<<=6;
-                               if (p != string.end())
+                               if (*p)
                                        unicode|=(*p++)&0x3F;
                                unicode<<=6;
-                               if (p != string.end())
+                               if (*p)
                                        unicode|=(*p++)&0x3F;
                        }
                }
@@ -541,9 +616,11 @@ int eTextPara::renderString(const std::string &string, int rflags)
                int isprintable=1;
                int flags = nextflags;
                nextflags = 0;
+               unsigned long chr = *i;
+
                if (!(rflags&RS_DIRECT))
                {
-                       switch (*i)
+                       switch (chr)
                        {
                        case '\\':
                        {
@@ -581,6 +658,14 @@ newline:isprintable=0;
                        case 0x87: case 0xE087:
 nprint:        isprintable=0;
                                break;
+                       case 0xAD: // soft-hyphen
+                               flags |= GS_SOFTHYPHEN;
+                               chr = 0x2010; /* hyphen */
+                               break;
+                       case 0x2010:
+                       case '-':
+                               flags |= GS_HYPHEN;
+                               break;
                        case ' ':
                                flags|=GS_ISSPACE;
                        default:
@@ -589,17 +674,22 @@ nprint:   isprintable=0;
                }
                if (isprintable)
                {
-                       FT_UInt index;
+                       FT_UInt index = 0;
+
+                               /* FIXME: our font doesn't seem to have a hyphen, so use hyphen-minus for it. */
+                       if (chr == 0x2010)
+                               chr = '-';
 
-                       index=(rflags&RS_DIRECT)? *i : FT_Get_Char_Index(current_face, *i);
+                       if (forced_replaces.find(chr) == forced_replaces.end())
+                               index=(rflags&RS_DIRECT)? chr : FT_Get_Char_Index(current_face, chr);
 
                        if (!index)
                        {
                                if (replacement_face)
-                                       index=(rflags&RS_DIRECT)? *i : FT_Get_Char_Index(replacement_face, *i);
+                                       index=(rflags&RS_DIRECT)? chr : FT_Get_Char_Index(replacement_face, chr);
 
                                if (!index)
-                                       eDebug("unicode %d ('%c') not present", *i, *i);
+                                       eDebug("unicode U+%4lx not present", chr);
                                else
                                        appendGlyph(replacement_font, replacement_face, index, flags, rflags);
                        } else
@@ -622,6 +712,18 @@ void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, cons
        if (!current_font)
                return;
 
+#ifdef HAVE_FREETYPE2
+       if ((FTC_Manager_LookupFace(fontRenderClass::instance->cacheManager,
+                                   current_font->scaler.face_id,
+                                   &current_face) < 0) ||
+           (FTC_Manager_LookupSize(fontRenderClass::instance->cacheManager,
+                                   &current_font->scaler,
+                                   &current_font->size) < 0))
+       {
+               eDebug("FTC_Manager_Lookup_Size failed!");
+               return;
+       }
+#else
        if (&current_font->font.font != cache_current_font)
        {
                if (FTC_Manager_Lookup_Size(fontRenderClass::instance->cacheManager, &current_font->font.font, &current_face, &current_font->size)<0)
@@ -631,6 +733,7 @@ void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, cons
                }
                cache_current_font=&current_font->font.font;
        }
+#endif
 
        ePtr<gPixmap> target;
        dc.getPixmap(target);
@@ -659,18 +762,23 @@ void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, cons
        } else if (surface->bpp == 32)
        {
                opcode=3;
-               if (surface->clut.data)
-               {
-                       lookup8=getColor(surface->clut, background, foreground).lookup;
-                       for (int i=0; i<16; ++i)
-                               lookup32_normal[i]=((surface->clut.data[lookup8[i]].a<<24)|
-                                       (surface->clut.data[lookup8[i]].r<<16)|
-                                       (surface->clut.data[lookup8[i]].g<<8)|
-                                       (surface->clut.data[lookup8[i]].b))^0xFF000000;
-               } else
+
+               for (int i=0; i<16; ++i)
                {
-                       for (int i=0; i<16; ++i)
-                               lookup32_normal[i]=(0x010101*i)|0xFF000000;
+#define BLEND(y, x, a) (y + (((x-y) * a)>>8))
+
+                       unsigned char da = background.a, dr = background.r, dg = background.g, db = background.b;
+                       int sa = i * 16;
+                       if (sa < 256)
+                       {
+                               da = BLEND(background.a, foreground.a, sa) & 0xFF;
+                               dr = BLEND(background.r, foreground.r, sa) & 0xFF;
+                               dg = BLEND(background.g, foreground.g, sa) & 0xFF;
+                               db = BLEND(background.b, foreground.b, sa) & 0xFF;
+                       }
+#undef BLEND
+                       da ^= 0xFF;
+                       lookup32_normal[i]=db | (dg << 8) | (dr << 16) | (da << 24);;
                }
                for (int i=0; i<16; ++i)
                        lookup32_invert[i]=lookup32_normal[i^0xF];
@@ -685,89 +793,95 @@ void eTextPara::blit(gDC &dc, const ePoint &offset, const gRGB &background, cons
 
        int buffer_stride=surface->stride;
        
-       for (glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
+       for (unsigned int c = 0; c < clip.rects.size(); ++c)
        {
-               if (!(i->flags & GS_INVERT))
+               for (glyphString::iterator i(glyphs.begin()); i != glyphs.end(); ++i)
                {
-                       lookup8 = lookup8_normal;
-                       lookup32 = lookup32_normal;
-               } else
-               {
-                       lookup8 = lookup8_invert;
-                       lookup32 = lookup32_invert;
-               }
+                       if (i->flags & GS_SOFTHYPHEN)
+                               continue;
+
+                       if (!(i->flags & GS_INVERT))
+                       {
+                               lookup8 = lookup8_normal;
+                               lookup32 = lookup32_normal;
+                       } else
+                       {
+                               lookup8 = lookup8_invert;
+                               lookup32 = lookup32_invert;
+                       }
                
-               static FTC_SBit glyph_bitmap;
-               if (fontRenderClass::instance->getGlyphBitmap(&i->font->font, i->glyph_index, &glyph_bitmap))
-                       continue;
-               int rx=i->x+glyph_bitmap->left + offset.x();
-               int ry=i->y-glyph_bitmap->top  + offset.y();
+                       static FTC_SBit glyph_bitmap;
+                       if (fontRenderClass::instance->getGlyphBitmap(&i->font->font, i->glyph_index, &glyph_bitmap))
+                               continue;
+                       int rx=i->x+glyph_bitmap->left + offset.x();
+                       int ry=i->y-glyph_bitmap->top  + offset.y();
                
-               __u8 *d=(__u8*)(surface->data)+buffer_stride*ry+rx*surface->bypp;
-               __u8 *s=glyph_bitmap->buffer;
-               register int sx=glyph_bitmap->width;
-               int sy=glyph_bitmap->height;
-               if ((sy+ry) >= clip.extends.bottom())
-                       sy=clip.extends.bottom()-ry;
-               if ((sx+rx) >= clip.extends.right())
-                       sx=clip.extends.right()-rx;
-               if (rx < clip.extends.left())
-               {
-                       int diff=clip.extends.left()-rx;
-                       s+=diff;
-                       sx-=diff;
-                       rx+=diff;
-                       d+=diff*surface->bypp;
-               }
-               if (ry < clip.extends.top())
-               {
-                       int diff=clip.extends.top()-ry;
-                       s+=diff*glyph_bitmap->pitch;
-                       sy-=diff;
-                       ry+=diff;
-                       d+=diff*buffer_stride;
-               }
-               if (sx>0)
-                       for (int ay=0; ay<sy; ay++)
+                       __u8 *d=(__u8*)(surface->data)+buffer_stride*ry+rx*surface->bypp;
+                       __u8 *s=glyph_bitmap->buffer;
+                       register int sx=glyph_bitmap->width;
+                       int sy=glyph_bitmap->height;
+                       if ((sy+ry) >= clip.rects[c].bottom())
+                               sy=clip.rects[c].bottom()-ry;
+                       if ((sx+rx) >= clip.rects[c].right())
+                               sx=clip.rects[c].right()-rx;
+                       if (rx < clip.rects[c].left())
                        {
-                               if (!opcode)            // 4bit lookup to 8bit
-                               {
-                                       register __u8 *td=d;
-                                       register int ax;
-                                       
-                                       for (ax=0; ax<sx; ax++)
-                                       {       
-                                               register int b=(*s++)>>4;
-                                               if(b)
-                                                       *td++=lookup8[b];
-                                               else
-                                                       td++;
-                                       }
-                               } else if (opcode == 1) // 8bit direct
-                               {
-                                       register __u8 *td=d;
-                                       register int ax;
-                                       for (ax=0; ax<sx; ax++)
-                                       {       
-                                               register int b=*s++;
-                                               *td++^=b;
-                                       }
-                               } else
+                               int diff=clip.rects[c].left()-rx;
+                               s+=diff;
+                               sx-=diff;
+                               rx+=diff;
+                               d+=diff*surface->bypp;
+                       }
+                       if (ry < clip.rects[c].top())
+                       {
+                               int diff=clip.rects[c].top()-ry;
+                               s+=diff*glyph_bitmap->pitch;
+                               sy-=diff;
+                               ry+=diff;
+                               d+=diff*buffer_stride;
+                       }
+                       if (sx>0)
+                               for (int ay=0; ay<sy; ay++)
                                {
-                                       register __u32 *td=(__u32*)d;
-                                       register int ax;
-                                       for (ax=0; ax<sx; ax++)
-                                       {       
-                                               register int b=(*s++)>>4;
-                                               if(b)
-                                                       *td++=lookup32[b];
-                                               else
-                                                       td++;
+                                       if (!opcode)            // 4bit lookup to 8bit
+                                       {
+                                               register __u8 *td=d;
+                                               register int ax;
+                                               
+                                               for (ax=0; ax<sx; ax++)
+                                               {       
+                                                       register int b=(*s++)>>4;
+                                                       if(b)
+                                                               *td++=lookup8[b];
+                                                       else
+                                                               td++;
+                                               }
+                                       } else if (opcode == 1) // 8bit direct
+                                       {
+                                               register __u8 *td=d;
+                                               register int ax;
+                                               for (ax=0; ax<sx; ax++)
+                                               {       
+                                                       register int b=*s++;
+                                                       *td++^=b;
+                                               }
+                                       } else
+                                       {
+                                               register __u32 *td=(__u32*)d;
+                                               register int ax;
+                                               for (ax=0; ax<sx; ax++)
+                                               {       
+                                                       register int b=(*s++)>>4;
+                                                       if(b)
+                                                               *td++=lookup32[b];
+                                                       else
+                                                               td++;
+                                               }
                                        }
+                                       s+=glyph_bitmap->pitch-sx;
+                                       d+=buffer_stride;
                                }
-                               s+=glyph_bitmap->pitch-sx;
-                               d+=buffer_stride;
-                       }
+               }
        }
 }
 
@@ -803,9 +917,6 @@ void eTextPara::realign(int dir)    // der code hier ist ein wenig merkwuerdig.
                        num++;
                }
 
-               if (!num)               // line mit nur einem space
-                       continue;
-
                switch (dir)
                {
                case dirRight: