-#include "quakedef.h"
+#ifdef WIN32
+#include <windows.h>
+#else
+#include <dirent.h>
+#endif
+
+#include "darkplaces.h"
-// LordHavoc: some portable directory listing code I wrote for lmp2pcx, now used in darkplaces to load id1/*.pak and such...
+// LadyHavoc: some portable directory listing code I wrote for lmp2pcx, now used in darkplaces to load id1/*.pak and such...
int matchpattern(const char *in, const char *pattern, int caseinsensitive)
{
return matchpattern_with_separator(in, pattern, caseinsensitive, "/\\:", false);
}
-int matchpattern_with_separator(const char *in, const char *pattern, int caseinsensitive, const char *separators, qboolean wildcard_least_one)
+// wildcard_least_one: if true * matches 1 or more characters
+// if false * matches 0 or more characters
+int matchpattern_with_separator(const char *in, const char *pattern, int caseinsensitive, const char *separators, qbool wildcard_least_one)
{
int c1, c2;
while (*pattern)
break;
case '*': // match anything until following string
if(wildcard_least_one)
+ {
if (*in == 0 || strchr(separators, *in))
return 0; // no match
- if (!*in)
- return 1; // match
+ in++;
+ }
pattern++;
while (*in)
{
if (strchr(separators, *in))
break;
// see if pattern matches at this offset
- if (matchpattern(in, pattern, caseinsensitive))
+ if (matchpattern_with_separator(in, pattern, caseinsensitive, separators, wildcard_least_one))
return 1;
// nope, advance to next offset
in++;
list->numstrings++;
}
-void stringlistsort(stringlist_t *list)
+static int stringlistsort_cmp(const void *a, const void *b)
+{
+ return strcasecmp(*(const char **)a, *(const char **)b);
+}
+
+void stringlistsort(stringlist_t *list, qbool uniq)
{
int i, j;
- char *temp;
- // this is a selection sort (finds the best entry for each slot)
- for (i = 0;i < list->numstrings - 1;i++)
+ if(list->numstrings < 1)
+ return;
+ qsort(&list->strings[0], list->numstrings, sizeof(list->strings[0]), stringlistsort_cmp);
+ if(uniq)
{
- for (j = i + 1;j < list->numstrings;j++)
+ // i: the item to read
+ // j: the item last written
+ for (i = 1, j = 0; i < list->numstrings; ++i)
{
- if (strcasecmp(list->strings[i], list->strings[j]) > 0)
- {
- temp = list->strings[i];
- list->strings[i] = list->strings[j];
- list->strings[j] = temp;
- }
+ char *save;
+ if(!strcasecmp(list->strings[i], list->strings[j]))
+ continue;
+ ++j;
+ save = list->strings[j];
+ list->strings[j] = list->strings[i];
+ list->strings[i] = save;
}
+ for(i = j+1; i < list->numstrings; ++i)
+ {
+ if (list->strings[i])
+ Z_Free(list->strings[i]);
+ }
+ list->numstrings = j+1;
}
}
}
}
#ifdef WIN32
-#include <windows.h>
void listdirectory(stringlist_t *list, const char *basepath, const char *path)
{
- int i;
- char pattern[4096], *c;
+ char pattern[4096];
WIN32_FIND_DATA n_file;
HANDLE hFile;
strlcpy (pattern, basepath, sizeof(pattern));
adddirentry(list, path, n_file.cFileName);
} while (FindNextFile(hFile, &n_file) != 0);
FindClose(hFile);
-
- // convert names to lowercase because windows does not care, but pattern matching code often does
- for (i = 0;i < list->numstrings;i++)
- for (c = list->strings[i];*c;c++)
- if (*c >= 'A' && *c <= 'Z')
- *c += 'a' - 'A';
}
#else
-#include <dirent.h>
void listdirectory(stringlist_t *list, const char *basepath, const char *path)
{
char fullpath[MAX_OSPATH];
DIR *dir;
struct dirent *ent;
- dpsnprintf(fullpath, sizeof(fullpath), "%s%s", basepath, *path ? path : "./");
+ dpsnprintf(fullpath, sizeof(fullpath), "%s%s", basepath, path);
+#ifdef __ANDROID__
+ // SDL currently does not support listing assets, so we have to emulate
+ // it. We're using relative paths for assets, so that will do.
+ if (basepath[0] != '/')
+ {
+ char listpath[MAX_OSPATH];
+ qfile_t *listfile;
+ dpsnprintf(listpath, sizeof(listpath), "%sls.txt", fullpath);
+ char *buf = (char *) FS_SysLoadFile(listpath, tempmempool, true, NULL);
+ if (!buf)
+ return;
+ char *p = buf;
+ for (;;)
+ {
+ char *q = strchr(p, '\n');
+ if (q == NULL)
+ break;
+ *q = 0;
+ adddirentry(list, path, p);
+ p = q + 1;
+ }
+ Mem_Free(buf);
+ return;
+ }
+#endif
dir = opendir(fullpath);
if (!dir)
return;
+
while ((ent = readdir(dir)))
adddirentry(list, path, ent->d_name);
closedir(dir);