#include <lib.h>
#include <daemons.h>
#include <commands.h>
#include <message_class.h>
inherit LIB_DAEMON;
string gfile;
varargs string *Prettify(string *arr, string chan){
string *ret = ({});
string colorchan = "", stamp, mess, junk, remotechan;
chan = CHAT_D->GetLocalChannel(chan);
remotechan = CHAT_D->GetRemoteChannel(chan);
if(!chan || !(CHAT_D->GetTag(chan))){
if(!(colorchan = CHAT_D->GetTag(remotechan))){
colorchan = "%^B_BLACK%^YELLOW%^<"+chan+">%^RESET%^";
}
}
else colorchan += "<" + chan + ">%^RESET%^";
foreach(string line in arr){
int i = sscanf(line,"%s.%s]%s", junk, stamp, mess);
if(i != 3) continue;
stamp = replace_string(stamp, ".", "/", 1);
stamp = replace_string(stamp, ".", ":", 1);
mess = replace_string(mess, "<"+ chan +">", colorchan, 1);
mess = replace_string(mess, "<"+ remotechan +">", colorchan, 1);
ret += ({ stamp + " " + mess });
}
return ret;
}
mixed cmd(string args) {
string *talks, *ret = ({});
int i, lines;
string log_contents, location;
gfile = "";
if(!args){
this_player()->eventPrint("Syntax: <hist [channel | say]>");
return 1;
}
this_player()->eventPrint("Retrieving history...\n");
if(!strsrch(args, "tell")){
load_object(CMD_TELL)->cmd("hist");
return 1;
}
if(!LOG_REMOTE_CHANS &&
member_array(args, CHAT_D->GetRemoteChannels(1)) != -1){
ret = CHAT_D->cmdLast(args);
if(sizeof(ret)) return ret;
}
if(!LOG_LOCAL_CHANS &&
member_array(args, CHAT_D->GetRemoteChannels()) == -1){
ret = CHAT_D->cmdLast(args);
if(sizeof(ret)) return ret;
}
i = sscanf(args,"%s %d", gfile, lines);
if(i != 2){
lines = 20;
gfile = args;
}
talks = this_player()->GetTalkHistTypes();
if(talks && member_array(gfile, talks) != -1){
string ret2 = "Your "+gfile+" history: \n\n";
ret2 += implode(this_player()->GetTalkHistory(gfile),"\n");
print_long_string(this_player(), ret2);
return 1;
}
if(!CHAT_D->CanListen(this_player(), gfile)){
return "You do not have privileges to: "+gfile;
}
if(!CHAT_D->GetListening(this_player(), gfile)){
return "You are not listening to channel: "+gfile;
}
if(gfile == "admin"){
location = "/secure/log/admin";
}
else {
location = DIR_CHANNEL_LOGS +"/"+ gfile;
}
if( !(log_contents = read_file(location)) ){
return CHAT_D->cmdLast(gfile);
}
if(lines > 100 && !creatorp(this_player())) lines = 100;
if(sizeof(ret = (Prettify(explode(log_contents,"\n"), gfile))) < lines){
string *archive_array;
archive_array = (get_dir(DIR_CHANNEL_LOGS +"/archive/") || ({}) );
archive_array = filter(archive_array, (: !strsrch($1,gfile) :) );
archive_array = sort_array(archive_array, -1);
foreach(string element in archive_array){
string junk1, tmp;
if(sizeof(ret) >= lines) break;
if(sscanf(element,"%s%*d.%*d.%*d-%*d.%*d", junk1) != 6) continue;
if(truncate(junk1,1) != gfile) continue;
tmp = read_file(DIR_CHANNEL_LOGS +"/archive/"+element);
if(!tmp) continue;
ret = Prettify(explode(tmp,"\n"), gfile)+ret;
}
}
ret = ret[<lines..];
this_player()->eventPage(ret, "system");
return 1;
}
string GetHelp(string topic) {
string ret = "Syntax: hist CHANNEL [number]\n"
" hist [ say | whisper | tell | yell | shout ]\n\n"
"Gives you the backscroll of the specified communication.\n";
if(!LOG_REMOTE_CHANS){
ret += "Note that remote channel logging is not enabled on "
"this mud, so hist for intermud channels will not work.";
}
return ret;
}
