Subversion Repositories Scribus

Rev

Rev 6220 | Rev 6301 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5979 avox 1
/*
2
For general Scribus (>=1.3.2) copyright and licensing information please refer
3
to the COPYING file provided with the program. Following this notice may exist
4
a copyright and/or license notice that predates the release of Scribus 1.3.2
5
for which a new license (GPL+exception) is in place.
6
*/
7
#include <qpainter.h>
8
#include <qcolor.h>
9
#include <qwmatrix.h>
10
#include <qpixmap.h>
11
#include <qstringlist.h>
12
#include <qmap.h>
13
#include <qregexp.h>
14
 
15
#include "scribusdoc.h"
16
#include "scfonts.h"
17
#include "style.h"
18
#include "scfontmetrics.h"
19
#include "scpainter.h"
20
#include "fpoint.h"
21
#include "fpointarray.h"
22
#include "page.h"
23
#include "util.h"
24
 
25
// this code contains a set of font related functions
26
// that don't really fit within ScFonts.
27
 
28
static FPoint firstP;
29
static bool FirstM;
30
static QMap<FT_ULong, QString> adobeGlyphNames;
31
static const char* table[] = {
32
//#include "glyphnames.txt.q"
33
                                        NULL};
34
 
35
// private functions
36
static void readAdobeGlyphNames();
37
static QString adobeGlyphName(FT_ULong charcode);
38
static int traceMoveto( FT_Vector *to, FPointArray *composite );
39
static int traceLineto( FT_Vector *to, FPointArray *composite );
40
static int traceQuadraticBezier( FT_Vector *control, FT_Vector *to, FPointArray *composite );
41
static int traceCubicBezier( FT_Vector *p, FT_Vector *q, FT_Vector *to, FPointArray *composite );
42
 
43
FT_Outline_Funcs OutlineMethods =
44
    {
45
        (FT_Outline_MoveTo_Func) traceMoveto,
46
        (FT_Outline_LineTo_Func) traceLineto,
47
        (FT_Outline_ConicTo_Func) traceQuadraticBezier,
48
        (FT_Outline_CubicTo_Func) traceCubicBezier,
49
        0,
50
 
51
    };
52
 
53
 
54
const double FTSCALE = 64.0;
55
 
56
 
57
int setBestEncoding(FT_Face face)
58
{
59
        FT_ULong  charcode;
60
        FT_UInt   gindex;
61
        bool foundEncoding = false;
62
        int countUniCode = 0;
63
        int chmapUniCode = -1;
64
        int chmapCustom = -1;
65
        int retVal = 0;
66
        //FT_CharMap defaultEncoding = face->charmap;
67
//      int defaultchmap=face->charmap ? FT_Get_Charmap_Index(face->charmap) : 0;
68
// Since the above function is only available in FreeType 2.1.10 its replaced by
69
// the following line, assuming that the default charmap has the index 0
70
        int defaultchmap = 0;
71
        for(int u = 0; u < face->num_charmaps; u++)
72
        {
73
                if (face->charmaps[u]->encoding == FT_ENCODING_UNICODE )
74
                {
75
                        FT_Set_Charmap(face, face->charmaps[u]);
76
                        chmapUniCode = u;
77
                        gindex = 0;
78
                        charcode = FT_Get_First_Char( face, &gindex );
79
                        while ( gindex != 0 )
80
                        {
81
                                countUniCode++;
82
                                charcode = FT_Get_Next_Char( face, charcode, &gindex );
83
                        }
84
                }
85
                if (face->charmaps[u]->encoding == FT_ENCODING_ADOBE_CUSTOM)
86
                {
87
                        chmapCustom = u;
88
                        foundEncoding = true;
89
                        retVal = 1;
90
                        break;
91
                }
92
                else if (face->charmaps[u]->encoding == FT_ENCODING_MS_SYMBOL)
93
                {
94
                        chmapCustom = u;
95
                        foundEncoding = true;
96
                        retVal = 2;
97
                        break;
98
                }
99
        }
100
        int mapToSet=defaultchmap;
101
        if (chmapUniCode>0 && countUniCode >= face->num_glyphs-1)
102
        {
103
                mapToSet=chmapUniCode;
104
                //FT_Set_Charmap(face, face->charmaps[chmapUniCode]);
105
                retVal = 0;
106
        }
107
        else
108
        if (foundEncoding)
109
        {
110
                mapToSet=chmapCustom;
111
                //FT_Set_Charmap(face, face->charmaps[chmapCustom]);
112
        }
113
        else
114
        {
115
                mapToSet=defaultchmap;
116
                //FT_Set_Charmap(face, defaultEncoding);
117
                retVal = 0;
118
        }
119
 
120
        //Fixes #2199, missing glyphs from 1.2.1->1.2.2
121
        //If the currently wanted character map is not already Unicode...
122
        //if (FT_Get_Charmap_Index(face->charmap)!=chmapUniCode)
123
        if (mapToSet!=chmapUniCode)
124
        {
125
                //Change map so we can count the chars in it
126
                FT_Set_Charmap(face, face->charmaps[mapToSet]);
127
                //Count the characters in the current map
128
                gindex = 0;
129
                int countCurrMap=0;
130
                charcode = FT_Get_First_Char( face, &gindex );
131
                while ( gindex != 0 )
132
                {
133
                        countCurrMap++;
134
                        charcode = FT_Get_Next_Char( face, charcode, &gindex );
135
                }
136
                //If the last Unicode map we found before has more characters,
137
                //then set it to be the current map.
138
                if (countUniCode>countCurrMap)
139
                {
140
                        mapToSet=chmapUniCode;
141
                        //FT_Set_Charmap(face, face->charmaps[chmapUniCode]);
142
                        retVal = 0;
143
                }
144
        }
145
//      if (face->charmap == NULL || mapToSet!=FT_Get_Charmap_Index(face->charmap))
146
                FT_Set_Charmap(face, face->charmaps[mapToSet]);
147
        return retVal;
148
}
149
 
150
FPointArray traceGlyph(FT_Face face, FT_UInt glyphIndex, int chs, double *x, double *y, bool *err)
151
{
152
        bool error = false;
153
        //AV: not threadsave, but tracechar is only used in ReadMetrics() and fontSample()
154
        static FPointArray pts;
155
        FPointArray pts2;
156
        pts.resize(0);
157
        pts2.resize(0);
158
        firstP = FPoint(0,0);
159
        FirstM = true;
160
        error = FT_Set_Char_Size( face, 0, chs*6400, 72, 72 );
161
        if (error)
162
        {
163
                *err = error;
164
                return pts2;
165
        }
166
        if (glyphIndex == 0)
167
        {
168
                *err = true;
169
                return pts2;
170
        }
171
        double uniEM = static_cast<double>(face->units_per_EM);
172
        error = FT_Load_Glyph( face, glyphIndex, FT_LOAD_NO_HINTING | FT_LOAD_NO_BITMAP );
173
        if (error)
174
        {
175
                *err = error;
176
                return pts2;
177
        }
178
        error = FT_Outline_Decompose(&face->glyph->outline, &OutlineMethods, reinterpret_cast<void*>(&pts));
179
        if (error)
180
        {
181
                *err = error;
182
                return pts2;
183
        }
184
        *x = face->glyph->metrics.horiBearingX / 6400.0;
185
        *y = face->glyph->metrics.horiBearingY / 6400.0;
186
        QWMatrix ma;
187
        ma.scale(0.01, -0.01);
188
        pts.map(ma);
189
        pts.translate(0, chs);
190
        pts2.putPoints(0, pts.size()-2, pts, 0);
191
 
192
        return pts2;
193
}
194
 
195
 
196
FPointArray traceChar(FT_Face face, uint chr, int chs, double *x, double *y, bool *err)
197
{
198
        bool error = false;
199
        FT_UInt glyphIndex;
200
        error = FT_Set_Char_Size( face, 0, chs*64, 72, 72 );
201
        if (error)
202
        {
203
                *err = error;
204
                return FPointArray();
205
        }
206
        glyphIndex = FT_Get_Char_Index(face, chr);
6222 fschmid 207
        return traceGlyph(face, glyphIndex, chs, x, y, err);
5979 avox 208
}
209
 
210
 
5989 jghali 211
QPixmap FontSample(const ScFace& fnt, int s, QString ts, QColor back, bool force)
5979 avox 212
{
213
        FT_Face face;
214
        FT_Library library;
215
        double x, y, ymax;
216
        bool error;
217
        int  pen_x;
218
        FPoint gp;
219
        error = FT_Init_FreeType( &library );
5989 jghali 220
        error = FT_New_Face( library, QFile::encodeName(fnt.fontFilePath()), fnt.faceIndex(), &face );
5979 avox 221
        int encode = setBestEncoding(face);
222
        double uniEM = static_cast<double>(face->units_per_EM);
223
        int h = qRound(face->height / uniEM) * s + 1;
224
        double a = static_cast<double>(face->descender) / uniEM * s + 1;
225
        int w = qRound((face->bbox.xMax - face->bbox.xMin) / uniEM) * s * (ts.length()+1);
226
        if (w < 1)
227
                w = s * (ts.length()+1);
228
        if (h < 1)
229
                h = s;
230
        QPixmap pm(w, h);
231
        pm.fill();
232
        pen_x = 0;
233
        ymax = 0.0;
234
        ScPainter *p = new ScPainter(&pm, pm.width(), pm.height());
235
        p->setFillMode(1);
236
        p->setLineWidth(0.0);
237
        p->setBrush(back);
238
        p->drawRect(0.0, 0.0, static_cast<double>(w), static_cast<double>(h));
239
        p->setBrush(Qt::black);
240
        FPointArray gly;
241
        uint dv;
242
        dv = ts[0].unicode();
243
        error = false;
244
        gly = traceChar(face, dv, s, &x, &y, &error);
245
        if (((encode != 0) || (error)) && (!force))
246
        {
247
                error = false;
248
                FT_ULong  charcode;
249
                FT_UInt gindex;
250
                gindex = 0;
251
                charcode = FT_Get_First_Char(face, &gindex );
252
                for (uint n = 0; n < ts.length(); ++n)
253
                {
254
                        gly = traceChar(face, charcode, s, &x, &y, &error);
255
                        if (error)
256
                                break;
257
                        if (gly.size() > 3)
258
                        {
6222 fschmid 259
                                gly.translate(static_cast<double>(pen_x) / 6400.0, a);
5979 avox 260
                                gp = getMaxClipF(&gly);
261
                                ymax = QMAX(ymax, gp.y());
262
                                p->setupPolygon(&gly);
263
                                p->fillPath();
264
                        }
265
                        pen_x += face->glyph->advance.x;
266
                        charcode = FT_Get_Next_Char(face, charcode, &gindex );
267
                        if (gindex == 0)
268
                                break;
269
                }
270
        }
271
        else
272
        {
273
                for (uint n = 0; n < ts.length(); ++n)
274
                {
275
                        dv = ts[n].unicode();
276
                        error = false;
277
                        gly = traceChar(face, dv, s, &x, &y, &error);
278
                        if (gly.size() > 3)
279
                        {
6222 fschmid 280
                                gly.translate(static_cast<double>(pen_x) / 6400.0, a);
5979 avox 281
                                gp = getMaxClipF(&gly);
282
                                ymax = QMAX(ymax, gp.y());
283
                                p->setupPolygon(&gly);
284
                                p->fillPath();
285
                        }
286
                        pen_x += face->glyph->advance.x;
287
                }
288
        }
289
        p->end();
290
        pm.resize(QMIN(qRound(gp.x()), w), QMIN(qRound(ymax), h));
291
        delete p;
292
        FT_Done_FreeType( library );
293
        return pm;
294
}
295
 
296
/** Same as FontSample() with \n strings support added.
297
09/26/2004 petr vanek
298
 
299
QPixmap fontSamples(ScFace * fnt, int s, QString ts, QColor back)
300
{
301
        QStringList lines = QStringList::split("\n", ts);
302
        QPixmap ret(640, 480);
303
        QPixmap sample;
304
        QPainter *painter = new QPainter(&ret);
305
        int y = 0;
306
        int x = 0;
307
        ret.fill(back);
308
        for ( QStringList::Iterator it = lines.begin(); it != lines.end(); ++it )
309
        {
310
                sample = FontSample(fnt, s, *it, back);
311
                if (!sample.isNull())
312
                        painter->drawPixmap(0, y, sample, 0, 0);
313
                y = y + sample.height();
314
                if (x < sample.width())
315
                        x = sample.width();
316
        } // for
317
        delete(painter);
318
        QPixmap final(x, y);
319
        if ((x != 0) && (y != 0))
320
        {
321
                QPainter *fpainter = new QPainter(&final);
322
                fpainter->drawPixmap(0, 0, ret, 0, 0, x, y);
323
                delete(fpainter);
324
        }
325
        return final;
326
}
327
*/
328
 
6163 avox 329
bool GlyNames(FT_Face face, QMap<uint, std::pair<QChar, QString> >& GList)
5979 avox 330
{
331
        bool error;
332
        char buf[50];
333
        FT_ULong  charcode;
334
        FT_UInt gindex;
335
        setBestEncoding(face);
336
        gindex = 0;
337
        charcode = FT_Get_First_Char(face, &gindex );
338
        const bool hasPSNames = FT_HAS_GLYPH_NAMES(face);
339
        if (adobeGlyphNames.empty())
340
                readAdobeGlyphNames();
341
        while (gindex != 0)
342
        {
343
                bool notfound = true;
344
                if (hasPSNames)
345
                        notfound = FT_Get_Glyph_Name(face, gindex, &buf, 50);
346
 
347
                // just in case FT gives empty string or ".notdef"
348
                // no valid glyphname except ".notdef" starts with '.'          
349
                if (notfound || buf[0] == '\0' || buf[0] == '.')
6163 avox 350
                        GList.insert(gindex, std::make_pair(QChar(static_cast<uint>(charcode)),adobeGlyphName(charcode)));
5979 avox 351
                else
6163 avox 352
                        GList.insert(gindex, std::make_pair(QChar(static_cast<uint>(charcode)),QString(reinterpret_cast<char*>(buf))));
5979 avox 353
 
354
                charcode = FT_Get_Next_Char(face, charcode, &gindex );
355
        }
356
        return true;
357
}
6213 fschmid 358
 
359
bool GlyIndex(FT_Face face, QMap<uint, std::pair<uint, QString> >& GList)
5979 avox 360
{
361
        bool error;
362
        char buf[50];
363
        FT_ULong  charcode;
364
        FT_UInt   gindex;
365
        uint counter1 = 32;
366
        uint counter2 = 0;
367
        setBestEncoding(face);
368
        gindex = 0;
369
        charcode = FT_Get_First_Char(face, &gindex );
370
        const bool hasPSNames = FT_HAS_GLYPH_NAMES(face);
371
        if (adobeGlyphNames.empty())
372
                readAdobeGlyphNames();
373
        while (gindex != 0)
374
        {
375
                bool notfound = true;
376
                if (hasPSNames)
377
                        notfound = FT_Get_Glyph_Name(face, gindex, buf, 50);
378
 
379
                // just in case FT gives empty string or ".notdef"
380
                // no valid glyphname except ".notdef" starts with '.'          
381
                if (notfound || buf[0] == '\0' || buf[0] == '.')
6213 fschmid 382
                        GList.insert(charcode, std::make_pair(counter1 + counter2, adobeGlyphName(charcode)));
5979 avox 383
                else
6213 fschmid 384
                        GList.insert(charcode, std::make_pair(counter1 + counter2, QString(reinterpret_cast<char*>(buf))));
5979 avox 385
                charcode = FT_Get_Next_Char(face, charcode, &gindex );
386
                counter1++;
387
                if (counter1 > 255)
388
                {
389
                        counter1 = 32;
390
                        counter2 += 0x100;
391
                }
392
        }
393
        return true;
394
}
395
 
6213 fschmid 396
 
5979 avox 397
static int traceMoveto( FT_Vector *to, FPointArray *composite )
398
{
399
        double tox = ( to->x / FTSCALE );
400
        double toy = ( to->y / FTSCALE );
401
        if (!FirstM)
402
        {
403
                composite->addPoint(firstP);
404
                composite->addPoint(firstP);
405
                composite->setMarker();
406
        }
407
        else
408
                FirstM = false;
409
        composite->addPoint(tox, toy);
410
        composite->addPoint(tox, toy);
411
        firstP.setXY(tox, toy);
412
        return 0;
413
}
414
 
415
static int traceLineto( FT_Vector *to, FPointArray *composite )
416
{
417
        double tox = ( to->x / FTSCALE );
418
        double toy = ( to->y / FTSCALE );
419
        if ( !composite->hasLastQuadPoint(tox, toy, tox, toy, tox, toy, tox, toy))
420
                composite->addQuadPoint(tox, toy, tox, toy, tox, toy, tox, toy);
421
        return 0;
422
}
423
 
424
static int traceQuadraticBezier( FT_Vector *control, FT_Vector *to, FPointArray *composite )
425
{
426
        double x1 = ( control->x / FTSCALE );
427
        double y1 = ( control->y / FTSCALE );
428
        double x2 = ( to->x / FTSCALE );
429
        double y2 = ( to->y / FTSCALE );
430
        if ( !composite->hasLastQuadPoint(x2, y2, x1, y1, x2, y2, x2, y2))
431
                composite->addQuadPoint(x2, y2, x1, y1, x2, y2, x2, y2);
432
        return 0;
433
}
434
 
435
static int traceCubicBezier( FT_Vector *p, FT_Vector *q, FT_Vector *to, FPointArray *composite )
436
{
437
        double x1 = ( p->x / FTSCALE );
438
        double y1 = ( p->y / FTSCALE );
439
        double x2 = ( q->x / FTSCALE );
440
        double y2 = ( q->y / FTSCALE );
441
        double x3 = ( to->x / FTSCALE );
442
        double y3 = ( to->y / FTSCALE );
443
        if ( !composite->hasLastQuadPoint(x3, y3, x2, y2, x3, y3, x3, y3) )
444
        {
445
                composite->setPoint(composite->size()-1, FPoint(x1, y1));
446
                composite->addQuadPoint(x3, y3, x2, y2, x3, y3, x3, y3);
447
        }
448
        return 0;
449
}
450
 
451
/// init the Adobe Glyph List
452
void readAdobeGlyphNames() {
453
        adobeGlyphNames.clear();
454
        QRegExp pattern("(\\w*);([0-9A-Fa-f]{4})");
455
        for (uint i=0; table[i]; ++i) {
456
                if (pattern.search(table[i]) >= 0) {
457
                        FT_ULong unicode = pattern.cap(2).toULong(0, 16);
458
                        qDebug("%s", QString("reading glyph name %1 fo unicode %2(%3)").arg(pattern.cap(1)).arg(unicode).arg(pattern.cap(2)).ascii());
459
                        adobeGlyphNames.insert(unicode, pattern.cap(1));
460
                }
461
        }
462
}
463
 
464
 
465
/// if in AGL, use that name, else use "uni1234" or "u12345"
466
QString adobeGlyphName(FT_ULong charcode) {
467
        static const char HEX[] = "0123456789ABCDEF";
468
        QString result;
469
        if (adobeGlyphNames.contains(charcode))
470
                return adobeGlyphNames[charcode];
471
        else if (charcode < 0x10000) {
472
                result = QString("uni") + HEX[charcode>>12 & 0xF]
473
                                        + HEX[charcode>> 8 & 0xF]
474
                                        + HEX[charcode>> 4 & 0xF]
475
                                        + HEX[charcode     & 0xF];
476
        }
477
        else  {
478
                result = QString("u");
479
                for (int i= 28; i >= 0; i-=4) {
480
                        if (charcode & (0xF << i))
481
                                result += HEX[charcode >> i & 0xF];
482
                }
483
        }
484
        return result;
485
}
486
 
487
/*
488
double Cwidth(ScribusDoc *, ScFace* scFace, QString ch, int Size, QString ch2)
489
{
490
        double width;
491
        FT_Vector  delta;
492
        FT_Face      face;
493
        uint c1 = ch.at(0).unicode();
494
        uint c2 = ch2.at(0).unicode();
495
        double size10=Size/10.0;
496
        if (scFace->canRender(ch[0]))
497
        {
498
                width = scFace->charWidth(ch[0])*size10;
499
                face = scFace->ftFace();
500
                /\****
501
                        Ok, this looks like a regression between Freetype 2.1.9 -> 2.1.10.
502
                        Ignoring the value of FT_HAS_KERNING for now -- AV
503
                 ****\/
504
                if (true || FT_HAS_KERNING(face) )
505
                {
506
                        uint cl = FT_Get_Char_Index(face, c1);
507
                        uint cr = FT_Get_Char_Index(face, c2);
508
                        FT_Error error = FT_Get_Kerning(face, cl, cr, FT_KERNING_UNSCALED, &delta);
509
                        if (error) {
510
                                qDebug(QString("Error %2 when accessing kerning pair for font %1").arg(scFace->scName()).arg(error));
511
                        }
512
                        else {
513
                                double uniEM = static_cast<double>(face->units_per_EM);
514
                                width += delta.x / uniEM * size10;
515
                        }
516
                }
517
                else {
518
                        qDebug(QString("Font %1 has no kerning pairs (according to Freetype)").arg(scFace->scName()));
519
                }
520
                return width;
521
        }
522
        else
523
                return size10;
524
}
525
 
526
double RealCWidth(ScribusDoc *, ScFace* scFace, QString ch, int Size)
527
{
528
        double w, ww;
529
        uint c1 = ch.at(0).unicode();
530
        FT_Face      face;
531
        if (scFace->canRender(ch.at(0)))
532
        {
533
                face = scFace->ftFace();
534
                uint cl = FT_Get_Char_Index(face, c1);
535
                int error = FT_Load_Glyph(face, cl, FT_LOAD_NO_SCALE | FT_LOAD_NO_BITMAP );
536
                if (!error) {
537
                        double uniEM = static_cast<double>(face->units_per_EM);
538
                        w = (face->glyph->metrics.width + fabs((double)face->glyph->metrics.horiBearingX)) / uniEM * (Size / 10.0);
539
                        ww = face->glyph->metrics.horiAdvance / uniEM * (Size / 10.0);
540
                        return QMAX(ww, w);
541
                }
542
                else
543
                        sDebug(QString("internal error: missing glyph: %1 (char %2) error=%3").arg(c1).arg(ch).arg(error));
544
 
545
        }
546
        return static_cast<double>(Size / 10.0);
547
}
548
 
549
double RealCHeight(ScribusDoc *, ScFace* scFace, QString ch, int Size)
550
{
551
        double w;
552
        uint c1 = ch.at(0).unicode();
553
        FT_Face      face;
554
        if (scFace->canRender(ch.at(0)))
555
        {
556
                face = scFace->ftFace();
557
                uint cl = FT_Get_Char_Index(face, c1);
558
                int error = FT_Load_Glyph(face, cl, FT_LOAD_NO_SCALE | FT_LOAD_NO_BITMAP );
559
                if (!error) {
560
                        double uniEM = static_cast<double>(face->units_per_EM);
561
                        w = face->glyph->metrics.height / uniEM * (Size / 10.0);
562
                }
563
                else {
564
                        sDebug(QString("internal error: missing glyph: %1 (char %2) error=%3").arg(c1).arg(ch).arg(error));
565
                        w = Size / 10.0;
566
                }
567
                return w;
568
        }
569
        else
570
                return static_cast<double>(Size / 10.0);
571
}
572
 
573
double RealCAscent(ScribusDoc *, ScFace* scFace, QString ch, int Size)
574
{
575
        double w;
576
        uint c1 = ch.at(0).unicode();
577
        FT_Face      face;
578
        if (scFace->canRender(ch.at(0)))
579
        {
580
                face = scFace->ftFace();
581
                uint cl = FT_Get_Char_Index(face, c1);
582
                int error = FT_Load_Glyph(face, cl, FT_LOAD_NO_SCALE | FT_LOAD_NO_BITMAP );
583
                if (! error) {
584
                        double uniEM = static_cast<double>(face->units_per_EM);
585
                        w = face->glyph->metrics.horiBearingY / uniEM * (Size / 10.0);
586
                }
587
                else {
588
                        sDebug(QString("internal error: missing glyph: %1 (char %2) error=%3").arg(c1).arg(ch).arg(error));
589
                        w = Size / 10.0;
590
                }
591
                return w;
592
        }
593
        else
594
                return static_cast<double>(Size / 10.0);
595
}
596
 
597
double RealFHeight(ScribusDoc *, ScFace* scFace, int Size)
598
{
599
        FT_Face face = scFace->ftFace();
600
        double uniEM = static_cast<double>(face->units_per_EM);
601
        return face->height / uniEM * (Size / 10.0);
602
}
6125 cbradney 603
*/