20 # define access _taccess
21 #elif defined(__HAIKU__)
23 #include <storage/FindDirectory.h>
31 #ifdef WITH_XDG_BASEDIR
38 #define FIO_BUFFER_SIZE 512
50 #if defined(LIMITED_FDS)
93 if (fseek(_fio.
cur_fh, _fio.
pos, SEEK_SET) < 0) {
98 #if defined(LIMITED_FDS)
99 static void FioRestoreFile(
int slot)
102 if (_fio.
handles[slot] == NULL) {
103 DEBUG(misc, 6,
"Restoring file '%s' in slot '%d' from disk", _fio.
filenames[slot], slot);
106 _fio.usage_count[slot]++;
118 #if defined(LIMITED_FDS)
120 FioRestoreFile(slot);
141 if (size == 0)
return 0;
143 return *_fio.buffer++;
190 _fio.
pos += fread(ptr, 1, size, _fio.
cur_fh);
199 if (_fio.
handles[slot] != NULL) {
206 #if defined(LIMITED_FDS)
220 #if defined(LIMITED_FDS)
221 static void FioFreeHandle()
224 if (_fio.open_handles + 1 == LIMITED_FDS) {
232 if (_fio.
handles[i] != NULL && _fio.usage_count[i] < count) {
233 count = _fio.usage_count[i];
238 DEBUG(misc, 6,
"Closing filehandler '%s' in slot '%d' because of fd-limit", _fio.
filenames[slot], slot);
254 #if defined(LIMITED_FDS)
258 if (f == NULL)
usererror(
"Cannot open file '%s'", filename);
260 if (pos < 0)
usererror(
"Cannot read file '%s'", filename);
267 const char *t = strrchr(filename, PATHSEPCHAR);
269 char *t2 = strrchr(_fio.
shortnames[slot],
'.');
270 if (t2 != NULL) *t2 =
'\0';
273 #if defined(LIMITED_FDS)
274 _fio.usage_count[slot] = 0;
280 static const char *
const _subdirs[] = {
283 "save" PATHSEP
"autosave" PATHSEP,
285 "scenario" PATHSEP
"heightmap" PATHSEP,
292 "ai" PATHSEP
"library" PATHSEP,
294 "game" PATHSEP
"library" PATHSEP,
295 "screenshot" PATHSEP,
303 typedef std::map<std::string, std::string> TarLinkList;
315 if (f == NULL)
return false;
330 HANDLE hand = CreateFile(
OTTD2FS(filename), 0, 0, NULL, OPEN_EXISTING, 0, NULL);
331 if (hand == INVALID_HANDLE_VALUE)
return 1;
335 return access(
OTTD2FS(filename), 0) == 0;
347 char *FioGetFullPath(
char *buf,
const char *last,
Searchpath sp,
Subdirectory subdir,
const char *filename)
350 assert(sp < NUM_SEARCHPATHS);
352 seprintf(buf, last,
"%s%s%s", _searchpaths[sp], _subdirs[subdir], filename);
370 FioGetFullPath(buf, last, sp, subdir, filename);
386 assert(sp < NUM_SEARCHPATHS);
388 seprintf(buf, last,
"%s%s", _searchpaths[sp], _subdirs[subdir]);
392 char *FioGetDirectory(
char *buf,
const char *last,
Subdirectory subdir)
398 char *ret = FioAppendDirectory(buf, last, sp, subdir);
408 static FILE *FioFOpenFileSp(
const char *filename,
const char *mode,
Searchpath sp,
Subdirectory subdir,
size_t *filesize)
410 #if defined(WIN32) && defined(UNICODE)
416 MultiByteToWideChar(CP_ACP, 0, mode, -1, Lmode,
lengthof(Lmode));
424 seprintf(buf,
lastof(buf),
"%s%s%s", _searchpaths[sp], _subdirs[subdir], filename);
428 if (mode[0] ==
'r' && GetFileAttributes(
OTTD2FS(buf)) == INVALID_FILE_ATTRIBUTES)
return NULL;
431 f = fopen(buf, mode);
434 f = fopen(buf, mode);
437 if (f != NULL && filesize != NULL) {
439 fseek(f, 0, SEEK_END);
440 *filesize = ftell(f);
441 fseek(f, 0, SEEK_SET);
455 FILE *f = fopen(entry->tar_filename,
"rb");
456 if (f == NULL)
return f;
458 if (fseek(f, entry->position, SEEK_SET) < 0) {
463 if (filesize != NULL) *filesize = entry->size;
482 f = FioFOpenFileSp(filename, mode, sp, subdir, filesize);
487 if (f == NULL && mode[0] ==
'r' && subdir !=
NO_DIRECTORY) {
488 static const uint MAX_RESOLVED_LENGTH = 2 * (100 + 100 + 155) + 1;
489 char resolved_name[MAX_RESOLVED_LENGTH];
495 size_t resolved_len = strlen(resolved_name);
498 for (TarLinkList::iterator link = _tar_linklist[subdir].begin(); link != _tar_linklist[subdir].end(); link++) {
499 const std::string &src = link->first;
500 size_t len = src.length();
501 if (resolved_len >= len && resolved_name[len - 1] == PATHSEPCHAR && strncmp(src.c_str(), resolved_name, len) == 0) {
503 char resolved_name2[MAX_RESOLVED_LENGTH];
504 const std::string &dest = link->second;
505 strecpy(resolved_name2, &(resolved_name[len]),
lastof(resolved_name2));
507 strecpy(&(resolved_name[dest.length()]), resolved_name2,
lastof(resolved_name));
512 TarFileList::iterator it = _tar_filelist[subdir].find(resolved_name);
513 if (it != _tar_filelist[subdir].end()) {
524 if (f != NULL)
break;
547 #if defined(WIN32) || defined(WINCE)
548 CreateDirectory(
OTTD2FS(name), NULL);
549 #elif defined(OS2) && !defined(__INNOTEK_LIBC__)
551 #elif defined(__MORPHOS__) || defined(__AMIGAOS__)
555 size_t len = strlen(name) - 1;
556 if (buf[len] ==
'/') {
575 size_t s = strlen(buf);
578 if (s != 0 && buf[s - 1] != PATHSEPCHAR) {
579 if (&buf[s] >= last)
return false;
581 seprintf(buf + s, last,
"%c", PATHSEPCHAR);
594 TarList::iterator it = _tar_list[subdir].find(tarname);
595 if (it == _tar_list[subdir].end())
return NULL;
596 return (*it).second.dirname;
599 static void TarAddLink(
const std::string &srcParam,
const std::string &destParam,
Subdirectory subdir)
601 std::string src = srcParam;
602 std::string dest = destParam;
604 std::transform(src.begin(), src.end(), src.begin(), tolower);
605 std::transform(dest.begin(), dest.end(), dest.begin(), tolower);
607 TarFileList::iterator dest_file = _tar_filelist[subdir].find(dest);
608 if (dest_file != _tar_filelist[subdir].end()) {
610 _tar_filelist[subdir].insert(TarFileList::value_type(src, dest_file->second));
614 const std::string src_path = ((*src.rbegin() == PATHSEPCHAR) ? src : src + PATHSEPCHAR);
615 const std::string dst_path = (dest.length() == 0 ?
"" : ((*dest.rbegin() == PATHSEPCHAR) ? dest : dest + PATHSEPCHAR));
616 _tar_linklist[subdir].insert(TarLinkList::value_type(src_path, dst_path));
620 void FioTarAddLink(
const char *src,
const char *dest,
Subdirectory subdir)
622 TarAddLink(src, dest, subdir);
636 #if (PATHSEPCHAR != '/')
637 for (
char *n = name; *n !=
'\0'; n++)
if (*n ==
'/') *n = PATHSEPCHAR;
648 _tar_filelist[sd].clear();
649 _tar_list[sd].clear();
650 uint num = this->
Scan(
".tar", sd,
false);
657 DEBUG(misc, 1,
"Scanning for tars");
678 DEBUG(misc, 1,
"Scan complete, found %d files", num);
691 return this->
AddFile(filename, 0);
697 assert(tar_filename == NULL);
722 TarList::iterator it = _tar_list[this->
subdir].find(filename);
723 if (it != _tar_list[this->subdir].end())
return false;
725 FILE *f = fopen(filename,
"rb");
730 if (f == NULL)
return false;
732 const char *dupped_filename =
stredup(filename);
733 _tar_list[this->
subdir][filename].filename = dupped_filename;
734 _tar_list[this->
subdir][filename].dirname = NULL;
739 char buf[
sizeof(th.name) + 1], *end;
740 char name[
sizeof(th.prefix) + 1 +
sizeof(th.name) + 1];
741 char link[
sizeof(th.linkname) + 1];
742 char dest[
sizeof(th.prefix) + 1 +
sizeof(th.name) + 1 + 1 +
sizeof(th.linkname) + 1];
743 size_t num = 0, pos = 0;
747 memset(&empty[0], 0,
sizeof(empty));
750 size_t num_bytes_read = fread(&th, 1, 512, f);
751 if (num_bytes_read != 512)
break;
752 pos += num_bytes_read;
755 if (strncmp(th.magic,
"ustar", 5) != 0 && memcmp(&th.magic, &empty[0], 512 - offsetof(TarHeader, magic)) != 0) {
757 if (memcmp(&th, &empty[0], 512) == 0)
continue;
759 DEBUG(misc, 0,
"The file '%s' isn't a valid tar-file", filename);
767 if (th.prefix[0] !=
'\0') {
777 size_t skip = strtoul(buf, &end, 8);
779 switch (th.typeflag) {
783 if (skip == 0)
break;
785 if (strlen(name) == 0)
break;
789 entry.tar_filename = dupped_filename;
791 entry.position = pos;
796 DEBUG(misc, 6,
"Found file in tar: %s (" PRINTF_SIZE
" bytes, " PRINTF_SIZE
" offset)", name, skip, pos);
797 if (_tar_filelist[this->subdir].insert(TarFileList::value_type(name, entry)).second) num++;
807 if (strlen(name) == 0 || strlen(link) == 0)
break;
814 if (link[0] == PATHSEPCHAR) {
815 DEBUG(misc, 1,
"Ignoring absolute link in tar: %s -> %s", name, link);
822 char *destpos = strrchr(dest, PATHSEPCHAR);
823 if (destpos == NULL) destpos = dest;
827 while (*pos !=
'\0') {
828 char *next = strchr(pos, PATHSEPCHAR);
830 next = pos + strlen(pos);
836 if (strcmp(pos,
".") == 0) {
838 }
else if (strcmp(pos,
"..") == 0) {
840 if (dest[0] ==
'\0') {
841 DEBUG(misc, 1,
"Ignoring link pointing outside of data directory: %s -> %s", name, link);
847 destpos = strrchr(dest, PATHSEPCHAR);
848 if (destpos == NULL) destpos = dest;
852 if (destpos != dest) destpos =
strecpy(destpos, PATHSEP,
lastof(dest));
856 if (destpos >=
lastof(dest)) {
857 DEBUG(misc, 0,
"The length of a link in tar-file '%s' is too large (malformed?)", filename);
866 DEBUG(misc, 6,
"Found link in tar: %s -> %s", name, dest);
867 links.insert(TarLinkList::value_type(name, dest));
877 DEBUG(misc, 6,
"Found dir in tar: %s", name);
878 if (_tar_list[this->subdir][filename].dirname == NULL) _tar_list[this->
subdir][filename].dirname =
stredup(name);
887 skip =
Align(skip, 512);
888 if (fseek(f, skip, SEEK_CUR) < 0) {
889 DEBUG(misc, 0,
"The file '%s' can't be read as a valid tar-file", filename);
896 DEBUG(misc, 1,
"Found tar '%s' with " PRINTF_SIZE
" new files", filename, num);
908 for (TarLinkList::iterator link = links.begin(); link != links.end(); link++) {
909 const std::string &src = link->first;
910 const std::string &dest = link->second;
911 TarAddLink(src, dest, this->subdir);
926 TarList::iterator it = _tar_list[subdir].find(tar_filename);
928 if (it == _tar_list[subdir].end())
return false;
930 const char *dirname = (*it).second.dirname;
933 if (dirname == NULL)
return false;
935 char filename[MAX_PATH];
937 char *p = strrchr(filename, PATHSEPCHAR);
939 if (p == NULL)
return false;
943 DEBUG(misc, 8,
"Extracting %s to directory %s", tar_filename, filename);
946 for (TarFileList::iterator it2 = _tar_filelist[subdir].begin(); it2 != _tar_filelist[subdir].end(); it2++) {
947 if (strcmp((*it2).second.tar_filename, tar_filename) != 0)
continue;
951 DEBUG(misc, 9,
" extracting %s", filename);
957 DEBUG(misc, 6,
"Extracting %s failed; could not open %s", filename, tar_filename);
962 FILE *out = fopen(filename,
"wb");
964 DEBUG(misc, 6,
"Extracting %s failed; could not open %s", filename, filename);
972 for (; to_copy != 0; to_copy -= read) {
973 read = fread(buffer, 1,
min(to_copy,
lengthof(buffer)), in);
974 if (read <= 0 || fwrite(buffer, 1, read, out) != read)
break;
982 DEBUG(misc, 6,
"Extracting %s failed; still %i bytes to copy", filename, (
int)to_copy);
987 DEBUG(misc, 9,
" extraction successful");
991 #if defined(WIN32) || defined(WINCE)
1012 bool success =
false;
1014 char *app_bundle = strchr(tmp,
'.');
1015 while (app_bundle != NULL && strncasecmp(app_bundle,
".app", 4) != 0) app_bundle = strchr(&app_bundle[1],
'.');
1017 if (app_bundle != NULL) *app_bundle =
'\0';
1019 char *s = strrchr(tmp, PATHSEPCHAR);
1022 #if defined(__DJGPP__)
1024 if (s > tmp && *(s - 1) ==
':') chdir(
"/");
1026 if (chdir(tmp) != 0) {
1027 DEBUG(misc, 0,
"Directory with the binary does not exist?");
1051 if (strcmp(_searchpaths[
SP_WORKING_DIR], PATHSEP) == 0)
return false;
1057 seprintf(tmp,
lastof(tmp),
"%s%s", _searchpaths[SP_WORKING_DIR], PERSONAL_DIR);
1069 #if defined(WITH_XDG_BASEDIR) && defined(WITH_PERSONAL_DIR)
1070 const char *xdg_data_home = xdgDataHome(NULL);
1072 PERSONAL_DIR[0] ==
'.' ? &PERSONAL_DIR[1] : PERSONAL_DIR);
1073 free(xdg_data_home);
1076 _searchpaths[SP_PERSONAL_DIR_XDG] =
stredup(tmp);
1078 #if defined(__MORPHOS__) || defined(__AMIGA__) || defined(DOS) || defined(OS2) || !defined(WITH_PERSONAL_DIR)
1083 find_directory(B_USER_SETTINGS_DIRECTORY, &path);
1084 const char *homedir =
stredup(path.Path());
1090 const char *homedir = getenv(
"HOME");
1091 if (homedir != NULL) {
1095 if (homedir == NULL) {
1096 const struct passwd *pw = getpwuid(getuid());
1097 homedir = (pw == NULL) ? NULL :
stredup(pw->pw_dir);
1101 if (homedir != NULL) {
1103 seprintf(tmp,
lastof(tmp),
"%s" PATHSEP
"%s", homedir, PERSONAL_DIR);
1113 #if defined(WITH_SHARED_DIR)
1121 #if defined(__MORPHOS__) || defined(__AMIGA__)
1124 if (getcwd(tmp, MAX_PATH) == NULL) *tmp =
'\0';
1133 if (getcwd(tmp, MAX_PATH) == NULL) *tmp =
'\0';
1143 DEBUG(misc, 0,
"Failed to return to working directory!");
1147 #if defined(__MORPHOS__) || defined(__AMIGA__) || defined(DOS) || defined(OS2)
1155 extern void cocoaSetApplicationBundleDir();
1156 cocoaSetApplicationBundleDir();
1175 #if defined(WITH_XDG_BASEDIR) && defined(WITH_PERSONAL_DIR)
1176 char config_home[MAX_PATH];
1178 const char *xdg_config_home = xdgConfigHome(NULL);
1179 seprintf(config_home,
lastof(config_home),
"%s" PATHSEP
"%s", xdg_config_home,
1180 PERSONAL_DIR[0] ==
'.' ? &PERSONAL_DIR[1] : PERSONAL_DIR);
1181 free(xdg_config_home);
1189 DEBUG(misc, 4,
"%s added as search path", _searchpaths[sp]);
1195 char *end = strrchr(config_dir, PATHSEPCHAR);
1197 config_dir[0] =
'\0';
1202 char personal_dir[MAX_PATH];
1204 char *end = strrchr(personal_dir, PATHSEPCHAR);
1205 if (end != NULL) end[1] =
'\0';
1206 config_dir =
stredup(personal_dir);
1209 #if defined(WITH_XDG_BASEDIR) && defined(WITH_PERSONAL_DIR)
1211 config_dir = config_home;
1213 static const Searchpath new_openttd_cfg_order[] = {
1218 for (uint i = 0; i <
lengthof(new_openttd_cfg_order); i++) {
1220 config_dir =
stredup(_searchpaths[new_openttd_cfg_order[i]]);
1224 assert(config_dir != NULL);
1230 DEBUG(misc, 3,
"%s found as config directory", config_dir);
1233 extern char *_hotkeys_file;
1234 _hotkeys_file =
str_fmt(
"%shotkeys.cfg", config_dir);
1236 _windows_file =
str_fmt(
"%swindows.cfg", config_dir);
1238 #if defined(WITH_XDG_BASEDIR) && defined(WITH_PERSONAL_DIR)
1239 if (config_dir == config_home) {
1242 _personal_dir = _searchpaths[SP_PERSONAL_DIR_XDG];
1247 _personal_dir = config_dir;
1251 #if !defined(__MORPHOS__) && !defined(__AMIGA__) && defined(WITH_PERSONAL_DIR)
1256 DEBUG(misc, 3,
"%s found as personal directory", _personal_dir);
1259 SAVE_DIR,
AUTOSAVE_DIR,
SCENARIO_DIR,
HEIGHTMAP_DIR,
BASESET_DIR,
NEWGRF_DIR,
AI_DIR,
AI_LIBRARY_DIR,
GAME_DIR,
GAME_LIBRARY_DIR,
SCREENSHOT_DIR
1262 for (uint i = 0; i <
lengthof(default_subdirs); i++) {
1263 char *dir =
str_fmt(
"%s%s", _personal_dir, _subdirs[default_subdirs[i]]);
1270 #ifdef ENABLE_NETWORK
1275 for (uint i = 0; i <
lengthof(dirs); i++) {
1276 char *tmp =
str_fmt(
"%s%s", _searchpaths[SP_AUTODOWNLOAD_DIR], _subdirs[dirs[i]]);
1282 _log_file =
str_fmt(
"%sopenttd.log", _personal_dir);
1286 if (!
FileExists(_searchpaths[SP_AUTODOWNLOAD_DIR])) {
1287 free(_searchpaths[SP_AUTODOWNLOAD_DIR]);
1299 for (; *filename !=
'\0'; filename++) {
1300 switch (*filename) {
1303 case ':':
case '\\':
case '*':
case '?':
case '/':
1304 case '<':
case '>':
case '|':
case '"':
1321 FILE *in = fopen(filename,
"rb");
1322 if (in == NULL)
return NULL;
1324 fseek(in, 0, SEEK_END);
1325 size_t len = ftell(in);
1326 fseek(in, 0, SEEK_SET);
1327 if (len > maxsize) {
1331 byte *mem = MallocT<byte>(len + 1);
1333 if (fread(mem, len, 1, in) != 1) {
1352 if (extension == NULL)
return true;
1354 const char *ext = strrchr(filename, extension[0]);
1355 return ext != NULL && strcasecmp(ext, extension) == 0;
1367 static uint
ScanPath(
FileScanner *fs,
const char *extension,
const char *path,
size_t basepath_length,
bool recursive)
1369 extern bool FiosIsValidFile(
const char *path,
const struct dirent *ent,
struct stat *sb);
1373 struct dirent *dirent;
1376 if (path == NULL || (dir =
ttd_opendir(path)) == NULL)
return 0;
1378 while ((dirent = readdir(dir)) != NULL) {
1379 const char *d_name =
FS2OTTD(dirent->d_name);
1380 char filename[MAX_PATH];
1382 if (!FiosIsValidFile(path, dirent, &sb))
continue;
1386 if (S_ISDIR(sb.st_mode)) {
1388 if (!recursive)
continue;
1389 if (strcmp(d_name,
".") == 0 || strcmp(d_name,
"..") == 0)
continue;
1391 num +=
ScanPath(fs, extension, filename, basepath_length, recursive);
1392 }
else if (S_ISREG(sb.st_mode)) {
1412 const char *filename = (*tar).first.c_str();
1433 char path[MAX_PATH];
1434 TarFileList::iterator tar;
1441 FioAppendDirectory(path,
lastof(path), sp, sd);
1442 num +=
ScanPath(
this, extension, path, strlen(path), recursive);
1446 FOR_ALL_TARS(tar, sd) {
1447 num +=
ScanTar(
this, extension, tar);
1475 char path[MAX_PATH];
1478 return ScanPath(
this, extension, path, strlen(path), recursive);