nanny.c File Reference

#include <sys/types.h>
#include <sys/time.h>
#include <ctype.h>
#include <errno.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <unistd.h>
#include <stdarg.h>
#include "merc.h"
#include "interp.h"
#include "recycle.h"
#include "tables.h"

Include dependency graph for nanny.c:

Go to the source code of this file.

Functions
bool check_playing	args ((DESCRIPTOR_DATA *d, char *name))
bool check_reconnect	args ((DESCRIPTOR_DATA *d, char *name, bool fConn))
bool check_parse_name	args ((char *name))
void	nanny (DESCRIPTOR_DATA *d, char *argument)
Variables
time_t	current_time
DESCRIPTOR_DATA *	d_next
DESCRIPTOR_DATA *	descriptor_list
FILE *	fpReserve
bool	god
bool	merc_down
bool	newlock
char	str_boot_time [MAX_INPUT_LENGTH]
bool	wizlock

---

Function Documentation

bool check_playing args (  (DESCRIPTOR_DATA *d, char *name)   )

bool check_reconnect args (  (DESCRIPTOR_DATA *d, char *name, bool fConn)   )

bool check_parse_name args (  (char *name)   )

void nanny (  DESCRIPTOR_DATA *  d, char *  argument )

Definition at line 115 of file nanny.c. References act, char_data::act, race_type::aff, class_type::attr_prime, BAN_NEWBIES, BAN_PERMIT, class_type::base_group, bug(), char_list, char_to_room(), descriptor_data::character, check_ban(), check_parse_name(), check_playing(), check_reconnect(), class_lookup(), class_table, close_socket(), COMM_TELNET_GA, CON_ANSI, CON_BREAK_CONNECT, CON_CONFIRM_BODY_TYPE, CON_CONFIRM_EYES, CON_CONFIRM_FACIAL_HAIR, CON_CONFIRM_HAIR_COLOR, CON_CONFIRM_HAIR_LENGTH, CON_CONFIRM_HAIR_TYPE, CON_CONFIRM_NEW_NAME, CON_CONFIRM_NEW_PASSWORD, CON_DEFAULT_CHOICE, CON_GEN_GROUPS, CON_GET_ALIGNMENT, CON_GET_BODY_TYPE, CON_GET_EYE_COLOR, CON_GET_FACIAL_HAIR, CON_GET_HAIR_COLOR, CON_GET_HAIR_LENGTH, CON_GET_HAIR_TYPE, CON_GET_NAME, CON_GET_NEW_CLASS, CON_GET_NEW_PASSWORD, CON_GET_NEW_RACE, CON_GET_NEW_SEX, CON_GET_OLD_PASSWORD, CON_PICK_WEAPON, CON_PLAYING, CON_READ_IMOTD, CON_READ_MOTD, CON_SHOW_LOGIN, d_next, class_type::default_group, descriptor_list, do_function(), do_help(), do_look(), do_outfit(), do_skills(), do_unread(), char_data::exp, exp_per_level(), FALSE, race_type::form, free_char(), free_gen_data(), free_string(), get_room_index(), get_trust(), group_add(), weapon_type::gsn, gsn_recall, help_greeting, char_data::hit, race_type::imm, IS_IMMORTAL, IS_SET, char_data::level, list_group_costs(), load_char_obj(), log_buf, log_string(), char_data::mana, MAX_CLASS, char_data::max_hit, MAX_INPUT_LENGTH, char_data::max_mana, char_data::max_move, MAX_STATS, MAX_STRING_LENGTH, char_data::move, mud_ansicolor, mud_telnetga, race_type::name, char_data::name, new_gen_data(), newlock, gen_data::next, descriptor_data::next, one_argument(), descriptor_data::original, parse_gen_groups(), race_type::parts, pc_race_table, char_data::pcdata, char_data::perm_stat, PLR_COLOUR, PLR_DENY, PLR_PERMIT, pc_race_type::points, gen_data::points_chosen, char_data::practice, PULSE_TICK, pc_data::pwd, race_lookup(), race_table, REMOVE_BIT, race_type::res, reset_char(), ROOM_VNUM_CHAT, ROOM_VNUM_SCHOOL, ROOM_VNUM_TEMPLE, save_char_obj(), send_to_char(), send_to_desc(), SET_BIT, SEX_FEMALE, SEX_MALE, pc_race_type::size, pc_race_type::stats, str_cmp(), str_dup(), TO_ROOM, char_data::train, TRUE, UPPER, gen_data::valid, race_type::vuln, WAIT_STATE, weapon_lookup(), weapon_table, WIZ_LOGINS, WIZ_NEWBIE, WIZ_SITES, wizlock, wiznet(), and write_to_buffer(). { DESCRIPTOR_DATA *d_old, *d_next; char buf[MAX_STRING_LENGTH]; char arg[MAX_INPUT_LENGTH]; CHAR_DATA *ch; char *pwdnew; char *p; int iClass, race, i, weapon; bool fOld; extern int mud_telnetga, mud_ansicolor; /* Delete leading spaces UNLESS character is writing a note */ //if (d->connected != CON_NOTE_TEXT) // { // while ( isspace(*argument) ) // argument++; // } ch = d->character; switch (d->connected) { default: bug ("Nanny: bad d->connected %d.", d->connected); close_socket (d); return; case CON_ANSI: if (argument[0] == '\0' || UPPER (argument[0]) == 'Y') { d->ansi = TRUE; send_to_desc ("{RAnsi enabled!{x\n\r", d); //d->connected = CON_GET_NAME; d->connected = CON_SHOW_LOGIN; { extern char *help_greeting; if (help_greeting[0] == '.') send_to_desc (help_greeting + 1, d); else send_to_desc (help_greeting, d); } break; } if (UPPER (argument[0]) == 'N') { d->ansi = FALSE; send_to_desc ("Ansi disabled!\n\r", d); //d->connected = CON_GET_NAME; d->connected = CON_SHOW_LOGIN; { extern char *help_greeting; if (help_greeting[0] == '.') send_to_desc (help_greeting + 1, d); else send_to_desc (help_greeting, d); } break; } else { send_to_desc ("Do you want Colour? (Y/n) ", d); return; } case CON_SHOW_LOGIN: if (argument[0] == '\0') d->connected = CON_SHOW_LOGIN; if (UPPER (argument[0]) == 'P') { send_to_desc ("Please enter your name: ",d); d->connected = CON_GET_NAME; return; } if (UPPER (argument[0]) == 'C') { send_to_desc ("Please enter the name you wish to use: ",d); d->connected = CON_GET_NAME; return; } if (UPPER (argument[0]) == 'W') { send_to_desc ("If only the world knew...\n\r[{DHit enter to continue{x]",d); /*DESCRIPTOR_DATA *dlist; int dCol=0; char dbuf[MAX_STRING_LENGTH]; BUFFER *dBuf; dBuf = new_buf(); for (dlist = descriptor_list; dlist != NULL; dlist = dlist->next) { if (dlist->connected != CON_PLAYING || !can_see (d->character, dlist->character)) continue; sprintf(dbuf, "{W%-12s{x ", dlist->character->name); add_buf(dBuf, dbuf); if (dCol % 5 == 0) add_buf(dBuf, "\n\r"); } send_to_desc(buf_string(dBuf), d); free_buf(dBuf); */ d->connected = CON_SHOW_LOGIN; return; } if (UPPER (argument[0]) == 'Q') { send_to_desc ("Thank you for stoping by, please come back soon!!\n\r",d); //send_to_desc ("{Rone.xwin.net {Dport{g: {W4000{x\n\r",d); close_socket(d); return; } char sbuf[MAX_STRING_LENGTH]; send_to_desc ("\n\r",d); send_to_desc ("\t{D*-------|{wBeyond the shadows{D|--------*\n\r",d); send_to_desc ("\t{D| ({RP{D)lay an existing character |",d); sprintf (sbuf, "\t {D*-------|{wGame status{D|-------*{x\n\r"); send_to_desc (sbuf, d); send_to_desc ("\t{D| ({RC{D)reate a new character. |",d); sprintf (sbuf, "\t {D| {wWizlock{g: {R%-4s {D |\n\r", wizlock ? "Yes" : "No"); send_to_desc(sbuf, d); send_to_desc ("\t{D| ({RQ{D)uit |",d); sprintf (sbuf, "\t {D| {wNewlock{g: {R%-4s {D |\n\r", newlock ? "Yes" : "No"); send_to_desc(sbuf,d); send_to_desc ("\t{D| ({RW{D)ho is playing? |",d); sprintf (sbuf, "\t {D*-------|{wGame status{D|-------*{x\n\r"); send_to_desc (sbuf, d); send_to_desc ("\t{D*-------|{wBeyond the shadows{D|--------*{x\n\r",d); send_to_desc ("\n\r\n\rYour selection-> ",d); return; case CON_GET_NAME: if (argument[0] == '\0') { close_socket (d); return; } argument[0] = UPPER (argument[0]); if (!check_parse_name (argument)) { send_to_desc ("Illegal name, try another.\n\rName: ", d); return; } fOld = load_char_obj (d, argument); ch = d->character; if (IS_SET (ch->act, PLR_DENY)) { sprintf (log_buf, "Denying access to %s@%s.", argument, d->host); log_string (log_buf); send_to_desc ("You are denied access.\n\r", d); close_socket (d); return; } if (check_ban (d->host, BAN_PERMIT) && !IS_SET (ch->act, PLR_PERMIT)) { send_to_desc ("Your site has been banned from this mud.\n\r", d); close_socket (d); return; } if (check_reconnect (d, argument, FALSE)) { fOld = TRUE; } else { if (wizlock && !IS_IMMORTAL (ch)) { send_to_desc ("The game is wizlocked.\n\r", d); close_socket (d); return; } } if (fOld) { /* Old player */ send_to_desc ("Password: ", d); write_to_buffer (d, echo_off_str, 0); d->connected = CON_GET_OLD_PASSWORD; return; } else { /* New player */ if (newlock) { send_to_desc ("The game is newlocked.\n\r", d); close_socket (d); return; } if (check_ban (d->host, BAN_NEWBIES)) { send_to_desc ("New players are not allowed from your site.\n\r", 0); close_socket (d); return; } sprintf (buf, "Did I get that right, %s (Y/N)? ", argument); send_to_desc (buf, d); d->connected = CON_CONFIRM_NEW_NAME; return; } break; case CON_GET_OLD_PASSWORD: #if defined(unix) write_to_buffer (d, "\n\r", 2); #endif if (strcmp (crypt (argument, ch->pcdata->pwd), ch->pcdata->pwd)) { send_to_desc ("{*{!{RWrong password{x.\n\r", d); // close_socket (d); WAIT_STATE (d->character, PULSE_TICK); send_to_desc ("Enter the correct password:",d); return; } write_to_buffer (d, echo_on_str, 0); if (check_playing (d, ch->name)) return; if (check_reconnect (d, ch->name, TRUE)) return; sprintf (log_buf, "%s@%s has connected.", ch->name, d->host); log_string (log_buf); sprintf (log_buf, "{R%s@{c%s{x has connected.{x", ch->name, d->host); wiznet (log_buf, NULL, NULL, WIZ_SITES, 0, get_trust (ch)); if (ch->desc->ansi) SET_BIT (ch->act, PLR_COLOUR); else REMOVE_BIT (ch->act, PLR_COLOUR); if (IS_IMMORTAL (ch)) { do_function (ch, &do_help, "imotd"); d->connected = CON_READ_IMOTD; } else { do_function (ch, &do_help, "motd"); d->connected = CON_READ_MOTD; } break; /* RT code for breaking link */ case CON_BREAK_CONNECT: switch (*argument) { case 'y': case 'Y': for (d_old = descriptor_list; d_old != NULL; d_old = d_next) { d_next = d_old->next; if (d_old == d || d_old->character == NULL) continue; if (str_cmp (ch->name, d_old->original ? d_old->original->name : d_old-> character->name)) continue; close_socket (d_old); } if (check_reconnect (d, ch->name, TRUE)) return; send_to_desc ("Reconnect attempt failed.\n\rName: ", d); if (d->character != NULL) { free_char (d->character); d->character = NULL; } d->connected = CON_GET_NAME; break; case 'n': case 'N': send_to_desc ("Name: ", d); if (d->character != NULL) { free_char (d->character); d->character = NULL; } d->connected = CON_GET_NAME; break; default: send_to_desc ("Please type Y or N? ", d); break; } break; case CON_CONFIRM_NEW_NAME: switch (*argument) { case 'y': case 'Y': sprintf (buf, "New character.\n\rGive me a password for %s: %s", ch->name, echo_off_str); send_to_desc (buf, d); d->connected = CON_GET_NEW_PASSWORD; if (ch->desc->ansi) SET_BIT (ch->act, PLR_COLOUR); break; case 'n': case 'N': send_to_desc ("Ok, what IS it, then? ", d); free_char (d->character); d->character = NULL; d->connected = CON_GET_NAME; break; default: send_to_desc ("Please type Yes or No? ", d); break; } break; case CON_GET_NEW_PASSWORD: #if defined(unix) write_to_buffer (d, "\n\r", 2); #endif if (strlen (argument) < 5) { send_to_desc ("Password must be at least five characters long.\n\rPassword: ", d); return; } pwdnew = crypt (argument, ch->name); for (p = pwdnew; *p != '\0'; p++) { if (*p == '~') { send_to_desc ("New password not acceptable, try again.\n\rPassword: ", d); return; } } free_string (ch->pcdata->pwd); ch->pcdata->pwd = str_dup (pwdnew); send_to_desc ("Please retype password: ", d); d->connected = CON_CONFIRM_NEW_PASSWORD; break; case CON_CONFIRM_NEW_PASSWORD: #if defined(unix) write_to_buffer (d, "\n\r", 2); #endif if (strcmp (crypt (argument, ch->pcdata->pwd), ch->pcdata->pwd)) { send_to_desc ("Passwords don't match.\n\rRetype password: ", d); d->connected = CON_GET_NEW_PASSWORD; return; } write_to_buffer (d, echo_on_str, 0); send_to_desc ("You may select one of the following races:\n\r", d); for (race = 1; race_table[race].name != NULL; race++) { if (!race_table[race].pc_race) break; if (!str_cmp (race_table[race].name, "dragon")) break; //write_to_buffer (d, race_table[race].name, 0); //write_to_buffer (d, " ", 1); sprintf(buf, "{W* {x%s\n\r", race_table[race].name); send_to_desc(buf, d); } write_to_buffer (d, "\n\r", 0); send_to_desc ("What race would you like to be(help for more information)? ", d); d->connected = CON_GET_NEW_RACE; break; case CON_GET_NEW_RACE: one_argument (argument, arg); if (!strcmp (arg, "help")) { argument = one_argument (argument, arg); if (argument[0] == '\0') do_function (ch, &do_help, "race help"); else do_function (ch, &do_help, argument); send_to_desc ("What race would you like to be(help for more information)? ", d); break; } race = race_lookup (argument); if (race == 0 || !race_table[race].pc_race || !str_cmp(race_table[race].name, "dragon")) { send_to_desc ("That is not a valid race.\n\r", d); send_to_desc ("The following races are available:\n\r", d); for (race = 1; race_table[race].name != NULL; race++) { if (!race_table[race].pc_race) break; if (!str_cmp(race_table[race].name, "dragon")) break; //write_to_buffer (d, race_table[race].name, 0); //write_to_buffer (d, " ", 1); sprintf(buf, "{W* {x%s\n\r", race_table[race].name); send_to_desc(buf,d); } write_to_buffer (d, "\n\r", 0); send_to_desc ("What is your race? (help for more information) ", d); break; } ch->race = race; /* initialize stats */ for (i = 0; i < MAX_STATS; i++) ch->perm_stat[i] = pc_race_table[race].stats[i]; ch->affected_by = ch->affected_by | race_table[race].aff; ch->imm_flags = ch->imm_flags | race_table[race].imm; ch->res_flags = ch->res_flags | race_table[race].res; ch->vuln_flags = ch->vuln_flags | race_table[race].vuln; ch->form = race_table[race].form; ch->parts = race_table[race].parts; /* add skills */ for (i = 0; i < 5; i++) { if (pc_race_table[race].skills[i] == NULL) break; group_add (ch, pc_race_table[race].skills[i], FALSE); } /* add cost */ ch->pcdata->points = pc_race_table[race].points; ch->size = pc_race_table[race].size; send_to_desc ("What is your sex (Male/Female)? ", d); d->connected = CON_GET_NEW_SEX; break; case CON_GET_NEW_SEX: switch (argument[0]) { case 'm': case 'M': ch->sex = SEX_MALE; ch->pcdata->true_sex = SEX_MALE; break; case 'f': case 'F': ch->sex = SEX_FEMALE; ch->pcdata->true_sex = SEX_FEMALE; break; default: send_to_desc ("That is not a valid sex, What is your sex? ", d); return; } strcpy (buf, "Select a class:\n\r"); for (iClass = 0; iClass < MAX_CLASS; iClass++) { if (iClass > 0) strcat (buf, " "); if (class_table[iClass].pick == FALSE) continue; //strcat (buf, class_table[iClass].name); sprintf(buf, "{W*{x %s\n\r", class_table[iClass].name); send_to_desc(buf,d); } //strcat (buf, "]: "); //write_to_buffer (d, buf, 0); d->connected = CON_GET_NEW_CLASS; break; case CON_GET_NEW_CLASS: iClass = class_lookup (argument); // iClass = class_lookup ("citizen"); if (iClass == -1 || (class_table[iClass].pick == FALSE)) { send_to_desc ("That is not a valid class, What is your class? ", d); return; } ch->class = iClass; sprintf (log_buf, "%s@%s new player.", ch->name, d->host); log_string (log_buf); wiznet ("Newbie alert! $N sighted.", ch, NULL, WIZ_NEWBIE, 0, 0); wiznet (log_buf, NULL, NULL, WIZ_SITES, 0, get_trust (ch)); write_to_buffer (d, "\n\r", 2); send_to_desc ("You may be good, neutral, or evil.\n\r", d); send_to_desc ("Which alignment (Good/Neutral/Evil)? ", d); d->connected = CON_GET_ALIGNMENT; break; case CON_GET_ALIGNMENT: switch (argument[0]) { case 'g': case 'G': ch->alignment = 750; break; case 'n': case 'N': ch->alignment = 0; break; case 'e': case 'E': ch->alignment = -750; break; default: send_to_desc ("That's not a valid alignment.\n\r", d); send_to_desc ("Which alignment (G/N/E)? ", d); return; } write_to_buffer (d, "\n\r", 0); send_to_desc ("\n\r\n\r{wWelcome to character creation. This process will help you customize\n\r" "{wyour character the way you see fit. Any abuse of these creation processes\n\r" "{wwill be {Rnot{x tolerated.{x{w If they do not stand up to the Beyond the Shadows\n\r" "{wThen they will either be changed, or you will seek a chance of denial. And please\n\r" "{wfor the sake of all who play, use common sense.{x",d); sprintf(buf, "\n\r{wYour current race is: %s\n\r", race_table[d->character->race].name); send_to_desc(buf,d); send_to_desc("{xPlease enter your eye color (Color codes may be used): ",d); d->connected = CON_GET_EYE_COLOR; break; case CON_GET_EYE_COLOR: if (argument[0] != ' ') { sprintf(buf, "Are you sure %s is what you want?(Y/n)", argument); d->character->pcdata->eyecolor = str_dup(argument); send_to_desc(buf,d); d->connected = CON_CONFIRM_EYES; break; } if (argument[0] == ' ') { send_to_desc("Please enter your eye color (Color codes may be used): ",d); d->connected = CON_GET_EYE_COLOR; return; } break; case CON_CONFIRM_EYES: switch (argument[0]) { case 'y': case 'Y': send_to_desc("Eye color set.\n\r",d); sprintf(buf, "Current race: %s:\n\rCurrent eye color: %s\n\r", race_table[d->character->race].name, d->character->pcdata->eyecolor); send_to_desc(buf,d); send_to_desc("\n\rPlease enter your hair texture. If no hair, enter bald: ",d); d->connected = CON_GET_HAIR_TYPE; break; case 'n': case 'N': d->character->pcdata->eyecolor = NULL; send_to_desc("Please enter your eye color (Color codes may be used): ", d); d->connected = CON_GET_EYE_COLOR; break; default: d->character->pcdata->eyecolor = NULL; send_to_desc("Please enter your eye color (Color codes may be used): ", d); d->connected = CON_GET_EYE_COLOR; break; } break; case CON_GET_HAIR_LENGTH: if (argument[0] != ' ') { sprintf(buf, "Are you sure %s is what you want? (y/n)", argument); d->character->pcdata->hairlength = str_dup(argument); send_to_desc(buf,d); d->connected = CON_CONFIRM_HAIR_LENGTH; break; } if (argument[0] == ' ') { send_to_desc("Please enter your hair length ",d); d->connected = CON_GET_HAIR_LENGTH; break; } break; case CON_CONFIRM_HAIR_LENGTH: switch(argument[0]) { case 'y': case 'Y': send_to_desc("Hair length set.\n\r",d); sprintf(buf, "Current race %s\n\rCurrent eye color %s\n\rCurrent hair type %s\n\r" "Current hair color %s\n\rCurrent hair length %s\n\r", race_table[ch->race].name, ch->pcdata->eyecolor, ch->pcdata->hairtype, ch->pcdata->haircolor, ch->pcdata->hairlength); send_to_desc(buf,d); send_to_desc("Please enter your body type: ",d); d->connected = CON_GET_BODY_TYPE; break; case 'n': case 'N': ch->pcdata->hairlength = NULL; send_to_desc("Please enter your hair length ",d); d->connected = CON_GET_HAIR_LENGTH; break; default: ch->pcdata->hairlength = NULL; send_to_desc("Please enter your hair length ",d); d->connected = CON_GET_HAIR_LENGTH; break; } break; case CON_GET_HAIR_TYPE: if (argument[0] != ' ') { sprintf(buf, "Are you sure %s is what you want? (Y/n)", argument); d->character->pcdata->hairtype = str_dup(argument); send_to_desc(buf,d); d->connected = CON_CONFIRM_HAIR_TYPE; break; } if (argument[0] == ' ') { send_to_desc("Please enter your hair texture. If no hair, enter bald: ", d); d->connected = CON_GET_HAIR_TYPE; return; } break; case CON_CONFIRM_HAIR_TYPE: switch(argument[0]) { case 'y': case 'Y': send_to_desc("Hair texture set.\n\r",d); sprintf(buf, "Current race: %s\n\rCurrent eye color: %s\n\rCurrent hair texture %s\n\r\n\r", race_table[d->character->race].name, d->character->pcdata->eyecolor, d->character->pcdata->hairtype); send_to_desc(buf,d); if (!str_cmp(d->character->pcdata->hairtype, "bald")) { /* group_add (ch, "rom basics", FALSE); group_add (ch, class_table[ch->class].base_group, FALSE); ch->pcdata->learned[gsn_recall] = 50; send_to_desc ("Do you wish to customize this character?\n\r", d); send_to_desc ("Customization takes time, but allows a wider range of skills and abilities.\n\r", d); send_to_desc ("Customize (Y/N)? ", d); d->connected = CON_DEFAULT_CHOICE;*/ ch->pcdata->haircolor = "None"; ch->pcdata->hairlength = "None"; send_to_desc("Please enter your body type: ",d); d->connected = CON_GET_BODY_TYPE; break; } send_to_desc("Please enter your hair color (color codes may be used): ", d); d->connected = CON_GET_HAIR_COLOR; break; case 'n': case 'N': d->character->pcdata->hairtype = NULL; send_to_desc("Please enter your hair texture. If no hair, enter bald: ", d); d->connected = CON_GET_HAIR_TYPE; break; default: d->character->pcdata->hairtype = NULL; send_to_desc("Please enter your hair texture. If no hair, enter bald: ",d); d->connected = CON_GET_HAIR_TYPE; break; } break; case CON_GET_BODY_TYPE: if (argument[0] != ' ') { sprintf(buf, "Are you sure %s is what you want?(Y/n)", argument); send_to_desc(buf,d); d->character->pcdata->bodytype = str_dup(argument); d->connected = CON_CONFIRM_BODY_TYPE; break; } if (argument[0] == ' ') { send_to_desc("Please enter your body type: ", d); d->connected = CON_GET_BODY_TYPE; return; } break; case CON_CONFIRM_BODY_TYPE: switch (argument[0]) { case 'y': case 'Y': send_to_desc("Body type set.\n\r",d); sprintf(buf,"Current race %s\n\rCurrent eye color %s\n\r Current hair texture %s\n\r" "Current hair color %s\n\rCurrent hair length %s\n\rCurrent body type %s\n\r", race_table[d->character->race].name, d->character->pcdata->eyecolor, d->character->pcdata->hairtype, d->character->pcdata->haircolor, ch->pcdata->hairlength,d->character->pcdata->bodytype); send_to_desc(buf,d); if (d->character->sex == 2) { send_to_desc("Continuing with creation...\n\r",d); group_add(ch, "rom basics", FALSE); group_add(ch, class_table[ch->class].base_group, FALSE); ch->pcdata->learned[gsn_recall] = 50; send_to_desc("Do you wish to customize this character?\n\r",d); send_to_desc("Customization takes time, but allows a wider range of skills and" "abilities.\n\r",d); send_to_desc("Continue with customization? (Y/n) ", d); d->connected = CON_DEFAULT_CHOICE; break; } send_to_desc("Enter your facial hair type(none for none): ",d); d->connected = CON_GET_FACIAL_HAIR; break; case 'n': case 'N': d->character->pcdata->bodytype = NULL; send_to_desc("Please enter your body type: ",d); d->connected = CON_GET_BODY_TYPE; break; default: d->character->pcdata->bodytype = NULL; send_to_desc("Please enter your body type: ", d); d->connected = CON_GET_BODY_TYPE; break; } break; case CON_GET_FACIAL_HAIR: if (argument[0] != ' ') { sprintf(buf, "Are you sure %s is what you want?(Y/n)", argument); send_to_desc(buf,d); d->character->pcdata->facialhair = str_dup(argument); d->connected = CON_CONFIRM_FACIAL_HAIR; break; } if (argument[0] == ' ') { send_to_desc("Enter your facial hair type(none for none): ",d); d->connected = CON_GET_FACIAL_HAIR; break; } break; case CON_CONFIRM_FACIAL_HAIR: switch(argument[0]) { case 'y': case 'Y': send_to_desc ("Facial hair set.\n\r",d); sprintf(buf, "Current race %s\n\rCurrent eye color %s\n\rCurrent hair texture %s\n\r" "Current hair color %s\n\rCurrent hair length %s\n\rCurrent body type %s\n\r" "Current facial hair type %s\n\r", race_table[ch->race].name, ch->pcdata->eyecolor, ch->pcdata->hairtype, ch->pcdata->haircolor,ch->pcdata->hairlength, ch->pcdata->bodytype, ch->pcdata->facialhair); send_to_desc(buf,d); send_to_desc("\n\rContinuing with creation...\n\r",d); group_add(ch, "rom basics", FALSE); group_add(ch, class_table[ch->class].base_group, FALSE); ch->pcdata->learned[gsn_recall] = 50; send_to_desc("Do you wish to customize this character?\n\r",d); send_to_desc("Customization takes time, but it allows a wider range of skills and " "abilities\n\r",d); send_to_desc("Customize?(Y/n) ", d); d->connected = CON_DEFAULT_CHOICE; break; case 'n': case 'N': ch->pcdata->facialhair = NULL; send_to_desc("Enter your facial hair type(none for none): ",d); d->connected = CON_GET_FACIAL_HAIR; break; default: ch->pcdata->facialhair = NULL; send_to_desc("Enter your facial hair type(none for none): ",d); d->connected = CON_GET_FACIAL_HAIR; break; } break; case CON_GET_HAIR_COLOR: if (argument[0] != ' ') { sprintf(buf, "Are you sure %s is what you want?(Y/n)", argument); send_to_desc(buf,d); d->character->pcdata->haircolor = str_dup(argument); d->connected = CON_CONFIRM_HAIR_COLOR; break; } if (argument[0] == ' ') { send_to_desc("Please enter your hair color (color codes may be used): ", d); d->connected = CON_GET_HAIR_COLOR; return; } break; case CON_CONFIRM_HAIR_COLOR: switch (argument[0]) { case 'y': case 'Y': send_to_desc ("Hair color set.\n\r",d); sprintf(buf, "Current race %s\n\rCurrent eye color %s\n\rCurrent hair texture %s\n\r" "Current hair color %s\n\r", race_table[d->character->race].name, d->character->pcdata->eyecolor, d->character->pcdata->hairtype, d->character->pcdata->haircolor); send_to_desc(buf,d); /* send_to_desc("\n\rContinuing with creation.\n\r",d); group_add(ch, "rom basics", FALSE); group_add(ch, class_table[ch->class].base_group, FALSE); ch->pcdata->learned[gsn_recall] = 50; send_to_desc("Do you wish to customize this character?\n\r",d); send_to_desc("Customization takes time, but allows a wider range of skills and abilities.\n\r", d); send_to_desc("Customize?(Y/n) ",d); d->connected = CON_DEFAULT_CHOICE;*/ send_to_desc("Please enter your hair length ",d); d->connected = CON_GET_HAIR_LENGTH; break; case 'n': case 'N': d->character->pcdata->haircolor = NULL; send_to_desc ("Please enter your hair color (color codes may be used): ",d); d->connected = CON_GET_HAIR_COLOR; break; default: d->character->pcdata->haircolor = NULL; send_to_desc ("Please enter your hair color (color codes may be used): ", d); d->connected = CON_GET_HAIR_COLOR; break; } break; case CON_DEFAULT_CHOICE: write_to_buffer (d, "\n\r", 2); switch (argument[0]) { case 'y': case 'Y': ch->gen_data = new_gen_data (); ch->gen_data->points_chosen = ch->pcdata->points; do_function (ch, &do_help, "group header"); list_group_costs (ch); write_to_buffer (d, "You already have the following skills:\n\r", 0); do_function (ch, &do_skills, ""); do_function (ch, &do_help, "menu choice"); d->connected = CON_GEN_GROUPS; break; case 'n': case 'N': group_add (ch, class_table[ch->class].default_group, TRUE); write_to_buffer (d, "\n\r", 2); write_to_buffer (d, "Please pick a weapon from the following choices:\n\r", 0); buf[0] = '\0'; for (i = 0; weapon_table[i].name != NULL; i++) if (ch->pcdata->learned[*weapon_table[i].gsn] > 0) { strcat (buf, weapon_table[i].name); strcat (buf, " "); } strcat (buf, "\n\rYour choice? "); write_to_buffer (d, buf, 0); d->connected = CON_PICK_WEAPON; break; default: write_to_buffer (d, "Please answer (Y/N)? ", 0); return; } break; case CON_PICK_WEAPON: write_to_buffer (d, "\n\r", 2); weapon = weapon_lookup (argument); if (weapon == -1 || ch->pcdata->learned[*weapon_table[weapon].gsn] <= 0) { write_to_buffer (d, "That's not a valid selection. Choices are:\n\r", 0); buf[0] = '\0'; for (i = 0; weapon_table[i].name != NULL; i++) if (ch->pcdata->learned[*weapon_table[i].gsn] > 0) { strcat (buf, weapon_table[i].name); strcat (buf, " "); } strcat (buf, "\n\rYour choice? "); write_to_buffer (d, buf, 0); return; } ch->pcdata->learned[*weapon_table[weapon].gsn] = 40; write_to_buffer (d, "\n\r", 2); if (ch->reclass == 1) { send_to_char("Your class was set successfully, please reconnect.\n\r",ch); save_char_obj (ch); //f (ch->desc != NULL) // close_socket (ch->desc); ch->valid = TRUE; //free_char(ch); save_char_obj(ch); close_socket (ch->desc); return; } do_function (ch, &do_help, "motd"); d->connected = CON_READ_MOTD; break; case CON_GEN_GROUPS: send_to_char ("\n\r", ch); if (!str_cmp (argument, "done")) { if (ch->pcdata->points == pc_race_table[ch->race].points) { send_to_char ("You didn't pick anything.\n\r", ch); break; } if (ch->pcdata->points < 40 + pc_race_table[ch->race].points) { sprintf (buf, "You must take at least %d points of skills and groups", 40 + pc_race_table[ch->race].points); send_to_char (buf, ch); break; } sprintf (buf, "Creation points: %d\n\r", ch->pcdata->points); send_to_char (buf, ch); sprintf (buf, "Experience per level: %d\n\r", exp_per_level (ch, ch->gen_data->points_chosen)); if (ch->pcdata->points < 40) ch->train = (40 - ch->pcdata->points + 1) / 2; free_gen_data (ch->gen_data); ch->gen_data = NULL; send_to_char (buf, ch); write_to_buffer (d, "\n\r", 2); write_to_buffer (d, "Please pick a weapon from the following choices:\n\r", 0); buf[0] = '\0'; for (i = 0; weapon_table[i].name != NULL; i++) if (ch->pcdata->learned[*weapon_table[i].gsn] > 0) { strcat (buf, weapon_table[i].name); strcat (buf, " "); } strcat (buf, "\n\rYour choice? "); write_to_buffer (d, buf, 0); d->connected = CON_PICK_WEAPON; break; } if (!parse_gen_groups (ch, argument)) send_to_char ("Choices are: list,learned,premise,add,drop,info,help, and done.\n\r", ch); do_function (ch, &do_help, "menu choice"); break; case CON_READ_IMOTD: write_to_buffer (d, "\n\r", 2); do_function (ch, &do_help, "motd"); d->connected = CON_READ_MOTD; break; /* states for new note system, (c)1995-96 erwin@pip.dknet.dk */ /* ch MUST be PC here; have nwrite check for PC status! */ /* case CON_NOTE_TO: handle_con_note_to (d, argument); break; case CON_NOTE_SUBJECT: handle_con_note_subject (d, argument); break; case CON_NOTE_EXPIRE: handle_con_note_expire (d, argument); break; case CON_NOTE_TEXT: handle_con_note_text (d, argument); break; case CON_NOTE_FINISH: handle_con_note_finish (d, argument); break;*/ case CON_READ_MOTD: if (ch->pcdata == NULL || ch->pcdata->pwd[0] == '\0') { write_to_buffer (d, "Warning! Null password!\n\r", 0); write_to_buffer (d, "Please report old password with bug.\n\r", 0); write_to_buffer (d, "Type 'password null <new password>' to fix.\n\r", 0); } write_to_buffer (d, "\n\rWelcome to Beyond the Shadows. Please don't feed the mobiles!\n\r", 0); ch->next = char_list; char_list = ch; d->connected = CON_PLAYING; reset_char (ch); if (ch->level == 0) { if(mud_ansicolor) SET_BIT (ch->act, PLR_COLOUR); if(mud_telnetga) SET_BIT (ch->comm, COMM_TELNET_GA); ch->perm_stat[class_table[ch->class].attr_prime] += 3; ch->level = 1; ch->exp = exp_per_level (ch, ch->pcdata->points); ch->hit = ch->max_hit; ch->mana = ch->max_mana; ch->move = ch->max_move; ch->train = 3; ch->practice = 5; // sprintf (buf, "the %s", title_table[ch->class][ch->level] // [ch->sex == SEX_FEMALE ? 1 : 0]); // set_title (ch, buf); do_function (ch, &do_outfit, ""); //obj_to_char (create_object (get_obj_index (OBJ_VNUM_MAP), 0), // ch); char_to_room (ch, get_room_index (ROOM_VNUM_SCHOOL)); send_to_char ("\n\r", ch); do_function (ch, &do_help, "newbie info"); send_to_char ("\n\r", ch); } else if (ch->in_room != NULL) { char_to_room (ch, ch->in_room); } else if (IS_IMMORTAL (ch)) { char_to_room (ch, get_room_index (ROOM_VNUM_CHAT)); } else { char_to_room (ch, get_room_index (ROOM_VNUM_TEMPLE)); } act ("$n has entered the game.", ch, NULL, NULL, TO_ROOM); do_function (ch, &do_look, "auto"); wiznet ("{R$N has left real life behind.{x", ch, NULL, WIZ_LOGINS, WIZ_SITES, get_trust (ch)); if (ch->pet != NULL) { char_to_room (ch->pet, ch->in_room); act ("$n has entered the game.", ch->pet, NULL, NULL, TO_ROOM); } send_to_char("\n", ch); do_function (ch, do_unread, ""); break; } return; }

Here is the call graph for this function:

---

Variable Documentation

time_t current_time

Definition at line 320 of file comm.c. Referenced by advance_level(), boot_db(), clear_char(), do_catchup(), do_mstat(), do_score(), do_score2(), do_time(), fread_char(), fread_pet(), fwrite_char(), fwrite_pet(), get_age(), get_pc_id(), init_mm(), load_thread(), log_string(), main(), new_char(), parse_note(), and xp_compute().

DESCRIPTOR_DATA* d_next

Definition at line 304 of file comm.c. Referenced by close_socket(), do_quit(), do_reboot(), do_shutdown(), mud_crashing(), and nanny().

DESCRIPTOR_DATA* descriptor_list

Definition at line 303 of file comm.c. Referenced by check_parse_name(), check_playing(), close_socket(), damage(), do_admintalk(), do_answer(), do_auction(), do_broadcast(), do_clan_gossip(), do_clantalk(), do_disconnect(), do_dump(), do_echo(), do_force(), do_gossip(), do_grats(), do_immtalk(), do_kingdomtalk(), do_mpgecho(), do_mpzecho(), do_music(), do_mwhere(), do_ooc(), do_oocclan_talk(), do_pray(), do_question(), do_quit(), do_quote(), do_reboot(), do_recho(), do_restore(), do_roar(), do_shout(), do_shutdown(), do_snoop(), do_sockets(), do_transfer(), do_who(), do_who_clan(), do_who_kingdom(), do_whois(), do_yell(), do_zecho(), mud_crashing(), nanny(), parse_note(), send_to_all(), send_to_room(), song_update(), update_vehicle(), weather_update(), and wiznet().

FILE* fpReserve

Definition at line 305 of file comm.c. Referenced by append_file(), append_file2(), append_note(), do_dump(), do_printmap(), do_rename(), load_char_obj(), main(), save_area(), save_bans(), save_char_obj(), save_kingdom_data(), save_notes(), and save_socials().