ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/commands.c
Revision: 1.1.1.1 (vendor branch)
Committed: Fri Feb 3 07:14:30 2006 UTC (18 years, 4 months ago) by root
Content type: text/plain
Branch: UPSTREAM
CVS Tags: UPSTREAM_2006_02_03
Changes since 1.1: +0 -0 lines
Log Message:
initial import

File Contents

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