raze/polymer/build/src/util/kextract.c

148 lines
3.3 KiB
C

// "Build Engine & Tools" Copyright (c) 1993-1997 Ken Silverman
// Ken Silverman's official web site: "http://www.advsys.net/ken"
// See the included license file "BUILDLIC.TXT" for license info.
//
// This file has been modified from Ken Silverman's original release
// by Jonathon Fowler (jonof@edgenetwk.com)
#include "compat.h"
#define MAXFILES 4096
static char buf[65536];
static long numfiles, anyfiles4extraction;
static char marked4extraction[MAXFILES];
static char filelist[MAXFILES][16];
static long fileoffs[MAXFILES+1], fileleng[MAXFILES];
void findfiles(const char *dafilespec)
{
char t[13];
int i;
for(i=numfiles-1;i>=0;i--)
{
memcpy(t,filelist[i],12);
t[12] = 0;
if (Bwildmatch(t,dafilespec)) {
marked4extraction[i] = 1;
anyfiles4extraction = 1;
}
}
}
int main(int argc, char **argv)
{
long i, j, k, l, fil, fil2;
if (argc < 3)
{
printf("KEXTRACT [grouped file][@file or filespec...] by Kenneth Silverman\n");
printf(" This program extracts files from a previously grouped group file.\n");
printf(" You can extract files using the ? and * wildcards.\n");
printf(" Ex: kextract stuff.dat tiles000.art nukeland.map palette.dat\n");
printf(" (stuff.dat is the group file, the rest are the files to extract)\n");
return(0);
}
if ((fil = Bopen(argv[1],BO_BINARY|BO_RDONLY,BS_IREAD)) == -1)
{
printf("Error: %s could not be opened\n",argv[1]);
return(0);
}
Bread(fil,buf,16);
if ((buf[0] != 'K') || (buf[1] != 'e') || (buf[2] != 'n') ||
(buf[3] != 'S') || (buf[4] != 'i') || (buf[5] != 'l') ||
(buf[6] != 'v') || (buf[7] != 'e') || (buf[8] != 'r') ||
(buf[9] != 'm') || (buf[10] != 'a') || (buf[11] != 'n'))
{
Bclose(fil);
printf("Error: %s not a valid group file\n",argv[1]);
return(0);
}
numfiles = *((long*)&buf[12]); numfiles = B_LITTLE32(numfiles);
Bread(fil,filelist,numfiles<<4);
j = 0;
for(i=0;i<numfiles;i++)
{
k = *((long*)&filelist[i][12]); k = B_LITTLE32(k);
filelist[i][12] = 0;
fileoffs[i] = j;
j += k;
}
fileoffs[numfiles] = j;
for(i=0;i<numfiles;i++) marked4extraction[i] = 0;
anyfiles4extraction = 0;
for(i=argc-1;i>1;i--)
{
if (argv[i][0] == '@')
{
if ((fil2 = Bopen(&argv[i][1],BO_BINARY|BO_RDONLY,BS_IREAD)) != -1)
{
l = Bread(fil2,buf,65536);
j = 0;
while ((j < l) && (buf[j] <= 32)) j++;
while (j < l)
{
k = j;
while ((k < l) && (buf[k] > 32)) k++;
buf[k] = 0;
findfiles(&buf[j]);
j = k+1;
while ((j < l) && (buf[j] <= 32)) j++;
}
Bclose(fil2);
}
}
else
findfiles(argv[i]);
}
if (anyfiles4extraction == 0)
{
Bclose(fil);
printf("No files found in group file with those names\n");
return(0);
}
for(i=0;i<numfiles;i++)
{
if (marked4extraction[i] == 0) continue;
fileleng[i] = fileoffs[i+1]-fileoffs[i];
if ((fil2 = Bopen(filelist[i],BO_BINARY|BO_TRUNC|BO_CREAT|BO_WRONLY,BS_IREAD|BS_IWRITE)) == -1)
{
printf("Error: Could not write to %s\n",filelist[i]);
continue;
}
printf("Extracting %s...\n",filelist[i]);
Blseek(fil,fileoffs[i]+((numfiles+1)<<4),SEEK_SET);
for(j=0;j<fileleng[i];j+=65536)
{
k = min(fileleng[i]-j,65536);
Bread(fil,buf,k);
if (Bwrite(fil2,buf,k) < k)
{
printf("Write error (drive full?)\n");
Bclose(fil2);
Bclose(fil);
return(0);
}
}
Bclose(fil2);
}
Bclose(fil);
return 0;
}