Rev 19 | Rev 25 | Go to most recent revision | 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" |
||
19 | #include "config.h" |
||
20 | #include <qregexp.h> |
||
21 | #include <qdatetime.h> |
||
22 | #include <qfileinfo.h> |
||
23 | #include <qtextstream.h> |
||
24 | #include <cstdlib> |
||
25 | #include <cmath> |
||
26 | #include "rc4.h" |
||
27 | |||
19 | Franz | 28 | extern QString Path2Relative(QString Path); |
3 | paul | 29 | extern bool GlyIndex(QMap<uint, PDFlib::GlNamInd> *GListInd, QString Dat); |
30 | extern QByteArray ComputeMD5Sum(QByteArray *in); |
||
31 | extern QImage LoadPict(QString fn); |
||
32 | extern bool loadText(QString nam, QString *Buffer); |
||
33 | extern void Level2Layer(ScribusDoc *doc, struct Layer *ll, int Level); |
||
34 | extern QString CompressStr(QString *in); |
||
35 | extern QString ImageToTxt(QImage *im); |
||
36 | extern QString ImageToCMYK(QImage *im); |
||
37 | extern QString MaskToTxt(QImage *im, bool PDF = true); |
||
38 | extern char *toHex( uchar u ); |
||
39 | extern QString String2Hex(QString *in, bool lang = true); |
||
40 | extern float Cwidth(ScribusDoc *doc, QPainter *p, QString name, QString ch, int Siz, QString ch2 = " "); |
||
41 | #ifdef HAVE_CMS |
||
42 | extern bool CMSuse; |
||
43 | #endif |
||
44 | #ifdef HAVE_TIFF |
||
45 | #include <tiffio.h> |
||
46 | #endif |
||
47 | extern ProfilesL InputProfiles; |
||
48 | |||
49 | extern "C" void* Run(); |
||
50 | |||
51 | void* Run() |
||
52 | { |
||
53 | PDFlib *dia = new PDFlib(); |
||
54 | return dia; |
||
55 | } |
||
56 | PDFlib::PDFlib() |
||
57 | { |
||
58 | OwnerKey = QByteArray(32); |
||
59 | UserKey = QByteArray(32); |
||
60 | FileID = QByteArray(16); |
||
61 | EncryKey = QByteArray(5); |
||
62 | Encrypt = 0; |
||
63 | KeyLen = 5; |
||
64 | Dokument = 0; |
||
65 | Catalog.Outlines = 2; |
||
66 | Catalog.PageTree = 3; |
||
67 | Catalog.Dest = 4; |
||
68 | PageTree.Count = 0; |
||
69 | PageTree.Kids.clear(); |
||
70 | Outlines.First = 0; |
||
71 | Outlines.Last = 0; |
||
72 | Outlines.Count = 0; |
||
73 | XRef.clear(); |
||
74 | NamedDest.clear(); |
||
75 | NDnam = "LI"; |
||
76 | NDnum = 0; |
||
77 | ObjCounter = 7; |
||
78 | Seite.ObjNum = 0; |
||
79 | Seite.Thumb = 0; |
||
80 | Seite.XObjects.clear(); |
||
81 | Seite.FObjects.clear(); |
||
82 | Seite.AObjects.clear(); |
||
83 | Seite.FormObjects.clear(); |
||
84 | CalcFields.clear(); |
||
85 | Shadings.clear(); |
||
86 | Transpar.clear(); |
||
87 | ICCProfiles.clear(); |
||
88 | ResNam = "RE"; |
||
89 | ResCount = 0; |
||
90 | #ifdef HAVE_LIBZ |
||
91 | CompAvail = true; |
||
92 | #else |
||
93 | CompAvail = false; |
||
94 | #endif |
||
95 | KeyGen = QByteArray(32); |
||
96 | KeyGen[0] = 0x28; |
||
97 | KeyGen[1] = 0xbf; |
||
98 | KeyGen[2] = 0x4e; |
||
99 | KeyGen[3] = 0x5e; |
||
100 | KeyGen[4] = 0x4e; |
||
101 | KeyGen[5] = 0x75; |
||
102 | KeyGen[6] = 0x8a; |
||
103 | KeyGen[7] = 0x41; |
||
104 | KeyGen[8] = 0x64; |
||
105 | KeyGen[9] = 0x00; |
||
106 | KeyGen[10] = 0x4e; |
||
107 | KeyGen[11] = 0x56; |
||
108 | KeyGen[12] = 0xff; |
||
109 | KeyGen[13] = 0xfa; |
||
110 | KeyGen[14] = 0x01; |
||
111 | KeyGen[15] = 0x08; |
||
112 | KeyGen[16] = 0x2e; |
||
113 | KeyGen[17] = 0x2e; |
||
114 | KeyGen[18] = 0x00; |
||
115 | KeyGen[19] = 0xb6; |
||
116 | KeyGen[20] = 0xd0; |
||
117 | KeyGen[21] = 0x68; |
||
118 | KeyGen[22] = 0x3e; |
||
119 | KeyGen[23] = 0x80; |
||
120 | KeyGen[24] = 0x2f; |
||
121 | KeyGen[25] = 0x0c; |
||
122 | KeyGen[26] = 0xa9; |
||
123 | KeyGen[27] = 0xfe; |
||
124 | KeyGen[28] = 0x64; |
||
125 | KeyGen[29] = 0x53; |
||
126 | KeyGen[30] = 0x69; |
||
127 | KeyGen[31] = 0x7a; |
||
128 | } |
||
129 | |||
130 | PDFlib::~PDFlib() |
||
131 | { |
||
132 | } |
||
133 | |||
134 | QString PDFlib::FToStr(float c) |
||
135 | { |
||
136 | QString cc; |
||
137 | return cc.setNum(c); |
||
138 | } |
||
139 | |||
140 | QString PDFlib::IToStr(int c) |
||
141 | { |
||
142 | QString cc; |
||
143 | return cc.setNum(c); |
||
144 | } |
||
145 | |||
146 | void PDFlib::PutDoc(QString in) |
||
147 | { |
||
148 | QTextStream t(&Spool); |
||
149 | t.writeRawBytes(in, in.length()); |
||
150 | Dokument += in.length(); |
||
151 | } |
||
152 | |||
153 | void PDFlib::PutPage(QString in) |
||
154 | { |
||
155 | Inhalt += in; |
||
156 | } |
||
157 | |||
158 | void PDFlib::StartObj(int nr) |
||
159 | { |
||
160 | XRef.append(Dokument); |
||
161 | PutDoc(IToStr(nr)+ " 0 obj\n"); |
||
162 | } |
||
163 | |||
164 | QString PDFlib::PDFEncode(QString in) |
||
165 | { |
||
166 | QString tmp = ""; |
||
167 | QString cc; |
||
168 | for (uint d = 0; d < in.length(); ++d) |
||
169 | { |
||
170 | cc = in.at(d); |
||
171 | if ((cc == "(") || (cc == ")") || (cc == "\\")) |
||
172 | tmp += "\\"; |
||
173 | tmp += cc; |
||
174 | } |
||
175 | return tmp; |
||
176 | } |
||
177 | |||
178 | QString PDFlib::EncStream(QString *in, int ObjNum) |
||
179 | { |
||
180 | rc4_context_t rc4; |
||
181 | QString tmp = ""; |
||
182 | int dlen = 0; |
||
183 | if (Options->Encrypt) |
||
184 | { |
||
185 | if (in->length() < 1) |
||
186 | return ""; |
||
187 | tmp = *in; |
||
188 | QByteArray us(tmp.length()); |
||
189 | QByteArray ou(tmp.length()); |
||
190 | for (uint a = 0; a < tmp.length(); ++a) |
||
191 | { |
||
192 | us[a] = uchar(QChar(tmp.at(a))); |
||
193 | } |
||
194 | QByteArray data(10); |
||
195 | if (KeyLen > 5) |
||
196 | { |
||
197 | data.resize(21); |
||
198 | } |
||
199 | for (int cd = 0; cd < KeyLen; ++cd) |
||
200 | { |
||
201 | data[cd] = EncryKey[cd]; |
||
202 | dlen++; |
||
203 | } |
||
204 | data[dlen++] = ObjNum; |
||
205 | data[dlen++] = ObjNum >> 8; |
||
206 | data[dlen++] = ObjNum >> 16; |
||
207 | data[dlen++] = 0; |
||
208 | data[dlen++] = 0; |
||
209 | QByteArray step1(16); |
||
210 | step1 = ComputeMD5Sum(&data); |
||
211 | rc4_init(&rc4, (uchar*)step1.data(), QMIN(KeyLen+5, 16)); |
||
212 | rc4_encrypt(&rc4, (uchar*)us.data(), (uchar*)ou.data(), tmp.length()); |
||
213 | QString uk = ""; |
||
214 | for (uint cl = 0; cl < tmp.length(); ++cl) |
||
215 | { |
||
216 | uk += ou[cl]; |
||
217 | } |
||
218 | tmp = uk; |
||
219 | } |
||
220 | else |
||
221 | tmp = *in; |
||
222 | return tmp; |
||
223 | } |
||
224 | |||
225 | QString PDFlib::EncString(QString in, int ObjNum) |
||
226 | { |
||
227 | rc4_context_t rc4; |
||
228 | QString tmp; |
||
229 | int dlen = 0; |
||
230 | if (Options->Encrypt) |
||
231 | { |
||
232 | if (in.length() < 3) |
||
233 | return "<>"; |
||
234 | tmp = in.mid(1, in.length()-2); |
||
235 | QByteArray us(tmp.length()); |
||
236 | QByteArray ou(tmp.length()); |
||
237 | for (uint a = 0; a < tmp.length(); ++a) |
||
238 | { |
||
239 | us[a] = uchar(QChar(tmp.at(a))); |
||
240 | } |
||
241 | QByteArray data(10); |
||
242 | if (KeyLen > 5) |
||
243 | { |
||
244 | data.resize(21); |
||
245 | } |
||
246 | for (int cd = 0; cd < KeyLen; ++cd) |
||
247 | { |
||
248 | data[cd] = EncryKey[cd]; |
||
249 | dlen++; |
||
250 | } |
||
251 | data[dlen++] = ObjNum; |
||
252 | data[dlen++] = ObjNum >> 8; |
||
253 | data[dlen++] = ObjNum >> 16; |
||
254 | data[dlen++] = 0; |
||
255 | data[dlen++] = 0; |
||
256 | QByteArray step1(16); |
||
257 | step1 = ComputeMD5Sum(&data); |
||
258 | rc4_init(&rc4, (uchar*)step1.data(), QMIN(KeyLen+5, 16)); |
||
259 | rc4_encrypt(&rc4, (uchar*)us.data(), (uchar*)ou.data(), tmp.length()); |
||
260 | QString uk = ""; |
||
261 | for (uint cl = 0; cl < tmp.length(); ++cl) |
||
262 | { |
||
263 | uk += ou[cl]; |
||
264 | } |
||
265 | tmp = "<"+String2Hex(&uk, false)+">"; |
||
266 | } |
||
267 | else |
||
268 | tmp = in; |
||
269 | return tmp; |
||
270 | } |
||
271 | |||
272 | QString PDFlib::FitKey(QString pass) |
||
273 | { |
||
274 | QString pw = pass; |
||
275 | if (pw.length() < 32) |
||
276 | { |
||
277 | uint l = pw.length(); |
||
278 | for (uint a = 0; a < 32 - l; ++a) |
||
279 | { |
||
280 | pw.append(KeyGen[a]); |
||
281 | } |
||
282 | } |
||
283 | else |
||
284 | pw = pw.left(32); |
||
285 | return pw; |
||
286 | } |
||
287 | |||
288 | void PDFlib::CalcOwnerKey(QString Owner, QString User) |
||
289 | { |
||
290 | rc4_context_t rc4; |
||
291 | QString pw = User; |
||
292 | QString pw2; |
||
293 | pw2 = Owner; |
||
294 | if (pw2 == "") |
||
295 | pw2 = User; |
||
296 | pw = FitKey(pw); |
||
297 | pw2 = FitKey(pw2); |
||
298 | QByteArray step1(16); |
||
299 | step1 = ComputeMD5(pw2); |
||
300 | if (KeyLen > 5) |
||
301 | { |
||
302 | for (int kl = 0; kl < 50; ++kl) |
||
303 | { |
||
304 | step1 = ComputeMD5Sum(&step1); |
||
305 | } |
||
306 | } |
||
307 | QByteArray us(32); |
||
308 | QByteArray enk(16); |
||
309 | if (KeyLen > 5) |
||
310 | { |
||
311 | for (uint a2 = 0; a2 < 32; ++a2) |
||
312 | { |
||
313 | OwnerKey[a2] = uchar(QChar(pw.at(a2))); |
||
314 | } |
||
315 | for (int rl = 0; rl < 20; rl++) |
||
316 | { |
||
317 | for (int j = 0; j < 16; j ++) |
||
318 | { |
||
319 | enk[j] = step1[j] ^ rl; |
||
320 | } |
||
321 | rc4_init(&rc4, (uchar*)enk.data(), 16); |
||
322 | rc4_encrypt(&rc4, (uchar*)OwnerKey.data(), (uchar*)OwnerKey.data(), 32); |
||
323 | } |
||
324 | } |
||
325 | else |
||
326 | { |
||
327 | for (uint a = 0; a < 32; ++a) |
||
328 | { |
||
329 | us[a] = uchar(QChar(pw.at(a))); |
||
330 | } |
||
331 | rc4_init(&rc4, (uchar*)step1.data(), 5); |
||
332 | rc4_encrypt(&rc4, (uchar*)us.data(), (uchar*)OwnerKey.data(), 32); |
||
333 | } |
||
334 | return; |
||
335 | } |
||
336 | |||
337 | void PDFlib::CalcUserKey(QString User, int Permission) |
||
338 | { |
||
339 | rc4_context_t rc4; |
||
340 | QString pw = User; |
||
341 | pw = FitKey(pw); |
||
342 | QByteArray step1(16); |
||
343 | QByteArray perm(4); |
||
344 | uint perm_value = (uint)Permission; |
||
345 | perm[0] = perm_value; |
||
346 | perm[1] = perm_value >> 8; |
||
347 | perm[2] = perm_value >> 16; |
||
348 | perm[3] = perm_value >> 24; |
||
349 | for (uint a = 0; a < 32; ++a) |
||
350 | { |
||
351 | pw += OwnerKey[a]; |
||
352 | } |
||
353 | for (uint a1 = 0; a1 < 4; ++a1) |
||
354 | { |
||
355 | pw += perm[a1]; |
||
356 | } |
||
357 | for (uint a3 = 0; a3 < 16; ++a3) |
||
358 | { |
||
359 | pw += FileID[a3]; |
||
360 | } |
||
361 | step1 = ComputeMD5(pw); |
||
362 | if (KeyLen > 5) |
||
363 | { |
||
364 | for (int kl = 0; kl < 50; ++kl) |
||
365 | { |
||
366 | step1 = ComputeMD5Sum(&step1); |
||
367 | } |
||
368 | EncryKey.resize(16); |
||
369 | } |
||
370 | for (int a2 = 0; a2 < KeyLen; ++a2) |
||
371 | { |
||
372 | EncryKey[a2] = step1[a2]; |
||
373 | } |
||
374 | if (KeyLen > 5) |
||
375 | { |
||
376 | QString pr2 = ""; |
||
377 | for (int kl3 = 0; kl3 < 32; ++kl3) |
||
378 | { |
||
379 | pr2 += KeyGen[kl3]; |
||
380 | } |
||
381 | for (uint a4 = 0; a4 < 16; ++a4) |
||
382 | { |
||
383 | pr2 += FileID[a4]; |
||
384 | } |
||
385 | step1 = ComputeMD5(pr2); |
||
386 | QByteArray enk(16); |
||
387 | for (uint a3 = 0; a3 < 16; ++a3) |
||
388 | { |
||
389 | UserKey[a3] = step1[a3]; |
||
390 | } |
||
391 | for (int rl = 0; rl < 20; rl++) |
||
392 | { |
||
393 | for (int j = 0; j < 16; j ++) |
||
394 | { |
||
395 | enk[j] = EncryKey[j] ^ rl; |
||
396 | } |
||
397 | rc4_init(&rc4, (uchar*)enk.data(), 16); |
||
398 | rc4_encrypt(&rc4, (uchar*)UserKey.data(), (uchar*)UserKey.data(), 16); |
||
399 | } |
||
400 | } |
||
401 | else |
||
402 | { |
||
403 | rc4_init(&rc4, (uchar*)step1.data(), 5); |
||
404 | rc4_encrypt(&rc4, (uchar*)KeyGen.data(), (uchar*)UserKey.data(), 32); |
||
405 | } |
||
406 | return; |
||
407 | } |
||
408 | |||
409 | QByteArray PDFlib::ComputeMD5(QString in) |
||
410 | { |
||
411 | QByteArray TBytes(in.length()); |
||
412 | for (uint a = 0; a < in.length(); ++a) |
||
413 | { |
||
414 | TBytes[a] = uchar(QChar(in.at(a))); |
||
415 | } |
||
416 | return ComputeMD5Sum(&TBytes); |
||
417 | } |
||
418 | |||
419 | bool PDFlib::PDF_Begin_Doc(QString fn, ScribusDoc *docu, ScribusView *vie, PDFOpt *opts, SCFonts &AllFonts, QMap<QString,QFont> DocFonts, BookMView* vi) |
||
420 | { |
||
421 | QString tmp; |
||
422 | QString ok = ""; |
||
423 | QString uk = ""; |
||
424 | QFileInfo fd; |
||
425 | int a; |
||
426 | Spool.setName(fn); |
||
427 | if (!Spool.open(IO_WriteOnly)) |
||
428 | return false; |
||
429 | doc = docu; |
||
430 | view = vie; |
||
431 | Bvie = vi; |
||
432 | Options = opts; |
||
433 | UsedFontsP.clear(); |
||
434 | if (Options->Articles) |
||
435 | ObjCounter = 9; |
||
436 | else |
||
437 | ObjCounter = 8; |
||
438 | if (Options->Version == 12) |
||
439 | { |
||
440 | PutDoc("%PDF-1.3\n"); |
||
441 | ObjCounter++; |
||
442 | } |
||
443 | if (Options->Version == 13) |
||
444 | PutDoc("%PDF-1.3\n"); |
||
445 | if (Options->Version == 14) |
||
446 | PutDoc("%PDF-1.4\n"); |
||
447 | PutDoc("%"+QString(QChar(199))+QString(QChar(236))+QString(QChar(143))+QString(QChar(162))+"\n"); |
||
448 | StartObj(1); |
||
449 | 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"); |
||
450 | if (Options->Articles) |
||
451 | PutDoc("/Threads 8 0 R\n"); |
||
452 | if (Options->Version == 12) |
||
453 | PutDoc("/OutputIntents [ "+IToStr(ObjCounter-1)+" 0 R ]\n"); |
||
454 | PutDoc("/ViewerPreferences << /PageDirection "); |
||
455 | if (Options->Binding == 0) |
||
456 | PutDoc("/L2R"); |
||
457 | else |
||
458 | PutDoc("/R2L"); |
||
459 | PutDoc(" >>\n>>\nendobj\n"); |
||
460 | QString IDg = Datum; |
||
461 | IDg += Options->Datei; |
||
462 | IDg += "Scribus "+QString(VERSION); |
||
463 | IDg += "Libpdf for Scribus v0.6"; |
||
464 | IDg += doc->DocTitel; |
||
465 | IDg += doc->DocAutor; |
||
466 | IDg += "/False"; |
||
467 | FileID = ComputeMD5(IDg); |
||
468 | if (Options->Encrypt) |
||
469 | { |
||
470 | if (Options->Version == 14) |
||
471 | KeyLen = 16; |
||
472 | else |
||
473 | KeyLen = 5; |
||
474 | CalcOwnerKey(Options->PassOwner, Options->PassUser); |
||
475 | CalcUserKey(Options->PassUser, Options->Permissions); |
||
476 | for (uint cl2 = 0; cl2 < 32; ++cl2) |
||
477 | { |
||
478 | ok += OwnerKey[cl2]; |
||
479 | } |
||
480 | if (KeyLen > 5) |
||
481 | { |
||
482 | for (uint cl3 = 0; cl3 < 16; ++cl3) |
||
483 | { |
||
484 | uk += UserKey[cl3]; |
||
485 | } |
||
486 | for (uint cl3r = 0; cl3r < 16; ++cl3r) |
||
487 | { |
||
488 | uk += KeyGen[cl3r]; |
||
489 | } |
||
490 | } |
||
491 | else |
||
492 | { |
||
493 | for (uint cl = 0; cl < 32; ++cl) |
||
494 | { |
||
495 | uk += UserKey[cl]; |
||
496 | } |
||
497 | } |
||
498 | } |
||
499 | QDate d = QDate::currentDate(); |
||
500 | Datum = "D:"; |
||
501 | tmp.sprintf("%4d", d.year()); |
||
502 | tmp.replace(QRegExp(" "), "0"); |
||
503 | Datum += tmp; |
||
504 | tmp.sprintf("%2d", d.month()); |
||
505 | tmp.replace(QRegExp(" "), "0"); |
||
506 | Datum += tmp; |
||
507 | tmp.sprintf("%2d", d.day()); |
||
508 | tmp.replace(QRegExp(" "), "0"); |
||
509 | Datum += tmp; |
||
510 | QTime t = QTime::currentTime(); |
||
511 | tmp = t.toString(); |
||
512 | tmp.replace(QRegExp(":"), ""); |
||
513 | Datum += tmp; |
||
514 | StartObj(2); |
||
515 | PutDoc("<<\n/Creator "+EncString("(Scribus "+QString(VERSION)+")",2)+"\n"); |
||
516 | PutDoc("/Producer "+EncString("(Libpdf for Scribus v0.6)",2)+"\n"); |
||
517 | PutDoc("/Title "+EncString("("+doc->DocTitel+")",2)+"\n"); |
||
518 | PutDoc("/Author "+EncString("("+doc->DocAutor+")",2)+"\n"); |
||
519 | PutDoc("/CreationDate "+EncString("("+Datum+")",2)+"\n"); |
||
520 | PutDoc("/ModDate "+EncString("("+Datum+")",2)+"\n"); |
||
521 | if (Options->Version == 12) |
||
522 | PutDoc("/GTS_PDFXVersion (PDF/X-3:2002)\n"); |
||
523 | PutDoc("/Trapped /False\n>>\nendobj\n"); |
||
524 | XRef.append(Dokument); |
||
525 | XRef.append(Dokument); |
||
526 | XRef.append(Dokument); |
||
527 | XRef.append(Dokument); |
||
528 | XRef.append(Dokument); |
||
529 | if (Options->Articles) |
||
530 | XRef.append(Dokument); |
||
531 | if (Options->Version == 12) |
||
532 | XRef.append(Dokument); |
||
533 | if (Options->Encrypt) |
||
534 | { |
||
535 | StartObj(ObjCounter); |
||
536 | Encrypt = ObjCounter; |
||
537 | ObjCounter++; |
||
538 | PutDoc("<<\n/Filter /Standard\n"); |
||
539 | if (KeyLen > 5) |
||
540 | PutDoc("/R 3\n/V 2\n/Length 128\n"); |
||
541 | else |
||
542 | PutDoc("/R 2\n/V 1\n"); |
||
543 | PutDoc("/O <"+String2Hex(&ok)+">\n"); |
||
544 | PutDoc("/U <"+String2Hex(&uk)+">\n"); |
||
545 | PutDoc("/P "+IToStr(Options->Permissions)+"\n>>\nendobj\n"); |
||
546 | } |
||
547 | RealFonts = DocFonts; |
||
548 | QMap<QString,QFont> ReallyUsed; |
||
549 | ReallyUsed.clear(); |
||
550 | for (uint c=0; c<view->MasterPages.count(); ++c) |
||
551 | { |
||
552 | for (uint d=0; d<view->MasterPages.at(c)->Items.count(); ++d) |
||
553 | { |
||
554 | if ((view->MasterPages.at(c)->Items.at(d)->PType == 4) || (view->MasterPages.at(c)->Items.at(d)->PType == 8)) |
||
555 | { |
||
556 | for (uint e=0; e<view->MasterPages.at(c)->Items.at(d)->Ptext.count(); ++e) |
||
557 | { |
||
558 | ReallyUsed.insert(view->MasterPages.at(c)->Items.at(d)->Ptext.at(e)->cfont, DocFonts[view->MasterPages.at(c)->Items.at(d)->Ptext.at(e)->cfont]); |
||
559 | } |
||
560 | } |
||
561 | } |
||
562 | } |
||
563 | for (uint c=0; c<view->Pages.count(); ++c) |
||
564 | { |
||
565 | for (uint d=0; d<view->Pages.at(c)->Items.count(); ++d) |
||
566 | { |
||
567 | if ((view->Pages.at(c)->Items.at(d)->PType == 4) || (view->Pages.at(c)->Items.at(d)->PType == 8)) |
||
568 | { |
||
569 | for (uint e=0; e<view->Pages.at(c)->Items.at(d)->Ptext.count(); ++e) |
||
570 | { |
||
571 | ReallyUsed.insert(view->Pages.at(c)->Items.at(d)->Ptext.at(e)->cfont, DocFonts[view->Pages.at(c)->Items.at(d)->Ptext.at(e)->cfont]); |
||
572 | } |
||
573 | } |
||
574 | } |
||
575 | } |
||
576 | QMap<QString,QFont>::Iterator it; |
||
577 | a = 0; |
||
578 | for (it = ReallyUsed.begin(); it != ReallyUsed.end(); ++it) |
||
579 | // for (it = DocFonts.begin(); it != DocFonts.end(); ++it) |
||
580 | { |
||
581 | fd = QFileInfo(AllFonts[it.key()]->Datei); |
||
582 | UsedFontsP.insert(it.key(), "/Fo"+IToStr(a)); |
||
583 | QString Encod = AllFonts[it.key()]->FontEnc; |
||
584 | if (AllFonts[it.key()]->HasMetrics) |
||
585 | { |
||
586 | if ((fd.extension(false).lower() == "pfb") && (Options->EmbedList.contains(it.key()))) |
||
587 | { |
||
588 | QString fon = ""; |
||
589 | StartObj(ObjCounter); |
||
590 | QFile f(AllFonts[it.key()]->Datei); |
||
591 | QByteArray bb(f.size()); |
||
592 | if (f.open(IO_ReadOnly)) |
||
593 | { |
||
594 | f.readBlock(bb.data(), f.size()); |
||
595 | f.close(); |
||
596 | } |
||
597 | uint posi; |
||
598 | for (posi = 6; posi < bb.size(); ++posi) |
||
599 | { |
||
600 | if ((bb[posi] == char(0x80)) && (static_cast<int>(bb[posi+1]) == 2)) |
||
601 | break; |
||
602 | fon += bb[posi]; |
||
603 | } |
||
604 | int len1 = fon.length(); |
||
605 | uint ulen; |
||
606 | ulen = bb[posi+2] & 0xff; |
||
607 | ulen |= (bb[posi+3] << 8) & 0xff00; |
||
608 | ulen |= (bb[posi+4] << 16) & 0xff0000; |
||
609 | ulen |= (bb[posi+5] << 24) & 0xff000000; |
||
610 | if (ulen > bb.size()) |
||
611 | ulen = bb.size()-7; |
||
612 | posi += 6; |
||
613 | for (uint j = 0; j < ulen; ++j) |
||
614 | { |
||
615 | fon += bb[posi]; |
||
616 | posi++; |
||
617 | } |
||
618 | posi += 6; |
||
619 | int len2 = fon.length()-len1; |
||
620 | for (uint j = posi; j < bb.size(); ++j) |
||
621 | { |
||
622 | if ((bb[j] == char(0x80)) && (static_cast<int>(bb[j+1]) == 3)) |
||
623 | break; |
||
624 | if(bb[j]=='\r') |
||
625 | fon +="\n"; |
||
626 | else |
||
627 | fon += bb[j]; |
||
628 | } |
||
629 | int len3 = fon.length()-len2-len1; |
||
630 | if ((Options->Compress) && (CompAvail)) |
||
631 | fon = CompressStr(&fon); |
||
632 | PutDoc("<<\n/Length "+IToStr(fon.length()+1)+"\n"); |
||
633 | PutDoc("/Length1 "+IToStr(len1)+"\n"); |
||
634 | PutDoc("/Length2 "+IToStr(len2)+"\n"); |
||
635 | PutDoc("/Length3 "+IToStr(len3)+"\n"); |
||
636 | if ((Options->Compress) && (CompAvail)) |
||
637 | PutDoc("/Filter /FlateDecode\n"); |
||
638 | PutDoc(">>\nstream\n"+EncStream(&fon,ObjCounter)+"\nendstream\nendobj\n"); |
||
639 | ObjCounter++; |
||
640 | } |
||
641 | if ((fd.extension(false).lower() == "pfa") && (Options->EmbedList.contains(it.key()))) |
||
642 | { |
||
643 | QString fon = ""; |
||
644 | QString fon2 = ""; |
||
645 | QString tm = ""; |
||
646 | uint value; |
||
647 | bool ok = true; |
||
648 | StartObj(ObjCounter); |
||
649 | loadText(AllFonts[it.key()]->Datei, &fon); |
||
650 | int len1 = fon.find("eexec")+5; |
||
651 | fon2 = fon.left(len1)+"\n"; |
||
652 | int len2 = fon.find("0000000000000000000000000"); |
||
653 | if (len2 == -1) |
||
654 | len2 = fon.length()+1; |
||
655 | int count = 0; |
||
656 | for (int xx = len1; xx < len2-1; ++xx) |
||
657 | { |
||
658 | tm = fon.at(xx); |
||
659 | if (tm == QChar(13)) |
||
660 | continue; |
||
661 | if (tm == QChar(10)) |
||
662 | continue; |
||
663 | xx++; |
||
664 | count++; |
||
665 | tm += fon.at(xx); |
||
666 | value = tm.toUInt(&ok, 16); |
||
667 | fon2 += QChar(value); |
||
668 | } |
||
669 | fon2 += fon.mid(len2); |
||
670 | if ((Options->Compress) && (CompAvail)) |
||
671 | fon2 = CompressStr(&fon2); |
||
672 | PutDoc("<<\n/Length "+IToStr(fon2.length()+1)+"\n"); |
||
673 | PutDoc("/Length1 "+IToStr(len1+1)+"\n"); |
||
674 | PutDoc("/Length2 "+IToStr(count)+"\n"); |
||
675 | if (static_cast<int>(fon.length()-len2) == -1) |
||
676 | PutDoc("/Length3 0\n"); |
||
677 | else |
||
678 | PutDoc("/Length3 "+IToStr(fon.length()-len2)+"\n"); |
||
679 | if ((Options->Compress) && (CompAvail)) |
||
680 | PutDoc("/Filter /FlateDecode\n"); |
||
681 | PutDoc(">>\nstream\n"+EncStream(&fon2, ObjCounter)+"\nendstream\nendobj\n"); |
||
682 | ObjCounter++; |
||
683 | } |
||
684 | if ((fd.extension(false).lower() == "ttf") && (Options->EmbedList.contains(it.key()))) |
||
685 | { |
||
686 | QString fon = ""; |
||
687 | StartObj(ObjCounter); |
||
688 | QFile f(AllFonts[it.key()]->Datei); |
||
689 | QByteArray bb(f.size()); |
||
690 | if (f.open(IO_ReadOnly)) |
||
691 | { |
||
692 | f.readBlock(bb.data(), f.size()); |
||
693 | f.close(); |
||
694 | } |
||
695 | uint posi; |
||
696 | for (posi = 0; posi < bb.size(); ++posi) |
||
697 | { |
||
698 | fon += bb[posi]; |
||
699 | } |
||
700 | int len = fon.length(); |
||
701 | if ((Options->Compress) && (CompAvail)) |
||
702 | fon = CompressStr(&fon); |
||
703 | PutDoc("<<\n/Length "+IToStr(fon.length()+1)+"\n"); |
||
704 | PutDoc("/Length1 "+IToStr(len)+"\n"); |
||
705 | if ((Options->Compress) && (CompAvail)) |
||
706 | PutDoc("/Filter /FlateDecode\n"); |
||
707 | PutDoc(">>\nstream\n"+EncStream(&fon, ObjCounter)+"\nendstream\nendobj\n"); |
||
708 | ObjCounter++; |
||
709 | } |
||
710 | StartObj(ObjCounter); |
||
711 | PutDoc("<<\n/Type /FontDescriptor\n"); |
||
712 | PutDoc("/FontName /"+AllFonts[it.key()]->RealName()+"\n"); |
||
713 | PutDoc("/FontBBox [ "+AllFonts[it.key()]->FontBBox+" ]\n"); |
||
714 | PutDoc("/Flags "); |
||
715 | QFontInfo fo = QFontInfo(it.data()); |
||
716 | int pfl = 0; |
||
717 | if (AllFonts[it.key()]->IsFixedPitch) |
||
718 | pfl = pfl ^ 1; |
||
719 | if (fo.italic()) |
||
720 | pfl = pfl ^ 64; |
||
721 | if (Encod == "adobe-fontspecific") |
||
722 | pfl = pfl ^ 4; |
||
723 | else |
||
724 | pfl = pfl ^ 32; |
||
725 | PutDoc(IToStr(pfl)+"\n"); |
||
726 | PutDoc("/Ascent "+AllFonts[it.key()]->Ascent+"\n"); |
||
727 | PutDoc("/Descent "+AllFonts[it.key()]->Descender+"\n"); |
||
728 | PutDoc("/CapHeight "+AllFonts[it.key()]->CapHeight+"\n"); |
||
729 | PutDoc("/ItalicAngle "+AllFonts[it.key()]->ItalicAngle+"\n"); |
||
730 | PutDoc("/StemV "+AllFonts[it.key()]->StdVW+"\n"); |
||
731 | if ((fd.extension(false).lower() == "ttf") && (Options->EmbedList.contains(it.key()))) |
||
732 | PutDoc("/FontFile2 "+IToStr(ObjCounter-1)+" 0 R\n"); |
||
733 | if ((fd.extension(false).lower() == "pfb") && (Options->EmbedList.contains(it.key()))) |
||
734 | PutDoc("/FontFile "+IToStr(ObjCounter-1)+" 0 R\n"); |
||
735 | if ((fd.extension(false).lower() == "pfa") && (Options->EmbedList.contains(it.key()))) |
||
736 | PutDoc("/FontFile "+IToStr(ObjCounter-1)+" 0 R\n"); |
||
737 | PutDoc(">>\nendobj\n"); |
||
738 | ObjCounter++; |
||
739 | #ifndef HAVE_FREETYPE |
||
740 | StartObj(ObjCounter); |
||
741 | PutDoc("[ "); |
||
742 | for (int ww = 0; ww < 256; ++ww) |
||
743 | { |
||
744 | PutDoc(IToStr(static_cast<int>(AllFonts[it.key()]->CharWidth[ww]*1000))+" "); |
||
745 | } |
||
746 | PutDoc("]\nendobj\n"); |
||
747 | ObjCounter++; |
||
748 | #endif |
||
749 | } |
||
750 | #ifdef HAVE_FREETYPE |
||
751 | GListeInd gl; |
||
752 | GlyIndex(&gl, AllFonts[it.key()]->Datei); |
||
753 | GlyphsIdxOfFont.insert(it.key(), gl); |
||
754 | uint FontDes = ObjCounter - 1; |
||
755 | GListeInd::Iterator itg; |
||
756 | itg = gl.begin(); |
||
757 | GListeInd::Iterator itg2; |
||
758 | itg2 = gl.begin(); |
||
759 | uint Fcc = gl.count() / 224; |
||
760 | if ((gl.count() % 224) != 0) |
||
761 | Fcc += 1; |
||
762 | for (uint Fc = 0; Fc < Fcc; ++Fc) |
||
763 | { |
||
764 | StartObj(ObjCounter); |
||
765 | int chCount = 31; |
||
766 | 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 "); |
||
767 | for (int ww = 31; ww < 256; ++ww) |
||
768 | { |
||
769 | PutDoc(IToStr(static_cast<int>(AllFonts[it.key()]->CharWidth[itg.key()]*1000))+" "); |
||
770 | if (itg == gl.end()) |
||
771 | break; |
||
772 | ++itg; |
||
773 | chCount++; |
||
774 | } |
||
775 | PutDoc("]\nendobj\n"); |
||
776 | ObjCounter++; |
||
777 | StartObj(ObjCounter); |
||
778 | ObjCounter++; |
||
779 | PutDoc("<< /Type /Encoding\n/Differences [ 32\n"); |
||
780 | int crc = 0; |
||
781 | for (int ww2 = 32; ww2 < 256; ++ww2) |
||
782 | { |
||
783 | PutDoc(itg2.data().Name+" "); |
||
784 | if (itg2 == gl.end()) |
||
785 | break; |
||
786 | ++itg2; |
||
787 | crc++; |
||
788 | if (crc > 8) |
||
789 | { |
||
790 | PutDoc("\n"); |
||
791 | crc = 0; |
||
792 | } |
||
793 | } |
||
794 | PutDoc("]\n>>\nendobj\n"); |
||
795 | StartObj(ObjCounter); |
||
796 | PutDoc("<<\n/Type /Font\n/Subtype "); |
||
797 | if (fd.extension(false).lower() == "ttf") |
||
798 | PutDoc("/TrueType\n"); |
||
799 | else |
||
800 | PutDoc("/Type1\n"); |
||
801 | PutDoc("/Name /Fo"+IToStr(a)+"S"+IToStr(Fc)+"\n"); |
||
802 | PutDoc("/BaseFont /"+AllFonts[it.key()]->RealName()+"\n"); |
||
803 | PutDoc("/FirstChar 0\n"); |
||
804 | PutDoc("/LastChar "+IToStr(chCount-1)+"\n"); |
||
805 | PutDoc("/Widths "+IToStr(ObjCounter-2)+" 0 R\n"); |
||
806 | PutDoc("/Encoding "+IToStr(ObjCounter-1)+" 0 R\n"); |
||
807 | PutDoc("/FontDescriptor "+IToStr(FontDes)+" 0 R\n"); |
||
808 | PutDoc(">>\nendobj\n"); |
||
809 | Seite.FObjects["Fo"+IToStr(a)+"S"+IToStr(Fc)] = ObjCounter; |
||
810 | ObjCounter++; |
||
811 | } |
||
812 | #else |
||
813 | StartObj(ObjCounter); |
||
814 | bool cEnc = false; |
||
815 | PutDoc("<<\n/Type /Font\n/Subtype "); |
||
816 | if (fd.extension(false).lower() == "ttf") |
||
817 | PutDoc("/TrueType\n"); |
||
818 | else |
||
819 | PutDoc("/Type1\n"); |
||
820 | PutDoc("/Name /Fo"+IToStr(a)+"\n"); |
||
821 | if (AllFonts[it.key()]->HasMetrics) |
||
822 | PutDoc("/BaseFont /"+AllFonts[it.key()]->RealName()+"\n"); |
||
823 | else |
||
824 | PutDoc("/BaseFont /Helvetica\n"); |
||
825 | if ((Encod == "iso8859-1") || (Encod == "ascii-0")) // || (Encod == "adobe-fontspecific")) |
||
826 | PutDoc("/Encoding /WinAnsiEncoding\n"); |
||
827 | if ((Encod == "iso8859-2") || (Encod == "iso8859-15") || (Encod == "iso8859-13")) |
||
828 | { |
||
829 | PutDoc("/Encoding "+IToStr(ObjCounter+1)+" 0 R\n"); |
||
830 | cEnc = true; |
||
831 | } |
||
832 | if (AllFonts[it.key()]->HasMetrics) |
||
833 | { |
||
834 | PutDoc("/FirstChar 0\n/LastChar 255\n"); |
||
835 | PutDoc("/Widths "+IToStr(ObjCounter-1)+" 0 R\n"); |
||
836 | PutDoc("/FontDescriptor "+IToStr(ObjCounter-2)+" 0 R\n"); |
||
837 | } |
||
838 | PutDoc(">>\nendobj\n"); |
||
839 | Seite.FObjects["Fo"+IToStr(a)] = ObjCounter; |
||
840 | ObjCounter++; |
||
841 | if (cEnc) |
||
842 | { |
||
843 | StartObj(ObjCounter); |
||
844 | ObjCounter++; |
||
845 | PutDoc("<< /Type /Encoding\n/Differences [\n"); |
||
846 | QString EncVec; |
||
847 | QString Epfad = PREL; |
||
848 | Epfad += "/lib/scribus/"+Encod+".enc"; |
||
849 | loadText(Epfad, &EncVec); |
||
850 | PutDoc(EncVec); |
||
851 | PutDoc("]\n>>\nendobj\n"); |
||
852 | } |
||
853 | #endif |
||
854 | a++; |
||
855 | } |
||
856 | #ifdef HAVE_CMS |
||
857 | if ((CMSuse) && (Options->UseProfiles)) |
||
858 | { |
||
859 | StartObj(ObjCounter); |
||
860 | ObjCounter++; |
||
861 | QString dataP; |
||
862 | struct ICCD dataD; |
||
863 | loadText(InputProfiles[Options->SolidProf], &dataP); |
||
864 | PutDoc("<<\n"); |
||
865 | if ((Options->Compress) && (CompAvail)) |
||
866 | { |
||
867 | PutDoc("/Filter /FlateDecode\n"); |
||
868 | dataP = CompressStr(&dataP); |
||
869 | } |
||
870 | PutDoc("/Length "+IToStr(dataP.length()+1)+"\n"); |
||
871 | PutDoc("/N "+IToStr(Options->SComp)+"\n"); |
||
872 | PutDoc(">>\nstream\n"+EncStream(&dataP, ObjCounter-1)+"\nendstream\nendobj\n"); |
||
873 | StartObj(ObjCounter); |
||
874 | dataD.ResName = ResNam+IToStr(ResCount); |
||
875 | dataD.ICCArray = "[ /ICCBased "+IToStr(ObjCounter-1)+" 0 R ]"; |
||
876 | dataD.ResNum = ObjCounter; |
||
877 | ICCProfiles[Options->SolidProf] = dataD; |
||
878 | PutDoc("[ /ICCBased "+IToStr(ObjCounter-1)+" 0 R ]\n"); |
||
879 | PutDoc("endobj\n"); |
||
880 | ResCount++; |
||
881 | ObjCounter++; |
||
882 | } |
||
883 | #endif |
||
884 | return true; |
||
885 | } |
||
886 | |||
887 | void PDFlib::PDF_TemplatePage(Page* pag) |
||
888 | { |
||
889 | QString tmp; |
||
890 | ActPage = pag; |
||
891 | Inhalt = ""; |
||
892 | Seite.AObjects.clear(); |
||
893 | PDF_ProcessPage(pag, pag->PageNr); |
||
894 | StartObj(ObjCounter); |
||
895 | ObjCounter++; |
||
896 | PutDoc("<<\n/Type /XObject\n/Subtype /Form\n/FormType 1\n"); |
||
897 | PutDoc("/BBox [ 0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+" ]\n"); |
||
898 | PutDoc("/Resources << /ProcSet [/PDF /Text /ImageB /ImageC /ImageI]\n"); |
||
899 | if (Seite.XObjects.count() != 0) |
||
900 | { |
||
901 | PutDoc("/XObject <<\n"); |
||
902 | QMap<QString,int>::Iterator it; |
||
903 | for (it = Seite.XObjects.begin(); it != Seite.XObjects.end(); ++it) |
||
904 | { |
||
905 | PutDoc("/"+it.key()+" "+IToStr(it.data())+" 0 R\n"); |
||
906 | } |
||
907 | PutDoc(">>\n"); |
||
908 | } |
||
909 | if (Seite.FObjects.count() != 0) |
||
910 | { |
||
911 | PutDoc("/Font << \n"); |
||
912 | QMap<QString,int>::Iterator it2; |
||
913 | for (it2 = Seite.FObjects.begin(); it2 != Seite.FObjects.end(); ++it2) |
||
914 | { |
||
915 | PutDoc("/"+it2.key()+" "+IToStr(it2.data())+" 0 R\n"); |
||
916 | } |
||
917 | PutDoc(">>\n"); |
||
918 | } |
||
919 | if (Shadings.count() != 0) |
||
920 | { |
||
921 | PutDoc("/Shading << \n"); |
||
922 | QMap<QString,int>::Iterator it3; |
||
923 | for (it3 = Shadings.begin(); it3 != Shadings.end(); ++it3) |
||
924 | { |
||
925 | PutDoc("/"+it3.key()+" "+IToStr(it3.data())+" 0 R\n"); |
||
926 | } |
||
927 | PutDoc(">>\n"); |
||
928 | } |
||
929 | if (Transpar.count() != 0) |
||
930 | { |
||
931 | PutDoc("/ExtGState << \n"); |
||
932 | QMap<QString,int>::Iterator it3t; |
||
933 | for (it3t = Transpar.begin(); it3t != Transpar.end(); ++it3t) |
||
934 | { |
||
935 | PutDoc("/"+it3t.key()+" "+IToStr(it3t.data())+" 0 R\n"); |
||
936 | } |
||
937 | PutDoc(">>\n"); |
||
938 | } |
||
939 | if (ICCProfiles.count() != 0) |
||
940 | { |
||
941 | PutDoc("/ColorSpace << \n"); |
||
942 | QMap<QString,ICCD>::Iterator it3c; |
||
943 | for (it3c = ICCProfiles.begin(); it3c != ICCProfiles.end(); ++it3c) |
||
944 | { |
||
945 | PutDoc("/"+it3c.data().ResName+" "+IToStr(it3c.data().ResNum)+" 0 R\n"); |
||
946 | } |
||
947 | PutDoc(">>\n"); |
||
948 | } |
||
949 | PutDoc(">>\n"); |
||
950 | if ((Options->Compress) && (CompAvail)) |
||
951 | Inhalt = CompressStr(&Inhalt); |
||
952 | PutDoc("/Length "+IToStr(Inhalt.length()+1)); |
||
953 | if ((Options->Compress) && (CompAvail)) |
||
954 | PutDoc("\n/Filter /FlateDecode"); |
||
955 | PutDoc(" >>\nstream\n"+EncStream(&Inhalt, ObjCounter-1)+"\nendstream\nendobj\n"); |
||
956 | QString name = pag->PageNam.simplifyWhiteSpace().replace( QRegExp("\\s"), "" ); |
||
957 | Seite.XObjects[name] = ObjCounter-1; |
||
958 | } |
||
959 | |||
960 | void PDFlib::PDF_Begin_Page(Page* pag, QPixmap pm) |
||
961 | { |
||
962 | QString tmp; |
||
963 | ActPage = pag; |
||
964 | Inhalt = ""; |
||
965 | Seite.AObjects.clear(); |
||
966 | if (Options->Thumbnails) |
||
967 | { |
||
968 | QImage img = pm.convertToImage(); |
||
969 | QString im = ImageToTxt(&img); |
||
970 | if ((Options->Compress) && (CompAvail)) |
||
971 | im = CompressStr(&im); |
||
972 | StartObj(ObjCounter); |
||
973 | PutDoc("<<\n/Width "+IToStr(img.width())+"\n"); |
||
974 | PutDoc("/Height "+IToStr(img.height())+"\n"); |
||
975 | PutDoc("/ColorSpace /DeviceRGB\n/BitsPerComponent 8\n"); |
||
976 | PutDoc("/Length "+IToStr(im.length()+1)+"\n"); |
||
977 | if ((Options->Compress) && (CompAvail)) |
||
978 | PutDoc("/Filter /FlateDecode\n"); |
||
979 | PutDoc(">>\nstream\n"+EncStream(&im, ObjCounter)+"\nendstream\nendobj\n"); |
||
980 | Seite.Thumb = ObjCounter; |
||
981 | ObjCounter++; |
||
982 | } |
||
983 | } |
||
984 | |||
985 | void PDFlib::PDF_End_Page() |
||
986 | { |
||
987 | uint PgNr = ActPage->PageNr; |
||
988 | Seite.ObjNum = ObjCounter; |
||
989 | WritePDFStream(&Inhalt); |
||
990 | StartObj(ObjCounter); |
||
991 | PutDoc("<<\n/Type /Page\n/Parent 4 0 R\n"); |
||
992 | PutDoc("/MediaBox [0 0 "+FToStr(doc->PageB)+" "+FToStr(doc->PageH)+"]\n"); |
||
993 | PutDoc("/TrimBox ["+FToStr(Options->BleedLeft)+" "+FToStr(Options->BleedBottom)+" "+FToStr(doc->PageB-Options->BleedRight)+" "+FToStr(doc->PageH-Options->BleedTop)+"]\n"); |
||
994 | PutDoc("/Contents "+IToStr(Seite.ObjNum)+" 0 R\n"); |
||
995 | if (Options->Thumbnails) |
||
996 | PutDoc("/Thumb "+IToStr(Seite.Thumb)+" 0 R\n"); |
||
997 | if (Seite.AObjects.count() != 0) |
||
998 | { |
||
999 | PutDoc("/Annots [ "); |
||
1000 | for (uint b = 0; b < Seite.AObjects.count(); ++b) |
||
1001 | { |
||
1002 | PutDoc(IToStr(Seite.AObjects[b])+" 0 R "); |
||
1003 | } |
||
1004 | PutDoc("]\n"); |
||
1005 | } |
||
1006 | if (Options->PresentMode) |
||
1007 | { |
||
1008 | PutDoc("/Dur "+IToStr(Options->PresentVals[PgNr].AnzeigeLen)+"\n"); |
||
1009 | if (Options->PresentVals[PgNr].Effekt != 0) |
||
1010 | { |
||
1011 | PutDoc("/Trans << /Type /Trans\n"); |
||
1012 | PutDoc("/D "+IToStr(Options->PresentVals[PgNr].EffektLen)+"\n"); |
||
1013 | switch (Options->PresentVals[PgNr].Effekt) |
||
1014 | { |
||
1015 | case 1: |
||
1016 | PutDoc("/S /Blinds\n"); |
||
1017 | if (Options->PresentVals[PgNr].Dm == 0) |
||
1018 | PutDoc("/Dm /H\n"); |
||
1019 | else |
||
1020 | PutDoc("/Dm /V\n"); |
||
1021 | break; |
||
1022 | case 2: |
||
1023 | PutDoc("/S /Box\n"); |
||
1024 | if (Options->PresentVals[PgNr].M == 0) |
||
1025 | PutDoc("/M /I\n"); |
||
1026 | else |
||
1027 | PutDoc("/M /O\n"); |
||
1028 | break; |
||
1029 | case 3: |
||
1030 | PutDoc("/S /Dissolve\n"); |
||
1031 | break; |
||
1032 | case 4: |
||
1033 | PutDoc("/S /Glitter\n"); |
||
1034 | PutDoc("/Di "+IToStr(Options->PresentVals[PgNr].Di)+"\n"); |
||
1035 | break; |
||
1036 | case 5: |
||
1037 | PutDoc("/S /Split\n"); |
||
1038 | if (Options->PresentVals[PgNr].Dm == 0) |
||
1039 | PutDoc("/Dm /H\n"); |
||
1040 | else |
||
1041 | PutDoc("/Dm /V\n"); |
||
1042 | if (Options->PresentVals[PgNr].M == 0) |
||
1043 | PutDoc("/M /I\n"); |
||
1044 | else |
||
1045 | PutDoc("/M /O\n"); |
||
1046 | break; |
||
1047 | case 6: |
||
1048 | PutDoc("/S /Wipe\n"); |
||
1049 | PutDoc("/Di "+IToStr(Options->PresentVals[PgNr].Di)+"\n"); |
||
1050 | break; |
||
1051 | } |
||
1052 | PutDoc(">>\n"); |
||
1053 | } |
||
1054 | } |
||
1055 | PutDoc(">>\nendobj\n"); |
||
1056 | PageTree.Count++; |
||
1057 | PageTree.Kids.append(ObjCounter); |
||
1058 | ObjCounter++; |
||
1059 | } |
||
1060 | |||
1061 | void PDFlib::PDF_ProcessPage(Page* pag, uint PNr) |
||
1062 | { |
||
1063 | QString tmp; |
||
1064 | ActPage = pag; |
||
1065 | PageItem* ite; |
||
1066 | int Lnr = 0; |
||
1067 | struct Layer ll; |
||
1068 | ll.Drucken = false; |
||
1069 | ll.LNr = 0; |
||
1070 | QString name = "/"+pag->MPageNam.simplifyWhiteSpace().replace( QRegExp("\\s"), "" ); |
||
1071 | if (pag->MPageNam != "") |
||
1072 | { |
||
1073 | Page* mPage = view->MasterPages.at(view->MasterNames[view->Pages.at(PNr)->MPageNam]); |
||
1074 | if (mPage->Items.count() != 0) |
||
1075 | { |
||
1076 | PutPage("1 0 0 1 0 0 cm\n"); |
||
1077 | PutPage(name+" Do\n"); |
||
1078 | for (uint lam = 0; lam < doc->Layers.count(); ++lam) |
||
1079 | { |
||
1080 | Level2Layer(doc, &ll, Lnr); |
||
1081 | Lnr++; |
||
1082 | if (ll.Drucken) |
||
1083 | { |
||
1084 | for (uint am = 0; am < mPage->Items.count(); ++am) |
||
1085 | { |
||
1086 | ite = mPage->Items.at(am); |
||
1087 | if ((ite->LayerNr != ll.LNr) || (!ite->isPrintable)) |
||
1088 | continue; |
||
1089 | if (ite->PType == 4) |
||
1090 | { |
||
1091 | PutPage("q\n"); |
||
1092 | if ((ite->Transparency != 0) && (Options->Version == 14)) |
||
1093 | PDF_Transparenz(ite); |
||
1094 | if (Options->UseRGB) |
||
1095 | { |
||
1096 | if (ite->Pcolor != "None") |
||
1097 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" rg\n"); |
||
1098 | if (ite->Pcolor2 != "None") |
||
1099 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" RG\n"); |
||
1100 | } |
||
1101 | else |
||
1102 | { |
||
1103 | #ifdef HAVE_CMS |
||
1104 | if ((CMSuse) && (Options->UseProfiles)) |
||
1105 | { |
||
1106 | switch (Options->Intent) |
||
1107 | { |
||
1108 | case 0: |
||
1109 | PutPage("/Perceptual"); |
||
1110 | break; |
||
1111 | case 1: |
||
1112 | PutPage("/RelativeColorimetric"); |
||
1113 | break; |
||
1114 | case 2: |
||
1115 | PutPage("/Saturation"); |
||
1116 | break; |
||
1117 | case 3: |
||
1118 | PutPage("/AbsoluteColorimetric"); |
||
1119 | break; |
||
1120 | } |
||
1121 | PutPage(" ri\n"); |
||
1122 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"); |
||
1123 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"); |
||
1124 | if (ite->Pcolor != "None") |
||
1125 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" scn\n"); |
||
1126 | if (ite->Pcolor2 != "None") |
||
1127 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" SCN\n"); |
||
1128 | } |
||
1129 | else |
||
1130 | { |
||
1131 | #endif |
||
1132 | if (ite->Pcolor != "None") |
||
1133 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" k\n"); |
||
1134 | if (ite->Pcolor2 != "None") |
||
1135 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" K\n"); |
||
1136 | } |
||
1137 | #ifdef HAVE_CMS |
||
1138 | } |
||
1139 | #endif |
||
1140 | PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n"); |
||
1141 | if (ite->Rot != 0) |
||
1142 | { |
||
1143 | float sr = sin(-ite->Rot* 3.1415927 / 180.0); |
||
1144 | float cr = cos(-ite->Rot* 3.1415927 / 180.0); |
||
1145 | if ((cr * cr) < 0.001) |
||
1146 | cr = 0; |
||
1147 | if ((sr * sr) < 0.001) |
||
1148 | sr = 0; |
||
1149 | PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n"); |
||
1150 | } |
||
1151 | if ((ite->Pcolor != "None") || (ite->GrType != 0)) |
||
1152 | { |
||
1153 | if (ite->GrType != 0) |
||
1154 | PDF_Gradient(ite); |
||
1155 | else |
||
1156 | { |
||
1157 | PutPage(SetClipPath(ite)); |
||
1158 | if (ite->Segments.count() != 0) |
||
1159 | PutPage("h\nf*\n"); |
||
1160 | else |
||
1161 | PutPage("h\nf\n"); |
||
1162 | } |
||
1163 | } |
||
1164 | if ((ite->flippedH % 2) != 0) |
||
1165 | PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n"); |
||
1166 | if ((ite->flippedV % 2) != 0) |
||
1167 | PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n"); |
||
1168 | PutPage(setTextSt(ite, PNr)); |
||
1169 | PutPage("Q\n"); |
||
1170 | } |
||
1171 | } |
||
1172 | } |
||
1173 | } |
||
1174 | } |
||
1175 | } |
||
1176 | ll.Drucken = false; |
||
1177 | ll.LNr = 0; |
||
1178 | Lnr = 0; |
||
1179 | for (uint la = 0; la < doc->Layers.count(); ++la) |
||
1180 | { |
||
1181 | Level2Layer(doc, &ll, Lnr); |
||
1182 | if (ll.Drucken) |
||
1183 | { |
||
1184 | for (uint a = 0; a < ActPage->Items.count(); ++a) |
||
1185 | { |
||
1186 | ite = ActPage->Items.at(a); |
||
1187 | if (ite->LayerNr != ll.LNr) |
||
1188 | continue; |
||
1189 | PutPage("q\n"); |
||
1190 | if ((ite->Transparency != 0) && (Options->Version == 14)) |
||
1191 | PDF_Transparenz(ite); |
||
1192 | if ((ite->isBookmark) && (Options->Bookmarks)) |
||
1193 | PDF_Bookmark(ite->BMnr, doc->PageH - ite->Ypos); |
||
1194 | if (!ite->isPrintable) |
||
1195 | { |
||
1196 | PutPage("Q\n"); |
||
1197 | continue; |
||
1198 | } |
||
1199 | if ((ite->PType == 4) && (pag->PageNam != "")) |
||
1200 | { |
||
1201 | PutPage("Q\n"); |
||
1202 | continue; |
||
1203 | } |
||
1204 | if (Options->UseRGB) |
||
1205 | { |
||
1206 | if (ite->Pcolor != "None") |
||
1207 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" rg\n"); |
||
1208 | if (ite->Pcolor2 != "None") |
||
1209 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" RG\n"); |
||
1210 | } |
||
1211 | else |
||
1212 | { |
||
1213 | #ifdef HAVE_CMS |
||
1214 | if ((CMSuse) && (Options->UseProfiles)) |
||
1215 | { |
||
1216 | switch (Options->Intent) |
||
1217 | { |
||
1218 | case 0: |
||
1219 | PutPage("/Perceptual"); |
||
1220 | break; |
||
1221 | case 1: |
||
1222 | PutPage("/RelativeColorimetric"); |
||
1223 | break; |
||
1224 | case 2: |
||
1225 | PutPage("/Saturation"); |
||
1226 | break; |
||
1227 | case 3: |
||
1228 | PutPage("/AbsoluteColorimetric"); |
||
1229 | break; |
||
1230 | } |
||
1231 | PutPage(" ri\n"); |
||
1232 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"); |
||
1233 | PutPage("/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"); |
||
1234 | if (ite->Pcolor != "None") |
||
1235 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" scn\n"); |
||
1236 | if (ite->Pcolor2 != "None") |
||
1237 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" SCN\n"); |
||
1238 | } |
||
1239 | else |
||
1240 | { |
||
1241 | #endif |
||
1242 | if (ite->Pcolor != "None") |
||
1243 | PutPage(SetFarbe(ite->Pcolor, ite->Shade)+" k\n"); |
||
1244 | if (ite->Pcolor2 != "None") |
||
1245 | PutPage(SetFarbe(ite->Pcolor2, ite->Shade2)+" K\n"); |
||
1246 | } |
||
1247 | #ifdef HAVE_CMS |
||
1248 | } |
||
1249 | #endif |
||
1250 | Inhalt += FToStr(ite->Pwidth)+" w\n"; |
||
1251 | QString Dt = FToStr(QMAX(ite->Pwidth, 1)); |
||
1252 | QString Da = FToStr(QMAX(3*ite->Pwidth, 1)); |
||
1253 | switch (ite->PLineArt) |
||
1254 | { |
||
1255 | case Qt::SolidLine: |
||
1256 | PutPage("[] 0 d\n"); |
||
1257 | break; |
||
1258 | case Qt::DashLine: |
||
1259 | PutPage("["+Da+" "+Dt+"] 0 d\n"); |
||
1260 | break; |
||
1261 | case Qt::DotLine: |
||
1262 | PutPage("["+Dt+"] 0 d\n"); |
||
1263 | break; |
||
1264 | case Qt::DashDotLine: |
||
1265 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
1266 | break; |
||
1267 | case Qt::DashDotDotLine: |
||
1268 | PutPage("["+Da+" "+Dt+" "+Dt+" "+Dt+" "+Dt+" "+Dt+"] 0 d\n"); |
||
1269 | break; |
||
1270 | default: |
||
1271 | PutPage("[] 0 d\n"); |
||
1272 | break; |
||
1273 | } |
||
1274 | switch (ite->PLineEnd) |
||
1275 | { |
||
1276 | case Qt::FlatCap: |
||
1277 | PutPage("0 J\n"); |
||
1278 | break; |
||
1279 | case Qt::SquareCap: |
||
1280 | PutPage("2 J\n"); |
||
1281 | break; |
||
1282 | case Qt::RoundCap: |
||
1283 | PutPage("1 J\n"); |
||
1284 | break; |
||
1285 | default: |
||
1286 | PutPage("0 J\n"); |
||
1287 | break; |
||
1288 | } |
||
1289 | switch (ite->PLineJoin) |
||
1290 | { |
||
1291 | case Qt::MiterJoin: |
||
1292 | PutPage("0 j\n"); |
||
1293 | break; |
||
1294 | case Qt::BevelJoin: |
||
1295 | PutPage("2 j\n"); |
||
1296 | break; |
||
1297 | case Qt::RoundJoin: |
||
1298 | PutPage("1 j\n"); |
||
1299 | break; |
||
1300 | default: |
||
1301 | PutPage("0 j\n"); |
||
1302 | break; |
||
1303 | } |
||
1304 | PutPage("1 0 0 1 "+FToStr(ite->Xpos)+" "+FToStr(doc->PageH - ite->Ypos)+" cm\n"); |
||
1305 | if (ite->Rot != 0) |
||
1306 | { |
||
1307 | float sr = sin(-ite->Rot* 3.1415927 / 180.0); |
||
1308 | float cr = cos(-ite->Rot* 3.1415927 / 180.0); |
||
1309 | if ((cr * cr) < 0.001) |
||
1310 | cr = 0; |
||
1311 | if ((sr * sr) < 0.001) |
||
1312 | sr = 0; |
||
1313 | PutPage(FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n"); |
||
1314 | } |
||
1315 | switch (ite->PType) |
||
1316 | { |
||
1317 | case 2: |
||
1318 | if (ite->Pcolor != "None") |
||
1319 | { |
||
1320 | PutPage(SetClipPath(ite)); |
||
1321 | if (ite->Segments.count() != 0) |
||
1322 | PutPage("h\nf*\n"); |
||
1323 | else |
||
1324 | PutPage("h\nf\n"); |
||
1325 | } |
||
1326 | PutPage(SetClipPath(ite)); |
||
1327 | if (ite->Segments.count() != 0) |
||
1328 | PutPage("h\nW*\nn\n"); |
||
1329 | else |
||
1330 | PutPage("h\nW\nn\n"); |
||
9 | Franz | 1331 | PutPage("q\n"); |
3 | paul | 1332 | if ((ite->flippedH % 2) != 0) |
1333 | PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n"); |
||
1334 | if ((ite->flippedV % 2) != 0) |
||
1335 | PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n"); |
||
1336 | if ((ite->PicAvail) && (ite->Pfile != "")) |
||
1337 | { |
||
20 | Franz | 1338 | PDF_Image(ite->InvPict, ite->Pfile, ite->LocalScX, ite->LocalScY, ite->LocalX, -ite->LocalY, false, ite->IProfile, ite->UseEmbedded, ite->IRender); |
3 | paul | 1339 | } |
9 | Franz | 1340 | PutPage("Q\n"); |
1341 | if (ite->Pcolor2 != "None") |
||
1342 | { |
||
1343 | PutPage(SetClipPath(ite)); |
||
1344 | PutPage("h\nS\n"); |
||
1345 | } |
||
3 | paul | 1346 | break; |
1347 | case 4: |
||
1348 | if ((ite->isAnnotation) && (Options->Version != 12)) |
||
1349 | { |
||
1350 | PDF_Annotation(ite, PNr); |
||
1351 | break; |
||
1352 | } |
||
1353 | if ((ite->Pcolor != "None") || (ite->GrType != 0)) |
||
1354 | { |
||
1355 | PutPage(SetClipPath(ite)); |
||
1356 | if (ite->GrType != 0) |
||
1357 | PDF_Gradient(ite); |
||
1358 | else |
||
1359 | { |
||
1360 | if (ite->Segments.count() != 0) |
||
1361 | PutPage("h\nf*\n"); |
||
1362 | else |
||
1363 | PutPage("h\nf\n"); |
||
1364 | } |
||
1365 | } |
||
1366 | if ((ite->flippedH % 2) != 0) |
||
1367 | PutPage("-1 0 0 1 "+FToStr(ite->Width)+" 0 cm\n"); |
||
1368 | if ((ite->flippedV % 2) != 0) |
||
1369 | PutPage("1 0 0 -1 0 "+FToStr(-ite->Height)+" cm\n"); |
||
1370 | PutPage(setTextSt(ite, PNr)); |
||
1371 | break; |
||
1372 | case 5: |
||
1373 | PutPage("0 0 m\n"); |
||
1374 | PutPage(FToStr(ite->Width)+" "+FToStr(-ite->Height)+" l\n"); |
||
1375 | PutPage("S\n"); |
||
1376 | break; |
||
1377 | case 1: |
||
1378 | case 3: |
||
1379 | case 6: |
||
1380 | if (ite->GrType != 0) |
||
1381 | PDF_Gradient(ite); |
||
1382 | else |
||
1383 | { |
||
1384 | if (ite->Pcolor != "None") |
||
1385 | { |
||
1386 | PutPage(SetClipPath(ite)); |
||
1387 | if (ite->Segments.count() != 0) |
||
1388 | PutPage("h\nf*\n"); |
||
1389 | else |
||
1390 | PutPage("h\nf\n"); |
||
1391 | } |
||
1392 | } |
||
1393 | if (ite->Pcolor2 != "None") |
||
1394 | { |
||
1395 | PutPage(SetClipPath(ite)); |
||
1396 | PutPage("h\nS\n"); |
||
1397 | } |
||
1398 | break; |
||
1399 | case 7: |
||
1400 | PutPage(SetClipPath(ite)); |
||
1401 | PutPage("S\n"); |
||
1402 | break; |
||
1403 | case 8: |
||
1404 | if (ite->PoShow) |
||
1405 | { |
||
1406 | if (ite->PoLine.size() > 3) |
||
1407 | { |
||
1408 | PutPage("q\n"); |
||
1409 | PutPage(SetClipPath(ite)); |
||
1410 | PutPage("S\nQ\n"); |
||
1411 | } |
||
1412 | } |
||
1413 | PutPage(setTextSt(ite, PNr)); |
||
1414 | break; |
||
1415 | } |
||
1416 | PutPage("Q\n"); |
||
1417 | } |
||
1418 | } |
||
1419 | Lnr++; |
||
1420 | } |
||
1421 | } |
||
1422 | |||
1423 | QString PDFlib::setTextSt(PageItem *ite, uint PNr) |
||
1424 | { |
||
1425 | struct Pti *hl; |
||
1426 | QString tmp = ""; |
||
1427 | QString tmp2 = ""; |
||
1428 | if (ite->PType == 4) |
||
1429 | tmp += "BT\n0 Tr\n"; |
||
1430 | for (uint d = 0; d < ite->MaxChars; ++d) |
||
1431 | { |
||
1432 | hl = ite->Ptext.at(d); |
||
1433 | if ((hl->ch == QChar(13)) || (hl->ch == QChar(10))) |
||
1434 | continue; |
||
1435 | if (ite->PType == 8) |
||
1436 | { |
||
1437 | tmp += "q\n"; |
||
1438 | tmp += "1 0 0 1 "+FToStr(hl->PtransX)+" "+FToStr(-hl->PtransY)+" cm\n"; |
||
1439 | float sr = sin(-hl->PRot* 3.1415927 / 180.0); |
||
1440 | float cr = cos(-hl->PRot* 3.1415927 / 180.0); |
||
1441 | if ((cr * cr) < 0.001) |
||
1442 | cr = 0; |
||
1443 | if ((sr * sr) < 0.001) |
||
1444 | sr = 0; |
||
1445 | tmp += FToStr(cr)+" "+FToStr(sr)+" "+FToStr(-sr)+" "+FToStr(cr)+" 0 0 cm\n"; |
||
1446 | tmp += "BT\n0 Tr\n"; |
||
1447 | } |
||
1448 | else |
||
1449 | { |
||
1450 | if (hl->yp == 0) |
||
1451 | break; |
||
1452 | } |
||
1453 | int tsz = hl->csize; |
||
1454 | QString chx = hl->ch; |
||
1455 | if (hl->ch == QChar(30)) |
||
1456 | { |
||
1457 | uint zae = 0; |
||
1458 | while (ite->Ptext.at(d+zae)->ch == QChar(30)) |
||
1459 | { |
||
1460 | zae++; |
||
1461 | if (d+zae == ite->MaxChars) |
||
1462 | break; |
||
1463 | } |
||
1464 | QString out="%1"; |
||
1465 | chx = out.arg(PNr+doc->FirstPnum, zae).right(zae).left(1); |
||
1466 | } |
||
1467 | |||
1468 | #ifdef HAVE_FREETYPE |
||
1469 | uint cc = chx[0].unicode(); |
||
1470 | uint idx = 0; |
||
1471 | if (GlyphsIdxOfFont[hl->cfont].contains(cc)) |
||
1472 | idx = GlyphsIdxOfFont[hl->cfont][cc].Code; |
||
1473 | uint idx1 = (idx >> 8) & 0xFF; |
||
1474 | if ((hl->cstyle & 127) == 0) |
||
1475 | tmp += UsedFontsP[hl->cfont]+"S"+IToStr(idx1)+" "+IToStr(hl->csize)+" Tf\n"; |
||
1476 | #else |
||
1477 | if ((hl->cstyle & 127) == 0) |
||
1478 | tmp += UsedFontsP[hl->cfont]+" "+IToStr(hl->csize)+" Tf\n"; |
||
1479 | #endif |
||
1480 | if (hl->cstyle & 64) |
||
1481 | { |
||
1482 | if (chx.upper() != chx) |
||
1483 | { |
||
1484 | tsz = hl->csize * doc->VKapit / 100; |
||
1485 | chx = chx.upper(); |
||
1486 | } |
||
1487 | } |
||
1488 | if (hl->cstyle & 1) |
||
1489 | tsz = hl->csize * doc->VHochSc / 100; |
||
1490 | if (hl->cstyle & 2) |
||
1491 | tsz = hl->csize * doc->VHochSc / 100; |
||
1492 | if ((hl->cstyle & 127) != 0) |
||
1493 | #ifdef HAVE_FREETYPE |
||
1494 | { |
||
1495 | cc = chx[0].unicode(); |
||
1496 | idx = 0; |
||
1497 | if (GlyphsIdxOfFont[hl->cfont].contains(cc)) |
||
1498 | idx = GlyphsIdxOfFont[hl->cfont][cc].Code; |
||
1499 | idx1 = (idx >> 8) & 0xFF; |
||
1500 | tmp += UsedFontsP[hl->cfont]+"S"+IToStr(idx1)+" "+IToStr(tsz)+" Tf\n"; |
||
1501 | } |
||
1502 | #else |
||
1503 | tmp += UsedFontsP[hl->cfont]+" "+IToStr(tsz)+" Tf\n"; |
||
1504 | #endif |
||
1505 | if (hl->ccolor != "None") |
||
1506 | { |
||
1507 | if (Options->UseRGB) |
||
1508 | { |
||
1509 | tmp += SetFarbe(hl->ccolor, hl->cshade)+" rg\n"; |
||
1510 | tmp += SetFarbe(hl->ccolor, hl->cshade)+" RG\n"; |
||
1511 | if ((hl->cstyle & 8) || (hl->cstyle & 16)) |
||
1512 | { |
||
1513 | tmp2 += SetFarbe(hl->ccolor, hl->cshade)+" rg\n"; |
||
1514 | tmp2 += SetFarbe(hl->ccolor, hl->cshade)+" RG\n"; |
||
1515 | } |
||
1516 | } |
||
1517 | else |
||
1518 | { |
||
1519 | #ifdef HAVE_CMS |
||
1520 | if ((CMSuse) && (Options->UseProfiles)) |
||
1521 | { |
||
1522 | tmp += "/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"; |
||
1523 | tmp += "/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"; |
||
1524 | tmp += SetFarbe(hl->ccolor, hl->cshade)+" scn\n"; |
||
1525 | tmp += SetFarbe(hl->ccolor, hl->cshade)+" SCN\n"; |
||
1526 | if ((hl->cstyle & 8) || (hl->cstyle & 16)) |
||
1527 | { |
||
1528 | tmp2 += "/"+ICCProfiles[Options->SolidProf].ResName+" cs\n"; |
||
1529 | tmp2 += "/"+ICCProfiles[Options->SolidProf].ResName+" CS\n"; |
||
1530 | tmp2 += SetFarbe(hl->ccolor, hl->cshade)+" scn\n"; |
||
1531 | tmp2 += SetFarbe(hl->ccolor, hl->cshade)+" SCN\n"; |
||
1532 | } |
||
1533 | } |
||
1534 | else |
||
1535 | { |
||
1536 | #endif |
||
1537 | tmp += SetFarbe(hl->ccolor, hl->cshade)+" k\n"; |
||
1538 | tmp += SetFarbe(hl->ccolor, hl->cshade)+" K\n"; |
||
1539 | if ((hl->cstyle & 8) || (hl->cstyle & 16)) |
||
1540 | { |
||
1541 | tmp2 += SetFarbe(hl->ccolor, hl->cshade)+" k\n"; |
||
1542 | tmp2 += SetFarbe(hl->ccolor, hl->cshade)+" K\n"; |
||
1543 | } |
||
1544 | } |
||
1545 | #ifdef HAVE_CMS |
||
1546 | } |
||
1547 | #endif |
||
1548 | } |
||
1549 | if (ite->Reverse) |
||
1550 | { |
||
1551 | QPainter ph; |
||
1552 | QFont ffo; |
||
1553 | ph.begin(doc->ActPage); |
||
1554 | int chs = hl->csize; |
||
1555 | ite->SetZeichAttr(&ph, &ffo, hl, &chs, &chx); |
||
1556 | float wtr; |
||
1557 | if (d < ite->MaxChars-1) |
||
1558 | wtr = Cwidth(doc, &ph, hl->cfont, chx, chs, ite->Ptext.at(d+1)->ch); |
||
1559 | else |
||
1560 | wtr = Cwidth(doc, &ph, hl->cfont, chx, chs); |
||
1561 | ph.end(); |
||
1562 | tmp += "-1 0 0 1 "+FToStr(hl->xp+wtr)+" "+FToStr(-hl->yp)+" Tm\n"; |
||
1563 | } |
||
1564 | else |
||
1565 | tmp += "1 0 0 1 "+FToStr(hl->xp)+" "+FToStr(-hl->yp)+" Tm\n"; |
||
1566 | |||
1567 | #ifdef HAVE_FREETYPE |
||
1568 | uchar idx2 = idx & 0xFF; |
||
1569 | tmp += "<"+QString(toHex(idx2))+"> Tj\n"; |
||
1570 | #else |
||
1571 | if ((chx == "(") || (chx == ")") || (chx == "\\")) |
||
1572 | chx.prepend("\\"); |
||
1573 | tmp += "("+chx.local8Bit()+") Tj\n"; |
||
1574 | #endif |
||
1575 | if (hl->cstyle & 8) |
||
1576 | { |
||
1577 | QFont tff = RealFonts[hl->cfont]; |
||
1578 | tff.setPointSize(hl->csize); |
||
1579 | QFontMetrics tfm = QFontMetrics(tff); |
||
1580 | int Upos = tfm.underlinePos(); |
||
1581 | int Uwid = tfm.lineWidth(); |
||
1582 | int Ulen = tfm.width(hl->ch)+1; |
||
1583 | tmp2 += IToStr(Uwid)+" w\n"; |
||
1584 | tmp2 += FToStr(hl->xp)+" "+FToStr(-hl->yp-Upos)+" m\n"; |
||
1585 | tmp2 += FToStr(hl->xp+Ulen)+" "+FToStr(-hl->yp-Upos)+" l\n"; |
||
1586 | tmp2 += "S\n"; |
||
1587 | } |
||
1588 | if (hl->cstyle & 16) |
||
1589 | { |
||
1590 | QFont tff = RealFonts[hl->cfont]; |
||
1591 | tff.setPointSize(hl->csize); |
||
1592 | QFontMetrics tfm = QFontMetrics(tff); |
||
1593 | int Upos = tfm.strikeOutPos(); |
||
1594 | int Uwid = tfm.lineWidth(); |
||
1595 | int Ulen = tfm.width(hl->ch)+1; |
||
1596 | tmp2 += IToStr(Uwid)+" w\n"; |
||
1597 | tmp2 += FToStr(hl->xp)+" "+FToStr(-hl->yp+Upos)+" m\n"; |
||
1598 | tmp2 += FToStr(hl->xp+Ulen)+" "+FToStr(-hl->yp+Upos)+" l\n"; |
||
1599 | tmp2 += "S\n"; |
||
1600 | } |
||
1601 | if ((hl->cstyle & 128) && ((ite->Ptext.at(QMIN(d+1, ite->Ptext.count()-1))->yp != hl->yp) && (ite->Ptext.at(QMIN(d+1, ite->Ptext.count()-1))->ch != QChar(13)) || ((ite->NextBox != 0) && (d == ite->Ptext.count()-1)))) |
||
1602 | { |
||
1603 | QPainter ph; |
||
1604 | QFont ffo; |
||
1605 | ph.begin(doc->ActPage); |
||
1606 | int chs = hl->csize; |
||
1607 | ite->SetZeichAttr(&ph, &ffo, hl, &chs, &chx); |
||
1608 | float wtr = Cwidth(doc, &ph, hl->cfont, chx, chs); |
||
1609 | ph.end(); |
||
1610 | tmp += "1 0 0 1 "+FToStr(hl->xp+wtr)+" "+FToStr(-hl->yp)+" Tm\n"; |
||
1611 | #ifdef HAVE_FREETYPE |
||
1612 | chx = "-"; |
||
1613 | cc = chx[0].unicode(); |
||
1614 | idx = 0; |
||
1615 | if (GlyphsIdxOfFont[hl->cfont].contains(cc)) |
||
1616 | idx = GlyphsIdxOfFont[hl->cfont][cc].Code; |
||
1617 | idx2 = idx & 0xFF; |
||
1618 | tmp += "<"+QString(toHex(idx2))+"> Tj\n"; |
||
1619 | #else |
||
1620 | tmp += "(-) Tj\n"; |
||
1621 | #endif |
||
1622 | } |
||
1623 | if (ite->PType == 8) |
||
1624 | { |
||
1625 | tmp += "ET\nQ\n"; |
||
1626 | } |
||
1627 | } |
||
1628 | if (ite->PType == 4) |
||
1629 | tmp += "ET\n"+tmp2; |
||
1630 | return tmp; |
||
1631 | } |
||
1632 | |||
1633 | QString PDFlib::SetFarbe(QString farbe, int Shade) |
||
1634 | { |
||
1635 | QString tmp; |
||
1636 | CMYKColor tmpC; |
||
1637 | int h, s, v, k, sneu; |
||
1638 | tmpC = doc->PageColors[farbe]; |
||
1639 | QColor tmpR; |
||
1640 | if (Options->UseRGB) |
||
1641 | { |
||
1642 | tmpC.getRawRGBColor(&h, &s, &v); |
||
1643 | if ((h == s) && (s == v)) |
||
1644 | { |
||
1645 | tmpR.setRgb(h, s, v); |
||
1646 | tmpR.hsv(&h, &s, &v); |
||
1647 | sneu = 255 - ((255 - v) * Shade / 100); |
||
1648 | tmpR.setHsv(h, s, sneu); |
||
1649 | } |
||
1650 | else |
||
1651 | { |
||
1652 | tmpR.setRgb(h, s, v); |
||
1653 | tmpR.hsv(&h, &s, &v); |
||
1654 | sneu = s * Shade / 100; |
||
1655 | tmpR.setHsv(h, sneu, v); |
||
1656 | } |
||
1657 | tmpR.rgb(&h, &s, &v); |
||
1658 | tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0); |
||
1659 | } |
||
1660 | else |
||
1661 | { |
||
1662 | #ifdef HAVE_CMS |
||
1663 | if ((CMSuse) && (Options->UseProfiles)) |
||
1664 | { |
||
1665 | if (Options->SComp == 3) |
||
1666 | { |
||
1667 | tmpC.getRawRGBColor(&h, &s, &v); |
||
1668 | if ((h == s) && (s == v)) |
||
1669 | { |
||
1670 | tmpR.setRgb(h, s, v); |
||
1671 | tmpR.hsv(&h, &s, &v); |
||
1672 | sneu = 255 - ((255 - v) * Shade / 100); |
||
1673 | tmpR.setHsv(h, s, sneu); |
||
1674 | } |
||
1675 | else |
||
1676 | { |
||
1677 | tmpR.setRgb(h, s, v); |
||
1678 | tmpR.hsv(&h, &s, &v); |
||
1679 | sneu = s * Shade / 100; |
||
1680 | tmpR.setHsv(h, sneu, v); |
||
1681 | } |
||
1682 | tmpR.rgb(&h, &s, &v); |
||
1683 | tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0); |
||
1684 | } |
||
1685 | else |
||
1686 | { |
||
1687 | tmpC.applyGCR(); |
||
1688 | tmpC.getCMYK(&h, &s, &v, &k); |
||
1689 | h = h * Shade / 100; |
||
1690 | s = s * Shade / 100; |
||
1691 | v = v * Shade / 100; |
||
1692 | k = k * Shade / 100; |
||
1693 | tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0)+" "+FToStr(k / 255.0); |
||
1694 | } |
||
1695 | } |
||
1696 | else |
||
1697 | { |
||
1698 | #endif |
||
1699 | tmpC.applyGCR(); |
||
1700 | tmpC.getCMYK(&h, &s, &v, &k); |
||
1701 | h = h * Shade / 100; |
||
1702 | s = s * Shade / 100; |
||
1703 | v = v * Shade / 100; |
||
1704 | k = k * Shade / 100; |
||
1705 | tmp = FToStr(h / 255.0)+" "+FToStr(s / 255.0)+" "+FToStr(v / 255.0)+" "+FToStr(k / 255.0); |
||
1706 | } |
||
1707 | #ifdef HAVE_CMS |
||
1708 | } |
||
1709 | #endif |
||
1710 | return tmp; |
||
1711 | } |
||
1712 | |||
1713 | QString PDFlib::SetClipPath(PageItem *ite) |
||
1714 | { |
||
1715 | bool nPath = true; |
||
1716 | QString tmp = ""; |
||
1717 | FPoint np; |
||
1718 | if (ite->PoLine.size() > 3) |
||
1719 | { |
||
1720 | for (uint poi=0; poi<ite->PoLine.size()-3; poi += 4) |
||
1721 | { |
||
1722 | if (ite->PoLine.point(poi).x() > 900000) |
||
1723 | { |
||
1724 | tmp += "h\n"; |
||
1725 | nPath = true; |
||
1726 | continue; |
||
1727 | } |
||
1728 | if (nPath) |
||
1729 | { |
||
1730 | np = ite->PoLine.point(poi); |
||
1731 | tmp += FToStr(np.x())+" "+FToStr(-np.y())+" m\n"; |
||
1732 | nPath = false; |
||
1733 | } |
||
1734 | np = ite->PoLine.point(poi+1); |
||
1735 | tmp += FToStr(np.x())+" "+FToStr(-np.y())+" "; |
||
1736 | np = ite->PoLine.point(poi+3); |
||
1737 | tmp += FToStr(np.x())+" "+FToStr(-np.y())+" "; |
||
1738 | np = ite->PoLine.point(poi+2); |
||
1739 | tmp += FToStr(np.x())+" "+FToStr(-np.y())+" c\n"; |
||
1740 | } |
||
1741 | } |
||
1742 | return tmp; |
||
1743 | } |
||
1744 | |||
1745 | void PDFlib::PDF_Transparenz(PageItem *b) |
||
1746 | { |
||
1747 | StartObj(ObjCounter); |
||
1748 | QString ShName = ResNam+IToStr(ResCount); |
||
1749 | Transpar[ShName] = ObjCounter; |
||
1750 | ResCount++; |
||
1751 | ObjCounter++; |
||
1752 | PutDoc("<< /Type /ExtGState\n"); |
||
1753 | PutDoc("/CA "+FToStr(1.0 - b->Transparency)+"\n"); |
||
1754 | PutDoc("/ca "+FToStr(1.0 - b->Transparency)+"\n"); |
||
1755 | PutDoc("/BM /Normal\n>>\nendobj\n"); |
||
1756 | PutPage("/"+ShName+" gs\n"); |
||
1757 | } |
||
1758 | |||
1759 | void PDFlib::PDF_Gradient(PageItem *b) |
||
1760 | { |
||
1761 | float w = b->Width; |
||
1762 | float h = -b->Height; |
||
1763 | float w2 = w / 2.0; |
||
1764 | float h2 = h / 2.0; |
||
1765 | float rad = QMIN(w, fabs(h)) / 2.0; |
||
1766 | StartObj(ObjCounter); |
||
1767 | QString ShName = ResNam+IToStr(ResCount); |
||
1768 | Shadings[ShName] = ObjCounter; |
||
1769 | ResCount++; |
||
1770 | ObjCounter++; |
||
1771 | PutDoc("<<\n"); |
||
1772 | if (b->GrType == 5) |
||
1773 | PutDoc("/ShadingType 3\n"); |
||
1774 | else |
||
1775 | PutDoc("/ShadingType 2\n"); |
||
1776 | if (Options->UseRGB) |
||
1777 | PutDoc("/ColorSpace /DeviceRGB\n"); |
||
1778 | else |
||
1779 | #ifdef HAVE_CMS |
||
1780 | { |
||
1781 | if ((CMSuse) && (Options->UseProfiles)) |
||
1782 | PutDoc("/ColorSpace "+ICCProfiles[Options->SolidProf].ICCArray+"\n"); |
||
1783 | else |
||
1784 | #endif |
||
1785 | PutDoc("/ColorSpace /DeviceCMYK\n"); |
||
1786 | #ifdef HAVE_CMS |
||
1787 | } |
||
1788 | #endif |
||
1789 | switch (b->GrType) |
||
1790 | { |
||
1791 | case 1: |
||
1792 | PutDoc("/Coords [0 "+FToStr(h / 2.0)+" "+FToStr(w)+" "+FToStr(h / 2.0)+"]\n"); |
||
1793 | break; |
||
1794 | case 2: |
||
1795 | PutDoc("/Coords ["+FToStr(w / 2.0)+" 0 "+FToStr(w / 2.0)+" "+FToStr(h)+"]\n"); |
||
1796 | break; |
||
1797 | case 3: |
||
1798 | PutDoc("/Coords [0 0 "+FToStr(w)+" "+FToStr(h)+"]\n"); |
||
1799 | break; |
||
1800 | case 4: |
||
1801 | PutDoc("/Coords ["+FToStr(w)+" 0 0 "+FToStr(h)+"]\n"); |
||
1802 | break; |
||
1803 | case 5: |
||
1804 | PutDoc("/Coords ["+FToStr(w2)+" "+FToStr(h2)+" 0 "+FToStr(w2)+" "+FToStr(h2)+" "+FToStr(rad)+"]\n"); |
||
1805 | break; |
||
1806 | } |
||
1807 | PutDoc("/BBox [0 "+FToStr(h)+" "+FToStr(w)+" 0]\n"); |
||
1808 | PutDoc("/Background ["+SetFarbe(b->Pcolor, b->Shade)+"]\n"); |
||
1809 | if (b->GrType == 5) |
||
1810 | PutDoc("/Extend [true true]\n"); |
||
1811 | else |
||
1812 | PutDoc("/Extend [false false]\n"); |
||
1813 | PutDoc("/Function\n<<\n/FunctionType 2\n/Domain [0 1]\n"); |
||
1814 | if (b->GrType == 5) |
||
1815 | { |
||
1816 | PutDoc("/C0 ["+SetFarbe(b->GrColor, b->GrShade)+"]\n"); |
||
1817 | PutDoc("/C1 ["+SetFarbe(b->GrColor2, b->GrShade2)+"]\n"); |
||
1818 | } |
||
1819 | else |
||
1820 | { |
||
1821 | PutDoc("/C0 ["+SetFarbe(b->GrColor2, b->GrShade2)+"]\n"); |
||
1822 | PutDoc("/C1 ["+SetFarbe(b->GrColor, b->GrShade)+"]\n"); |
||
1823 | } |
||
1824 | PutDoc("/N 1\n>>\n>>\nendobj\nq\n"); |
||
1825 | PutPage("q\n"); |
||
1826 | PutPage(SetClipPath(b)); |
||
1827 | if (b->Segments.count() != 0) |
||
1828 | PutPage("h\nW* n\n"); |
||
1829 | else |
||
1830 | PutPage("h\nW n\n"); |
||
1831 | if (b->GrType == 5) |
||
1832 | { |
||
1833 | QString sca = FToStr(w2 / rad)+" 0 0 "+FToStr(fabs(h2) / rad)+" "; |
||
1834 | if (w > fabs(h)) |
||
1835 | sca += "-"+FToStr(w2*(w2 / rad)-w2)+" 0"; |
||
1836 | else |
||
1837 | { |
||
1838 | if (w < fabs(h)) |
||
1839 | sca += "0 "+FToStr(fabs(h2)*(fabs(h2) /rad)-fabs(h2)); |
||
1840 | else |
||
1841 | sca += "0 0"; |
||
1842 | } |
||
1843 | PutPage(sca+" cm\n"); |
||
1844 | } |
||
1845 | PutPage("/"+ShName+" sh\nQ\n"); |
||
1846 | } |
||
1847 | |||
1848 | void PDFlib::PDF_Annotation(PageItem *ite, uint PNr) |
||
1849 | { |
||
1850 | struct Dest de; |
||
1851 | QString bm = ""; |
||
1852 | QString cc, cnx; |
||
1853 | QString ct = ""; |
||
1854 | int AAcoun = 0; |
||
1855 | int IconOb = 0; |
||
1856 | QImage img; |
||
1857 | QImage img2; |
||
1858 | QMap<int, QString> ind2PDFabr; |
||
1859 | ind2PDFabr[0] = "/Cour"; |
||
1860 | ind2PDFabr[1] = "/CoBo"; |
||
1861 | ind2PDFabr[2] = "/CoOb"; |
||
1862 | ind2PDFabr[3] = "/CoBO"; |
||
1863 | ind2PDFabr[4] = "/Helv"; |
||
1864 | ind2PDFabr[5] = "/HeBo"; |
||
1865 | ind2PDFabr[6] = "/HeOb"; |
||
1866 | ind2PDFabr[7] = "/HeBO"; |
||
1867 | ind2PDFabr[8] = "/TiRo"; |
||
1868 | ind2PDFabr[9] = "/TiBo"; |
||
1869 | ind2PDFabr[10] = "/TiIt"; |
||
1870 | ind2PDFabr[11] = "/TiBI"; |
||
1871 | ind2PDFabr[12] = "/ZaDb"; |
||
1872 | ind2PDFabr[13] = "/Symb"; |
||
1873 | float x = ite->Xpos; |
||
1874 | float y = doc->PageH - ite->Ypos; |
||
1875 | float x2 = ite->Xpos+ite->Width; |
||
1876 | float y2 = doc->PageH-ite->Ypos-ite->Height; |
||
1877 | for (uint d = 0; d < ite->Ptext.count(); ++d) |
||
1878 | { |
||
1879 | cc = ite->Ptext.at(d)->ch; |
||
1880 | if ((cc == "(") || (cc == ")") || (cc == "\\")) |
||
1881 | bm += "\\"; |
||
1882 | bm += cc; |
||
1883 | } |
||
1884 | QStringList bmst = QStringList::split("\r", bm); |
||
1885 | switch (ite->AnChkStil) |
||
1886 | { |
||
1887 | case 0: |
||
1888 | ct = "4"; |
||
1889 | break; |
||
1890 | case 1: |
||
1891 | ct = "5"; |
||
1892 | break; |
||
1893 | case 2: |
||
1894 | ct = "F"; |
||
1895 | break; |
||
1896 | case 3: |
||
1897 | ct = "l"; |
||
1898 | break; |
||
1899 | case 4: |
||
1900 | ct = "H"; |
||
1901 | break; |
||
1902 | case 5: |
||
1903 | ct = "n"; |
||
1904 | break; |
||
1905 | } |
||
1906 | StartObj(ObjCounter); |
||
1907 | Seite.AObjects.append(ObjCounter); |
||
1908 | ObjCounter++; |
||
1909 | PutDoc("<<\n/Type /Annot\n"); |
||
1910 | switch (ite->AnType) |
||
1911 | { |
||
1912 | case 0: |
||
1913 | case 10: |
||
1914 | PutDoc("/Subtype /Text\n"); |
||
1915 | PutDoc("/Contents "+EncString("("+bm+")",ObjCounter-1)+"\n"); |
||
1916 | break; |
||
1917 | case 1: |
||
1918 | case 11: |
||
1919 | PutDoc("/Subtype /Link\n"); |
||
19 | Franz | 1920 | if (ite->AnActType == 7) |
1921 | { |
||
1922 | PutDoc("/A << /Type /Action /S /GoToR\n/F "+EncString("("+Path2Relative(ite->An_Extern)+")",ObjCounter-1)+"\n"); |
||
1923 | PutDoc("/D ["+IToStr(ite->AnZiel)+" /XYZ "+ite->AnAction+"]\n>>\n"); |
||
1924 | } |
||
1925 | else |
||
1926 | { |
||
1927 | PutDoc("/Dest /"+NDnam+IToStr(NDnum)+"\n"); |
||
1928 | de.Name = NDnam+IToStr(NDnum); |
||
1929 | de.Seite = ite->AnZiel; |
||
1930 | de.Act = ite->AnAction; |
||
1931 | NamedDest.append(de); |
||
1932 | NDnum++; |
||
1933 | } |
||
3 | paul | 1934 | break; |
1935 | case 2: |
||
1936 | case 3: |
||
1937 | case 4: |
||
1938 | case 5: |
||
1939 | case 6: |
||
1940 | Seite.FormObjects.append(ObjCounter-1); |
||
1941 | PutDoc("/Subtype /Widget\n"); |
||
1942 | PutDoc("/T "+EncString("("+ite->AnName+")",ObjCounter-1)+"\n"); |
||
1943 | if (ite->AnToolTip != "") |
||
1944 | PutDoc("/TU "+EncString("("+PDFEncode(ite->AnToolTip)+")",ObjCounter-1)+"\n"); |
||
1945 | PutDoc("/F "); |
||
1946 | switch (ite->AnVis) |
||
1947 | { |
||
1948 | case 0: |
||
1949 | PutDoc("4"); |
||
1950 | break; |
||
1951 | case 1: |
||
1952 | PutDoc("2"); |
||
1953 | break; |
||
1954 | case 2: |
||
1955 | PutDoc("0"); |
||
1956 | break; |
||
1957 | case 3: |
||
1958 | PutDoc("32"); |
||
1959 | break; |
||
1960 | } |
||
1961 | PutDoc("\n"); |
||
1962 | PutDoc("/BS << /Type /Border /W "); |
||
1963 | if (ite->AnBColor != "None") |
||
1964 | PutDoc(IToStr(ite->AnBwid)); |
||
1965 | else |
||
1966 | PutDoc("0"); |
||
1967 | PutDoc(" /S /"); |
||
1968 | switch (ite->AnBsty) |
||
1969 | { |
||
1970 | case 0: |
||
1971 | PutDoc("S"); |
||
1972 | break; |
||
1973 | case 1: |
||
1974 | PutDoc("D"); |
||
1975 | break; |
||
1976 | case 2: |
||
1977 | PutDoc("U"); |
||
1978 | break; |
||
1979 | case 3: |
||
1980 | PutDoc("B"); |
||
1981 | break; |
||
1982 | case 4: |
||
1983 | PutDoc("I"); |
||
1984 | break; |
||
1985 | } |
||
1986 | PutDoc(" >>\n"); |
||
19 | Franz | 1987 | cnx = "("+ind2PDFabr[ite->AnFont]+" "+IToStr(ite->ISize)+" Tf"; |
3 | paul | 1988 | if (Options->UseRGB) |
1989 | { |
||
1990 | if (ite->Pcolor2 != "None") |
||
1991 | cnx += " "+SetFarbe(ite->Pcolor2, ite->Shade2)+" rg\n"; |
||
1992 | if (ite->Pcolor != "None") |
||
1993 | cnx += " "+SetFarbe(ite->Pcolor, ite->Shade)+" RG\n"; |
||
1994 | } |
||
1995 | else |
||
1996 | { |
||
1997 | #ifdef HAVE_CMS |
||
1998 | if ((CMSuse) && (Options->UseProfiles)) |
||
1999 | { |
||
2000 | cnx += " /"+ICCProfiles[Options->SolidProf].ResName+" cs\n"; |
||
2001 | cnx += " /"+ICCProfiles[Options->SolidProf].ResName+" CS\n"; |
||
2002 | if (ite->Pcolor != "None") |
||
2003 | cnx += SetFarbe(ite->Pcolor, ite->Shade)+" SCN\n"; |
||
2004 | if (ite->Pcolor2 != "None") |
||
2005 | cnx += SetFarbe(ite->Pcolor2, ite->Shade2)+" scn\n"; |
||
2006 | } |
||
2007 | else |
||
2008 | { |
||
2009 | #endif |
||
2010 | if (ite->Pcolor2 != "None") |
||
2011 | cnx += " "+SetFarbe(ite->Pcolor2, ite->Shade2)+" k"; |
||
2012 | if (ite->Pcolor != "None") |
||
2013 | cnx += " "+SetFarbe(ite->Pcolor, ite->Shade)+" K"; |
||
2014 | } |
||
2015 | #ifdef HAVE_CMS |
||
2016 | } |
||
2017 | #endif |
||
2018 | cnx += ")"; |
||
19 | Franz | 2019 | PutDoc("/DA "+EncString(cnx,ObjCounter-1)+"\n"); |
3 | paul | 2020 | int flg = ite->AnFlag; |
2021 | if (Options->Version == 13) |
||
2022 | flg = flg & 522247; |
||
2023 | PutDoc("/Ff "+IToStr(flg)+"\n"); |
||
2024 | switch (ite->AnType) |
||
2025 | { |
||
2026 | case 2: |
||
2027 | PutDoc("/FT /Btn\n"); |
||
2028 | PutDoc("/H /"); |
||
2029 | switch (ite->AnFeed) |
||
2030 | { |
||
2031 | case 0: |
||
2032 | PutDoc("N"); |
||
2033 | break; |
||
2034 | case 1: |
||
2035 | PutDoc("I"); |
||
2036 | break; |
||
2037 | case 2: |
||
2038 | PutDoc("O"); |
||
2039 | break; |
||
2040 | case 3: |
||
2041 | PutDoc("P"); |
||
2042 | break; |
||
2043 | } |
||
2044 | PutDoc("\n"); |
||
2045 | break; |
||
2046 | case 3: |
||
2047 | PutDoc("/FT /Tx\n"); |
||
2048 | PutDoc("/V "+EncString("("+bm+")",ObjCounter-1)+"\n"); |
||
2049 | PutDoc("/DV "+EncString("("+bm+")",ObjCounter-1)+"\n"); |
||
2050 | PutDoc("/Q "+IToStr(QMIN(ite->Ausrich,2))+"\n"); |
||
2051 | PutDoc("/AP << /N "+IToStr(ObjCounter)+" 0 R >>\n"); |
||
2052 | if (ite->AnMaxChar != -1) |
||
2053 | PutDoc("/MaxLen "+IToStr(ite->AnMaxChar)+"\n"); |
||
2054 | break; |
||
2055 | case 4: |
||
2056 | PutDoc("/FT /Btn\n"); |
||
2057 | if (ite->AnIsChk) |
||
2058 | PutDoc("/V /On\n/DV /On\n/AS /On\n"); |
||
2059 | else |
||
2060 | PutDoc("/V /Off\n/DV /Off\n/AS /Off\n"); |
||
2061 | PutDoc("/AP << /N << /On "+IToStr(ObjCounter)+" 0 R >> >>\n"); |
||
2062 | break; |
||
2063 | case 5: |
||
2064 | case 6: |
||
2065 | PutDoc("/FT /Ch\n/V ("); |
||
2066 | if (bmst.count() > 0) |
||
2067 | PutDoc(bmst[0]); |
||
2068 | PutDoc(")\n/DV "); |
||
2069 | cnx = "("; |
||
2070 | if (bmst.count() > 0) |
||
2071 | cnx += bmst[0]; |
||
2072 | cnx += ")"; |
||
2073 | PutDoc(EncString(cnx,ObjCounter-1)+"\n"); |
||
2074 | PutDoc("/Opt [ "); |
||
2075 | for (uint bmc = 0; bmc < bmst.count(); ++bmc) |
||
2076 | { |
||
2077 | PutDoc(EncString("("+bmst[ |