/
physfs.c
1457 lines (1147 loc) · 34.9 KB
1
2
3
4
5
6
7
8
9
10
/**
* PhysicsFS; a portable, flexible file i/o abstraction.
*
* Documentation is in physfs.h. It's verbose, honest. :)
*
* Please see the file LICENSE in the source's root directory.
*
* This file written by Ryan C. Gordon.
*/
11
12
13
14
#if HAVE_CONFIG_H
# include <config.h>
#endif
15
16
17
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
18
19
#include <fcntl.h>
#include <errno.h>
20
21
22
#include <assert.h>
#include "physfs.h"
23
24
25
#define __PHYSICSFS_INTERNAL__
#include "physfs_internal.h"
26
27
typedef struct __PHYSFS_ERRMSGTYPE__
{
28
PHYSFS_uint64 tid;
29
30
31
32
33
int errorAvailable;
char errorString[80];
struct __PHYSFS_ERRMSGTYPE__ *next;
} ErrMsg;
34
typedef struct __PHYSFS_DIRINFO__
35
36
{
char *dirName;
37
38
DirHandle *dirHandle;
struct __PHYSFS_DIRINFO__ *next;
39
} PhysDirInfo;
40
41
42
typedef struct __PHYSFS_FILEHANDLELIST__
{
43
PHYSFS_file handle;
44
45
struct __PHYSFS_FILEHANDLELIST__ *next;
} FileHandleList;
46
47
48
/* The various i/o drivers... */
49
50
#if (defined PHYSFS_SUPPORTS_ZIP)
51
52
extern const PHYSFS_ArchiveInfo __PHYSFS_ArchiveInfo_ZIP;
extern const DirFunctions __PHYSFS_DirFunctions_ZIP;
53
#endif
54
55
56
57
58
59
#if (defined PHYSFS_SUPPORTS_GRP)
extern const PHYSFS_ArchiveInfo __PHYSFS_ArchiveInfo_GRP;
extern const DirFunctions __PHYSFS_DirFunctions_GRP;
#endif
60
extern const DirFunctions __PHYSFS_DirFunctions_DIR;
61
62
static const PHYSFS_ArchiveInfo *supported_types[] =
63
64
{
#if (defined PHYSFS_SUPPORTS_ZIP)
65
&__PHYSFS_ArchiveInfo_ZIP,
66
67
#endif
68
69
70
71
#if (defined PHYSFS_SUPPORTS_GRP)
&__PHYSFS_ArchiveInfo_GRP,
#endif
72
73
74
NULL
};
75
76
77
78
79
80
static const DirFunctions *dirFunctions[] =
{
#if (defined PHYSFS_SUPPORTS_ZIP)
&__PHYSFS_DirFunctions_ZIP,
#endif
81
82
83
84
#if (defined PHYSFS_SUPPORTS_GRP)
&__PHYSFS_DirFunctions_GRP,
#endif
85
86
87
&__PHYSFS_DirFunctions_DIR,
NULL
};
88
89
90
91
92
93
/* General PhysicsFS state ... */
static int initialized = 0;
static ErrMsg *errorMessages = NULL;
94
95
static PhysDirInfo *searchPath = NULL;
static PhysDirInfo *writeDir = NULL;
96
97
98
99
100
101
static FileHandleList *openWriteList = NULL;
static FileHandleList *openReadList = NULL;
static char *baseDir = NULL;
static char *userDir = NULL;
static int allowSymLinks = 0;
102
103
104
/* mutexes ... */
static void *errorLock = NULL; /* protects error message list. */
static void *stateLock = NULL; /* protects other PhysFS static state. */
105
106
107
108
/* functions ... */
109
110
111
static ErrMsg *findErrorForCurrentThread(void)
{
ErrMsg *i;
112
PHYSFS_uint64 tid;
113
114
115
116
if (initialized)
__PHYSFS_platformGrabMutex(errorLock);
117
118
if (errorMessages != NULL)
{
119
tid = __PHYSFS_platformGetThreadID();
120
121
122
123
for (i = errorMessages; i != NULL; i = i->next)
{
if (i->tid == tid)
124
125
{
__PHYSFS_platformReleaseMutex(errorLock);
126
return(i);
127
} /* if */
128
129
} /* for */
} /* if */
130
131
132
if (initialized)
__PHYSFS_platformReleaseMutex(errorLock);
133
134
135
136
137
return(NULL); /* no error available. */
} /* findErrorForCurrentThread */
138
void __PHYSFS_setError(const char *str)
139
{
140
141
142
143
144
145
ErrMsg *err;
if (str == NULL)
return;
err = findErrorForCurrentThread();
146
147
148
149
150
151
152
if (err == NULL)
{
err = (ErrMsg *) malloc(sizeof (ErrMsg));
if (err == NULL)
return; /* uhh...? */
153
memset((void *) err, '\0', sizeof (ErrMsg));
154
err->tid = __PHYSFS_platformGetThreadID();
155
156
__PHYSFS_platformGrabMutex(errorLock);
157
158
err->next = errorMessages;
errorMessages = err;
159
__PHYSFS_platformReleaseMutex(errorLock);
160
161
162
163
164
} /* if */
err->errorAvailable = 1;
strncpy(err->errorString, str, sizeof (err->errorString));
err->errorString[sizeof (err->errorString) - 1] = '\0';
165
} /* __PHYSFS_setError */
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
const char *PHYSFS_getLastError(void)
{
ErrMsg *err = findErrorForCurrentThread();
if ((err == NULL) || (!err->errorAvailable))
return(NULL);
err->errorAvailable = 0;
return(err->errorString);
} /* PHYSFS_getLastError */
/* MAKE SURE that errorLock is held before calling this! */
181
182
183
184
185
186
187
static void freeErrorMessages(void)
{
ErrMsg *i;
ErrMsg *next;
for (i = errorMessages; i != NULL; i = next)
{
188
next = i->next;
189
190
191
192
193
free(i);
} /* for */
} /* freeErrorMessages */
194
195
196
197
198
199
200
201
202
203
204
void PHYSFS_getLinkedVersion(PHYSFS_Version *ver)
{
if (ver != NULL)
{
ver->major = PHYSFS_VER_MAJOR;
ver->minor = PHYSFS_VER_MINOR;
ver->patch = PHYSFS_VER_PATCH;
} /* if */
} /* PHYSFS_getLinkedVersion */
205
206
207
208
static DirHandle *openDirectory(const char *d, int forWriting)
{
const DirFunctions **i;
209
210
BAIL_IF_MACRO(!__PHYSFS_platformExists(d), ERR_NO_SUCH_FILE, NULL);
211
212
213
214
215
216
217
218
219
220
221
for (i = dirFunctions; *i != NULL; i++)
{
if ((*i)->isArchive(d, forWriting))
return( (*i)->openArchive(d, forWriting) );
} /* for */
__PHYSFS_setError(ERR_UNSUPPORTED_ARCHIVE);
return(NULL);
} /* openDirectory */
222
static PhysDirInfo *buildDirInfo(const char *newDir, int forWriting)
223
224
{
DirHandle *dirHandle = NULL;
225
PhysDirInfo *di = NULL;
226
227
228
229
230
231
BAIL_IF_MACRO(newDir == NULL, ERR_INVALID_ARGUMENT, 0);
dirHandle = openDirectory(newDir, forWriting);
BAIL_IF_MACRO(dirHandle == NULL, NULL, 0);
232
di = (PhysDirInfo *) malloc(sizeof (PhysDirInfo));
233
if (di == NULL)
234
{
235
dirHandle->funcs->dirClose(dirHandle);
236
237
BAIL_IF_MACRO(di == NULL, ERR_OUT_OF_MEMORY, 0);
} /* if */
238
239
240
241
242
di->dirName = (char *) malloc(strlen(newDir) + 1);
if (di->dirName == NULL)
{
free(di);
243
dirHandle->funcs->dirClose(dirHandle);
244
BAIL_MACRO(ERR_OUT_OF_MEMORY, 0);
245
246
247
248
249
250
251
252
253
} /* if */
di->next = NULL;
di->dirHandle = dirHandle;
strcpy(di->dirName, newDir);
return(di);
} /* buildDirInfo */
254
/* MAKE SURE you've got the stateLock held before calling this! */
255
static int freeDirInfo(PhysDirInfo *di, FileHandleList *openList)
256
257
258
259
260
261
262
263
{
FileHandleList *i;
if (di == NULL)
return(1);
for (i = openList; i != NULL; i = i->next)
{
264
const DirHandle *h = ((FileHandle *) &(i->handle.opaque))->dirHandle;
265
266
BAIL_IF_MACRO(h == di->dirHandle, ERR_FILES_STILL_OPEN, 0);
} /* for */
267
268
di->dirHandle->funcs->dirClose(di->dirHandle);
269
270
271
272
273
274
275
free(di->dirName);
free(di);
return(1);
} /* freeDirInfo */
static char *calculateUserDir(void)
276
277
278
279
280
281
{
char *retval = NULL;
const char *str = NULL;
str = __PHYSFS_platformGetUserDir();
if (str != NULL)
282
retval = (char *) str;
283
284
285
286
287
288
else
{
const char *dirsep = PHYSFS_getDirSeparator();
const char *uname = __PHYSFS_platformGetUserName();
str = (uname != NULL) ? uname : "default";
289
retval = (char *) malloc(strlen(baseDir) + strlen(str) +
290
strlen(dirsep) + 6);
291
292
293
294
if (retval == NULL)
__PHYSFS_setError(ERR_OUT_OF_MEMORY);
else
295
sprintf(retval, "%susers%s%s", baseDir, dirsep, str);
296
297
if (uname != NULL)
298
free((void *) uname);
299
300
301
302
303
304
} /* else */
return(retval);
} /* calculateUserDir */
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
static int appendDirSep(char **dir)
{
const char *dirsep = PHYSFS_getDirSeparator();
char *ptr;
if (strcmp((*dir + strlen(*dir)) - strlen(dirsep), dirsep) == 0)
return(1);
ptr = realloc(*dir, strlen(*dir) + strlen(dirsep) + 1);
if (!ptr)
{
free(*dir);
return(0);
} /* if */
strcat(ptr, dirsep);
*dir = ptr;
return(1);
} /* appendDirSep */
326
327
static char *calculateBaseDir(const char *argv0)
{
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
const char *dirsep = PHYSFS_getDirSeparator();
char *retval;
char *ptr;
/*
* See if the platform driver wants to handle this for us...
*/
retval = __PHYSFS_platformCalcBaseDir(argv0);
if (retval != NULL)
return(retval);
/*
* Determine if there's a path on argv0. If there is, that's the base dir.
*/
ptr = strstr(argv0, dirsep);
if (ptr != NULL)
{
char *p = ptr;
size_t size;
while (p != NULL)
{
ptr = p;
p = strstr(p + 1, dirsep);
} /* while */
353
size = (size_t) (ptr - argv0);
354
355
356
357
358
359
360
361
362
363
retval = (char *) malloc(size + 1);
BAIL_IF_MACRO(retval == NULL, ERR_OUT_OF_MEMORY, NULL);
memcpy(retval, argv0, size);
retval[size] = '\0';
return(retval);
} /* if */
/*
* Last ditch effort: it's the current working directory. (*shrug*)
*/
364
365
366
367
368
369
370
371
372
373
374
375
376
retval = __PHYSFS_platformCurrentDir();
if(retval != NULL) {
return(retval);
}
/*
* Ok, current directory doesn't exist, use the root directory.
* Not a good alternative, but it only happens if the current
* directory was deleted from under the program.
*/
retval = (char *) malloc(strlen(dirsep) + 1);
strcpy(retval, dirsep);
return(retval);
377
378
379
} /* calculateBaseDir */
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
static int initializeMutexes(void)
{
errorLock = __PHYSFS_platformCreateMutex();
if (errorLock == NULL)
goto initializeMutexes_failed;
stateLock = __PHYSFS_platformCreateMutex();
if (stateLock == NULL)
goto initializeMutexes_failed;
return(1); /* success. */
initializeMutexes_failed:
if (errorLock != NULL)
__PHYSFS_platformDestroyMutex(errorLock);
if (stateLock != NULL)
__PHYSFS_platformDestroyMutex(stateLock);
errorLock = stateLock = NULL;
return(0); /* failed. */
} /* initializeMutexes */
404
405
int PHYSFS_init(const char *argv0)
{
406
407
char *ptr;
408
BAIL_IF_MACRO(initialized, ERR_IS_INITIALIZED, 0);
409
BAIL_IF_MACRO(!__PHYSFS_platformInit(), NULL, 0);
410
411
412
BAIL_IF_MACRO(!initializeMutexes(), NULL, 0);
413
baseDir = calculateBaseDir(argv0);
414
BAIL_IF_MACRO(baseDir == NULL, NULL, 0);
415
416
417
418
419
420
ptr = __PHYSFS_platformRealPath(baseDir);
free(baseDir);
BAIL_IF_MACRO(ptr == NULL, NULL, 0);
baseDir = ptr;
421
BAIL_IF_MACRO(!appendDirSep(&baseDir), NULL, 0);
422
423
userDir = calculateUserDir();
424
425
426
427
428
429
430
if (userDir != NULL)
{
ptr = __PHYSFS_platformRealPath(userDir);
free(userDir);
userDir = ptr;
} /* if */
431
if ((userDir == NULL) || (!appendDirSep(&userDir)))
432
433
434
435
436
437
{
free(baseDir);
baseDir = NULL;
return(0);
} /* if */
438
initialized = 1;
439
440
441
/* This makes sure that the error subsystem is initialized. */
__PHYSFS_setError(PHYSFS_getLastError());
442
443
444
445
return(1);
} /* PHYSFS_init */
446
/* MAKE SURE you hold stateLock before calling this! */
447
static int closeFileHandleList(FileHandleList **list)
448
449
450
{
FileHandleList *i;
FileHandleList *next = NULL;
451
FileHandle *h;
452
453
454
455
for (i = *list; i != NULL; i = next)
{
next = i->next;
456
457
h = (FileHandle *) (i->handle.opaque);
if (!h->funcs->fileClose(h))
458
459
460
461
462
463
{
*list = i;
return(0);
} /* if */
free(i);
464
465
466
} /* for */
*list = NULL;
467
468
return(1);
} /* closeFileHandleList */
469
470
471
/* MAKE SURE you hold the stateLock before calling this! */
472
473
static void freeSearchPath(void)
{
474
475
PhysDirInfo *i;
PhysDirInfo *next = NULL;
476
477
478
closeFileHandleList(&openReadList);
479
480
481
482
if (searchPath != NULL)
{
for (i = searchPath; i != NULL; i = next)
{
483
next = i->next;
484
freeDirInfo(i, openReadList);
485
486
487
488
489
490
} /* for */
searchPath = NULL;
} /* if */
} /* freeSearchPath */
491
int PHYSFS_deinit(void)
492
493
{
BAIL_IF_MACRO(!initialized, ERR_NOT_INITIALIZED, 0);
494
BAIL_IF_MACRO(!__PHYSFS_platformDeinit(), NULL, 0);
495
496
closeFileHandleList(&openWriteList);
497
498
BAIL_IF_MACRO(!PHYSFS_setWriteDir(NULL), ERR_FILES_STILL_OPEN, 0);
499
500
501
freeSearchPath();
freeErrorMessages();
502
if (baseDir != NULL)
503
{
504
free(baseDir);
505
506
507
508
509
510
511
512
baseDir = NULL;
} /* if */
if (userDir != NULL)
{
free(userDir);
userDir = NULL;
} /* if */
513
514
allowSymLinks = 0;
515
initialized = 0;
516
517
518
519
520
__PHYSFS_platformDestroyMutex(errorLock);
__PHYSFS_platformDestroyMutex(stateLock);
errorLock = stateLock = NULL;
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
return(1);
} /* PHYSFS_deinit */
const PHYSFS_ArchiveInfo **PHYSFS_supportedArchiveTypes(void)
{
return(supported_types);
} /* PHYSFS_supportedArchiveTypes */
void PHYSFS_freeList(void *list)
{
void **i;
for (i = (void **) list; *i != NULL; i++)
free(*i);
free(list);
} /* PHYSFS_freeList */
const char *PHYSFS_getDirSeparator(void)
{
543
return(__PHYSFS_platformDirSeparator);
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
} /* PHYSFS_getDirSeparator */
char **PHYSFS_getCdRomDirs(void)
{
return(__PHYSFS_platformDetectAvailableCDs());
} /* PHYSFS_getCdRomDirs */
const char *PHYSFS_getBaseDir(void)
{
return(baseDir); /* this is calculated in PHYSFS_init()... */
} /* PHYSFS_getBaseDir */
const char *PHYSFS_getUserDir(void)
{
561
return(userDir); /* this is calculated in PHYSFS_init()... */
562
563
564
565
566
} /* PHYSFS_getUserDir */
const char *PHYSFS_getWriteDir(void)
{
567
568
569
570
571
572
const char *retval = NULL;
__PHYSFS_platformGrabMutex(stateLock);
if (writeDir != NULL)
retval = writeDir->dirName;
__PHYSFS_platformReleaseMutex(stateLock);
573
574
return(retval);
575
576
577
578
579
} /* PHYSFS_getWriteDir */
int PHYSFS_setWriteDir(const char *newDir)
{
580
581
582
583
int retval = 1;
__PHYSFS_platformGrabMutex(stateLock);
584
585
if (writeDir != NULL)
{
586
587
BAIL_IF_MACRO_MUTEX(!freeDirInfo(writeDir, openWriteList), NULL,
stateLock, 0);
588
589
590
writeDir = NULL;
} /* if */
591
592
if (newDir != NULL)
{
593
writeDir = buildDirInfo(newDir, 1);
594
retval = (writeDir != NULL);
595
} /* if */
596
597
598
599
__PHYSFS_platformReleaseMutex(stateLock);
return(retval);
600
601
602
603
604
} /* PHYSFS_setWriteDir */
int PHYSFS_addToSearchPath(const char *newDir, int appendToPath)
{
605
606
607
PhysDirInfo *di;
PhysDirInfo *prev = NULL;
PhysDirInfo *i;
608
609
__PHYSFS_platformGrabMutex(stateLock);
610
611
612
613
614
for (i = searchPath; i != NULL; i = i->next)
{
/* already in search path? */
BAIL_IF_MACRO_MUTEX(strcmp(newDir, i->dirName)==0, NULL, stateLock, 1);
615
prev = i;
616
} /* for */
617
618
di = buildDirInfo(newDir, 0);
619
BAIL_IF_MACRO_MUTEX(di == NULL, NULL, stateLock, 0);
620
621
622
if (appendToPath)
{
623
di->next = NULL;
624
if (prev == NULL)
625
searchPath = di;
626
else
627
prev->next = di;
628
629
630
631
632
} /* if */
else
{
di->next = searchPath;
searchPath = di;
633
634
} /* else */
635
__PHYSFS_platformReleaseMutex(stateLock);
636
637
638
639
640
641
return(1);
} /* PHYSFS_addToSearchPath */
int PHYSFS_removeFromSearchPath(const char *oldDir)
{
642
643
644
PhysDirInfo *i;
PhysDirInfo *prev = NULL;
PhysDirInfo *next = NULL;
645
646
647
BAIL_IF_MACRO(oldDir == NULL, ERR_INVALID_ARGUMENT, 0);
648
__PHYSFS_platformGrabMutex(stateLock);
649
650
651
652
for (i = searchPath; i != NULL; i = i->next)
{
if (strcmp(i->dirName, oldDir) == 0)
{
653
next = i->next;
654
655
BAIL_IF_MACRO_MUTEX(!freeDirInfo(i, openReadList), NULL,
stateLock, 0);
656
657
if (prev == NULL)
658
searchPath = next;
659
else
660
prev->next = next;
661
662
BAIL_MACRO_MUTEX(NULL, stateLock, 1);
663
664
665
666
} /* if */
prev = i;
} /* for */
667
BAIL_MACRO_MUTEX(ERR_NOT_IN_SEARCH_PATH, stateLock, 0);
668
669
670
671
672
673
674
} /* PHYSFS_removeFromSearchPath */
char **PHYSFS_getSearchPath(void)
{
int count = 1;
int x;
675
PhysDirInfo *i;
676
677
char **retval;
678
679
__PHYSFS_platformGrabMutex(stateLock);
680
681
682
683
for (i = searchPath; i != NULL; i = i->next)
count++;
retval = (char **) malloc(sizeof (char *) * count);
684
BAIL_IF_MACRO_MUTEX(!retval, ERR_OUT_OF_MEMORY, stateLock, NULL);
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
count--;
retval[count] = NULL;
for (i = searchPath, x = 0; x < count; i = i->next, x++)
{
retval[x] = (char *) malloc(strlen(i->dirName) + 1);
if (retval[x] == NULL) /* this is friggin' ugly. */
{
while (x > 0)
{
x--;
free(retval[x]);
} /* while */
free(retval);
700
BAIL_MACRO_MUTEX(ERR_OUT_OF_MEMORY, stateLock, NULL);
701
702
703
704
705
} /* if */
strcpy(retval[x], i->dirName);
} /* for */
706
__PHYSFS_platformReleaseMutex(stateLock);
707
708
709
710
return(retval);
} /* PHYSFS_getSearchPath */
711
712
713
int PHYSFS_setSaneConfig(const char *organization, const char *appName,
const char *archiveExt, int includeCdRoms,
int archivesFirst)
714
{
715
716
717
718
719
const char *basedir = PHYSFS_getBaseDir();
const char *userdir = PHYSFS_getUserDir();
const char *dirsep = PHYSFS_getDirSeparator();
char *str;
720
721
BAIL_IF_MACRO(!initialized, ERR_NOT_INITIALIZED, 0);
722
/* set write dir... */
723
724
str = malloc(strlen(userdir) + (strlen(organization) * 2) +
(strlen(appName) * 2) + (strlen(dirsep) * 3) + 2);
725
BAIL_IF_MACRO(str == NULL, ERR_OUT_OF_MEMORY, 0);
726
sprintf(str, "%s.%s%s%s", userdir, organization, dirsep, appName);
727
728
729
if (!PHYSFS_setWriteDir(str))
{
730
731
int no_write = 0;
sprintf(str, ".%s/%s", organization, appName);
732
if ( (PHYSFS_setWriteDir(userdir)) &&
733
(PHYSFS_mkdir(str)) )
734
{
735
736
737
sprintf(str, "%s.%s%s%s", userdir, organization, dirsep, appName);
if (!PHYSFS_setWriteDir(str))
no_write = 1;
738
739
} /* if */
else
740
{
741
no_write = 1;
742
} /* else */
743
744
745
746
747
748
749
if (no_write)
{
PHYSFS_setWriteDir(NULL); /* just in case. */
free(str);
BAIL_MACRO(ERR_CANT_SET_WRITE_DIR, 0);
} /* if */
750
751
} /* if */
752
753
/* Put write dir first in search path... */
PHYSFS_addToSearchPath(str, 0);
754
755
free(str);
756
/* Put base path on search path... */
757
758
759
760
761
762
763
764
PHYSFS_addToSearchPath(basedir, 1);
/* handle CD-ROMs... */
if (includeCdRoms)
{
char **cds = PHYSFS_getCdRomDirs();
char **i;
for (i = cds; *i != NULL; i++)
765
PHYSFS_addToSearchPath(*i, 1);
766
767
768
769
770
771
772
773
774
PHYSFS_freeList(cds);
} /* if */
/* Root out archives, and add them to search path... */
if (archiveExt != NULL)
{
char **rc = PHYSFS_enumerateFiles("");
char **i;
775
size_t extlen = strlen(archiveExt);
776
777
778
779
char *ext;
for (i = rc; *i != NULL; i++)
{
780
781
size_t l = strlen(*i);
if ((l > extlen) && ((*i)[l - extlen - 1] == '.'))
782
783
784
785
786
787
788
789
790
{
ext = (*i) + (l - extlen);
if (__PHYSFS_platformStricmp(ext, archiveExt) == 0)
{
const char *d = PHYSFS_getRealDir(*i);
str = malloc(strlen(d) + strlen(dirsep) + l + 1);
if (str != NULL)
{
sprintf(str, "%s%s%s", d, dirsep, *i);
791
PHYSFS_addToSearchPath(str, archivesFirst == 0);
792
793
794
795
796
797
798
799
800
801
free(str);
} /* if */
} /* if */
} /* if */
} /* for */
PHYSFS_freeList(rc);
} /* if */
return(1);
802
803
804
} /* PHYSFS_setSaneConfig */
805
806
807
808
809
810
void PHYSFS_permitSymbolicLinks(int allow)
{
allowSymLinks = allow;
} /* PHYSFS_permitSymbolicLinks */
811
/* string manipulation in C makes my ass itch. */
812
813
814
char * __PHYSFS_convertToDependent(const char *prepend,
const char *dirName,
const char *append)
815
{
816
const char *dirsep = __PHYSFS_platformDirSeparator;
817
size_t sepsize = strlen(dirsep);
818
819
820
821
822
char *str;
char *i1;
char *i2;
size_t allocSize;
823
824
825
while (*dirName == '/')
dirName++;
826
allocSize = strlen(dirName) + 1;
827
828
829
830
831
832
833
834
if (prepend != NULL)
allocSize += strlen(prepend) + sepsize;
if (append != NULL)
allocSize += strlen(append) + sepsize;
/* make sure there's enough space if the dir separator is bigger. */
if (sepsize > 1)
{
835
836
str = (char *) dirName;
do
837
{
838
839
840
str = strchr(str, '/');
if (str != NULL)
{
841
allocSize += (sepsize - 1);
842
843
844
str++;
} /* if */
} while (str != NULL);
845
846
847
848
849
} /* if */
str = (char *) malloc(allocSize);
BAIL_IF_MACRO(str == NULL, ERR_OUT_OF_MEMORY, NULL);
850
851
852
if (prepend == NULL)
*str = '\0';
else
853
854
855
{
strcpy(str, prepend);
strcat(str, dirsep);
856
} /* else */
857
858
for (i1 = (char *) dirName, i2 = str + strlen(str); *i1; i1++, i2++)
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
{
if (*i1 == '/')
{
strcpy(i2, dirsep);
i2 += sepsize;
} /* if */
else
{
*i2 = *i1;
} /* else */
} /* for */
*i2 = '\0';
if (append)
{
strcat(str, dirsep);
strcpy(str, append);
} /* if */
return(str);
879
} /* __PHYSFS_convertToDependent */
880
881
882
int __PHYSFS_verifySecurity(DirHandle *h, const char *fname)
883
{
884
885
886
int retval = 1;
char *start;
char *end;
887
888
char *str;
889
890
891
start = str = malloc(strlen(fname) + 1);
BAIL_IF_MACRO(str == NULL, ERR_OUT_OF_MEMORY, 0);
strcpy(str, fname);
892
893
894
895
896
897
898
899
900
while (1)
{
end = strchr(start, '/');
if (end != NULL)
*end = '\0';
if ( (strcmp(start, ".") == 0) ||
(strcmp(start, "..") == 0) ||
901
(strchr(start, '\\') != NULL) ||
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
(strchr(start, ':') != NULL) )
{
__PHYSFS_setError(ERR_INSECURE_FNAME);
retval = 0;
break;
} /* if */
if ((!allowSymLinks) && (h->funcs->isSymLink(h, str)))
{
__PHYSFS_setError(ERR_SYMLINK_DISALLOWED);
retval = 0;
break;
} /* if */
if (end == NULL)
break;
*end = '/';
start = end + 1;
} /* while */
922
923
free(str);
924
925
return(retval);
} /* __PHYSFS_verifySecurity */
926
927
928
int PHYSFS_mkdir(const char *dname)
929
{
930
DirHandle *h;
931
char *str;
932
933
934
char *start;
char *end;
int retval = 0;
935
936
937
938
BAIL_IF_MACRO(dname == NULL, ERR_INVALID_ARGUMENT, 0);
while (*dname == '/')
dname++;
939
940
941
__PHYSFS_platformGrabMutex(stateLock);
BAIL_IF_MACRO_MUTEX(writeDir == NULL, ERR_NO_WRITE_DIR, stateLock, 0);
942
h = writeDir->dirHandle;
943
944
945
946
947
BAIL_IF_MACRO_MUTEX(!h->funcs->mkdir, ERR_NOT_SUPPORTED, stateLock, 0);
BAIL_IF_MACRO_MUTEX(!__PHYSFS_verifySecurity(h, dname), NULL, stateLock, 0);
start = str = malloc(strlen(dname) + 1);
BAIL_IF_MACRO_MUTEX(str == NULL, ERR_OUT_OF_MEMORY, stateLock, 0);
strcpy(str, dname);
948
949
950
951
952
953
while (1)
{
end = strchr(start, '/');
if (end != NULL)
*end = '\0';
954
955
956
957
retval = h->funcs->mkdir(h, str);
if (!retval)
break;
958
959
960
if (end == NULL)
break;
961
962
963
964
*end = '/';
start = end + 1;
} /* while */
965
966
967
__PHYSFS_platformReleaseMutex(stateLock);
968
969
970
971
972
973
free(str);
return(retval);
} /* PHYSFS_mkdir */
int PHYSFS_delete(const char *fname)
974
{
975
int retval;
976
DirHandle *h;
977
978
BAIL_IF_MACRO(fname == NULL, ERR_INVALID_ARGUMENT, 0);
979
980
981
while (*fname == '/')
fname++;
982
983
984
985
986
987
988
989
990
991
__PHYSFS_platformGrabMutex(stateLock);
BAIL_IF_MACRO_MUTEX(writeDir == NULL, ERR_NO_WRITE_DIR, stateLock, 0);
h = writeDir->dirHandle;
BAIL_IF_MACRO_MUTEX(!h->funcs->remove, ERR_NOT_SUPPORTED, stateLock, 0);
BAIL_IF_MACRO_MUTEX(!__PHYSFS_verifySecurity(h, fname), NULL, stateLock, 0);
retval = h->funcs->remove(h, fname);
__PHYSFS_platformReleaseMutex(stateLock);
return(retval);
992
} /* PHYSFS_delete */
993
994
995
996
const char *PHYSFS_getRealDir(const char *filename)
{
997
PhysDirInfo *i;
998
999
1000
while (*filename == '/')
filename++;