ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/commands.c
Revision: 1.4
Committed: Wed May 3 15:09:04 2006 UTC (18 years ago) by pippijn
Content type: text/plain
Branch: MAIN
Changes since 1.3: +1 -0 lines
Log Message:
Adding suicide command

File Contents

# Content
1 /*
2 * static char *rcsid_commands_c =
3 * "$Id$";
4 */
5
6 /*
7 CrossFire, A Multiplayer game for X-windows
8
9 Copyright (C) 2002 Mark Wedel & Crossfire Development Team
10 Copyright (C) 1992 Frank Tore Johansen
11
12 This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2 of the License, or
15 (at your option) any later version.
16
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
21
22 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software
24 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25
26 The author can be reached via e-mail to crossfire-devel@real-time.com
27 */
28
29 /*
30 * Command parser
31 */
32
33 #include <global.h>
34 #include <commands.h>
35 #ifndef __CEXTRACT__
36 #include <sproto.h>
37 #endif
38 #include <ctype.h>
39
40 /* Added times to all the commands. However, this was quickly done,
41 * and probably needs more refinements. All socket and DM commands
42 * take 0 time.
43 */
44
45 /*
46 * Normal game commands
47 */
48 CommArray_s Commands[] = {
49 {"save", command_save, 0.0},
50
51 {"sound", command_sound, 0.0},
52 {"party", command_party, 0.0},
53 {"gsay", command_gsay, 1.0},
54
55 #ifdef DEBUG
56 {"sstable", command_sstable, 0.0},
57 #endif
58 {"apply", command_apply, 1.0}, /* should be variable */
59 {"applymode", command_applymode, 1.0}, /* should be variable */
60 {"archs", command_archs, 0.0},
61 {"body", command_body, 0.0},
62 {"brace", command_brace, 0.0},
63 {"build", command_build, 0.0},
64 {"cast", command_cast, 0.2}, /* Is this right? */
65 {"disarm", command_disarm, 1.0},
66 {"dm", command_dm, 0.0},
67 {"dmhide", command_dmhide, 0.0}, /* Like dm, but don't tell a dm arrived, hide player */
68 {"drop", command_drop, 1.0},
69 {"dropall", command_dropall, 1.0},
70 {"examine", command_examine, 0.5},
71 {"explore", command_explore, 0.0},
72 {"fix_me", command_fix_me, 0.0},
73 {"get", command_take, 1.0},
74 {"help", command_help, 0.0},
75 {"hiscore", command_hiscore, 0.0},
76 {"inventory", command_inventory,0.0},
77 {"invoke", command_invoke, 1.0},
78 {"killpets", command_kill_pets,0.0},
79 {"listen", command_listen, 0.0},
80 {"logs", command_logs, 0.0},
81 {"maps", command_maps, 0.0},
82 {"mapinfo", command_mapinfo, 0.0},
83 {"mark", command_mark, 0.0},
84 {"motd", command_motd, 0.0},
85 {"output-sync", command_output_sync, 0.0},
86 {"output-count", command_output_count,0.0},
87 {"peaceful", command_peaceful,0.0},
88 {"pickup", command_pickup, 1.0},
89 {"players", command_players, 0.0},
90 {"prepare", command_prepare, 1.0},
91 {"quit", command_quit, 0.0},
92 {"quit_character", command_real_quit, 0.0},
93 {"suicide", command_suicide, 0.0},
94 {"rename", command_rename_item, 0.0},
95 {"resistances", command_resistances, 0.0},
96 {"rotateshoottype", command_rotateshoottype, 0.0},
97 {"skills", command_skills, 0.0}, /* shows player list of skills */
98 {"use_skill", command_uskill, 1.0},
99 {"quests", command_quests, 0.0},
100 {"ready_skill", command_rskill, 1.0},
101 {"search",command_search, 1.0},
102 {"search-items", command_search_items, 0.0},
103 {"showpets", command_showpets, 1.0},
104 {"statistics", command_statistics, 0.0},
105 {"strings", command_strings, 0.0},
106 {"take", command_take, 1.0},
107 {"throw", command_throw, 1.0},
108 {"time", command_time, 0.0},
109 {"weather", command_weather, 0.0},
110 {"whereabouts", command_whereabouts, 0.0},
111 {"whereami", command_whereami, 0.0},
112 {"title", command_title, 0.0},
113 {"usekeys", command_usekeys, 0.0},
114 {"bowmode", command_bowmode, 0.0},
115 {"petmode", command_petmode, 0.0},
116 {"version", command_version, 0.0},
117 {"wimpy", command_wimpy, 0.0},
118 {"who", command_who, 0.0},
119 {"afk", command_afk, 0.0},
120
121 {"stay", command_stay, 1.0}, /* 1.0 because it is used when using a
122 * skill on yourself */
123 {"north", command_north, 1.0},
124 {"east", command_east, 1.0},
125 {"south", command_south, 1.0},
126 {"west", command_west, 1.0},
127 {"northeast", command_northeast, 1.0},
128 {"southeast", command_southeast, 1.0},
129 {"southwest", command_southwest, 1.0},
130 {"northwest", command_northwest, 1.0},
131 };
132
133 const int CommandsSize =sizeof(Commands) / sizeof(CommArray_s);
134
135 CommArray_s CommunicationCommands [] = {
136 /* begin emotions */
137 {"tell", command_tell, 0.1},
138 {"reply", command_reply, 0.0},
139 {"say", command_say, 0.1},
140 {"shout", command_shout, 0.1},
141 {"chat", command_chat, 0.1},
142 {"me", command_me, 0.1},
143 {"nod", command_nod, 0.0},
144 {"dance", command_dance, 0.0},
145 {"kiss", command_kiss, 0.0},
146 {"bounce", command_bounce, 0.0},
147 {"smile", command_smile, 0.0},
148 {"cackle", command_cackle, 0.0},
149 {"laugh", command_laugh, 0.0},
150 {"giggle", command_giggle, 0.0},
151 {"shake", command_shake, 0.0},
152 {"puke", command_puke, 0.0},
153 {"growl", command_growl, 0.0},
154 {"scream", command_scream, 0.0},
155 {"sigh", command_sigh, 0.0},
156 {"sulk", command_sulk, 0.0},
157 {"hug", command_hug, 0.0},
158 {"cry", command_cry, 0.0},
159 {"poke", command_poke, 0.0},
160 {"accuse", command_accuse, 0.0},
161 {"grin", command_grin, 0.0},
162 {"bow", command_bow, 0.0},
163 {"clap", command_clap, 0.0},
164 {"blush", command_blush, 0.0},
165 {"burp", command_burp, 0.0},
166 {"chuckle", command_chuckle, 0.0},
167 {"cough", command_cough, 0.0},
168 {"flip", command_flip, 0.0},
169 {"frown", command_frown, 0.0},
170 {"gasp", command_gasp, 0.0},
171 {"glare", command_glare, 0.0},
172 {"groan", command_groan, 0.0},
173 {"hiccup", command_hiccup, 0.0},
174 {"lick", command_lick, 0.0},
175 {"pout", command_pout, 0.0},
176 {"shiver", command_shiver, 0.0},
177 {"shrug", command_shrug, 0.0},
178 {"slap", command_slap, 0.0},
179 {"smirk", command_smirk, 0.0},
180 {"snap", command_snap, 0.0},
181 {"sneeze", command_sneeze, 0.0},
182 {"snicker", command_snicker, 0.0},
183 {"sniff", command_sniff, 0.0},
184 {"snore", command_snore, 0.0},
185 {"spit", command_spit, 0.0},
186 {"strut", command_strut, 0.0},
187 {"thank", command_thank, 0.0},
188 {"twiddle", command_twiddle, 0.0},
189 {"wave", command_wave, 0.0},
190 {"whistle", command_whistle, 0.0},
191 {"wink", command_wink, 0.0},
192 {"yawn", command_yawn, 0.0},
193 {"beg", command_beg, 0.0},
194 {"bleed", command_bleed, 0.0},
195 {"cringe", command_cringe, 0.0},
196 {"think", command_think, 0.0},
197 {"cointoss", command_cointoss, 0.0},
198 {"orcknuckle", command_orcknuckle, 0.0},
199 {"printlos", command_printlos,0.0},
200 };
201
202 const int CommunicationCommandSize = sizeof(CommunicationCommands)/ sizeof(CommArray_s);
203
204 CommArray_s NewServerCommands [] = {
205 {"run", command_run, 1.0},
206 {"run_stop", command_run_stop, 0.0},
207 {"fire", command_fire, 1.0},
208 {"fire_stop", command_fire_stop, 0.0}
209 };
210
211 const int NewServerCommandSize = sizeof(NewServerCommands)/ sizeof(CommArray_s);
212
213 /*
214 * Wizard commands (for both)
215 */
216 CommArray_s WizCommands [] = {
217 {"abil", command_abil,0.0},
218 {"addexp", command_addexp,0.0},
219 {"arrest", command_arrest,0.0},
220 {"banish", command_banish,0.0},
221 {"create", command_create,0.0},
222 {"debug", command_debug,0.0},
223 {"diff", command_diff, 0.0 },
224 {"dump", command_dump,0.0},
225 {"dumpbelow", command_dumpbelow,0.0},
226 {"dumpfriendlyobjects", command_dumpfriendlyobjects,0.0},
227 {"dumpallarchetypes", command_dumpallarchetypes,0.0},
228 {"dumpallmaps", command_dumpallmaps,0.0},
229 {"dumpallobjects", command_dumpallobjects,0.0},
230 {"dumpmap", command_dumpmap,0.0},
231 {"forget_spell", command_forget_spell, 0.0},
232 {"free", command_free,0.0},
233 {"freeze", command_freeze,0.0},
234 {"goto", command_goto,0.0},
235 {"hide", command_hide,0.0},
236 {"insert_into", command_insert_into,0.0},
237 {"invisible", command_invisible,0.0},
238 {"kick", command_kick, 0.0},
239 {"learn_special_prayer", command_learn_special_prayer, 0.0},
240 {"learn_spell", command_learn_spell, 0.0},
241 #ifdef DEBUG_MALLOC_LEVEL
242 {"verify", command_malloc_verify,0.0},
243 #endif
244 {"malloc", command_malloc,0.0},
245 {"plugin",command_loadplugin,0.0},
246 {"pluglist",command_listplugins,0.0},
247 {"plugout",command_unloadplugin,0.0},
248 {"nodm", command_nowiz,0.0},
249 {"nowiz", command_nowiz,0.0},
250 {"patch", command_patch,0.0},
251 {"remove", command_remove,0.0},
252 {"reset", command_reset,0.0},
253 {"set_god", command_setgod, 0.0},
254 {"server_speed", command_speed,0.0},
255 {"shutdown", command_shutdown, 0.0},
256 {"ssdumptable", command_ssdumptable,0.0},
257 {"stack_clear", command_stack_clear, 0.0 },
258 {"stack_list", command_stack_list, 0.0},
259 {"stack_pop", command_stack_pop, 0.0 },
260 {"stack_push", command_stack_push, 0.0 },
261 {"stats", command_stats,0.0},
262 {"style_info", command_style_map_info, 0.0}, /* Costly command, so make it wiz only */
263 {"summon", command_summon,0.0},
264 {"teleport", command_teleport,0.0},
265 {"toggle_shout", command_toggle_shout,0.0},
266 {"wizpass", command_wizpass,0.0},
267 {"wizcast", command_wizcast,0.0},
268 {"overlay_save", command_save_overlay, 0.0},
269 /* {"possess", command_possess, 0.0}, */
270 {"mon_aggr", command_mon_aggr, 0.0},
271 {"loadtest", command_loadtest, 0.0},
272 };
273 const int WizCommandsSize =sizeof(WizCommands) / sizeof(CommArray_s);
274
275 /* Socket commands - these should really do nothing more than output things
276 * to the various players/sockets.
277 */
278 CommArray_s Socket_Commands[] = {
279 {"hiscore", command_hiscore, 0.0},
280 {"logs", command_logs, 0.0},
281 {"maps", command_maps, 0.0},
282 {"motd", command_motd, 0.0},
283 {"players", command_players, 0.0},
284 {"version", command_version, 0.0},
285 {"who", command_who, 0.0},
286 };
287
288 const int Socket_CommandsSize =sizeof(Socket_Commands) / sizeof(CommArray_s);
289
290
291 /* Socket commands - these should really do nothing more than output things
292 * to the various players/sockets.
293 */
294 CommArray_s Socket2_Commands[] = {
295 {"shout", command_shout, 0.1},
296 {"chat", command_chat, 0.1},
297 {"tell", command_tell, 0.1},
298 };
299
300 const int Socket2_CommandsSize =sizeof(Socket2_Commands) / sizeof(CommArray_s);
301
302
303
304 static int compare_A(const void *a, const void *b)
305 {
306 return strcmp(((CommArray_s *)a)->name, ((CommArray_s *)b)->name);
307 }
308
309 void init_commands(void)
310 {
311 qsort(Commands, CommandsSize, sizeof(CommArray_s), compare_A);
312 qsort(CommunicationCommands, CommunicationCommandSize, sizeof(CommArray_s), compare_A);
313 qsort(NewServerCommands, NewServerCommandSize, sizeof(CommArray_s), compare_A);
314 qsort(WizCommands, WizCommandsSize, sizeof(CommArray_s), compare_A);
315 qsort(Socket_Commands, Socket_CommandsSize, sizeof(CommArray_s), compare_A);
316 qsort(Socket2_Commands, Socket2_CommandsSize, sizeof(CommArray_s), compare_A);
317 }
318
319 #ifndef tolower
320 #define tolower(C) (((C) >= 'A' && (C) <= 'Z')? (C) - 'A' + 'a': (C))
321 #endif
322
323
324 CommFunc find_oldsocket_command(char *cmd)
325 {
326 CommArray_s *asp, dummy;
327 char *cp;
328
329 for (cp=cmd; *cp; cp++) {
330 *cp =tolower(*cp);
331 }
332
333 dummy.name =cmd;
334 asp =(CommArray_s *)bsearch((void *)&dummy,
335 (void *)Socket_Commands, Socket_CommandsSize,
336 sizeof(CommArray_s), compare_A);
337 if (asp)
338 return asp->func;
339 return NULL;
340 }
341
342 CommFunc find_oldsocket_command2(char *cmd)
343 {
344 CommArray_s *asp, dummy;
345 char *cp;
346
347 for (cp=cmd; *cp; cp++) {
348 *cp =tolower(*cp);
349 }
350
351 dummy.name =cmd;
352 asp =(CommArray_s *)bsearch((void *)&dummy,
353 (void *)Socket2_Commands, Socket2_CommandsSize,
354 sizeof(CommArray_s), compare_A);
355 if (asp)
356 return asp->func;
357 return NULL;
358 }
359
360 static CommFunc find_command(char *cmd)
361 {
362 CommArray_s *asp, dummy;
363 char *cp;
364
365 for (cp=cmd; *cp; cp++)
366 *cp =tolower(*cp);
367
368 dummy.name =cmd;
369 asp =(CommArray_s *)bsearch((void *)&dummy,
370 (void *)Commands, CommandsSize,
371 sizeof(CommArray_s), compare_A);
372 LOG(llevDebug, "Getting asp for command string %s\n", cmd);
373 if (asp)
374 return asp->func;
375 else
376 {
377 LOG(llevDebug, "Now we are here\n");
378 asp =(CommArray_s *)bsearch((void *)&dummy,
379 (void *)CommunicationCommands, CommunicationCommandSize,
380 sizeof(CommArray_s), compare_A);
381 if (asp)
382 return asp->func;
383 else
384 return NULL;
385 };
386 }
387
388 static CommFunc find_wizcommand(char *cmd)
389 {
390 CommArray_s *asp, dummy;
391 char *cp;
392
393 for (cp=cmd; *cp; cp++)
394 *cp =tolower(*cp);
395
396 dummy.name =cmd;
397 asp =(CommArray_s *)bsearch((void *)&dummy,
398 (void *)WizCommands, WizCommandsSize,
399 sizeof(CommArray_s), compare_A);
400 if (asp)
401 return asp->func;
402 return NULL;
403 }
404
405
406 /*
407 * parse_string may be called from a player in the game or from a socket
408 * (op is NULL if it's a socket).
409 * It returnes 1 if it recognized the command, otherwise 0.
410 * Actually return value is used as can-repeat -flag
411 */
412
413 int parse_string(object *op, char *str)
414 {
415 CommFunc f;
416 char *cp;
417 CommArray_s *asp;
418
419 #ifdef INPUT_DEBUG
420 LOG(llevDebug, "Command: '%s'\n", str);
421 #endif
422 /*
423 * remove trailing spaces
424 */
425 cp = str+strlen(str)-1;
426 while ( (cp>=str) && (*cp==' ')){
427 *cp='\0';
428 cp--;
429 }
430 /*
431 * No arguments?
432 */
433 if (!(cp=strchr(str, ' '))) {
434 /* GROS - If we are here, then maybe this is a plugin-provided command ? */
435 asp = find_plugin_command(str, op);
436 if (asp)
437 return asp->func(op, NULL);
438
439 if ((f=find_command(str)))
440 return f(op, NULL);
441 if (QUERY_FLAG(op,FLAG_WIZ) && (f=find_wizcommand(str)))
442 return f(op, NULL);
443
444 if(op) {
445 new_draw_info(NDI_UNIQUE, 0,op, "Unknown command. Try help.");
446 }
447 return 0;
448 }
449
450 /*
451 * Command with some arguments
452 */
453
454 *(cp++) ='\0';
455 /* Clear all spaces from the start of the optional argument */
456 while (*cp==' ') cp++;
457
458 asp = find_plugin_command(str,op);
459 if (asp) return asp->func(op,cp);
460
461 if ((f=find_command(str)))
462 return f(op, cp);
463 if (QUERY_FLAG(op, FLAG_WIZ) && (f=find_wizcommand(str)))
464 return f(op, cp);
465
466 if(op) {
467 new_draw_info(NDI_UNIQUE, 0,op, "Unknown command. Try help.");
468 }
469 return 0;
470 }
471
472
473 /* this function handles splitting up a ; separated
474 * compound command into sub-commands: it is recursive.
475 */
476 int parse_command(object *op, char *str) {
477 char *tmp,*tmp2;
478 int i;
479 /* if it's a keybinding command, ignore semicolons */
480 if(strstr(str,"bind")) return parse_string(op,str);
481 LOG(llevDebug, "parsin command '%s'\n", str);
482 /* If on a socket, you can not do complex commands. */
483 if(op && (tmp=strchr(str,';'))!=NULL) /* we've found a ';' do the 1st and recurse */
484 {
485 char buf[MAX_BUF];
486 /* copy 1st command into buf */
487 /* Even if tmp2 points the the input_buf, this should still
488 * be safe operation.
489 */
490 for(i=0,tmp2=str;tmp2!=tmp;i++,tmp2++)
491 buf[i]= (*tmp2);
492 buf[i]='\0'; /* null terminate the copy*/
493 strncpy(op->contr->input_buf,tmp2+1, MAX_BUF);
494 op->contr->input_buf[MAX_BUF-1]=0;
495 parse_string(op,buf);
496 }
497 else {
498 /* We need to set the input_buf to 0 so clear any complex keybinding
499 * there might be. However, str can be a pointer to input_buf in
500 * the case of a complex keybinding. So first we process the command,
501 * clear the buffer, and then return the value.
502 */
503 i=parse_string(op,str);
504 if (op) op->contr->input_buf[0]=0;
505 return i;
506 }
507 return 0;
508 }