+
+#ifndef WIN32
+// (code lifted from physfs: http://icculus.org/physfs/ ... zlib license.)
+static char *findBinaryInPath(const char *bin, char *envr)
+{
+ size_t alloc_size = 0;
+ char *exe = NULL;
+ char *start = envr;
+ char *ptr;
+
+ do
+ {
+ size_t size;
+ ptr = strchr(start, ':'); /* find next $PATH separator. */
+ if (ptr)
+ *ptr = '\0';
+
+ size = strlen(start) + strlen(bin) + 2;
+ if (size > alloc_size)
+ {
+ char *x = (char *) realloc(exe, size);
+ if (x == NULL)
+ {
+ if (exe != NULL)
+ free(exe);
+ return(NULL);
+ } /* if */
+
+ alloc_size = size;
+ exe = x;
+ } /* if */
+
+ /* build full binary path... */
+ strcpy(exe, start);
+ if ((exe[0] == '\0') || (exe[strlen(exe) - 1] != '/'))
+ strcat(exe, "/");
+ strcat(exe, bin);
+
+ if (access(exe, X_OK) == 0) /* Exists as executable? We're done. */
+ {
+ strcpy(exe, start); /* i'm lazy. piss off. */
+ return(exe);
+ } /* if */
+
+ start = ptr + 1; /* start points to beginning of next element. */
+ } while (ptr != NULL);
+
+ if (exe != NULL)
+ free(exe);
+
+ return(NULL); /* doesn't exist in path. */
+} /* findBinaryInPath */
+
+
+char *calcBaseDir(const char *argv0)
+{
+ /* If there isn't a path on argv0, then look through the $PATH for it. */
+ char *retval;
+ char *envr;
+
+ char *ptr = strrchr(argv0, '/');
+ if (strchr(argv0, '/'))
+ {
+ retval = strdup(argv0);
+ if (retval)
+ *(strrchr(retval, '/')) = '\0';
+ return(retval);
+ }
+
+ envr = getenv("PATH");
+ if (!envr) return NULL;
+ envr = strdup(envr);
+ if (!envr) return NULL;
+ retval = findBinaryInPath(argv0, envr);
+ free(envr);
+ return(retval);
+}
+
+static inline void chdirToAppPath(const char *argv0)