server/server/c_new.C

/*
    CrossFire, A Multiplayer game for X-windows

    Copyright (C) 2002 Mark Wedel & Crossfire Development Team
    Copyright (C) 1992 Frank Tore Johansen

    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 the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

    The author can be reached via e-mail to <crossfire@schmorp.de>
*/

/* This file deals with administrative commands from the client. */
#include <global.h>
#include <commands.h>
#ifndef __CEXTRACT__
# include <sproto.h>
#endif

#ifndef tolower
# define tolower(C)      (((C) >= 'A' && (C) <= 'Z')? (C) - 'A' + 'a': (C))
#endif


static int
compare_A (const void *a, const void *b)
{
  return strcmp (((CommArray_s *) a)->name, ((CommArray_s *) b)->name);
}

static CommArray_s *
find_command_element (char *cmd, CommArray_s * commarray, int commsize)
{
  CommArray_s *asp, dummy;

  dummy.name = cmd;
  asp = (CommArray_s *) bsearch ((void *) &dummy, (void *) commarray, commsize, sizeof (CommArray_s), compare_A);
  return asp;
}

/* This function is called from the new client/server code.
 * pl is the player who is issuing the command, command is the
 * command.
 */
int
execute_newserver_command (object *pl, char *command)
{
  CommArray_s *csp;
  char *cp;

  pl->contr->has_hit = 0;

  /*
   * remove trailing spaces from commant
   */
  cp = command + strlen (command) - 1;
  while ((cp >= command) && (*cp == ' '))
    {
      *cp = '\0';
      cp--;
    }
  cp = strchr (command, ' ');
  if (cp)
    {
      *(cp++) = '\0';
      while (*cp == ' ')
        cp++;
    }

  csp = find_plugin_command (command, pl);

  if (!csp) csp = find_command_element (command, NewServerCommands, NewServerCommandSize);
  if (!csp) csp = find_command_element (command, Commands, CommandsSize);
  if (!csp) csp = find_command_element (command, CommunicationCommands, CommunicationCommandSize);
  if (!csp && QUERY_FLAG (pl, FLAG_WIZ))
    csp = find_command_element (command, WizCommands, WizCommandsSize);

  if (csp == NULL)
    {
      new_draw_info_format (NDI_UNIQUE, 0, pl, "'%s' is not a valid command.", command);
      return 0;
    }

  pl->speed_left -= csp->time;

  /* A character time can never exceed his speed (which in many cases,
   * if wearing armor, is less than one.)  Thus, in most cases, if
   * the command takes 1.0, the player's speed will be less than zero.
   * it is only really an issue if time goes below -1
   * Due to various reasons that are too long to go into here, we will
   * actually still execute player even if his time is less than 0,
   * but greater than -1.  This is to improve the performance of the
   * new client/server.  In theory, it shouldn't make much difference.
   */

  if (csp->time && pl->speed_left < -2.0)
    LOG (llevDebug, "execute_newclient_command: Player issued command that takes more time than he has left.\n");

  return csp->func (pl, cp);
}

int
command_run (object *op, char *params)
{
  int dir;

  dir = params ? atoi (params) : 0;
  if (dir < 0 || dir >= 9)
    {
      new_draw_info (NDI_UNIQUE, 0, op, "Can't run into a non adjacent square.");
      return 0;
    }
  op->contr->run_on = 1;
  return move_player (op, dir);
}

int
command_run_stop (object *op, char *params)
{
  op->contr->run_on = 0;
  return 1;
}

int
command_fire (object *op, char *params)
{
  int dir;

  dir = params ? atoi (params) : 0;
  if (dir < 0 || dir >= 9)
    {
      new_draw_info (NDI_UNIQUE, 0, op, "Can't fire to a non adjacent square.");
      return 0;
    };
  op->contr->fire_on = 1;
  return move_player (op, dir);
}

int
command_fire_stop (object *op, char *params)
{
  op->contr->fire_on = 0;
  return 1;
}

int
bad_command (object *op, char *params)
{
  new_draw_info (NDI_UNIQUE, 0, op, "bind and unbind are no longer handled on the server");
  return 1;
}
Revision:	1.6
Committed:	Mon Dec 11 02:54:57 2006 UTC (17 years, 6 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.5:	+5 -9 lines
Log Message:	- rename $uptime to $UPTIME - hopefully force alchemy to use one second delay
#	User	Rev	Content
1	elmex	1.1	/*
2			CrossFire, A Multiplayer game for X-windows
3
4			Copyright (C) 2002 Mark Wedel & Crossfire Development Team
5			Copyright (C) 1992 Frank Tore Johansen
6
7			This program is free software; you can redistribute it and/or modify
8			it under the terms of the GNU General Public License as published by
9			the Free Software Foundation; either version 2 of the License, or
10			(at your option) any later version.
11
12			This program is distributed in the hope that it will be useful,
13			but WITHOUT ANY WARRANTY; without even the implied warranty of
14			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15			GNU General Public License for more details.
16
17			You should have received a copy of the GNU General Public License
18			along with this program; if not, write to the Free Software
19			Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20
21	root	1.5	The author can be reached via e-mail to <crossfire@schmorp.de>
22	elmex	1.1	*/
23
24			/* This file deals with administrative commands from the client. */
25			#include <global.h>
26			#include <commands.h>
27			#ifndef __CEXTRACT__
28	root	1.4	# include <sproto.h>
29	elmex	1.1	#endif
30
31			#ifndef tolower
32	root	1.4	# define tolower(C) (((C) >= 'A' && (C) <= 'Z')? (C) - 'A' + 'a': (C))
33	elmex	1.1	#endif
34
35
36	root	1.4	static int
37			compare_A (const void a, const void b)
38	elmex	1.1	{
39	root	1.4	return strcmp (((CommArray_s ) a)->name, ((CommArray_s ) b)->name);
40	elmex	1.1	}
41
42	root	1.4	static CommArray_s *
43			find_command_element (char cmd, CommArray_s commarray, int commsize)
44	elmex	1.1	{
45			CommArray_s *asp, dummy;
46
47	root	1.4	dummy.name = cmd;
48			asp = (CommArray_s ) bsearch ((void ) &dummy, (void *) commarray, commsize, sizeof (CommArray_s), compare_A);
49	elmex	1.1	return asp;
50			}
51
52			/* This function is called from the new client/server code.
53			* pl is the player who is issuing the command, command is the
54			* command.
55			*/
56	root	1.4	int
57			execute_newserver_command (object pl, char command)
58	elmex	1.1	{
59	root	1.4	CommArray_s *csp;
60			char *cp;
61	elmex	1.1
62	root	1.4	pl->contr->has_hit = 0;
63	elmex	1.1
64	root	1.4	/*
65			* remove trailing spaces from commant
66			*/
67			cp = command + strlen (command) - 1;
68			while ((cp >= command) && (*cp == ' '))
69			{
70			*cp = '\0';
71			cp--;
72	elmex	1.1	}
73	root	1.4	cp = strchr (command, ' ');
74			if (cp)
75			{
76			*(cp++) = '\0';
77			while (*cp == ' ')
78			cp++;
79	elmex	1.1	}
80
81	root	1.4	csp = find_plugin_command (command, pl);
82	elmex	1.1
83	root	1.6	if (!csp) csp = find_command_element (command, NewServerCommands, NewServerCommandSize);
84			if (!csp) csp = find_command_element (command, Commands, CommandsSize);
85			if (!csp) csp = find_command_element (command, CommunicationCommands, CommunicationCommandSize);
86	root	1.4	if (!csp && QUERY_FLAG (pl, FLAG_WIZ))
87			csp = find_command_element (command, WizCommands, WizCommandsSize);
88
89			if (csp == NULL)
90			{
91			new_draw_info_format (NDI_UNIQUE, 0, pl, "'%s' is not a valid command.", command);
92			return 0;
93	elmex	1.1	}
94
95	root	1.4	pl->speed_left -= csp->time;
96	elmex	1.1
97	root	1.4	/* A character time can never exceed his speed (which in many cases,
98			* if wearing armor, is less than one.) Thus, in most cases, if
99			* the command takes 1.0, the player's speed will be less than zero.
100			* it is only really an issue if time goes below -1
101			* Due to various reasons that are too long to go into here, we will
102			* actually still execute player even if his time is less than 0,
103			* but greater than -1. This is to improve the performance of the
104			* new client/server. In theory, it shouldn't make much difference.
105			*/
106
107			if (csp->time && pl->speed_left < -2.0)
108	root	1.6	LOG (llevDebug, "execute_newclient_command: Player issued command that takes more time than he has left.\n");
109
110	root	1.4	return csp->func (pl, cp);
111	elmex	1.1	}
112
113	root	1.4	int
114			command_run (object op, char params)
115	elmex	1.1	{
116	root	1.4	int dir;
117
118			dir = params ? atoi (params) : 0;
119			if (dir < 0 \|\| dir >= 9)
120			{
121			new_draw_info (NDI_UNIQUE, 0, op, "Can't run into a non adjacent square.");
122			return 0;
123	elmex	1.1	}
124	root	1.4	op->contr->run_on = 1;
125			return move_player (op, dir);
126	elmex	1.1	}
127
128	root	1.4	int
129			command_run_stop (object op, char params)
130	elmex	1.1	{
131	root	1.4	op->contr->run_on = 0;
132			return 1;
133	elmex	1.1	}
134
135	root	1.4	int
136			command_fire (object op, char params)
137	elmex	1.1	{
138	root	1.4	int dir;
139
140			dir = params ? atoi (params) : 0;
141			if (dir < 0 \|\| dir >= 9)
142			{
143			new_draw_info (NDI_UNIQUE, 0, op, "Can't fire to a non adjacent square.");
144			return 0;
145	elmex	1.1	};
146	root	1.4	op->contr->fire_on = 1;
147			return move_player (op, dir);
148	elmex	1.1	}
149
150	root	1.4	int
151			command_fire_stop (object op, char params)
152	elmex	1.1	{
153	root	1.4	op->contr->fire_on = 0;
154			return 1;
155	elmex	1.1	}
156
157	root	1.4	int
158			bad_command (object op, char params)
159	elmex	1.1	{
160	root	1.4	new_draw_info (NDI_UNIQUE, 0, op, "bind and unbind are no longer handled on the server");
161			return 1;
162	elmex	1.1	}