src/cfile/cfilesystem.cpp

   1 /*
   2  * Copyright (C) Volition, Inc. 1999.  All rights reserved.
   3  *
   4  * All source code herein is the property of Volition, Inc. You may not sell
   5  * or otherwise commercially exploit the source or things you created based on
   6  * the source.
   7  */
   8
   9 /*
  10  * $Logfile: /Freespace2/code/CFile/CfileSystem.cpp $
  11  * $Revision$
  12  * $Date$
  13  * $Author$
  14  *
  15  * Functions to keep track of and find files that can exist
  16  * on the harddrive, cd-rom, or in a pack file on either of those.
  17  * This keeps a list of all the files in packfiles or on CD-rom
  18  * and when you need a file you call one function which then searches
  19  * all those locations, inherently enforcing precedence orders.
  20  *
  21  * $Log$
  22  * Revision 1.11  2004/07/04 11:27:29  taylor
  23  * cleanup CFILE code a little, warning fixes, remove redundant dir checks, amd64 support
  24  *
  25  * Revision 1.10  2004/06/11 00:29:22  tigital
  26  * byte-swapping changes for bigendian systems
  27  *
  28  * Revision 1.9  2003/05/27 03:03:11  taylor
  29  * fix second root (gamedir) searching
  30  *
  31  * Revision 1.8  2003/02/20 17:41:07  theoddone33
  32  * Userdir patch from Taylor Richards
  33  *
  34  * Revision 1.7  2002/06/22 23:57:39  relnev
  35  * remove writable strings.
  36  *
  37  * fix compile for intel compiler.
  38  *
  39  * Revision 1.6  2002/06/09 04:41:15  relnev
  40  * added copyright header
  41  *
  42  * Revision 1.5  2002/06/05 04:03:32  relnev
  43  * finished cfilesystem.
  44  *
  45  * removed some old code.
  46  *
  47  * fixed mouse save off-by-one.
  48  *
  49  * sound cleanups.
  50  *
  51  * Revision 1.4  2002/05/28 17:26:57  theoddone33
  52  * Fill in some timer and palette setting stubs.  Still no display
  53  *
  54  * Revision 1.3  2002/05/28 06:45:38  theoddone33
  55  * Cleanup some stuff
  56  *
  57  * Revision 1.2  2002/05/28 06:28:20  theoddone33
  58  * Filesystem mods, actually reads some data files now
  59  *
  60  * Revision 1.1.1.1  2002/05/03 03:28:08  root
  61  * Initial import.
  62  *
  63  *
  64  * 6     9/08/99 10:01p Dave
  65  * Make sure game won't run in a drive's root directory. Make sure
  66  * standalone routes suqad war messages properly to the host.
  67  *
  68  * 5     9/03/99 1:31a Dave
  69  * CD checking by act. Added support to play 2 cutscenes in a row
  70  * seamlessly. Fixed super low level cfile bug related to files in the
  71  * root directory of a CD. Added cheat code to set campaign mission # in
  72  * main hall.
  73  *
  74  * 4     2/22/99 10:31p Andsager
  75  * Get rid of unneeded includes.
  76  *
  77  * 3     10/13/98 9:19a Andsager
  78  * Add localization support to cfile.  Optional parameter with cfopen that
  79  * looks for localized files.
  80  *
  81  * 2     10/07/98 10:52a Dave
  82  * Initial checkin.
  83  *
  84  * 1     10/07/98 10:48a Dave
  85  *
  86  * 14    8/31/98 2:06p Dave
  87  * Make cfile sort the ordering or vp files. Added support/checks for
  88  * recognizing "mission disk" players.
  89  *
  90  * 13    6/23/98 4:18p Hoffoss
  91  * Fixed some bugs with AC release build.
  92  *
  93  * 12    5/20/98 10:46p John
  94  * Added code that doesn't include duplicate filenames in any file list
  95  * functions.
  96  *
  97  * 11    5/14/98 2:14p Lawrance2
  98  * Use filespec filtering for packfiles
  99  *
 100  * 10    5/03/98 11:53a John
 101  * Fixed filename case mangling.
 102  *
 103  * 9     5/02/98 11:06p Allender
 104  * correctly deal with pack pathnames
 105  *
 106  * 8     5/01/98 11:41a Allender
 107  * Fixed bug with mission saving in Fred.
 108  *
 109  * 7     5/01/98 10:21a John
 110  * Added code to find all pack files in all trees.   Added code to create
 111  * any directories that we write to.
 112  *
 113  * 6     4/30/98 10:21p John
 114  * Added code to cleanup cfilesystem
 115  *
 116  * 5     4/30/98 10:18p John
 117  * added source safe header
 118  *
 119  * $NoKeywords: $
 120  */
 121
 122 #include <stdlib.h>
 123 #include <string.h>
 124 #include <stdio.h>
 125 #include <errno.h>
 126 #ifndef PLAT_UNIX
 127 #include <io.h>
 128 #include <direct.h>
 129 #include <windows.h>
 130 #include <winbase.h>            /* needed for memory mapping of file functions */
 131 #else
 132 #include <sys/types.h>
 133 #include <dirent.h>
 134 #include <fnmatch.h>
 135 #include <sys/stat.h>
 136 #include <unistd.h>
 137 #endif
 138
 139 #include "pstypes.h"
 140 //#include "outwnd.h"
 141 //#include "vecmat.h"
 142 //#include "timer.h"
 143 #include "cfile.h"
 144 #include "cfilesystem.h"
 145 #include "localize.h"
 146
 147
 148 #define CF_ROOTTYPE_PATH 0
 149 #define CF_ROOTTYPE_PACK 1
 150
 151 //  Created by:
 152 //    specifying hard drive tree
 153 //    searching for pack files on hard drive            // Found by searching all known paths
 154 //    specifying cd-rom tree
 155 //    searching for pack files on CD-rom tree
 156 typedef struct cf_root {
 157         char                            path[CF_MAX_PATHNAME_LENGTH];           // Contains something like c:\projects\freespace or c:\projects\freespace\freespace.vp
 158         int                             roottype;                                                               // CF_ROOTTYPE_PATH  = Path, CF_ROOTTYPE_PACK =Pack file
 159 } cf_root;
 160
 161 // convenient type for sorting (see cf_build_pack_list())
 162 typedef struct cf_root_sort {
 163         char                            path[CF_MAX_PATHNAME_LENGTH];
 164         int                             roottype;
 165         int                             cf_type;
 166 } cf_root_sort;
 167
 168 #define CF_NUM_ROOTS_PER_BLOCK   32
 169 #define CF_MAX_ROOT_BLOCKS                      256                             // Can store 32*256 = 8192 Roots
 170 #define CF_MAX_ROOTS                                    (CF_NUM_ROOTS_PER_BLOCK * CF_MAX_ROOT_BLOCKS)
 171
 172 typedef struct cf_root_block {
 173         cf_root                 roots[CF_NUM_ROOTS_PER_BLOCK];
 174 } cf_root_block;
 175
 176 static int Num_roots = 0;
 177 static cf_root_block  *Root_blocks[CF_MAX_ROOT_BLOCKS];
 178
 179
 180 // Created by searching all roots in order.   This means Files is then sorted by precedence.
 181 typedef struct cf_file {
 182         char            name_ext[CF_MAX_FILENAME_LENGTH];               // Filename and extension
 183         int             root_index;                                                                             // Where in Roots this is located
 184         int             pathtype_index;                                                         // Where in Paths this is located
 185         time_t  write_time;                                                                             // When it was last written
 186         int             size;                                                                                           // How big it is in bytes
 187         int             pack_offset;                                                                    // For pack files, where it is at.   0 if not in a pack file.  This can be used to tell if in a pack file.
 188 } cf_file;
 189
 190 #define CF_NUM_FILES_PER_BLOCK   256
 191 #define CF_MAX_FILE_BLOCKS                      128                                             // Can store 256*128 = 32768 files
 192
 193 typedef struct cf_file_block {
 194         cf_file                                         files[CF_NUM_FILES_PER_BLOCK];
 195 } cf_file_block;
 196
 197 static int Num_files = 0;
 198 static cf_file_block  *File_blocks[CF_MAX_FILE_BLOCKS];
 199
 200
 201 // Return a pointer to to file 'index'.
 202 cf_file *cf_get_file(int index)
 203 {
 204         int block = index / CF_NUM_FILES_PER_BLOCK;
 205         int offset = index % CF_NUM_FILES_PER_BLOCK;
 206
 207         return &File_blocks[block]->files[offset];
 208 }
 209
 210 // Create a new file and return a pointer to it.
 211 cf_file *cf_create_file()
 212 {
 213         int block = Num_files / CF_NUM_FILES_PER_BLOCK;
 214         int offset = Num_files % CF_NUM_FILES_PER_BLOCK;
 215
 216         if ( File_blocks[block] == NULL )       {
 217                 File_blocks[block] = (cf_file_block *)malloc( sizeof(cf_file_block) );
 218                 Assert( File_blocks[block] != NULL);
 219         }
 220
 221         Num_files++;
 222
 223         return &File_blocks[block]->files[offset];
 224 }
 225
 226 extern int cfile_inited;
 227
 228 // Create a new root and return a pointer to it.  The structure is assumed unitialized.
 229 cf_root *cf_get_root(int n)
 230 {
 231         int block = n / CF_NUM_ROOTS_PER_BLOCK;
 232         int offset = n % CF_NUM_ROOTS_PER_BLOCK;
 233
 234         if (!cfile_inited)
 235                 return NULL;
 236
 237         return &Root_blocks[block]->roots[offset];
 238 }
 239
 240
 241 // Create a new root and return a pointer to it.  The structure is assumed unitialized.
 242 cf_root *cf_create_root()
 243 {
 244         int block = Num_roots / CF_NUM_ROOTS_PER_BLOCK;
 245         int offset = Num_roots % CF_NUM_ROOTS_PER_BLOCK;
 246
 247         if ( Root_blocks[block] == NULL )       {
 248                 Root_blocks[block] = (cf_root_block *)malloc( sizeof(cf_root_block) );
 249                 Assert(Root_blocks[block] != NULL);
 250         }
 251
 252         Num_roots++;
 253
 254         return &Root_blocks[block]->roots[offset];
 255 }
 256
 257 // return the # of packfiles which exist
 258 int cf_get_packfile_count(cf_root *root)
 259 {
 260         char filespec[MAX_PATH_LEN];
 261         int i;
 262         int packfile_count;
 263
 264         // count up how many packfiles we're gonna have
 265         packfile_count = 0;
 266         for (i=CF_TYPE_ROOT; i<CF_MAX_PATH_TYPES; i++ ) {
 267 #ifdef PLAT_UNIX
 268                 strcpy( filespec, root->path );
 269
 270                 if(strlen(Pathtypes[i].path)){
 271                         strcat( filespec, Pathtypes[i].path );
 272                         strcat( filespec, "/" );
 273                 }
 274
 275                 DIR *dirp;
 276                 struct dirent *dir;
 277
 278                 dirp = opendir (filespec);
 279                 if ( dirp ) {
 280                         while ((dir = readdir (dirp)) != NULL)
 281                         {
 282                                 if (!fnmatch ("*.vp", dir->d_name, 0))
 283                                         packfile_count++;
 284                         }
 285                         closedir(dirp);
 286                 }
 287 #else
 288                 strcpy( filespec, root->path );
 289
 290                 if(strlen(Pathtypes[i].path)){
 291                         strcat( filespec, Pathtypes[i].path );
 292                         strcat( filespec, "\\" );
 293                 }
 294
 295                 strcat( filespec, "*.vp" );
 296
 297                 int find_handle;
 298                 _finddata_t find;
 299
 300                 find_handle = _findfirst( filespec, &find );
 301
 302                 if (find_handle != -1) {
 303                         do {
 304                                 if (!(find.attrib & _A_SUBDIR)) {
 305                                         packfile_count++;
 306                                 }
 307
 308                         } while (!_findnext(find_handle, &find));
 309
 310                         _findclose( find_handle );
 311                 }
 312 #endif
 313         }
 314
 315         return packfile_count;
 316 }
 317
 318 // packfile sort function
 319 int cf_packfile_sort_func(const void *elem1, const void *elem2)
 320 {
 321         cf_root_sort *r1, *r2;
 322         r1 = (cf_root_sort*)elem1;
 323         r2 = (cf_root_sort*)elem2;
 324
 325         // if the 2 directory types are the same, do a string compare
 326         if(r1->cf_type == r2->cf_type){
 327                 return stricmp(r1->path, r2->path);
 328         }
 329
 330         // otherwise return them in order of CF_TYPE_* precedence
 331         return (r1->cf_type < r2->cf_type) ? -1 : 1;
 332 }
 333
 334 // Go through a root and look for pack files
 335 void cf_build_pack_list( cf_root *root )
 336 {
 337         char filespec[MAX_PATH_LEN];
 338         int i;
 339         cf_root_sort *temp_roots_sort, *rptr_sort;
 340         int temp_root_count, root_index;
 341
 342         // determine how many packfiles there are
 343         temp_root_count = cf_get_packfile_count(root);
 344         if(temp_root_count <= 0){
 345                 return;
 346         }
 347
 348         // allocate a temporary array of temporary roots so we can easily sort them
 349         temp_roots_sort = (cf_root_sort*)malloc(sizeof(cf_root_sort) * temp_root_count);
 350         if(temp_roots_sort == NULL){
 351                 Int3();
 352                 return;
 353         }
 354
 355         // now just setup all the root info
 356         root_index = 0;
 357         for (i=CF_TYPE_ROOT; i<CF_MAX_PATH_TYPES; i++ ) {
 358
 359 #ifdef PLAT_UNIX
 360                 strcpy( filespec, root->path );
 361
 362                 if(strlen(Pathtypes[i].path)){
 363                         strcat( filespec, Pathtypes[i].path );
 364                         strcat( filespec, "/" );
 365                 }
 366
 367                 DIR *dirp;
 368                 struct dirent *dir;
 369
 370                 dirp = opendir (filespec);
 371                 if ( dirp ) {
 372                         while ((dir = readdir (dirp)) != NULL)
 373                         {
 374                                 if (!fnmatch ("*.vp", dir->d_name, 0))
 375                                 {
 376                                         Assert(root_index < temp_root_count);
 377
 378                                         char fn[MAX_PATH];
 379                                         snprintf(fn, MAX_PATH-1, "%s/%s", filespec, dir->d_name);
 380                                         fn[MAX_PATH-1] = 0;
 381
 382                                         struct stat buf;
 383                                         if (stat(fn, &buf) == -1) {
 384                                                 continue;
 385                                         }
 386
 387                                         if (!S_ISREG(buf.st_mode)) {
 388                                                 continue;
 389                                         }
 390
 391                                         // get a temp pointer
 392                                         rptr_sort = &temp_roots_sort[root_index++];
 393
 394                                         // fill in all the proper info
 395                                         strcpy(rptr_sort->path, root->path);
 396
 397                                         if(strlen(Pathtypes[i].path)){
 398                                                 strcat(rptr_sort->path, Pathtypes[i].path );
 399                                                 strcat(rptr_sort->path, "/");
 400                                         }
 401
 402                                         strcat(rptr_sort->path, dir->d_name );
 403                                         rptr_sort->roottype = CF_ROOTTYPE_PACK;
 404                                         rptr_sort->cf_type = i;
 405                                 }
 406                         }
 407                         closedir(dirp);
 408                 }
 409 #else
 410                 strcpy( filespec, root->path );
 411
 412                 if(strlen(Pathtypes[i].path)){
 413                         strcat( filespec, Pathtypes[i].path );
 414                         strcat( filespec, "\\" );
 415                 }
 416                 strcat( filespec, "*.vp" );
 417                 int find_handle;
 418                 _finddata_t find;
 419
 420                 find_handle = _findfirst( filespec, &find );
 421
 422                 if (find_handle != -1) {
 423                         do {
 424                                 // add the new item
 425                                 if (!(find.attrib & _A_SUBDIR)) {
 426                                         Assert(root_index < temp_root_count);
 427
 428                                         // get a temp pointer
 429                                         rptr_sort = &temp_roots_sort[root_index++];
 430
 431                                         // fill in all the proper info
 432                                         strcpy(rptr_sort->path, root->path);
 433
 434                                         if(strlen(Pathtypes[i].path)){
 435                                                 strcat(rptr_sort->path, Pathtypes[i].path );
 436                                                 strcat(rptr_sort->path, "\\");
 437                                         }
 438
 439                                         strcat(rptr_sort->path, find.name );
 440                                         rptr_sort->roottype = CF_ROOTTYPE_PACK;
 441                                         rptr_sort->cf_type = i;
 442                                 }
 443
 444                         } while (!_findnext(find_handle, &find));
 445
 446                         _findclose( find_handle );
 447                 }
 448 #endif
 449         }
 450
 451         // these should always be the same
 452         Assert(root_index == temp_root_count);
 453
 454         // sort tht roots
 455         qsort(temp_roots_sort,  temp_root_count, sizeof(cf_root_sort), cf_packfile_sort_func);
 456
 457         // now insert them all into the real root list properly
 458         cf_root *new_root;
 459         for(i=0; i<temp_root_count; i++){
 460                 new_root = cf_create_root();
 461                 strcpy( new_root->path, root->path );
 462
 463                 // mwa -- 4/2/98 put in the next 2 lines because the path name needs to be there
 464                 // to find the files.
 465                 strcpy(new_root->path, temp_roots_sort[i].path);
 466                 new_root->roottype = CF_ROOTTYPE_PACK;
 467         }
 468
 469         // free up the temp list
 470         free(temp_roots_sort);
 471 }
 472
 473
 474 void cf_build_root_list(const char *extras_dir)
 475 {
 476         Num_roots = 0;
 477
 478         cf_root *root;
 479
 480         // ================================================================
 481         // have user's writable directory as default for loading and saving files
 482         root = cf_create_root();
 483         strcpy( root->path, Cfile_user_dir );
 484
 485         // do we already have a slash? as in the case of a root directory install
 486         if(strlen(root->path) && (root->path[strlen(root->path)-1] != DIR_SEPARATOR_CHAR)){
 487                 strcat(root->path, DIR_SEPARATOR_STR);          // put trailing backslash on for easier path construction
 488         }
 489         root->roottype = CF_ROOTTYPE_PATH;
 490
 491         //======================================================
 492         // then check any VP files under the directory.
 493         cf_build_pack_list(root);
 494
 495         //======================================================
 496         // Next, use the executable's directory for game data
 497         root = cf_create_root();
 498         strcpy( root->path, Cfile_root_dir );
 499
 500         // do we already have a slash? as in the case of a root directory install
 501         if(strlen(root->path) && (root->path[strlen(root->path)-1] != DIR_SEPARATOR_CHAR)){
 502                 strcat(root->path, DIR_SEPARATOR_STR);          // put trailing backslash on for easier path construction
 503         }
 504         root->roottype = CF_ROOTTYPE_PATH;
 505
 506         //======================================================
 507         // then check any VP files under the current directory.
 508         cf_build_pack_list(root);
 509
 510
 511         //======================================================
 512         // Check the real CD if one...
 513         if ( extras_dir && strlen(extras_dir) ) {
 514                 root = cf_create_root();
 515                 strcpy( root->path, extras_dir );
 516                 root->roottype = CF_ROOTTYPE_PATH;
 517
 518                 //======================================================
 519                 // Next, check any VP files in the CD-ROM directory.
 520                 cf_build_pack_list(root);
 521         }
 522 }
 523
 524 // Given a lower case list of file extensions
 525 // separated by spaces, return zero if ext is
 526 // not in the list.
 527 int is_ext_in_list( const char *ext_list, char *ext )
 528 {
 529         char tmp_ext[128];
 530
 531         strncpy( tmp_ext, ext, 127 );
 532         strlwr(tmp_ext);
 533         if ( strstr(ext_list, tmp_ext ))        {
 534                 return 1;
 535         }
 536
 537         return 0;
 538 }
 539
 540 void cf_search_root_path(int root_index)
 541 {
 542         int i;
 543
 544         cf_root *root = cf_get_root(root_index);
 545
 546         mprintf(( "Searching root '%s'\n", root->path ));
 547
 548         char search_path[CF_MAX_PATHNAME_LENGTH];
 549
 550         for (i=CF_TYPE_ROOT; i<CF_MAX_PATH_TYPES; i++ ) {
 551
 552                 strcpy( search_path, root->path );
 553
 554                 if(strlen(Pathtypes[i].path)){
 555                         strcat( search_path, Pathtypes[i].path );
 556                         strcat( search_path, DIR_SEPARATOR_STR );
 557                 }
 558
 559 #ifdef PLAT_UNIX
 560                 DIR *dirp;
 561                 struct dirent *dir;
 562
 563                 // only get pilots from the primary root as there could be nasty
 564                 // permission issues otherwise
 565                 if ( (root_index > 0) && ((Pathtypes[i].index == CF_TYPE_SINGLE_PLAYERS)
 566                                         || (Pathtypes[i].index == CF_TYPE_MULTI_PLAYERS)) ) {
 567                         break;
 568                 }
 569
 570                 dirp = opendir (search_path);
 571                 if ( dirp ) {
 572                         while ((dir = readdir (dirp)) != NULL)
 573                         {
 574                                 if (!fnmatch ("*.*", dir->d_name, 0))
 575                                 {
 576                                         char fn[MAX_PATH];
 577                                         snprintf(fn, MAX_PATH-1, "%s/%s", search_path, dir->d_name);
 578                                         fn[MAX_PATH-1] = 0;
 579
 580                                         struct stat buf;
 581                                         if (stat(fn, &buf) == -1) {
 582                                                 continue;
 583                                         }
 584
 585                                         if (!S_ISREG(buf.st_mode)) {
 586                                                 continue;
 587                                         }
 588
 589                                         char *ext = strchr( dir->d_name, '.' );
 590                                         if ( ext )      {
 591                                                 if ( is_ext_in_list( Pathtypes[i].extensions, ext ) )   {
 592                                                         // Found a file!!!!
 593                                                         cf_file *file = cf_create_file();
 594
 595                                                         strcpy( file->name_ext, dir->d_name );
 596                                                         file->root_index = root_index;
 597                                                         file->pathtype_index = i;
 598
 599
 600                                                         file->write_time = buf.st_mtime;
 601                                                         file->size = buf.st_size;
 602
 603                                                         file->pack_offset = 0;                  // Mark as a non-packed file
 604
 605                                                         //mprintf(( "Found file '%s'\n", file->name_ext ));
 606                                                 }
 607                                         }
 608                                 }
 609                         }
 610                         closedir(dirp);
 611                 }
 612 #else
 613                 strcat( search_path, "*.*" );
 614
 615                 int find_handle;
 616                 _finddata_t find;
 617
 618                 find_handle = _findfirst( search_path, &find );
 619
 620                 if (find_handle != -1) {
 621                         do {
 622                                 if (!(find.attrib & _A_SUBDIR)) {
 623
 624                                         char *ext = strchr( find.name, '.' );
 625                                         if ( ext )      {
 626                                                 if ( is_ext_in_list( Pathtypes[i].extensions, ext ) )   {
 627                                                         // Found a file!!!!
 628                                                         cf_file *file = cf_create_file();
 629
 630                                                         strcpy( file->name_ext, find.name );
 631                                                         file->root_index = root_index;
 632                                                         file->pathtype_index = i;
 633                                                         file->write_time = find.time_write;
 634                                                         file->size = find.size;
 635                                                         file->pack_offset = 0;                  // Mark as a non-packed file
 636
 637                                                         //mprintf(( "Found file '%s'\n", file->name_ext ));
 638
 639                                                 }
 640                                         }
 641
 642                                 }
 643
 644                         } while (!_findnext(find_handle, &find));
 645
 646                         _findclose( find_handle );
 647                 }
 648 #endif
 649
 650         }
 651 }
 652
 653
 654 typedef struct VP_FILE_HEADER {
 655         char id[4];
 656         int version;
 657         int index_offset;
 658         int num_files;
 659 } VP_FILE_HEADER;
 660
 661 typedef struct VP_FILE {
 662         int     offset;
 663         int     size;
 664         char    filename[32];
 665         fs_time_t write_time;
 666 } VP_FILE;
 667
 668 void cf_search_root_pack(int root_index)
 669 {
 670         int i;
 671
 672         cf_root *root = cf_get_root(root_index);
 673
 674         //mprintf(( "Searching root pack '%s'\n", root->path ));
 675
 676         // Open data
 677
 678         FILE *fp = fopen( root->path, "rb" );
 679         // Read the file header
 680         if (!fp) {
 681                 return;
 682         }
 683
 684         VP_FILE_HEADER VP_header;
 685
 686         Assert( sizeof(VP_header) == 16 );
 687         fread(&VP_header, 1, sizeof(VP_header), fp);
 688
 689     VP_header.version = INTEL_INT( VP_header.version);
 690     VP_header.index_offset = INTEL_INT( VP_header.index_offset);
 691     VP_header.num_files = INTEL_INT( VP_header.num_files);
 692
 693         // Read index info
 694         fseek(fp, VP_header.index_offset, SEEK_SET);
 695
 696         char search_path[CF_MAX_PATHNAME_LENGTH];
 697
 698         strcpy( search_path, "" );
 699
 700         // Go through all the files
 701         for (i=0; i<VP_header.num_files; i++ )  {
 702                 VP_FILE find;
 703
 704                 fread( &find, sizeof(VP_FILE), 1, fp );
 705
 706         find.offset = INTEL_INT( find.offset );
 707         find.size = INTEL_INT( find.size );
 708                 find.write_time = INTEL_INT(find.write_time);
 709
 710                 if ( find.size == 0 )   {
 711                         if ( !stricmp( find.filename, ".." ))   {
 712                                 int l = strlen(search_path);
 713                                 char *p = &search_path[l-1];
 714                                 while( (p > search_path) && (*p != DIR_SEPARATOR_CHAR) )        {
 715                                         p--;
 716                                 }
 717                                 *p = 0;
 718                         } else {
 719                                 if ( strlen(search_path)        )       {
 720                                         strcat( search_path,    DIR_SEPARATOR_STR );
 721                                 }
 722                                 strcat( search_path, find.filename );
 723                         }
 724
 725                         //mprintf(( "Current dir = '%s'\n", search_path ));
 726                 } else {
 727
 728                         int j;
 729                         for (j=CF_TYPE_ROOT; j<CF_MAX_PATH_TYPES; j++ ) {
 730
 731                                 if ( !stricmp( search_path, Pathtypes[j].path ))        {
 732
 733                                         char *ext = strchr( find.filename, '.' );
 734                                         if ( ext )      {
 735                                                 if ( is_ext_in_list( Pathtypes[j].extensions, ext ) )   {
 736                                                         // Found a file!!!!
 737                                                         cf_file *file = cf_create_file();
 738
 739                                                         strcpy( file->name_ext, find.filename );
 740                                                         file->root_index = root_index;
 741                                                         file->pathtype_index = j;
 742                                                         file->write_time = find.write_time;
 743                                                         file->size = find.size;
 744                                                         file->pack_offset = find.offset;                        // Mark as a non-packed file
 745
 746                                                         //mprintf(( "Found pack file '%s'\n", file->name_ext ));
 747                                                 }
 748                                         }
 749
 750
 751                                 }
 752                         }
 753
 754                 }
 755         }
 756         fclose(fp);
 757 }
 758
 759
 760 void cf_build_file_list()
 761 {
 762         int i;
 763
 764         Num_files = 0;
 765
 766         // For each root, find all files...
 767         for (i=1; i<Num_roots; i++ )    {
 768                 cf_root *root = cf_get_root(i);
 769                 if ( root->roottype == CF_ROOTTYPE_PATH )       {
 770                         cf_search_root_path(i);
 771                 } else if ( root->roottype == CF_ROOTTYPE_PACK )        {
 772                         cf_search_root_pack(i);
 773                 }
 774         }
 775
 776 }
 777
 778
 779 void cf_build_secondary_filelist(const char *extras_dir)
 780 {
 781         int i;
 782
 783         // Assume no files
 784         Num_roots = 0;
 785         Num_files = 0;
 786
 787         // Init the path types
 788         for (i=0; i<CF_MAX_PATH_TYPES; i++ )    {
 789                 Assert( Pathtypes[i].index == i );
 790 #if 0 /* they are already lowercased -- SBF */
 791                 if ( Pathtypes[i].extensions )  {
 792                         strlwr(Pathtypes[i].extensions);
 793                 }
 794 #endif
 795         }
 796
 797         // Init the root blocks
 798         for (i=0; i<CF_MAX_ROOT_BLOCKS; i++ )   {
 799                 Root_blocks[i] = NULL;
 800         }
 801
 802         // Init the file blocks
 803         for (i=0; i<CF_MAX_FILE_BLOCKS; i++ )   {
 804                 File_blocks[i] = NULL;
 805         }
 806
 807         mprintf(( "Building file index...\n" ));
 808
 809         // build the list of searchable roots
 810         cf_build_root_list(extras_dir);
 811
 812         // build the list of files themselves
 813         cf_build_file_list();
 814
 815         mprintf(( "Found %d roots and %d files.\n", Num_roots, Num_files ));
 816 }
 817
 818 void cf_free_secondary_filelist()
 819 {
 820         int i;
 821
 822         // Free the root blocks
 823         for (i=0; i<CF_MAX_ROOT_BLOCKS; i++ )   {
 824                 if ( Root_blocks[i] )   {
 825                         free( Root_blocks[i] );
 826                         Root_blocks[i] = NULL;
 827                 }
 828         }
 829         Num_roots = 0;
 830
 831         // Init the file blocks
 832         for (i=0; i<CF_MAX_FILE_BLOCKS; i++ )   {
 833                 if ( File_blocks[i] )   {
 834                         free( File_blocks[i] );
 835                         File_blocks[i] = NULL;
 836                 }
 837         }
 838         Num_files = 0;
 839 }
 840
 841 // Searches for a file.   Follows all rules and precedence and searches
 842 // CD's and pack files.
 843 // Input:  filespace   - Filename & extension
 844 //         pathtype    - See CF_TYPE_ defines in CFILE.H
 845 // Output: pack_filename - Absolute path and filename of this file.   Could be a packfile or the actual file.
 846 //         size        - File size
 847 //         offset      - Offset into pack file.  0 if not a packfile.
 848 // Returns: If not found returns 0.
 849 int cf_find_file_location( const char *filespec, int pathtype, char *pack_filename, int *size, int *offset, bool localize )
 850 {
 851         int i;
 852
 853         Assert(filespec && strlen(filespec));
 854
 855         // see if we have something other than just a filename
 856         // our current rules say that any file that specifies a direct
 857         // path will try to be opened on that path.  If that open
 858         // fails, then we will open the file based on the extension
 859         // of the file
 860
 861         // NOTE: full path should also include localization, if so desired
 862 #ifdef PLAT_UNIX
 863         if ( strpbrk(filespec, "/") ) {
 864 #else
 865         if ( strpbrk(filespec,"/\\:")  ) {              // do we have a full path already?
 866 #endif
 867                 FILE *fp = fopen(filespec, "rb" );
 868                 if (fp) {
 869                         if ( size ) *size = filelength(fileno(fp));
 870                         if ( offset ) *offset = 0;
 871                         if ( pack_filename ) {
 872                                 strcpy( pack_filename, filespec );
 873                         }
 874                         fclose(fp);
 875                         return 1;
 876                 }
 877
 878                 return 0;               // If they give a full path, fail if not found.
 879         }
 880
 881         // Search the hard drive for files first.
 882         int num_search_dirs = 0;
 883         int search_order[CF_MAX_PATH_TYPES];
 884
 885         if ( CF_TYPE_SPECIFIED(pathtype) )      {
 886                 search_order[num_search_dirs++] = pathtype;
 887         }
 888
 889         for (i=CF_TYPE_ROOT; i<CF_MAX_PATH_TYPES; i++)  {
 890                 if ( i != pathtype )    {
 891                         search_order[num_search_dirs++] = i;
 892                 }
 893         }
 894
 895         for (i=0; i<num_search_dirs; i++ )      {
 896                 char longname[MAX_PATH_LEN];
 897
 898                 cf_create_default_path_string( longname, search_order[i], filespec, localize );
 899
 900                 FILE *fp = fopen(longname, "rb" );
 901                 if (fp) {
 902                         if ( size ) *size = filelength(fileno(fp));
 903                         if ( offset ) *offset = 0;
 904                         if ( pack_filename ) {
 905                                 strcpy( pack_filename, longname );
 906                         }
 907                         fclose(fp);
 908                         return 1;
 909                 }
 910         }
 911
 912         // Search the pak files and CD-ROM.
 913
 914                 for (i=0; i<Num_files; i++ )    {
 915                         cf_file * f = cf_get_file(i);
 916
 917                         // only search paths we're supposed to...
 918                         if ( (pathtype != CF_TYPE_ANY) && (pathtype != f->pathtype_index)  )    {
 919                                 continue;
 920                         }
 921
 922                         if (localize) {
 923                                 // create localized filespec
 924                                 char loc_filespec[MAX_PATH_LEN];
 925                                 strcpy(loc_filespec, filespec);
 926                                 lcl_add_dir_to_path_with_filename(loc_filespec);
 927
 928                                 if ( !stricmp(loc_filespec, f->name_ext) )      {
 929                                         if ( size ) *size = f->size;
 930                                         if ( offset ) *offset = f->pack_offset;
 931                                         if ( pack_filename ) {
 932                                                 cf_root * r = cf_get_root(f->root_index);
 933
 934                                                 strcpy( pack_filename, r->path );
 935                                                 if ( f->pack_offset < 1 )       {
 936                                                         strcat( pack_filename, Pathtypes[f->pathtype_index].path );
 937                                                         strcat( pack_filename, DIR_SEPARATOR_STR );
 938                                                         strcat( pack_filename, f->name_ext );
 939                                                 }
 940                                         }
 941                                         return 1;
 942                                 }
 943                         }
 944
 945                         // file either not localized or localized version not found
 946                         if ( !stricmp(filespec, f->name_ext) )  {
 947                                 if ( size ) *size = f->size;
 948                                 if ( offset ) *offset = f->pack_offset;
 949                                 if ( pack_filename ) {
 950                                         cf_root * r = cf_get_root(f->root_index);
 951
 952                                         strcpy( pack_filename, r->path );
 953                                         if ( f->pack_offset < 1 )       {
 954
 955                                                 if(strlen(Pathtypes[f->pathtype_index].path)){
 956                                                         strcat( pack_filename, Pathtypes[f->pathtype_index].path );
 957                                                         strcat( pack_filename, DIR_SEPARATOR_STR );
 958                                                 }
 959
 960                                                 strcat( pack_filename, f->name_ext );
 961                                         }
 962                                 }
 963                                 return 1;
 964                         }
 965                 }
 966
 967         return 0;
 968 }
 969
 970
 971 // Returns true if filename matches filespec, else zero if not
 972 int cf_matches_spec(const char *filespec, const char *filename)
 973 {
 974         const char *src_ext, *dst_ext;
 975
 976         src_ext = strchr(filespec, '.');
 977         if (!src_ext)
 978                 return 1;
 979         if (*src_ext == '*')
 980                 return 1;
 981
 982         dst_ext = strchr(filename, '.');
 983         if (!dst_ext)
 984                 return 1;
 985
 986         return !stricmp(dst_ext, src_ext);
 987 }
 988
 989 int (*Get_file_list_filter)(const char *filename) = NULL;
 990 int Skip_packfile_search = 0;
 991
 992 int cf_file_already_in_list( int num_files, char **list, char *filename )
 993 {
 994         int i;
 995
 996         char name_no_extension[MAX_PATH_LEN];
 997
 998         strcpy(name_no_extension, filename );
 999         char *p = strchr( name_no_extension, '.' );
1000         if ( p ) *p = 0;
1001
1002         for (i=0; i<num_files; i++ )    {
1003                 if ( !stricmp(list[i], name_no_extension ) )    {
1004                         // Match found!
1005                         return 1;
1006                 }
1007         }
1008         // Not found
1009         return 0;
1010 }
1011
1012 // An alternative cf_get_file_list(), dynamic list version.
1013 // This one has a 'type', which is a CF_TYPE_* value.  Because this specifies the directory
1014 // location, 'filter' only needs to be the filter itself, with no path information.
1015 // See above descriptions of cf_get_file_list() for more information about how it all works.
1016 int cf_get_file_list( int max, char **list, int pathtype, const char *filter, int sort, file_list_info *info )
1017 {
1018         char *ptr;
1019         int i, l, num_files = 0, own_flag = 0;
1020 #ifndef PLAT_UNIX
1021         int find_handle;
1022         _finddata_t find;
1023 #endif
1024
1025         if (max < 1) {
1026                 Get_file_list_filter = NULL;
1027                 return 0;
1028         }
1029
1030         Assert(list);
1031
1032         if (!info && (sort == CF_SORT_TIME)) {
1033                 info = (file_list_info *) malloc(sizeof(file_list_info) * max);
1034                 own_flag = 1;
1035         }
1036
1037         char filespec[MAX_PATH_LEN];
1038
1039 #ifdef PLAT_UNIX
1040         cf_create_default_path_string( filespec, pathtype, NULL );
1041
1042                 DIR *dirp;
1043                 struct dirent *dir;
1044
1045                 dirp = opendir (filespec);
1046                 if ( dirp ) {
1047                         while ((dir = readdir (dirp)) != NULL)
1048                         {
1049                                 if (num_files >= max)
1050                                         break;
1051
1052                                 if (fnmatch(filter, dir->d_name, 0) != 0)
1053                                         continue;
1054
1055                                 char fn[MAX_PATH];
1056                                 snprintf(fn, MAX_PATH-1, "%s/%s", filespec, dir->d_name);
1057                                 fn[MAX_PATH-1] = 0;
1058
1059                                 struct stat buf;
1060                                 if (stat(fn, &buf) == -1) {
1061                                         continue;
1062                                 }
1063
1064                                 if (!S_ISREG(buf.st_mode)) {
1065                                         continue;
1066                                 }
1067
1068                                 if ( !Get_file_list_filter || (*Get_file_list_filter)(dir->d_name) ) {
1069                                         ptr = strrchr(dir->d_name, '.');
1070                                         if (ptr)
1071                                                 l = ptr - dir->d_name;
1072                                         else
1073                                                 l = strlen(dir->d_name);
1074
1075                                         list[num_files] = (char *)malloc(l + 1);
1076                                         strncpy(list[num_files], dir->d_name, l);
1077                                         list[num_files][l] = 0;
1078                                         if (info)
1079                                                 info[num_files].write_time = buf.st_mtime;
1080
1081                                         num_files++;
1082                                 }
1083                         }
1084
1085                         closedir(dirp);
1086                 }
1087 #else
1088         cf_create_default_path_string( filespec, pathtype, filter );
1089
1090         find_handle = _findfirst( filespec, &find );
1091         if (find_handle != -1) {
1092                 do {
1093                         if (num_files >= max)
1094                                 break;
1095
1096                         if (!(find.attrib & _A_SUBDIR)) {
1097                                 if ( !Get_file_list_filter || (*Get_file_list_filter)(find.name) ) {
1098                                         ptr = strrchr(find.name, '.');
1099                                         if (ptr)
1100                                                 l = ptr - find.name;
1101                                         else
1102                                                 l = strlen(find.name);
1103
1104                                         list[num_files] = (char *)malloc(l + 1);
1105                                         strncpy(list[num_files], find.name, l);
1106                                         list[num_files][l] = 0;
1107                                         if (info)
1108                                                 info[num_files].write_time = find.time_write;
1109
1110                                         num_files++;
1111                                 }
1112                         }
1113
1114                 } while (!_findnext(find_handle, &find));
1115
1116                 _findclose( find_handle );
1117         }
1118 #endif
1119
1120         // Search all the packfiles and CD.
1121         if ( !Skip_packfile_search )    {
1122                 for (i=0; i<Num_files; i++ )    {
1123                         cf_file * f = cf_get_file(i);
1124
1125                         // only search paths we're supposed to...
1126                         if ( (pathtype != CF_TYPE_ANY) && (pathtype != f->pathtype_index)  )    {
1127                                 continue;
1128                         }
1129
1130                         if (num_files >= max)
1131                                 break;
1132
1133                         if ( !cf_matches_spec( filter,f->name_ext))     {
1134                                 continue;
1135                         }
1136
1137                         if ( cf_file_already_in_list(num_files,list,f->name_ext))       {
1138                                 continue;
1139                         }
1140
1141                         if ( !Get_file_list_filter || (*Get_file_list_filter)(f->name_ext) ) {
1142
1143                                 //mprintf(( "Found '%s' in root %d path %d\n", f->name_ext, f->root_index, f->pathtype_index ));
1144
1145                                         ptr = strrchr(f->name_ext, '.');
1146                                         if (ptr)
1147                                                 l = ptr - f->name_ext;
1148                                         else
1149                                                 l = strlen(f->name_ext);
1150
1151                                         list[num_files] = (char *)malloc(l + 1);
1152                                         strncpy(list[num_files], f->name_ext, l);
1153                                         list[num_files][l] = 0;
1154
1155                                 if (info)       {
1156                                         info[num_files].write_time = f->write_time;
1157                                 }
1158
1159                                 num_files++;
1160                         }
1161
1162                 }
1163         }
1164
1165
1166         if (sort != CF_SORT_NONE)       {
1167                 cf_sort_filenames( num_files, list, sort, info );
1168         }
1169
1170         if (own_flag)   {
1171                 free(info);
1172         }
1173
1174         Get_file_list_filter = NULL;
1175         return num_files;
1176 }
1177
1178 int cf_file_already_in_list_preallocated( int num_files, char arr[][MAX_FILENAME_LEN], const char *filename )
1179 {
1180         int i;
1181
1182         char name_no_extension[MAX_PATH_LEN];
1183
1184         strcpy(name_no_extension, filename );
1185         char *p = strchr( name_no_extension, '.' );
1186         if ( p ) *p = 0;
1187
1188         for (i=0; i<num_files; i++ )    {
1189                 if ( !stricmp(arr[i], name_no_extension ) )     {
1190                         // Match found!
1191                         return 1;
1192                 }
1193         }
1194         // Not found
1195         return 0;
1196 }
1197
1198 // An alternative cf_get_file_list(), fixed array version.
1199 // This one has a 'type', which is a CF_TYPE_* value.  Because this specifies the directory
1200 // location, 'filter' only needs to be the filter itself, with no path information.
1201 // See above descriptions of cf_get_file_list() for more information about how it all works.
1202 int cf_get_file_list_preallocated( int max, char arr[][MAX_FILENAME_LEN], char **list, int pathtype, const char *filter, int sort, file_list_info *info )
1203 {
1204         int i, num_files = 0, own_flag = 0;
1205
1206         if (max < 1) {
1207                 Get_file_list_filter = NULL;
1208                 return 0;
1209         }
1210
1211         if (list) {
1212                 for (i=0; i<max; i++)   {
1213                         list[i] = arr[i];
1214                 }
1215         } else {
1216                 sort = CF_SORT_NONE;  // sorting of array directly not supported.  Sorting done on list only
1217         }
1218
1219         if (!info && (sort == CF_SORT_TIME)) {
1220                 info = (file_list_info *) malloc(sizeof(file_list_info) * max);
1221                 own_flag = 1;
1222         }
1223
1224         char filespec[MAX_PATH_LEN];
1225
1226         // Search the default directories
1227 #ifdef PLAT_UNIX
1228         cf_create_default_path_string( filespec, pathtype, NULL );
1229
1230                 DIR *dirp;
1231                 struct dirent *dir;
1232
1233                 dirp = opendir (filespec);
1234                 if ( dirp ) {
1235                         while ((dir = readdir (dirp)) != NULL)
1236                         {
1237                                 if (num_files >= max)
1238                                         break;
1239
1240                                 if (fnmatch(filter, dir->d_name, 0) != 0)
1241                                         continue;
1242
1243                                 char fn[MAX_PATH];
1244                                 snprintf(fn, MAX_PATH-1, "%s/%s", filespec, dir->d_name);
1245                                 fn[MAX_PATH-1] = 0;
1246
1247                                 struct stat buf;
1248                                 if (stat(fn, &buf) == -1) {
1249                                         continue;
1250                                 }
1251
1252                                 if (!S_ISREG(buf.st_mode)) {
1253                                         continue;
1254                                 }
1255
1256                                 if ( !Get_file_list_filter || (*Get_file_list_filter)(dir->d_name) ) {
1257
1258                                         strncpy(arr[num_files], dir->d_name, MAX_FILENAME_LEN - 1 );
1259                                         char *ptr = strrchr(arr[num_files], '.');
1260                                         if ( ptr ) {
1261                                                 *ptr = 0;
1262                                         }
1263
1264                                         if (info)       {
1265                                                 info[num_files].write_time = buf.st_mtime;
1266                                         }
1267
1268                                         num_files++;
1269                                 }
1270                         }
1271                         closedir(dirp);
1272                 }
1273 #else
1274         cf_create_default_path_string( filespec, pathtype, filter );
1275
1276         int find_handle;
1277         _finddata_t find;
1278
1279         find_handle = _findfirst( filespec, &find );
1280         if (find_handle != -1) {
1281                 do {
1282                         if (num_files >= max)
1283                                 break;
1284
1285                         if (!(find.attrib & _A_SUBDIR)) {
1286
1287                                 if ( !Get_file_list_filter || (*Get_file_list_filter)(find.name) ) {
1288
1289                                         strncpy(arr[num_files], find.name, MAX_FILENAME_LEN - 1 );
1290                                         char *ptr = strrchr(arr[num_files], '.');
1291                                         if ( ptr ) {
1292                                                 *ptr = 0;
1293                                         }
1294
1295                                         if (info)       {
1296                                                 info[num_files].write_time = find.time_write;
1297                                         }
1298
1299                                         num_files++;
1300                                 }
1301                         }
1302
1303                 } while (!_findnext(find_handle, &find));
1304
1305                 _findclose( find_handle );
1306         }
1307 #endif
1308
1309
1310         // Search all the packfiles and CD.
1311         if ( !Skip_packfile_search )    {
1312                 for (i=0; i<Num_files; i++ )    {
1313                         cf_file * f = cf_get_file(i);
1314
1315                         // only search paths we're supposed to...
1316                         if ( (pathtype != CF_TYPE_ANY) && (pathtype != f->pathtype_index)  )    {
1317                                 continue;
1318                         }
1319
1320                         if (num_files >= max)
1321                                 break;
1322
1323                         if ( !cf_matches_spec( filter,f->name_ext))     {
1324                                 continue;
1325                         }
1326
1327                         if ( cf_file_already_in_list_preallocated( num_files, arr, f->name_ext ))       {
1328                                 continue;
1329                         }
1330
1331                         if ( !Get_file_list_filter || (*Get_file_list_filter)(f->name_ext) ) {
1332
1333                                 //mprintf(( "Found '%s' in root %d path %d\n", f->name_ext, f->root_index, f->pathtype_index ));
1334
1335                                 strncpy(arr[num_files], f->name_ext, MAX_FILENAME_LEN - 1 );
1336                                 char *ptr = strrchr(arr[num_files], '.');
1337                                 if ( ptr ) {
1338                                         *ptr = 0;
1339                                 }
1340
1341                                 if (info)       {
1342                                         info[num_files].write_time = f->write_time;
1343                                 }
1344
1345                                 num_files++;
1346                         }
1347
1348                 }
1349         }
1350
1351         if (sort != CF_SORT_NONE) {
1352                 Assert(list);
1353                 cf_sort_filenames( num_files, list, sort, info );
1354         }
1355
1356         if (own_flag)   {
1357                 free(info);
1358         }
1359
1360         Get_file_list_filter = NULL;
1361         return num_files;
1362 }
1363
1364 // Returns the default storage path for files given a
1365 // particular pathtype.   In other words, the path to
1366 // the unpacked, non-cd'd, stored on hard drive path.
1367 // If filename isn't null it will also tack the filename
1368 // on the end, creating a completely valid filename.
1369 // Input:   pathtype  - CF_TYPE_??
1370 //          filename  - optional, if set, tacks the filename onto end of path.
1371 // Output:  path      - Fully qualified pathname.
1372 void cf_create_default_path_string( char *path, int pathtype, const char *filename, bool localize )
1373 {
1374 #ifdef PLAT_UNIX
1375         if ( filename && strpbrk(filename, "/")  ) {
1376 #else
1377         if ( filename && strpbrk(filename,"/\\:")  ) {
1378 #endif
1379                 // Already has full path
1380                 strcpy( path, filename );
1381
1382         } else {
1383                 if ( cfile_init_paths() ) {
1384                         strcpy(path, filename);
1385                         return;
1386                 }
1387
1388                 Assert(CF_TYPE_SPECIFIED(pathtype));
1389
1390                 strcpy(path, Cfile_user_dir);
1391                 strcat(path, Pathtypes[pathtype].path);
1392
1393                 // Don't add slash for root directory
1394                 if (Pathtypes[pathtype].path[0] != '\0') {
1395                         strcat(path, DIR_SEPARATOR_STR);
1396                 }
1397
1398                 // add filename
1399                 if (filename) {
1400                         strcat(path, filename);
1401
1402                         // localize filename
1403                         if (localize) {
1404                                 // create copy of path
1405                                 char temp_path[MAX_PATH_LEN];
1406                                 strcpy(temp_path, path);
1407
1408                                 // localize the path
1409                                 lcl_add_dir_to_path_with_filename(path);
1410
1411                                 // verify localized path
1412                                 FILE *fp = fopen(path, "rb");
1413                                 if (fp) {
1414                                         fclose(fp);
1415                                 } else {
1416                                         strcpy(path, temp_path);
1417                                 }
1418                         }
1419                 }
1420         }
1421 }