mirror of
https://git.code.sf.net/p/quake/newtree
synced 2024-11-22 12:11:34 +00:00
593 lines
13 KiB
C
593 lines
13 KiB
C
/*
|
|
teamplay.c
|
|
|
|
Teamplay enhancements ("proxy features")
|
|
|
|
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
|
|
|
|
$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 <errno.h>
|
|
|
|
#include "bothdefs.h"
|
|
#include "console.h"
|
|
#include "cmd.h"
|
|
#include "client.h"
|
|
#include "locs.h"
|
|
#include "model.h"
|
|
#include "quakefs.h"
|
|
#include "sys.h"
|
|
#include "teamplay.h"
|
|
|
|
extern cvar_t *skin;
|
|
cvar_t *cl_deadbodyfilter;
|
|
cvar_t *cl_gibfilter;
|
|
cvar_t *cl_parsesay;
|
|
cvar_t *cl_nofake;
|
|
static qboolean died = false, recorded_location = false;
|
|
static vec3_t death_location, last_recorded_location;
|
|
|
|
void
|
|
Team_BestWeaponImpulse (void)
|
|
{
|
|
int best, i, imp, items;
|
|
extern int in_impulse;
|
|
|
|
items = cl.stats[STAT_ITEMS];
|
|
best = 0;
|
|
|
|
for (i = Cmd_Argc () - 1; i > 0; i--) {
|
|
imp = atoi (Cmd_Argv (i));
|
|
if (imp < 1 || imp > 8)
|
|
continue;
|
|
|
|
switch (imp) {
|
|
case 1:
|
|
if (items & IT_AXE)
|
|
best = 1;
|
|
break;
|
|
case 2:
|
|
if (items & IT_SHOTGUN && cl.stats[STAT_SHELLS] >= 1)
|
|
best = 2;
|
|
break;
|
|
case 3:
|
|
if (items & IT_SUPER_SHOTGUN && cl.stats[STAT_SHELLS] >= 2)
|
|
best = 3;
|
|
break;
|
|
case 4:
|
|
if (items & IT_NAILGUN && cl.stats[STAT_NAILS] >= 1)
|
|
best = 4;
|
|
break;
|
|
case 5:
|
|
if (items & IT_SUPER_NAILGUN && cl.stats[STAT_NAILS] >= 2)
|
|
best = 5;
|
|
break;
|
|
case 6:
|
|
if (items & IT_GRENADE_LAUNCHER && cl.stats[STAT_ROCKETS] >= 1)
|
|
best = 6;
|
|
break;
|
|
case 7:
|
|
if (items & IT_ROCKET_LAUNCHER && cl.stats[STAT_ROCKETS] >= 1)
|
|
best = 7;
|
|
break;
|
|
case 8:
|
|
if (items & IT_LIGHTNING && cl.stats[STAT_CELLS] >= 1)
|
|
best = 8;
|
|
|
|
}
|
|
}
|
|
|
|
if (best)
|
|
in_impulse = best;
|
|
}
|
|
|
|
|
|
char *
|
|
Team_ParseSay (char *s)
|
|
{
|
|
static char buf[1024];
|
|
int i, bracket;
|
|
char c, chr, *t1, t2[128], t3[128];
|
|
static location_t *location = NULL;
|
|
|
|
if (!cl_parsesay->int_val)
|
|
return s;
|
|
|
|
i = 0;
|
|
|
|
while (*s && (i <= sizeof (buf))) {
|
|
if ((*s == '$') && (s[1] != '\0')) {
|
|
c = 0;
|
|
switch (s[1]) {
|
|
case '\\':
|
|
c = 13;
|
|
break; // fake message
|
|
case '[':
|
|
c = 0x90;
|
|
break; // colored brackets
|
|
case ']':
|
|
c = 0x91;
|
|
break;
|
|
case 'G':
|
|
c = 0x86;
|
|
break; // ocrana leds
|
|
case 'R':
|
|
c = 0x87;
|
|
break;
|
|
case 'Y':
|
|
c = 0x88;
|
|
break;
|
|
case 'B':
|
|
c = 0x89;
|
|
break;
|
|
}
|
|
|
|
if (c) {
|
|
buf[i++] = c;
|
|
s += 2;
|
|
continue;
|
|
}
|
|
} else if ((*s == '%') && (s[1] != '\0')) {
|
|
t1 = NULL;
|
|
memset (t2, '\0', sizeof (t2));
|
|
memset (t3, '\0', sizeof (t3));
|
|
|
|
if ((s[1] == '[') && (s[3] == ']')) {
|
|
bracket = 1;
|
|
chr = s[2];
|
|
s += 4;
|
|
} else {
|
|
bracket = 0;
|
|
chr = s[1];
|
|
s += 2;
|
|
}
|
|
switch (chr) {
|
|
case '%':
|
|
t2[0] = '%';
|
|
t2[1] = 0;
|
|
t1 = t2;
|
|
break;
|
|
case 's':
|
|
bracket = 0;
|
|
t1 = skin->string;
|
|
break;
|
|
case 'd':
|
|
bracket = 0;
|
|
if (died) {
|
|
location = locs_find (death_location);
|
|
if (location) {
|
|
recorded_location = true;
|
|
VectorCopy (death_location, last_recorded_location);
|
|
t1 = location->name;
|
|
break;
|
|
}
|
|
}
|
|
goto location;
|
|
case 'r':
|
|
bracket = 0;
|
|
if (recorded_location) {
|
|
location = locs_find (last_recorded_location);
|
|
if (location) {
|
|
t1 = location->name;
|
|
break;
|
|
}
|
|
}
|
|
goto location;
|
|
case 'l':
|
|
location:
|
|
bracket = 0;
|
|
location = locs_find (cl.simorg);
|
|
if (location) {
|
|
recorded_location = true;
|
|
VectorCopy (cl.simorg, last_recorded_location);
|
|
t1 = location->name;
|
|
} else
|
|
snprintf (t2, sizeof (t2), "Unknown!\n");
|
|
break;
|
|
case 'a':
|
|
if (bracket) {
|
|
if (cl.stats[STAT_ARMOR] > 50)
|
|
bracket = 0;
|
|
|
|
if (cl.stats[STAT_ITEMS] & IT_ARMOR3)
|
|
t3[0] = 'R' | 0x80;
|
|
else if (cl.stats[STAT_ITEMS] & IT_ARMOR2)
|
|
t3[0] = 'Y' | 0x80;
|
|
else if (cl.stats[STAT_ITEMS] & IT_ARMOR1)
|
|
t3[0] = 'G' | 0x80;
|
|
else {
|
|
t2[0] = 'N' | 0x80;
|
|
t2[1] = 'O' | 0x80;
|
|
t2[2] = 'N' | 0x80;
|
|
t2[3] = 'E' | 0x80;
|
|
t2[4] = '!' | 0x80;
|
|
}
|
|
|
|
snprintf (t2, sizeof (t2), "%sa:%i", t3,
|
|
cl.stats[STAT_ARMOR]);
|
|
} else
|
|
snprintf (t2, sizeof (t2), "%i", cl.stats[STAT_ARMOR]);
|
|
break;
|
|
case 'A':
|
|
bracket = 0;
|
|
if (cl.stats[STAT_ITEMS] & IT_ARMOR3)
|
|
t2[0] = 'R' | 0x80;
|
|
else if (cl.stats[STAT_ITEMS] & IT_ARMOR2)
|
|
t2[0] = 'Y' | 0x80;
|
|
else if (cl.stats[STAT_ITEMS] & IT_ARMOR1)
|
|
t2[0] = 'G' | 0x80;
|
|
else {
|
|
t2[0] = 'N' | 0x80;
|
|
t2[1] = 'O' | 0x80;
|
|
t2[2] = 'N' | 0x80;
|
|
t2[3] = 'E' | 0x80;
|
|
t2[4] = '!' | 0x80;
|
|
}
|
|
break;
|
|
case 'h':
|
|
if (bracket) {
|
|
if (cl.stats[STAT_HEALTH] > 50)
|
|
bracket = 0;
|
|
snprintf (t2, sizeof (t2), "h:%i",
|
|
cl.stats[STAT_HEALTH]);
|
|
} else
|
|
snprintf (t2, sizeof (t2), "%i", cl.stats[STAT_HEALTH]);
|
|
break;
|
|
default:
|
|
bracket = 0;
|
|
}
|
|
|
|
if (!t1) {
|
|
if (!t2[0]) {
|
|
t2[0] = '%';
|
|
t2[1] = chr;
|
|
}
|
|
|
|
t1 = t2;
|
|
}
|
|
|
|
if (bracket)
|
|
buf[i++] = 0x90; // '['
|
|
|
|
if (t1) {
|
|
int len;
|
|
|
|
len = strlen (t1);
|
|
if (i + len >= sizeof (buf))
|
|
continue; // No more space in buffer, icky.
|
|
strncpy (buf + i, t1, len);
|
|
i += len;
|
|
}
|
|
|
|
if (bracket)
|
|
buf[i++] = 0x91; // ']'
|
|
|
|
continue;
|
|
}
|
|
buf[i++] = *s++;
|
|
}
|
|
buf[i] = 0;
|
|
|
|
return buf;
|
|
}
|
|
|
|
void
|
|
Team_Dead (void)
|
|
{
|
|
died = true;
|
|
VectorCopy (cl.simorg, death_location);
|
|
}
|
|
|
|
void
|
|
Team_NewMap (void)
|
|
{
|
|
char *mapname, *t1, *t2;
|
|
|
|
died = false;
|
|
recorded_location = false;
|
|
|
|
mapname = strdup (cl.worldmodel->name);
|
|
if (!mapname)
|
|
Sys_Error ("Can't duplicate mapname!");
|
|
t1 = strrchr (mapname, '/');
|
|
t2 = strrchr (mapname, '.');
|
|
if (!t1 || !t2)
|
|
Sys_Error ("Can't find / or .!");
|
|
t1++; // skip over /
|
|
t2[0] = '\0';
|
|
|
|
locs_reset ();
|
|
locs_load (t1);
|
|
free (mapname);
|
|
}
|
|
|
|
void
|
|
Team_Init_Cvars (void)
|
|
{
|
|
cl_deadbodyfilter =
|
|
Cvar_Get ("cl_deadbodyfilter", "0", CVAR_NONE,
|
|
"Hide dead player models");
|
|
cl_gibfilter = Cvar_Get ("cl_gibfilter", "0", CVAR_NONE, "Hide gibs");
|
|
cl_parsesay = Cvar_Get ("cl_parsesay", "0", CVAR_NONE, "Use .loc files to find your present location when you put %l in messages");
|
|
cl_nofake = Cvar_Get ("cl_nofake", "0", CVAR_NONE, "Unhide fake messages");
|
|
}
|
|
|
|
/*
|
|
* locs_markloc
|
|
*
|
|
* Record the current co-ords plus description into a loc file for current map
|
|
*/
|
|
|
|
void
|
|
locs_markloc (void)
|
|
{
|
|
vec3_t loc;
|
|
char *mapname, *t1;
|
|
QFile *locfd;
|
|
char locfile[MAX_OSPATH];
|
|
char *desc = Cmd_Args ();
|
|
|
|
if (Cmd_Argc () == 1) {
|
|
Con_Printf
|
|
("markloc <description> :marks the current location with the description and records the information into a loc file.\n");
|
|
return;
|
|
}
|
|
VectorCopy (cl.simorg, loc);
|
|
locs_add (loc, desc);
|
|
#ifdef HAVE_ZLIB
|
|
if(locisgz) {
|
|
Cmd_ExecuteString ("zdumploc");
|
|
return;
|
|
}
|
|
#endif
|
|
loc[0] *= 8;
|
|
loc[1] *= 8;
|
|
loc[2] *= 8;
|
|
mapname = strdup (cl.worldmodel->name);
|
|
if (!mapname)
|
|
Sys_Error ("Can't duplicate mapname!");
|
|
t1 = strrchr (mapname, '.');
|
|
if (!t1)
|
|
Sys_Error ("Can't find .!");
|
|
t1++; // skip over .
|
|
t1[0] = 'l';
|
|
t1[1] = 'o';
|
|
t1[2] = 'c';
|
|
snprintf (locfile, sizeof (locfile), "%s/%s", com_gamedir, mapname);
|
|
locfd = Qopen (locfile, "a+");
|
|
if (locfd == 0) {
|
|
locfd = Qopen (locfile, "w+");
|
|
if (locfd == 0) {
|
|
Con_Printf ("ERROR: Unable to open %s : %s\n", mapname,
|
|
strerror (errno));
|
|
free (mapname);
|
|
return;
|
|
}
|
|
}
|
|
Qprintf (locfd, "%.0f %.0f %.0f %s\n", loc[0], loc[1], loc[2],
|
|
desc);
|
|
Qclose (locfd);
|
|
Con_Printf("Marked Current Location: %s\n", desc);
|
|
free (mapname);
|
|
}
|
|
|
|
/*
|
|
* locs_dumploc
|
|
*
|
|
* copies the entire loc data from memory to disk
|
|
* supports zgip files via zdumploc
|
|
*/
|
|
void
|
|
locs_dumploc (void)
|
|
{
|
|
char *mapname, *t1;
|
|
QFile *locfd = 0;
|
|
char locfile[MAX_OSPATH];
|
|
int i;
|
|
if (Cmd_Argc () != 1) {
|
|
Con_Printf
|
|
("markloc <description> :marks the current location with the description and records the information into a loc file.\n");
|
|
return;
|
|
}
|
|
mapname = strdup (cl.worldmodel->name);
|
|
if (!mapname)
|
|
Sys_Error ("Can't duplicate mapname!");
|
|
t1 = strrchr (mapname, '.');
|
|
if (!t1)
|
|
Sys_Error ("Can't find .!");
|
|
t1++; // skip over .
|
|
t1[0] = 'l';
|
|
t1[1] = 'o';
|
|
t1[2] = 'c';
|
|
if (strcmp(Cmd_Argv(0),"dumploc") == 0) {
|
|
snprintf (locfile, sizeof (locfile), "%s/%s", com_gamedir, mapname);
|
|
locfd = Qopen (locfile, "w+");
|
|
#ifdef HAVE_ZLIB
|
|
} else {
|
|
snprintf (locfile, sizeof (locfile), "%s/%s.gz", com_gamedir, mapname);
|
|
locfd = Qopen (locfile, "z9w+");
|
|
#endif
|
|
}
|
|
|
|
if (locfd == 0) {
|
|
Con_Printf ("ERROR: Unable to open %s : %s\n", mapname,
|
|
strerror (errno));
|
|
free (mapname);
|
|
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);
|
|
free(mapname);
|
|
}
|
|
|
|
/*
|
|
* locs_search
|
|
*
|
|
* used by locs_delloc, locs_editloc, locs_moveloc
|
|
*/
|
|
int
|
|
locs_search (vec3_t target)
|
|
{
|
|
location_t *best = NULL, *cur;
|
|
float best_distance = 9999999, distance;
|
|
int i, j = -1;
|
|
|
|
for (i = 0; i < locations_count; i++) {
|
|
cur = locations[i];
|
|
distance = VectorDistance_fast (target, cur->loc);
|
|
if ((distance < best_distance) || !best) {
|
|
best = cur;
|
|
best_distance = distance;
|
|
j = i;
|
|
}
|
|
}
|
|
return (j);
|
|
}
|
|
|
|
/*
|
|
* locs_delloc
|
|
*
|
|
* removes nearest location marker
|
|
*/
|
|
void
|
|
locs_delloc (void)
|
|
{
|
|
vec3_t loc;
|
|
int i, j;
|
|
|
|
if (Cmd_Argc () != 1) {
|
|
Con_Printf("delloc :removes the nearest location marker\n");
|
|
return;
|
|
}
|
|
if (locations_count) {
|
|
VectorCopy (cl.simorg, loc);
|
|
i = locs_search(loc);
|
|
Con_Printf("Removing Location Marker for %s\n", locations[i]->name);
|
|
free ((void *) locations[i]->name);
|
|
free ((void *) locations[i]);
|
|
locations_count--;
|
|
for (j = i; j < locations_count; j++)
|
|
locations[j] = locations[j+1];
|
|
locations[locations_count] = NULL;
|
|
#ifdef HAVE_ZLIB
|
|
if (locisgz)
|
|
Cmd_ExecuteString ("zdumploc");
|
|
else
|
|
#endif
|
|
Cmd_ExecuteString ("dumploc");
|
|
} else {
|
|
Con_Printf("Error: No Location Markers to Delete\n");
|
|
}
|
|
}
|
|
|
|
/*
|
|
* locs_editloc
|
|
*
|
|
* change the description of nearest location marker
|
|
*/
|
|
void
|
|
locs_editloc (void)
|
|
{
|
|
vec3_t loc;
|
|
int i;
|
|
char *desc = Cmd_Args ();
|
|
|
|
if (Cmd_Argc () == 1) {
|
|
Con_Printf("editloc <description> :changed the description of the nearest location marker\n");
|
|
return;
|
|
}
|
|
if (locations_count) {
|
|
VectorCopy (cl.simorg, loc);
|
|
i = locs_search(loc);
|
|
Con_Printf("Changing location marker from %s to %s\n",
|
|
locations[i]->name, desc);
|
|
free ((void *) locations[i]->name);
|
|
locations[i]->name = strdup (desc);
|
|
#ifdef HAVE_ZLIB
|
|
if (locisgz)
|
|
Cmd_ExecuteString ("zdumploc");
|
|
else
|
|
#endif
|
|
Cmd_ExecuteString ("dumploc");
|
|
} else {
|
|
Con_Printf("Error: No Location Markers to Edit\n");
|
|
}
|
|
}
|
|
|
|
/*
|
|
* locs_moveloc
|
|
*
|
|
* Move the nearest location marker to current position
|
|
*/
|
|
void
|
|
locs_moveloc (void)
|
|
{
|
|
vec3_t loc;
|
|
int i;
|
|
|
|
if (Cmd_Argc () != 1) {
|
|
Con_Printf("moveloc :Move the nearest location marker to your current location\n");
|
|
return;
|
|
}
|
|
if (locations_count) {
|
|
VectorCopy (cl.simorg, loc);
|
|
i = locs_search(loc);
|
|
Con_Printf("Moving location marker for %s to current location\n", locations[i]->name);
|
|
VectorCopy (cl.simorg,locations[i]->loc);
|
|
#ifdef HAVE_ZLIB
|
|
if (locisgz)
|
|
Cmd_ExecuteString ("zdumploc");
|
|
else
|
|
#endif
|
|
Cmd_ExecuteString ("dumploc");
|
|
} else {
|
|
Con_Printf("Error: No Location Markers to Move\n");
|
|
}
|
|
}
|
|
|
|
void
|
|
Locs_Init (void)
|
|
{
|
|
Cmd_AddCommand ("markloc", locs_markloc, "No Description");
|
|
Cmd_AddCommand ("dumploc", locs_dumploc, "No Description");
|
|
#ifdef HAVE_ZLIB
|
|
Cmd_AddCommand ("zdumploc", locs_dumploc, "No Description");
|
|
#endif
|
|
Cmd_AddCommand ("delloc",locs_delloc, "No Description");
|
|
Cmd_AddCommand ("editloc",locs_editloc, "No Description");
|
|
Cmd_AddCommand ("moveloc",locs_moveloc, "No Description");
|
|
}
|