mirror of
https://git.code.sf.net/p/quake/quakeforge
synced 2024-11-07 13:41:32 +00:00
ea3895805b
That which isn't rewritten is horribly broken. However, this does include a nice mechanism for building QC structs for emitting data. emit.c has been gutted in the spirit of "throw one away". There is much work to be done to get even variables emitted, let alone code. Things should be a little more fun from here on.
308 lines
6.4 KiB
C
308 lines
6.4 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 "qfcc.h"
|
|
#include "expr.h"
|
|
#include "idstuff.h"
|
|
#include "options.h"
|
|
#include "strpool.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 (def_t *e, int ch)
|
|
{
|
|
char *n;
|
|
int i;
|
|
|
|
if (!e->ofs)
|
|
return;
|
|
|
|
n = G_STRING (e->ofs);
|
|
|
|
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 (def_t *e, int ch)
|
|
{
|
|
char *n;
|
|
int i;
|
|
|
|
if (!e->ofs)
|
|
return;
|
|
|
|
n = G_STRING (e->ofs);
|
|
|
|
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 (def_t *e, int ch)
|
|
{
|
|
char *n;
|
|
int i;
|
|
|
|
if (!e->ofs)
|
|
return;
|
|
|
|
n = G_STRING (e->ofs);
|
|
|
|
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 (const char *filename)
|
|
{
|
|
def_t *d;
|
|
FILE *f;
|
|
unsigned short crc;
|
|
int c;
|
|
|
|
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);
|
|
|
|
for (d = pr.scope->head; d; d = d->def_next) {
|
|
if (d->name && !strcmp (d->name, "end_sys_globals"))
|
|
break;
|
|
if (!d->ofs)
|
|
continue;
|
|
if (!d->name || *d->name == '.' || !*d->name)
|
|
continue;
|
|
|
|
switch (d->type->type) {
|
|
case ev_float:
|
|
fprintf (f, "\tfloat\t%s;\n", d->name);
|
|
break;
|
|
case ev_vector:
|
|
fprintf (f, "\tvec3_t\t%s;\n", d->name);
|
|
d = d->def_next->def_next->def_next; // skip the elements
|
|
break;
|
|
case ev_quat:
|
|
fprintf (f, "\tquat_t\t%s;\n", d->name);
|
|
break;
|
|
case ev_string:
|
|
fprintf (f, "\tstring_t\t%s;\n", d->name);
|
|
break;
|
|
case ev_func:
|
|
fprintf (f, "\tfunc_t\t%s;\n", d->name);
|
|
break;
|
|
case ev_entity:
|
|
fprintf (f, "\tint\t%s;\n", d->name);
|
|
break;
|
|
default:
|
|
fprintf (f, "\tint\t%s;\n", d->name);
|
|
break;
|
|
}
|
|
}
|
|
fprintf (f, "} globalvars_t;\n\n");
|
|
|
|
// print all fields
|
|
fprintf (f, "typedef struct\n{\n");
|
|
for (d = pr.scope->head; d; d = d->def_next) {
|
|
if (d->name && !strcmp (d->name, "end_sys_fields"))
|
|
break;
|
|
|
|
if (!d->name || !d->ofs || d->type->type != ev_field)
|
|
continue;
|
|
|
|
switch (d->type->t.fldptr.type->type) {
|
|
case ev_float:
|
|
fprintf (f, "\tfloat\t%s;\n", d->name);
|
|
break;
|
|
case ev_vector:
|
|
fprintf (f, "\tvec3_t\t%s;\n", d->name);
|
|
d = d->def_next->def_next->def_next; // skip the elements
|
|
break;
|
|
case ev_string:
|
|
fprintf (f, "\tstring_t\t%s;\n", d->name);
|
|
break;
|
|
case ev_func:
|
|
fprintf (f, "\tfunc_t\t%s;\n", d->name);
|
|
break;
|
|
case ev_entity:
|
|
fprintf (f, "\tint\t%s;\n", d->name);
|
|
break;
|
|
default:
|
|
fprintf (f, "\tint\t%s;\n", d->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;
|
|
}
|