/*************************************************************************** * Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, * * Michael Seifert, Hans Henrik Strfeldt, Tom Madsen, and Katja Nyboe. * * * * Merc Diku Mud improvments copyright (C) 1992, 1993 by Michael * * Chastain, Michael Quan, and Mitchell Tse. * * * * In order to use any part of this Merc Diku Mud, you must comply with * * both the original Diku license in 'license.doc' as well the Merc * * license in 'license.txt'. In particular, you may not remove either of * * these copyright notices. * * * * Much time and thought has gone into this software and you are * * benefitting. We hope that you share your changes too. What goes * * around, comes around. * ***************************************************************************/ /*************************************************************************** * ROM 2.4 is copyright 1993-1998 Russ Taylor * * ROM has been brought to you by the ROM consortium * * Russ Taylor (rtaylor@hypercube.org) * * Gabrielle Taylor (gtaylor@hypercube.org) * * Brian Moore (zump@rom.org) * * By using this code, you have agreed to follow the terms of the * * ROM license, in the file Rom24/doc/rom.license * ****************************************************************************/ #if defined(macintosh) #include <types.h> #else #include <sys/types.h> #endif #include <ctype.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <time.h> #include "merc.h" #include "interp.h" bool check_social args ((CHAR_DATA * ch, char *command, char *argument)); /* * Command logging types. */ #define LOG_NORMAL 0 #define LOG_ALWAYS 1 #define LOG_NEVER 2 /* * Log-all switch. */ bool fLogAll = FALSE; bool global_exp = FALSE; bool double_stance = FALSE; bool double_improve = FALSE; bool double_quest = TRUE; bool no_wait_questing = TRUE; bool double_pracs = FALSE; bool double_damage = FALSE; bool global_quest = FALSE; bool its_christmas = FALSE; bool special_day = TRUE; bool is_reboot_countdown = FALSE; bool reboot_countdown = 30; bool stuff_was_changed = FALSE; bool is_mass_arena = FALSE; bool is_mass_arena_fight = FALSE; int top_playerid = 0; /* * Command table. */ const struct cmd_type cmd_table[] = { /* * Common movement commands. */ {"north", do_north, POS_STANDING, 0, LOG_NEVER, 0}, {"east", do_east, POS_STANDING, 0, LOG_NEVER, 0}, {"south", do_south, POS_STANDING, 0, LOG_NEVER, 0}, {"west", do_west, POS_STANDING, 0, LOG_NEVER, 0}, {"up", do_up, POS_STANDING, 0, LOG_NEVER, 0}, {"down", do_down, POS_STANDING, 0, LOG_NEVER, 0}, /* * Common other commands. * Placed here so one and two letter abbreviations work. */ {"at", do_at, POS_DEAD, L6, LOG_NORMAL, 1}, {"cast", do_cast, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"auction", do_auction, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"buy", do_buy, POS_RESTING, 0, LOG_NORMAL, 1}, {"channels", do_channels, POS_DEAD, 0, LOG_NORMAL, 1}, {"exits", do_exits, POS_RESTING, 0, LOG_NORMAL, 1}, {"get", do_get, POS_RESTING, 0, LOG_NORMAL, 1}, {"goto", do_goto, POS_DEAD, L8, LOG_NORMAL, 1}, {"group", do_group, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"guild", do_guild, POS_DEAD, L4, LOG_ALWAYS, 1}, {"hit", do_kill, POS_FIGHTING, 0, LOG_NORMAL, 0}, {"inventory", do_inventory, POS_DEAD, 0, LOG_NORMAL, 1}, {"kill", do_kill, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"look", do_look, POS_RESTING, 0, LOG_NORMAL, 1}, {"clan", do_clantalk, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"order", do_order, POS_RESTING, 0, LOG_NORMAL, 1}, {"practice", do_practice, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"rest", do_rest, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"sit", do_sit, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"sockets", do_sockets, POS_DEAD, L4, LOG_NORMAL, 1}, {"stand", do_stand, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"tell", do_tell, POS_RESTING, 0, LOG_NORMAL, 1}, {"unlock", do_unlock, POS_RESTING, 0, LOG_NORMAL, 1}, {"wield", do_wear, POS_RESTING, 0, LOG_NORMAL, 1}, {"wizhelp", do_wizhelp, POS_DEAD, IM, LOG_NORMAL, 1}, /* * Dragon */ { "dragonform", do_drackform, POS_STANDING, 0, LOG_NORMAL, 1}, { "fly", do_fly, POS_STANDING, 0, LOG_NORMAL, 1}, /* * Eotc Xrakisis */ { "calc", do_calc, POS_STANDING, 0, LOG_NORMAL, 1}, { "objectgate", do_objectgate, POS_STANDING, 0, LOG_NORMAL, 1}, { "gsocial", do_gsocial, POS_STANDING, 0, LOG_NORMAL, 1}, { "bank", do_bank, POS_STANDING, 0, LOG_NORMAL, 1}, { "superberserk", do_superberserk, POS_FIGHTING, 0, LOG_NORMAL, 1}, { "focus", do_focus, POS_STANDING, 0, LOG_NORMAL, 1}, { "claim", do_claim, POS_STANDING, 0, LOG_NORMAL, 1}, { "gift", do_gift, POS_STANDING, 0, LOG_NORMAL, 1}, { "call", do_call, POS_STANDING, 0, LOG_NORMAL, 1}, { "leader", do_leader, POS_STANDING, 0, LOG_NORMAL, 1}, { "leaderclear", do_leaderclear, POS_STANDING, 0, LOG_NORMAL, 211}, { "mudinfo", do_mudinfo, POS_STANDING, 0, LOG_NORMAL, 1}, { "becomedragon", do_becomedragon, POS_STANDING, 0, LOG_NORMAL, 1}, { "version", do_version, POS_STANDING, 0, LOG_NORMAL, 1}, {"consider", do_consider, POS_RESTING, 0, LOG_NORMAL, 1}, /* Powers level 200-206 */ { "thirdeye", do_thirdeye, POS_STANDING, 0, LOG_NORMAL, 200}, { "scry", do_scry, POS_STANDING, 0, LOG_NORMAL, 201}, /* Vamp and WW */ { "diseaseself", do_diseaseself, POS_STANDING, 0, LOG_NORMAL, 1}, { "scream", do_scream, POS_FIGHTING, 0, LOG_NORMAL, 1}, // Vampire { "conceal", do_conceal, POS_STANDING, 0, LOG_NORMAL, 1}, // Vampire { "fear", do_fear, POS_FIGHTING, 0, LOG_NORMAL, 1}, // Vampire { "moonbeam", do_moonbeam, POS_FIGHTING, 0, LOG_NORMAL, 1}, // Werewolf { "roar", do_roar, POS_FIGHTING, 0, LOG_NORMAL, 1}, // Werewolf { "leech", do_leech, POS_FIGHTING, 0, LOG_NORMAL, 1}, // Demon { "soulsuck", do_soulsuck, POS_FIGHTING, 0, LOG_NORMAL, 1}, // Undead /* Clan */ { "clist", do_clanlist, POS_SLEEPING, 0, LOG_NORMAL, 1 }, /* JEREMIAS */ { "petition", do_petition, POS_RESTING, 0, LOG_NORMAL, 1 }, /* JEREMIAS */ { "promote", do_promote, POS_DEAD, 0, LOG_NORMAL, 1 }, /* JEREMIAS */ { "demote", do_demote, POS_DEAD, 0, LOG_NORMAL, 1 }, /* JEREMIAS */ { "exile", do_exile, POS_RESTING, 0, LOG_NORMAL, 1 }, /* JEREMIAS */ { "clan", do_clantalk, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "loner", do_loner, POS_DEAD, 0, LOG_NORMAL, 1 }, /* JEREMIAS */ { "cleader", do_cleader, POS_DEAD, L1, LOG_NORMAL, 1 }, /* JEREMIAS */ { "guild", do_guild, POS_DEAD, L4, LOG_ALWAYS, 1 }, /* JEREMIAS */ { "cdeposit", do_cdeposit, POS_DEAD, 0, LOG_ALWAYS, 1}, /* Xrakisis n Jobo */ { "cwithdraw", do_cwithdraw, POS_DEAD, 0, LOG_ALWAYS, 1}, /* Xrakisis */ {"pathfind", do_pathfind, POS_DEAD, 0, LOG_NORMAL, 1 }, {"pathtest", do_pathtest, POS_DEAD, 0, LOG_NORMAL, 1 }, { "quest", do_quest, POS_RESTING, 0, LOG_NORMAL, 1 }, {"directions", do_directions, POS_DEAD, 0, LOG_NORMAL, 1 }, {"sstat", do_sstat, POS_DEAD, 0, LOG_NORMAL, 1 }, {"stance", do_stance, POS_DEAD, 0, LOG_NORMAL, 1 }, {"smith", do_smith, POS_STANDING, 0, LOG_NORMAL, 1}, {"relevel", do_relevel, POS_DEAD, 0, LOG_NORMAL, 1}, {"addchange", do_addchange, POS_DEAD, ML, LOG_NORMAL, 1}, {"delchange", do_delchange, POS_DEAD, ML, LOG_NORMAL, 1}, {"changes", do_changes, POS_DEAD, 0, LOG_NORMAL, 1}, {"scan", do_scan, POS_DEAD, 0, LOG_NORMAL, 1}, // {"consider", do_consider, POS_RESTING, 0, LOG_NORMAL, 1}, {"consecrate", do_consecrate, POS_DEAD, 0, LOG_NORMAL, 1}, {"second", do_second, POS_DEAD, 0, LOG_NORMAL, 1}, {"gods", do_gods, POS_DEAD, 0, LOG_NORMAL, 1}, {"toggle", do_toggle, POS_DEAD, ML, LOG_NORMAL, 1}, {"slist", do_slist, POS_DEAD, 0, LOG_NORMAL, 1}, {"perm", do_perm, POS_DEAD, 0, LOG_NORMAL, 1}, {"multiclass", do_multiclass, POS_DEAD, 0, LOG_NORMAL, 1}, {"level", do_level, POS_DEAD, 0, LOG_NORMAL, 1}, {"relinquish", do_relinquish, POS_STANDING, 0, LOG_NORMAL, 1}, /* Bank Commands */ {"account", do_account, POS_STANDING, 0, LOG_NORMAL, 1}, {"deposit", do_deposit, POS_STANDING, 0, LOG_NORMAL, 1}, {"withdraw", do_withdraw, POS_STANDING, 0, LOG_NORMAL, 1}, /* * Informational commands. */ {"affects", do_affects, POS_DEAD, 0, LOG_NORMAL, 1}, {"areas", do_areas, POS_DEAD, 0, LOG_NORMAL, 1}, /* {"bug", do_bug, POS_DEAD, 0, LOG_NORMAL, 1}, */ {"board", do_board, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"commands", do_commands, POS_DEAD, 0, LOG_NORMAL, 1}, {"compare", do_compare, POS_RESTING, 0, LOG_NORMAL, 1}, {"count", do_count, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"credits", do_credits, POS_DEAD, 0, LOG_NORMAL, 1}, {"equipment", do_equipment, POS_DEAD, 0, LOG_NORMAL, 1}, {"examine", do_examine, POS_RESTING, 0, LOG_NORMAL, 1}, /* {"groups", do_groups, POS_SLEEPING, 0, LOG_NORMAL, 1}, */ {"help", do_help, POS_DEAD, 0, LOG_NORMAL, 1}, {"info", do_groups, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"motd", do_motd, POS_DEAD, 0, LOG_NORMAL, 1}, {"read", do_read, POS_RESTING, 0, LOG_NORMAL, 1}, {"report", do_report, POS_RESTING, 0, LOG_NORMAL, 1}, {"rules", do_rules, POS_DEAD, 0, LOG_NORMAL, 1}, {"score", do_score, POS_DEAD, 0, LOG_NORMAL, 1}, {"oldscore", do_newscore, POS_DEAD, 0, LOG_NORMAL, 1}, {"skills", do_skills, POS_DEAD, 0, LOG_NORMAL, 1}, {"socials", do_socials, POS_DEAD, 0, LOG_NORMAL, 1}, {"show", do_show, POS_DEAD, 0, LOG_NORMAL, 1}, {"spells", do_spells, POS_DEAD, 0, LOG_NORMAL, 1}, {"story", do_story, POS_DEAD, 0, LOG_NORMAL, 1}, {"time", do_time, POS_DEAD, 0, LOG_NORMAL, 1}, {"typo", do_typo, POS_DEAD, 0, LOG_NORMAL, 1}, {"weather", do_weather, POS_RESTING, 0, LOG_NORMAL, 1}, {"who", do_who, POS_DEAD, 0, LOG_NORMAL, 1}, {"whois", do_whois, POS_DEAD, 0, LOG_NORMAL, 1}, {"wizlist", do_wizlist, POS_DEAD, 0, LOG_NORMAL, 1}, {"worth", do_worth, POS_SLEEPING, 0, LOG_NORMAL, 1}, /* * Configuration commands. */ {"alia", do_alia, POS_DEAD, 0, LOG_NORMAL, 0}, {"alias", do_alias, POS_DEAD, 0, LOG_NORMAL, 1}, {"autolist", do_autolist, POS_DEAD, 0, LOG_NORMAL, 1}, {"autoall", do_autoall, POS_DEAD, 0, LOG_NORMAL, 1}, {"autoassist", do_autoassist, POS_DEAD, 0, LOG_NORMAL, 1}, {"autoexit", do_autoexit, POS_DEAD, 0, LOG_NORMAL, 1}, {"autogold", do_autogold, POS_DEAD, 0, LOG_NORMAL, 1}, {"autoloot", do_autoloot, POS_DEAD, 0, LOG_NORMAL, 1}, {"autosac", do_autosac, POS_DEAD, 0, LOG_NORMAL, 1}, {"autosplit", do_autosplit, POS_DEAD, 0, LOG_NORMAL, 1}, {"brief", do_brief, POS_DEAD, 0, LOG_NORMAL, 1}, {"brief2", do_brief2, POS_DEAD, 0, LOG_NORMAL, 1}, {"brief3", do_brief3, POS_DEAD, 0, LOG_NORMAL, 1}, /* { "channels", do_channels, POS_DEAD, 0, LOG_NORMAL, 1 }, */ {"colour", do_colour, POS_DEAD, 0, LOG_NORMAL, 1}, {"color", do_colour, POS_DEAD, 0, LOG_NORMAL, 1}, {"combine", do_combine, POS_DEAD, 0, LOG_NORMAL, 1}, {"compact", do_compact, POS_DEAD, 0, LOG_NORMAL, 1}, {"description", do_description, POS_DEAD, 0, LOG_NORMAL, 1}, {"delet", do_delet, POS_DEAD, 0, LOG_ALWAYS, 0}, {"delete", do_delete, POS_STANDING, 0, LOG_ALWAYS, 1}, {"nofollow", do_nofollow, POS_DEAD, 0, LOG_NORMAL, 1}, {"noloot", do_noloot, POS_DEAD, 0, LOG_NORMAL, 1}, {"nosummon", do_nosummon, POS_DEAD, 0, LOG_NORMAL, 1}, {"outfit", do_outfit, POS_RESTING, 0, LOG_NORMAL, 1}, {"password", do_password, POS_DEAD, 0, LOG_NEVER, 1}, {"prompt", do_prompt, POS_DEAD, 0, LOG_NORMAL, 1}, {"scroll", do_scroll, POS_DEAD, 0, LOG_NORMAL, 1}, {"telnetga", do_telnetga, POS_DEAD, 0, LOG_NORMAL, 1}, {"title", do_title, POS_DEAD, 0, LOG_NORMAL, 1}, {"unalias", do_unalias, POS_DEAD, 0, LOG_NORMAL, 1}, {"wimpy", do_wimpy, POS_DEAD, 0, LOG_NORMAL, 1}, {"finger", do_finger, POS_DEAD, 0, LOG_NORMAL, 1}, /* * Communication commands. */ {"afk", do_afk, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"hints", do_hints, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"answer", do_answer, POS_SLEEPING, 0, LOG_NORMAL, 1}, /* { "auction", do_auction, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ {"deaf", do_deaf, POS_DEAD, 0, LOG_NORMAL, 1}, {"emote", do_emote, POS_RESTING, 0, LOG_NORMAL, 1}, {"pmote", do_pmote, POS_RESTING, 0, LOG_NORMAL, 1}, {".", do_gossip, POS_SLEEPING, 0, LOG_NORMAL, 0}, {"gossip", do_gossip, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"ic", do_gossip, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"chat", do_chat, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"ooc", do_chat, POS_SLEEPING, 0, LOG_NORMAL, 1}, {",", do_emote, POS_RESTING, 0, LOG_NORMAL, 0}, {"grats", do_grats, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"gtell", do_gtell, POS_DEAD, 0, LOG_NORMAL, 1}, {";", do_gtell, POS_DEAD, 0, LOG_NORMAL, 0}, /* { "music", do_music, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ {"note", do_note, POS_DEAD, 0, LOG_NORMAL, 1}, {"pose", do_pose, POS_RESTING, 0, LOG_NORMAL, 1}, {"question", do_question, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"quote", do_quote, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"quiet", do_quiet, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"reply", do_reply, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"replay", do_replay, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"say", do_say, POS_RESTING, 0, LOG_NORMAL, 1}, {"'", do_say, POS_RESTING, 0, LOG_NORMAL, 0}, {"shout", do_shout, POS_RESTING, 3, LOG_NORMAL, 1}, {"yell", do_yell, POS_RESTING, 0, LOG_NORMAL, 1}, /* * Object manipulation commands. */ {"brandish", do_brandish, POS_RESTING, 0, LOG_NORMAL, 1}, {"close", do_close, POS_RESTING, 0, LOG_NORMAL, 1}, {"drink", do_drink, POS_RESTING, 0, LOG_NORMAL, 1}, {"drop", do_drop, POS_RESTING, 0, LOG_NORMAL, 1}, {"eat", do_eat, POS_RESTING, 0, LOG_NORMAL, 1}, {"envenom", do_envenom, POS_RESTING, 0, LOG_NORMAL, 1}, {"fill", do_fill, POS_RESTING, 0, LOG_NORMAL, 1}, {"give", do_give, POS_RESTING, 0, LOG_NORMAL, 1}, {"heal", do_heal, POS_RESTING, 0, LOG_NORMAL, 1}, {"hold", do_wear, POS_RESTING, 0, LOG_NORMAL, 1}, {"list", do_list, POS_RESTING, 0, LOG_NORMAL, 1}, {"lock", do_lock, POS_RESTING, 0, LOG_NORMAL, 1}, {"open", do_open, POS_RESTING, 0, LOG_NORMAL, 1}, {"pick", do_pick, POS_RESTING, 0, LOG_NORMAL, 1}, {"pour", do_pour, POS_RESTING, 0, LOG_NORMAL, 1}, {"put", do_put, POS_RESTING, 0, LOG_NORMAL, 1}, {"quaff", do_quaff, POS_RESTING, 0, LOG_NORMAL, 1}, {"recite", do_recite, POS_RESTING, 0, LOG_NORMAL, 1}, {"remove", do_remove, POS_RESTING, 0, LOG_NORMAL, 1}, {"sell", do_sell, POS_RESTING, 0, LOG_NORMAL, 1}, {"take", do_get, POS_RESTING, 0, LOG_NORMAL, 1}, {"sacrifice", do_sacrifice, POS_RESTING, 0, LOG_NORMAL, 1}, {"junk", do_sacrifice, POS_RESTING, 0, LOG_NORMAL, 0}, {"tap", do_sacrifice, POS_RESTING, 0, LOG_NORMAL, 0}, /* { "unlock", do_unlock, POS_RESTING, 0, LOG_NORMAL, 1 }, */ {"value", do_value, POS_RESTING, 0, LOG_NORMAL, 1}, {"wear", do_wear, POS_RESTING, 0, LOG_NORMAL, 1}, {"zap", do_zap, POS_RESTING, 0, LOG_NORMAL, 1}, /* * Combat commands. */ {"assassinate", do_assassinate, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"backstab", do_backstab, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"bash", do_bash, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"bomuzite", do_bomuzite, POS_STANDING, 0, LOG_NORMAL, 1}, {"bs", do_backstab, POS_FIGHTING, 0, LOG_NORMAL, 0}, {"berserk", do_berserk, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"circle", do_circle, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"cleave", do_cleave, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"dirt", do_dirt, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"disarm", do_disarm, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"flee", do_flee, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"jugularslice", do_jugular_slice, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"kick", do_kick, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"knee", do_knee, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"sidekick", do_sidekick, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"murde", do_murde, POS_FIGHTING, 0, LOG_NORMAL, 0}, {"murder", do_murder, POS_FIGHTING, 5, LOG_ALWAYS, 1}, {"precisionstrike", do_precisionstrike, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"rampage", do_rampage, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"rescue", do_rescue, POS_FIGHTING, 0, LOG_NORMAL, 0}, {"skeletalhand", do_shand, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"surrender", do_surrender, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"trip", do_trip, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"unnerve", do_unnerve, POS_FIGHTING, 0, LOG_NORMAL, 1}, /* * Mob command interpreter (placed here for faster scan...) */ {"mob", do_mob, POS_DEAD, 0, LOG_NEVER, 0}, /* * Miscellaneous commands. */ {"enter", do_enter, POS_STANDING, 0, LOG_NORMAL, 1}, {"follow", do_follow, POS_RESTING, 0, LOG_NORMAL, 1}, {"gain", do_gain, POS_STANDING, 0, LOG_NORMAL, 1}, {"go", do_enter, POS_STANDING, 0, LOG_NORMAL, 0}, /* { "group", do_group, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ {"groups", do_groups, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"hide", do_hide, POS_RESTING, 0, LOG_NORMAL, 1}, /* { "practice", do_practice, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ {"qui", do_qui, POS_DEAD, 0, LOG_NORMAL, 0}, {"quit", do_quit, POS_DEAD, 0, LOG_NORMAL, 1}, {"recall", do_recall, POS_FIGHTING, 0, LOG_NORMAL, 1}, {"/", do_recall, POS_FIGHTING, 0, LOG_NORMAL, 0}, {"rent", do_rent, POS_DEAD, 0, LOG_NORMAL, 0}, {"save", do_save, POS_DEAD, 0, LOG_NORMAL, 1}, {"sleep", do_sleep, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"sneak", do_sneak, POS_STANDING, 0, LOG_NORMAL, 1}, {"split", do_split, POS_RESTING, 0, LOG_NORMAL, 1}, {"steal", do_steal, POS_STANDING, 0, LOG_NORMAL, 1}, {"train", do_train, POS_RESTING, 0, LOG_NORMAL, 1}, {"visible", do_visible, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"wake", do_wake, POS_SLEEPING, 0, LOG_NORMAL, 1}, {"where", do_where, POS_RESTING, 0, LOG_NORMAL, 1}, /* * Immortal commands. */ {"spellup", do_spellup, POS_DEAD, ML, LOG_ALWAYS, 1}, {"cprime", do_cprime, POS_DEAD, ML, LOG_ALWAYS, 1}, // Coded by Hutoshi {"reimb", do_reimb, POS_DEAD, ML, LOG_ALWAYS, 1}, {"advance", do_advance, POS_DEAD, ML, LOG_ALWAYS, 1}, {"copyover", do_copyover, POS_DEAD, ML, LOG_ALWAYS, 1}, {"dump", do_dump, POS_DEAD, ML, LOG_ALWAYS, 0}, {"trust", do_trust, POS_DEAD, ML, LOG_ALWAYS, 1}, {"violate", do_violate, POS_DEAD, ML, LOG_ALWAYS, 1}, {"allow", do_allow, POS_DEAD, L2, LOG_ALWAYS, 1}, {"ban", do_ban, POS_DEAD, L2, LOG_ALWAYS, 1}, {"deny", do_deny, POS_DEAD, L1, LOG_ALWAYS, 1}, {"disconnect", do_disconnect, POS_DEAD, L3, LOG_ALWAYS, 1}, {"flag", do_flag, POS_DEAD, L4, LOG_ALWAYS, 1}, {"freeze", do_freeze, POS_DEAD, L4, LOG_ALWAYS, 1}, {"permban", do_permban, POS_DEAD, L1, LOG_ALWAYS, 1}, {"protect", do_protect, POS_DEAD, L1, LOG_ALWAYS, 1}, {"reboo", do_reboo, POS_DEAD, L1, LOG_NORMAL, 0}, {"reboot", do_reboot, POS_DEAD, L1, LOG_ALWAYS, 1}, {"autoreboot", do_autoreboot, POS_DEAD, L1, LOG_ALWAYS, 1}, {"abort", do_abort, POS_DEAD, L1, LOG_ALWAYS, 1}, {"set", do_set, POS_DEAD, L2, LOG_ALWAYS, 1}, {"shutdow", do_shutdow, POS_DEAD, L1, LOG_NORMAL, 0}, {"shutdown", do_shutdown, POS_DEAD, L1, LOG_ALWAYS, 1}, /* { "sockets", do_sockets, POS_DEAD, L4, LOG_NORMAL, 1 }, */ {"wizlock", do_wizlock, POS_DEAD, L2, LOG_ALWAYS, 1}, {"force", do_force, POS_DEAD, L7, LOG_ALWAYS, 1}, {"load", do_load, POS_DEAD, L4, LOG_ALWAYS, 1}, {"newlock", do_newlock, POS_DEAD, L4, LOG_ALWAYS, 1}, {"nochannels", do_nochannels, POS_DEAD, L5, LOG_ALWAYS, 1}, {"noemote", do_noemote, POS_DEAD, L5, LOG_ALWAYS, 1}, {"noshout", do_noshout, POS_DEAD, L5, LOG_ALWAYS, 1}, {"notell", do_notell, POS_DEAD, L5, LOG_ALWAYS, 1}, {"pecho", do_pecho, POS_DEAD, L4, LOG_ALWAYS, 1}, {"pardon", do_pardon, POS_DEAD, L3, LOG_ALWAYS, 1}, {"purge", do_purge, POS_DEAD, L4, LOG_ALWAYS, 1}, {"qmconfig", do_qmconfig, POS_DEAD, ML, LOG_ALWAYS, 1}, {"restore", do_restore, POS_DEAD, L4, LOG_ALWAYS, 1}, {"sla", do_sla, POS_DEAD, L3, LOG_NORMAL, 0}, {"slay", do_slay, POS_DEAD, L3, LOG_ALWAYS, 1}, {"teleport", do_transfer, POS_DEAD, L5, LOG_ALWAYS, 1}, {"transfer", do_transfer, POS_DEAD, L5, LOG_ALWAYS, 1}, /* { "at", do_at, POS_DEAD, L6, LOG_NORMAL, 1 }, */ {"poofin", do_bamfin, POS_DEAD, L8, LOG_NORMAL, 1}, {"poofout", do_bamfout, POS_DEAD, L8, LOG_NORMAL, 1}, {"gecho", do_echo, POS_DEAD, L4, LOG_ALWAYS, 1}, /* { "goto", do_goto, POS_DEAD, L8, LOG_NORMAL, 1 }, */ {"holylight", do_holylight, POS_DEAD, IM, LOG_NORMAL, 1}, {"incognito", do_incognito, POS_DEAD, IM, LOG_NORMAL, 1}, {"invis", do_invis, POS_DEAD, IM, LOG_NORMAL, 0}, {"log", do_log, POS_DEAD, L1, LOG_ALWAYS, 1}, {"memory", do_memory, POS_DEAD, IM, LOG_NORMAL, 1}, {"mwhere", do_mwhere, POS_DEAD, IM, LOG_NORMAL, 1}, {"owhere", do_owhere, POS_DEAD, IM, LOG_NORMAL, 1}, {"peace", do_peace, POS_DEAD, L5, LOG_NORMAL, 1}, {"echo", do_recho, POS_DEAD, L6, LOG_ALWAYS, 1}, {"return", do_return, POS_DEAD, L6, LOG_NORMAL, 1}, {"snoop", do_snoop, POS_DEAD, L5, LOG_ALWAYS, 1}, {"stat", do_stat, POS_DEAD, IM, LOG_NORMAL, 1}, {"string", do_string, POS_DEAD, L5, LOG_ALWAYS, 1}, {"switch", do_switch, POS_DEAD, L6, LOG_ALWAYS, 1}, {"wizinvis", do_invis, POS_DEAD, IM, LOG_NORMAL, 1}, {"vnum", do_vnum, POS_DEAD, L4, LOG_NORMAL, 1}, {"zecho", do_zecho, POS_DEAD, L4, LOG_ALWAYS, 1}, {"clone", do_clone, POS_DEAD, L5, LOG_ALWAYS, 1}, {"wiznet", do_wiznet, POS_DEAD, IM, LOG_NORMAL, 1}, {"immtalk", do_immtalk, POS_DEAD, IM, LOG_NORMAL, 1}, {"imotd", do_imotd, POS_DEAD, IM, LOG_NORMAL, 1}, {":", do_immtalk, POS_DEAD, IM, LOG_NORMAL, 0}, {"smote", do_smote, POS_DEAD, IM, LOG_NORMAL, 1}, {"prefi", do_prefi, POS_DEAD, IM, LOG_NORMAL, 0}, {"prefix", do_prefix, POS_DEAD, IM, LOG_NORMAL, 1}, {"mpdump", do_mpdump, POS_DEAD, IM, LOG_NEVER, 1}, {"mpstat", do_mpstat, POS_DEAD, IM, LOG_NEVER, 1}, /* * OLC */ {"edit", do_olc, POS_DEAD, 0, LOG_NORMAL, 1}, {"asave", do_asave, POS_DEAD, 0, LOG_NORMAL, 1}, {"alist", do_alist, POS_DEAD, 0, LOG_NORMAL, 1}, {"resets", do_resets, POS_DEAD, 0, LOG_NORMAL, 1}, {"redit", do_redit, POS_DEAD, 0, LOG_NORMAL, 1}, {"medit", do_medit, POS_DEAD, 0, LOG_NORMAL, 1}, {"aedit", do_aedit, POS_DEAD, 0, LOG_NORMAL, 1}, {"oedit", do_oedit, POS_DEAD, 0, LOG_NORMAL, 1}, {"mpedit", do_mpedit, POS_DEAD, 0, LOG_NORMAL, 1}, {"hedit", do_hedit, POS_DEAD, 0, LOG_NORMAL, 1}, // Player home stuff --Landren { "house",do_house, POS_RESTING, 0, LOG_NORMAL, 1 }, { "objbuy",do_objbuy, POS_RESTING, 0, LOG_NORMAL, 1 }, { "mobbuy",do_mobbuy, POS_RESTING, 0, LOG_NORMAL, 1 }, { "hdesc",do_hdesc, POS_RESTING, 0, LOG_NORMAL, 1 }, { "invite",do_invite, POS_RESTING, 0, LOG_NORMAL, 1 }, { "home",do_home, POS_RESTING, 0, LOG_NORMAL, 1 }, { "join",do_join, POS_RESTING, 0, LOG_NORMAL, 1 }, { "hname",do_hname, POS_RESTING, 0, LOG_NORMAL, 1 }, /* * End of list. */ {"", 0, POS_DEAD, 0, LOG_NORMAL, 0} }; /* * The main entry point for executing commands. * Can be recursively called from 'at', 'order', 'force'. */ void interpret (CHAR_DATA * ch, char *argument) { char buf[MAX_STRING_LENGTH]; char command[MAX_INPUT_LENGTH]; char logline[MAX_INPUT_LENGTH]; int cmd; int trust; bool found; /* * Strip leading spaces. */ while (isspace (*argument)) argument++; if (argument[0] == '\0') return; /* * No hiding. */ REMOVE_BIT (ch->affected_by, AFF_HIDE); /* * Implement freeze command. */ if (!IS_NPC (ch) && IS_SET (ch->act, PLR_FREEZE)) { send_to_char ("You're totally frozen!\n\r", ch); return; } /* * Grab the command word. * Special parsing so ' can be a command, * also no spaces needed after punctuation. */ strcpy (logline, argument); if (!isalpha (argument[0]) && !isdigit (argument[0])) { command[0] = argument[0]; command[1] = '\0'; argument++; while (isspace (*argument)) argument++; } else { argument = one_argument (argument, command); } /* * Look for command in command table. */ found = FALSE; trust = get_trust (ch); for (cmd = 0; cmd_table[cmd].name[0] != '\0'; cmd++) { if (command[0] == cmd_table[cmd].name[0] && !str_prefix (command, cmd_table[cmd].name) && cmd_table[cmd].level <= trust) { found = TRUE; break; } } /* * Log and snoop. */ smash_dollar(logline); if (cmd_table[cmd].log == LOG_NEVER) strcpy (logline, ""); /* Replaced original block of code with fix from Edwin * to prevent crashes due to dollar signs in logstrings. * I threw in the above call to smash_dollar() just for * the sake of overkill :) JR -- 10/15/00 */ if ( ( !IS_NPC(ch) && IS_SET(ch->act, PLR_LOG) ) || fLogAll || cmd_table[cmd].log == LOG_ALWAYS ) { char s[2*MAX_INPUT_LENGTH],*ps; int i; ps=s; sprintf( log_buf, "Log %s: %s", ch->name, logline ); /* Make sure that was is displayed is what is typed */ for (i=0;log_buf[i];i++) { *ps++=log_buf[i]; if (log_buf[i]=='$') *ps++='$'; if (log_buf[i]=='{') *ps++='{'; } *ps=0; wiznet(s,ch,NULL,WIZ_SECURE,0,get_trust(ch)); log_string( log_buf ); } if (ch->desc != NULL && ch->desc->snoop_by != NULL) { write_to_buffer (ch->desc->snoop_by, "% ", 2); write_to_buffer (ch->desc->snoop_by, logline, 0); write_to_buffer (ch->desc->snoop_by, "\n\r", 2); } if (!found) { if(is_exact_name(command, "stop")) { if(ch->casting_spell) { free_cast(ch); send_to_char("You stop casting your spell.\n\r",ch); return; } else { free_cast(ch); // Just incase there was a problem! send_to_char("But your not casting anything!\n\r",ch); return; } } /* * Look for command in socials table. */ if (!check_social (ch, command, argument)) { sprintf( buf,"{R%s{x is not a recognized command please type 'commands' to list them.\n\r",command ); send_to_char (buf, ch); } else socials_today++; return; sprintf( buf,"{R%s{x is not a recognized command please type 'commands' to list them.\n\r",command ); send_to_char (buf, ch); return; } commands_today++; /* * Character not in position for command? */ if (ch->position < cmd_table[cmd].position) { switch (ch->position) { case POS_DEAD: send_to_char ("Lie still; you are DEAD.\n\r", ch); break; case POS_MORTAL: case POS_INCAP: send_to_char ("You are hurt far too bad for that.\n\r", ch); break; case POS_STUNNED: send_to_char ("You are too stunned to do that.\n\r", ch); break; case POS_SLEEPING: send_to_char ("In your dreams, or what?\n\r", ch); break; case POS_RESTING: send_to_char ("Nah... You feel too relaxed...\n\r", ch); break; case POS_SITTING: send_to_char ("Better stand up first.\n\r", ch); break; case POS_FIGHTING: send_to_char ("No way! You are still fighting!\n\r", ch); break; } return; } /* if(ch->casting_spell && cmd_table[cmd].position == POS_FIGHTING ) { if(!is_exact_name(cmd_table[cmd].name, "cast")) { send_to_char("You are casting a spell, you cannot do anything but 'STOP' (Type stop to cancel spell-casting)\n\r",ch); return; } return; } */ /* * Dispatch the command. */ (*cmd_table[cmd].do_fun) (ch, argument); tail_chain (); return; } /* function to keep argument safe in all commands -- no static strings */ void do_function (CHAR_DATA * ch, DO_FUN * do_fun, char *argument) { char *command_string; /* copy the string */ command_string = str_dup (argument); /* dispatch the command */ (*do_fun) (ch, command_string); /* free the string */ free_string (command_string); } bool check_social (CHAR_DATA * ch, char *command, char *argument) { char arg[MAX_INPUT_LENGTH]; CHAR_DATA *victim; int cmd; bool found; found = FALSE; for (cmd = 0; social_table[cmd].name[0] != '\0'; cmd++) { if (command[0] == social_table[cmd].name[0] && !str_prefix (command, social_table[cmd].name)) { found = TRUE; break; } } if (!found) return FALSE; if (!IS_NPC (ch) && IS_SET (ch->comm, COMM_NOEMOTE)) { send_to_char ("You are anti-social!\n\r", ch); return TRUE; } switch (ch->position) { case POS_DEAD: send_to_char ("Lie still; you are DEAD.\n\r", ch); return TRUE; case POS_INCAP: case POS_MORTAL: send_to_char ("You are hurt far too bad for that.\n\r", ch); return TRUE; case POS_STUNNED: send_to_char ("You are too stunned to do that.\n\r", ch); return TRUE; case POS_SLEEPING: /* * I just know this is the path to a 12" 'if' statement. :( * But two players asked for it already! -- Furey */ if (!str_cmp (social_table[cmd].name, "snore")) break; send_to_char ("In your dreams, or what?\n\r", ch); return TRUE; } one_argument (argument, arg); victim = NULL; if (arg[0] == '\0') { act (social_table[cmd].others_no_arg, ch, NULL, victim, TO_ROOM); act (social_table[cmd].char_no_arg, ch, NULL, victim, TO_CHAR); } else if ((victim = get_char_room (ch, arg)) == NULL) { send_to_char ("They aren't here.\n\r", ch); } else if (victim == ch) { act (social_table[cmd].others_auto, ch, NULL, victim, TO_ROOM); act (social_table[cmd].char_auto, ch, NULL, victim, TO_CHAR); } else { act (social_table[cmd].others_found, ch, NULL, victim, TO_NOTVICT); act (social_table[cmd].char_found, ch, NULL, victim, TO_CHAR); act (social_table[cmd].vict_found, ch, NULL, victim, TO_VICT); if (!IS_NPC (ch) && IS_NPC (victim) && !IS_AFFECTED (victim, AFF_CHARM) && IS_AWAKE (victim) && victim->desc == NULL) { switch (number_bits (4)) { case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: case 8: act (social_table[cmd].others_found, victim, NULL, ch, TO_NOTVICT); act (social_table[cmd].char_found, victim, NULL, ch, TO_CHAR); act (social_table[cmd].vict_found, victim, NULL, ch, TO_VICT); break; case 9: case 10: case 11: case 12: act ("$n slaps $N.", victim, NULL, ch, TO_NOTVICT); act ("You slap $N.", victim, NULL, ch, TO_CHAR); act ("$n slaps you.", victim, NULL, ch, TO_VICT); break; } } } return TRUE; } /* * Return true if an argument is completely numeric. */ bool is_number (char *arg) { if (*arg == '\0') return FALSE; if (*arg == '+' || *arg == '-') arg++; for (; *arg != '\0'; arg++) { if (!isdigit (*arg)) return FALSE; } return TRUE; } /* * Given a string like 14.foo, return 14 and 'foo' */ int number_argument (char *argument, char *arg) { char *pdot; int number; for (pdot = argument; *pdot != '\0'; pdot++) { if (*pdot == '.') { *pdot = '\0'; number = atoi (argument); *pdot = '.'; strcpy (arg, pdot + 1); return number; } } strcpy (arg, argument); return 1; } /* * Given a string like 14*foo, return 14 and 'foo' */ int mult_argument (char *argument, char *arg) { char *pdot; int number; for (pdot = argument; *pdot != '\0'; pdot++) { if (*pdot == '*') { *pdot = '\0'; number = atoi (argument); *pdot = '*'; strcpy (arg, pdot + 1); return number; } } strcpy (arg, argument); return 1; } /* * Pick off one argument from a string and return the rest. * Understands quotes. */ char *one_argument (char *argument, char *arg_first) { char cEnd; while (isspace (*argument)) argument++; cEnd = ' '; if (*argument == '\'' || *argument == '"') cEnd = *argument++; while (*argument != '\0') { if (*argument == cEnd) { argument++; break; } *arg_first = LOWER (*argument); arg_first++; argument++; } *arg_first = '\0'; while (isspace (*argument)) argument++; return argument; } /* * Contributed by Alander. */ void do_commands (CHAR_DATA * ch, char *argument) { char buf[MAX_STRING_LENGTH]; int cmd; int col; col = 0; for (cmd = 0; cmd_table[cmd].name[0] != '\0'; cmd++) { if (cmd_table[cmd].level < LEVEL_HERO && cmd_table[cmd].level <= get_trust (ch) && cmd_table[cmd].show) { sprintf (buf, "%-12s", cmd_table[cmd].name); send_to_char (buf, ch); if (++col % 6 == 0) send_to_char ("\n\r", ch); } } if (col % 6 != 0) send_to_char ("\n\r", ch); return; } void do_wizhelp (CHAR_DATA * ch, char *argument) { char buf[MAX_STRING_LENGTH]; int cmd; int col; col = 0; for (cmd = 0; cmd_table[cmd].name[0] != '\0'; cmd++) { if (cmd_table[cmd].level >= LEVEL_HERO && cmd_table[cmd].level <= get_trust (ch) && cmd_table[cmd].show) { sprintf (buf, "%-12s", cmd_table[cmd].name); send_to_char (buf, ch); if (++col % 6 == 0) send_to_char ("\n\r", ch); } } if (col % 6 != 0) send_to_char ("\n\r", ch); return; }