Rev 1886 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3 | paul | 1 | /*************************************************************************** |
2 | pdflib.cpp - description |
||
3 | ------------------- |
||
4 | begin : Sat Jan 19 2002 |
||
5 | copyright : (C) 2002 by Franz Schmid |
||
6 | email : Franz.Schmid@altmuehlnet.de |
||
7 | ***************************************************************************/ |
||
8 | |||
9 | /*************************************************************************** |
||
10 | * * |
||
11 | * This program is free software; you can redistribute it and/or modify * |
||
12 | * it under the terms of the GNU General Public License as published by * |
||
13 | * the Free Software Foundation; either version 2 of the License, or * |
||
14 | * (at your option) any later version. * |
||
15 | * * |
||
16 | ***************************************************************************/ |
||
17 | |||
18 | #include "pdflib.h" |
||
26 | Franz | 19 | #include "pdflib.moc" |
128 | Franz | 20 | |
612 | cbradney | 21 | #ifdef _MSC_VER |
22 | #if (_MSC_VER >= 1200) |
||
23 | #include "win-config.h" |
||
24 | #endif |
||
128 | Franz | 25 | #else |
26 | #include "config.h" |
||
27 | #endif |
||
28 | |||
3 | paul | 29 | #include <qregexp.h> |
30 | #include <qdatetime.h> |
||
31 | #include <qfileinfo.h> |
||
32 | #include <qtextstream.h> |
||
282 | Franz | 33 | #include <qdir.h> |
3 | paul | 34 | #include <cstdlib> |
35 | #include <cmath> |
||
213 | Franz | 36 | #include <unistd.h> |
3 | paul | 37 | #include "rc4.h" |
38 | |||
503 | cbradney | 39 | using namespace std; |
40 | |||
204 | Franz | 41 | extern int callGS(const QStringList & args); |
19 | Franz | 42 | extern QString Path2Relative(QString Path); |
3 | paul | 43 | extern bool GlyIndex(QMap<uint, PDFlib::GlNamInd> *GListInd, QString Dat); |
44 | extern QByteArray ComputeMD5Sum(QByteArray *in); |
||
201 | Franz | 45 | extern QImage LoadPict(QString fn, bool *gray = 0); |
3 | paul | 46 | extern bool loadText(QString nam, QString *Buffer); |
47 | extern void Level2Layer(ScribusDoc *doc, struct Layer *ll, int Level); |
||
48 | extern QString CompressStr(QString *in); |
||
1968 | fschmid | 49 | extern QImage scaleImage(const QImage& src, int width, int height); |
3 | paul | 50 | extern QString ImageToTxt(QImage *im); |
51 | extern QString ImageToCMYK(QImage *im); |
||
1886 | fschmid | 52 | extern bool isProgressive(QString fn); |
202 | Franz | 53 | extern void Convert2JPG(QString fn, QImage *image, int Quality, bool isCMYK); |
3 | paul | 54 | extern QString MaskToTxt(QImage *im, bool PDF = true); |
203 | Franz | 55 | extern QString MaskToTxt14(QImage *im); |
3 | paul | 56 | extern char *toHex( uchar u ); |
57 | extern QString String2Hex(QString *in, bool lang = true); |
||
80 | Franz | 58 | extern double Cwidth(ScribusDoc *doc, QString name, QString ch, int Siz, QString ch2 = " "); |
95 | Franz | 59 | extern FPoint GetMaxClipF(FPointArray Clip); |
3 | paul | 60 | #ifdef HAVE_CMS |
61 | extern bool CMSuse; |
||
62 | #endif |
||
63 | #ifdef HAVE_TIFF |
||
64 | #include <tiffio.h> |
||
65 | #endif |
||
66 | extern ProfilesL InputProfiles; |
||
67 | |||
328 | Franz | 68 | extern "C" bool Run(ScribusApp *plug, QString fn, QString nam, int Components, std::vector<int> &pageNs, QMap<int,QPixmap> thumbs, QProgressBar *dia2); |
3 | paul | 69 | |
328 | Franz | 70 | bool Run(ScribusApp *plug, QString fn, QString nam, int Components, std::vector<int> &pageNs, QMap<int,QPixmap> thumbs, QProgressBar *dia2) |
3 | paul | 71 | { |
26 | Franz | 72 | QPixmap pm; |
73 | bool ret = false; |
||
176 | Franz | 74 | int progresscount=0; |
3 | paul | 75 | PDFlib *dia = new PDFlib(); |
188 | Franz | 76 | if (dia->PDF_Begin_Doc(fn, plug->doc, plug->view, &plug->doc->PDF_Optionen, plug->Prefs.AvailFonts, |
77 | plug->doc->UsedFonts, plug->BookPal->BView)) |
||
26 | Franz | 78 | { |
188 | Franz | 79 | dia2->reset(); |
328 | Franz | 80 | dia2->setTotalSteps(plug->view->MasterPages.count()+pageNs.size()); |
188 | Franz | 81 | dia2->setProgress(0); |
82 | for (uint ap = 0; ap < plug->view->MasterPages.count(); ++ap) |
||
26 | Franz | 83 | { |
188 | Franz | 84 | if (plug->view->MasterPages.at(ap)->Items.count() != 0) |
470 | fschmid | 85 | dia->PDF_TemplatePage(plug->view->MasterPages.at(ap), plug->Prefs.ClipMargin); |
188 | Franz | 86 | progresscount++; |
87 | dia2->setProgress(progresscount); |
||
26 | Franz | 88 | } |
328 | Franz | 89 | for (uint a = 0; a < pageNs.size(); ++a) |
188 | Franz | 90 | { |
26 | Franz | 91 | if (plug->doc->PDF_Optionen.Thumbnails) |
328 | Franz | 92 | pm = thumbs[pageNs[a]]; |
93 | dia->PDF_Begin_Page(plug->view->Pages.at(pageNs[a]-1), pm); |
||
470 | fschmid | 94 | dia->PDF_ProcessPage(plug->view->Pages.at(pageNs[a]-1), pageNs[a]-1, plug->Prefs.ClipMargin); |
26 | Franz | 95 | dia->PDF_End_Page(); |
176 | Franz | 96 | progresscount++; |
97 | dia2->setProgress(progresscount); |
||
188 | Franz | 98 | } |
26 | Franz | 99 | if (plug->doc->PDF_Optionen.Version == 12) |
337 | Franz | 100 | dia->PDF_End_Doc(plug->PrinterProfiles[plug->doc->PDF_Optionen.PrintProf], nam, Components); |
26 | Franz | 101 | else |
102 | dia->PDF_End_Doc(); |
||
103 | ret = true; |
||
176 | Franz | 104 | dia2->reset(); |
188 | Franz | 105 | } |
1522 | cbradney | 106 | if (dia!=NULL) |
107 | delete dia; |
||
26 | Franz | 108 | return ret; |
3 | paul | 109 | } |
25 | Franz | 110 | |
3 | paul | 111 | PDFlib::PDFlib() |
112 | { |
||
113 | OwnerKey = QByteArray(32); |
||
114 | UserKey = QByteArray(32); |
||
115 | FileID = QByteArray(16); |
||
116 | EncryKey = QByteArray(5); |
||
117 | Encrypt = 0; |
||
118 | KeyLen = 5; |
||
119 | Dokument = 0; |
||
120 | Catalog.Outlines = 2; |
||
121 | Catalog.PageTree = 3; |
||
122 | Catalog.Dest = 4; |
||
123 | PageTree.Count = 0; |
||
124 | PageTree.Kids.clear(); |
||
125 | Outlines.First = 0; |
||
126 | Outlines.Last = 0; |
||
127 | Outlines.Count = 0; |
||
128 | XRef.clear(); |
||
129 | NamedDest.clear(); |
||
130 | NDnam = "LI"; |
||
131 | NDnum = 0; |
||
132 | ObjCounter = 7; |
||
133 | Seite.ObjNum = 0; |
||
134 | Seite.Thumb = 0; |
||
135 | Seite.XObjects.clear(); |
||
136 | Seite.FObjects.clear(); |
||
137 | Seite.AObjects.clear(); |
||
138 | Seite.FormObjects.clear(); |
||
139 | CalcFields.clear(); |
||
140 | Shadings.clear(); |
||
141 | Transpar.clear(); |
||
142 | ICCProfiles.clear(); |
||
219 | Franz | 143 | SharedImages.clear(); |
3 | paul | 144 | ResNam = "RE"; |
145 | ResCount = 0; |
||
146 | #ifdef HAVE_LIBZ |
||
147 | CompAvail = true; |
||
148 | #else |
||
149 | CompAvail = false; |
||
150 | #endif |
||
151 | KeyGen = QByteArray(32); |
||
188 | Franz | 152 | int kg_array[] = {0x28, 0xbf, 0x4e, 0x5e, 0x4e, 0x75, 0x8a, 0x41, 0x64, 0x00, 0x4e, 0x56, 0xff, 0xfa, |
153 | 0x01, 0x08, 0x2e, 0x2e, 0x00, 0xb6, 0xd0, 0x68, 0x3e, 0x80, 0x2f, 0x0c, 0xa9, 0xfe, |
||
154 | 0x64, 0x53, 0x69, 0x7a}; |
||
155 | for (int a = 0; a < 32; ++a) |
||
156 | KeyGen[a] = kg_array[a]; |
||
3 | paul | 157 | } |
158 | |||
159 | |||
80 | Franz | 160 | QString PDFlib::FToStr(double c) |
3 | paul | 161 | { |
162 | QString cc; |
||
188 | Franz | 163 | return cc.sprintf("%.5f", c); |
3 | paul | 164 | } |
165 | |||
166 | QString PDFlib::IToStr(int c) |
||
167 | { |
||
168 | QString cc; |
||
169 | return cc.setNum(c); |
||
170 | } |
||
171 | |||
172 | void PDFlib::PutDoc(QString in) |
||
173 | { |
||
174 | QTextStream t(&Spool); |
||
175 | t.writeRawBytes(in, in.length()); |
||
129 | Franz | 176 | Spool.flush(); |
3 | paul | 177 | Dokument += in.length(); |
178 | } |
||
179 | |||
180 | void PDFlib::PutPage(QString in) |
||
181 | { |
||
182 | Inhalt += in; |
||
183 | } |
||
184 | |||
185 | void PDFlib::StartObj(int nr) |
||
186 | { |
||
187 | XRef.append(Dokument); |
||
188 | PutDoc(IToStr(nr)+ " 0 obj\n"); |
||
189 | } |
||
190 | |||
191 | QString PDFlib::PDFEncode(QString in) |
||
192 | { |
||
193 | QString tmp = ""; |
||
194 | QString cc; |
||
195 | for (uint d = 0; d < in.length(); ++d) |
||
188 | Franz | 196 | { |
3 | paul | 197 | cc = in.at(d); |
198 | if ((cc == "(") || (cc == ")") || (cc == "\\")) |
||
199 | tmp += "\\"; |
||
200 | tmp += cc; |
||
188 | Franz | 201 | } |
3 | paul | 202 | return tmp; |
203 | } |
||
204 | |||
205 | QString PDFlib::EncStream(QString *in, int ObjNum) |
||
206 | { |
||
188 | Franz | 207 | if (in->length() < 1) |
208 | return ""; |
||
209 | rc4_context_t rc4; |
||
3 | paul | 210 | QString tmp = ""; |
211 | int dlen = 0; |
||
212 | if (Options->Encrypt) |
||
188 | Franz | 213 | { |
3 | paul | 214 | tmp = *in; |
215 | QByteArray us(tmp.length()); |
||
216 | QByteArray ou(tmp.length()); |
||
217 | for (uint a = 0; a < tmp.length(); ++a) |
||
95 | Franz | 218 | us[a] = uchar(QChar(tmp.at(a))); |
3 | paul | 219 | QByteArray data(10); |
220 | if (KeyLen > 5) |
||
221 | data.resize(21); |
||
222 | for (int cd = 0; cd < KeyLen; ++cd) |
||
188 | Franz | 223 | { |
282 | Franz | 224 | data[cd] = EncryKey[cd]; |
3 | paul | 225 | dlen++; |
188 | Franz | 226 | } |
282 | Franz | 227 | data[dlen++] = ObjNum; |
228 | data[dlen++] = ObjNum >> 8; |
||
229 | data[dlen++] = ObjNum >> 16; |
||
188 | Franz | 230 | data[dlen++] = 0; |
282 | Franz | 231 | data[dlen++] = 0; |
3 | paul | 232 | QByteArray step1(16); |
233 | step1 = ComputeMD5Sum(&data); |
||
282 | Franz | 234 | rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16)); |
337 | Franz | 235 | rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), reinterpret_cast<uchar*>(ou.data()), tmp.length()); |
3 | paul | 236 | QString uk = ""; |
237 | for (uint cl = 0; cl < tmp.length(); ++cl) |
||
238 | uk += ou[cl]; |
||
239 | tmp = uk; |
||
188 | Franz | 240 | } |
3 | paul | 241 | else |
242 | tmp = *in; |
||
243 | return tmp; |
||
244 | } |
||
245 | |||
246 | QString PDFlib::EncString(QString in, int ObjNum) |
||
247 | { |
||
188 | Franz | 248 | if (in.length() < 3) |
249 | return "<>"; |
||
250 | rc4_context_t rc4; |
||
3 | paul | 251 | QString tmp; |
252 | int dlen = 0; |
||
253 | if (Options->Encrypt) |
||
188 | Franz | 254 | { |
3 | paul | 255 | tmp = in.mid(1, in.length()-2); |
256 | QByteArray us(tmp.length()); |
||
257 | QByteArray ou(tmp.length()); |
||
258 | for (uint a = 0; a < tmp.length(); ++a) |
||
95 | Franz | 259 | us[a] = static_cast<uchar>(QChar(tmp.at(a))); |
3 | paul | 260 | QByteArray data(10); |
261 | if (KeyLen > 5) |
||
95 | Franz | 262 | data.resize(21); |
3 | paul | 263 | for (int cd = 0; cd < KeyLen; ++cd) |
188 | Franz | 264 | { |
265 | data[cd] = EncryKey[cd]; |
||
3 | paul | 266 | dlen++; |
188 | Franz | 267 | } |
268 | data[dlen++] = ObjNum; |
||
269 | data[dlen++] = ObjNum >> 8; |
||
270 | data[dlen++] = ObjNum >> 16; |
||
271 | data[dlen++] = 0; |
||
272 | data[dlen++] = 0; |
||
3 | paul | 273 | QByteArray step1(16); |
274 | step1 = ComputeMD5Sum(&data); |
||
188 | Franz | 275 | rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), QMIN(KeyLen+5, 16)); |
276 | rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), |
||
277 | reinterpret_cast<uchar*>(ou.data()), tmp.length()); |
||
3 | paul | 278 | QString uk = ""; |
279 | for (uint cl = 0; cl < tmp.length(); ++cl) |
||
280 | uk += ou[cl]; |
||
281 | tmp = "<"+String2Hex(&uk, false)+">"; |
||
188 | Franz | 282 | } |
3 | paul | 283 | else |
284 | tmp = in; |
||
285 | return tmp; |
||
286 | } |
||
287 | |||
288 | QString PDFlib::FitKey(QString pass) |
||
289 | { |
||
290 | QString pw = pass; |
||
291 | if (pw.length() < 32) |
||
188 | Franz | 292 | { |
3 | paul | 293 | uint l = pw.length(); |
294 | for (uint a = 0; a < 32 - l; ++a) |
||
295 | pw.append(KeyGen[a]); |
||
188 | Franz | 296 | } |
3 | paul | 297 | else |
298 | pw = pw.left(32); |
||
299 | return pw; |
||
300 | } |
||
301 | |||
302 | void PDFlib::CalcOwnerKey(QString Owner, QString User) |
||
303 | { |
||
304 | rc4_context_t rc4; |
||
305 | QString pw = User; |
||
306 | QString pw2; |
||
307 | pw2 = Owner; |
||
308 | if (pw2 == "") |
||
309 | pw2 = User; |
||
310 | pw = FitKey(pw); |
||
311 | pw2 = FitKey(pw2); |
||
312 | QByteArray step1(16); |
||
313 | step1 = ComputeMD5(pw2); |
||
314 | if (KeyLen > 5) |
||
188 | Franz | 315 | { |
3 | paul | 316 | for (int kl = 0; kl < 50; ++kl) |
317 | step1 = ComputeMD5Sum(&step1); |
||
188 | Franz | 318 | } |
3 | paul | 319 | QByteArray us(32); |
320 | QByteArray enk(16); |
||
321 | if (KeyLen > 5) |
||
188 | Franz | 322 | { |
3 | paul | 323 | for (uint a2 = 0; a2 < 32; ++a2) |
95 | Franz | 324 | OwnerKey[a2] = static_cast<uchar>(QChar(pw.at(a2))); |
3 | paul | 325 | for (int rl = 0; rl < 20; rl++) |
188 | Franz | 326 | { |
327 | for (int j = 0; j < 16; j ++) |
||
328 | enk[j] = step1[j] ^ rl; |
||
80 | Franz | 329 | rc4_init(&rc4, reinterpret_cast<uchar*>(enk.data()), 16); |
188 | Franz | 330 | rc4_encrypt(&rc4, reinterpret_cast<uchar*>(OwnerKey.data()), |
331 | reinterpret_cast<uchar*>(OwnerKey.data()), 32); |
||
3 | paul | 332 | } |
188 | Franz | 333 | } |
3 | paul | 334 | else |
188 | Franz | 335 | { |
3 | paul | 336 | for (uint a = 0; a < 32; ++a) |
95 | Franz | 337 | us[a] = static_cast<uchar>(QChar(pw.at(a))); |
80 | Franz | 338 | rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), 5); |
188 | Franz | 339 | rc4_encrypt(&rc4, reinterpret_cast<uchar*>(us.data()), |
340 | reinterpret_cast<uchar*>(OwnerKey.data()), 32); |
||
341 | } |
||
3 | paul | 342 | } |
343 | |||
344 | void PDFlib::CalcUserKey(QString User, int Permission) |
||
345 | { |
||
346 | rc4_context_t rc4; |
||
347 | QString pw = User; |
||
348 | pw = FitKey(pw); |
||
349 | QByteArray step1(16); |
||
350 | QByteArray perm(4); |
||
188 | Franz | 351 | uint perm_value = static_cast<uint>(Permission); |
3 | paul | 352 | perm[0] = perm_value; |
353 | perm[1] = perm_value >> 8; |
||
354 | perm[2] = perm_value >> 16; |
||
355 | perm[3] = perm_value >> 24; |
||
356 | for (uint a = 0; a < 32; ++a) |
||
357 | pw += OwnerKey[a]; |
||
358 | for (uint a1 = 0; a1 < 4; ++a1) |
||
359 | pw += perm[a1]; |
||
360 | for (uint a3 = 0; a3 < 16; ++a3) |
||
361 | pw += FileID[a3]; |
||
362 | step1 = ComputeMD5(pw); |
||
363 | if (KeyLen > 5) |
||
188 | Franz | 364 | { |
3 | paul | 365 | for (int kl = 0; kl < 50; ++kl) |
366 | step1 = ComputeMD5Sum(&step1); |
||
367 | EncryKey.resize(16); |
||
188 | Franz | 368 | } |
3 | paul | 369 | for (int a2 = 0; a2 < KeyLen; ++a2) |
370 | EncryKey[a2] = step1[a2]; |
||
371 | if (KeyLen > 5) |
||
188 | Franz | 372 | { |
3 | paul | 373 | QString pr2 = ""; |
374 | for (int kl3 = 0; kl3 < 32; ++kl3) |
||
375 | pr2 += KeyGen[kl3]; |
||
376 | for (uint a4 = 0; a4 < 16; ++a4) |
||
377 | pr2 += FileID[a4]; |
||
378 | step1 = ComputeMD5(pr2); |
||
379 | QByteArray enk(16); |
||
380 | for (uint a3 = 0; a3 < 16; ++a3) |
||
381 | UserKey[a3] = step1[a3]; |
||
382 | for (int rl = 0; rl < 20; rl++) |
||
188 | Franz | 383 | { |
384 | for (int j = 0; j < 16; j ++) |
||
385 | enk[j] = EncryKey[j] ^ rl; |
||
80 | Franz | 386 | rc4_init(&rc4, reinterpret_cast<uchar*>(enk.data()), 16); |
337 | Franz | 387 | rc4_encrypt(&rc4, reinterpret_cast<uchar*>(UserKey.data()), reinterpret_cast<uchar*>(UserKey.data()), 16); |
3 | paul | 388 | } |
188 | Franz | 389 | } |
3 | paul | 390 | else |
188 | Franz | 391 | { |
80 | Franz | 392 | rc4_init(&rc4, reinterpret_cast<uchar*>(step1.data()), 5); |
337 | Franz | 393 | rc4_encrypt(&rc4, reinterpret_cast<uchar*>(KeyGen.data()), reinterpret_cast<uchar*>(UserKey.data()), 32); |
188 | Franz | 394 | } |
3 | paul | 395 | } |
396 | |||
397 | QByteArray PDFlib::ComputeMD5(QString in) |
||
398 | { |
||
399 | QByteArray TBytes(in.length()); |
||
400 | for (uint a = 0; a < in.length(); ++a) |
||
95 | Franz | 401 | TBytes[a] = static_cast<uchar>(QChar(in.at(a))); |
3 | paul | 402 | return ComputeMD5Sum(&TBytes); |
403 | } |
||
404 | |||
405 | bool PDFlib::PDF_Begin_Doc(QString fn, ScribusDoc *docu, ScribusView *vie, PDFOpt *opts, SCFonts &AllFonts, QMap<QString,QFont> DocFonts, BookMView* vi) |
||
406 | { |
||
188 | Franz | 407 | Spool.setName(fn); |
95 | Franz | 408 | if (!Spool.open(IO_WriteOnly)) |
409 | return false; |
||
188 | Franz | 410 | QString tmp; |
3 | paul | 411 | QString ok = ""; |
412 | QString uk = ""; |
||
413 | QFileInfo fd; |
||
68 | Franz | 414 | QString fext; |
3 | paul | 415 | int a; |
416 | doc = docu; |
||
417 | view = vie; |
||
418 | Bvie = vi; |
||
419 | Options = opts; |
||
395 | Franz | 420 | BookMinUse = false; |
3 | paul | 421 | UsedFontsP.clear(); |
80 | Franz | 422 | ObjCounter = Options->Articles ? 9 : 8; |
188 | Franz | 423 | PutDoc(Options->Version <= 13 ? "%PDF-1.3\n" : "%PDF-1.4\n"); |
424 | if (Options->Version == 12) |
||
3 | paul | 425 | ObjCounter++; |
426 | PutDoc("%"+QString(QChar(199))+QString(QChar(236))+QString(QChar(143))+QString(QChar(162))+"\n"); |
||
427 | StartObj(1); |
||
428 | 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"); |
||
429 | if (Options->Articles) |
||
430 | PutDoc("/Threads 8 0 R\n"); |
||
431 | if (Options->Version == 12) |
||
432 | PutDoc("/OutputIntents [ "+IToStr(ObjCounter-1)+" 0 R ]\n"); |
||
433 | PutDoc("/ViewerPreferences << /PageDirection "); |
||
80 | Franz | 434 | PutDoc( Options->Binding == 0 ? "/L2R" : "/R2L"); |
3 | paul | 435 | PutDoc(" >>\n>>\nendobj\n"); |
436 | QString IDg = Datum; |
||
437 | IDg += Options->Datei; |
||
438 | IDg += "Scribus "+QString(VERSION); |
||
68 | Franz | 439 | IDg += "Libpdf for Scribus "+QString(VERSION); |
3 | paul | 440 | IDg += doc->DocTitel; |
441 | IDg += doc->DocAutor; |
||
442 | IDg += "/False"; |
||
443 | FileID = ComputeMD5(IDg); |
||
444 | if (Options->Encrypt) |
||
188 | Franz | 445 | { |
80 | Franz | 446 | KeyLen = Options->Version == 14 ? 16 : 5; |
3 | paul | 447 | CalcOwnerKey(Options->PassOwner, Options->PassUser); |
448 | CalcUserKey(Options->PassUser, Options->Permissions); |
||
449 | for (uint cl2 = 0; cl2 < 32; ++cl2) |
||
450 | ok += OwnerKey[cl2]; |
||
451 | if (KeyLen > 5) |
||
188 | Franz | 452 | { |
3 | paul | 453 | for (uint cl3 = 0; cl3 < 16; ++cl3) |
454 | uk += UserKey[cl3]; |
||
455 | for (uint cl3r = 0; cl3r < 16; ++cl3r) |
||
456 | uk += KeyGen[cl3r]; |
||
188 | Franz | 457 | } |
3 | paul | 458 | else |
188 | Franz | 459 | { |
3 | paul | 460 | for (uint cl = 0; cl < 32; ++cl) |
461 | uk += UserKey[cl]; |
||
462 | } |
||
188 | Franz | 463 | } |
3 | paul | 464 | QDate d = QDate::currentDate(); |
465 | Datum = "D:"; |
||
466 | tmp.sprintf("%4d", d.year()); |
||
467 | tmp.replace(QRegExp(" "), "0"); |
||
468 | Datum += tmp; |
||
469 | tmp.sprintf("%2d", d.month()); |
||
470 | tmp.replace(QRegExp(" "), "0"); |
||
471 | Datum += tmp; |
||
472 | tmp.sprintf("%2d", d.day()); |
||
473 | tmp.replace(QRegExp(" "), "0"); |
||
474 | Datum += tmp; |
||
475 | QTime t = QTime::currentTime(); |
||
476 | tmp = t.toString(); |
||
477 | tmp.replace(QRegExp(":"), ""); |
||
478 | Datum += tmp; |
||
479 | StartObj(2); |
||
480 | PutDoc("<<\n/Creator "+EncString("(Scribus "+QString(VERSION)+")",2)+"\n"); |
||
68 | Franz | 481 | PutDoc("/Producer "+EncString("(Libpdf for Scribus "+QString(VERSION)+")",2)+"\n"); |
3 | paul | 482 | PutDoc("/Title "+EncString("("+doc->DocTitel+")",2)+"\n"); |
483 | PutDoc("/Author "+EncString("("+doc->DocAutor+")",2)+"\n"); |
||
68 | Franz | 484 | PutDoc("/Keywords "+EncString("("+doc->DocKeyWords+")",2)+"\n"); |
3 | paul | 485 | PutDoc("/CreationDate "+EncString("("+Datum+")",2)+"\n"); |
486 | PutDoc("/ModDate "+EncString("("+Datum+")",2)+"\n"); |
||
487 | if (Options->Version == 12) |
||
488 | PutDoc("/GTS_PDFXVersion (PDF/X-3:2002)\n"); |
||
489 | PutDoc("/Trapped /False\n>>\nendobj\n"); |
||
188 | Franz | 490 | for (int t = 0; t < 5; ++t) |
491 | XRef.append(Dokument); |
||
3 | paul | 492 | if (Options->Articles) |
493 | XRef.append(Dokument); |
||
494 | if (Options->Version == 12) |
||
495 | XRef.append(Dokument); |
||
496 | if (Options->Encrypt) |
||
188 | Franz | 497 | { |
3 | paul | 498 | StartObj(ObjCounter); |
499 | Encrypt = ObjCounter; |
||
500 | ObjCounter++; |
||
501 | PutDoc("<<\n/Filter /Standard\n"); |
||
80 | Franz | 502 | PutDoc( KeyLen > 5 ? "/R 3\n/V 2\n/Length 128\n" : "/R 2\n/V 1\n"); |
3 | paul | 503 | PutDoc("/O <"+String2Hex(&ok)+">\n"); |
504 | PutDoc("/U <"+String2Hex(&uk)+">\n"); |
||
505 | PutDoc("/P "+IToStr(Options->Permissions)+"\n>>\nendobj\n"); |
||
188 | Franz | 506 | } |
3 | paul | 507 | RealFonts = DocFonts; |
508 | QMap<QString,QFont> ReallyUsed; |
||
509 | ReallyUsed.clear(); |
||
68 | Franz | 510 | Page* pg; |
511 | PageItem* pgit; |
||
512 | for (uint c = 0; c < view->MasterPages.count(); ++c) |
||
188 | Franz | 513 | { |
68 | Franz | 514 | pg = view->MasterPages.at(c); |
515 | for (uint d = 0; d < pg->Items.count(); ++d) |
||
188 | Franz | 516 | { |
68 | Franz | 517 | pgit = pg->Items.at(d); |
518 | if ((pgit->PType == 4) || (pgit->PType == 8)) |
||
188 | Franz | 519 | { |
520 | for (uint e = 0; e < pgit->Ptext.count(); ++e) |
||
3 | paul | 521 | { |
237 | Franz | 522 | ReallyUsed.insert(pgit->Ptext.at(e)->cfont, DocFonts[pgit->Ptext.at(e)->cfont]); |
3 | paul | 523 | } |
524 | } |
||
525 | } |
||
188 | Franz | 526 | } |
3 | paul | 527 | for (uint c=0; c<view->Pages.count(); ++c) |
188 | Franz | 528 | { |
68 | Franz | 529 | pg = view->Pages.at(c); |
530 | for (uint d = 0; d < pg->Items.count(); ++d) |
||
188 | Franz | 531 | { |
68 | Franz | 532 | pgit = pg->Items.at(d); |
533 | if ((pgit->PType == 4) || (pgit->PType == 8)) |
||
188 | Franz | 534 | { |
535 | for (uint e = 0; e < pgit->Ptext.count(); ++e) |
||
3 | paul | 536 | { |
237 | Franz | 537 | ReallyUsed.insert(pgit->Ptext.at(e)->cfont, DocFonts[pgit->Ptext.at(e)->cfont]); |
3 | paul | 538 | } |
539 | } |
||
540 | } |
||
188 | Franz | 541 | } |
3 | paul | 542 | QMap<QString,QFont>::Iterator it; |
543 | a = 0; |
||
544 | for (it = ReallyUsed.begin(); it != ReallyUsed.end(); ++it) |
||
188 | Franz | 545 | { |
3 | paul | 546 | fd = QFileInfo(AllFonts[it.key()]->Datei); |
68 | Franz | 547 | fext = fd.extension(false).lower(); |
475 | fschmid | 548 | if ((AllFonts[it.key()]->isOTF) || (AllFonts[it.key()]->Subset) || (Options->SubsetList.contains(it.key()))) |
188 | Franz | 549 | { |
68 | Franz | 550 | QString fon = ""; |
551 | QMap<uint,FPointArray>::Iterator ig; |
||
237 | Franz | 552 | for (ig = AllFonts[it.key()]->RealGlyphs.begin(); ig != AllFonts[it.key()]->RealGlyphs.end(); ++ig) |
188 | Franz | 553 | { |
68 | Franz | 554 | FPoint np, np1, np2; |
555 | bool nPath = true; |
||
556 | if (ig.data().size() > 3) |
||
188 | Franz | 557 | { |
74 | Franz | 558 | FPointArray gly = ig.data().copy(); |
559 | QWMatrix mat; |
||
560 | mat.scale(0.1, 0.1); |
||
561 | gly.map(mat); |
||
562 | for (uint poi = 0; poi < gly.size()-3; poi += 4) |
||
188 | Franz | 563 | { |
564 | if (gly.point(poi).x() > 900000) |
||
68 | Franz | 565 | { |
566 | fon += "h\n"; |
||
567 | nPath = true; |
||
568 | continue; |
||
188 | Franz | 569 | } |
68 | Franz | 570 | if (nPath) |
188 | Franz | 571 | { |
74 | Franz | 572 | np = gly.point(poi); |
68 | Franz | 573 | fon += FToStr(np.x())+" "+FToStr(-np.y())+" m\n"; |
574 | nPath = false; |
||
188 | Franz | 575 | } |
74 | Franz | 576 | np = gly.point(poi+1); |
577 | np1 = gly.point(poi+3); |
||
578 | np2 = gly.point(poi+2); |
||
188 | Franz | 579 | fon += FToStr(np.x()) + " " + FToStr(-np.y()) + " " + |
580 | FToStr(np1.x()) + " " + FToStr(-np1.y()) + " " + |
||
581 | FToStr(np2.x()) + " " + FToStr(-np2.y()) + " c\n"; |
||
582 | } |
||
68 | Franz | 583 | fon += "h f*\n"; |
584 | StartObj(ObjCounter); |
||
585 | ObjCounter++; |
||
74 | Franz | 586 | np = doc->ActPage->GetMinClipF(gly); |
95 | Franz | 587 | np1 = GetMaxClipF(gly); |
68 | Franz | 588 | PutDoc("<<\n/Type /XObject\n/Subtype /Form\n/FormType 1\n"); |
188 | Franz | 589 | PutDoc("/BBox [ "+FToStr(np.x())+" "+FToStr(-np.y())+" "+FToStr(np1.x())+ |
590 | " "+FToStr(-np1.y())+" ]\n"); |
||
68 | Franz | 591 | PutDoc("/Resources << /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]\n"); |
592 | PutDoc(">>\n"); |
||
593 | if ((Options->Compress) && (CompAvail)) |
||
594 | fon = CompressStr(&fon); |
||
595 | PutDoc("/Length "+IToStr(fon.length()+1)); |
||
596 | if ((Options->Compress) && (CompAvail)) |
||
597 | PutDoc("\n/Filter /FlateDecode"); |
||
188 | Franz | 598 | PutDoc(" >>\nstream\n"+EncStream(&fon, |
599 | ObjCounter-1)+"\nendstream\nendobj\n"); |
||
920 | fschmid | 600 | Seite.XObjects[AllFonts[it.key()]->RealName().simplifyWhiteSpace().replace( QRegExp("\\s"), "" )+IToStr(ig.key())] = |
188 | Franz | 601 | ObjCounter-1; |
68 | Franz | 602 | fon = ""; |
603 | } |
||
188 | Franz | 604 | } |
68 | Franz | 605 | AllFonts[it.key()]->RealGlyphs.clear(); |
188 | Franz | 606 | } |
68 | Franz | 607 | else |
188 | Franz | 608 | { |
68 | Franz | 609 | UsedFontsP.insert(it.key(), "/Fo"+IToStr(a)); |
610 | if ((fext == "pfb") && (Options->EmbedList.contains(it.key()))) |
||
188 | Franz | 611 | { |
3 | paul | 612 | QString fon = ""; |
613 | StartObj(ObjCounter); |
||
614 | QFile f(AllFonts[it.key()]->Datei); |
||
615 | QByteArray bb(f.size()); |
||
616 | if (f.open(IO_ReadOnly)) |
||
188 | Franz | 617 | { |
3 | paul | 618 | f.readBlock(bb.data(), f.size()); |
619 | f.close(); |
||
188 | Franz | 620 | } |
3 | paul | 621 | uint posi; |
622 | for (posi = 6; posi < bb.size(); ++posi) |
||
188 | Franz | 623 | { |
624 | if ((bb[posi] == static_cast<char>(0x80)) && |
||
625 | (static_cast<int>(bb[posi+1]) == 2)) |
||
3 | paul | 626 | break; |
627 | fon += bb[posi]; |
||
188 | Franz | 628 | } |
3 | paul | 629 | int len1 = fon.length(); |
630 | uint ulen; |
||
631 | ulen = bb[posi+2] & 0xff; |
||
632 | ulen |= (bb[posi+3] << 8) & 0xff00; |
||
633 | ulen |= (bb[posi+4] << 16) & 0xff0000; |
||
634 | ulen |= (bb[posi+5] << 24) & 0xff000000; |
||
635 | if (ulen > bb.size()) |
||
636 | ulen = bb.size()-7; |
||
637 | posi += 6; |
||
638 | for (uint j = 0; j < ulen; ++j) |
||
188 | Franz | 639 | fon += bb[posi++]; |
3 | paul | 640 | posi += 6; |
641 | int len2 = fon.length()-len1; |
||
642 | for (uint j = posi; j < bb.size(); ++j) |
||
188 | Franz | 643 | { |
80 | Franz | 644 | if ((bb[j] == static_cast<char>(0x80)) && (static_cast<int>(bb[j+1]) == 3)) |
3 | paul | 645 | break; |
80 | Franz | 646 | if (bb[j] == '\r') |
647 | fon += "\n"; |
||
3 | paul | 648 | else |
649 | fon += bb[j]; |
||
188 | Franz | 650 | } |
3 | paul | 651 | int len3 = fon.length()-len2-len1; |
652 | if ((Options->Compress) && (CompAvail)) |
||
653 | fon = CompressStr(&fon); |
||
654 | PutDoc("<<\n/Length "+IToStr(fon.length()+1)+"\n"); |
||
655 | PutDoc("/Length1 "+IToStr(len1)+"\n"); |
||
656 | PutDoc("/Length2 "+IToStr(len2)+"\n"); |
||
657 | PutDoc("/Length3 "+IToStr(len3)+"\n"); |
||
658 | if ((Options->Compress) && (CompAvail)) |
||
659 | PutDoc("/Filter /FlateDecode\n"); |
||
660 | PutDoc(">>\nstream\n"+EncStream(&fon,ObjCounter)+"\nendstream\nendobj\n"); |
||
661 | ObjCounter++; |
||
188 | Franz | 662 | } |
68 | Franz | 663 | if ((fext == "pfa") && (Options->EmbedList.contains(it.key()))) |
188 | Franz | 664 | { |
3 | paul | 665 | QString fon = ""; |
666 | QString fon2 = ""; |
||
667 | QString tm = ""; |
||
668 | uint value; |
||
669 | bool ok = true; |
||
670 | StartObj(ObjCounter); |
||
671 | loadText(AllFonts[it.key()]->Datei, &fon); |
||
672 | int len1 = fon.find("eexec")+5; |
||
673 | fon2 = fon.left(len1)+"\n"; |
||
674 | int len2 = fon.find("0000000000000000000000000"); |
||
675 | if (len2 == -1) |
||
676 | len2 = fon.length()+1; |
||
677 | int count = 0; |
||
678 | for (int xx = len1; xx < len2-1; ++xx) |
||
188 | Franz | 679 | { |
3 | paul | 680 | tm = fon.at(xx); |
80 | Franz | 681 | if ((tm == QChar(13)) || (tm == QChar(10))) |
3 | paul | 682 | continue; |
683 | xx++; |
||
684 | count++; |
||
685 | tm += fon.at(xx); |
||
686 | value = tm.toUInt(&ok, 16); |
||
687 | fon2 += QChar(value); |
||
188 | Franz | 688 | } |
3 | paul | 689 | fon2 += fon.mid(len2); |
690 | if ((Options->Compress) && (CompAvail)) |
||
691 | fon2 = CompressStr(&fon2); |
||
692 | PutDoc("<<\n/Length "+IToStr(fon2.length()+1)+"\n"); |
||
693 | PutDoc("/Length1 "+IToStr(len1+1)+"\n"); |
||
694 | PutDoc("/Length2 "+IToStr(count)+"\n"); |
||
80 | Franz | 695 | PutDoc(static_cast<int>(fon.length()-len2) == -1 ? QString("/Length3 0\n") : |
696 | "/Length3 "+IToStr(fon.length()-len2)+"\n"); |
||
3 | paul | 697 | if ((Options->Compress) && (CompAvail)) |
698 | PutDoc("/Filter /FlateDecode\n"); |
||
699 | PutDoc(">>\nstream\n"+EncStream(&fon2, ObjCounter)+"\nendstream\nendobj\n"); |
||
700 | ObjCounter++; |
||
188 | Franz | 701 | } |
68 | Franz | 702 | if (((fext == "ttf") || (fext == "otf")) && (Options->EmbedList.contains(it.key()))) |
188 | Franz | 703 | { |
3 | paul | 704 | QString fon = ""; |
705 | StartObj(ObjCounter); |
||
706 | QFile f(AllFonts[it.key()]->Datei); |
||
707 | QByteArray bb(f.size()); |
||
708 | if (f.open(IO_ReadOnly)) |
||
188 | Franz | 709 | { |
3 | paul | 710 | f.readBlock(bb.data(), f.size()); |
711 | f.close(); |
||
188 | Franz | 712 | } |
713 | for (uint posi = 0; posi < bb.size(); ++posi) |
||
3 | paul | 714 | fon += bb[posi]; |
715 | int len = fon.length(); |
||
716 | if ((Options->Compress) && (CompAvail)) |
||
717 | fon = CompressStr(&fon); |
||
718 | PutDoc("<<\n/Length "+IToStr(fon.length()+1)+"\n"); |
||
719 | PutDoc("/Length1 "+IToStr(len)+"\n"); |
||
720 | if ((Options->Compress) && (CompAvail)) |
||
721 | PutDoc("/Filter /FlateDecode\n"); |
||
722 | PutDoc(">>\nstream\n"+EncStream(&fon, ObjCounter)+"\nendstream\nendobj\n"); |
||
723 | ObjCounter++; |
||
188 | Franz | 724 | } |
3 | paul | 725 | StartObj(ObjCounter); |
726 | PutDoc("<<\n/Type /FontDescriptor\n"); |
||
920 | fschmid | 727 | PutDoc("/FontName /"+AllFonts[it.key()]->RealName().simplifyWhiteSpace().replace( QRegExp("\\s"), "" )+"\n"); |
3 | paul | 728 | PutDoc("/FontBBox [ "+AllFonts[it.key()]->FontBBox+" ]\n"); |
729 | PutDoc("/Flags "); |
||
730 | QFontInfo fo = QFontInfo(it.data()); |
||
731 | int pfl = 0; |
||
732 | if (AllFonts[it.key()]->IsFixedPitch) |
||
733 | pfl = pfl ^ 1; |
||
734 | if (fo.italic()) |
||
735 | pfl = pfl ^ 64; |
||
68 | Franz | 736 | // pfl = pfl ^ 4; |
737 | pfl = pfl ^ 32; |
||
3 | paul | 738 | PutDoc(IToStr(pfl)+"\n"); |
739 | PutDoc("/Ascent "+AllFonts[it.key()]->Ascent+"\n"); |
||
740 | PutDoc("/Descent "+AllFonts[it.key()]->Descender+"\n"); |
||
741 | PutDoc("/CapHeight "+AllFonts[it.key()]->CapHeight+"\n"); |
||
742 | PutDoc("/ItalicAngle "+AllFonts[it.key()]->ItalicAngle+"\n"); |
||
743 | PutDoc("/StemV "+AllFonts[it.key()]->StdVW+"\n"); |
||
68 | Franz | 744 | if (((fext == "ttf") || (fext == "otf")) && (Options->EmbedList.contains(it.key()))) |
3 | paul | 745 | PutDoc("/FontFile2 "+IToStr(ObjCounter-1)+" 0 R\n"); |
68 | Franz | 746 | if ((fext == "pfb") && (Options->EmbedList.contains(it.key()))) |
3 | paul | 747 | PutDoc("/FontFile "+IToStr(ObjCounter-1)+" 0 R\n"); |
68 | Franz | 748 | if ((fext == "pfa") && (Options->EmbedList.contains(it.key()))) |
3 | paul | 749 | PutDoc("/FontFile "+IToStr(ObjCounter-1)+" 0 R\n"); |
750 | PutDoc(">>\nendobj\n"); |
||
751 | ObjCounter++; |
||
68 | Franz | 752 | GListeInd gl; |
753 | GlyIndex(&gl, AllFonts[it.key()]->Datei); |
||
754 | GlyphsIdxOfFont.insert(it.key(), gl); |
||
755 | uint FontDes = ObjCounter - 1; |
||
756 | GListeInd::Iterator itg; |
||
757 | itg = gl.begin(); |
||
758 | GListeInd::Iterator itg2; |
||
759 | itg2 = gl.begin(); |
||
760 | uint Fcc = gl.count() / 224; |
||
761 | if ((gl.count() % 224) != 0) |
||
762 | Fcc += 1; |
||
763 | for (uint Fc = 0; Fc < Fcc; ++Fc) |
||
188 | Franz | 764 | { |
68 | Franz | 765 | StartObj(ObjCounter); |
766 | int chCount = 31; |
||
767 | 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 "); |
||
768 | for (int ww = 31; ww < 256; ++ww) |
||
188 | Franz | 769 | { |
770 | PutDoc(IToStr(static_cast<int>(AllFonts[it.key()]->CharWidth[itg.key()]* |
||
771 | 1000))+" "); |
||
68 | Franz | 772 | if (itg == gl.end()) |
773 | break; |
||
774 | ++itg; |
||
775 | chCount++; |
||
188 | Franz | 776 | } |
68 | Franz | 777 | PutDoc("]\nendobj\n"); |
778 | ObjCounter++; |
||
779 | StartObj(ObjCounter); |
||
780 | ObjCounter++; |
||
781 | PutDoc("<< /Type /Encoding\n/Differences [ 32\n"); |
||
782 | int crc = 0; |
||
783 | for (int ww2 = 32; ww2 < 256; ++ww2) |
||
188 | Franz | 784 | { |
68 | Franz | 785 | PutDoc(itg2.data().Name+" "); |
786 | if (itg2 == gl.end()) |
||
787 | break; |
||
788 | ++itg2; |
||
789 | crc++; |
||
790 | if (crc > 8) |
||
188 | Franz | 791 | { |
68 | Franz | 792 | PutDoc("\n"); |
793 | crc = 0; |
||
794 | } |
||
188 | Franz | 795 | } |
68 | Franz | 796 | PutDoc("]\n>>\nendobj\n"); |
797 | StartObj(ObjCounter); |
||
798 | PutDoc("<<\n/Type /Font\n/Subtype "); |
||
80 | Franz | 799 | PutDoc(((fext == "ttf") || (fext == "otf")) ? "/TrueType\n" : "/Type1\n"); |
68 | Franz | 800 | PutDoc("/Name /Fo"+IToStr(a)+"S"+IToStr(Fc)+"\n"); |
920 | fschmid | 801 | PutDoc("/BaseFont /"+AllFonts[it.key()]->RealName().simplifyWhiteSpace().replace( QRegExp("\\s"), "" )+"\n"); |
68 | Franz | 802 | PutDoc("/FirstChar 0\n"); |
803 | PutDoc("/LastChar "+IToStr(chCount-1)+"\n"); |
||
804 | PutDoc("/Widths "+IToStr(ObjCounter-2)+" 0 R\n"); |
||
805 | PutDoc("/Encoding "+IToStr(ObjCounter-1)+" 0 R\n"); |
||
806 | PutDoc("/FontDescriptor "+IToStr(FontDes)+" 0 R\n"); |
||
807 | PutDoc(">>\nendobj\n"); |
||
808 | Seite.FObjects["Fo"+IToStr(a)+"S"+IToStr(Fc)] = ObjCounter; |
||
809 | ObjCounter++; |
||
3 | paul | 810 | } |
188 | Franz | 811 | } |
3 | paul | 812 | a++; |
188 | Franz | 813 | } |
337 | Franz | 814 | if (Options->UseLPI) |
815 | { |
||
816 | StartObj(ObjCounter); |
||
817 | PutDoc("<<\n/Type /Halftone\n/HalftoneType 5\n"); |
||
818 | QMap<QString,LPIset>::Iterator itlp; |
||
819 | for (itlp = Options->LPISettings.begin(); itlp != Options->LPISettings.end(); ++itlp) |
||
820 | { |
||
821 | PutDoc("/"+itlp.key()+"\n<<\n/Type /Halftone\n/HalftoneType 1\n/Frequency "); |
||
822 | PutDoc(IToStr(itlp.data().Frequency)+"\n/Angle "+IToStr(itlp.data().Angle)+"\n/SpotFunction "); |
||
823 | QString func = ""; |
||
824 | switch (itlp.data().SpotFunc) |
||
825 | { |
||
826 | case 0: |
||
827 | func = "/SimpleDot"; |
||
828 | break; |
||
829 | case 1: |
||
830 | func = "/Line"; |
||
831 | break; |
||
832 | case 2: |
||
833 | func = "/Round"; |
||
834 | break; |
||
835 | case 3: |
||
836 | func = "/Ellipse"; |
||
837 | break; |
||
838 | default: |
||
839 | func = "/SimpleDot"; |
||
840 | break; |
||
841 | } |
||
842 | PutDoc(func+"\n>>\n"); |
||
843 | } |
||
844 | PutDoc("/Default\n<<\n/Type /Halftone\n/HalftoneType 1\n/Frequency 50\n/Angle 45\n/SpotFunction /Round\n>>\n"); |
||
845 | PutDoc(">>\nendobj\n"); |
||
846 | ObjCounter++; |
||
847 | StartObj(ObjCounter); |
||
848 | HTName = ResNam+IToStr(ResCount); |
||
849 | Transpar[HTName] = ObjCounter; |
||
850 | PutDoc("<< /Type /ExtGState\n/HT "+IToStr(ObjCounter-1)+" 0 R\n>>\nendobj\n"); |
||
340 | Franz | 851 | ResCount++; |
852 | ObjCounter++; |
||
337 | Franz | 853 | } |
3 | paul | 854 | #ifdef HAVE_CMS |
855 | if ((CMSuse) && (Options->UseProfiles)) |
||
188 | Franz | 856 | { |
3 | paul | 857 | StartObj(ObjCounter); |
858 | ObjCounter++; |
||
859 | QString dataP; |
||
860 | struct ICCD dataD; |
||
861 | loadText(InputProfiles[Options->SolidProf], &dataP); |
||
862 | PutDoc("<<\n"); |
||
863 | if ((Options->Compress) && (CompAvail)) |
||
188 | Franz | 864 | { |
3 | paul | 865 | PutDoc("/Filter /FlateDecode\n"); |
866 | dataP = CompressStr(&dataP); |
||
188 | Franz | 867 | } |
3 | paul | 868 | PutDoc("/Length "+IToStr(dataP.length()+1)+"\n"); |
869 | PutDoc("/N "+IToStr(Options->SComp)+"\n"); |
||
870 | PutDoc(">>\nstream\n"+EncStream(&dataP, ObjCounter-1)+"\nendstream\nendobj\n"); |
||
871 | StartObj(ObjCounter); |
||
872 | dataD.ResName = ResNam+IToStr(ResCount); |
||
873 | dataD.ICCArray = "[ /ICCBased "+IToStr(ObjCounter-1)+" 0 R ]"; |
||
874 | dataD.ResNum = ObjCounter; |
||
875 | ICCProfiles[Options->SolidProf] = dataD; |
||
876 | PutDoc("[ /ICCBased "+IToStr(ObjCounter-1)+" 0 R ]\n"); |
||
877 | PutDoc("endobj\n"); |
||
878 | ResCount++; |
||
879 | ObjCounter++; |
||
188 | Franz | 880 | } |
3 | paul | 881 | #endif |
882 | return true; |
||
883 | } |
||
884 | |||
895 | fschmid | 885 | void PDFlib::PDF_TemplatePage(Page* pag, bool ) |
3 | paul | 886 | { |
887 | QString tmp; |
||
25 | Franz | 888 | ActPageP = pag; |
3 | paul | 889 | Inhalt = ""; |
890 | Seite.AObjects.clear(); |
||
895 | fschmid | 891 | PageItem* ite; |
892 | int Lnr = 0; |
||
893 | struct Layer ll; |
||
894 | ll.Drucken = false; |
||
895 | ll.LNr = 0; |
||
896 | ll.Drucken = false; |
||
897 | ll.LNr = 0; |
||
898 | Lnr = 0; |
||
899 | for (uint la = 0; la < doc->Layers.count(); ++la) |
||
188 | Franz | 900 | { |
895 | fschmid | 901 | Level2Layer(doc, &ll, Lnr); |
902 | if (ll.Drucken) |
||
903 | { |
||
904 | for (uint a = 0; a < ActPageP->Items.count(); ++a) |
||
905 | { |
||
906 | ite = ActPageP->Items.at(a); |
||
907 | if (ite->LayerNr != ll.LNr) |
||
908 | continue; |
||
909 | Inhalt = ""; |
||
910 | PutPage("q\n"); |
||
911 | if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14)) |
||
912 | PDF_Transparenz(ite); |
||
913 | if ((ite->isBookmark) && (Options->Bookmarks)) |
||
914 | PDF_Bookmark(ite->BMnr, doc->PageH - ite->Ypos); |
||
915 | if (!ite->isPrintable || ((ite->PType == 4) && (pag->PageNam != ""))) |
||
916 | { |
||
917 | PutPage("Q\n"); |
||
918 | continue; |
||
919 | } |
||
920 | if (Options->UseRGB) |
||
921 | { |
||
922 | if (ite->Pcolor != "None") |
||
923 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" rg\n"); |
||
924 | if (ite->Pcolor2 != "None") |
||
925 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" RG\n"); |
||
926 | } |
||
927 | else |
||
928 | { |
||
929 | #ifdef HAVE_CMS |
||
930 | if ((CMSuse) && (Options->UseProfiles)) |
||
931 | { |
||
932 | QString tmp[] = {"/Perceptual", "/RelativeColorimetric", "/Saturation", "/AbsoluteColorimetric"}; |
||
933 | PutPage(tmp[Options->Intent]); |
||
934 | PutPage(" ri\n"); |
||
935 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"); |
||
936 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"); |
||
937 | if (ite->Pcolor != "None") |
||
938 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" scn\n"); |
||
939 | if (ite->Pcolor2 != "None") |
||
940 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" SCN\n"); |
||
941 | } |
||
942 | else |
||
943 | { |
||
944 | #endif |
||
945 | if (ite->Pcolor != "None") |
||
946 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" k\n"); |
||
947 | if (ite->Pcolor2 != "None") |
||
948 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" K\n"); |
||
949 | } |
||
950 | #ifdef HAVE_CMS |
||
951 | } |
||
952 | #endif |
||
953 | Inhalt += FToStr(fabs(ite->Pwidth))+" w\n"; |
||
954 | if (ite->DashValues.count() != 0) |
||
955 | { |
||
956 | PutPage("[ "); |
||
957 | QValueList<double>::iterator it; |
||
958 | for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it ) |
||
959 | { |
||
960 | int da = static_cast<int>(*it); |
||
961 | if (da != 0) |
||
962 | PutPage(IToStr(da)+" "); |
||
963 | } |
||
964 | PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n"); |
||
965 | } |
||
966 | else |
||
967 | { |
||
968 | QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1)); |
||
969 | QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1)); |
||
970 | switch (ite->PLineArt) |
||
971 | { |
||
972 | case Qt::SolidLine: |
||
973 | PutPage("[] 0 d\n"); |
||
974 | break; |
||
975 | case Qt::DashLine: |
||
976 | PutPage("["+Da+" "+Dt+"] 0 d\n"); |
||
977 | break; |
||
978 | case Qt::DotLine: |
||
979 | PutPage("["+Dt+"] 0 d\n"); |
||
980 | break; |
||
981 | case Qt::DashDotLine: |
||
982 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
983 | break; |
||
984 | case Qt::DashDotDotLine: |
||
985 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
986 | break; |
||
987 | default: |
||
988 | PutPage("[] 0 d\n"); |
||
989 | break; |
||
990 | } |
||
991 | } |
||
992 | switch (ite->PLineEnd) |
||
993 | { |
||
994 | case Qt::FlatCap: |
||
995 | PutPage("0 J\n"); |
||
996 | break; |
||
997 | case Qt::SquareCap: |
||
998 | PutPage("2 J\n"); |
||
999 | break; |
||
1000 | case Qt::RoundCap: |
||
1001 | PutPage("1 J\n"); |
||
1002 | break; |
||
1003 | default: |
||
1004 | PutPage("0 J\n"); |
||
1005 | break; |
||
1006 | } |
||
1007 | switch (ite->PLineJoin) |
||
1008 | { |
||
1009 | case Qt::MiterJoin: |
||
1010 | PutPage("0 j\n"); |
||
1011 | break; |
||
1012 | case Qt::BevelJoin: |
||
1013 | PutPage("2 j\n"); |
||
1014 | break; |
||
1015 | case Qt::RoundJoin: |
||
1016 | PutPage("1 j\n"); |
||
1017 | break; |
||
1018 | default: |
||
1019 | PutPage("0 j\n"); |
||
1020 | break; |
||
1021 | } |
||
1022 | PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n"); |
||
1023 | if (ite->Rot != 0) |
||
1024 | { |
||
1025 | double sr = sin(-ite->Rot* 3.1415927 / 180.0); |
||
1026 | double cr = cos(-ite->Rot* 3.1415927 / 180.0); |
||
1027 | if ((cr * cr) < 0.000001) |
||
1028 | cr = 0; |
||
1029 | if ((sr * sr) < 0.000001) |
||
1030 | sr = 0; |
||
1031 | PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n"); |
||
1032 | } |
||
1033 | switch (ite->PType) |
||
1034 | { |
||
1035 | case 2: |
||
1036 | if ((ite->Pcolor != "None") || (ite->GrType != 0)) |
||
1037 | { |
||
1038 | if (ite->GrType != 0) |
||
1039 | PDF_Gradient(ite); |
||
1040 | else |
||
1041 | { |
||
1042 | PutPage(SetClipPath(ite)); |
||
1043 | PutPage("h\nf*\n"); |
||
1044 | } |
||
1045 | } |
||
1046 | PutPage("q\n"); |
||
1047 | PutPage(SetClipPath(ite)); |
||
1048 | PutPage("h\nW*\nn\n"); |
||
1049 | if ((ite->flippedH % 2) != 0) |
||
1050 | PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n"); |
||
1051 | if ((ite->flippedV % 2) != 0) |
||
1052 | PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n"); |
||
1053 | if ((ite->PicAvail) && (ite->Pfile != "")) |
||
1054 | PDF_Image(ite->InvPict, ite->Pfile, ite->LocalScX, |
||
1055 | ite->LocalScY, ite->LocalX, -ite->LocalY, |
||
1056 | false, ite->IProfile, ite->UseEmbedded, |
||
1057 | ite->IRender); |
||
1058 | PutPage("Q\n"); |
||
1059 | if (((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) && (!ite->isTableItem)) |
||
1060 | { |
||
1061 | if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0)) |
||
1062 | { |
||
1063 | PutPage(SetClipPath(ite)); |
||
1064 | PutPage("h\nS\n"); |
||
1065 | } |
||
1066 | else |
||
1067 | { |
||
1068 | multiLine ml = doc->MLineStyles[ite->NamedLStyle]; |
||
1069 | for (int it = ml.size()-1; it > -1; it--) |
||
1070 | { |
||
1071 | PutPage(setStrokeMulti(&ml[it])); |
||
1072 | PutPage(SetClipPath(ite)); |
||
1073 | PutPage("h\nS\n"); |
||
1074 | } |
||
1075 | } |
||
1076 | } |
||
1077 | break; |
||
1078 | case 4: |
||
1079 | break; |
||
1080 | case 5: |
||
1081 | if (ite->NamedLStyle == "") |
||
1082 | { |
||
1083 | PutPage("0 0 m\n"); |
||
1084 | PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n"); |
||
1085 | PutPage("S\n"); |
||
1086 | } |
||
1087 | else |
||
1088 | { |
||
1089 | multiLine ml = doc->MLineStyles[ite->NamedLStyle]; |
||
1090 | for (int it = ml.size()-1; it > -1; it--) |
||
1091 | { |
||
1092 | PutPage(setStrokeMulti(&ml[it])); |
||
1093 | PutPage("0 0 m\n"); |
||
1094 | PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n"); |
||
1095 | PutPage("S\n"); |
||
1096 | } |
||
1097 | } |
||
1098 | break; |
||
1099 | case 1: |
||
1100 | case 3: |
||
1101 | case 6: |
||
1102 | if (ite->GrType != 0) |
||
1103 | PDF_Gradient(ite); |
||
1104 | else |
||
1105 | { |
||
1106 | if (ite->Pcolor != "None") |
||
1107 | { |
||
1108 | PutPage(SetClipPath(ite)); |
||
1109 | PutPage("h\nf*\n"); |
||
1110 | } |
||
1111 | } |
||
1112 | if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) |
||
1113 | { |
||
1114 | if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0)) |
||
1115 | { |
||
1116 | PutPage(SetClipPath(ite)); |
||
1117 | PutPage("h\nS\n"); |
||
1118 | } |
||
1119 | else |
||
1120 | { |
||
1121 | multiLine ml = doc->MLineStyles[ite->NamedLStyle]; |
||
1122 | for (int it = ml.size()-1; it > -1; it--) |
||
1123 | { |
||
1124 | PutPage(setStrokeMulti(&ml[it])); |
||
1125 | PutPage(SetClipPath(ite)); |
||
1126 | PutPage("h\nS\n"); |
||
1127 | } |
||
1128 | } |
||
1129 | } |
||
1130 | break; |
||
1131 | case 7: |
||
1132 | if (((ite->PoLine.size() < 5) && ((ite->PoLine.point(0) != ite->PoLine.point(1)) || (ite->PoLine.point(2) != ite->PoLine.point(3)))) || |
||
1133 | (ite->PoLine.size() > 4)) |
||
1134 | { |
||
1135 | if (ite->GrType != 0) |
||
1136 | PDF_Gradient(ite); |
||
1137 | else |
||
1138 | { |
||
1139 | if (ite->Pcolor != "None") |
||
1140 | { |
||
1141 | PutPage(SetClipPath(ite)); |
||
1142 | PutPage("h\nf*\n"); |
||
1143 | } |
||
1144 | } |
||
1145 | } |
||
1146 | if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) |
||
1147 | { |
||
1148 | if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0)) |
||
1149 | { |
||
1150 | PutPage(SetClipPath(ite, false)); |
||
1151 | PutPage("S\n"); |
||
1152 | } |
||
1153 | else |
||
1154 | { |
||
1155 | multiLine ml = doc->MLineStyles[ite->NamedLStyle]; |
||
1156 | for (int it = ml.size()-1; it > -1; it--) |
||
1157 | { |
||
1158 | PutPage(setStrokeMulti(&ml[it])); |
||
1159 | PutPage(SetClipPath(ite, false)); |
||
1160 | PutPage("S\n"); |
||
1161 | } |
||
1162 | } |
||
1163 | } |
||
1164 | break; |
||
1165 | case 8: |
||
1166 | if (ite->PoShow) |
||
1167 | { |
||
1168 | if (ite->PoLine.size() > 3) |
||
1169 | { |
||
1170 | PutPage("q\n"); |
||
1171 | if ((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) |
||
1172 | { |
||
1173 | if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0)) |
||
1174 | { |
||
1175 | PutPage(SetClipPath(ite, false)); |
||
1176 | PutPage("S\n"); |
||
1177 | } |
||
1178 | else |
||
1179 | { |
||
1180 | multiLine ml = doc->MLineStyles[ite->NamedLStyle]; |
||
1181 | for (int it = ml.size()-1; |
||
1182 | it > -1; it--) |
||
1183 | { |
||
1184 | PutPage(setStrokeMulti(&ml[it])); |
||
1185 | PutPage(SetClipPath(ite, false)); |
||
1186 | PutPage("S\n"); |
||
1187 | } |
||
1188 | } |
||
1189 | } |
||
1190 | PutPage("Q\n"); |
||
1191 | } |
||
1192 | } |
||
1193 | PutPage(setTextSt(ite, pag->PageNr)); |
||
1194 | break; |
||
1195 | } |
||
1196 | PutPage("Q\n"); |
||
1197 | StartObj(ObjCounter); |
||
1198 | ObjCounter++; |
||
1199 | PutDoc("<<\n/Type /XObject\n/Subtype /Form\n/FormType 1\n"); |
||
1200 | PutDoc("/BBox [ 0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+" ]\n"); |
||
1201 | PutDoc("/Resources << /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]\n"); |
||
1202 | if (Seite.XObjects.count() != 0) |
||
1203 | { |
||
1204 | PutDoc("/XObject <<\n"); |
||
1205 | QMap<QString,int>::Iterator it; |
||
1206 | for (it = Seite.XObjects.begin(); it != Seite.XObjects.end(); ++it) |
||
1207 | PutDoc("/"+it.key()+" "+IToStr(it.data())+" 0 R\n"); |
||
1208 | PutDoc(">>\n"); |
||
1209 | } |
||
1210 | if (Seite.FObjects.count() != 0) |
||
1211 | { |
||
1212 | PutDoc("/Font << \n"); |
||
1213 | QMap<QString,int>::Iterator it2; |
||
1214 | for (it2 = Seite.FObjects.begin(); it2 != Seite.FObjects.end(); ++it2) |
||
1215 | PutDoc("/"+it2.key()+" "+IToStr(it2.data())+" 0 R\n"); |
||
1216 | PutDoc(">>\n"); |
||
1217 | } |
||
1218 | if (Shadings.count() != 0) |
||
1219 | { |
||
1220 | PutDoc("/Shading << \n"); |
||
1221 | QMap<QString,int>::Iterator it3; |
||
1222 | for (it3 = Shadings.begin(); it3 != Shadings.end(); ++it3) |
||
1223 | PutDoc("/"+it3.key()+" "+IToStr(it3.data())+" 0 R\n"); |
||
1224 | PutDoc(">>\n"); |
||
1225 | } |
||
1226 | if (Transpar.count() != 0) |
||
1227 | { |
||
1228 | PutDoc("/ExtGState << \n"); |
||
1229 | QMap<QString,int>::Iterator it3t; |
||
1230 | for (it3t = Transpar.begin(); it3t != Transpar.end(); ++it3t) |
||
1231 | PutDoc("/"+it3t.key()+" "+IToStr(it3t.data())+" 0 R\n"); |
||
1232 | PutDoc(">>\n"); |
||
1233 | } |
||
1234 | if (ICCProfiles.count() != 0) |
||
1235 | { |
||
1236 | PutDoc("/ColorSpace << \n"); |
||
1237 | QMap<QString,ICCD>::Iterator it3c; |
||
1238 | for (it3c = ICCProfiles.begin(); it3c != ICCProfiles.end(); ++it3c) |
||
1239 | PutDoc("/"+it3c.data().ResName+" "+IToStr(it3c.data().ResNum)+" 0 R\n"); |
||
1240 | PutDoc(">>\n"); |
||
1241 | } |
||
1242 | PutDoc(">>\n"); |
||
1243 | if ((Options->Compress) && (CompAvail)) |
||
1244 | Inhalt = CompressStr(&Inhalt); |
||
1245 | PutDoc("/Length "+IToStr(Inhalt.length()+1)); |
||
1246 | if ((Options->Compress) && (CompAvail)) |
||
1247 | PutDoc("\n/Filter /FlateDecode"); |
||
1248 | PutDoc(" >>\nstream\n"+EncStream(&Inhalt, ObjCounter-1)+"\nendstream\nendobj\n"); |
||
1249 | QString name = pag->PageNam.simplifyWhiteSpace().replace( QRegExp("\\s"), "" ) + IToStr(ite->ItemNr); |
||
1250 | Seite.XObjects[name] = ObjCounter-1; |
||
1251 | } |
||
1252 | } |
||
1253 | Lnr++; |
||
188 | Franz | 1254 | } |
3 | paul | 1255 | } |
1256 | |||
1257 | void PDFlib::PDF_Begin_Page(Page* pag, QPixmap pm) |
||
1258 | { |
||
1259 | QString tmp; |
||
25 | Franz | 1260 | ActPageP = pag; |
3 | paul | 1261 | Inhalt = ""; |
1262 | Seite.AObjects.clear(); |
||
1263 | if (Options->Thumbnails) |
||
188 | Franz | 1264 | { |
3 | paul | 1265 | QImage img = pm.convertToImage(); |
1266 | QString im = ImageToTxt(&img); |
||
1267 | if ((Options->Compress) && (CompAvail)) |
||
1268 | im = CompressStr(&im); |
||
1269 | StartObj(ObjCounter); |
||
1270 | PutDoc("<<\n/Width "+IToStr(img.width())+"\n"); |
||
1271 | PutDoc("/Height "+IToStr(img.height())+"\n"); |
||
1272 | PutDoc("/ColorSpace /DeviceRGB\n/BitsPerComponent 8\n"); |
||
1273 | PutDoc("/Length "+IToStr(im.length()+1)+"\n"); |
||
1274 | if ((Options->Compress) && (CompAvail)) |
||
1275 | PutDoc("/Filter /FlateDecode\n"); |
||
1276 | PutDoc(">>\nstream\n"+EncStream(&im, ObjCounter)+"\nendstream\nendobj\n"); |
||
1277 | Seite.Thumb = ObjCounter; |
||
1278 | ObjCounter++; |
||
188 | Franz | 1279 | } |
3 | paul | 1280 | } |
1281 | |||
1282 | void PDFlib::PDF_End_Page() |
||
1283 | { |
||
25 | Franz | 1284 | uint PgNr = ActPageP->PageNr; |
3 | paul | 1285 | Seite.ObjNum = ObjCounter; |
1286 | WritePDFStream(&Inhalt); |
||
1287 | StartObj(ObjCounter); |
||
1288 | PutDoc("<<\n/Type /Page\n/Parent 4 0 R\n"); |
||
1289 | PutDoc("/MediaBox [0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+"]\n"); |
||
188 | Franz | 1290 | PutDoc("/TrimBox ["+FToStr(Options->BleedLeft)+" "+FToStr(Options->BleedBottom)+ |
1291 | " "+FToStr(doc->PageB-Options->BleedRight)+" "+FToStr(doc->PageH-Options->BleedTop)+"]\n"); |
||
448 | fschmid | 1292 | PutDoc("/Rotate "+IToStr(Options->RotateDeg)+"\n"); |
3 | paul | 1293 | PutDoc("/Contents "+IToStr(Seite.ObjNum)+" 0 R\n"); |
1294 | if (Options->Thumbnails) |
||
1295 | PutDoc("/Thumb "+IToStr(Seite.Thumb)+" 0 R\n"); |
||
1296 | if (Seite.AObjects.count() != 0) |
||
188 | Franz | 1297 | { |
3 | paul | 1298 | PutDoc("/Annots [ "); |
1299 | for (uint b = 0; b < Seite.AObjects.count(); ++b) |
||
1300 | PutDoc(IToStr(Seite.AObjects[b])+" 0 R "); |
||
1301 | PutDoc("]\n"); |
||
188 | Franz | 1302 | } |
3 | paul | 1303 | if (Options->PresentMode) |
188 | Franz | 1304 | { |
3 | paul | 1305 | PutDoc("/Dur "+IToStr(Options->PresentVals[PgNr].AnzeigeLen)+"\n"); |
1306 | if (Options->PresentVals[PgNr].Effekt != 0) |
||
188 | Franz | 1307 | { |
3 | paul | 1308 | PutDoc("/Trans << /Type /Trans\n"); |
1309 | PutDoc("/D "+IToStr(Options->PresentVals[PgNr].EffektLen)+"\n"); |
||
1310 | switch (Options->PresentVals[PgNr].Effekt) |
||
188 | Franz | 1311 | { |
3 | paul | 1312 | case 1: |
1313 | PutDoc("/S /Blinds\n"); |
||
80 | Franz | 1314 | PutDoc(Options->PresentVals[PgNr].Dm == 0 ? "/Dm /H\n" : "/Dm /V\n"); |
3 | paul | 1315 | break; |
1316 | case 2: |
||
1317 | PutDoc("/S /Box\n"); |
||
80 | Franz | 1318 | PutDoc(Options->PresentVals[PgNr].M == 0 ? "/M /I\n" : "/M /O\n"); |
3 | paul | 1319 | break; |
1320 | case 3: |
||
1321 | PutDoc("/S /Dissolve\n"); |
||
1322 | break; |
||
1323 | case 4: |
||
1324 | PutDoc("/S /Glitter\n"); |
||
312 | Franz | 1325 | PutDoc("/Di "); |
1326 | switch (Options->PresentVals[PgNr].Di) |
||
1327 | { |
||
1328 | case 0: |
||
1329 | PutDoc("0"); |
||
1330 | break; |
||
1331 | case 1: |
||
1332 | PutDoc("270"); |
||
1333 | break; |
||
1334 | case 4: |
||
1335 | PutDoc("315"); |
||
1336 | break; |
||
1337 | default: |
||
1338 | PutDoc("0"); |
||
1339 | break; |
||
1340 | } |
||
1341 | PutDoc("\n"); |
||
3 | paul | 1342 | break; |
1343 | case 5: |
||
1344 | PutDoc("/S /Split\n"); |
||
80 | Franz | 1345 | PutDoc(Options->PresentVals[PgNr].Dm == 0 ? "/Dm /H\n" : "/Dm /V\n"); |
1346 | PutDoc(Options->PresentVals[PgNr].M == 0 ? "/M /I\n" : "/M /O\n"); |
||
3 | paul | 1347 | break; |
1348 | case 6: |
||
1349 | PutDoc("/S /Wipe\n"); |
||
312 | Franz | 1350 | PutDoc("/Di "); |
1351 | switch (Options->PresentVals[PgNr].Di) |
||
1352 | { |
||
1353 | case 0: |
||
1354 | PutDoc("0"); |
||
1355 | break; |
||
1356 | case 1: |
||
1357 | PutDoc("270"); |
||
1358 | break; |
||
1359 | case 2: |
||
1360 | PutDoc("90"); |
||
1361 | break; |
||
1362 | case 3: |
||
1363 | PutDoc("180"); |
||
1364 | break; |
||
1365 | default: |
||
1366 | PutDoc("0"); |
||
1367 | break; |
||
1368 | } |
||
1369 | PutDoc("\n"); |
||
3 | paul | 1370 | break; |
188 | Franz | 1371 | } |
3 | paul | 1372 | PutDoc(">>\n"); |
1373 | } |
||
188 | Franz | 1374 | } |
3 | paul | 1375 | PutDoc(">>\nendobj\n"); |
1376 | PageTree.Count++; |
||
1377 | PageTree.Kids.append(ObjCounter); |
||
1378 | ObjCounter++; |
||
1379 | } |
||
1380 | |||
470 | fschmid | 1381 | void PDFlib::PDF_ProcessPage(Page* pag, uint PNr, bool clip) |
3 | paul | 1382 | { |
1383 | QString tmp; |
||
25 | Franz | 1384 | ActPageP = pag; |
3 | paul | 1385 | PageItem* ite; |
1386 | int Lnr = 0; |
||
1387 | struct Layer ll; |
||
1388 | ll.Drucken = false; |
||
1389 | ll.LNr = 0; |
||
337 | Franz | 1390 | if (Options->UseLPI) |
1391 | PutPage("/"+HTName+" gs\n"); |
||
420 | Franz | 1392 | if ( (Options->MirrorH) && (pag->MPageNam != "") ) |
1393 | PutPage("-1 0 0 1 "+FToStr(doc->PageB)+" 0 cm\n"); |
||
470 | fschmid | 1394 | if ( (Options->MirrorV) && (pag->MPageNam != "") ) |
1395 | PutPage("1 0 0 -1 0 "+FToStr(doc->PageH)+" cm\n"); |
||
1396 | if (clip) |
||
1397 | { |
||
1398 | PutPage(FToStr(pag->Margins.Left) + " " + FToStr(pag->Margins.Bottom) + " m\n"); |
||
1399 | PutPage(FToStr(doc->PageB - pag->Margins.Right) + " " + FToStr(pag->Margins.Bottom) + " l\n"); |
||
1400 | PutPage(FToStr(doc->PageB - pag->Margins.Right) + " " + FToStr(doc->PageH - pag->Margins.Top) + " l\n"); |
||
1401 | PutPage(FToStr(pag->Margins.Left) + " " + FToStr(doc->PageH - pag->Margins.Top) + " l h W n\n"); |
||
1402 | } |
||
1403 | else |
||
1404 | PutPage("0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+" re W n\n"); |
||
3 | paul | 1405 | if (pag->MPageNam != "") |
188 | Franz | 1406 | { |
3 | paul | 1407 | Page* mPage = view->MasterPages.at(view->MasterNames[view->Pages.at(PNr)->MPageNam]); |
1408 | if (mPage->Items.count() != 0) |
||
188 | Franz | 1409 | { |
420 | Franz | 1410 | if (!Options->MirrorH) |
1411 | PutPage("1 0 0 1 0 0 cm\n"); |
||
3 | paul | 1412 | for (uint lam = 0; lam < doc->Layers.count(); ++lam) |
188 | Franz | 1413 | { |
3 | paul | 1414 | Level2Layer(doc, &ll, Lnr); |
1415 | Lnr++; |
||
1416 | if (ll.Drucken) |
||
188 | Franz | 1417 | { |
1418 | for (uint am = 0; am < mPage->Items.count(); ++am) |
||
3 | paul | 1419 | { |
1420 | ite = mPage->Items.at(am); |
||
1421 | if ((ite->LayerNr != ll.LNr) || (!ite->isPrintable)) |
||
1422 | continue; |
||
895 | fschmid | 1423 | QString name = "/"+pag->MPageNam.simplifyWhiteSpace().replace( QRegExp("\\s"), "" ) + IToStr(ite->ItemNr); |
1424 | if (ite->PType != 4) |
||
1425 | PutPage(name+" Do\n"); |
||
1426 | else |
||
188 | Franz | 1427 | { |
313 | Franz | 1428 | QWidget* Opa; |
1429 | Page* Opa2; |
||
1430 | Opa = ite->Parent; |
||
1431 | Opa2 = ite->OwnPage; |
||
1432 | ite->Parent = pag; |
||
1433 | ite->OwnPage = pag; |
||
1434 | double savScale = doc->Scale; |
||
1435 | doc->Scale = 1.0; |
||
1436 | doc->RePos = true; |
||
1437 | QPixmap pgPix(10, 10); |
||
1438 | QRect rd = QRect(0,0,9,9); |
||
1439 | ScPainter *painter = new ScPainter(&pgPix, pgPix.width(), pgPix.height()); |
||
1522 | cbradney | 1440 | if (painter!=NULL) |
1441 | { |
||
1442 | ite->DrawObj(painter, rd); |
||
1443 | doc->RePos = false; |
||
1444 | doc->Scale = savScale; |
||
1445 | delete painter; |
||
1446 | } |
||
313 | Franz | 1447 | ite->Parent = Opa; |
1448 | ite->OwnPage = Opa2; |
||
3 | paul | 1449 | PutPage("q\n"); |
313 | Franz | 1450 | if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14)) |
1451 | PDF_Transparenz(ite); |
||
3 | paul | 1452 | if (Options->UseRGB) |
188 | Franz | 1453 | { |
3 | paul | 1454 | if (ite->Pcolor != "None") |
264 | Franz | 1455 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" rg\n"); |
3 | paul | 1456 | if (ite->Pcolor2 != "None") |
264 | Franz | 1457 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" RG\n"); |
188 | Franz | 1458 | } |
3 | paul | 1459 | else |
188 | Franz | 1460 | { |
3 | paul | 1461 | #ifdef HAVE_CMS |
1462 | if ((CMSuse) && (Options->UseProfiles)) |
||
188 | Franz | 1463 | { |
1464 | switch (Options->Intent) |
||
3 | paul | 1465 | { |
1466 | case 0: |
||
1467 | PutPage("/Perceptual"); |
||
1468 | break; |
||
1469 | case 1: |
||
1470 | PutPage("/RelativeColorimetric"); |
||
1471 | break; |
||
1472 | case 2: |
||
1473 | PutPage("/Saturation"); |
||
1474 | break; |
||
1475 | case 3: |
||
1476 | PutPage("/AbsoluteColorimetric"); |
||
1477 | break; |
||
188 | Franz | 1478 | } |
3 | paul | 1479 | PutPage(" ri\n"); |
1480 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"); |
||
1481 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"); |
||
1482 | if (ite->Pcolor != "None") |
||
264 | Franz | 1483 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" scn\n"); |
3 | paul | 1484 | if (ite->Pcolor2 != "None") |
264 | Franz | 1485 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" SCN\n"); |
188 | Franz | 1486 | } |
3 | paul | 1487 | else |
188 | Franz | 1488 | { |
3 | paul | 1489 | #endif |
188 | Franz | 1490 | if (ite->Pcolor != "None") |
264 | Franz | 1491 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" k\n"); |
188 | Franz | 1492 | if (ite->Pcolor2 != "None") |
264 | Franz | 1493 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" K\n"); |
3 | paul | 1494 | } |
1495 | #ifdef HAVE_CMS |
||
188 | Franz | 1496 | } |
3 | paul | 1497 | #endif |
878 | fschmid | 1498 | Inhalt += FToStr(fabs(ite->Pwidth))+" w\n"; |
1499 | if (ite->DashValues.count() != 0) |
||
1500 | { |
||
1501 | PutPage("[ "); |
||
1502 | QValueList<double>::iterator it; |
||
1503 | for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it ) |
||
1504 | { |
||
1505 | int da = static_cast<int>(*it); |
||
1506 | if (da != 0) |
||
1507 | PutPage(IToStr(da)+" "); |
||
1508 | } |
||
1509 | PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n"); |
||
1510 | } |
||
1511 | else |
||
1512 | { |
||
1513 | QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1)); |
||
1514 | QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1)); |
||
1515 | switch (ite->PLineArt) |
||
1516 | { |
||
1517 | case Qt::SolidLine: |
||
1518 | PutPage("[] 0 d\n"); |
||
1519 | break; |
||
1520 | case Qt::DashLine: |
||
1521 | PutPage("["+Da+" "+Dt+"] 0 d\n"); |
||
1522 | break; |
||
1523 | case Qt::DotLine: |
||
1524 | PutPage("["+Dt+"] 0 d\n"); |
||
1525 | break; |
||
1526 | case Qt::DashDotLine: |
||
1527 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
1528 | break; |
||
1529 | case Qt::DashDotDotLine: |
||
1530 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
1531 | break; |
||
1532 | default: |
||
1533 | PutPage("[] 0 d\n"); |
||
1534 | break; |
||
1535 | } |
||
1536 | } |
||
1537 | PutPage("2 J\n"); |
||
1538 | switch (ite->PLineJoin) |
||
1539 | { |
||
1540 | case Qt::MiterJoin: |
||
1541 | PutPage("0 j\n"); |
||
1542 | break; |
||
1543 | case Qt::BevelJoin: |
||
1544 | PutPage("2 j\n"); |
||
1545 | break; |
||
1546 | case Qt::RoundJoin: |
||
1547 | PutPage("1 j\n"); |
||
1548 | break; |
||
1549 | default: |
||
1550 | PutPage("0 j\n"); |
||
1551 | break; |
||
1552 | } |
||
313 | Franz | 1553 | PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n"); |
3 | paul | 1554 | if (ite->Rot != 0) |
188 | Franz | 1555 | { |
80 | Franz | 1556 | double sr = sin(-ite->Rot* 3.1415927 / 180.0); |
1557 | double cr = cos(-ite->Rot* 3.1415927 / 180.0); |
||
511 | fschmid | 1558 | if ((cr * cr) < 0.000001) |
3 | paul | 1559 | cr = 0; |
511 | fschmid | 1560 | if ((sr * sr) < 0.000001) |
3 | paul | 1561 | sr = 0; |
271 | Franz | 1562 | PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n"); |
188 | Franz | 1563 | } |
3 | paul | 1564 | if ((ite->Pcolor != "None") || (ite->GrType != 0)) |
188 | Franz | 1565 | { |
3 | paul | 1566 | if (ite->GrType != 0) |
1567 | PDF_Gradient(ite); |
||
1568 | else |
||
188 | Franz | 1569 | { |
3 | paul | 1570 | PutPage(SetClipPath(ite)); |
271 | Franz | 1571 | PutPage("h\nf*\n"); |
3 | paul | 1572 | } |
188 | Franz | 1573 | } |
878 | fschmid | 1574 | PutPage("q\n"); |
3 | paul | 1575 | if ((ite->flippedH % 2) != 0) |
1576 | PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n"); |
||
1577 | if ((ite->flippedV % 2) != 0) |
||
234 | Franz | 1578 | PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n"); |
3 | paul | 1579 | PutPage(setTextSt(ite, PNr)); |
1580 | PutPage("Q\n"); |
||
878 | fschmid | 1581 | if (((ite->Pcolor2 != "None") || (ite->NamedLStyle != "")) && (!ite->isTableItem)) |
1582 | { |
||
1583 | if ((ite->NamedLStyle == "") && (ite->Pwidth != 0.0)) |
||
1584 | { |
||
1585 | PutPage(SetClipPath(ite)); |
||
1586 | PutPage("h\nS\n"); |
||
1587 | } |
||
1588 | else |
||
1589 | { |
||
1590 | multiLine ml = doc->MLineStyles[ite->NamedLStyle]; |
||
1591 | for (int it = ml.size()-1; it > -1; it--) |
||
1592 | { |
||
1593 | PutPage(setStrokeMulti(&ml[it])); |
||
1594 | PutPage(SetClipPath(ite)); |
||
1595 | PutPage("h\nS\n"); |
||
1596 | } |
||
1597 | } |
||
1598 | } |
||
1599 | PutPage("Q\n"); |
||
3 | paul | 1600 | } |
1601 | } |
||
234 | Franz | 1602 | for (uint am = 0; am < mPage->Items.count(); ++am) |
1603 | { |
||
1604 | ite = mPage->Items.at(am); |
||
907 | fschmid | 1605 | if ((ite->LayerNr != ll.LNr) || (!ite->isPrintable)) |
234 | Franz | 1606 | continue; |
1607 | PutPage("q\n"); |
||
265 | Franz | 1608 | if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14)) |
234 | Franz | 1609 | PDF_Transparenz(ite); |
1610 | if (Options->UseRGB) |
||
1611 | { |
||
1612 | if (ite->Pcolor != "None") |
||
1613 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" rg\n"); |
||
1614 | if (ite->Pcolor2 != "None") |
||
1615 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" RG\n"); |
||
1616 | } |
||
1617 | else |
||
1618 | { |
||
1619 | #ifdef HAVE_CMS |
||
1620 | if ((CMSuse) && (Options->UseProfiles)) |
||
1621 | { |
||
614 | cbradney | 1622 | QString tmp[] = {"/Perceptual", "/RelativeColorimetric", |
234 | Franz | 1623 | "/Saturation", "/AbsoluteColorimetric"}; |
1624 | PutPage(tmp[Options->Intent]); |
||
1625 | PutPage(" ri\n"); |
||
1626 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"); |
||
1627 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"); |
||
1628 | if (ite->Pcolor != "None") |
||
1629 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" scn\n"); |
||
1630 | if (ite->Pcolor2 != "None") |
||
1631 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" SCN\n"); |
||
1632 | } |
||
1633 | else |
||
1634 | { |
||
1635 | #endif |
||
1636 | if (ite->Pcolor != "None") |
||
1637 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" k\n"); |
||
1638 | if (ite->Pcolor2 != "None") |
||
1639 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" K\n"); |
||
1640 | } |
||
1641 | #ifdef HAVE_CMS |
||
3 | paul | 1642 | } |
234 | Franz | 1643 | #endif |
493 | fschmid | 1644 | Inhalt += FToStr(fabs(ite->Pwidth))+" w\n"; |
292 | Franz | 1645 | if (ite->DashValues.count() != 0) |
234 | Franz | 1646 | { |
292 | Franz | 1647 | PutPage("[ "); |
1648 | QValueList<double>::iterator it; |
||
1649 | for ( it = ite->DashValues.begin(); it != ite->DashValues.end(); ++it ) |
||
1650 | { |
||
493 | fschmid | 1651 | int da = static_cast<int>(*it); |
1652 | if (da != 0) |
||
1653 | PutPage(IToStr(da)+" "); |
||
292 | Franz | 1654 | } |
1655 | PutPage("] "+IToStr(static_cast<int>(ite->DashOffset))+" d\n"); |
||
234 | Franz | 1656 | } |
292 | Franz | 1657 | else |
1658 | { |
||
493 | fschmid | 1659 | QString Dt = FToStr(QMAX(2*fabs(ite->Pwidth), 1)); |
1660 | QString Da = FToStr(QMAX(6*fabs(ite->Pwidth), 1)); |
||
292 | Franz | 1661 | switch (ite->PLineArt) |
1662 | { |
||
1663 | case Qt::SolidLine: |
||
1664 | PutPage("[] 0 d\n"); |
||
1665 | break; |
||
1666 | case Qt::DashLine: |
||
1667 | PutPage("["+Da+" "+Dt+"] 0 d\n"); |
||
1668 | break; |
||
1669 | case Qt::DotLine: |
||
1670 | PutPage("["+Dt+"] 0 d\n"); |
||
1671 | break; |
||
1672 | case Qt::DashDotLine: |
||
1673 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
1674 | break; |
||
1675 | case Qt::DashDotDotLine: |
||
1676 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
1677 | break; |
||
1678 | default: |
||
1679 | PutPage("[] 0 d\n"); |
||
1680 | break; |
||
1681 | } |
||
1682 | } |
||
234 | Franz | 1683 | PutPage("2 J\n"); |
1684 | switch (ite->PLineJoin) |
||
1685 | { |
||
1686 | case Qt::MiterJoin: |
||
1687 | PutPage("0 j\n"); |
||
1688 | break; |
||
1689 | case Qt::BevelJoin: |
||
1690 | PutPage("2 j\n"); |
||
1691 | break; |
||
1692 | case Qt::RoundJoin: |
||
1693 | PutPage("1 j\n"); |
||
1694 | break; |
||
1695 | default: |
||
1696 | PutPage("0 j\n"); |
||
1697 | break; |
||
1698 | } |
||
1699 | PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n"); |
||
1700 | if (ite->Rot != 0) |
||
1701 | { |
||
1702 | double sr = sin(-ite->Rot* 3.1415927 / 180.0); |
||
1703 | double cr = cos(-ite->Rot* 3.1415927 / 180.0); |
||
511 | fschmid | 1704 | if ((cr * cr) < 0.000001) |
234 | Franz | 1705 | cr = 0; |
511 | fschmid | 1706 | if ((sr * sr) < 0.000001) |
234 | Franz | 1707 | sr = 0; |
1708 | PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+ " 0 0 cm\n"); |
||
1709 | } |
||
1710 | if (ite->isTableItem) |
||
1711 | { |
||
1712 | if ((ite->TopLine) || (ite->RightLine) || (ite->BottomLine) || (ite->LeftLine)) |
||
1713 | { |
||
1714 | if (ite->TopLine) |
||
1715 | { |
||
1716 | PutPage("0 0 m\n"); |
||
1717 | PutPage(FToStr(ite->Width)+" 0 l\n"); |
||
1718 | } |
||
1719 | if (ite->RightLine) |
||
1720 | { |
||
1721 | PutPage(FToStr(ite->Width)+" 0 m\n"); |
||
1722 | PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n"); |
||
1723 | } |
||
1724 | if (ite->BottomLine) |
||
1725 | { |
||
1726 | PutPage("0 "+FToStr(-ite->Height)+" m\n"); |
||
1727 | PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n"); |
||
1728 | } |
||
1729 | if (ite->LeftLine) |
||
1730 | { |
||
1731 | PutPage("0 0 m\n"); |
||
1732 | PutPage("0 "+FToStr(-ite->Height)+" l\n"); |
||
1733 | } |
||
1734 | PutPage("S\n"); |
||
1735 | } |
||
1736 | } |
||
1737 | PutPage("Q\n"); |
||
1738 | } |
||
1739 | } |
||
3 | paul | 1740 | } |
1741 | } |
||
188 | Franz | 1742 | } |
3 | paul | 1743 | ll.Drucken = false; |
1744 | ll.LNr = 0; |
||
1745 | Lnr = 0; |
||
1746 | for (uint la = 0; la < doc->Layers.count(); ++la) |
||
188 | Franz | 1747 | { |
3 | paul | 1748 | Level2Layer(doc, &ll, Lnr); |
1749 | if (ll.Drucken) |
||
188 | Franz | 1750 | { |
1751 | for (uint a = 0; a < ActPageP->Items.count(); ++a) |
||
3 | paul | 1752 | { |
25 | Franz | 1753 | ite = ActPageP->Items.at(a); |
3 | paul | 1754 | if (ite->LayerNr != ll.LNr) |
1755 | continue; |
||
1756 | PutPage("q\n"); |
||
448 | fschmid | 1757 | if (((ite->Transparency != 0) || (ite->TranspStroke != 0)) && (Options->Version == 14)) |
3 | paul | 1758 | PDF_Transparenz(ite); |
1759 | if ((ite->isBookmark) && (Options->Bookmarks)) |
||
1760 | PDF_Bookmark(ite->BMnr, doc->PageH - ite->Ypos); |
||
95 | Franz | 1761 | if (!ite->isPrintable || ((ite->PType == 4) && (pag->PageNam != ""))) |
188 | Franz | 1762 | { |