quakeforge/qw/source/locs.c

285 lines
5.9 KiB
C
Raw Normal View History

/*
locs.c
Parsing and handling of location files.
Copyright (C) 2000 Anton Gavrilov (tonik@quake.ru)
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
*/
2001-09-28 06:26:31 +00:00
static const char rcsid[] =
"$Id$";
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#include <limits.h>
#include "QF/console.h"
2001-05-09 17:57:57 +00:00
#include "QF/locs.h"
#include "QF/qtypes.h"
#include "QF/sys.h"
#include "QF/vfs.h"
2001-05-09 17:57:57 +00:00
#include "client.h"
2001-08-29 02:12:57 +00:00
#include "compat.h"
2001-05-09 17:57:57 +00:00
#define LOCATION_BLOCK 128 // 128 locations per block.
location_t **locations = NULL;
2001-08-29 02:12:57 +00:00
int locations_alloced = 0;
int locations_count = 0;
int location_blocks = 0;
2001-07-15 07:04:17 +00:00
void locs_add (vec3_t location, const char *name);
void locs_load (const char *filename);
void locs_free (void);
void locs_more (void);
2001-08-29 02:12:57 +00:00
int
locs_nearest (vec3_t loc)
{
float best_distance = 9999999, distance;
int i, j = -1;
2001-08-29 02:12:57 +00:00
location_t *cur;
for (i = 0; i < locations_count; i++) {
cur = locations[i];
distance = VectorDistance_fast (loc, cur->loc);
if ((distance < best_distance)) {
best_distance = distance;
j = i;
}
}
return (j);
}
location_t *
locs_find (vec3_t target)
{
int i;
2001-08-29 02:12:57 +00:00
i = locs_nearest(target);
if (i == -1)
return NULL;
return locations[i];
}
void
2001-07-15 07:04:17 +00:00
locs_add (vec3_t location, const char *name)
{
int num;
locations_count++;
if (locations_count >= locations_alloced)
locs_more ();
num = locations_count - 1;
locations[num] = malloc (sizeof (location_t));
locations[num]->loc[0] = location[0];
locations[num]->loc[1] = location[1];
locations[num]->loc[2] = location[2];
locations[num]->name = strdup (name);
if (!locations[num]->name)
Sys_Error ("locs_add: Can't strdup name!");
}
void
2001-07-15 07:04:17 +00:00
locs_load (const char *filename)
{
2001-08-29 02:12:57 +00:00
char tmp[PATH_MAX], foundname[MAX_OSPATH];
2001-07-15 07:04:17 +00:00
char *t1, *t2;
2001-08-29 02:12:57 +00:00
const char *line;
int templength = 0;
2001-08-29 02:12:57 +00:00
vec3_t loc;
VFile *file;
snprintf(tmp,sizeof(tmp), "maps/%s",filename);
templength = _COM_FOpenFile (tmp, &file, foundname, 1);
if (!file) {
Con_Printf ("Couldn't load %s\n", tmp);
return;
}
while ((line = Qgetline (file))) {
if (line[0] == '#')
continue;
loc[0] = strtol (line, &t1, 0) * (1.0 / 8);
if (line == t1)
continue;
loc[1] = strtol (t1, &t2, 0) * (1.0 / 8);
if (t2 == t1)
continue;
loc[2] = strtol (t2, &t1, 0) * (1.0 / 8);
if ((t1 == t2) || (strlen(t1) < 2))
continue;
t1++;
t2 = strrchr (t1, '\n');
if (t2) {
t2[0] = '\0';
// handle dos format lines (COM_FOpenFile is binary only)
// and unix is effectively binary only anyway
if (t2 > t1 && t2[-1] == '\r')
t2[-1] = '\0';
}
locs_add (loc, t1);
}
Qclose (file);
}
void
locs_reset (void)
{
int i;
for (i = 0; i < locations_count; i++) {
free ((void *) locations[i]->name);
free ((void *) locations[i]);
locations[i] = NULL;
}
free (locations);
locations_alloced = 0;
locations_count = 0;
locations = NULL;
}
void
locs_more (void)
{
size_t size;
location_blocks++;
locations_alloced += LOCATION_BLOCK;
size = (sizeof (location_t *) * LOCATION_BLOCK * location_blocks);
if (locations)
locations = realloc (locations, size);
else
locations = malloc (size);
if (!locations)
Sys_Error ("ERROR! Can not alloc memory for location block!");
}
void
2001-07-15 07:04:17 +00:00
locs_save (const char *filename, qboolean gz)
{
char locfile[MAX_OSPATH];
2001-08-29 02:12:57 +00:00
int i;
VFile *locfd;
if (gz) {
if (strncmp(filename + strlen(filename) - 3,".gz",3) != 0)
snprintf (locfile, sizeof (locfile), "%s.gz",filename);
else
strcpy(locfile,filename);
locfd = Qopen (locfile,"z9w+");
} else
locfd = Qopen (filename,"w+");
if (locfd == 0) {
Con_Printf("ERROR: Unable to open %s\n",filename);
return;
}
for (i=0; i < locations_count; i++)
Qprintf(locfd,"%.0f %.0f %.0f %s\n",
locations[i]->loc[0] * 8,
locations[i]->loc[1] * 8,
locations[i]->loc[2] * 8,
locations[i]->name);
Qclose (locfd);
}
void
2001-07-15 07:04:17 +00:00
locs_mark (vec3_t loc, const char *desc)
{
locs_add (loc,desc);
Con_Printf ("Marked current location: %s\n",desc);
}
/*
locs_edit
2001-08-29 02:12:57 +00:00
call with description to modify location description
call with NULL description to modify location vectors
*/
void
2001-07-15 07:04:17 +00:00
locs_edit (vec3_t loc, const char *desc)
{
int i;
2001-08-29 02:12:57 +00:00
if (locations_count) {
i = locs_nearest (loc);
if (!desc) {
VectorCopy (loc,locations[i]->loc);
Con_Printf ("Moving location marker for %s\n",
locations[i]->name);
} else {
free ((void *) locations[i]->name);
locations[i]->name = strdup (desc);
Con_Printf ("Changing location description to %s\n",
locations[i]->name);
}
} else
Con_Printf ("Error: No location markers to modify!\n");
}
void
locs_del (vec3_t loc)
{
int i;
2001-08-29 02:12:57 +00:00
if (locations_count) {
i = locs_nearest (loc);
Con_Printf ("Removing location marker for %s\n",
locations[i]->name);
free ((void *) locations[i]->name);
free ((void *) locations[i]);
locations_count--;
for (; i < locations_count; i++)
locations[i] = locations[i+1];
locations[locations_count] = NULL;
} else
Con_Printf ("Error: No location markers to remove\n");
}
void
2001-07-15 07:04:17 +00:00
map_to_loc (const char *mapname, char *filename)
{
char *t1;
strcpy(filename, mapname);
t1 = strrchr(filename,'.');
if (!t1)
Sys_Error ("Can't find .!");
t1++;
strcpy(t1,"loc");
}