/
physfs_archiver_iso9660.c
386 lines (323 loc) · 13.5 KB
1
2
3
4
5
/*
* ISO9660 support routines for PhysicsFS.
*
* Please see the file LICENSE.txt in the source's root directory.
*
6
7
8
* This file originally written by Christoph Nelles, but was largely
* rewritten by Ryan C. Gordon (so please harass Ryan about bugs and not
* Christoph).
9
10
11
12
13
14
*/
/*
* Handles CD-ROM disk images (and raw CD-ROM devices).
*
* Not supported:
15
* - Rock Ridge (needed for sparse files, device nodes and symlinks, etc).
16
* - Non 2048 Sectors
17
* - TRANS.TBL (maps 8.3 filenames on old discs to long filenames).
18
* - Multiextents (4gb max file size without it).
19
20
21
22
23
24
25
26
27
28
29
30
31
* - UDF
*
* Deviations from the standard
* - Ignores mandatory sort order
* - Allows various invalid file names
*
* Problems
* - Ambiguities in the standard
*/
#define __PHYSICSFS_INTERNAL__
#include "physfs_internal.h"
32
33
#if PHYSFS_SUPPORTS_ISO9660
34
35
#include <time.h>
36
37
38
39
40
41
42
43
44
45
46
47
/* ISO9660 often stores values in both big and little endian formats: little
first, followed by big. While technically there might be different values
in each, we just always use the littleendian ones and swap ourselves. The
fields aren't aligned anyhow, so you have to serialize them in any case
to avoid crashes on many CPU archs in any case. */
static int iso9660LoadEntries(PHYSFS_Io *io, const int joliet,
const char *base, const PHYSFS_uint64 dirstart,
const PHYSFS_uint64 dirend, void *unpkarc);
static int iso9660AddEntry(PHYSFS_Io *io, const int joliet, const int isdir,
const char *base, PHYSFS_uint8 *fname,
48
const int fnamelen, const PHYSFS_sint64 ts,
49
50
const PHYSFS_uint64 pos, const PHYSFS_uint64 len,
void *unpkarc)
51
52
53
54
55
56
{
char *fullpath;
char *fnamecpy;
size_t baselen;
size_t fullpathlen;
void *entry;
57
int i;
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
if (fnamelen == 1 && ((fname[0] == 0) || (fname[0] == 1)))
return 1; /* Magic that represents "." and "..", ignore */
BAIL_IF(fnamelen == 0, PHYSFS_ERR_CORRUPT, 0);
assert(fnamelen > 0);
assert(fnamelen <= 255);
BAIL_IF(joliet && (fnamelen % 2), PHYSFS_ERR_CORRUPT, 0);
/* Joliet is UCS-2, so at most UTF-8 will double the byte size */
baselen = strlen(base);
fullpathlen = baselen + (fnamelen * (joliet ? 2 : 1)) + 2;
fullpath = (char *) __PHYSFS_smallAlloc(fullpathlen);
BAIL_IF(!fullpath, PHYSFS_ERR_OUT_OF_MEMORY, 0);
fnamecpy = fullpath;
if (baselen > 0)
74
{
75
76
77
78
snprintf(fullpath, fullpathlen, "%s/", base);
fnamecpy += baselen + 1;
fullpathlen -= baselen - 1;
} /* if */
79
80
if (joliet)
81
{
82
83
84
85
86
87
PHYSFS_uint16 *ucs2 = (PHYSFS_uint16 *) fname;
int total = fnamelen / 2;
for (i = 0; i < total; i++)
ucs2[i] = PHYSFS_swapUBE16(ucs2[i]);
ucs2[total] = '\0';
PHYSFS_utf8FromUcs2(ucs2, fnamecpy, fullpathlen);
88
89
90
} /* if */
else
{
91
92
93
94
95
96
97
98
99
for (i = 0; i < fnamelen; i++)
{
/* We assume the filenames are low-ASCII; consider the archive
corrupt if we see something above 127, since we don't know the
encoding. (We can change this later if we find out these exist
and are intended to be, say, latin-1 or UTF-8 encoding). */
BAIL_IF(fname[i] > 127, PHYSFS_ERR_CORRUPT, 0);
fnamecpy[i] = fname[i];
} /* for */
100
fnamecpy[fnamelen] = '\0';
101
102
103
104
105
106
107
108
109
if (!isdir)
{
/* find last SEPARATOR2 */
char *ptr = strrchr(fnamecpy, ';');
if (ptr && (ptr != fnamecpy))
*(ptr--) = '\0';
else
ptr = fnamecpy + (fnamelen - 1);
110
111
112
113
114
115
/* chop out any trailing '.', as done in all implementations */
if (*ptr == '.')
*ptr = '\0';
} /* if */
} /* else */
116
117
entry = UNPK_addEntry(unpkarc, fullpath, isdir, ts, ts, pos, len);
118
if ((entry) && (isdir))
119
{
120
121
if (!iso9660LoadEntries(io, joliet, fullpath, pos, pos + len, unpkarc))
entry = NULL; /* so we report a failure later. */
122
123
} /* if */
124
125
126
__PHYSFS_smallFree(fullpath);
return entry != NULL;
} /* iso9660AddEntry */
127
128
129
130
static int iso9660LoadEntries(PHYSFS_Io *io, const int joliet,
const char *base, const PHYSFS_uint64 dirstart,
const PHYSFS_uint64 dirend, void *unpkarc)
131
{
132
PHYSFS_uint64 readpos = dirstart;
133
134
135
while (1)
{
136
137
138
139
140
141
142
143
144
PHYSFS_uint8 recordlen;
PHYSFS_uint8 extattrlen;
PHYSFS_uint32 extent;
PHYSFS_uint32 datalen;
PHYSFS_uint8 ignore[4];
PHYSFS_uint8 year, month, day, hour, minute, second, offset;
PHYSFS_uint8 flags;
PHYSFS_uint8 fnamelen;
PHYSFS_uint8 fname[256];
145
146
PHYSFS_sint64 timestamp;
struct tm t;
147
148
149
150
int isdir;
int multiextent;
BAIL_IF_ERRPASS(!io->seek(io, readpos), 0);
151
152
/* recordlen = 0 -> no more entries or fill entry */
153
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &recordlen, 1), 0);
154
155
156
if (recordlen > 0)
readpos += recordlen; /* ready to seek to next record. */
else
157
{
158
159
PHYSFS_uint64 nextpos;
160
/* if we are in the last sector of the directory & it's 0 -> end */
161
if ((dirend - 2048) <= (readpos - 1))
162
163
164
break; /* finished */
/* else skip to the next sector & continue; */
165
166
167
168
nextpos = (((readpos - 1) / 2048) + 1) * 2048;
/* whoops, can't make forward progress! */
BAIL_IF(nextpos == readpos, PHYSFS_ERR_CORRUPT, 0);
169
170
171
172
readpos = nextpos;
continue; /* start back at upper loop. */
} /* else */
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &extattrlen, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &extent, 4), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* extent be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &datalen, 4), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* datalen be */
/* record timestamp */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &year, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &month, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &day, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &hour, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &minute, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &second, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &offset, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &flags, 1), 0);
isdir = (flags & (1 << 1)) != 0;
multiextent = (flags & (1 << 7)) != 0;
BAIL_IF(multiextent, PHYSFS_ERR_UNSUPPORTED, 0); /* !!! FIXME */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 1), 0); /* unit size */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 1), 0); /* interleave gap */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* seqnum le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* seqnum be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &fnamelen, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, fname, fnamelen), 0);
201
202
203
204
205
206
207
208
209
210
t.tm_sec = second;
t.tm_min = minute;
t.tm_hour = hour;
t.tm_mday = day;
t.tm_mon = month - 1;
t.tm_year = year;
t.tm_wday = 0;
t.tm_yday = 0;
t.tm_isdst = -1;
timestamp = (PHYSFS_sint64) mktime(&t);
211
212
extent += extattrlen; /* skip extended attribute record. */
213
214
215
216
/* infinite loop, corrupt file? */
BAIL_IF((extent * 2048) == dirstart, PHYSFS_ERR_CORRUPT, 0);
217
if (!iso9660AddEntry(io, joliet, isdir, base, fname, fnamelen,
218
timestamp, extent * 2048, datalen, unpkarc))
219
{
220
return 0;
221
222
223
} /* if */
} /* while */
224
225
return 1;
} /* iso9660LoadEntries */
226
227
228
static int parseVolumeDescriptor(PHYSFS_Io *io, PHYSFS_uint64 *_rootpos,
229
230
PHYSFS_uint64 *_rootlen, int *_joliet,
int *_claimed)
231
{
232
233
234
PHYSFS_uint64 pos = 32768; /* start at the Primary Volume Descriptor */
int found = 0;
int done = 0;
235
236
*_joliet = 0;
237
238
while (!done)
239
{
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
PHYSFS_uint8 type;
PHYSFS_uint8 identifier[5];
PHYSFS_uint8 version;
PHYSFS_uint8 flags;
PHYSFS_uint8 escapeseqs[32];
PHYSFS_uint8 ignore[32];
PHYSFS_uint16 blocksize;
PHYSFS_uint32 extent;
PHYSFS_uint32 datalen;
BAIL_IF_ERRPASS(!io->seek(io, pos), 0);
pos += 2048; /* each volume descriptor is 2048 bytes */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &type, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &identifier, 5), 0);
256
if (memcmp(identifier, "CD001", 5) != 0) /* maybe not an iso? */
257
{
258
BAIL_IF(!*_claimed, PHYSFS_ERR_UNSUPPORTED, 0);
259
continue; /* just skip this one */
260
261
} /* if */
262
*_claimed = 1; /* okay, this is probably an iso. */
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &version, 1), 0); /* version */
BAIL_IF(version != 1, PHYSFS_ERR_UNSUPPORTED, 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &flags, 1), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 32), 0); /* system id */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 32), 0); /* volume id */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 8), 0); /* reserved */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* space le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* space be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, escapeseqs, 32), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* setsize le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* setsize be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* seq num le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* seq num be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &blocksize, 2), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 2), 0); /* blocklen be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* pthtablen le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* pthtablen be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* pthtabpos le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* optpthtabpos le */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* pthtabpos be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* optpthtabpos be */
/* root directory record... */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 1), 0); /* len */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 1), 0); /* attr len */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &extent, 4), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* extent be */
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, &datalen, 4), 0);
BAIL_IF_ERRPASS(!__PHYSFS_readAll(io, ignore, 4), 0); /* datalen be */
/* !!! FIXME: deal with this properly. */
blocksize = PHYSFS_swapULE32(blocksize);
BAIL_IF(blocksize && (blocksize != 2048), PHYSFS_ERR_UNSUPPORTED, 0);
switch (type)
300
{
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
case 1: /* Primary Volume Descriptor */
case 2: /* Supplementary Volume Descriptor */
if (found < type)
{
*_rootpos = PHYSFS_swapULE32(extent) * 2048;
*_rootlen = PHYSFS_swapULE32(datalen);
found = type;
if (found == 2) /* possible Joliet volume */
{
const PHYSFS_uint8 *s = escapeseqs;
*_joliet = !(flags & 1) &&
(s[0] == 0x25) && (s[1] == 0x2F) &&
((s[2] == 0x40) || (s[2] == 0x43) || (s[2] == 0x45));
} /* if */
} /* if */
break;
case 255: /* type 255 terminates the volume descriptor list */
done = 1;
break;
default:
break; /* skip unknown types. */
} /* switch */
326
327
} /* while */
328
BAIL_IF(!found, PHYSFS_ERR_CORRUPT, 0);
329
330
return 1;
331
} /* parseVolumeDescriptor */
332
333
334
335
static void *ISO9660_openArchive(PHYSFS_Io *io, const char *filename,
int forWriting, int *claimed)
336
{
337
338
PHYSFS_uint64 rootpos = 0;
PHYSFS_uint64 len = 0;
339
340
int joliet = 0;
void *unpkarc = NULL;
341
342
assert(io != NULL); /* shouldn't ever happen. */
343
344
BAIL_IF(forWriting, PHYSFS_ERR_READ_ONLY, NULL);
345
346
347
if (!parseVolumeDescriptor(io, &rootpos, &len, &joliet, claimed))
return NULL;
348
349
350
unpkarc = UNPK_openArchive(io);
BAIL_IF_ERRPASS(!unpkarc, NULL);
351
352
353
if (!iso9660LoadEntries(io, joliet, "", rootpos, rootpos + len, unpkarc))
{
354
UNPK_abandonArchive(unpkarc);
355
356
return NULL;
} /* if */
357
358
359
return unpkarc;
} /* ISO9660_openArchive */
360
361
362
363
const PHYSFS_Archiver __PHYSFS_Archiver_ISO9660 =
{
364
CURRENT_PHYSFS_ARCHIVER_API_VERSION,
365
366
367
{
"ISO",
"ISO9660 image file",
368
369
"Ryan C. Gordon <icculus@icculus.org>",
"https://icculus.org/physfs/",
370
0, /* supportsSymlinks */
371
},
372
ISO9660_openArchive,
373
UNPK_enumerate,
374
375
376
377
378
379
380
UNPK_openRead,
UNPK_openWrite,
UNPK_openAppend,
UNPK_remove,
UNPK_mkdir,
UNPK_stat,
UNPK_closeArchive
381
382
};
383
384
#endif /* defined PHYSFS_SUPPORTS_ISO9660 */
385
/* end of physfs_archiver_iso9660.c ... */