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