server/server/commands.C

/*
 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
 * 
 * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
 * Copyright (©) 1992 Frank Tore Johansen
 * 
 * Deliantra is free software: you can redistribute it and/or modify it under
 * the terms of the Affero GNU General Public License as published by the
 * Free Software Foundation, either version 3 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 Affero GNU General Public License
 * and the GNU General Public License along with this program. If not, see
 * <http://www.gnu.org/licenses/>.
 * 
 * The authors can be reached via e-mail to <support@deliantra.net>
 */

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

/* Added times to all the commands.  However, this was quickly done,
 * and probably needs more refinements.  All socket and DM commands
 * take 0 time.
 */

typedef int (*CommFunc)(object *op, char *params);

struct CommArray_s {            /* global list's structure */
  const char *name;
  CommFunc func;
  float time;                   /* How long it takes to execute this command */
};

/*
 * Normal game commands
 */
static CommArray_s Commands[] = {
  {"party", command_party, 1.0},
  {"gsay",  command_gsay, 1.0},

  {"apply",        command_apply, 1.0},        /* should be variable */
  {"cast",         command_cast, 1.0},  /* Is this right? */
  {"dm",           command_dm, 0.0},
  {"dmhide",       command_dmhide, 0.0},      /* Like dm, but don't tell a dm arrived, hide player */
  {"drop",         command_drop, 1.0},
  {"dropall",      command_dropall, 0.5 / TICK},
  {"examine",      command_examine, 0.5 / TICK},
  {"fix_me",       command_fix_me, 0.0},
  {"get",          command_take, 1.0},
  {"invoke",       command_invoke, 1.0},
  {"killpets",     command_kill_pets, 1.0},
  {"lock",         command_lock, 1.0},                  /* locks items in inventory with command line or macro */
  {"pickup",       command_pickup, 1.0},
  {"prepare",      command_prepare, 1.0},
  {"resistances",  command_resistances, 1.0},
  {"rotateshoottype", command_rotateshoottype, 1.0},
  {"skills",       command_skills, 0.5 / TICK},      /* shows player list of skills */
  {"unlock",       command_unlock, 1.0},                /* unlock items in inventory with command line or in macro */
  {"use_skill",    command_uskill, 1.0},
  {"ready_skill",  command_rskill, 1.0},
  {"search-items", command_search_items, 1.0},
  {"showpets",     command_showpets, 1.0},
  {"statistics",   command_statistics, 1.0},
  {"take",         command_take, 1.0},
  {"throw",        command_throw, 1.0},
  {"time",         command_time, 0.24 / TICK},
  {"title",        command_title, 0.5 / TICK},
  {"bowmode",      command_bowmode, 1.0},
  {"version",      command_version, 1.0},

  // movement commands all do their own speed management
  {"stay",      command_stay,      0.0},
  {"north",     command_north,     0.0},
  {"east",      command_east,      0.0},
  {"south",     command_south,     0.0},
  {"west",      command_west,      0.0},
  {"northeast", command_northeast, 0.0},
  {"southeast", command_southeast, 0.0},
  {"southwest", command_southwest, 0.0},
  {"northwest", command_northwest, 0.0},

  {"mark"     , command_mark     , 0.0},
  {"run"      , command_run      , 0.0},
  {"run_stop" , command_run_stop , 0.0},
  {"fire"     , command_fire     , 0.0},
  {"fire_stop", command_fire_stop, 0.0},
};
static const int CommandsSize = sizeof (Commands) / sizeof (CommArray_s);

/*
 * Wizard commands (for both)
 */
static CommArray_s WizCommands[] = {
  {"abil",     command_abil, 0.0},
  {"addexp",   command_addexp, 0.0},
  {"arrest",   command_arrest, 0.0},
  {"create",   command_create, 0.0},
  {"debug",    command_debug, 0.0},
  {"dump",     command_dump, 0.0},
  {"dumpbelow", command_dumpbelow, 0.0},
  {"forget_spell", command_forget_spell, 0.0},
  {"free",     command_free, 0.0},
  {"freeze",   command_freeze, 0.0},
  {"hide",     command_hide, 0.0},
  {"insert_into", command_insert_into, 0.0},
  {"inventory",   command_inventory, 0.0},
  {"invisible", command_invisible, 0.0},
  {"learn_special_prayer", command_learn_special_prayer, 0.0},
  {"learn_spell", command_learn_spell, 0.0},
  {"nodm",     command_nowiz, 0.0},
  {"nowiz",    command_nowiz, 0.0},
  {"patch",    command_patch, 0.0},
  {"remove",   command_remove, 0.0},
  {"set_god",  command_setgod, 0.0},
  {"stack_clear", command_stack_clear, 0.0},
  {"stack_list",  command_stack_list, 0.0},
  {"stack_pop",   command_stack_pop, 0.0},
  {"stack_push",  command_stack_push, 0.0},
  {"stats",    command_stats, 0.0},
  {"summon",   command_summon, 0.0},
  //{"overlay_save", command_save_overlay, 0.0},
};
static const int WizCommandsSize = sizeof (WizCommands) / sizeof (CommArray_s);

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

static struct init_commands
{
  init_commands ()
  { 
    qsort (Commands, CommandsSize, sizeof (CommArray_s), compare_A);
    qsort (WizCommands, WizCommandsSize, sizeof (CommArray_s), compare_A);
  }
} init_commands;

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.
 */
void
execute_newserver_command (object *pl, char *command)
{
  CommArray_s *csp;
  char *cp;

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

  cp = strchr (command, ' ');
  if (cp)
    {
      *(cp++) = '\0';
      while (*cp == ' ')
        cp++;
    }

  if (!INVOKE_PLAYER (COMMAND, pl->contr, ARG_STRING (command), ARG_STRING (cp)))
    {
      csp = find_command_element (command, Commands, CommandsSize);

      if (!csp && pl->flag [FLAG_WIZ])
        csp = find_command_element (command, WizCommands, WizCommandsSize);

      if (csp)
        {
          pl->speed_left -= csp->time;
          csp->func (pl, cp);
        }
      else if (!INVOKE_PLAYER (UNKNOWN_COMMAND, pl->contr, ARG_STRING (command), ARG_STRING (cp)))
        pl->failmsgf ("'%s' is not a valid command.", command);
    }
}

Revision:	1.67
Committed:	Sun Apr 11 00:34:06 2010 UTC (14 years, 1 month ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.66:	+1 -1 lines
Log Message:	get rid of QUERY_FLAG/SET_FLAG/CLEAR_FLAG macros that I always hated
#	User	Rev	Content
1	elmex	1.1	/*
2	root	1.52	* This file is part of Deliantra, the Roguelike Realtime MMORPG.
3	pippijn	1.24	*
4	root	1.63	* Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5	root	1.62	* Copyright (©) 2002 Mark Wedel & Crossfire Development Team
6			* Copyright (©) 1992 Frank Tore Johansen
7	pippijn	1.24	*
8	root	1.58	* Deliantra is free software: you can redistribute it and/or modify it under
9			* the terms of the Affero GNU General Public License as published by the
10			* Free Software Foundation, either version 3 of the License, or (at your
11			* option) any later version.
12	pippijn	1.24	*
13	root	1.48	* This program is distributed in the hope that it will be useful,
14			* but WITHOUT ANY WARRANTY; without even the implied warranty of
15			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16			* GNU General Public License for more details.
17	pippijn	1.24	*
18	root	1.58	* You should have received a copy of the Affero GNU General Public License
19			* and the GNU General Public License along with this program. If not, see
20			* <http://www.gnu.org/licenses/>.
21	root	1.47	*
22	root	1.52	* The authors can be reached via e-mail to <support@deliantra.net>
23	pippijn	1.24	*/
24	elmex	1.1
25	root	1.65	/* This file deals with administrative commands from the client. */
26	elmex	1.1	#include <global.h>
27	root	1.19	#include <sproto.h>
28	elmex	1.1
29			/* Added times to all the commands. However, this was quickly done,
30			* and probably needs more refinements. All socket and DM commands
31			* take 0 time.
32			*/
33
34	root	1.65	typedef int (CommFunc)(object op, char *params);
35
36			struct CommArray_s { /* global list's structure */
37			const char *name;
38			CommFunc func;
39			float time; /* How long it takes to execute this command */
40			};
41
42	elmex	1.1	/*
43			* Normal game commands
44			*/
45	root	1.65	static CommArray_s Commands[] = {
46	root	1.46	{"party", command_party, 1.0},
47			{"gsay", command_gsay, 1.0},
48	root	1.9
49	root	1.46	{"apply", command_apply, 1.0}, /* should be variable */
50			{"cast", command_cast, 1.0}, /* Is this right? */
51			{"dm", command_dm, 0.0},
52			{"dmhide", command_dmhide, 0.0}, /* Like dm, but don't tell a dm arrived, hide player */
53			{"drop", command_drop, 1.0},
54			{"dropall", command_dropall, 0.5 / TICK},
55			{"examine", command_examine, 0.5 / TICK},
56			{"fix_me", command_fix_me, 0.0},
57			{"get", command_take, 1.0},
58			{"invoke", command_invoke, 1.0},
59			{"killpets", command_kill_pets, 1.0},
60	elmex	1.60	{"lock", command_lock, 1.0}, /* locks items in inventory with command line or macro */
61	root	1.46	{"pickup", command_pickup, 1.0},
62			{"prepare", command_prepare, 1.0},
63			{"resistances", command_resistances, 1.0},
64			{"rotateshoottype", command_rotateshoottype, 1.0},
65			{"skills", command_skills, 0.5 / TICK}, /* shows player list of skills */
66	elmex	1.60	{"unlock", command_unlock, 1.0}, /* unlock items in inventory with command line or in macro */
67	root	1.46	{"use_skill", command_uskill, 1.0},
68			{"ready_skill", command_rskill, 1.0},
69			{"search-items", command_search_items, 1.0},
70			{"showpets", command_showpets, 1.0},
71			{"statistics", command_statistics, 1.0},
72			{"take", command_take, 1.0},
73			{"throw", command_throw, 1.0},
74			{"time", command_time, 0.24 / TICK},
75			{"title", command_title, 0.5 / TICK},
76			{"bowmode", command_bowmode, 1.0},
77			{"version", command_version, 1.0},
78
79			// movement commands all do their own speed management
80			{"stay", command_stay, 0.0},
81			{"north", command_north, 0.0},
82			{"east", command_east, 0.0},
83			{"south", command_south, 0.0},
84			{"west", command_west, 0.0},
85			{"northeast", command_northeast, 0.0},
86			{"southeast", command_southeast, 0.0},
87			{"southwest", command_southwest, 0.0},
88			{"northwest", command_northwest, 0.0},
89	root	1.64
90			{"mark" , command_mark , 0.0},
91	root	1.65	{"run" , command_run , 0.0},
92	root	1.64	{"run_stop" , command_run_stop , 0.0},
93	root	1.65	{"fire" , command_fire , 0.0},
94	root	1.64	{"fire_stop", command_fire_stop, 0.0},
95	elmex	1.1	};
96	root	1.65	static const int CommandsSize = sizeof (Commands) / sizeof (CommArray_s);
97	elmex	1.1
98			/*
99			* Wizard commands (for both)
100			*/
101	root	1.65	static CommArray_s WizCommands[] = {
102	root	1.46	{"abil", command_abil, 0.0},
103			{"addexp", command_addexp, 0.0},
104			{"arrest", command_arrest, 0.0},
105			{"create", command_create, 0.0},
106			{"debug", command_debug, 0.0},
107			{"dump", command_dump, 0.0},
108	root	1.12	{"dumpbelow", command_dumpbelow, 0.0},
109			{"forget_spell", command_forget_spell, 0.0},
110	root	1.46	{"free", command_free, 0.0},
111			{"freeze", command_freeze, 0.0},
112			{"hide", command_hide, 0.0},
113	root	1.12	{"insert_into", command_insert_into, 0.0},
114	root	1.51	{"inventory", command_inventory, 0.0},
115	root	1.12	{"invisible", command_invisible, 0.0},
116			{"learn_special_prayer", command_learn_special_prayer, 0.0},
117			{"learn_spell", command_learn_spell, 0.0},
118	root	1.46	{"nodm", command_nowiz, 0.0},
119			{"nowiz", command_nowiz, 0.0},
120			{"patch", command_patch, 0.0},
121			{"remove", command_remove, 0.0},
122			{"set_god", command_setgod, 0.0},
123	root	1.12	{"stack_clear", command_stack_clear, 0.0},
124	root	1.46	{"stack_list", command_stack_list, 0.0},
125			{"stack_pop", command_stack_pop, 0.0},
126			{"stack_push", command_stack_push, 0.0},
127			{"stats", command_stats, 0.0},
128			{"summon", command_summon, 0.0},
129	root	1.20	//{"overlay_save", command_save_overlay, 0.0},
130	elmex	1.1	};
131	root	1.65	static const int WizCommandsSize = sizeof (WizCommands) / sizeof (CommArray_s);
132	elmex	1.1
133	root	1.9	static int
134			compare_A (const void a, const void b)
135	elmex	1.1	{
136	root	1.18	return strcmp (((CommArray_s )a)->name, ((CommArray_s )b)->name);
137	elmex	1.1	}
138
139	root	1.65	static struct init_commands
140			{
141			init_commands ()
142			{
143			qsort (Commands, CommandsSize, sizeof (CommArray_s), compare_A);
144			qsort (WizCommands, WizCommandsSize, sizeof (CommArray_s), compare_A);
145			}
146			} init_commands;
147
148			static CommArray_s *
149			find_command_element (char cmd, CommArray_s commarray, int commsize)
150			{
151			CommArray_s *asp, dummy;
152
153			dummy.name = cmd;
154			asp = (CommArray_s )bsearch ((void )&dummy, (void *)commarray, commsize, sizeof (CommArray_s), compare_A);
155			return asp;
156			}
157
158			/* This function is called from the new client/server code.
159			* pl is the player who is issuing the command, command is the
160			* command.
161			*/
162	root	1.9	void
163	root	1.65	execute_newserver_command (object pl, char command)
164	elmex	1.1	{
165	root	1.65	CommArray_s *csp;
166			char *cp;
167
168			/*
169			* remove trailing spaces from command
170			*/
171			cp = command + strlen (command) - 1;
172			while ((cp >= command) && (*cp == ' '))
173			{
174			*cp = '\0';
175			cp--;
176			}
177
178			cp = strchr (command, ' ');
179			if (cp)
180			{
181			*(cp++) = '\0';
182			while (*cp == ' ')
183			cp++;
184			}
185
186			if (!INVOKE_PLAYER (COMMAND, pl->contr, ARG_STRING (command), ARG_STRING (cp)))
187			{
188			csp = find_command_element (command, Commands, CommandsSize);
189
190	root	1.67	if (!csp && pl->flag [FLAG_WIZ])
191	root	1.65	csp = find_command_element (command, WizCommands, WizCommandsSize);
192
193			if (csp)
194			{
195			pl->speed_left -= csp->time;
196			csp->func (pl, cp);
197			}
198			else if (!INVOKE_PLAYER (UNKNOWN_COMMAND, pl->contr, ARG_STRING (command), ARG_STRING (cp)))
199	root	1.66	pl->failmsgf ("'%s' is not a valid command.", command);
200	root	1.65	}
201	elmex	1.1	}
202