/************************************************************************** * Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, * * Michael Seifert, Hans Henrik St{rfeldt, 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; /* * Command table. */ 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. */ { "cast", do_cast, POS_FIGHTING, 0, LOG_ALWAYS, 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 }, { "group", do_group, POS_SLEEPING, 0, LOG_NORMAL, 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 }, { "music", do_music, 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 }, { "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 }, { "wake", do_wake, POS_SLEEPING, 0, LOG_NORMAL, 1 }, /* { "wield", do_wear, POS_RESTING, 0, LOG_NORMAL, 1 }, */ { "right", do_right, POS_RESTING, 0, LOG_NORMAL, 1 }, { "left", do_left, POS_RESTING, 0, LOG_NORMAL, 1 }, { "drag", do_drag, POS_STANDING, 0, LOG_NORMAL, 1 }, { "push", do_push, POS_STANDING, 0, LOG_NORMAL, 1 }, { "block", do_block, POS_STANDING, 0, LOG_NORMAL, 1 }, { "quest", do_quest, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "mount", do_mount, POS_STANDING, 0, LOG_NORMAL, 1 }, { "dismount", do_dismount, POS_STANDING, 0, LOG_NORMAL, 1 }, /* * Informational commands. */ { "acredits", do_acredits, POS_DEAD, 0, LOG_NORMAL, 1 }, { "affects", do_affects, POS_DEAD, 0, LOG_NORMAL, 1 }, { "areas", do_areas, POS_DEAD, 0, LOG_NORMAL, 1 }, { "arealink", do_arealinks, POS_DEAD, L7, LOG_NORMAL, 1 }, { "bug", do_bug, POS_DEAD, 0, LOG_NORMAL, 1 }, { "changes", do_changes, POS_DEAD, 0, LOG_NORMAL, 1 }, { "commands", do_commands, POS_DEAD, 0, LOG_NORMAL, 1 }, { "compare", do_compare, POS_RESTING, 0, LOG_NORMAL, 1 }, { "consider", do_consider, POS_RESTING, 0, LOG_NORMAL, 1 }, { "count", do_count, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "credits", do_credits, POS_DEAD, 0, LOG_NORMAL, 1 }, { "dice", do_dice, POS_RESTING, 0, LOG_NORMAL, 1 }, { "equipment", do_equipment, POS_DEAD, 0, LOG_NORMAL, 1 }, { "examine", do_examine, POS_RESTING, 0, LOG_NORMAL, 1 }, { "finger", do_finger, POS_SLEEPING, 0, LOG_ALWAYS, 1 }, /* { "groups", do_groups, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ { "help", do_help, POS_DEAD, 0, LOG_NORMAL, 1 }, { "idea", do_idea, POS_DEAD, 0, LOG_NORMAL, 1 }, { "info", do_groups, POS_SLEEPING, 0, LOG_NORMAL, 1 }, /* { "map" do_map, POS_RESTING, 0, LOG_NORMAL, 1 },*/ { "motd", do_motd, POS_DEAD, 0, LOG_NORMAL, 1 }, { "news", do_news, 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 }, { "scan", do_scan, POS_RESTING, 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 }, { "war", do_war, 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 }, { "bwho", do_bwho, POS_DEAD, 0, LOG_NORMAL, 1 }, { "ahours", do_ahours, 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 }, { "autoassist", do_autoassist, POS_DEAD, 0, LOG_NORMAL, 1 }, { "autodamage", do_autodamage, 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 }, { "allauto", do_allauto, POS_DEAD, 0, LOG_NORMAL, 1 }, { "brief", do_brief, 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 }, { "title", do_title, POS_DEAD, 0, LOG_NORMAL, 1 }, { "unalias", do_unalias, POS_DEAD, 0, LOG_NORMAL, 1 }, { "clanwho", do_whoclan, POS_DEAD, 0, LOG_NORMAL, 1 }, { "wimpy", do_wimpy, POS_DEAD, 0, LOG_NORMAL, 1 }, /* * Communication commands. */ { "afk", do_afk, POS_SLEEPING, 0, LOG_NORMAL, 1 }, /* { "iaw", do_iaw, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ /* { "auction", do_auction, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ { "beep", do_beep, POS_DEAD, 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_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 }, { "history", do_history, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "ic", do_ic, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "icaction", do_icaction, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "ic2", do_ic2, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "icaction2", do_icaction2, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "ica2", do_icaction2, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "lsay", do_lsay, POS_RESTING, 0, LOG_NORMAL, 1 }, /* { "music", do_music, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ { "osay", do_osay, POS_RESTING, 0, LOG_NORMAL, 1 }, { "note", do_note, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { ".", do_ooc, POS_SLEEPING, 0, LOG_NORMAL, 0 }, { "ooc", do_ooc, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "pose", do_pose, POS_RESTING, 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, 2, LOG_NORMAL, 1 }, */ { "smote", do_smote, POS_RESTING, 0, LOG_NORMAL, 1 }, { "unread", do_unread, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "yell", do_yell, POS_RESTING, 0, LOG_NORMAL, 1 }, { "pray", do_pray, POS_SLEEPING, 0, LOG_NORMAL, 1 }, { "rp", do_rp, POS_RESTING, 0, LOG_NEVER, 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 }, { "surge", do_surge, POS_RESTING, 0, LOG_NORMAL, 1 }, { "layhands", do_layhands, POS_RESTING, 0, LOG_NORMAL, 1 }, /* * Combat commands. */ { "backstab", do_backstab, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "bash", do_bash, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "blackjack", do_blackjack, POS_STANDING, 0, LOG_NORMAL, 0 }, { "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_ALWAYS, 1 }, { "dirt", do_dirt, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "disarm", do_disarm, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "engage", do_engage, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "flee", do_flee, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "kick", do_kick, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "rescue", do_rescue, POS_FIGHTING, 0, LOG_NORMAL, 0 }, { "sap", do_sap, POS_STANDING, 0, LOG_NORMAL, 0 }, { "swordthrust", do_thrust, POS_FIGHTING, 0, LOG_NORMAL, 0 }, { "lunge", do_lunge, POS_FIGHTING, 0, LOG_NORMAL, 0 }, { "finesse", do_finesse, POS_FIGHTING, 0, LOG_NORMAL, 0 }, { "surrender", do_surrender, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "trip", do_trip, POS_FIGHTING, 0, LOG_NORMAL, 1 }, { "blur", do_blur, POS_STANDING, 0, LOG_ALWAYS, 1 }, /* * Mob command interpreter (placed here for faster scan...) */ { "mob", do_mob, POS_DEAD, 0, LOG_NEVER, 0 }, /* * Miscellaneous commands. */ /* { "bank", do_bank, POS_STANDING, 0, LOG_NORMAL, 1 }, */ { "brew", do_brew, POS_STANDING, 0, LOG_ALWAYS, 1 }, { "craps", do_craps, POS_STANDING, 0, LOG_NORMAL, 1 }, { "safe", do_safe, POS_STANDING, 0, LOG_NORMAL, 1 }, { "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 }, { "play", do_play, 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 }, { "remor", do_remor, POS_STANDING, 0, LOG_NORMAL, 0 }, { "remort", do_remort, POS_STANDING, 0, LOG_ALWAYS, 1 }, { "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 }, { "track", do_hunt, POS_RESTING, 0, LOG_NORMAL, 1 }, { "visible", do_visible, POS_SLEEPING, 0, LOG_NORMAL, 1 }, /* { "wake", do_wake, POS_SLEEPING, 0, LOG_NORMAL, 1 }, */ { "school", do_school, POS_STANDING, 0, LOG_NORMAL, 1 }, { "scribe", do_scribe, POS_STANDING, 0, LOG_ALWAYS, 1 }, { "bounty", do_bounty, POS_RESTING, 0, LOG_NORMAL, 1 }, { "skin", do_skin, POS_STANDING, 0, LOG_ALWAYS, 1 }, /* * Immortal commands. */ /* * Level 102 */ { "namewizi", do_wiziname, POS_DEAD, IM, LOG_NORMAL, 1 }, { "staff", do_staff, POS_DEAD, IM, LOG_NORMAL, 1 }, { "goto", do_goto, POS_DEAD, IM, LOG_NORMAL, 1 }, { "holylight", do_holylight, POS_DEAD, IM, LOG_NORMAL, 1 }, { "iaw", do_iaw, POS_DEAD, IM, LOG_NORMAL, 1 }, { "immtalk", do_immtalk, POS_DEAD, IM, LOG_NORMAL, 1 }, { ":", do_immtalk, POS_DEAD, IM, LOG_NORMAL, 0 }, { "imotd", do_imotd, POS_DEAD, IM, LOG_NORMAL, 1 }, { "incognito", do_incognito, POS_DEAD, IM, LOG_NORMAL, 1 }, { "invis", do_invis, POS_DEAD, IM, LOG_NORMAL, 0 }, { "mpdump", do_mpdump, POS_DEAD, IM, LOG_NEVER, 1 }, { "mpstat", do_mpstat, POS_DEAD, IM, LOG_NEVER, 1 }, { "mlevel", do_mlevel, POS_DEAD, IM, LOG_NORMAL, 1 }, { "mudstatus", do_mudstatus, POS_DEAD, IM, LOG_NORMAL, 1 }, { "mwhere", do_mwhere, POS_DEAD, IM, LOG_NORMAL, 1 }, { "olevel", do_olevel, POS_DEAD, IM, LOG_NORMAL, 1 }, { "owhere", do_owhere, POS_DEAD, IM, LOG_NORMAL, 1 }, { "pk", do_pk, POS_DEAD, IM, LOG_NORMAL, 1 }, { "prefi", do_prefi, POS_DEAD, IM, LOG_NORMAL, 0 }, { "poofin", do_bamfin, POS_DEAD, IM, LOG_NORMAL, 1 }, { "poofout", do_bamfout, POS_DEAD, IM, LOG_NORMAL, 1 }, { "prefix", do_prefix, POS_DEAD, IM, LOG_NORMAL, 1 }, { "pretitle", do_pretitle, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "purge", do_purge, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "return", do_return, POS_DEAD, IM, LOG_NORMAL, 1 }, { "smite", do_smite, POS_DEAD, IM, LOG_ALWAYS, 1 }, /* { "smote", do_smote, POS_DEAD, IM, LOG_NORMAL, 1 }, */ { "stat", do_stat, POS_DEAD, IM, LOG_NORMAL, 1 }, { "string", do_string, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "unreply", do_unreply, POS_DEAD, IM, LOG_NORMAL, 1 }, { "vnum", do_vnum, POS_DEAD, IM, LOG_NORMAL, 1 }, { "whotext", do_whotext, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "wizhelp", do_wizhelp, POS_DEAD, IM, LOG_NORMAL, 1 }, { "wizinvis", do_invis, POS_DEAD, IM, LOG_NORMAL, 1 }, { "wiznet", do_wiznet, POS_DEAD, IM, LOG_NORMAL, 1 }, { "switch", do_switch, POS_DEAD, IM, LOG_NORMAL, 1 }, /* * Level 103 */ { "force", do_force, POS_DEAD, L7, LOG_ALWAYS, 1 }, { "penalty", do_penalty, POS_DEAD, L7, LOG_NORMAL, 1 }, { "arealink", do_arealinks, POS_DEAD, L7, LOG_NORMAL, 1 }, /* * Level 104 */ { "at", do_at, POS_DEAD, L6, LOG_NORMAL, 1 }, { "unlink", do_unlink, POS_DEAD, L6, LOG_NORMAL, 1 }, { "echo", do_recho, POS_DEAD, L6, LOG_ALWAYS, 1 }, { "omni", do_omni, POS_DEAD, L6, LOG_NORMAL, 1 }, { "peace", do_peace, POS_DEAD, L6, LOG_NORMAL, 1 }, { "plist", do_plist, POS_DEAD, L6, LOG_NORMAL, 1 }, { "wpeace", do_wpeace, POS_DEAD, L6, LOG_NORMAL, 1 }, /* { "switch", do_switch, POS_DEAD, L6, LOG_ALWAYS, 1 }, */ /* { "return", do_return, POS_DEAD, L6, LOG_NORMAL, 1 }, */ { "restore", do_restore, POS_DEAD, L6, LOG_ALWAYS, 1 }, /* * Level 105 */ { "otype", do_otype, POS_DEAD, L5, LOG_ALWAYS, 1 }, { "flag", do_flag, POS_DEAD, L5, LOG_ALWAYS, 1 }, { "freeze", do_freeze, POS_DEAD, L5, LOG_ALWAYS, 1 }, { "home", do_home, POS_DEAD, L5, LOG_ALWAYS, 1 }, { "roomwizi", do_roomwiz, POS_DEAD, L5, LOG_NORMAL, 1 }, { "teleport", do_transfer, POS_DEAD, L5, LOG_ALWAYS, 1 }, { "transfer", do_transfer, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "transin", do_transin, POS_DEAD, IM, LOG_NORMAL, 1 }, { "transout", do_transout, POS_DEAD, IM, LOG_NORMAL, 1 }, /* * Level 106 */ { "ban", do_ban, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "castall", do_castall, POS_DEAD, L4, LOG_NORMAL, 0 }, { "clone", do_clone, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "deny", do_deny, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "giveall", do_giveall, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "gecho", do_echo, POS_DEAD, L5, LOG_ALWAYS, 1 }, { "guild", do_guild, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "load", do_load, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "multi", do_multi, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "nochannels", do_nochannels, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "noemote", do_noemote, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "noexp", do_noexp, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "nonote", do_nonote, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "noshout", do_noshout, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "notell", do_notell, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "notitle", do_notitle, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "pardon", do_pardon, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "pecho", do_pecho, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "rename", do_rename, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "sockets", do_sockets, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "zecho", do_zecho, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "clearquest", do_clearquest, POS_DEAD, L4, LOG_ALWAYS, 1 }, { "sedit", do_sedit, POS_DEAD, L4, LOG_NORMAL, 1 }, /* * Level 107 */ { "bonus", do_bonus, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "disconnect", do_disconnect, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "newlock", do_newlock, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "wizlock", do_wizlock, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "sla", do_sla, POS_DEAD, L3, LOG_NORMAL, 0 }, { "slay", do_slay, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "slip", do_slip, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "snoop", do_snoop, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "rlink", do_rlink, POS_DEAD, L3, LOG_ALWAYS, 1 }, { "arset", do_arset, POS_DEAD, L3, LOG_ALWAYS, 1 }, /* * Level 108 */ { "grab", do_grab, POS_DEAD, L2, LOG_ALWAYS, 1 }, { "badname", do_illegalname, POS_DEAD, L2, LOG_ALWAYS, 1 }, { "set", do_set, POS_DEAD, L2, LOG_ALWAYS, 1 }, { "log", do_log, POS_DEAD, L2, LOG_ALWAYS, 1 }, { "memory", do_memory, POS_DEAD, L2, LOG_NORMAL, 1 }, { "aedit", do_aedit, POS_DEAD, L2, LOG_NORMAL, 1 }, /* * Level 109 */ { "permban", do_permban, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "copyove", do_copyove, POS_DEAD, L1, LOG_NEVER, 0 }, { "copyover", do_copyover, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "dump", do_dump, POS_DEAD, L1, LOG_ALWAYS, 0 }, { "skillset", do_skillset, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "showskills", do_showskills, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "showspells", do_showspells, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "nuke", do_nuke, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "protect", do_protect, POS_DEAD, L1, LOG_ALWAYS, 1 }, { "violate", do_violate, POS_DEAD, L1, LOG_ALWAYS, 1 }, /* * Level 110 */ { "allow", do_allow, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "addapply", do_addapply, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "addlag", do_addlag, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "advance", do_advance, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "disable", do_disable, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "grant", do_grant, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "pload", do_pload, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "punload", do_punload, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "reboo", do_reboo, POS_DEAD, ML, LOG_NORMAL, 0 }, { "reboot", do_reboot, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "shutdow", do_shutdow, POS_DEAD, ML, LOG_NORMAL, 0 }, { "shutdown", do_shutdown, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "trust", do_trust, POS_DEAD, ML, LOG_ALWAYS, 1 }, { "undelete", do_undelete, POS_DEAD, ML, LOG_ALWAYS, 1 }, /* * OLC */ { "edit", do_olc, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "asave", do_asave, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "alist", do_alist, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "resets", do_resets, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "redit", do_redit, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "medit", do_medit, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "oedit", do_oedit, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "mpedit", do_mpedit, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "hedit", do_hedit, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "mlist", do_mlist, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "rlist", do_rlist, POS_DEAD, IM, LOG_ALWAYS, 1 }, { "olist", do_olist, POS_DEAD, IM, LOG_ALWAYS, 1 }, /* * Clan commands */ { "petition", do_petition, POS_SLEEPING, 15, LOG_NORMAL, 1 }, { "clancmd", do_clancmd, POS_RESTING, 15, LOG_NORMAL, 1 }, /* * Placed here to prevent command conflicts */ { "bank", do_bank, POS_STANDING, 0, LOG_NORMAL, 1 }, /* * Marriage Functions. */ { "marry", do_marry, POS_DEAD, IM, LOG_ALWAYS, 1}, { "divorce", do_divorce, POS_DEAD, IM, LOG_ALWAYS, 1}, { "spousetalk", do_spousetalk, POS_SLEEPING, 1, LOG_NEVER, 1}, { "consent", do_consent, POS_RESTING, 1, 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 command[MAX_INPUT_LENGTH]; char logline[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; int cmd; int trust; bool found; char *allgrant; char onegrant[MAX_STRING_LENGTH]; /* * 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 ) ) { /* if(IS_NPC(ch) && ch->desc == NULL) allgrant = ch->desc->original->grant; else */ allgrant = ch->grant; while( allgrant != NULL ) { allgrant = one_argument( allgrant, onegrant ); if( !str_prefix( cmd_table[cmd].name, onegrant ) ) { found = TRUE; break; } sprintf( buf, "%s", allgrant ); if( buf[0] == '\0' ) break; } if( cmd_table[cmd].level <= get_trust( ch ) ) { found = TRUE; break; } if( found ) break; } } /* * Log and snoop. */ if ( cmd_table[cmd].log == LOG_NEVER ) strcpy( logline, "" ); if ( ( !IS_NPC(ch) && IS_SET(ch->act, PLR_LOG) ) || fLogAll || cmd_table[cmd].log == LOG_ALWAYS ) { sprintf( log_buf, "Log %s: %s", ch->name, logline ); wiznet(log_buf,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(!str_prefix(command, cmd_table[cmd].name) && cmd_table[cmd].disabled) { send_to_char("That command has been temporarily disabled.\n\r", ch); return; } if ( !found ) { /* * Look for command in socials table. */ if ( !check_social( ch, command, argument ) ) send_to_char( "Huh?\n\r", ch ); return; } /* * Character not in position for command? */ if ( ch->position < cmd_table[cmd].position ) { switch( ch->position ) { case POS_DEAD: send_to_char( "{RLie still; you are DEAD{x.\n\r", ch ); break; case POS_MORTAL: case POS_INCAP: send_to_char( "{DYou are hurt far too bad for that{x.\n\r", ch ); break; case POS_STUNNED: send_to_char( "{DYou are too stunned to do that.\n\r{x", 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; } /* * 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( "{RLie still; you are DEAD{x.\n\r", ch ); return TRUE; case POS_INCAP: case POS_MORTAL: send_to_char( "{DYou are hurt far too bad for that{x.\n\r", ch ); return TRUE; case POS_STUNNED: send_to_char( "{DYou are too stunned to do that{x.\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; int clevel; col = 0; for(clevel=MAX_LEVEL;clevel>0;clevel--) { switch(clevel) { case ML: if(ch->level == MAX_LEVEL) { send_to_char("\n\r{R-{r-{GLevel 110{r-{R-{x\n\r",ch); } break; case L1: if(ch->level >= MAX_LEVEL-1) { send_to_char("\n\r{R-{r-{GLevel 109{r-{R-{x\n\r",ch); } break; case L2: if(ch->level >= MAX_LEVEL-2) { send_to_char("\n\r{R-{r-{GLevel 108{r-{R-{x\n\r",ch); } break; case L3: if(ch->level >= MAX_LEVEL-3) { send_to_char("\n\r{R-{r-{GLevel 107{r-{R-{x\n\r",ch); } break; case L4: if(ch->level >= MAX_LEVEL-4) { send_to_char("\n\r{R-{r-{GLevel 106{r-{R-{x\n\r",ch); } break; case L5: if(ch->level >= MAX_LEVEL-5) { send_to_char("\n\r{R-{r-{GLevel 105{r-{R-{x\n\r",ch); } break; case L6: if(ch->level >= MAX_LEVEL-6) { send_to_char("\n\r{R-{r-{GLevel 104{r-{R-{x\n\r",ch); } break; case L7: if(ch->level >= MAX_LEVEL-7) { send_to_char("\n\r{R-{r-{GLevel 103{r-{R-{x\n\r",ch); } break; case L8: if(ch->level >= MAX_LEVEL-8) { send_to_char("\n\r{R-{r-{GLevel 102{r-{R-{x\n\r",ch); } break; } 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 && cmd_table[cmd].level == clevel) { sprintf( buf, "{c[{y%d{c] %-12s{x", cmd_table[cmd].level, cmd_table[cmd].name ); send_to_char( buf, ch ); if ( ++col % 4 == 0 ) send_to_char( "\n\r", ch ); } } } /* 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, "{c[{y%d{c] %-12s{x", cmd_table[cmd].level, cmd_table[cmd].name ); send_to_char( buf, ch ); if ( ++col % 4 == 0 ) send_to_char( "\n\r", ch ); } } */ if ( col % 4 != 0 ) send_to_char( "\n\r", ch ); return; }