Coverage Report

Created: 2025-07-11 06:50

/src/xpdf-4.05/fofi/FoFiIdentifier.cc
Line
Count
Source (jump to first uncovered line)
1
//========================================================================
2
//
3
// FoFiIdentifier.cc
4
//
5
// Copyright 2009 Glyph & Cog, LLC
6
//
7
//========================================================================
8
9
#include <aconf.h>
10
11
#include <stdio.h>
12
#include <string.h>
13
#include <limits.h>
14
#include "gtypes.h"
15
#include "gmem.h"
16
#include "gmempp.h"
17
#include "GString.h"
18
#include "GList.h"
19
#include "FoFiIdentifier.h"
20
21
//------------------------------------------------------------------------
22
23
class Reader {
24
public:
25
26
0
  virtual ~Reader() {}
27
28
  // Read one byte.  Returns -1 if past EOF.
29
  virtual int getByte(int pos) = 0;
30
31
  // Read a big-endian unsigned 16-bit integer.  Fills in *val and
32
  // returns true if successful.
33
  virtual GBool getU16BE(int pos, int *val) = 0;
34
35
  // Read a big-endian unsigned 32-bit integer.  Fills in *val and
36
  // returns true if successful.
37
  virtual GBool getU32BE(int pos, Guint *val) = 0;
38
39
  // Read a little-endian unsigned 32-bit integer.  Fills in *val and
40
  // returns true if successful.
41
  virtual GBool getU32LE(int pos, Guint *val) = 0;
42
43
  // Read a big-endian unsigned <size>-byte integer, where 1 <= size
44
  // <= 4.  Fills in *val and returns true if successful.
45
  virtual GBool getUVarBE(int pos, int size, Guint *val) = 0;
46
47
  // Compare against a string.  Returns true if equal.
48
  virtual GBool cmp(int pos, const char *s) = 0;
49
50
};
51
52
//------------------------------------------------------------------------
53
54
class MemReader: public Reader {
55
public:
56
57
  static MemReader *make(char *bufA, int lenA);
58
  virtual ~MemReader();
59
  virtual int getByte(int pos);
60
  virtual GBool getU16BE(int pos, int *val);
61
  virtual GBool getU32BE(int pos, Guint *val);
62
  virtual GBool getU32LE(int pos, Guint *val);
63
  virtual GBool getUVarBE(int pos, int size, Guint *val);
64
  virtual GBool cmp(int pos, const char *s);
65
66
private:
67
68
  MemReader(char *bufA, int lenA);
69
70
  char *buf;
71
  int len;
72
};
73
74
0
MemReader *MemReader::make(char *bufA, int lenA) {
75
0
  return new MemReader(bufA, lenA);
76
0
}
77
78
0
MemReader::MemReader(char *bufA, int lenA) {
79
0
  buf = bufA;
80
0
  len = lenA;
81
0
}
82
83
0
MemReader::~MemReader() {
84
0
}
85
86
0
int MemReader::getByte(int pos) {
87
0
  if (pos < 0 || pos >= len) {
88
0
    return -1;
89
0
  }
90
0
  return buf[pos] & 0xff;
91
0
}
92
93
0
GBool MemReader::getU16BE(int pos, int *val) {
94
0
  if (pos < 0 || pos > len - 2) {
95
0
    return gFalse;
96
0
  }
97
0
  *val = ((buf[pos] & 0xff) << 8) +
98
0
         (buf[pos+1] & 0xff);
99
0
  return gTrue;
100
0
}
101
102
0
GBool MemReader::getU32BE(int pos, Guint *val) {
103
0
  if (pos < 0 || pos > len - 4) {
104
0
    return gFalse;
105
0
  }
106
0
  *val = ((buf[pos] & 0xff) << 24) +
107
0
         ((buf[pos+1] & 0xff) << 16) +
108
0
         ((buf[pos+2] & 0xff) << 8) +
109
0
         (buf[pos+3] & 0xff);
110
0
  return gTrue;
111
0
}
112
113
0
GBool MemReader::getU32LE(int pos, Guint *val) {
114
0
  if (pos < 0 || pos > len - 4) {
115
0
    return gFalse;
116
0
  }
117
0
  *val = (buf[pos] & 0xff) +
118
0
         ((buf[pos+1] & 0xff) << 8) +
119
0
         ((buf[pos+2] & 0xff) << 16) +
120
0
         ((buf[pos+3] & 0xff) << 24);
121
0
  return gTrue;
122
0
}
123
124
0
GBool MemReader::getUVarBE(int pos, int size, Guint *val) {
125
0
  int i;
126
127
0
  if (size < 1 || size > 4 || pos < 0 || pos > len - size) {
128
0
    return gFalse;
129
0
  }
130
0
  *val = 0;
131
0
  for (i = 0; i < size; ++i) {
132
0
    *val = (*val << 8) + (buf[pos + i] & 0xff);
133
0
  }
134
0
  return gTrue;
135
0
}
136
137
0
GBool MemReader::cmp(int pos, const char *s) {
138
0
  int n;
139
140
0
  n = (int)strlen(s);
141
0
  if (pos < 0 || len < n || pos > len - n) {
142
0
    return gFalse;
143
0
  }
144
0
  return !memcmp(buf + pos, s, n);
145
0
}
146
147
//------------------------------------------------------------------------
148
149
class FileReader: public Reader {
150
public:
151
152
  static FileReader *make(char *fileName);
153
  virtual ~FileReader();
154
  virtual int getByte(int pos);
155
  virtual GBool getU16BE(int pos, int *val);
156
  virtual GBool getU32BE(int pos, Guint *val);
157
  virtual GBool getU32LE(int pos, Guint *val);
158
  virtual GBool getUVarBE(int pos, int size, Guint *val);
159
  virtual GBool cmp(int pos, const char *s);
160
161
private:
162
163
  FileReader(FILE *fA);
164
  GBool fillBuf(int pos, int len);
165
166
  FILE *f;
167
  char buf[1024];
168
  int bufPos, bufLen;
169
};
170
171
0
FileReader *FileReader::make(char *fileName) {
172
0
  FILE *fA;
173
174
0
  if (!(fA = fopen(fileName, "rb"))) {
175
0
    return NULL;
176
0
  }
177
0
  return new FileReader(fA);
178
0
}
179
180
0
FileReader::FileReader(FILE *fA) {
181
0
  f = fA;
182
0
  bufPos = 0;
183
0
  bufLen = 0;
184
0
}
185
186
0
FileReader::~FileReader() {
187
0
  fclose(f);
188
0
}
189
190
0
int FileReader::getByte(int pos) {
191
0
  if (!fillBuf(pos, 1)) {
192
0
    return -1;
193
0
  }
194
0
  return buf[pos - bufPos] & 0xff;
195
0
}
196
197
0
GBool FileReader::getU16BE(int pos, int *val) {
198
0
  if (!fillBuf(pos, 2)) {
199
0
    return gFalse;
200
0
  }
201
0
  *val = ((buf[pos - bufPos] & 0xff) << 8) +
202
0
         (buf[pos - bufPos + 1] & 0xff);
203
0
  return gTrue;
204
0
}
205
206
0
GBool FileReader::getU32BE(int pos, Guint *val) {
207
0
  if (!fillBuf(pos, 4)) {
208
0
    return gFalse;
209
0
  }
210
0
  *val = ((buf[pos - bufPos] & 0xff) << 24) +
211
0
         ((buf[pos - bufPos + 1] & 0xff) << 16) +
212
0
         ((buf[pos - bufPos + 2] & 0xff) << 8) +
213
0
         (buf[pos - bufPos + 3] & 0xff);
214
0
  return gTrue;
215
0
}
216
217
0
GBool FileReader::getU32LE(int pos, Guint *val) {
218
0
  if (!fillBuf(pos, 4)) {
219
0
    return gFalse;
220
0
  }
221
0
  *val = (buf[pos - bufPos] & 0xff) +
222
0
         ((buf[pos - bufPos + 1] & 0xff) << 8) +
223
0
         ((buf[pos - bufPos + 2] & 0xff) << 16) +
224
0
         ((buf[pos - bufPos + 3] & 0xff) << 24);
225
0
  return gTrue;
226
0
}
227
228
0
GBool FileReader::getUVarBE(int pos, int size, Guint *val) {
229
0
  int i;
230
231
0
  if (size < 1 || size > 4 || !fillBuf(pos, size)) {
232
0
    return gFalse;
233
0
  }
234
0
  *val = 0;
235
0
  for (i = 0; i < size; ++i) {
236
0
    *val = (*val << 8) + (buf[pos - bufPos + i] & 0xff);
237
0
  }
238
0
  return gTrue;
239
0
}
240
241
0
GBool FileReader::cmp(int pos, const char *s) {
242
0
  int n;
243
244
0
  n = (int)strlen(s);
245
0
  if (!fillBuf(pos, n)) {
246
0
    return gFalse;
247
0
  }
248
0
  return !memcmp(buf - bufPos + pos, s, n);
249
0
}
250
251
0
GBool FileReader::fillBuf(int pos, int len) {
252
0
  if (pos < 0 || len < 0 || len > (int)sizeof(buf) ||
253
0
      pos > INT_MAX - (int)sizeof(buf)) {
254
0
    return gFalse;
255
0
  }
256
0
  if (pos >= bufPos && pos + len <= bufPos + bufLen) {
257
0
    return gTrue;
258
0
  }
259
0
  if (fseek(f, pos, SEEK_SET)) {
260
0
    return gFalse;
261
0
  }
262
0
  bufPos = pos;
263
0
  bufLen = (int)fread(buf, 1, sizeof(buf), f);
264
0
  if (bufLen < len) {
265
0
    return gFalse;
266
0
  }
267
0
  return gTrue;
268
0
}
269
270
//------------------------------------------------------------------------
271
272
class StreamReader: public Reader {
273
public:
274
275
  static StreamReader *make(int (*getCharA)(void *data), void *dataA);
276
  virtual ~StreamReader();
277
  virtual int getByte(int pos);
278
  virtual GBool getU16BE(int pos, int *val);
279
  virtual GBool getU32BE(int pos, Guint *val);
280
  virtual GBool getU32LE(int pos, Guint *val);
281
  virtual GBool getUVarBE(int pos, int size, Guint *val);
282
  virtual GBool cmp(int pos, const char *s);
283
284
private:
285
286
  StreamReader(int (*getCharA)(void *data), void *dataA);
287
  GBool fillBuf(int pos, int len);
288
289
  int (*getChar)(void *data);
290
  void *data;
291
  int streamPos;
292
  char buf[1024];
293
  int bufPos, bufLen;
294
};
295
296
0
StreamReader *StreamReader::make(int (*getCharA)(void *data), void *dataA) {
297
0
  return new StreamReader(getCharA, dataA);
298
0
}
299
300
0
StreamReader::StreamReader(int (*getCharA)(void *data), void *dataA) {
301
0
  getChar = getCharA;
302
0
  data = dataA;
303
0
  streamPos = 0;
304
0
  bufPos = 0;
305
0
  bufLen = 0;
306
0
}
307
308
0
StreamReader::~StreamReader() {
309
0
}
310
311
0
int StreamReader::getByte(int pos) {
312
0
  if (!fillBuf(pos, 1)) {
313
0
    return -1;
314
0
  }
315
0
  return buf[pos - bufPos] & 0xff;
316
0
}
317
318
0
GBool StreamReader::getU16BE(int pos, int *val) {
319
0
  if (!fillBuf(pos, 2)) {
320
0
    return gFalse;
321
0
  }
322
0
  *val = ((buf[pos - bufPos] & 0xff) << 8) +
323
0
         (buf[pos - bufPos + 1] & 0xff);
324
0
  return gTrue;
325
0
}
326
327
0
GBool StreamReader::getU32BE(int pos, Guint *val) {
328
0
  if (!fillBuf(pos, 4)) {
329
0
    return gFalse;
330
0
  }
331
0
  *val = ((buf[pos - bufPos] & 0xff) << 24) +
332
0
         ((buf[pos - bufPos + 1] & 0xff) << 16) +
333
0
         ((buf[pos - bufPos + 2] & 0xff) << 8) +
334
0
         (buf[pos - bufPos + 3] & 0xff);
335
0
  return gTrue;
336
0
}
337
338
0
GBool StreamReader::getU32LE(int pos, Guint *val) {
339
0
  if (!fillBuf(pos, 4)) {
340
0
    return gFalse;
341
0
  }
342
0
  *val = (buf[pos - bufPos] & 0xff) +
343
0
         ((buf[pos - bufPos + 1] & 0xff) << 8) +
344
0
         ((buf[pos - bufPos + 2] & 0xff) << 16) +
345
0
         ((buf[pos - bufPos + 3] & 0xff) << 24);
346
0
  return gTrue;
347
0
}
348
349
0
GBool StreamReader::getUVarBE(int pos, int size, Guint *val) {
350
0
  int i;
351
352
0
  if (size < 1 || size > 4 || !fillBuf(pos, size)) {
353
0
    return gFalse;
354
0
  }
355
0
  *val = 0;
356
0
  for (i = 0; i < size; ++i) {
357
0
    *val = (*val << 8) + (buf[pos - bufPos + i] & 0xff);
358
0
  }
359
0
  return gTrue;
360
0
}
361
362
0
GBool StreamReader::cmp(int pos, const char *s) {
363
0
  int n;
364
365
0
  n = (int)strlen(s);
366
0
  if (!fillBuf(pos, n)) {
367
0
    return gFalse;
368
0
  }
369
0
  return !memcmp(buf - bufPos + pos, s, n);
370
0
}
371
372
0
GBool StreamReader::fillBuf(int pos, int len) {
373
0
  int c;
374
375
0
  if (pos < 0 || len < 0 || len > (int)sizeof(buf) ||
376
0
      pos > INT_MAX - (int)sizeof(buf)) {
377
0
    return gFalse;
378
0
  }
379
0
  if (pos < bufPos) {
380
0
    return gFalse;
381
0
  }
382
383
  // if requested region will not fit in the current buffer...
384
0
  if (pos + len > bufPos + (int)sizeof(buf)) {
385
386
    // if the start of the requested data is already in the buffer, move
387
    // it to the start of the buffer
388
0
    if (pos < bufPos + bufLen) {
389
0
      bufLen -= pos - bufPos;
390
0
      memmove(buf, buf + (pos - bufPos), bufLen);
391
0
      bufPos = pos;
392
393
    // otherwise discard data from the
394
    // stream until we get to the requested position
395
0
    } else {
396
0
      bufPos += bufLen;
397
0
      bufLen = 0;
398
0
      while (bufPos < pos) {
399
0
  if ((c = (*getChar)(data)) < 0) {
400
0
    return gFalse;
401
0
  }
402
0
  ++bufPos;
403
0
      }
404
0
    }
405
0
  }
406
407
  // read the rest of the requested data
408
0
  while (bufPos + bufLen < pos + len) {
409
0
    if ((c = (*getChar)(data)) < 0) {
410
0
      return gFalse;
411
0
    }
412
0
    buf[bufLen++] = (char)c;
413
0
  }
414
415
0
  return gTrue;
416
0
}
417
418
//------------------------------------------------------------------------
419
420
static FoFiIdentifierType identify(Reader *reader);
421
static FoFiIdentifierType identifyOpenType(Reader *reader);
422
static FoFiIdentifierType identifyCFF(Reader *reader, int start);
423
424
0
FoFiIdentifierType FoFiIdentifier::identifyMem(char *file, int len) {
425
0
  MemReader *reader;
426
0
  FoFiIdentifierType type;
427
428
0
  if (!(reader = MemReader::make(file, len))) {
429
0
    return fofiIdError;
430
0
  }
431
0
  type = identify(reader);
432
0
  delete reader;
433
0
  return type;
434
0
}
435
436
0
FoFiIdentifierType FoFiIdentifier::identifyFile(char *fileName) {
437
0
  FileReader *reader;
438
0
  FoFiIdentifierType type;
439
0
  int n;
440
441
0
  if (!(reader = FileReader::make(fileName))) {
442
0
    return fofiIdError;
443
0
  }
444
0
  type = identify(reader);
445
0
  delete reader;
446
447
  // Mac OS X dfont files don't have any sort of header or magic number,
448
  // so look at the file name extension
449
0
  if (type == fofiIdUnknown) {
450
0
    n = (int)strlen(fileName);
451
0
    if (n >= 6 && !strcmp(fileName + n - 6, ".dfont")) {
452
0
      type = fofiIdDfont;
453
0
    }
454
0
  }
455
456
0
  return type;
457
0
}
458
459
FoFiIdentifierType FoFiIdentifier::identifyStream(int (*getChar)(void *data),
460
0
              void *data) {
461
0
  StreamReader *reader;
462
0
  FoFiIdentifierType type;
463
464
0
  if (!(reader = StreamReader::make(getChar, data))) {
465
0
    return fofiIdError;
466
0
  }
467
0
  type = identify(reader);
468
0
  delete reader;
469
0
  return type;
470
0
}
471
472
0
static FoFiIdentifierType identify(Reader *reader) {
473
0
  Guint n;
474
475
  //----- PFA
476
0
  if (reader->cmp(0, "%!PS-AdobeFont-1") ||
477
0
      reader->cmp(0, "%!FontType1")) {
478
0
    return fofiIdType1PFA;
479
0
  }
480
481
  //----- PFB
482
0
  if (reader->getByte(0) == 0x80 &&
483
0
      reader->getByte(1) == 0x01 &&
484
0
      reader->getU32LE(2, &n)) {
485
0
    if ((n >= 16 && reader->cmp(6, "%!PS-AdobeFont-1")) ||
486
0
  (n >= 11 && reader->cmp(6, "%!FontType1"))) {
487
0
      return fofiIdType1PFB;
488
0
    }
489
0
  }
490
491
  //----- TrueType
492
0
  if ((reader->getByte(0) == 0x00 &&
493
0
       reader->getByte(1) == 0x01 &&
494
0
       reader->getByte(2) == 0x00 &&
495
0
       reader->getByte(3) == 0x00) ||
496
0
      (reader->getByte(0) == 0x74 && // 'true'
497
0
       reader->getByte(1) == 0x72 &&
498
0
       reader->getByte(2) == 0x75 &&
499
0
       reader->getByte(3) == 0x65)) {
500
0
    return fofiIdTrueType;
501
0
  }
502
0
  if (reader->getByte(0) == 0x74 && // 'ttcf'
503
0
      reader->getByte(1) == 0x74 &&
504
0
      reader->getByte(2) == 0x63 &&
505
0
      reader->getByte(3) == 0x66) {
506
0
    return fofiIdTrueTypeCollection;
507
0
  }
508
509
  //----- OpenType
510
0
  if (reader->getByte(0) == 0x4f && // 'OTTO
511
0
      reader->getByte(1) == 0x54 &&
512
0
      reader->getByte(2) == 0x54 &&
513
0
      reader->getByte(3) == 0x4f) {
514
0
    return identifyOpenType(reader);
515
0
  }
516
517
  //----- CFF
518
0
  if (reader->getByte(0) == 0x01 &&
519
0
      reader->getByte(1) == 0x00) {
520
0
    return identifyCFF(reader, 0);
521
0
  }
522
  // some tools embed CFF fonts with an extra whitespace char at the
523
  // beginning
524
0
  if (reader->getByte(1) == 0x01 &&
525
0
      reader->getByte(2) == 0x00) {
526
0
    return identifyCFF(reader, 1);
527
0
  }
528
529
0
  return fofiIdUnknown;
530
0
}
531
532
0
static FoFiIdentifierType identifyOpenType(Reader *reader) {
533
0
  FoFiIdentifierType type;
534
0
  Guint offset;
535
0
  int nTables, i;
536
537
0
  if (!reader->getU16BE(4, &nTables)) {
538
0
    return fofiIdUnknown;
539
0
  }
540
0
  for (i = 0; i < nTables; ++i) {
541
0
    if (reader->cmp(12 + i*16, "CFF ")) {
542
0
      if (reader->getU32BE(12 + i*16 + 8, &offset) &&
543
0
    offset < (Guint)INT_MAX) {
544
0
  type = identifyCFF(reader, (int)offset);
545
0
  if (type == fofiIdCFF8Bit) {
546
0
    type = fofiIdOpenTypeCFF8Bit;
547
0
  } else if (type == fofiIdCFFCID) {
548
0
    type = fofiIdOpenTypeCFFCID;
549
0
  }
550
0
  return type;
551
0
      }
552
0
      return fofiIdUnknown;
553
0
    }
554
0
  }
555
0
  return fofiIdUnknown;
556
0
}
557
558
0
static FoFiIdentifierType identifyCFF(Reader *reader, int start) {
559
0
  Guint offset0, offset1;
560
0
  int hdrSize, offSize0, offSize1, pos, endPos, b0, n;
561
562
  //----- read the header
563
0
  if (reader->getByte(start) != 0x01 ||
564
0
      reader->getByte(start + 1) != 0x00) {
565
0
    return fofiIdUnknown;
566
0
  }
567
0
  if ((hdrSize = reader->getByte(start + 2)) < 0) {
568
0
    return fofiIdUnknown;
569
0
  }
570
0
  if ((offSize0 = reader->getByte(start + 3)) < 1 || offSize0 > 4) {
571
0
    return fofiIdUnknown;
572
0
  }
573
0
  pos = start + hdrSize;
574
0
  if (pos < 0) {
575
0
    return fofiIdUnknown;
576
0
  }
577
578
  //----- skip the name index
579
0
  if (!reader->getU16BE(pos, &n)) {
580
0
    return fofiIdUnknown;
581
0
  }
582
0
  if (n == 0) {
583
0
    pos += 2;
584
0
  } else {
585
0
    if ((offSize1 = reader->getByte(pos + 2)) < 1 || offSize1 > 4) {
586
0
      return fofiIdUnknown;
587
0
    }
588
0
    if (!reader->getUVarBE(pos + 3 + n * offSize1, offSize1, &offset1) ||
589
0
  offset1 > (Guint)INT_MAX) {
590
0
      return fofiIdUnknown;
591
0
    }
592
0
    pos += 3 + (n + 1) * offSize1 + (int)offset1 - 1;
593
0
  }
594
0
  if (pos < 0) {
595
0
    return fofiIdUnknown;
596
0
  }
597
598
  //----- parse the top dict index
599
0
  if (!reader->getU16BE(pos, &n) || n < 1) {
600
0
    return fofiIdUnknown;
601
0
  }
602
0
  if ((offSize1 = reader->getByte(pos + 2)) < 1 || offSize1 > 4) {
603
0
    return fofiIdUnknown;
604
0
  }
605
0
  if (!reader->getUVarBE(pos + 3, offSize1, &offset0) ||
606
0
      offset0 > (Guint)INT_MAX ||
607
0
      !reader->getUVarBE(pos + 3 + offSize1, offSize1, &offset1) ||
608
0
      offset1 > (Guint)INT_MAX ||
609
0
      offset0 > offset1) {
610
0
    return fofiIdUnknown;
611
0
  }
612
0
  pos = pos + 3 + (n + 1) * offSize1 + (int)offset0 - 1;
613
0
  endPos = pos + 3 + (n + 1) * offSize1 + (int)offset1 - 1;
614
0
  if (pos < 0 || endPos < 0 || pos > endPos) {
615
0
    return fofiIdUnknown;
616
0
  }
617
  
618
  //----- parse the top dict, look for ROS as first entry
619
  // for a CID font, the top dict starts with:
620
  //     <int> <int> <int> ROS
621
0
  while (pos >= 0 && pos < endPos) {
622
0
    b0 = reader->getByte(pos);
623
0
    if (b0 == 0x1c) {
624
0
      pos += 3;
625
0
    } else if (b0 == 0x1d) {
626
0
      pos += 5;
627
0
    } else if (b0 >= 0xf7 && b0 <= 0xfe) {
628
0
      pos += 2;
629
0
    } else if (b0 >= 0x20 && b0 <= 0xf6) {
630
0
      pos += 1;
631
0
    } else {
632
0
      break;
633
0
    }
634
0
  }
635
0
  if (pos + 1 < endPos &&
636
0
      reader->getByte(pos) == 12 &&
637
0
      reader->getByte(pos + 1) == 30) {
638
0
    return fofiIdCFFCID;
639
0
  } else {
640
0
    return fofiIdCFF8Bit;
641
0
  }
642
0
}
643
644
//------------------------------------------------------------------------
645
646
static GList *getTTCFontList(FILE *f);
647
static GList *getDfontFontList(FILE *f);
648
649
0
GList *FoFiIdentifier::getFontList(char *fileName) {
650
0
  FILE *f;
651
0
  char buf[4];
652
0
  GList *ret;
653
654
0
  if (!(f = fopen(fileName, "rb"))) {
655
0
    return NULL;
656
0
  }
657
0
  if (fread(buf, 1, 4, f) == 4 &&
658
0
      buf[0] == 0x74 &&    // 'ttcf'
659
0
      buf[1] == 0x74 &&
660
0
      buf[2] == 0x63 &&
661
0
      buf[3] == 0x66) {
662
0
    ret = getTTCFontList(f);
663
0
  } else {
664
0
    ret = getDfontFontList(f);
665
0
  }
666
0
  fclose(f);
667
0
  return ret;
668
0
}
669
670
0
static GList *getTTCFontList(FILE *f) {
671
0
  Guchar buf[12];
672
0
  Guchar *buf2;
673
0
  int fileLength, nFonts;
674
0
  int tabDirOffset, nTables, nameTabOffset, nNames, stringsOffset;
675
0
  int stringPlatform, stringLength, stringOffset;
676
0
  GBool stringUnicode;
677
0
  int i, j;
678
0
  GList *ret;
679
680
0
  fseek(f, 0, SEEK_END);
681
0
  fileLength = (int)ftell(f);
682
0
  if (fileLength < 0) {
683
0
    goto err1;
684
0
  }
685
0
  fseek(f, 8, SEEK_SET);
686
0
  if (fread(buf, 1, 4, f) != 4) {
687
0
    goto err1;
688
0
  }
689
0
  nFonts = (buf[0] << 24) | (buf[1] << 16) | (buf[2] << 8) | buf[3];
690
0
  if (nFonts < 0 ||
691
0
      12 + 4 * nFonts > fileLength) {
692
0
    goto err1;
693
0
  }
694
0
  ret = new GList();
695
0
  for (i = 0; i < nFonts; ++i) {
696
0
    fseek(f, 12 + 4 * i, SEEK_SET);
697
0
    if (fread(buf, 1, 4, f) != 4) {
698
0
      goto err2;
699
0
    }
700
0
    tabDirOffset = (buf[0] << 24) | (buf[1] << 16) | (buf[2] << 8) | buf[3];
701
0
    if (tabDirOffset < 0 ||
702
0
  tabDirOffset + 12 < 0 ||
703
0
  tabDirOffset + 12 > fileLength) {
704
0
      goto err2;
705
0
    }
706
0
    fseek(f, tabDirOffset, SEEK_SET);
707
0
    if (fread(buf, 1, 12, f) != 12) {
708
0
      goto err2;
709
0
    }
710
0
    nTables = (buf[4] << 8) | buf[5];
711
0
    if (tabDirOffset + 12 + 16 * nTables < 0 ||
712
0
  tabDirOffset + 12 + 16 * nTables > fileLength) {
713
0
      goto err2;
714
0
    }
715
0
    buf2 = (Guchar *)gmallocn(nTables, 16);
716
0
    if ((int)fread(buf2, 1, 16 * nTables, f) != 16 * nTables) {
717
0
      goto err3;
718
0
    }
719
0
    nameTabOffset = 0; // make gcc happy
720
0
    for (j = 0; j < nTables; ++j) {
721
0
      if (buf2[16*j + 0] == 'n' &&
722
0
    buf2[16*j + 1] == 'a' &&
723
0
    buf2[16*j + 2] == 'm' &&
724
0
    buf2[16*j + 3] == 'e') {
725
0
  nameTabOffset = (buf2[16*j + 8] << 24) | (buf2[16*j + 9] << 16) |
726
0
                  (buf2[16*j + 10] << 8) | buf2[16*j + 11];
727
0
  break;
728
0
      }
729
0
    }
730
0
    gfree(buf2);
731
0
    if (j >= nTables) {
732
0
      goto err2;
733
0
    }
734
0
    if (nameTabOffset < 0 ||
735
0
  nameTabOffset + 6 < 0 ||
736
0
  nameTabOffset + 6 > fileLength) {
737
0
      goto err2;
738
0
    }
739
0
    fseek(f, nameTabOffset, SEEK_SET);
740
0
    if (fread(buf, 1, 6, f) != 6) {
741
0
      goto err2;
742
0
    }
743
0
    nNames = (buf[2] << 8) | buf[3];
744
0
    stringsOffset = (buf[4] << 8) | buf[5];
745
0
    if (nameTabOffset + 6 + 12 * nNames < 0 ||
746
0
  nameTabOffset + 6 + 12 * nNames > fileLength ||
747
0
  nameTabOffset + stringsOffset < 0) {
748
0
      goto err2;
749
0
    }
750
0
    buf2 = (Guchar *)gmallocn(nNames, 12);
751
0
    if ((int)fread(buf2, 1, 12 * nNames, f) != 12 * nNames) {
752
0
      goto err3;
753
0
    }
754
0
    for (j = 0; j < nNames; ++j) {
755
0
      if (buf2[12*j + 6] == 0 &&   // 0x0004 = full name
756
0
    buf2[12*j + 7] == 4) {
757
0
  break;
758
0
      }
759
0
    }
760
0
    if (j >= nNames) {
761
0
      goto err3;
762
0
    }
763
0
    stringPlatform = (buf2[12*j] << 8) | buf2[12*j + 1];
764
    // stringEncoding = (buf2[12*j + 2] << 8) | buf2[12*j + 3];
765
0
    stringUnicode = stringPlatform == 0 || stringPlatform == 3;
766
0
    stringLength = (buf2[12*j + 8] << 8) | buf2[12*j + 9];
767
0
    stringOffset = nameTabOffset + stringsOffset +
768
0
                   ((buf2[12*j + 10] << 8) | buf2[12*j + 11]);
769
0
    gfree(buf2);
770
0
    if (stringOffset < 0 ||
771
0
  stringOffset + stringLength < 0 ||
772
0
  stringOffset + stringLength > fileLength) {
773
0
      goto err2;
774
0
    }
775
0
    buf2 = (Guchar *)gmalloc(stringLength);
776
0
    fseek(f, stringOffset, SEEK_SET);
777
0
    if ((int)fread(buf2, 1, stringLength, f) != stringLength) {
778
0
      goto err3;
779
0
    }
780
0
    if (stringUnicode) {
781
0
      stringLength /= 2;
782
0
      for (j = 0; j < stringLength; ++j) {
783
0
  buf2[j] = buf2[2*j + 1];
784
0
      }
785
0
    }
786
0
    ret->append(new GString((char *)buf2, stringLength));
787
0
    gfree(buf2);
788
0
  }
789
0
  return ret;
790
791
0
 err3:
792
0
  gfree(buf2);
793
0
 err2:
794
0
  deleteGList(ret, GString);
795
0
 err1:
796
0
  return NULL;
797
0
}
798
799
0
static GList *getDfontFontList(FILE *f) {
800
0
  Guchar buf[16];
801
0
  Guchar *resMap;
802
0
  int fileLength, resMapOffset, resMapLength;
803
0
  int resTypeListOffset, resNameListOffset, nTypes;
804
0
  int refListOffset, nFonts, nameOffset, nameLen;
805
0
  int offset, i;
806
0
  GList *ret;
807
808
0
  fseek(f, 0, SEEK_END);
809
0
  fileLength = (int)ftell(f);
810
0
  if (fileLength < 0) {
811
0
    goto err1;
812
0
  }
813
0
  fseek(f, 0, SEEK_SET);
814
0
  if (fread((char *)buf, 1, 16, f) != 16) {
815
0
    goto err1;
816
0
  }
817
0
  resMapOffset = (buf[4] << 24) | (buf[5] << 16) | (buf[6] << 8) | buf[7];
818
0
  resMapLength = (buf[12] << 24) | (buf[13] << 16) | (buf[14] << 8) | buf[15];
819
0
  if (resMapOffset < 0 ||
820
0
      resMapOffset >= fileLength ||
821
0
      resMapLength < 0 ||
822
0
      resMapOffset + resMapLength > fileLength ||
823
0
      resMapOffset + resMapLength < 0) {
824
0
    goto err1;
825
0
  }
826
0
  if (resMapLength > 32768) {
827
    // sanity check - this probably isn't a dfont file
828
0
    goto err1;
829
0
  }
830
0
  resMap = (Guchar *)gmalloc(resMapLength);
831
0
  fseek(f, resMapOffset, SEEK_SET);
832
0
  if ((int)fread((char *)resMap, 1, resMapLength, f) != resMapLength) {
833
0
    goto err2;
834
0
  }
835
0
  resTypeListOffset = (resMap[24] << 8) | resMap[25];
836
0
  resNameListOffset = (resMap[26] << 8) | resMap[27];
837
0
  nTypes = ((resMap[28] << 8) | resMap[29]) + 1;
838
0
  if (resTypeListOffset + 2 + nTypes * 8 > resMapLength ||
839
0
      resNameListOffset >= resMapLength) {
840
0
    goto err2;
841
0
  }
842
0
  nFonts = 0;
843
0
  refListOffset = 0;
844
0
  for (i = 0; i < nTypes; ++i) {
845
0
    offset = resTypeListOffset + 2 + 8 * i;
846
0
    if (resMap[offset] == 0x73 &&    // 'sfnt'
847
0
  resMap[offset+1] == 0x66 &&
848
0
  resMap[offset+2] == 0x6e &&
849
0
  resMap[offset+3] == 0x74) {
850
0
      nFonts = ((resMap[offset+4] << 8) | resMap[offset+5]) + 1;
851
0
      refListOffset = (resMap[offset+6] << 8) | resMap[offset+7];
852
0
      break;
853
0
    }
854
0
  }
855
0
  if (i >= nTypes) {
856
0
    goto err2;
857
0
  }
858
0
  if (resTypeListOffset + refListOffset >= resMapLength ||
859
0
      resTypeListOffset + refListOffset + nFonts * 12 > resMapLength) {
860
0
    goto err2;
861
0
  }
862
0
  ret = new GList();
863
0
  for (i = 0; i < nFonts; ++i) {
864
0
    offset = resTypeListOffset + refListOffset + 12 * i;
865
0
    nameOffset = (resMap[offset+2] << 8) | resMap[offset+3];
866
0
    offset = resNameListOffset + nameOffset;
867
0
    if (offset >= resMapLength) {
868
0
      goto err3;
869
0
    }
870
0
    nameLen = resMap[offset];
871
0
    if (offset + 1 + nameLen > resMapLength) {
872
0
      goto err3;
873
0
    }
874
0
    ret->append(new GString((char *)resMap + offset + 1, nameLen));
875
0
  }
876
0
  gfree(resMap);
877
0
  return ret;
878
879
0
 err3:
880
0
  deleteGList(ret, GString);
881
0
 err2:
882
0
  gfree(resMap);
883
0
 err1:
884
0
  return NULL;
885
0
}