Subversion Repositories Scribus

Rev

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

Rev Author Line No. Line
4430 cbradney 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
*/
3133 fschmid 7
/***************************************************************************
8
                          pdflib.cpp  -  description
9
                             -------------------
10
    begin                : Sat Jan 19 2002
11
    copyright            : (C) 2002 by Franz Schmid
12
    email                : Franz.Schmid@altmuehlnet.de
13
 ***************************************************************************/
14
 
15
/***************************************************************************
16
 *                                                                         *
17
 *   This program is free software; you can redistribute it and/or modify  *
18
 *   it under the terms of the GNU General Public License as published by  *
19
 *   the Free Software Foundation; either version 2 of the License, or     *
20
 *   (at your option) any later version.                                   *
21
 *                                                                         *
22
 ***************************************************************************/
23
 
24
#include "pdflib.h"
25
#include "pdflib.moc"
26
 
27
#include "scconfig.h"
28
 
4229 craig 29
#include <string>
3133 fschmid 30
#include <qstring.h>
31
#include <qrect.h>
32
#include <qimage.h>
33
#include <qregexp.h>
34
#include <qdatetime.h>
35
#include <qfileinfo.h>
36
#include <qtextstream.h>
37
#include <qdir.h>
38
#include <cstdlib>
39
#include <cmath>
6451 fschmid 40
#include <qptrstack.h>
3133 fschmid 41
#ifdef HAVE_UNISTD_H
42
#include <unistd.h>
43
#endif
44
#include "rc4.h"
45
 
4028 cbradney 46
#include "commonstrings.h"
3670 cbradney 47
#include "page.h"
3133 fschmid 48
#include "pageitem.h"
49
#include "bookmwin.h"
5917 jghali 50
#include "scpaths.h"
3133 fschmid 51
#include "scribus.h"
5243 cbradney 52
#include "scribuscore.h"
3699 cbradney 53
#include "scribusdoc.h"
4028 cbradney 54
#include "multiprogressdialog.h"
3133 fschmid 55
#include "bookpalette.h"
5993 avox 56
#include "scfonts.h"
3133 fschmid 57
#include "util.h"
58
#include "prefsmanager.h"
3252 craig 59
#include "prefscontext.h"
3133 fschmid 60
#include "pdfoptions.h"
4007 fschmid 61
#include "sccolor.h"
6378 fschmid 62
#include "scpattern.h"
7478 jghali 63
#include "sccolorengine.h"
3133 fschmid 64
 
5184 avox 65
#include "text/nlsconfig.h"
66
 
3133 fschmid 67
using namespace std;
68
 
6562 fschmid 69
#include <tiffio.h>
3133 fschmid 70
 
6562 fschmid 71
 
4264 craig 72
PDFlib::PDFlib(ScribusDoc & docu)
73
        : QObject(&docu),
4223 craig 74
        doc(docu),
75
        ActPageP(0),
4264 craig 76
        Options(doc.PDF_Options),
4223 craig 77
        Bvie(0),
78
        ObjCounter(7),
79
        ResNam("RE"),
80
        ResCount(0),
81
        NDnam("LI"),
82
        NDnum(0),
83
        KeyGen(32),
84
        OwnerKey(32),
85
        UserKey(32),
86
        FileID(16),
87
        EncryKey(5),
88
        Encrypt(0),
89
        KeyLen(5),
90
        colorsToUse(),
91
        spotNam("Spot"),
92
        spotCount(0),
4225 craig 93
        progressDialog(0),
4223 craig 94
        abortExport(false),
5243 cbradney 95
        usingGUI(ScCore->usingGUI())
3133 fschmid 96
{
97
        Catalog.Outlines = 2;
98
        Catalog.PageTree = 3;
99
        Catalog.Dest = 4;
100
        PageTree.Count = 0;
101
        Outlines.First = 0;
102
        Outlines.Last = 0;
103
        Outlines.Count = 0;
104
        Seite.ObjNum = 0;
105
        Seite.Thumb = 0;
106
        CompAvail = true;
107
        int kg_array[] = {0x28, 0xbf, 0x4e, 0x5e, 0x4e, 0x75, 0x8a, 0x41, 0x64, 0x00, 0x4e, 0x56, 0xff, 0xfa,
108
                          0x01, 0x08, 0x2e, 0x2e, 0x00, 0xb6, 0xd0, 0x68, 0x3e, 0x80, 0x2f, 0x0c, 0xa9, 0xfe,
109
                          0x64, 0x53, 0x69, 0x7a};
110
        for (int a = 0; a < 32; ++a)
111
                KeyGen[a] = kg_array[a];
4028 cbradney 112
        if (usingGUI)
113
        {
6260 fschmid 114
                progressDialog = new MultiProgressDialog( tr("Saving PDF"), CommonStrings::tr_Cancel, doc.scMW(), "pdfexportprogress");
4224 craig 115
                Q_CHECK_PTR(progressDialog);
116
                QStringList barNames, barTexts;
117
                barNames << "EMP" << "EP" << "ECPI";
5370 cbradney 118
                barTexts << tr("Exporting Master Page:") << tr("Exporting Page:") << tr("Exporting Items on Current Page:");
119
                QValueList<bool> barsNumeric;
120
                barsNumeric << true << true << false;
121
                progressDialog->addExtraProgressBars(barNames, barTexts, barsNumeric);
4224 craig 122
                connect(progressDialog->buttonCancel, SIGNAL(clicked()), this, SLOT(cancelRequested()));
4028 cbradney 123
        }
3133 fschmid 124
}
125
 
4224 craig 126
PDFlib::~PDFlib()
127
{
128
        delete progressDialog;
129
}
130
 
4229 craig 131
static inline QString FToStr(double c)
132
{
133
        return QString::number(c, 'f', 5);
134
};
135
 
4264 craig 136
bool PDFlib::doExport(const QString& fn, const QString& nam, int Components,
137
                                          const std::vector<int> & pageNs, const QMap<int,QPixmap> & thumbs)
3133 fschmid 138
{
139
        QPixmap pm;
140
        bool ret = false;
4028 cbradney 141
        int pc_exportpages=0;
142
        int pc_exportmasterpages=0;
4224 craig 143
        if (usingGUI)
144
                progressDialog->show();
5387 avox 145
        QMap<QString, QMap<uint, FPointArray> > usedFonts;
146
        usedFonts.clear();
147
        doc.getUsedFonts(usedFonts);
5781 cbradney 148
        if (PDF_Begin_Doc(fn, PrefsManager::instance()->appPrefs.AvailFonts, usedFonts, doc.scMW()->bookmarkPalette->BView))
3133 fschmid 149
        {
150
                QMap<int, int> pageNsMpa;
151
                for (uint a = 0; a < pageNs.size(); ++a)
152
                {
4264 craig 153
                        pageNsMpa.insert(doc.MasterNames[doc.Pages->at(pageNs[a]-1)->MPageNam], 0);
3133 fschmid 154
                }
4028 cbradney 155
                if (usingGUI)
3133 fschmid 156
                {
4028 cbradney 157
                        progressDialog->setOverallTotalSteps(pageNsMpa.count()+pageNs.size());
158
                        progressDialog->setTotalSteps("EMP", pageNsMpa.count());
159
                        progressDialog->setTotalSteps("EP", pageNs.size());
160
                        progressDialog->setOverallProgress(0);
161
                        progressDialog->setProgress("EMP", 0);
162
                        progressDialog->setProgress("EP", 0);
163
                }
4264 craig 164
                for (uint ap = 0; ap < doc.MasterPages.count() && !abortExport; ++ap)
4028 cbradney 165
                {
4264 craig 166
                        if (doc.MasterItems.count() != 0)
3133 fschmid 167
                        {
168
                                if (pageNsMpa.contains(ap))
169
                                {
5243 cbradney 170
                                        qApp->processEvents();
4264 craig 171
                                        PDF_TemplatePage(doc.MasterPages.at(ap));
4028 cbradney 172
                                        ++pc_exportmasterpages;
3133 fschmid 173
                                }
174
                        }
4546 subik 175
 
176
                        if (usingGUI)
177
                        {
4028 cbradney 178
                                progressDialog->setProgress("EMP", pc_exportmasterpages);
179
                                progressDialog->setOverallProgress(pc_exportmasterpages+pc_exportpages);
180
                        }
3133 fschmid 181
                }
4028 cbradney 182
                for (uint a = 0; a < pageNs.size() && !abortExport; ++a)
3133 fschmid 183
                {
4264 craig 184
                        if (doc.PDF_Options.Thumbnails)
3133 fschmid 185
                                pm = thumbs[pageNs[a]];
5243 cbradney 186
                        qApp->processEvents();
4028 cbradney 187
                        if (abortExport) break;
4264 craig 188
                        PDF_Begin_Page(doc.Pages->at(pageNs[a]-1), pm);
5243 cbradney 189
                        qApp->processEvents();
4028 cbradney 190
                        if (abortExport) break;
4649 fschmid 191
                        PDF_ProcessPage(doc.Pages->at(pageNs[a]-1), pageNs[a]-1, doc.PDF_Options.doClip);
5243 cbradney 192
                        qApp->processEvents();
4028 cbradney 193
                        if (abortExport) break;
3133 fschmid 194
                        PDF_End_Page();
4028 cbradney 195
                        pc_exportpages++;
196
                        if (usingGUI)
197
                        {
198
                                progressDialog->setProgress("EP", pc_exportpages);
199
                                progressDialog->setOverallProgress(pc_exportmasterpages+pc_exportpages);
200
                        }
3133 fschmid 201
                }
4028 cbradney 202
                ret = true;//Even when aborting we return true. Dont want that "couldnt write msg"
203
                if (!abortExport)
204
                {
4264 craig 205
                        if (doc.PDF_Options.Version == PDFOptions::PDFVersion_X3)
5243 cbradney 206
                                PDF_End_Doc(ScCore->PrinterProfiles[doc.PDF_Options.PrintProf], nam, Components);
4028 cbradney 207
                        else
208
                                PDF_End_Doc();
209
                }
3133 fschmid 210
                else
4028 cbradney 211
                        closeAndCleanup();
3133 fschmid 212
        }
4029 cbradney 213
        if (usingGUI)
214
                progressDialog->close();
3133 fschmid 215
        return ret;
216
}
217
 
218
void PDFlib::StartObj(int nr)
219
{
4229 craig 220
        XRef.append(bytesWritten());
221
        PutDoc(QString::number(nr)+ " 0 obj\n");
3133 fschmid 222
}
223
 
4229 craig 224
// Encode a string for inclusion in a
225
// PDF (literal) .
226
QString PDFlib::PDFEncode(const QString & in)
3133 fschmid 227
{
4229 craig 228
        QString tmp("");
3133 fschmid 229
        for (uint d = 0; d < in.length(); ++d)
230
        {
4229 craig 231
                QChar cc(in.at(d));
4230 craig 232
                if ((cc == '(') || (cc == ')') || (cc == '\\'))
233
                        tmp += '\\';
3133 fschmid 234
                tmp += cc;
235
        }
236
        return tmp;
237
}
238
 
7328 fschmid 239
QByteArray PDFlib::EncodeUTF16(const QString &in)
240
{
241
        QString tmp("");
242
        for (uint d = 0; d < in.length(); ++d)
243
        {
244
                QChar cc(in.at(d));
245
                if ((cc == '(') || (cc == ')') || (cc == '\\'))
246
                        tmp += '\\';
247
                tmp += cc;
248
        }
7334 fschmid 249
        QTextCodec *codec = QTextCodec::codecForName("ISO-10646-UCS-2");
250
        QCString cres = codec->fromUnicode( tmp );
251
        uchar sw;
252
        for(uint d = 0; d < cres.size()-1; d += 2)
253
        {
254
                sw = cres[d];
255
                cres[d] = cres[d+1];
256
                cres[d+1] = sw;
257
        }
258
        return cres;
7328 fschmid 259
}
260
 
4229 craig 261
QString PDFlib::EncStream(const QString & in, int ObjNum)
3133 fschmid 262
{
4229 craig 263
        if (in.length() < 1)
264
                return QString("");
4264 craig 265
        else if (!Options.Encrypt)
4229 craig 266
                return in;
267
        rc4_context_t rc4;
3133 fschmid 268
        int dlen = 0;
4229 craig 269
        QString tmp(in);
270
        QByteArray us(tmp.length());
271
        QByteArray ou(tmp.length());
272
        for (uint a = 0; a < tmp.length(); ++a)
273
                us[a] = uchar(QChar(tmp.at(a)));
274
        QByteArray data(10);
275
        if (KeyLen > 5)
276
                data.resize(21);
277
        for (int cd = 0; cd < KeyLen; ++cd)
3133 fschmid 278
        {
4229 craig 279
                data[cd] = EncryKey[cd];
280
                dlen++;
3133 fschmid 281
        }
4229 craig 282
        data[dlen++] = ObjNum;
283
        data[dlen++] = ObjNum >> 8;
284
        data[dlen++] = ObjNum >> 16;
285
        data[dlen++] = 0;
286
        data[dlen++] = 0;
287
        QByteArray step1(16);
288
        step1 = ComputeMD5Sum(&data);
289
        rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16));
290
        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), reinterpret_cast<uchar*>(ou.data()), tmp.length());
291
        QString uk = "";
292
        for (uint cl = 0; cl < tmp.length(); ++cl)
293
                uk += QChar(ou[cl]);
294
        return uk;
3133 fschmid 295
}
296
 
5234 fschmid 297
QByteArray PDFlib::EncStreamArray(const QByteArray & in, int ObjNum)
298
{
299
        if (in.size() < 1)
300
                return QByteArray();
301
        else if (!Options.Encrypt)
302
                return in;
303
        rc4_context_t rc4;
304
        int dlen = 0;
305
        QByteArray out(in.size());
306
        QByteArray data(10);
307
        if (KeyLen > 5)
308
                data.resize(21);
309
        for (int cd = 0; cd < KeyLen; ++cd)
310
        {
311
                data[cd] = EncryKey[cd];
312
                dlen++;
313
        }
314
        data[dlen++] = ObjNum;
315
        data[dlen++] = ObjNum >> 8;
316
        data[dlen++] = ObjNum >> 16;
317
        data[dlen++] = 0;
318
        data[dlen++] = 0;
319
        QByteArray step1(16);
320
        step1 = ComputeMD5Sum(&data);
321
        rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16));
322
        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(in.data()), reinterpret_cast<uchar*>(out.data()), in.size());
323
        return out;
324
}
325
 
4229 craig 326
QString PDFlib::EncString(const QString & in, int ObjNum)
3133 fschmid 327
{
4264 craig 328
        if (!Options.Encrypt)
4229 craig 329
                return in;
330
        rc4_context_t rc4;
3133 fschmid 331
        QString tmp;
332
        int dlen = 0;
4229 craig 333
        if (in.length() < 3)
334
                return "<>";
335
        tmp = in.mid(1, in.length()-2);
336
        QByteArray us(tmp.length());
337
        QByteArray ou(tmp.length());
338
        for (uint a = 0; a < tmp.length(); ++a)
339
                us[a] = static_cast<uchar>(QChar(tmp.at(a)));
340
        QByteArray data(10);
341
        if (KeyLen > 5)
342
                data.resize(21);
343
        for (int cd = 0; cd < KeyLen; ++cd)
3133 fschmid 344
        {
4229 craig 345
                data[cd] = EncryKey[cd];
346
                dlen++;
3133 fschmid 347
        }
4229 craig 348
        data[dlen++] = ObjNum;
349
        data[dlen++] = ObjNum >> 8;
350
        data[dlen++] = ObjNum >> 16;
351
        data[dlen++] = 0;
352
        data[dlen++] = 0;
353
        QByteArray step1(16);
354
        step1 = ComputeMD5Sum(&data);
355
        rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16));
356
        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), reinterpret_cast<uchar*>(ou.data()), tmp.length());
357
        QString uk = "";
358
        for (uint cl = 0; cl < tmp.length(); ++cl)
359
                uk += QChar(ou[cl]);
360
        tmp = "<"+String2Hex(&uk, false)+">";
3133 fschmid 361
        return tmp;
362
}
363
 
7328 fschmid 364
QString PDFlib::EncStringUTF16(const QString & in, int ObjNum)
365
{
7355 fschmid 366
        if (in.length() < 3)
367
                return "<>";
7328 fschmid 368
        if (!Options.Encrypt)
369
        {
370
                QString tmp = in.mid(1, in.length()-2);
371
                QByteArray us = EncodeUTF16(tmp);
372
                QString uk = "";
373
                for (uint cl = 0; cl < us.size(); ++cl)
374
                        uk += QChar(us[cl]);
375
                return "<"+String2Hex(&uk, false)+">";
376
        }
377
        rc4_context_t rc4;
378
        QString tmp;
379
        int dlen = 0;
380
        tmp = in.mid(1, in.length()-2);
381
        QByteArray us = EncodeUTF16(tmp);
382
        QByteArray ou(us.size());
383
        QByteArray data(10);
384
        if (KeyLen > 5)
385
                data.resize(21);
386
        for (int cd = 0; cd < KeyLen; ++cd)
387
        {
388
                data[cd] = EncryKey[cd];
389
                dlen++;
390
        }
391
        data[dlen++] = ObjNum;
392
        data[dlen++] = ObjNum >> 8;
393
        data[dlen++] = ObjNum >> 16;
394
        data[dlen++] = 0;
395
        data[dlen++] = 0;
396
        QByteArray step1(16);
397
        step1 = ComputeMD5Sum(&data);
398
        rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16));
399
        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), reinterpret_cast<uchar*>(ou.data()), ou.size());
400
        QString uk = "";
401
        for (uint cl = 0; cl < ou.size(); ++cl)
402
                uk += QChar(ou[cl]);
403
        tmp = "<"+String2Hex(&uk, false)+">";
404
        return tmp;
405
}
406
 
4229 craig 407
QString PDFlib::FitKey(const QString & pass)
3133 fschmid 408
{
4229 craig 409
        QString pw(pass);
3133 fschmid 410
        if (pw.length() < 32)
411
        {
412
                uint l = pw.length();
413
                for (uint a = 0; a < 32 - l; ++a)
414
                        pw += QChar(KeyGen[a]);
415
        }
416
        else
417
                pw = pw.left(32);
418
        return pw;
419
}
420
 
4229 craig 421
void PDFlib::CalcOwnerKey(const QString & Owner, const QString & User)
3133 fschmid 422
{
4229 craig 423
        rc4_context_t rc4;
424
        QString pw(FitKey(User));
425
        QString pw2(FitKey(Owner.isEmpty() ? User : Owner));
3133 fschmid 426
        QByteArray step1(16);
427
        step1 = ComputeMD5(pw2);
428
        if (KeyLen > 5)
429
        {
430
                for (int kl = 0; kl < 50; ++kl)
431
                        step1 = ComputeMD5Sum(&step1);
432
        }
433
        QByteArray us(32);
434
        QByteArray enk(16);
435
        if (KeyLen > 5)
436
        {
437
                for (uint a2 = 0; a2 < 32; ++a2)
438
                        OwnerKey[a2] = static_cast<uchar>(QChar(pw.at(a2)));
439
                for (int rl = 0; rl < 20; rl++)
440
                {
4229 craig 441
                        for (int j = 0; j < 16; j ++)
442
                                enk[j] = step1[j] ^ rl;
3133 fschmid 443
                        rc4_init(&rc4, reinterpret_cast<uchar*>(enk.data()), 16);
4229 craig 444
                        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(OwnerKey.data()),
3133 fschmid 445
                                         reinterpret_cast<uchar*>(OwnerKey.data()), 32);
446
                }
447
        }
448
        else
449
        {
450
                for (uint a = 0; a < 32; ++a)
451
                        us[a] = static_cast<uchar>(QChar(pw.at(a)));
452
                rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), 5);
4546 subik 453
                rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()),
3133 fschmid 454
                                        reinterpret_cast<uchar*>(OwnerKey.data()), 32);
455
        }
456
}
457
 
4229 craig 458
void PDFlib::CalcUserKey(const QString & User, int Permission)
3133 fschmid 459
{
460
        rc4_context_t   rc4;
4229 craig 461
        QString pw(FitKey(User));
3133 fschmid 462
        QByteArray step1(16);
463
        QByteArray perm(4);
464
        uint perm_value = static_cast<uint>(Permission);
465
        perm[0] = perm_value;
466
        perm[1] = perm_value >> 8;
467
        perm[2] = perm_value >> 16;
468
        perm[3] = perm_value >> 24;
469
        for (uint a = 0; a < 32; ++a)
470
                pw += QChar(OwnerKey[a]);
471
        for (uint a1 = 0; a1 < 4; ++a1)
472
                pw += QChar(perm[a1]);
473
        for (uint a3 = 0; a3 < 16; ++a3)
474
                pw += QChar(FileID[a3]);
475
        step1 = ComputeMD5(pw);
476
        if (KeyLen > 5)
477
        {
478
                for (int kl = 0; kl < 50; ++kl)
479
                        step1 = ComputeMD5Sum(&step1);
480
                EncryKey.resize(16);
481
        }
482
        for (int a2 = 0; a2 < KeyLen; ++a2)
483
                EncryKey[a2] = step1[a2];
484
        if (KeyLen > 5)
485
        {
4229 craig 486
                QString pr2("");
3133 fschmid 487
                for (int kl3 = 0; kl3 < 32; ++kl3)
488
                        pr2 += QChar(KeyGen[kl3]);
489
                for (uint a4 = 0; a4 < 16; ++a4)
490
                        pr2 += QChar(FileID[a4]);
491
                step1 = ComputeMD5(pr2);
492
                QByteArray enk(16);
493
                for (uint a3 = 0; a3 < 16; ++a3)
494
                        UserKey[a3] = step1[a3];
495
                for (int rl = 0; rl < 20; rl++)
496
                {
4229 craig 497
                        for (int j = 0; j < 16; j ++)
498
                                enk[j] = EncryKey[j] ^ rl;
3133 fschmid 499
                        rc4_init(&rc4, reinterpret_cast<uchar*>(enk.data()), 16);
4229 craig 500
                        rc4_encrypt(&rc4, reinterpret_cast<uchar*>(UserKey.data()), reinterpret_cast<uchar*>(UserKey.data()), 16);
3133 fschmid 501
                }
502
        }
503
        else
504
        {
505
                rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), 5);
4229 craig 506
                rc4_encrypt(&rc4, reinterpret_cast<uchar*>(KeyGen.data()), reinterpret_cast<uchar*>(UserKey.data()), 32);
3133 fschmid 507
        }
508
}
509
 
3829 cbradney 510
QByteArray PDFlib::ComputeMD5(const QString& in)
3133 fschmid 511
{
3829 cbradney 512
        uint inlen=in.length();
513
        QByteArray TBytes(inlen);
514
        for (uint a = 0; a < inlen; ++a)
3133 fschmid 515
                TBytes[a] = static_cast<uchar>(QChar(in.at(a)));
516
        return ComputeMD5Sum(&TBytes);
517
}
518
 
5387 avox 519
bool PDFlib::PDF_Begin_Doc(const QString& fn, SCFonts &AllFonts, QMap<QString, QMap<uint, FPointArray> > DocFonts, BookMView* vi)
3133 fschmid 520
{
4229 craig 521
        Spool.setName(fn);
3133 fschmid 522
        if (!Spool.open(IO_WriteOnly))
523
                return false;
4229 craig 524
        outStream.setDevice(&Spool);
3133 fschmid 525
        QString tmp;
526
        QString ok = "";
527
        QString uk = "";
528
        QFileInfo fd;
529
        QString fext;
530
        int a;
6407 fschmid 531
        inPattern = 0;
3133 fschmid 532
        Bvie = vi;
533
        BookMinUse = false;
534
        UsedFontsP.clear();
8454 fschmid 535
        UsedFontsF.clear();
4264 craig 536
        if ((Options.Version == 15) && (Options.useLayers))
3133 fschmid 537
                ObjCounter = 10;
538
        else
539
                ObjCounter = 9;
4264 craig 540
        switch (Options.Version)
3133 fschmid 541
        {
542
                case 12:
543
                case 13:
4229 craig 544
                        PutDoc("%PDF-1.3\n");
3133 fschmid 545
                        break;
546
                case 14:
547
                        PutDoc("%PDF-1.4\n");
548
                        break;
549
                case 15:
550
                        PutDoc("%PDF-1.5\n");
551
                        break;
552
        }
4264 craig 553
        if (Options.Version == 12)
3133 fschmid 554
                ObjCounter++;
4229 craig 555
        PutDoc("%\xc7\xec\x8f\xa2\n");
3133 fschmid 556
        StartObj(1);
557
        PutDoc("<<\n/Type /Catalog\n/Outlines 3 0 R\n/Pages 4 0 R\n/Dests 5 0 R\n/AcroForm 6 0 R\n/Names 7 0 R\n/Threads 8 0 R\n");
4264 craig 558
        if ((Options.Version == 15) && (Options.useLayers))
3133 fschmid 559
                PutDoc("/OCProperties 9 0 R\n");
4264 craig 560
        if (Options.Version == 12)
4229 craig 561
                PutDoc("/OutputIntents [ "+QString::number(ObjCounter-1)+" 0 R ]\n");
4197 fschmid 562
        PutDoc("/PageLayout ");
4264 craig 563
        switch (Options.PageLayout)
3133 fschmid 564
        {
4197 fschmid 565
                case PDFOptions::SinglePage:
566
                        PutDoc("/SinglePage\n");
567
                        break;
568
                case PDFOptions::OneColumn:
569
                        PutDoc("/OneColumn\n");
570
                        break;
571
                case PDFOptions::TwoColumnLeft:
572
                        PutDoc("/TwoColumnLeft\n");
573
                        break;
574
                case PDFOptions::TwoColumnRight:
575
                        PutDoc("/TwoColumnRight\n");
576
                        break;
577
        }
4264 craig 578
        if (Options.displayBookmarks)
4197 fschmid 579
                PutDoc("/PageMode /UseOutlines\n");
4264 craig 580
        else if (Options.displayFullscreen)
4197 fschmid 581
                PutDoc("/PageMode /FullScreen\n");
4264 craig 582
        else if (Options.displayThumbs)
4197 fschmid 583
                PutDoc("/PageMode /UseThumbs\n");
4264 craig 584
        else if ((Options.Version == 15) && (Options.displayLayers))
4197 fschmid 585
                        PutDoc("/PageMode /UseOC\n");
4264 craig 586
        if (!Options.openAction.isEmpty())
4197 fschmid 587
        {
4264 craig 588
                PutDoc("/OpenAction << /S /JavaScript /JS (this."+Options.openAction+"\\(\\)) >>\n");
3133 fschmid 589
        }
590
        PutDoc("/ViewerPreferences\n<<\n/PageDirection ");
4264 craig 591
        PutDoc( Options.Binding == 0 ? "/L2R\n" : "/R2L\n");
592
        if (Options.hideToolBar)
4201 fschmid 593
                PutDoc("/HideToolbar true\n");
4264 craig 594
        if (Options.hideMenuBar)
4201 fschmid 595
                PutDoc("/HideMenubar true\n");
4264 craig 596
        if (Options.fitWindow)
4201 fschmid 597
                PutDoc("/FitWindow true\n");
3133 fschmid 598
        PutDoc(" >>\n>>\nendobj\n");
3829 cbradney 599
        QString IDg(Datum);
4264 craig 600
        IDg += Options.Datei;
3133 fschmid 601
        IDg += "Scribus "+QString(VERSION);
6878 fschmid 602
        IDg += "Scribus PDF Library "+QString(VERSION);
4264 craig 603
        IDg += doc.documentInfo.getTitle();
604
        IDg += doc.documentInfo.getAuthor();
3133 fschmid 605
        IDg += "/False";
606
        FileID = ComputeMD5(IDg);
4264 craig 607
        if (Options.Encrypt)
3133 fschmid 608
        {
6166 fschmid 609
                if ((Options.Version == 14) || (Options.Version == 15))
610
                        KeyLen = 16;
611
                else
612
                        KeyLen = 5;
4264 craig 613
                CalcOwnerKey(Options.PassOwner, Options.PassUser);
614
                CalcUserKey(Options.PassUser, Options.Permissions);
3133 fschmid 615
                for (uint cl2 = 0; cl2 < 32; ++cl2)
616
                        ok += QChar(OwnerKey[cl2]);
617
                if (KeyLen > 5)
618
                {
619
                        for (uint cl3 = 0; cl3 < 16; ++cl3)
620
                                uk += QChar(UserKey[cl3]);
621
                        for (uint cl3r = 0; cl3r < 16; ++cl3r)
622
                                uk += QChar(KeyGen[cl3r]);
623
                }
624
                else
625
                {
626
                        for (uint cl = 0; cl < 32; ++cl)
627
                                uk += QChar(UserKey[cl]);
628
                }
629
        }
630
        QDate d = QDate::currentDate();
631
        Datum = "D:";
632
        tmp.sprintf("%4d", d.year());
633
        tmp.replace(QRegExp(" "), "0");
634
        Datum += tmp;
635
        tmp.sprintf("%2d", d.month());
636
        tmp.replace(QRegExp(" "), "0");
637
        Datum += tmp;
638
        tmp.sprintf("%2d", d.day());
639
        tmp.replace(QRegExp(" "), "0");
640
        Datum += tmp;
4229 craig 641
        tmp = QTime::currentTime().toString();
3133 fschmid 642
        tmp.replace(QRegExp(":"), "");
643
        Datum += tmp;
644
        StartObj(2);
645
        PutDoc("<<\n/Creator "+EncString("(Scribus "+QString(VERSION)+")",2)+"\n");
6890 fschmid 646
        PutDoc("/Producer "+EncString("(Scribus PDF Library "+QString(VERSION)+")",2)+"\n");
4718 fschmid 647
        QString docTitle = doc.documentInfo.getTitle();
648
        if ((Options.Version == 12) && (docTitle.isEmpty()))
7328 fschmid 649
                PutDoc("/Title "+EncStringUTF16("("+doc.DocName+")",2)+"\n");
4718 fschmid 650
        else
7328 fschmid 651
                PutDoc("/Title "+EncStringUTF16("("+doc.documentInfo.getTitle()+")",2)+"\n");
652
        PutDoc("/Author "+EncStringUTF16("("+doc.documentInfo.getAuthor()+")",2)+"\n");
653
        PutDoc("/Keywords "+EncStringUTF16("("+doc.documentInfo.getKeywords()+")",2)+"\n");
3133 fschmid 654
        PutDoc("/CreationDate "+EncString("("+Datum+")",2)+"\n");
655
        PutDoc("/ModDate "+EncString("("+Datum+")",2)+"\n");
4264 craig 656
        if (Options.Version == 12)
3133 fschmid 657
                PutDoc("/GTS_PDFXVersion (PDF/X-3:2002)\n");
658
        PutDoc("/Trapped /False\n>>\nendobj\n");
4229 craig 659
        for (int t = 0; t < 6; ++t)
660
                XRef.append(bytesWritten());
4264 craig 661
        if ((Options.Version == 15) && (Options.useLayers))
4229 craig 662
                XRef.append(bytesWritten());
4264 craig 663
        if (Options.Version == 12)
4229 craig 664
                XRef.append(bytesWritten());
4264 craig 665
        if (Options.Encrypt)
3133 fschmid 666
        {
667
                StartObj(ObjCounter);
668
                Encrypt = ObjCounter;
669
                ObjCounter++;
670
                PutDoc("<<\n/Filter /Standard\n");
671
                PutDoc( KeyLen > 5 ? "/R 3\n/V 2\n/Length 128\n" : "/R 2\n/V 1\n");
672
                PutDoc("/O <"+String2Hex(&ok)+">\n");
673
                PutDoc("/U <"+String2Hex(&uk)+">\n");
4264 craig 674
                PutDoc("/P "+QString::number(Options.Permissions)+"\n>>\nendobj\n");
3133 fschmid 675
        }
5387 avox 676
        QMap<QString, QMap<uint, FPointArray> > ReallyUsed;
3133 fschmid 677
        ReallyUsed.clear();
678
        PageItem* pgit;
4017 fschmid 679
        QMap<int, QString> ind2PDFabr;
4546 subik 680
        const QString tmpf[] = {"/Courier", "/Courier-Bold", "/Courier-Oblique", "/Courier-BoldOblique",
4017 fschmid 681
                                                                                                "/Helvetica", "/Helvetica-Bold", "/Helvetica-Oblique", "/Helvetica-BoldOblique",
4546 subik 682
                                                                                                "/Times-Roman", "/Times-Bold", "/Times-Italic", "/Times-BoldItalic",
4017 fschmid 683
                                                                                                "/ZapfDingbats", "/Symbol"};
684
        size_t ar = sizeof(tmpf) / sizeof(*tmpf);
685
        for (uint ax = 0; ax < ar; ++ax)
686
                ind2PDFabr[ax] = tmpf[ax];
4264 craig 687
        for (uint c = 0; c < doc.FrameItems.count(); ++c)
3133 fschmid 688
        {
4264 craig 689
                pgit = doc.FrameItems.at(c);
3133 fschmid 690
                if ((pgit->itemType() == PageItem::TextFrame) || (pgit->itemType() == PageItem::PathText))
691
                {
4084 cbradney 692
                        if (pgit->isAnnotation())
8092 fschmid 693
                        {
8351 fschmid 694
                                if (pgit->annotation().Type() == 4)
695
                                        StdFonts.insert("/ZapfDingbats", "");
4084 cbradney 696
                                StdFonts.insert(ind2PDFabr[pgit->annotation().Font()], "");
8092 fschmid 697
                                ReallyUsed.insert(pgit->itemText.defaultStyle().charStyle().font().replacementName(), DocFonts[pgit->itemText.defaultStyle().charStyle().font().replacementName()]);
698
                        }
5292 fschmid 699
                        for (uint e = 0; e < static_cast<uint>(pgit->itemText.length()); ++e)
3133 fschmid 700
                        {
7210 avox 701
                                ReallyUsed.insert(pgit->itemText.charStyle(e).font().replacementName(), DocFonts[pgit->itemText.charStyle(e).font().replacementName()]);
3133 fschmid 702
                        }
703
                }
704
        }
4264 craig 705
        for (uint c = 0; c < doc.MasterItems.count(); ++c)
3133 fschmid 706
        {
4264 craig 707
                pgit = doc.MasterItems.at(c);
3133 fschmid 708
                if ((pgit->itemType() == PageItem::TextFrame) || (pgit->itemType() == PageItem::PathText))
709
                {
4084 cbradney 710
                        if (pgit->isAnnotation())
8092 fschmid 711
                        {
8351 fschmid 712
                                if (pgit->annotation().Type() == 4)
713
                                        StdFonts.insert("/ZapfDingbats", "");
4084 cbradney 714
                                StdFonts.insert(ind2PDFabr[pgit->annotation().Font()], "");
8092 fschmid 715
                                ReallyUsed.insert(pgit->itemText.defaultStyle().charStyle().font().replacementName(), DocFonts[pgit->itemText.defaultStyle().charStyle().font().replacementName()]);
716
                        }
5292 fschmid 717
                        for (uint e = 0; e < static_cast<uint>(pgit->itemText.length()); ++e)
3133 fschmid 718
                        {
7210 avox 719
                                ReallyUsed.insert(pgit->itemText.charStyle(e).font().replacementName(), DocFonts[pgit->itemText.charStyle(e).font().replacementName()]);
3133 fschmid 720
                        }
721
                }
722
        }
4264 craig 723
        for (uint d = 0; d < doc.Items->count(); ++d)
3133 fschmid 724
        {
4264 craig 725
                pgit = doc.Items->at(d);
3133 fschmid 726
                if ((pgit->itemType() == PageItem::TextFrame) || (pgit->itemType() == PageItem::PathText))
727
                {
4084 cbradney 728
                        if (pgit->isAnnotation())
8092 fschmid 729
                        {
8351 fschmid 730
                                if (pgit->annotation().Type() == 4)
731
                                        StdFonts.insert("/ZapfDingbats", "");
4084 cbradney 732
                                StdFonts.insert(ind2PDFabr[pgit->annotation().Font()], "");
8092 fschmid 733
                                ReallyUsed.insert(pgit->itemText.defaultStyle().charStyle().font().replacementName(), DocFonts[pgit->itemText.defaultStyle().charStyle().font().replacementName()]);
734
                        }
5292 fschmid 735
                        for (uint e = 0; e < static_cast<uint>(pgit->itemText.length()); ++e)
3133 fschmid 736
                        {
7210 avox 737
                                ReallyUsed.insert(pgit->itemText.charStyle(e).font().replacementName(), DocFonts[pgit->itemText.charStyle(e).font().replacementName()]);
3133 fschmid 738
                        }
739
                }
740
        }
6943 fschmid 741
        if (Options.docInfoMarks)
742
        {
743
                StdFonts.insert("/Helvetica", "");
744
        }
6407 fschmid 745
        QStringList patterns = doc.getUsedPatterns();
746
        for (uint c = 0; c < patterns.count(); ++c)
747
        {
748
                ScPattern pa = doc.docPatterns[patterns[c]];
749
                for (uint o = 0; o < pa.items.count(); o++)
750
                {
751
                        pgit = pa.items.at(o);
752
                        if ((pgit->itemType() == PageItem::TextFrame) || (pgit->itemType() == PageItem::PathText))
753
                        {
754
                                if (pgit->isAnnotation())
8351 fschmid 755
                                {
756
                                        if (pgit->annotation().Type() == 4)
757
                                                StdFonts.insert("/ZapfDingbats", "");
6407 fschmid 758
                                        StdFonts.insert(ind2PDFabr[pgit->annotation().Font()], "");
8454 fschmid 759
                                        ReallyUsed.insert(pgit->itemText.defaultStyle().charStyle().font().replacementName(), DocFonts[pgit->itemText.defaultStyle().charStyle().font().replacementName()]);
8351 fschmid 760
                                }
6407 fschmid 761
                                for (uint e = 0; e < static_cast<uint>(pgit->itemText.length()); ++e)
762
                                {
7210 avox 763
                                        ReallyUsed.insert(pgit->itemText.charStyle(e).font().replacementName(), DocFonts[pgit->itemText.charStyle(e).font().replacementName()]);
6407 fschmid 764
                                }
765
                        }
766
                }
767
        }
4017 fschmid 768
        a = 0;
769
        QMap<QString, QString>::Iterator itStd;
770
        for (itStd = StdFonts.begin(); itStd != StdFonts.end(); ++itStd)
771
        {
772
                StartObj(ObjCounter);
773
                PutDoc("<<\n/Type /Font\n/Subtype /Type1\n");
8392 fschmid 774
                PutDoc("/Name /FoStd"+QString::number(a)+"\n");
4017 fschmid 775
                PutDoc("/BaseFont "+itStd.key()+"\n");
8432 fschmid 776
                if (itStd.key() != "/ZapfDingbats")
777
                {
778
                        PutDoc("/Encoding << \n");
779
                        PutDoc("/Differences [ \n");
780
                        PutDoc("24 /breve /caron /circumflex /dotaccent /hungarumlaut /ogonek /ring /tilde\n");
781
                        PutDoc("39 /quotesingle 96 /grave 128 /bullet /dagger /daggerdbl /ellipsis /emdash /endash /florin /fraction /guilsinglleft /guilsinglright\n");
782
                        PutDoc("/minus /perthousand /quotedblbase /quotedblleft /quotedblright /quoteleft /quoteright /quotesinglbase /trademark /fi /fl /Lslash /OE /Scaron\n");
783
                        PutDoc("/Ydieresis /Zcaron /dotlessi /lslash /oe /scaron /zcaron 164 /currency 166 /brokenbar 168 /dieresis /copyright /ordfeminine 172 /logicalnot\n");
784
                        PutDoc("/.notdef /registered /macron /degree /plusminus /twosuperior /threesuperior /acute /mu 183 /periodcentered /cedilla /onesuperior /ordmasculine\n");
785
                        PutDoc("188 /onequarter /onehalf /threequarters 192 /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex\n");
786
                        PutDoc("/Edieresis /Igrave /Iacute /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash\n");
787
                        PutDoc("/Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla\n");
788
                        PutDoc("/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis\n");
789
                        PutDoc("/divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis\n");
790
                        PutDoc("] >>\n");
791
                }
4017 fschmid 792
                PutDoc(">>\nendobj\n");
4229 craig 793
                Seite.FObjects["FoStd"+QString::number(a)] = ObjCounter;
794
                itStd.data() = "FoStd"+QString::number(a);
4017 fschmid 795
                ObjCounter++;
796
                a++;
797
        }
5387 avox 798
        QMap<QString,QMap<uint, FPointArray> >::Iterator it;
3133 fschmid 799
        a = 0;
800
        for (it = ReallyUsed.begin(); it != ReallyUsed.end(); ++it)
801
        {
5980 avox 802
                ScFace::FontFormat fformat = AllFonts[it.key()].format();
7089 fschmid 803
                if ((!AllFonts[it.key()].hasNames()) || (Options.SubsetList.contains(it.key())))
3133 fschmid 804
                {
3829 cbradney 805
                        QString fon("");
5387 avox 806
                        QMap<uint,FPointArray>& RealGlyphs(it.data());
3133 fschmid 807
                        QMap<uint,FPointArray>::Iterator ig;
5387 avox 808
                        for (ig = RealGlyphs.begin(); ig != RealGlyphs.end(); ++ig)
3133 fschmid 809
                        {
810
                                FPoint np, np1, np2;
811
                                bool nPath = true;
5606 fschmid 812
                                fon = "";
3133 fschmid 813
                                if (ig.data().size() > 3)
814
                                {
5387 avox 815
                                        FPointArray gly = ig.data();
3133 fschmid 816
                                        QWMatrix mat;
817
                                        mat.scale(0.1, 0.1);
818
                                        gly.map(mat);
819
                                        for (uint poi = 0; poi < gly.size()-3; poi += 4)
820
                                        {
821
                                                if (gly.point(poi).x() > 900000)
822
                                                {
823
                                                        fon += "h\n";
824
                                                        nPath = true;
825
                                                        continue;
826
                                                }
827
                                                if (nPath)
828
                                                {
829
                                                        np = gly.point(poi);
830
                                                        fon += FToStr(np.x())+" "+FToStr(-np.y())+" m\n";
831
                                                        nPath = false;
832
                                                }
833
                                                np = gly.point(poi+1);
834
                                                np1 = gly.point(poi+3);
835
                                                np2 = gly.point(poi+2);
836
                                                fon += FToStr(np.x()) + " " + FToStr(-np.y()) + " " +
837
                                                         FToStr(np1.x()) + " " + FToStr(-np1.y()) + " " +
838
                                                         FToStr(np2.x()) + " " + FToStr(-np2.y()) + " c\n";
839
                                        }
840
                                        fon += "h f*\n";
841
                                        np = getMinClipF(&gly);
842
                                        np1 = getMaxClipF(&gly);
843
                                }
5606 fschmid 844
                                else
845
                                {
846
                                        fon = "h";
847
                                        np = FPoint(0, 0);
848
                                        np1 = FPoint(0, 0);
849
                                }
850
                                StartObj(ObjCounter);
851
                                ObjCounter++;
852
                                PutDoc("<<\n/Type /XObject\n/Subtype /Form\n/FormType 1\n");
853
                                PutDoc("/BBox [ "+FToStr(np.x())+" "+FToStr(-np.y())+" "+FToStr(np1.x())+ " "+FToStr(-np1.y())+" ]\n");
854
                                PutDoc("/Resources << /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]\n");
855
                                PutDoc(">>\n");
856
                                if ((Options.Compress) && (CompAvail))
857
                                        fon = CompressStr(&fon);
858
                                PutDoc("/Length "+QString::number(fon.length()+1));
859
                                if ((Options.Compress) && (CompAvail))
860
                                        PutDoc("\n/Filter /FlateDecode");
861
                                PutDoc(" >>\nstream\n"+EncStream(fon, ObjCounter-1)+"\nendstream\nendobj\n");
5980 avox 862
                                Seite.XObjects[AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" )+QString::number(ig.key())] = ObjCounter-1;
3133 fschmid 863
                        }
864
                }
865
                else
866
                {
4229 craig 867
                        UsedFontsP.insert(it.key(), "/Fo"+QString::number(a));
5980 avox 868
                        if ((fformat == ScFace::PFB) && (Options.EmbedList.contains(it.key())))
3133 fschmid 869
                        {
3829 cbradney 870
                                QString fon("");
3133 fschmid 871
                                StartObj(ObjCounter);
872
                                QByteArray bb;
5980 avox 873
                                AllFonts[it.key()].RawData(bb);
3133 fschmid 874
                                uint posi;
875
                                for (posi = 6; posi < bb.size(); ++posi)
876
                                {
877
                                        if ((bb[posi] == static_cast<char>(0x80)) && (static_cast<int>(bb[posi+1]) == 2))
878
                                                break;
879
                                        fon += QChar(bb[posi]);
880
                                }
881
                                int len1 = fon.length();
882
                                uint ulen;
883
                                ulen = bb[posi+2] & 0xff;
884
                                ulen |= (bb[posi+3] << 8) & 0xff00;
885
                                ulen |= (bb[posi+4] << 16) & 0xff0000;
886
                                ulen |= (bb[posi+5] << 24) & 0xff000000;
887
                                if (ulen > bb.size())
888
                                        ulen = bb.size()-7;
889
                                posi += 6;
890
                                for (uint j = 0; j < ulen; ++j)
891
                                        fon += QChar(bb[posi++]);
892
                                posi += 6;
893
                                int len2 = fon.length()-len1;
894
                                for (uint j = posi; j < bb.size(); ++j)
895
                                {
896
                                        if ((bb[j] == static_cast<char>(0x80)) && (static_cast<int>(bb[j+1]) == 3))
897
                                                break;
898
                                        if (bb[j] == '\r')
899
                                                fon += "\n";
900
                                        else
901
                                                fon += QChar(bb[j]);
902
                                }
903
                                int len3 = fon.length()-len2-len1;
4264 craig 904
                                if ((Options.Compress) && (CompAvail))
3133 fschmid 905
                                        fon = CompressStr(&fon);
4229 craig 906
                                PutDoc("<<\n/Length "+QString::number(fon.length()+1)+"\n");
907
                                PutDoc("/Length1 "+QString::number(len1)+"\n");
908
                                PutDoc("/Length2 "+QString::number(len2)+"\n");
909
                                PutDoc("/Length3 "+QString::number(len3)+"\n");
4264 craig 910
                                if ((Options.Compress) && (CompAvail))
3133 fschmid 911
                                        PutDoc("/Filter /FlateDecode\n");
4229 craig 912
                                PutDoc(">>\nstream\n"+EncStream(fon,ObjCounter)+"\nendstream\nendobj\n");
3133 fschmid 913
                                ObjCounter++;
914
                        }
5980 avox 915
                        if ((fformat == ScFace::PFA) && (Options.EmbedList.contains(it.key())))
3133 fschmid 916
                        {
3829 cbradney 917
                                QString fon("");
918
                                QString fon2("");
919
                                QString tm("");
3133 fschmid 920
                                uint value;
921
                                bool ok = true;
922
                                StartObj(ObjCounter);
5980 avox 923
                                AllFonts[it.key()].EmbedFont(fon);
3133 fschmid 924
                                int len1 = fon.find("eexec")+5;
925
                                fon2 = fon.left(len1)+"\n";
926
                                int len2 = fon.find("0000000000000000000000000");
927
                                if (len2 == -1)
928
                                        len2 = fon.length()+1;
929
                                int count = 0;
930
                                for (int xx = len1; xx < len2-1; ++xx)
931
                                {
932
                                        tm = fon.at(xx);
933
                                        if ((tm == QChar(13)) || (tm == QChar(10)))
934
                                                continue;
935
                                        xx++;
936
                                        count++;
937
                                        tm += fon.at(xx);
938
                                        value = tm.toUInt(&ok, 16);
939
                                        fon2 += QChar(value);
940
                                }
941
                                fon2 += fon.mid(len2);
4264 craig 942
                                if ((Options.Compress) && (CompAvail))
3133 fschmid 943
                                        fon2 = CompressStr(&fon2);
4229 craig 944
                                PutDoc("<<\n/Length "+QString::number(fon2.length()+1)+"\n");
945
                                PutDoc("/Length1 "+QString::number(len1+1)+"\n");
946
                                PutDoc("/Length2 "+QString::number(count)+"\n");
947
                                PutDoc(static_cast<int>(fon.length()-len2) == -1 ? QString("/Length3 0\n") : "/Length3 "+QString::number(fon.length()-len2)+"\n");
4264 craig 948
                                if ((Options.Compress) && (CompAvail))
3133 fschmid 949
                                        PutDoc("/Filter /FlateDecode\n");
4229 craig 950
                                PutDoc(">>\nstream\n"+EncStream(fon2, ObjCounter)+"\nendstream\nendobj\n");
3133 fschmid 951
                                ObjCounter++;
952
                        }
5980 avox 953
                        if ((fformat == ScFace::SFNT || fformat == ScFace::TTCF) && (Options.EmbedList.contains(it.key())))
3133 fschmid 954
                        {
3829 cbradney 955
                                QString fon("");
3133 fschmid 956
                                StartObj(ObjCounter);
957
                                QByteArray bb;
5980 avox 958
                                AllFonts[it.key()].RawData(bb);
3133 fschmid 959
                                //AV: += and append() dont't work because they stop at '\0' :-(
960
                                for (unsigned int i=0; i < bb.size(); i++)
961
                                        fon += QChar(bb[i]);
962
                                int len = fon.length();
4264 craig 963
                                if ((Options.Compress) && (CompAvail))
3133 fschmid 964
                                        fon = CompressStr(&fon);
965
                                //qDebug(QString("sfnt data: size=%1 before=%2 compressed=%3").arg(bb.size()).arg(len).arg(fon.length()));
4229 craig 966
                                PutDoc("<<\n/Length "+QString::number(fon.length()+1)+"\n");
967
                                PutDoc("/Length1 "+QString::number(len)+"\n");
4264 craig 968
                                if ((Options.Compress) && (CompAvail))
3133 fschmid 969
                                        PutDoc("/Filter /FlateDecode\n");
4229 craig 970
                                PutDoc(">>\nstream\n"+EncStream(fon, ObjCounter)+"\nendstream\nendobj\n");
3133 fschmid 971
                                ObjCounter++;
972
                        }
973
                        StartObj(ObjCounter);
5387 avox 974
                        // TODO: think about QByteArray ScFace::getFontDescriptor() -- AV
3133 fschmid 975
                        PutDoc("<<\n/Type /FontDescriptor\n");
5980 avox 976
                        PutDoc("/FontName /"+AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" )+"\n");
6213 fschmid 977
                        PutDoc("/FontBBox [ "+AllFonts[it.key()].FontBBoxAsString()+" ]\n");
3133 fschmid 978
                        PutDoc("/Flags ");
5980 avox 979
                        //FIXME: isItalic() should be queried from ScFace, not from Qt -- AV
3544 avox 980
                        //QFontInfo fo = QFontInfo(it.data());
3133 fschmid 981
                        int pfl = 0;
5980 avox 982
                        if (AllFonts[it.key()].isFixedPitch())
3133 fschmid 983
                                pfl = pfl ^ 1;
3544 avox 984
                        //if (fo.italic())
6213 fschmid 985
                        if (AllFonts[it.key()].ItalicAngleAsString() != "0")
3133 fschmid 986
                                pfl = pfl ^ 64;
987
//                      pfl = pfl ^ 4;
988
                        pfl = pfl ^ 32;
4229 craig 989
                        PutDoc(QString::number(pfl)+"\n");
6213 fschmid 990
                        PutDoc("/Ascent "+AllFonts[it.key()].ascentAsString()+"\n");
991
                        PutDoc("/Descent "+AllFonts[it.key()].descentAsString()+"\n");
992
                        PutDoc("/CapHeight "+AllFonts[it.key()].capHeightAsString()+"\n");
993
                        PutDoc("/ItalicAngle "+AllFonts[it.key()].ItalicAngleAsString()+"\n");
994
//                      PutDoc("/Ascent "+QString::number(static_cast<int>(AllFonts[it.key()].ascent()))+"\n");
995
//                      PutDoc("/Descent "+QString::number(static_cast<int>(AllFonts[it.key()].descent()))+"\n");
996
//                      PutDoc("/CapHeight "+QString::number(static_cast<int>(AllFonts[it.key()].capHeight()))+"\n");
997
//                      PutDoc("/ItalicAngle "+AllFonts[it.key()].italicAngle()+"\n");
998
//                      PutDoc("/StemV "+ AllFonts[it.key()].stemV() + "\n");
999
                        PutDoc("/StemV 1\n");
5980 avox 1000
                        if ((fformat == ScFace::SFNT || fformat == ScFace::TTCF) && (Options.EmbedList.contains(it.key())))
4229 craig 1001
                                PutDoc("/FontFile2 "+QString::number(ObjCounter-1)+" 0 R\n");
5980 avox 1002
                        if ((fformat == ScFace::PFB) && (Options.EmbedList.contains(it.key())))
4229 craig 1003
                                PutDoc("/FontFile "+QString::number(ObjCounter-1)+" 0 R\n");
5980 avox 1004
                        if ((fformat == ScFace::PFA) && (Options.EmbedList.contains(it.key())))
4229 craig 1005
                                PutDoc("/FontFile "+QString::number(ObjCounter-1)+" 0 R\n");
3133 fschmid 1006
                        PutDoc(">>\nendobj\n");
1007
                        ObjCounter++;
4546 subik 1008
/*                      if (!FT_Has_PS_Glyph_Names(AllFonts[it.key()])
3133 fschmid 1009
                        {
1010
                                StartObj(ObjCounter);
1011
                                int chCount = 31;
1012
                                PutDoc("[ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ");
1013
                                for (int ww = 31; ww < 256; ++ww)
1014
                                {
4229 craig 1015
                                        PutDoc(QString::number(static_cast<int>(AllFonts[it.key()]->CharWidth[itg.key()]*
3133 fschmid 1016
                                                        1000))+" ");
1017
                                        if (itg == gl.end())
1018
                                                break;
1019
                                        ++itg;
1020
                                        chCount++;
1021
                                }
1022
                                PutDoc("]\nendobj\n");
1023
                                ObjCounter++;
1024
                                // put widths object
1025
                                // encoding dictionary w/ base encoding w/o differences
1026
                                StartObj(ObjCounter);
1027
                                PutDoc("<<\n/Type /Font\n/Subtype ");
5980 avox 1028
                                PutDoc((fformat == ScFace::SFNT || fformat == ScFace::TTCF) ? "/TrueType\n" : "/Type1\n");
4229 craig 1029
                                PutDoc("/Name /Fo"+QString::number(a)+"\n");
5980 avox 1030
                                PutDoc("/BaseFont /"+AllFonts[it.key()]->psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "" )+"\n");
3133 fschmid 1031
                                //cf. widths:
1032
                                PutDoc("/FirstChar 0\n");
4229 craig 1033
                                PutDoc("/LastChar "+QString::number(chCount-1)+"\n");
1034
                                PutDoc("/Widths "+QString::number(ObjCounter-1)+" 0 R\n");
1035
                                PutDoc("/FontDescriptor "+QString::number(ObjCounter-2)+" 0 R\n");
3133 fschmid 1036
                                PutDoc(">>\nendobj\n");
4229 craig 1037
                                Seite.FObjects["Fo"+QString::number(a)] = ObjCounter;
3133 fschmid 1038
                                ObjCounter++;
1039
                        }
1040
                        else */
1041
//                      {
6301 avox 1042
                                QMap<uint,std::pair<QChar,QString> > gl;
1043
                                AllFonts[it.key()].glyphNames(gl);
1044
                                int nglyphs = 0;
1045
                                QMap<uint,std::pair<QChar,QString> >::Iterator gli;
8092 fschmid 1046
                                for (gli = gl.begin(); gli != gl.end(); ++gli)
1047
                                {
7328 fschmid 1048
                                        if (gli.key() > static_cast<uint>(nglyphs))
6301 avox 1049
                                                nglyphs = gli.key();
1050
                                }
1051
                                ++nglyphs;
6302 avox 1052
//                              qDebug(QString("pdflib: nglyphs %1 max %2").arg(nglyphs).arg(AllFonts[it.key()].maxGlyph()));
3133 fschmid 1053
                                uint FontDes = ObjCounter - 1;
6301 avox 1054
                                uint Fcc = nglyphs / 224;
1055
                                if ((nglyphs % 224) != 0)
3133 fschmid 1056
                                        Fcc += 1;
1057
                                for (uint Fc = 0; Fc < Fcc; ++Fc)
1058
                                {
1059
                                        StartObj(ObjCounter);
6301 avox 1060
                                        int chCount = 32;
1061
                                        PutDoc("[ 0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 ");
1062
                                        for (int ww = 32; ww < 256; ++ww)
3133 fschmid 1063
                                        {
6301 avox 1064
                                                uint glyph = 224 * Fc + ww - 32;
1065
                                                if (gl.contains(glyph))
1066
                                                        PutDoc(QString::number(static_cast<int>(AllFonts[it.key()].glyphWidth(glyph)* 1000))+" ");
1067
                                                else
1068
                                                        PutDoc("0 ");
6302 avox 1069
                                                chCount++;
6301 avox 1070
                                                if (signed(glyph) == nglyphs-1)
3133 fschmid 1071
                                                        break;
1072
                                        }
1073
                                        PutDoc("]\nendobj\n");
1074
                                        ObjCounter++;
1075
                                        StartObj(ObjCounter);
1076
                                        ObjCounter++;
8147 fschmid 1077
                                        QStringList toUnicodeMaps;
1078
                                        QValueList<int> toUnicodeMapsCount;
8136 fschmid 1079
                                        QString toUnicodeMap = "";
1080
                                        int toUnicodeMapCounter = 0;
3133 fschmid 1081
                                        PutDoc("<< /Type /Encoding\n");
6301 avox 1082
                                        PutDoc("/Differences [ \n");
3133 fschmid 1083
                                        int crc = 0;
6301 avox 1084
                                        bool startOfSeq = true;
3133 fschmid 1085
                                        for (int ww2 = 32; ww2 < 256; ++ww2)
1086
                                        {
6301 avox 1087
                                                uint glyph = 224 * Fc + ww2 - 32;
1088
                                                if (gl[glyph].second != "")
6213 fschmid 1089
                                                {
8092 fschmid 1090
                                                        if (startOfSeq)
1091
                                                        {
6301 avox 1092
                                                                PutDoc(QString::number(ww2)+" ");
1093
                                                                startOfSeq = false;
1094
                                                        }
1095
                                                        PutDoc("/"+gl[glyph].second+" ");
8136 fschmid 1096
                                                        QString tmp, tmp2;
1097
                                                        tmp.sprintf("%02X", ww2);
1098
                                                        tmp2.sprintf("%04X", gl[glyph].first.unicode());
1099
                                                        toUnicodeMap += QString("<%1> <%2>\n").arg(tmp).arg((tmp2));
1100
                                                        toUnicodeMapCounter++;
8147 fschmid 1101
                                                        if (toUnicodeMapCounter == 100)
1102
                                                        {
1103
                                                                toUnicodeMaps.append(toUnicodeMap);
1104
                                                                toUnicodeMapsCount.append(toUnicodeMapCounter);
1105
                                                                toUnicodeMap = "";
1106
                                                                toUnicodeMapCounter = 0;
1107
                                                        }
6301 avox 1108
                                                        crc++;
6213 fschmid 1109
                                                }
8092 fschmid 1110
                                                else
1111
                                                {
6301 avox 1112
                                                        startOfSeq = true;
1113
                                                }
1114
                                                if (signed(glyph) == nglyphs-1)
3133 fschmid 1115
                                                        break;
1116
                                                if (crc > 8)
1117
                                                {
1118
                                                        PutDoc("\n");
1119
                                                        crc = 0;
1120
                                                }
1121
                                        }
8147 fschmid 1122
                                        if (toUnicodeMapCounter != 0)
1123
                                        {
1124
                                                toUnicodeMaps.append(toUnicodeMap);
1125
                                                toUnicodeMapsCount.append(toUnicodeMapCounter);
1126
                                        }
3133 fschmid 1127
                                        PutDoc("]\n");
1128
                                        PutDoc(">>\nendobj\n");
8136 fschmid 1129
                                        QString toUnicodeMapStream = "";
1130
                                        toUnicodeMapStream += "/CIDInit /ProcSet findresource begin\n";
1131
                                        toUnicodeMapStream += "12 dict begin\n";
1132
                                        toUnicodeMapStream += "begincmap\n";
1133
                                        toUnicodeMapStream += "/CIDSystemInfo <<\n";
1134
                                        toUnicodeMapStream += "/Registry (Adobe)\n";
1135
                                        toUnicodeMapStream += "/Ordering (UCS)\n";
1136
                                        toUnicodeMapStream += "/Supplement 0\n";
1137
                                        toUnicodeMapStream += ">> def\n";
1138
                                        toUnicodeMapStream += "/CMapName /Adobe-Identity-UCS def\n";
1139
                                        toUnicodeMapStream += "/CMapType 2 def\n";
1140
                                        toUnicodeMapStream += "1 begincodespacerange\n";
8147 fschmid 1141
                                        toUnicodeMapStream += "<0000> <FFFF>\n";
8136 fschmid 1142
                                        toUnicodeMapStream += "endcodespacerange\n";
8147 fschmid 1143
                                        for (uint uniC = 0; uniC < toUnicodeMaps.count(); uniC++)
1144
                                        {
1145
                                                toUnicodeMapStream += QString("%1 beginbfchar\n").arg(toUnicodeMapsCount[uniC]);
1146
                                                toUnicodeMapStream += toUnicodeMaps[uniC];
1147
                                                toUnicodeMapStream += "endbfchar\n";
1148
                                        }
8136 fschmid 1149
                                        toUnicodeMapStream += "endcmap\n";
1150
                                        toUnicodeMapStream += "CMapName currentdict /CMap defineresource pop\n";
1151
                                        toUnicodeMapStream += "end\n";
1152
                                        toUnicodeMapStream += "end\n";
1153
                                        WritePDFStream(toUnicodeMapStream);
3133 fschmid 1154
                                        StartObj(ObjCounter);
1155
                                        PutDoc("<<\n/Type /Font\n/Subtype ");
5980 avox 1156
                                        PutDoc((fformat == ScFace::SFNT || fformat == ScFace::TTCF) ? "/TrueType\n" : "/Type1\n");
4229 craig 1157
                                        PutDoc("/Name /Fo"+QString::number(a)+"S"+QString::number(Fc)+"\n");
5980 avox 1158
                                        PutDoc("/BaseFont /"+AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" )+"\n");
3133 fschmid 1159
                                        PutDoc("/FirstChar 0\n");
4229 craig 1160
                                        PutDoc("/LastChar "+QString::number(chCount-1)+"\n");
8136 fschmid 1161
                                        PutDoc("/Widths "+QString::number(ObjCounter-3)+" 0 R\n");
1162
                                        PutDoc("/Encoding "+QString::number(ObjCounter-2)+" 0 R\n");
1163
                                        PutDoc("/ToUnicode "+QString::number(ObjCounter-1)+" 0 R\n");
4229 craig 1164
                                        PutDoc("/FontDescriptor "+QString::number(FontDes)+" 0 R\n");
3133 fschmid 1165
                                        PutDoc(">>\nendobj\n");
4229 craig 1166
                                        Seite.FObjects["Fo"+QString::number(a)+"S"+QString::number(Fc)] = ObjCounter;
3133 fschmid 1167
                                        ObjCounter++;
1168
                                } // for(Fc)
8101 fschmid 1169
                                StartObj(ObjCounter);
1170
                                PutDoc("[ 0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 0 0 0  0 0 ");
1171
                                for (int ww = 32; ww < 256; ++ww)
1172
                                {
1173
                                        uint glyph = AllFonts[it.key()].char2CMap(QChar(ww));
1174
                                        if (gl.contains(glyph))
1175
                                                PutDoc(QString::number(static_cast<int>(AllFonts[it.key()].glyphWidth(glyph)* 1000))+" ");
1176
                                        else
1177
                                                PutDoc("0 ");
1178
                                }
1179
                                PutDoc("]\nendobj\n");
1180
                                ObjCounter++;
1181
                                StartObj(ObjCounter);
1182
                                PutDoc("<<\n/Type /Font\n/Subtype ");
1183
                                PutDoc((fformat == ScFace::SFNT || fformat == ScFace::TTCF) ? "/TrueType\n" : "/Type1\n");
8454 fschmid 1184
//                              if (fformat == ScFace::SFNT || fformat == ScFace::TTCF)
1185
//                              {
1186
//                                      PutDoc("/TrueType\n");
1187
                                        PutDoc("/Name /Fo"+QString::number(a)+"Form"+"\n");
1188
                                        Seite.FObjects["Fo"+QString::number(a)+"Form"] = ObjCounter;
1189
                                        UsedFontsF.insert(it.key(), "/Fo"+QString::number(a)+"Form");
1190
/*                              }
1191
                                else
1192
                                {
1193
                                        PutDoc("/Type1\n");
1194
                                        PutDoc("/Name /"+AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" )+"\n");
1195
                                        Seite.FObjects[AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" )] = ObjCounter;
1196
                                        UsedFontsF.insert(it.key(), "/"+AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" ));
1197
                                } */
8101 fschmid 1198
                                PutDoc("/BaseFont /"+AllFonts[it.key()].psName().replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "_" )+"\n");
8432 fschmid 1199
                                PutDoc("/Encoding << \n");
1200
                                PutDoc("/Differences [ \n");
1201
                                PutDoc("24 /breve /caron /circumflex /dotaccent /hungarumlaut /ogonek /ring /tilde\n");
1202
                                PutDoc("39 /quotesingle 96 /grave 128 /bullet /dagger /daggerdbl /ellipsis /emdash /endash /florin /fraction /guilsinglleft /guilsinglright\n");
1203
                                PutDoc("/minus /perthousand /quotedblbase /quotedblleft /quotedblright /quoteleft /quoteright /quotesinglbase /trademark /fi /fl /Lslash /OE /Scaron\n");
1204
                                PutDoc("/Ydieresis /Zcaron /dotlessi /lslash /oe /scaron /zcaron 164 /currency 166 /brokenbar 168 /dieresis /copyright /ordfeminine 172 /logicalnot\n");
1205
                                PutDoc("/.notdef /registered /macron /degree /plusminus /twosuperior /threesuperior /acute /mu 183 /periodcentered /cedilla /onesuperior /ordmasculine\n");
1206
                                PutDoc("188 /onequarter /onehalf /threequarters 192 /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla /Egrave /Eacute /Ecircumflex\n");
1207
                                PutDoc("/Edieresis /Igrave /Iacute /Icircumflex /Idieresis /Eth /Ntilde /Ograve /Oacute /Ocircumflex /Otilde /Odieresis /multiply /Oslash\n");
1208
                                PutDoc("/Ugrave /Uacute /Ucircumflex /Udieresis /Yacute /Thorn /germandbls /agrave /aacute /acircumflex /atilde /adieresis /aring /ae /ccedilla\n");
1209
                                PutDoc("/egrave /eacute /ecircumflex /edieresis /igrave /iacute /icircumflex /idieresis /eth /ntilde /ograve /oacute /ocircumflex /otilde /odieresis\n");
1210
                                PutDoc("/divide /oslash /ugrave /uacute /ucircumflex /udieresis /yacute /thorn /ydieresis\n");
1211
                                PutDoc("] >>\n");
8101 fschmid 1212
                                PutDoc("/FirstChar 0\n");
1213
                                PutDoc("/LastChar 255\n");
1214
                                PutDoc("/Widths "+QString::number(ObjCounter-1)+" 0 R\n");
1215
                                PutDoc("/FontDescriptor "+QString::number(FontDes)+" 0 R\n");
1216
                                PutDoc(">>\nendobj\n");
1217
                                ObjCounter++;
3133 fschmid 1218
//                      } // FT_Has_PS_Glyph_Names
1219
                }
1220
                a++;
1221
        }
4264 craig 1222
        if (Options.UseLPI)
3133 fschmid 1223
        {
1224
                StartObj(ObjCounter);
1225
                PutDoc("<<\n/Type /Halftone\n/HalftoneType 5\n");
4264 craig 1226
                QMap<QString,LPIData>::const_iterator itlp;
1227
                for (itlp = Options.LPISettings.constBegin(); itlp != Options.LPISettings.constEnd(); ++itlp)
3133 fschmid 1228
                {
1229
                        PutDoc("/"+itlp.key()+"\n<<\n/Type /Halftone\n/HalftoneType 1\n/Frequency ");
4229 craig 1230
                        PutDoc(QString::number(itlp.data().Frequency)+"\n/Angle "+QString::number(itlp.data().Angle)+"\n/SpotFunction ");
3829 cbradney 1231
                        QString func ("");
3133 fschmid 1232
                        switch (itlp.data().SpotFunc)
1233
                        {
1234
                                case 0:
1235
                                        func = "/SimpleDot";
1236
                                        break;
1237
                                case 1:
1238
                                        func = "/Line";
1239
                                        break;
1240
                                case 2:
1241
                                        func = "/Round";
1242
                                        break;
1243
                                case 3:
1244
                                        func = "/Ellipse";
1245
                                        break;
1246
                                default:
1247
                                        func = "/SimpleDot";
1248
                                        break;
1249
                        }
1250
                        PutDoc(func+"\n>>\n");
1251
                }
1252
                PutDoc("/Default\n<<\n/Type /Halftone\n/HalftoneType 1\n/Frequency 50\n/Angle 45\n/SpotFunction /Round\n>>\n");
1253
                PutDoc(">>\nendobj\n");
1254
                ObjCounter++;
1255
                StartObj(ObjCounter);
4229 craig 1256
                HTName = ResNam+QString::number(ResCount);
3133 fschmid 1257
                Transpar[HTName] = ObjCounter;
4229 craig 1258
                PutDoc("<< /Type /ExtGState\n/HT "+QString::number(ObjCounter-1)+" 0 R\n>>\nendobj\n");
3133 fschmid 1259
                ResCount++;
1260
                ObjCounter++;
1261
        }
5880 jghali 1262
        if ((doc.HasCMS) && (Options.UseProfiles))
3133 fschmid 1263
        {
1264
                StartObj(ObjCounter);
1265
                ObjCounter++;
7144 jghali 1266
                QByteArray dataP;
3133 fschmid 1267
                struct ICCD dataD;
7144 jghali 1268
                loadRawBytes(ScCore->InputProfiles[Options.SolidProf], dataP);
3133 fschmid 1269
                PutDoc("<<\n");
4264 craig 1270
                if ((Options.Compress) && (CompAvail))
3133 fschmid 1271
                {
1272
                        PutDoc("/Filter /FlateDecode\n");
7144 jghali 1273
                        dataP = CompressArray(&dataP);
3133 fschmid 1274
                }
7144 jghali 1275
                PutDoc("/Length "+QString::number(dataP.size()+1)+"\n");
4264 craig 1276
                PutDoc("/N "+QString::number(Options.SComp)+"\n");
7144 jghali 1277
                PutDoc(">>\nstream\n");
1278
                PutDoc(EncStreamArray(dataP, ObjCounter-1));
1279
                PutDoc("\nendstream\nendobj\n");
3133 fschmid 1280
                StartObj(ObjCounter);
4229 craig 1281
                dataD.ResName = ResNam+QString::number(ResCount);
1282
                dataD.ICCArray = "[ /ICCBased "+QString::number(ObjCounter-1)+" 0 R ]";
3133 fschmid 1283
                dataD.ResNum = ObjCounter;
4264 craig 1284
                ICCProfiles[Options.SolidProf] = dataD;
4229 craig 1285
                PutDoc("[ /ICCBased "+QString::number(ObjCounter-1)+" 0 R ]\n");
3133 fschmid 1286
                PutDoc("endobj\n");
1287
                ResCount++;
1288
                ObjCounter++;
1289
        }
4264 craig 1290
        if (((Options.isGrayscale == false) && (Options.UseRGB == false)) && (Options.UseSpotColors))
3133 fschmid 1291
        {
4264 craig 1292
                doc.getUsedColors(colorsToUse);
3133 fschmid 1293
                ColorList::Iterator itf;
1294
                for (itf = colorsToUse.begin(); itf != colorsToUse.end(); ++itf)
1295
                {
1296
                        if ((colorsToUse[itf.key()].isSpotColor()) || (colorsToUse[itf.key()].isRegistrationColor()))
1297
                        {
1298
                                int cc, cm, cy, ck;
1299
                                struct SpotC spotD;
1300
                                colorsToUse[itf.key()].getCMYK(&cc, &cm, &cy, &ck);
1301
                                QString colorDesc = "{\ndup "+FToStr(static_cast<double>(cc) / 255)+"\nmul exch dup ";
1302
                                colorDesc += FToStr(static_cast<double>(cm) / 255)+"\nmul exch dup ";
1303
                                colorDesc += FToStr(static_cast<double>(cy) / 255)+"\nmul exch ";
1304
                                colorDesc += FToStr(static_cast<double>(ck) / 255)+" mul }";
1305
                                StartObj(ObjCounter);
1306
                                ObjCounter++;
1307
                                PutDoc("<<\n/FunctionType 4\n");
1308
                                PutDoc("/Domain [0.0 1.0]\n");
1309
                                PutDoc("/Range [0.0 1.0 0.0 1.0 0.0 1.0 0.0 1.0]\n");
4229 craig 1310
                                PutDoc("/Length "+QString::number(colorDesc.length()+1)+"\n");
1311
                                PutDoc(">>\nstream\n"+EncStream(colorDesc, ObjCounter-1)+"\nendstream\nendobj\n");
3133 fschmid 1312
                                StartObj(ObjCounter);
1313
                                PutDoc("[ /Separation /");
1314
                                if (colorsToUse[itf.key()].isRegistrationColor())
1315
                                        PutDoc("All");
1316
                                else
7491 fschmid 1317
                                        PutDoc(itf.key().simplifyWhiteSpace().replace("#", "#23").replace( QRegExp("[\\s\\/\\{\\[\\]\\}\\<\\>\\(\\)\\%]"), "#20" ));
4229 craig 1318
                                PutDoc(" /DeviceCMYK "+QString::number(ObjCounter-1)+" 0 R ]\nendobj\n");
1319
                                spotD.ResName = spotNam+QString::number(spotCount);
3133 fschmid 1320
                                spotD.ResNum = ObjCounter;
1321
                                spotMap.insert(itf.key(), spotD);
1322
                                spotCount++;
1323
                                ObjCounter++;
1324
                        }
1325
                }
1326
        }
6925 fschmid 1327
        if ((Options.cropMarks) || (Options.bleedMarks) || (Options.registrationMarks) || (Options.colorMarks) || (Options.docInfoMarks))
1328
        {
1329
                struct SpotC spotD;
1330
                StartObj(ObjCounter);
1331
                PutDoc("[ /Separation /All /DeviceCMYK\n");
1332
                PutDoc("<<\n/FunctionType 2\n");
1333
                PutDoc("/Domain [0.0 1.0]\n");
1334
                PutDoc("/Range [0.0 1.0 0.0 1.0 0.0 1.0 0.0 1.0]\n");
1335
                PutDoc("/C0 [0 0 0 0] \n");
1336
                PutDoc("/C1 [1 1 1 1] \n");
1337
                PutDoc("/N 1\n");
1338
                PutDoc(">>\n]\nendobj\n");
1339
                spotD.ResName = spotNam+QString::number(spotCount);
1340
                spotD.ResNum = ObjCounter;
1341
                spotMapReg.insert("Register", spotD);
1342
                spotCount++;
1343
                ObjCounter++;
1344
        }
4264 craig 1345
        if ((Options.Version == 15) && (Options.useLayers))
3133 fschmid 1346
        {
1347
                struct Layer ll;
1348
                struct OCGInfo ocg;
1349
                ll.isPrintable = false;
1350
                ll.LNr = 0;
1351
                int Lnr = 0;
3829 cbradney 1352
                QString ocgNam("oc");
4264 craig 1353
                uint docLayersCount=doc.Layers.count();
3829 cbradney 1354
                for (uint la = 0; la < docLayersCount; ++la)
3133 fschmid 1355
                {
3829 cbradney 1356
                        QString tmp("");
4264 craig 1357
                        Level2Layer(&doc, &ll, Lnr);
3133 fschmid 1358
                        ocg.Name = ocgNam+tmp.setNum(ll.LNr);
1359
                        ocg.ObjNum = ObjCounter;
1360
                        ocg.visible = ll.isViewable;
1361
                        OCGEntries.insert(ll.Name, ocg);
1362
                        StartObj(ObjCounter);
1363
                        ObjCounter++;
1364
                        PutDoc("<<\n");
1365
                        PutDoc("/Type /OCG\n");
7328 fschmid 1366
                        PutDoc("/Name ");
1367
                        PutDoc(EncStringUTF16("("+ll.Name+")", ObjCounter-1));
1368
                        PutDoc("\n");
3133 fschmid 1369
                        PutDoc(">>\nendobj\n");
1370
                        Lnr++;
1371
                }
1372
        }
1373
        return true;
1374
}
1375
 
4241 craig 1376
void PDFlib::PDF_TemplatePage(const Page* pag, bool )
3133 fschmid 1377
{
1378
        QString tmp;
1379
        ActPageP = pag;
1380
        PageItem* ite;
1381
        QPtrList<PageItem> PItems;
1382
        int Lnr = 0;
1383
        struct Layer ll;
1384
        ll.isPrintable = false;
1385
        ll.LNr = 0;
1386
        Inhalt = "";
1387
        Seite.AObjects.clear();
4264 craig 1388
        for (uint la = 0; la < doc.Layers.count(); ++la)
3133 fschmid 1389
        {
4264 craig 1390
                Level2Layer(&doc, &ll, Lnr);
1391
                PItems = doc.MasterItems;
3133 fschmid 1392
                if (ll.isPrintable)
1393
                {
4264 craig 1394
                        if ((Options.Version == 15) && (Options.useLayers))
3133 fschmid 1395
                                PutPage("/OC /"+OCGEntries[ll.Name].Name+" BDC\n");
1396
                        for (uint a = 0; a < PItems.count(); ++a)
1397
                        {
1398
                                Inhalt = "";
1399
                                ite =PItems.at(a);
1400
                                if (ite->LayerNr != ll.LNr)
1401
                                        continue;
4726 fschmid 1402
                                double x = pag->xOffset();
1403
                                double y = pag->yOffset();
1404
                                double w = pag->width();
1405
                                double h1 = pag->height();
4580 cbradney 1406
                                double ilw=ite->lineWidth();
4726 fschmid 1407
                                double x2 = ite->BoundingX - ilw / 2.0;
1408
                                double y2 = ite->BoundingY - ilw / 2.0;
1409
                                double w2 = ite->BoundingW + ilw;
1410
                                double h2 = ite->BoundingH + ilw;
1411
                                if (!( QMAX( x, x2 ) <= QMIN( x+w, x2+w2 ) && QMAX( y, y2 ) <= QMIN( y+h1, y2+h2 )))
3133 fschmid 1412
                                        continue;
1413
                                if (ite->ChangedMasterItem)
1414
                                        continue;
5685 cbradney 1415
                                if ((!pag->pageName().isEmpty()) && (ite->OwnPage != static_cast<int>(pag->pageNr())) && (ite->OwnPage != -1))
3133 fschmid 1416
                                        continue;
1417
                                PutPage("q\n");
5320 fschmid 1418
                                if ((ite->doOverprint) && (!Options.doOverprint) && (!Options.UseRGB))
1419
                                {
1420
                                        StartObj(ObjCounter);
1421
                                        QString ShName = ResNam+QString::number(ResCount);
1422
                                        Transpar[ShName] = ObjCounter;
1423
                                        ResCount++;
1424
                                        ObjCounter++;
1425
                                        PutDoc("<< /Type /ExtGState\n");
1426
                                        PutDoc("/OP true\n");
1427
                                        PutDoc("/op true\n");
1428
                                        PutDoc("/OPM 1\n");
1429
                                        PutDoc(">>\nendobj\n");
1430
                                        PutPage("/"+ShName+" gs\n");
1431
                                }
4679 fschmid 1432
/* Bookmarks on Master Pages do not make any sense */
1433
//                              if ((ite->isBookmark) && (Options.Bookmarks))
1434
//                                      PDF_Bookmark(ite, pag->height() - (ite->yPos() - pag->yOffset()));
5685 cbradney 1435
                                if (!ite->printEnabled() || ((ite->itemType() == PageItem::TextFrame) && (!pag->pageName().isEmpty())))
3133 fschmid 1436
                                {
1437
                                        PutPage("Q\n");
1438
                                        continue;
1439
                                }
4546 subik 1440
                                if (ite->fillColor() != CommonStrings::None)
3133 fschmid 1441
                                        PutPage(putColor(ite->fillColor(), ite->fillShade(), true));
4546 subik 1442
                                if (ite->lineColor() != CommonStrings::None)
3133 fschmid 1443
                                        PutPage(putColor(ite->lineColor(), ite->lineShade(), false));
4580 cbradney 1444
                                Inhalt += FToStr(fabs(ite->lineWidth()))+" w\n";
3133 fschmid 1445
                                if (ite->DashValues.count() != 0)
1446
                                {
1447
                                        PutPage("[ ");
1448
                                        QValueList<double>::iterator it;
1449
                                        for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it )
1450
                                        {
1451
                                                int da = static_cast<int>(*it);
1452
                                                if (da != 0)
4229 craig 1453
                                                        PutPage(QString::number(da)+" ");
3133 fschmid 1454
                                        }
4229 craig 1455
                                        PutPage("] "+QString::number(static_cast<int>(ite->DashOffset))+" d\n");
3133 fschmid 1456
                                }
1457
                                else
1458
                                {
4580 cbradney 1459
                                        QString Dt = FToStr(QMAX(2*fabs(ite->lineWidth()), 1));
1460
                                        QString Da = FToStr(QMAX(6*fabs(ite->lineWidth()), 1));
3133 fschmid 1461
                                        switch (ite->PLineArt)
1462
                                        {
1463
                                                case Qt::SolidLine:
1464
                                                        PutPage("[] 0 d\n");
1465
                                                        break;
1466
                                                case Qt::DashLine:
1467
                                                        PutPage("["+Da+" "+Dt+"] 0 d\n");
1468
                                                        break;
1469
                                                case Qt::DotLine:
1470
                                                        PutPage("["+Dt+"] 0 d\n");
1471
                                                        break;
1472
                                                case Qt::DashDotLine:
1473
                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
1474
                                                        break;
1475
                                                case Qt::DashDotDotLine:
1476
                                                        PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n");
1477
                                                        break;
1478
                                                default:
1479
                                                        PutPage("[] 0 d\n");
1480
                                                        break;
1481
                                        }
1482
                                }
1483
                                switch (ite->PLineEnd)
1484
                                {
1485
                                        case Qt::FlatCap:
1486
                                                PutPage("0 J\n");
1487
                                                break;
1488
                                        case Qt::SquareCap:
1489
                                                PutPage("2 J\n");
1490
                                                break;
1491
                                        case Qt::RoundCap:
1492
                                                PutPage("1 J\n");
1493
                                                break;
1494
                                        default:
1495
                                                PutPage("0 J\n");
1496
                                                break;
1497
                                }
1498
                                switch (ite->PLineJoin)
1499
                                {
1500
                                        case Qt::MiterJoin:
1501
                                                PutPage("0 j\n");
1502
                                                break;
1503
                                        case Qt::BevelJoin:
1504
                                                PutPage("2 j\n");
1505
                                                break;
1506
                                        case Qt::RoundJoin:
1507
                                                PutPage("1 j\n");
1508
                                                break;
1509
                                        default:
1510
                                                PutPage("0 j\n");
1511
                                                break;
1512
                                }
3903 cbradney 1513
                                PutPage("1 0 0 1 "+FToStr(ite->xPos() - pag->xOffset())+" "+FToStr(pag->height() - (ite->yPos()  - pag->yOffset()))+" cm\n");
3934 cbradney 1514
                                if (ite->rotation() != 0)
3133 fschmid 1515
                                {
3934 cbradney 1516
                                        double sr = sin(-ite->rotation()* M_PI / 180.0);
1517
                                        double cr = cos(-ite->rotation()* M_PI / 180.0);
3133 fschmid 1518
                                        if ((cr * cr) < 0.000001)
1519
                                                cr = 0;
1520
                                        if ((sr * sr) < 0.000001)
1521
                                                sr = 0;
1522
                                        PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n");
1523
                                }
1524
                                switch (ite->itemType())
1525
                                {
1526
                                        case PageItem::ImageFrame:
5748 fschmid 1527
                                                if (((ite->fillTransparency() != 0) || (ite->fillBlendmode() != 0)) && (Options.Version >= 14))
1528
                                                        PutPage(PDF_TransparenzFill(ite));
4546 subik 1529
                                                if ((ite->fillColor() != CommonStrings::None) || (ite->GrType != 0))
3133 fschmid 1530
                                                {
1531
                                                        if (ite->GrType != 0)
1532
                                                                PutPage(PDF_Gradient(ite));
1533
                                                        else
1534
                                                        {
1535
                                                                PutPage(SetClipPath(ite));
1536
                                                                PutPage("h\nf*\n");
1537
                                                        }
1538
                                                }
1539
                                                PutPage("q\n");
1540
                                                if (ite->imageClip.size() != 0)
4744 fschmid 1541
                                                {
3133 fschmid 1542
                                                        PutPage(SetClipPathImage(ite));
4744 fschmid 1543
                                                        PutPage("h\nW*\nn\n");
1544
                                                }
1545
                                                PutPage(SetClipPath(ite));
3133 fschmid 1546
                                                PutPage("h\nW*\nn\n");
1547
                                                if (ite->imageFlippedH())
3934 cbradney 1548
                                                        PutPage("-1 0 0 1 "+FToStr(ite->width())+" 0 cm\n");
3133 fschmid 1549
                                                if (ite->imageFlippedV())
3934 cbradney 1550
                                                        PutPage("1 0 0 -1 0 "+FToStr(-ite->height())+" cm\n");
3133 fschmid 1551
                                                if ((ite->PicAvail) && (!ite->Pfile.isEmpty()))
3985 cbradney 1552
                                                        PutPage(PDF_Image(ite, ite->Pfile, ite->imageXScale(), ite->imageYScale(), ite->imageXOffset(), -ite->imageYOffset(), false, ite->IProfile, ite->UseEmbedded, ite->IRender));
3133 fschmid 1553
                                                PutPage("Q\n");
4546 subik 1554
                                                if (((ite->lineColor() != CommonStrings::None) || (!ite->NamedLStyle.isEmpty())) && (!ite->isTableItem))
3133 fschmid 1555
                                                {
5748 fschmid 1556
                                                        if (((ite->lineTransparency() != 0) || (ite->lineBlendmode() != 0)) && (Options.Version >= 14))
1557
                                                                PutPage(PDF_TransparenzStroke(ite));
4580 cbradney 1558
                                                        if ((ite->NamedLStyle.isEmpty()) && (ite->lineWidth() != 0.0))
3133 fschmid 1559
                                                        {
1560
                                                                PutPage(SetClipPath(ite));
1561
                                                                PutPage("h\nS\n");
1562
                                                        }
1563
                                                        else
1564
                                                        {
4264 craig 1565
                                                                multiLine ml = doc.MLineStyles[ite->NamedLStyle];
3133 fschmid 1566
                                                                for (int it = ml.size()-1; it > -1; it--)
1567
                                                                {
6568 fschmid 1568
                                                                        if ((ml[it].Color != CommonStrings::None) && (ml[it].Width != 0))
1569
                                                                        {
1570
                                                                                PutPage(setStrokeMulti(&ml[it]));
1571
                                                                                PutPage(SetClipPath(ite));
1572
                                                                                PutPage("h\nS\n");
1573
                                                                        }
3133 fschmid 1574
                                                                }
1575
                                                        }
1576
                                                }
1577
                                                break;
1578
                                        case PageItem::TextFrame:
1579
                                                break;
1580
                                        case PageItem::Line:
5748 fschmid 1581
                                                if (((ite->lineTransparency() != 0) || (ite->lineBlendmode() != 0)) && (Options.Version >= 14))
1582
                                                        PutPage(PDF_TransparenzStroke(ite));
3133 fschmid 1583
                                                if (ite->NamedLStyle.isEmpty())
1584
                                                {
1585
                                                        PutPage("0 0 m\n");
3934 cbradney 1586
                                                        PutPage(FToStr(ite->width())+" 0 l\n");
3133 fschmid 1587
                                                        PutPage("S\n");
1588
                                                }
1589
                                                else
1590
                                                {
4264 craig 1591
                                                        multiLine ml = doc.MLineStyles[ite->NamedLStyle];
3133 fschmid 1592
                                                        for (int it = ml.size()-1; it > -1; it--)
1593
                                                        {
6568 fschmid 1594
                                                                        if ((ml[it].Color != CommonStrings::None) && (ml[it].Width != 0))
1595
                                                                        {
1596
                                                                                PutPage(setStrokeMulti(&ml[it]));
1597
                                                                                PutPage("0 0 m\n");
1598
                                                                                PutPage(FToStr(ite->width())+" 0 l\n");
1599
                                                                                PutPage("S\n");
1600
                                                                        }
3133 fschmid 1601
                                                        }
1602
                                                }
4061 craig 1603
                                                if (ite->startArrowIndex() != 0)
3133 fschmid 1604
                                                {
1605
                                                        QWMatrix arrowTrans;
4264 craig 1606
                                                        FPointArray arrow = (*doc.arrowStyles.at(ite->startArrowIndex()-1)).points.copy();
3133 fschmid 1607
                                                        arrowTrans.translate(0, 0);
4580 cbradney 1608
                                                        arrowTrans.scale(ite->lineWidth(), ite->lineWidth());
3133 fschmid 1609
                                                        arrowTrans.scale(-1,1);
1610
                                                        arrow.map(arrowTrans);
4264 craig 1611
                                                        if ((ite->lineTransparency() != 0) && (Options.Version >= 14))
3133 fschmid 1612
                                                        {
1613
                                                                StartObj(ObjCounter);
4229 craig 1614
                                                                QString ShName = ResNam+QString::number(ResCount);
3133 fschmid 1615
                                                                Transpar[ShName] = ObjCounter;
1616
                                                                ResCount++;
1617
                                                                ObjCounter++;
1618
                                                                PutDoc("<< /Type /ExtGState\n");
1619
                                                                PutDoc("/CA "+FToStr(1.0 - ite->lineTransparency())+"\n");
1620
                                                                PutDoc("/ca "+FToStr(1.0 - ite->lineTransparency())+"\n");
1621
                                                                PutDoc("/SMask /None\n/AIS false\n/OPM 1\n");
1622
                                                                PutDoc("/BM /Normal\n>>\nendobj\n");
1623
                                                                PutPage("/"+ShName+" gs\n");
1624
                                                        }
4016 fschmid 1625
                                                        PutPage(putColor(ite->lineColor(), ite->lineShade(), true));
3133 fschmid 1626
                                                        PutPage(SetClipPathArray(&arrow));
1627
                                                        PutPage("h\nf*\n");
1628
                                                }
4061 craig 1629
                                                if (ite->endArrowIndex() != 0)
3133 fschmid 1630
                                                {
1631
                                                        QWMatrix arrowTrans;
4264 craig 1632
                                                        FPointArray arrow = (*doc.arrowStyles.at(ite->endArrowIndex()-1)).points.copy();
3934 cbradney 1633
                                                        arrowTrans.translate(ite->width(), 0);
4580 cbradney 1634
                                                        arrowTrans.scale(ite->lineWidth(), ite->lineWidth());
3133 fschmid 1635
                                                        arrow.map(arrowTrans);
4264 craig 1636
                                                        if ((ite->lineTransparency() != 0) && (Options.Version >= 14))
3133 fschmid 1637
                                                        {
1638
                                                                StartObj(ObjCounter);
4229 craig 1639
                                                                QString ShName = ResNam+QString::number(ResCount);
3133 fschmid 1640
                                                                Transpar[ShName] = ObjCounter;
1641
                                                                ResCount++;
1642
                                                                ObjCounter++;
1643
                                                                PutDoc("<< /Type /ExtGState\n");
1644
                                                                PutDoc("/CA "+FToStr(1.0 - ite->lineTransparency())+"\n");
1645
                                                                PutDoc("/ca "+FToStr(1.0 - ite->lineTransparency())+"\n");
1646
                                                                PutDoc("/SMask /None\n/AIS false\n/OPM 1\n");
1647
                                                                PutDoc("/BM /Normal\n>>\nendobj\n");
1648
                                                                PutPage("/"+ShName+" gs\n");
1649
                                                        }
4016 fschmid 1650
                                                        PutPage(putColor(ite->lineColor(), ite->lineShade(), true));
3133 fschmid 1651
                                                        PutPage(SetClipPathArray(&arrow));
1652
                                                        PutPage("h\nf*\n");
1653
                                                }
1654
                                                break;
3232 cbradney 1655
                                        case PageItem::ItemType1:
1656
                                        case PageItem::ItemType3:
3133 fschmid 1657
                                        case PageItem::Polygon:
5748 fschmid 1658
                                                if (((ite->fillTransparency() != 0) || (ite->fillBlendmode() != 0)) && (Options.Version >= 14))
1659
                                                        PutPage(PDF_TransparenzFill(ite));
3133 fschmid 1660
                                                if (ite->GrType != 0)
1661
                                                        PutPage(PDF_Gradient(ite));
1662
                                                else
1663
                                                {
4546 subik 1664
                                                        if (ite->fillColor() != CommonStrings::None)
3133 fschmid 1665
                                                        {
1666
                                                                PutPage(SetClipPath(ite));
1667
                                                                PutPage("h\nf*\n");
1668
                                                        }
1669
                                                }
4546 subik 1670
                                                if ((ite->lineColor() != CommonStrings::None) || (!ite->NamedLStyle.isEmpty()))
3133 fschmid 1671
                                                {
5748 fschmid 1672
                                                        if (((ite->lineTransparency() != 0) || (ite->lineBlendmode() != 0)) && (Options.Version >= 14))
1673
                                                                PutPage(PDF_TransparenzStroke(ite));
4580 cbradney 1674
                                                        if ((ite->NamedLStyle.isEmpty()) && (ite->lineWidth() != 0.0))
3133 fschmid 1675
                                                        {
1676
                                                                PutPage(SetClipPath(ite));
1677
                                                                PutPage("h\nS\n");
1678
                                                        }
1679
                                                        else
1680
                                                        {
4264 craig 1681
                                                                multiLine ml = doc.MLineStyles[ite->NamedLStyle];
3133 fschmid 1682
                                                                for (int it = ml.size()-1; it > -1; it--)
1683
                                                                {
6568 fschmid 1684
                                                                        if ((ml[it].Color != CommonStrings::None) && (ml[it].Width != 0))
1685
                                                                        {
1686
                                                                                PutPage(setStrokeMulti(&ml[it]));
1687
                                                                                PutPage(SetClipPath(ite));
1688
                                                                                PutPage("h\nS\n");
1689
                                                                        }
3133 fschmid 1690
                                                                }
1691
                                                        }
1692
                                                }
1693
                                                break;
1694
                                        case PageItem::PolyLine:
4658 fschmid 1695
                                                if (ite->PoLine.size() > 4) // && ((ite->PoLine.point(0) != ite->PoLine.point(1)) || (ite->PoLine.point(2) != ite->PoLine.point(3))))
3133 fschmid 1696
                                                {
5748 fschmid 1697
                                                        if (((ite->fillTransparency() != 0) || (ite->fillBlendmode() != 0)) && (Options.Version >= 14))
1698
                                                                PutPage(PDF_TransparenzFill(ite));
3133 fschmid 1699
                                                        if (ite->GrType != 0)
1700
                                                                PutPage(PDF_Gradient(ite));
1701
                                                        else
1702
                                                        {
4546 subik 1703
                                                                if (ite->fillColor() != CommonStrings::None)
3133 fschmid 1704
                                                                {
1705
                                                                        PutPage(SetClipPath(ite));
1706
                                                                        PutPage("h\nf*\n");
1707
                                                                }
1708
                                                        }
1709
                                                }
4546 subik 1710
                                                if ((ite->lineColor() != CommonStrings::None) || (!ite->NamedLStyle.isEmpty()))
3133 fschmid 1711
                                                {
5748 fschmid 1712
                                                        if (((ite->lineTransparency() != 0) || (ite->lineBlendmode() != 0)) && (Options.Version >= 14))
1713
                                                                PutPage(PDF_TransparenzStroke(ite));
4580 cbradney 1714
                                                        if ((ite->NamedLStyle.isEmpty()) && (ite->lineWidth() != 0.0))
3133 fschmid 1715
                                                        {
1716
                                                                PutPage(SetClipPath(ite, false));
1717
                                                                PutPage("S\n");
1718
                                                        }
1719
                                                        else
1720
                                                        {
4264 craig 1721
                                                                multiLine ml = doc.MLineStyles[ite->NamedLStyle];
3133 fschmid 1722
                                                                for (int it = ml.size()-1; it > -1; it--)
1723
                                                                {
6568 fschmid 1724
                                                                        if ((ml[it].Color != CommonStrings::None) && (ml[it].Width != 0))
1725
                                                                        {
1726
                                                                                PutPage(setStrokeMulti(&ml[it]));
1727
                                                                                PutPage(SetClipPath(ite, false));
1728
                                                                                PutPage("S\n");
1729
                                                                        }
3133 fschmid 1730
                                                                }
1731
                                                        }
1732
                                                }
4061 craig 1733
                                                if (ite->startArrowIndex() != 0)
3133 fschmid 1734
                                                {
1735
                                                        FPoint Start = ite->PoLine.point(0);
1736
                                                        for (uint xx = 1; xx < ite->PoLine.size(); xx += 2)
1737
                                                        {
1738
                                                                FPoint Vector = ite->PoLine.point(xx);
1739
                                                                if ((Start.x() != Vector.x()) || (Start.y() != Vector.y()))
1740
                                                                {
1741
                                                                        double r = atan2(Start.y()-Vector.y(),Start.x()-Vector.x())*(180.0/M_PI);
1742
                                                                        QWMatrix arrowTrans;
4264 craig 1743
                                                                        FPointArray arrow = (*doc.arrowStyles.at(ite->startArrowIndex()-1)).points.copy();
3133 fschmid 1744
                                                                        arrowTrans.translate(Start.x(), Start.y());
1745
                                                                        arrowTrans.rotate(r);
4580 cbradney 1746
                                                                        arrowTrans.scale(ite->lineWidth(), ite->lineWidth());
3133 fschmid 1747
                                                                        arrow.map(arrowTrans);
4264 craig 1748
                                                                        if ((ite->lineTransparency() != 0) && (Options.Version >= 14