Remove the CONFIG_CD macro, and enable faketracks unconditionally.
[xonotic/darkplaces.git] / filematch.c
index e3e35c8..14c1d16 100644 (file)
@@ -1,41 +1,53 @@
 
 
+#ifdef WIN32
+#include <windows.h>
+#else
+#include <dirent.h>
+#endif
+
 #include "quakedef.h"
 
 // LordHavoc: some portable directory listing code I wrote for lmp2pcx, now used in darkplaces to load id1/*.pak and such...
 
 #include "quakedef.h"
 
 // LordHavoc: some portable directory listing code I wrote for lmp2pcx, now used in darkplaces to load id1/*.pak and such...
 
-int matchpattern(char *in, char *pattern, int caseinsensitive)
+int matchpattern(const char *in, const char *pattern, int caseinsensitive)
+{
+       return matchpattern_with_separator(in, pattern, caseinsensitive, "/\\:", false);
+}
+
+// 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, qboolean wildcard_least_one)
 {
        int c1, c2;
        while (*pattern)
        {
                switch (*pattern)
                {
 {
        int c1, c2;
        while (*pattern)
        {
                switch (*pattern)
                {
+               case 0:
+                       return 1; // end of pattern
                case '?': // match any single character
                case '?': // match any single character
-                       if (!*in)
+                       if (*in == 0 || strchr(separators, *in))
                                return 0; // no match
                        in++;
                        pattern++;
                        break;
                case '*': // match anything until following string
                                return 0; // no match
                        in++;
                        pattern++;
                        break;
                case '*': // match anything until following string
-                       if (!*in)
-                               return 1; // match
-                       while (*pattern == '*')
-                               pattern++;
-                       if (*pattern == '?')
-                       {
-                               // *? (weird)
-                               break;
-                       }
-                       else if (*pattern)
+                       if(wildcard_least_one)
                        {
                        {
-                               // *text (typical)
-                               while (*in && *in != *pattern)
-                                       in++;
+                               if (*in == 0 || strchr(separators, *in))
+                                       return 0; // no match
+                               in++;
                        }
                        }
-                       else
+                       pattern++;
+                       while (*in)
                        {
                        {
-                               // *null (* at end of pattern)
-                               return 1;
+                               if (strchr(separators, *in))
+                                       break;
+                               // see if pattern matches at this offset
+                               if (matchpattern_with_separator(in, pattern, caseinsensitive, separators, wildcard_least_one))
+                                       return 1;
+                               // nope, advance to next offset
+                               in++;
                        }
                        break;
                default:
                        }
                        break;
                default:
@@ -62,126 +74,150 @@ int matchpattern(char *in, char *pattern, int caseinsensitive)
        return 1; // success
 }
 
        return 1; // success
 }
 
-// a little chained strings system
-stringlist_t *stringlistappend(stringlist_t *current, char *text)
+// a little strings system
+void stringlistinit(stringlist_t *list)
 {
 {
-       stringlist_t *newitem;
-       newitem = Z_Malloc(strlen(text) + 1 + sizeof(stringlist_t));
-       newitem->next = NULL;
-       newitem->text = (char *)(newitem + 1);
-       strcpy(newitem->text, text);
-       if (current)
-               current->next = newitem;
-       return newitem;
+       memset(list, 0, sizeof(*list));
 }
 
 }
 
-void stringlistfree(stringlist_t *current)
+void stringlistfreecontents(stringlist_t *list)
 {
 {
-       stringlist_t *next;
-       while (current)
+       int i;
+       for (i = 0;i < list->numstrings;i++)
        {
        {
-               next = current->next;
-               Z_Free(current);
-               current = next;
+               if (list->strings[i])
+                       Z_Free(list->strings[i]);
+               list->strings[i] = NULL;
        }
        }
+       list->numstrings = 0;
+       list->maxstrings = 0;
+       if (list->strings)
+               Z_Free(list->strings);
+       list->strings = NULL;
 }
 
 }
 
-stringlist_t *stringlistsort(stringlist_t *start)
+void stringlistappend(stringlist_t *list, const char *text)
 {
 {
-       int notdone;
-       stringlist_t *current, *previous, *temp2, *temp3, *temp4;
-       notdone = 1;
-       while (notdone)
+       size_t textlen;
+       char **oldstrings;
+
+       if (list->numstrings >= list->maxstrings)
        {
        {
-               current = start;
-               notdone = 0;
-               previous = NULL;
-               while (current && current->next)
+               oldstrings = list->strings;
+               list->maxstrings += 4096;
+               list->strings = (char **) Z_Malloc(list->maxstrings * sizeof(*list->strings));
+               if (list->numstrings)
+                       memcpy(list->strings, oldstrings, list->numstrings * sizeof(*list->strings));
+               if (oldstrings)
+                       Z_Free(oldstrings);
+       }
+       textlen = strlen(text) + 1;
+       list->strings[list->numstrings] = (char *) Z_Malloc(textlen);
+       memcpy(list->strings[list->numstrings], text, textlen);
+       list->numstrings++;
+}
+
+static int stringlistsort_cmp(const void *a, const void *b)
+{
+       return strcasecmp(*(const char **)a, *(const char **)b);
+}
+
+void stringlistsort(stringlist_t *list, qboolean uniq)
+{
+       int i, j;
+       if(list->numstrings < 1)
+               return;
+       qsort(&list->strings[0], list->numstrings, sizeof(list->strings[0]), stringlistsort_cmp);
+       if(uniq)
+       {
+               // i: the item to read
+               // j: the item last written
+               for (i = 1, j = 0; i < list->numstrings; ++i)
                {
                {
-                       if (strcmp(current->text, current->next->text) > 0)
-                       {
-                               // current is greater than next
-                               notdone = 1;
-                               temp2 = current->next;
-                               temp3 = current;
-                               temp4 = current->next->next;
-                               if (previous)
-                                       previous->next = temp2;
-                               else
-                                       start = temp2;
-                               temp2->next = temp3;
-                               temp3->next = temp4;
-                               break;
-                       }
-                       previous = current;
-                       current = current->next;
+                       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;
        }
        }
-       return start;
 }
 
 // operating system specific code
 }
 
 // operating system specific code
-#ifdef WIN32
-#include <io.h>
-stringlist_t *listdirectory(char *path)
+static void adddirentry(stringlist_t *list, const char *path, const char *name)
 {
 {
-       char pattern[4096], *c;
-       struct _finddata_t n_file;
-    long hFile;
-       stringlist_t *start, *current;
-       strlcpy (pattern, path, sizeof (pattern));
-       strlcat (pattern, "\\*", sizeof (pattern));
-       // ask for the directory listing handle
-       hFile = _findfirst(pattern, &n_file);
-       if(hFile != -1)
+       if (strcmp(name, ".") && strcmp(name, ".."))
        {
        {
-               // start a new chain with the the first name
-               start = current = stringlistappend(NULL, n_file.name);
-               // iterate through the directory
-               while (_findnext(hFile, &n_file) == 0)
-                       current = stringlistappend(current, n_file.name);
-               _findclose(hFile);
-
-               // convert names to lowercase because windows does not care, but pattern matching code often does
-               for (current = start;current;current = current->next)
-                       for (c = current->text;*c;c++)
-                               if (*c >= 'A' && *c <= 'Z')
-                                       *c += 'a' - 'A';
-
-               // sort the list alphanumerically
-               start = stringlistsort(start);
-               return start;
+               char temp[MAX_OSPATH];
+               dpsnprintf( temp, sizeof( temp ), "%s%s", path, name );
+               stringlistappend(list, temp);
        }
        }
-       else
-               return NULL;
+}
+#ifdef WIN32
+void listdirectory(stringlist_t *list, const char *basepath, const char *path)
+{
+       char pattern[4096];
+       WIN32_FIND_DATA n_file;
+       HANDLE hFile;
+       strlcpy (pattern, basepath, sizeof(pattern));
+       strlcat (pattern, path, sizeof (pattern));
+       strlcat (pattern, "*", sizeof (pattern));
+       // ask for the directory listing handle
+       hFile = FindFirstFile(pattern, &n_file);
+       if(hFile == INVALID_HANDLE_VALUE)
+               return;
+       do {
+               adddirentry(list, path, n_file.cFileName);
+       } while (FindNextFile(hFile, &n_file) != 0);
+       FindClose(hFile);
 }
 #else
 }
 #else
-#include <dirent.h>
-stringlist_t *listdirectory(char *path)
+void listdirectory(stringlist_t *list, const char *basepath, const char *path)
 {
 {
+       char fullpath[MAX_OSPATH];
        DIR *dir;
        struct dirent *ent;
        DIR *dir;
        struct dirent *ent;
-       stringlist_t *start, *current;
-       dir = opendir(path);
-       if (!dir)
-               return NULL;
-       ent = readdir(dir);
-       if (!ent)
+       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] != '/')
        {
        {
-               closedir(dir);
-               return NULL;
+               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;
        }
        }
-       start = current = stringlistappend(NULL, ent->d_name);
-       while((ent = readdir(dir)))
-               current = stringlistappend(current, ent->d_name);
-       closedir(dir);
-       // sort the list alphanumerically
-       return stringlistsort(start);
-}
 #endif
 #endif
+       dir = opendir(fullpath);
+       if (!dir)
+               return;
 
 
-void freedirectory(stringlist_t *list)
-{
-       stringlistfree(list);
+       while ((ent = readdir(dir)))
+               adddirentry(list, path, ent->d_name);
+       closedir(dir);
 }
 }
+#endif