Remove the CONFIG_CD macro, and enable faketracks unconditionally.
[xonotic/darkplaces.git] / filematch.c
index 758575f..14c1d16 100644 (file)
@@ -1,9 +1,22 @@
 
+#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...
 
-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)
@@ -13,21 +26,25 @@ int matchpattern(char *in, char *pattern, int caseinsensitive)
                case 0:
                        return 1; // end of pattern
                case '?': // match any single character
-                       if (*in == 0 || *in == '/' || *in == '\\' || *in == ':')
+                       if (*in == 0 || strchr(separators, *in))
                                return 0; // no match
                        in++;
                        pattern++;
                        break;
                case '*': // match anything until following string
-                       if (!*in)
-                               return 1; // match
+                       if(wildcard_least_one)
+                       {
+                               if (*in == 0 || strchr(separators, *in))
+                                       return 0; // no match
+                               in++;
+                       }
                        pattern++;
                        while (*in)
                        {
-                               if (*in == '/' || *in == '\\' || *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++;
@@ -57,126 +74,150 @@ int matchpattern(char *in, char *pattern, int caseinsensitive)
        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;
-       // exit early if there's nothing to sort
-       if (start == NULL || start->next == NULL)
-               return start;
-       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
+static void adddirentry(stringlist_t *list, const char *path, const char *name)
+{
+       if (strcmp(name, ".") && strcmp(name, ".."))
+       {
+               char temp[MAX_OSPATH];
+               dpsnprintf( temp, sizeof( temp ), "%s%s", path, name );
+               stringlistappend(list, temp);
+       }
+}
 #ifdef WIN32
-#include <io.h>
-stringlist_t *listdirectory(const char *path)
+void listdirectory(stringlist_t *list, const char *basepath, const char *path)
 {
-       char pattern[4096], *c;
-       struct _finddata_t n_file;
-       long hFile;
-       stringlist_t *start, *current;
-       strlcpy (pattern, path, sizeof (pattern));
+       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 = _findfirst(pattern, &n_file);
-       if(hFile == -1)
-               return NULL;
-       // 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
-       return stringlistsort(start);
+       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
-#include <dirent.h>
-stringlist_t *listdirectory(const char *path)
+void listdirectory(stringlist_t *list, const char *basepath, const char *path)
 {
+       char fullpath[MAX_OSPATH];
        DIR *dir;
        struct dirent *ent;
-       stringlist_t *start, *current;
-       dir = opendir(path);
-       if (!dir)
-               return NULL;
-       start = current = NULL;
-       while ((ent = readdir(dir)))
+       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] != '/')
        {
-               if (strcmp(ent->d_name, ".") && strcmp(ent->d_name, ".."))
+               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 (;;)
                {
-                       current = stringlistappend(current, ent->d_name);
-                       if (!start)
-                               start = current;
+                       char *q = strchr(p, '\n');
+                       if (q == NULL)
+                               break;
+                       *q = 0;
+                       adddirentry(list, path, p);
+                       p = q + 1;
                }
+               Mem_Free(buf);
+               return;
        }
-       closedir(dir);
-       // sort the list alphanumerically
-       return stringlistsort(start);
-}
 #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