server/server/commands.C

/*
 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
 *
 * Copyright (©) 2017,2018 Marc Alexander Lehmann / the Deliantra team
 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 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? */
  {"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 = ecb_array_length (Commands);

/*
 * 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},
  {"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},
  {"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 = ecb_array_length (WizCommands);

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