server/server/commands.C

/*
 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
 *
 * 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 = 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 = 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.73
Committed:	Wed Nov 16 23:42:02 2016 UTC (7 years, 6 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.72:	+1 -1 lines
Log Message:	copyright update 2016
#	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.73	* Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 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	root	1.71	*
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	root	1.71	*
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	root	1.71	*
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.71	*
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			{"drop", command_drop, 1.0},
52			{"dropall", command_dropall, 0.5 / TICK},
53			{"examine", command_examine, 0.5 / TICK},
54			{"fix_me", command_fix_me, 0.0},
55			{"get", command_take, 1.0},
56			{"invoke", command_invoke, 1.0},
57			{"killpets", command_kill_pets, 1.0},
58	elmex	1.60	{"lock", command_lock, 1.0}, /* locks items in inventory with command line or macro */
59	root	1.46	{"pickup", command_pickup, 1.0},
60			{"prepare", command_prepare, 1.0},
61			{"resistances", command_resistances, 1.0},
62			{"rotateshoottype", command_rotateshoottype, 1.0},
63			{"skills", command_skills, 0.5 / TICK}, /* shows player list of skills */
64	elmex	1.60	{"unlock", command_unlock, 1.0}, /* unlock items in inventory with command line or in macro */
65	root	1.46	{"use_skill", command_uskill, 1.0},
66			{"ready_skill", command_rskill, 1.0},
67			{"search-items", command_search_items, 1.0},
68			{"showpets", command_showpets, 1.0},
69			{"statistics", command_statistics, 1.0},
70			{"take", command_take, 1.0},
71			{"throw", command_throw, 1.0},
72			{"time", command_time, 0.24 / TICK},
73			{"title", command_title, 0.5 / TICK},
74			{"bowmode", command_bowmode, 1.0},
75			{"version", command_version, 1.0},
76
77			// movement commands all do their own speed management
78			{"stay", command_stay, 0.0},
79			{"north", command_north, 0.0},
80			{"east", command_east, 0.0},
81			{"south", command_south, 0.0},
82			{"west", command_west, 0.0},
83			{"northeast", command_northeast, 0.0},
84			{"southeast", command_southeast, 0.0},
85			{"southwest", command_southwest, 0.0},
86			{"northwest", command_northwest, 0.0},
87	root	1.64
88			{"mark" , command_mark , 0.0},
89	root	1.65	{"run" , command_run , 0.0},
90	root	1.64	{"run_stop" , command_run_stop , 0.0},
91	root	1.65	{"fire" , command_fire , 0.0},
92	root	1.64	{"fire_stop", command_fire_stop, 0.0},
93	elmex	1.1	};
94	root	1.68	static const int CommandsSize = array_length (Commands);
95	elmex	1.1
96			/*
97			* Wizard commands (for both)
98			*/
99	root	1.65	static CommArray_s WizCommands[] = {
100	root	1.46	{"abil", command_abil, 0.0},
101			{"addexp", command_addexp, 0.0},
102			{"arrest", command_arrest, 0.0},
103			{"create", command_create, 0.0},
104			{"debug", command_debug, 0.0},
105			{"dump", command_dump, 0.0},
106	root	1.12	{"dumpbelow", command_dumpbelow, 0.0},
107			{"forget_spell", command_forget_spell, 0.0},
108	root	1.46	{"free", command_free, 0.0},
109			{"freeze", command_freeze, 0.0},
110	root	1.12	{"insert_into", command_insert_into, 0.0},
111	root	1.51	{"inventory", command_inventory, 0.0},
112	root	1.12	{"invisible", command_invisible, 0.0},
113			{"learn_special_prayer", command_learn_special_prayer, 0.0},
114			{"learn_spell", command_learn_spell, 0.0},
115	root	1.46	{"patch", command_patch, 0.0},
116			{"remove", command_remove, 0.0},
117			{"set_god", command_setgod, 0.0},
118	root	1.12	{"stack_clear", command_stack_clear, 0.0},
119	root	1.46	{"stack_list", command_stack_list, 0.0},
120			{"stack_pop", command_stack_pop, 0.0},
121			{"stack_push", command_stack_push, 0.0},
122			{"stats", command_stats, 0.0},
123			{"summon", command_summon, 0.0},
124	root	1.20	//{"overlay_save", command_save_overlay, 0.0},
125	elmex	1.1	};
126	root	1.68	static const int WizCommandsSize = array_length (WizCommands);
127	elmex	1.1
128	root	1.9	static int
129			compare_A (const void a, const void b)
130	elmex	1.1	{
131	root	1.18	return strcmp (((CommArray_s )a)->name, ((CommArray_s )b)->name);
132	elmex	1.1	}
133
134	root	1.65	static struct init_commands
135			{
136			init_commands ()
137			{
138			qsort (Commands, CommandsSize, sizeof (CommArray_s), compare_A);
139			qsort (WizCommands, WizCommandsSize, sizeof (CommArray_s), compare_A);
140			}
141			} init_commands;
142
143			static CommArray_s *
144			find_command_element (char cmd, CommArray_s commarray, int commsize)
145			{
146			CommArray_s *asp, dummy;
147
148			dummy.name = cmd;
149			asp = (CommArray_s )bsearch ((void )&dummy, (void *)commarray, commsize, sizeof (CommArray_s), compare_A);
150			return asp;
151			}
152
153			/* This function is called from the new client/server code.
154			* pl is the player who is issuing the command, command is the
155			* command.
156			*/
157	root	1.9	void
158	root	1.65	execute_newserver_command (object pl, char command)
159	elmex	1.1	{
160	root	1.65	CommArray_s *csp;
161			char *cp;
162
163			/*
164			* remove trailing spaces from command
165			*/
166			cp = command + strlen (command) - 1;
167			while ((cp >= command) && (*cp == ' '))
168			{
169			*cp = '\0';
170			cp--;
171			}
172
173			cp = strchr (command, ' ');
174			if (cp)
175			{
176			*(cp++) = '\0';
177			while (*cp == ' ')
178			cp++;
179			}
180
181			if (!INVOKE_PLAYER (COMMAND, pl->contr, ARG_STRING (command), ARG_STRING (cp)))
182			{
183			csp = find_command_element (command, Commands, CommandsSize);
184
185	root	1.67	if (!csp && pl->flag [FLAG_WIZ])
186	root	1.65	csp = find_command_element (command, WizCommands, WizCommandsSize);
187
188			if (csp)
189			{
190			pl->speed_left -= csp->time;
191			csp->func (pl, cp);
192			}
193			else if (!INVOKE_PLAYER (UNKNOWN_COMMAND, pl->contr, ARG_STRING (command), ARG_STRING (cp)))
194	root	1.66	pl->failmsgf ("'%s' is not a valid command.", command);
195	root	1.65	}
196	elmex	1.1	}
197