/*    /lib/messages.c
 *    from the Foundation II LPC Library
 *    handles special messages such as leaving, coming, saying, etc.
 *    created by Descartes of Borg 950428
 */

#include "messages.h"

private mapping Messages;

static void create() {
    Messages = ([ "come" : "$N enters.", "leave" : "$N leaves $D.",
      "telin" : "$N teleports in.", "telout" : "$N teleports away.",
      "home" : "$N goes home.", "vis" : "$N appears.",
      "invis": "$N disappears.", "clone" : "$N clones $O.",
      "mdest" : "$N dests $O." ]);
}

string SetMessage(string msg, string str) {
    if(!stringp(msg) || !stringp(str)) error("Bad argument to SetMessage().");
    switch(msg) {
        case "come": case "leave": case "telin": case "telout": case "home": 
        case "say": case "ask": case "exclaim": case "login": case "logout":
        case "dest": case "clone": 
	  return (Messages[msg] = str);
        default: return 0;
    }
}

varargs string GetMessage(string msg, mixed arg) {
    string tmp;

    if( !stringp(msg) ) return 0;
    if( !(tmp = Messages[msg]) ) return 0;
    switch(msg) {
        case "dest": case "clone":
	  tmp = replace_string(tmp, "$O", (string)arg->GetShort());
	  break;
        case "leave":
	  if(strsrch(arg, "$N") == -1) tmp = replace_string(tmp, "$D", arg);
	  else tmp = arg;
	  break;
        case "say": case "ask": case "exclaim": return tmp;
        case "login": case "logout":
	    tmp = replace_string(tmp, "$M", mud_name());
	    break;
    }
    if(strsrch(tmp, "$N") == -1) tmp = "$N "+tmp;
    return capitalize(replace_string(tmp, "$N", GetName()));
}

mapping GetMessages() { return copy(Messages); }

string GetName() { return 0; }