ac8fa328f8501f2369d9302260eeb117264873e6
[xonotic/netradiant.git] / tools / quake3 / q3map2 / path_init.c
1 /* -------------------------------------------------------------------------------
2
3    Copyright (C) 1999-2007 id Software, Inc. and contributors.
4    For a list of contributors, see the accompanying CONTRIBUTORS file.
5
6    This file is part of GtkRadiant.
7
8    GtkRadiant is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    GtkRadiant is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with GtkRadiant; if not, write to the Free Software
20    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
21
22    ----------------------------------------------------------------------------------
23
24    This code has been altered significantly from its original form, to support
25    several games based on the Quake III Arena engine, in the form of "Q3Map2."
26
27    ------------------------------------------------------------------------------- */
28
29
30
31 /* marker */
32 #define PATH_INIT_C
33
34
35
36 /* dependencies */
37 #include "q3map2.h"
38
39
40
41 /* path support */
42 #define MAX_BASE_PATHS  10
43 #define MAX_GAME_PATHS  10
44
45 char                    *homePath;
46 char installPath[ MAX_OS_PATH ];
47
48 int numBasePaths;
49 char                    *basePaths[ MAX_BASE_PATHS ];
50 int numGamePaths;
51 char                    *gamePaths[ MAX_GAME_PATHS ];
52
53
54
55 /*
56    some of this code is based off the original q3map port from loki
57    and finds various paths. moved here from bsp.c for clarity.
58  */
59
60 /*
61    PathLokiGetHomeDir()
62    gets the user's home dir (for ~/.q3a)
63  */
64
65 char *LokiGetHomeDir( void ){
66         #ifndef Q_UNIX
67         return NULL;
68         #else
69         static char     buf[ 4096 ];
70         struct passwd   pw, *pwp;
71         char            *home;
72
73
74         /* get the home environment variable */
75         home = getenv( "HOME" );
76         if ( home ) {
77                 return Q_strncpyz( buf, home, sizeof( buf ) );
78         }
79
80         /* look up home dir in password database */
81         if ( getpwuid_r( getuid(), &pw, buf, sizeof( buf ), &pwp ) == 0 ) {
82                 return pw.pw_dir;
83         }
84
85         return NULL;
86         #endif
87 }
88
89
90
91 /*
92    PathLokiInitPaths()
93    initializes some paths on linux/os x
94  */
95
96 void LokiInitPaths( char *argv0 ){
97         #ifndef Q_UNIX
98         /* this is kinda crap, but hey */
99         strcpy( installPath, "../" );
100         #else
101         char temp[ MAX_OS_PATH ];
102         char        *home;
103         char        *path;
104         char        *last;
105         qboolean found;
106
107
108         /* get home dir */
109         home = LokiGetHomeDir();
110         if ( home == NULL ) {
111                 home = ".";
112         }
113
114         /* do some path divining */
115         strcpy( temp, argv0 );
116         if ( strrchr( temp, '/' ) ) {
117                 argv0 = strrchr( argv0, '/' ) + 1;
118         }
119         else
120         {
121                 /* get path environment variable */
122                 path = getenv( "PATH" );
123
124                 /* minor setup */
125                 last[ 0 ] = path[ 0 ];
126                 last[ 1 ] = '\0';
127                 found = qfalse;
128
129                 /* go through each : segment of path */
130                 while ( last[ 0 ] != '\0' && found == qfalse )
131                 {
132                         /* null out temp */
133                         temp[ 0 ] = '\0';
134
135                         /* find next chunk */
136                         last = strchr( path, ':' );
137                         if ( last == NULL ) {
138                                 last = path + strlen( path );
139                         }
140
141                         /* found home dir candidate */
142                         if ( *path == '~' ) {
143                                 strcpy( temp, home );
144                                 path++;
145                         }
146
147                         /* concatenate */
148                         if ( last > ( path + 1 ) ) {
149                                 strncat( temp, path, ( last - path ) );
150                                 strcat( temp, "/" );
151                         }
152                         strcat( temp, "./" );
153                         strcat( temp, argv0 );
154
155                         /* verify the path */
156                         if ( access( temp, X_OK ) == 0 ) {
157                                 found++;
158                         }
159                         path = last + 1;
160                 }
161         }
162
163         /* flake */
164         if ( realpath( temp, installPath ) ) {
165                 /* q3map is in "tools/" */
166                 *( strrchr( installPath, '/' ) ) = '\0';
167                 *( strrchr( installPath, '/' ) + 1 ) = '\0';
168         }
169
170         /* set home path */
171         homePath = home;
172         #endif
173 }
174
175
176
177 /*
178    CleanPath() - ydnar
179    cleans a dos path \ -> /
180  */
181
182 void CleanPath( char *path ){
183         while ( *path )
184         {
185                 if ( *path == '\\' ) {
186                         *path = '/';
187                 }
188                 path++;
189         }
190 }
191
192
193
194 /*
195    GetGame() - ydnar
196    gets the game_t based on a -game argument
197    returns NULL if no match found
198  */
199
200 game_t *GetGame( char *arg ){
201         int i;
202
203
204         /* dummy check */
205         if ( arg == NULL || arg[ 0 ] == '\0' ) {
206                 return NULL;
207         }
208
209         /* joke */
210         if ( !Q_stricmp( arg, "quake1" ) ||
211                  !Q_stricmp( arg, "quake2" ) ||
212                  !Q_stricmp( arg, "unreal" ) ||
213                  !Q_stricmp( arg, "ut2k3" ) ||
214                  !Q_stricmp( arg, "dn3d" ) ||
215                  !Q_stricmp( arg, "dnf" ) ||
216                  !Q_stricmp( arg, "hl" ) ) {
217                 Sys_Printf( "April fools, silly rabbit!\n" );
218                 exit( 0 );
219         }
220
221         /* test it */
222         i = 0;
223         while ( games[ i ].arg != NULL )
224         {
225                 if ( Q_stricmp( arg, games[ i ].arg ) == 0 ) {
226                         return &games[ i ];
227                 }
228                 i++;
229         }
230
231         /* no matching game */
232         return NULL;
233 }
234
235
236
237 /*
238    AddBasePath() - ydnar
239    adds a base path to the list
240  */
241
242 void AddBasePath( char *path ){
243         /* dummy check */
244         if ( path == NULL || path[ 0 ] == '\0' || numBasePaths >= MAX_BASE_PATHS ) {
245                 return;
246         }
247
248         /* add it to the list */
249         basePaths[ numBasePaths ] = safe_malloc( strlen( path ) + 1 );
250         strcpy( basePaths[ numBasePaths ], path );
251         CleanPath( basePaths[ numBasePaths ] );
252         numBasePaths++;
253 }
254
255
256
257 /*
258    AddHomeBasePath() - ydnar
259    adds a base path to the beginning of the list, prefixed by ~/
260  */
261
262 void AddHomeBasePath( char *path ){
263         #ifdef Q_UNIX
264         int i;
265         char temp[ MAX_OS_PATH ];
266
267
268         /* dummy check */
269         if ( path == NULL || path[ 0 ] == '\0' ) {
270                 return;
271         }
272
273         /* make a hole */
274         for ( i = 0; i < ( MAX_BASE_PATHS - 1 ); i++ )
275                 basePaths[ i + 1 ] = basePaths[ i ];
276
277         /* concatenate home dir and path */
278         sprintf( temp, "%s/%s", homePath, path );
279
280         /* add it to the list */
281         basePaths[ 0 ] = safe_malloc( strlen( temp ) + 1 );
282         strcpy( basePaths[ 0 ], temp );
283         CleanPath( basePaths[ 0 ] );
284         numBasePaths++;
285         #endif
286 }
287
288
289
290 /*
291    AddGamePath() - ydnar
292    adds a game path to the list
293  */
294
295 void AddGamePath( char *path ){
296         int i;
297
298         /* dummy check */
299         if ( path == NULL || path[ 0 ] == '\0' || numGamePaths >= MAX_GAME_PATHS ) {
300                 return;
301         }
302
303         /* add it to the list */
304         gamePaths[ numGamePaths ] = safe_malloc( strlen( path ) + 1 );
305         strcpy( gamePaths[ numGamePaths ], path );
306         CleanPath( gamePaths[ numGamePaths ] );
307         numGamePaths++;
308
309         /* don't add it if it's already there */
310         for ( i = 0; i < numGamePaths - 1; i++ )
311         {
312                 if ( strcmp( gamePaths[i], gamePaths[numGamePaths - 1] ) == 0 ) {
313                         free( gamePaths[numGamePaths - 1] );
314                         gamePaths[numGamePaths - 1] = NULL;
315                         numGamePaths--;
316                         break;
317                 }
318         }
319
320 }
321
322
323
324
325 /*
326    InitPaths() - ydnar
327    cleaned up some of the path initialization code from bsp.c
328    will remove any arguments it uses
329  */
330
331 void InitPaths( int *argc, char **argv ){
332         int i, j, k, len, len2;
333         char temp[ MAX_OS_PATH ];
334
335
336         /* note it */
337         Sys_FPrintf( SYS_VRB, "--- InitPaths ---\n" );
338
339         /* get the install path for backup */
340         LokiInitPaths( argv[ 0 ] );
341
342         /* set game to default (q3a) */
343         game = &games[ 0 ];
344         numBasePaths = 0;
345         numGamePaths = 0;
346
347         /* parse through the arguments and extract those relevant to paths */
348         for ( i = 0; i < *argc; i++ )
349         {
350                 /* check for null */
351                 if ( argv[ i ] == NULL ) {
352                         continue;
353                 }
354
355                 /* -game */
356                 if ( strcmp( argv[ i ], "-game" ) == 0 ) {
357                         if ( ++i >= *argc ) {
358                                 Error( "Out of arguments: No game specified after %s", argv[ i - 1 ] );
359                         }
360                         argv[ i - 1 ] = NULL;
361                         game = GetGame( argv[ i ] );
362                         if ( game == NULL ) {
363                                 game = &games[ 0 ];
364                         }
365                         argv[ i ] = NULL;
366                 }
367
368                 /* -fs_basepath */
369                 else if ( strcmp( argv[ i ], "-fs_basepath" ) == 0 ) {
370                         if ( ++i >= *argc ) {
371                                 Error( "Out of arguments: No path specified after %s.", argv[ i - 1 ] );
372                         }
373                         argv[ i - 1 ] = NULL;
374                         AddBasePath( argv[ i ] );
375                         argv[ i ] = NULL;
376                 }
377
378                 /* -fs_game */
379                 else if ( strcmp( argv[ i ], "-fs_game" ) == 0 ) {
380                         if ( ++i >= *argc ) {
381                                 Error( "Out of arguments: No path specified after %s.", argv[ i - 1 ] );
382                         }
383                         argv[ i - 1 ] = NULL;
384                         AddGamePath( argv[ i ] );
385                         argv[ i ] = NULL;
386                 }
387         }
388
389         /* remove processed arguments */
390         for ( i = 0, j = 0, k = 0; i < *argc && j < *argc; i++, j++ )
391         {
392                 for ( ; j < *argc && argv[ j ] == NULL; j++ ) ;
393                 argv[ i ] = argv[ j ];
394                 if ( argv[ i ] != NULL ) {
395                         k++;
396                 }
397         }
398         *argc = k;
399
400         /* add standard game path */
401         AddGamePath( game->gamePath );
402
403         /* if there is no base path set, figure it out */
404         if ( numBasePaths == 0 ) {
405                 /* this is another crappy replacement for SetQdirFromPath() */
406                 len2 = strlen( game->magic );
407                 for ( i = 0; i < *argc && numBasePaths == 0; i++ )
408                 {
409                         /* extract the arg */
410                         strcpy( temp, argv[ i ] );
411                         CleanPath( temp );
412                         len = strlen( temp );
413                         Sys_FPrintf( SYS_VRB, "Searching for \"%s\" in \"%s\" (%d)...\n", game->magic, temp, i );
414
415                         /* this is slow, but only done once */
416                         for ( j = 0; j < ( len - len2 ); j++ )
417                         {
418                                 /* check for the game's magic word */
419                                 if ( Q_strncasecmp( &temp[ j ], game->magic, len2 ) == 0 ) {
420                                         /* now find the next slash and nuke everything after it */
421                                         while ( temp[ ++j ] != '/' && temp[ j ] != '\0' ) ;
422                                         temp[ j ] = '\0';
423
424                                         /* add this as a base path */
425                                         AddBasePath( temp );
426                                         break;
427                                 }
428                         }
429                 }
430
431                 /* add install path */
432                 if ( numBasePaths == 0 ) {
433                         AddBasePath( installPath );
434                 }
435
436                 /* check again */
437                 if ( numBasePaths == 0 ) {
438                         Error( "Failed to find a valid base path." );
439                 }
440         }
441
442         /* this only affects unix */
443         AddHomeBasePath( game->homeBasePath );
444
445         /* initialize vfs paths */
446         if ( numBasePaths > MAX_BASE_PATHS ) {
447                 numBasePaths = MAX_BASE_PATHS;
448         }
449         if ( numGamePaths > MAX_GAME_PATHS ) {
450                 numGamePaths = MAX_GAME_PATHS;
451         }
452
453         /* walk the list of game paths */
454         for ( j = 0; j < numGamePaths; j++ )
455         {
456                 /* walk the list of base paths */
457                 for ( i = 0; i < numBasePaths; i++ )
458                 {
459                         /* create a full path and initialize it */
460                         sprintf( temp, "%s/%s/", basePaths[ i ], gamePaths[ j ] );
461                         vfsInitDirectory( temp );
462                 }
463         }
464
465         /* done */
466         Sys_Printf( "\n" );
467 }