mirror of
https://git.code.sf.net/p/quake/quakeforge
synced 2024-11-17 10:20:55 +00:00
4a99f8dcbd
There is much breakage, but qfcc now produces a progs.dat from either progs.src or object files. Better yet, the progs.src result is passed through the linker, removing much duplicate code.
298 lines
6.3 KiB
C
298 lines
6.3 KiB
C
/*
|
|
idstuff.c
|
|
|
|
qcc compatable output stuff
|
|
|
|
Copyright (C) 2002 Bill Currie <bill@taniwha.org>
|
|
Copyright (C) 1996-1997 Id Software, Inc.
|
|
|
|
Author: Bill Currie <bill@taniwha.org>
|
|
Date: 2002/06/04
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
as published by the Free Software Foundation; either version 2
|
|
of the License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
See the GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to:
|
|
|
|
Free Software Foundation, Inc.
|
|
59 Temple Place - Suite 330
|
|
Boston, MA 02111-1307, USA
|
|
|
|
*/
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
static __attribute__ ((used)) const char rcsid[] =
|
|
"$Id$";
|
|
|
|
#ifdef HAVE_STRING_H
|
|
# include <string.h>
|
|
#endif
|
|
#ifdef HAVE_STRINGS_H
|
|
# include <strings.h>
|
|
#endif
|
|
|
|
#include <QF/crc.h>
|
|
#include <QF/dstring.h>
|
|
|
|
#include "def.h"
|
|
#include "defspace.h"
|
|
#include "diagnostic.h"
|
|
#include "qfcc.h"
|
|
#include "expr.h"
|
|
#include "idstuff.h"
|
|
#include "options.h"
|
|
#include "strpool.h"
|
|
#include "symtab.h"
|
|
#include "type.h"
|
|
|
|
#define MAX_SOUNDS 1024
|
|
#define MAX_MODELS 1024
|
|
#define MAX_FILES 1024
|
|
#define MAX_DATA_PATH 64
|
|
|
|
static char precache_sounds[MAX_SOUNDS][MAX_DATA_PATH];
|
|
static int precache_sounds_block[MAX_SOUNDS];
|
|
static int numsounds;
|
|
|
|
static char precache_models[MAX_MODELS][MAX_DATA_PATH];
|
|
static int precache_models_block[MAX_SOUNDS];
|
|
static int nummodels;
|
|
|
|
static char precache_files[MAX_FILES][MAX_DATA_PATH];
|
|
static int precache_files_block[MAX_SOUNDS];
|
|
static int numfiles;
|
|
|
|
void
|
|
PrecacheSound (const char *n, int ch)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < numsounds; i++) {
|
|
if (!strcmp (n, precache_sounds[i])) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (numsounds == MAX_SOUNDS) {
|
|
error (0, "PrecacheSound: numsounds == MAX_SOUNDS");
|
|
return;
|
|
}
|
|
|
|
strcpy (precache_sounds[i], n);
|
|
if (ch >= '1' && ch <= '9')
|
|
precache_sounds_block[i] = ch - '0';
|
|
else
|
|
precache_sounds_block[i] = 1;
|
|
|
|
numsounds++;
|
|
}
|
|
|
|
void
|
|
PrecacheModel (const char *n, int ch)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < nummodels; i++) {
|
|
if (!strcmp (n, precache_models[i])) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (nummodels == MAX_MODELS) {
|
|
error (0, "PrecacheModels: nummodels == MAX_MODELS");
|
|
return;
|
|
}
|
|
|
|
strcpy (precache_models[i], n);
|
|
if (ch >= '1' && ch <= '9')
|
|
precache_models_block[i] = ch - '0';
|
|
else
|
|
precache_models_block[i] = 1;
|
|
|
|
nummodels++;
|
|
}
|
|
|
|
void
|
|
PrecacheFile (const char *n, int ch)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < numfiles; i++) {
|
|
if (!strcmp (n, precache_files[i])) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
if (numfiles == MAX_FILES) {
|
|
error (0, "PrecacheFile: numfiles == MAX_FILES");
|
|
return;
|
|
}
|
|
|
|
strcpy (precache_files[i], n);
|
|
if (ch >= '1' && ch <= '9')
|
|
precache_files_block[i] = ch - '0';
|
|
else
|
|
precache_files_block[i] = 1;
|
|
|
|
numfiles++;
|
|
}
|
|
|
|
/*
|
|
WriteFiles
|
|
|
|
Generates files.dat, which contains all of the data files actually used by
|
|
the game, to be processed by qfiles
|
|
*/
|
|
int
|
|
WriteFiles (const char *sourcedir)
|
|
{
|
|
FILE *f;
|
|
int i;
|
|
dstring_t *filename = dstring_newstr ();
|
|
|
|
dsprintf (filename, "%s%cfiles.dat", sourcedir, PATH_SEPARATOR);
|
|
f = fopen (filename->str, "wb");
|
|
if (!f) {
|
|
fprintf (stderr, "Couldn't open %s", filename->str);
|
|
return 1;
|
|
}
|
|
|
|
fprintf (f, "%i\n", numsounds);
|
|
for (i = 0; i < numsounds; i++)
|
|
fprintf (f, "%i %s\n", precache_sounds_block[i], precache_sounds[i]);
|
|
|
|
fprintf (f, "%i\n", nummodels);
|
|
for (i = 0; i < nummodels; i++)
|
|
fprintf (f, "%i %s\n", precache_models_block[i], precache_models[i]);
|
|
|
|
fprintf (f, "%i\n", numfiles);
|
|
for (i = 0; i < numfiles; i++)
|
|
fprintf (f, "%i %s\n", precache_files_block[i], precache_files[i]);
|
|
|
|
fclose (f);
|
|
dstring_delete (filename);
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
WriteProgdefs
|
|
|
|
Writes the global and entity structures out.
|
|
Returns a crc of the header, to be stored in the progs file for comparison
|
|
at load time.
|
|
*/
|
|
int
|
|
WriteProgdefs (dprograms_t *progs, const char *filename)
|
|
{
|
|
ddef_t *d;
|
|
FILE *f;
|
|
unsigned short crc;
|
|
int c;
|
|
unsigned i;
|
|
const char *strings;
|
|
const char *name;
|
|
|
|
if (options.verbosity >= 1)
|
|
printf ("writing %s\n", filename);
|
|
f = fopen (filename, "wb");
|
|
|
|
// print global vars until the first field is defined
|
|
fprintf (f, "\n/* file generated by qcc, do not modify */"
|
|
"\n\ntypedef struct\n{\tint\tpad[%i];\n",
|
|
RESERVED_OFS);
|
|
|
|
strings = (char *) progs + progs->ofs_strings;
|
|
for (i = 0; i < progs->numglobaldefs; i++) {
|
|
d = (ddef_t *) ((char *) progs + progs->ofs_globaldefs) + i;
|
|
name = strings + d->s_name;
|
|
if (!strcmp (name, "end_sys_globals"))
|
|
break;
|
|
if (!d->ofs)
|
|
continue;
|
|
if (*name == '.' || !*name)
|
|
continue;
|
|
|
|
switch (d->type) {
|
|
case ev_float:
|
|
fprintf (f, "\tfloat\t%s;\n", name);
|
|
break;
|
|
case ev_vector:
|
|
fprintf (f, "\tvec3_t\t%s;\n", name);
|
|
break;
|
|
case ev_quat:
|
|
fprintf (f, "\tquat_t\t%s;\n", name);
|
|
break;
|
|
case ev_string:
|
|
fprintf (f, "\tstring_t\t%s;\n", name);
|
|
break;
|
|
case ev_func:
|
|
fprintf (f, "\tfunc_t\t%s;\n", name);
|
|
break;
|
|
case ev_entity:
|
|
fprintf (f, "\tint\t%s;\n", name);
|
|
break;
|
|
default:
|
|
fprintf (f, "\tint\t%s;\n", name);
|
|
break;
|
|
}
|
|
}
|
|
fprintf (f, "} globalvars_t;\n\n");
|
|
|
|
// print all fields
|
|
fprintf (f, "typedef struct\n{\n");
|
|
for (i = 0; i < progs->numglobaldefs; i++) {
|
|
d = (ddef_t *) ((char *) progs + progs->ofs_fielddefs) + i;
|
|
name = strings + d->s_name;
|
|
if (!strcmp (name, "end_sys_fields"))
|
|
break;
|
|
|
|
if (!d->ofs)
|
|
continue;
|
|
|
|
switch (d->type) {
|
|
case ev_float:
|
|
fprintf (f, "\tfloat\t%s;\n", name);
|
|
break;
|
|
case ev_vector:
|
|
fprintf (f, "\tvec3_t\t%s;\n", name);
|
|
break;
|
|
case ev_string:
|
|
fprintf (f, "\tstring_t\t%s;\n", name);
|
|
break;
|
|
case ev_func:
|
|
fprintf (f, "\tfunc_t\t%s;\n", name);
|
|
break;
|
|
case ev_entity:
|
|
fprintf (f, "\tint\t%s;\n", name);
|
|
break;
|
|
default:
|
|
fprintf (f, "\tint\t%s;\n", name);
|
|
break;
|
|
}
|
|
}
|
|
fprintf (f, "} entvars_t;\n\n");
|
|
|
|
fclose (f);
|
|
|
|
// do a crc of the file
|
|
CRC_Init (&crc);
|
|
f = fopen (filename, "r+b");
|
|
while ((c = fgetc (f)) != EOF)
|
|
CRC_ProcessByte (&crc, (byte) c);
|
|
|
|
fprintf (f, "#define PROGHEADER_CRC %u\n", crc);
|
|
fclose (f);
|
|
|
|
return crc;
|
|
}
|