]>
Commit | Line | Data |
---|---|---|
ef416fc2 | 1 | //======================================================================== |
2 | // | |
3 | // Annot.cc | |
4 | // | |
5 | // Copyright 2000-2003 Glyph & Cog, LLC | |
6 | // | |
7 | //======================================================================== | |
8 | ||
9 | #include <config.h> | |
10 | ||
11 | #ifdef USE_GCC_PRAGMAS | |
12 | #pragma implementation | |
13 | #endif | |
14 | ||
15 | #include <stdlib.h> | |
16 | #include "gmem.h" | |
17 | #include "Object.h" | |
18 | #include "Catalog.h" | |
19 | #include "Gfx.h" | |
20 | #include "Lexer.h" | |
21 | #include "Annot.h" | |
22 | ||
23 | //------------------------------------------------------------------------ | |
24 | // Annot | |
25 | //------------------------------------------------------------------------ | |
26 | ||
27 | Annot::Annot(XRef *xrefA, Dict *acroForm, Dict *dict) { | |
28 | Object apObj, asObj, obj1, obj2; | |
29 | GBool regen, isTextField; | |
30 | double t; | |
31 | ||
32 | ok = gFalse; | |
33 | xref = xrefA; | |
34 | appearBuf = NULL; | |
35 | ||
36 | if (dict->lookup("Rect", &obj1)->isArray() && | |
37 | obj1.arrayGetLength() == 4) { | |
38 | //~ should check object types here | |
39 | obj1.arrayGet(0, &obj2); | |
40 | xMin = obj2.getNum(); | |
41 | obj2.free(); | |
42 | obj1.arrayGet(1, &obj2); | |
43 | yMin = obj2.getNum(); | |
44 | obj2.free(); | |
45 | obj1.arrayGet(2, &obj2); | |
46 | xMax = obj2.getNum(); | |
47 | obj2.free(); | |
48 | obj1.arrayGet(3, &obj2); | |
49 | yMax = obj2.getNum(); | |
50 | obj2.free(); | |
51 | if (xMin > xMax) { | |
52 | t = xMin; xMin = xMax; xMax = t; | |
53 | } | |
54 | if (yMin > yMax) { | |
55 | t = yMin; yMin = yMax; yMax = t; | |
56 | } | |
57 | } else { | |
58 | //~ this should return an error | |
59 | xMin = yMin = 0; | |
60 | xMax = yMax = 1; | |
61 | } | |
62 | obj1.free(); | |
63 | ||
64 | // check if field apperances need to be regenerated | |
65 | regen = gFalse; | |
66 | if (acroForm) { | |
67 | acroForm->lookup("NeedAppearances", &obj1); | |
68 | if (obj1.isBool() && obj1.getBool()) { | |
69 | regen = gTrue; | |
70 | } | |
71 | obj1.free(); | |
72 | } | |
73 | ||
74 | // check for a text-type field | |
75 | isTextField = dict->lookup("FT", &obj1)->isName("Tx"); | |
76 | obj1.free(); | |
77 | ||
78 | #if 0 //~ appearance stream generation is not finished yet | |
79 | if (regen && isTextField) { | |
80 | generateAppearance(acroForm, dict); | |
81 | } else { | |
82 | #endif | |
83 | if (dict->lookup("AP", &apObj)->isDict()) { | |
84 | if (dict->lookup("AS", &asObj)->isName()) { | |
85 | if (apObj.dictLookup("N", &obj1)->isDict()) { | |
86 | if (obj1.dictLookupNF(asObj.getName(), &obj2)->isRef()) { | |
87 | obj2.copy(&appearance); | |
88 | ok = gTrue; | |
89 | } else { | |
90 | obj2.free(); | |
91 | if (obj1.dictLookupNF("Off", &obj2)->isRef()) { | |
92 | obj2.copy(&appearance); | |
93 | ok = gTrue; | |
94 | } | |
95 | } | |
96 | obj2.free(); | |
97 | } | |
98 | obj1.free(); | |
99 | } else { | |
100 | if (apObj.dictLookupNF("N", &obj1)->isRef()) { | |
101 | obj1.copy(&appearance); | |
102 | ok = gTrue; | |
103 | } | |
104 | obj1.free(); | |
105 | } | |
106 | asObj.free(); | |
107 | } | |
108 | apObj.free(); | |
109 | #if 0 //~ appearance stream generation is not finished yet | |
110 | } | |
111 | #endif | |
112 | } | |
113 | ||
114 | Annot::~Annot() { | |
115 | appearance.free(); | |
116 | if (appearBuf) { | |
117 | delete appearBuf; | |
118 | } | |
119 | } | |
120 | ||
121 | void Annot::generateAppearance(Dict *acroForm, Dict *dict) { | |
122 | MemStream *appearStream; | |
123 | Object daObj, vObj, drObj, appearDict, obj1, obj2; | |
124 | GString *daStr, *daStr1, *vStr, *s; | |
125 | char buf[256]; | |
126 | double fontSize; | |
127 | int c; | |
128 | int i0, i1; | |
129 | ||
130 | //~ DA can be inherited | |
131 | if (dict->lookup("DA", &daObj)->isString()) { | |
132 | daStr = daObj.getString(); | |
133 | ||
134 | // look for a font size | |
135 | //~ may want to parse the DS entry in place of this (if it exists) | |
136 | daStr1 = NULL; | |
137 | fontSize = 10; | |
138 | for (i1 = daStr->getLength() - 2; i1 >= 0; --i1) { | |
139 | if (daStr->getChar(i1) == 'T' && daStr->getChar(i1+1) == 'f') { | |
140 | for (--i1; i1 >= 0 && Lexer::isSpace(daStr->getChar(i1)); --i1) ; | |
141 | for (i0 = i1; i0 >= 0 && !Lexer::isSpace(daStr->getChar(i0)); --i0) ; | |
142 | if (i0 >= 0) { | |
143 | ++i0; | |
144 | ++i1; | |
145 | s = new GString(daStr, i0, i1 - i0); | |
146 | fontSize = atof(s->getCString()); | |
147 | delete s; | |
148 | ||
149 | // autosize the font | |
150 | if (fontSize == 0) { | |
151 | fontSize = 0.67 * (yMax - yMin); | |
152 | daStr1 = new GString(daStr, 0, i0); | |
153 | sprintf(buf, "%.2f", fontSize); | |
154 | daStr1->append(buf); | |
155 | daStr1->append(daStr->getCString() + i1, | |
156 | daStr->getLength() - i1); | |
157 | } | |
158 | } | |
159 | break; | |
160 | } | |
161 | } | |
162 | ||
163 | // build the appearance stream contents | |
164 | appearBuf = new GString(); | |
165 | appearBuf->append("/Tx BMC\n"); | |
166 | appearBuf->append("q BT\n"); | |
167 | appearBuf->append(daStr1 ? daStr1 : daStr)->append("\n"); | |
168 | if (dict->lookup("V", &vObj)->isString()) { | |
169 | //~ handle quadding -- this requires finding the font and using | |
170 | //~ the encoding and char widths | |
171 | sprintf(buf, "1 0 0 1 %.2f %.2f Tm\n", 2.0, yMax - yMin - fontSize); | |
172 | appearBuf->append(buf); | |
173 | sprintf(buf, "%g TL\n", fontSize); | |
174 | appearBuf->append(buf); | |
175 | vStr = vObj.getString(); | |
176 | i0 = 0; | |
177 | while (i0 < vStr->getLength()) { | |
178 | for (i1 = i0; | |
179 | i1 < vStr->getLength() && | |
180 | vStr->getChar(i1) != '\n' && vStr->getChar(i1) != '\r'; | |
181 | ++i1) ; | |
182 | if (i0 > 0) { | |
183 | appearBuf->append("T*\n"); | |
184 | } | |
185 | appearBuf->append('('); | |
186 | for (; i0 < i1; ++i0) { | |
187 | c = vStr->getChar(i0); | |
188 | if (c == '(' || c == ')' || c == '\\') { | |
189 | appearBuf->append('\\'); | |
190 | appearBuf->append(c); | |
191 | } else if (c < 0x20 || c >= 0x80) { | |
192 | sprintf(buf, "\\%03o", c); | |
193 | appearBuf->append(buf); | |
194 | } else { | |
195 | appearBuf->append(c); | |
196 | } | |
197 | } | |
198 | appearBuf->append(") Tj\n"); | |
199 | if (i1 + 1 < vStr->getLength() && | |
200 | vStr->getChar(i1) == '\r' && vStr->getChar(i1 + 1) == '\n') { | |
201 | i0 = i1 + 2; | |
202 | } else { | |
203 | i0 = i1 + 1; | |
204 | } | |
205 | } | |
206 | } | |
207 | vObj.free(); | |
208 | appearBuf->append("ET Q\n"); | |
209 | appearBuf->append("EMC\n"); | |
210 | ||
211 | // build the appearance stream dictionary | |
212 | appearDict.initDict(xref); | |
213 | appearDict.dictAdd(copyString("Length"), | |
214 | obj1.initInt(appearBuf->getLength())); | |
215 | appearDict.dictAdd(copyString("Subtype"), obj1.initName("Form")); | |
216 | obj1.initArray(xref); | |
217 | obj1.arrayAdd(obj2.initReal(0)); | |
218 | obj1.arrayAdd(obj2.initReal(0)); | |
219 | obj1.arrayAdd(obj2.initReal(xMax - xMin)); | |
220 | obj1.arrayAdd(obj2.initReal(yMax - yMin)); | |
221 | appearDict.dictAdd(copyString("BBox"), &obj1); | |
222 | ||
223 | // find the resource dictionary | |
224 | dict->lookup("DR", &drObj); | |
225 | if (!drObj.isDict()) { | |
226 | dict->lookup("Parent", &obj1); | |
227 | while (obj1.isDict()) { | |
228 | drObj.free(); | |
229 | obj1.dictLookup("DR", &drObj); | |
230 | if (drObj.isDict()) { | |
231 | break; | |
232 | } | |
233 | obj1.dictLookup("Parent", &obj2); | |
234 | obj1.free(); | |
235 | obj1 = obj2; | |
236 | } | |
237 | obj1.free(); | |
238 | if (!drObj.isDict()) { | |
239 | if (acroForm) { | |
240 | drObj.free(); | |
241 | acroForm->lookup("DR", &drObj); | |
242 | } | |
243 | } | |
244 | } | |
245 | if (drObj.isDict()) { | |
246 | appearDict.dictAdd(copyString("Resources"), drObj.copy(&obj1)); | |
247 | } | |
248 | drObj.free(); | |
249 | ||
250 | // build the appearance stream | |
251 | appearStream = new MemStream(appearBuf->getCString(), 0, | |
252 | appearBuf->getLength(), &appearDict); | |
253 | appearance.initStream(appearStream); | |
254 | ok = gTrue; | |
255 | ||
256 | if (daStr1) { | |
257 | delete daStr1; | |
258 | } | |
259 | } | |
260 | daObj.free(); | |
261 | } | |
262 | ||
263 | void Annot::draw(Gfx *gfx) { | |
264 | Object obj; | |
265 | ||
266 | fprintf(stderr, "DEBUG: Annot::draw(gfx=%p)\n", gfx); | |
267 | ||
268 | if (appearance.fetch(xref, &obj)->isStream()) { | |
269 | gfx->doAnnot(&obj, xMin, yMin, xMax, yMax); | |
270 | } | |
271 | obj.free(); | |
272 | } | |
273 | ||
274 | //------------------------------------------------------------------------ | |
275 | // Annots | |
276 | //------------------------------------------------------------------------ | |
277 | ||
278 | Annots::Annots(XRef *xref, Catalog *catalog, Object *annotsObj) { | |
279 | Dict *acroForm; | |
280 | Annot *annot; | |
281 | Object obj1; | |
282 | int size; | |
283 | int i; | |
284 | ||
285 | annots = NULL; | |
286 | size = 0; | |
287 | nAnnots = 0; | |
288 | ||
289 | acroForm = catalog->getAcroForm()->isDict() ? | |
290 | catalog->getAcroForm()->getDict() : NULL; | |
291 | if (annotsObj->isArray()) { | |
292 | for (i = 0; i < annotsObj->arrayGetLength(); ++i) { | |
293 | if (annotsObj->arrayGet(i, &obj1)->isDict()) { | |
294 | annot = new Annot(xref, acroForm, obj1.getDict()); | |
295 | if (annot->isOk()) { | |
296 | if (nAnnots >= size) { | |
297 | size += 16; | |
298 | annots = (Annot **)greallocn(annots, size, sizeof(Annot *)); | |
299 | } | |
300 | annots[nAnnots++] = annot; | |
301 | } else { | |
302 | delete annot; | |
303 | } | |
304 | } | |
305 | obj1.free(); | |
306 | } | |
307 | } | |
308 | } | |
309 | ||
310 | Annots::~Annots() { | |
311 | int i; | |
312 | ||
313 | for (i = 0; i < nAnnots; ++i) { | |
314 | delete annots[i]; | |
315 | } | |
316 | gfree(annots); | |
317 | } |