/* bboard.c - the buuletin board object
Copyright (C) 1994-2000 Annihilator
This program is a part of ES2 mudlib. Permission is granted to use,
modify, copy or distribute this program provided this copyright notice
remains intact and subject to the restriction that this program MAY
NOT be used in any way for monetary gain.
Details of terms and conditions is available in the Copyright.ES2 file.
If you don't receive this file along with this program, write to the
primary author of ES2 mudlib: Annihilator
*/
#include
#define BOARD_CAPACITY query("capacity")
#define NO_PLAYER_POST query("NO_PLAYER_POST")
inherit ITEM;
inherit F_SAVE;
void setup()
{
string loc;
seteuid(getuid());
::setup();
if( stringp(loc = query("location")) )
move(loc);
set("no_get", 1);
restore();
}
void init()
{
add_action("do_post", "post");
add_action("do_read", "read");
add_action("do_discard", "discard");
add_action("do_save_article", "save");
add_action("do_followup", "followup");
}
string query_save_file()
{
string id;
if( !stringp(id = query("board_id")) ) return 0;
return DATA_DIR + "board/" + id + __SAVE_EXTENSION__;
}
string short()
{
mapping *notes;
int i, unread, last_read_time;
notes = query("notes");
if( !pointerp(notes) || !sizeof(notes) )
return ::short() + " [ 沒有任何留言 ]";
if( this_player() && this_player()->link() ) {
last_read_time = (int)this_player()->link()->query("board_last_read/" + (string)query("board_id"));
for(unread = 0, i=sizeof(notes)-1; i>=0; i--, unread ++)
if( notes[i]["time"] <= last_read_time ) break;
}
if( unread )
return sprintf("%s [ %d 張留言﹐%d 張未讀 ]", ::short(), sizeof(notes), unread);
else
return sprintf("%s [ %d 張留言 ]", ::short(), sizeof(notes));
}
string long()
{
mapping *notes;
int i, last_time_read;
string msg;
notes = query("notes");
msg = query("long");
if( !msg ) msg = "";
if( !pointerp(notes) || !sizeof(notes) )
return msg += query("name") + "使用方法請見 help board。\t容量約 (" +BOARD_CAPACITY+ ") 篇\n";
last_time_read = this_player()->link()->query("board_last_read/" + (string)query("board_id"));
for(i=0; i
msg += sprintf("%s[%2d]" NOR " %-34s %+22s - %s\n",
( notes[i]["time"] > last_time_read ? HIY: ""),
i+1,
notes[i]["title"],
notes[i]["author"],
ctime(notes[i]["time"])[0..9]
);
return msg += "\n=== " + query("name") + "使用方法請見 help board，留言版容量：" +BOARD_CAPACITY+ " 篇 ===\n";
}
// This is the callback function to process the string returned from the
// editor defined in F_EDIT of player object.
void done_post(object me, mapping note, string text)
{
mapping *notes;
string sig;
if( stringp(sig = me->link()->query("signature")) )
text += "--\n" + sig; // 加 -- 好在 followup 可以知道
note["msg"] = text;
notes = query("notes");
if( !pointerp(notes) || !sizeof(notes) )
notes = ({ note });
else
notes += ({ note });
// Truncate the notes if maximum capacity exceeded.
if( sizeof(notes) > BOARD_CAPACITY )
notes = notes[BOARD_CAPACITY / 4 .. BOARD_CAPACITY];
set("notes", notes);
tell_object(me, "留言完畢。\n");
save();
return;
}
int do_post(string arg)
{
mapping note;
if(!arg) return notify_fail("留言請指定一個標題。\n");
// add by ueiren ..
if ( NO_PLAYER_POST && (!wizardp(this_player())))
return notify_fail("玩家不可在此公佈欄留言。\n");
if( strlen(arg) > 40 )
return notify_fail("您的標題太長了﹐換一個 40 個字元以內的吧。\n");
note = allocate_mapping(4);
note["title"] = arg;
note["author"] = this_player()->name() + "(" +this_player()->query("id") + ")";
note["time"] = time();
this_player()->edit( (: done_post, this_player(), note :) );
return 1;
}
int do_read(string arg)
{
int num,tmp;
mapping *notes, last_read_time;
string myid;
last_read_time = this_player()->link()->query("board_last_read");
myid = query("board_id");
notes = query("notes");
if( !pointerp(notes) || !sizeof(notes) )
return notify_fail("留言板上目前沒有任何留言。\n");
if( !arg ) return notify_fail("指令格式﹕read <留言編號>|new|next\n");
if( arg=="new" || arg=="next" ) {
if( !mapp(last_read_time) || undefinedp(last_read_time[myid]) )
num = 1;
else
for(num = 1; num<=sizeof(notes); num++)
if( notes[num-1]["time"] > last_read_time[myid] ) break;
} else if( !sscanf(arg, "%d", num) )
return notify_fail("你要讀第幾張留言﹖\n");
if( num < 1 || num > sizeof(notes) )
return notify_fail("沒有這張留言。\n");
num--;
this_player()->start_more( sprintf("[%2d] %-34s %+26s%s%s%s\n",
num + 1,
notes[num]["title"],
notes[num]["author"],
"(" + ctime(notes[num]["time"])[0..9] + ")",
"\n---------------------------------------------------------------------------\n",
notes[num]["msg"]));
// Keep track which post we were reading last time.
if( !mapp(last_read_time) ) {
this_player()->link()->set("board_last_read", ([ myid: notes[num]["time"] ]) );
}
else
if( undefinedp(last_read_time[myid]) || notes[num]["time"] > last_read_time[myid] )
last_read_time[myid] = notes[num]["time"];
return 1;
}
int do_discard(string arg)
{
mapping *notes;
int num;
if( !arg || sscanf(arg, "%d", num)!=1 )
return notify_fail("指令格式﹕discard <留言編號>\n");
notes = query("notes");
if( !arrayp(notes) || num < 1 || num > sizeof(notes) )
return notify_fail("沒有這張留言。\n");
num--;
if( notes[num]["author"] != (string) this_player(1)->query("name")+ "(" + this_player(1)->query("id") + ")"
&& wiz_level(this_player(1)) < 4 )
return notify_fail("這個留言不是你寫的。\n");
notes = notes[0..num-1] + notes[num+1..sizeof(notes)-1];
set("notes", notes);
save();
write("刪除第 " + (num+1) + " 號留言....Ok。\n");
return 1;
}
int do_save_article(string arg)
{
int num;
string file;
mapping *notes;
if( !wizardp(this_player()) ) return 0;
if( !arg || sscanf(arg, "article %d to %s", num, file)!=2 ) return 0;
if( !arrayp(notes = query("notes"))
|| num<1
|| num>sizeof(notes) )
return notify_fail("沒有這張留言。\n");
num--;
file = resolve_path(this_player()->query("cwd"), file);
if( write_file(file, notes[num]["msg"]) )
write("Ok.\n");
else
return notify_fail("儲存失敗。\n");
return 1;
}
int do_followup(string str)
{
mapping *notes, note;
string *text, title;
int i, num;
// add by dragoon
if ( NO_PLAYER_POST && (!wizardp(this_player())))
return notify_fail("玩家不可在此公佈欄留言。\n");
if( !str )
return notify_fail("指令格式﹕followup <留言編號> [新的標題]\n");
if( sscanf(str, "%d %s", num, title) != 2 )
if( sscanf(str, "%d", num) != 1 )
return notify_fail("你要回第幾篇的留言﹖\n");
notes = query("notes");
if( num < 1 || num > sizeof(notes) )
return notify_fail("沒有這篇留言。\n");
num--;
if( !title ) title = "Re﹕" + notes[num]["title"];
note = allocate_mapping(4);
note["title"] = title;
note["author"] = this_player()->query("name") + "(" + this_player()->query("id") + ")";
note["time"] = time();
text = explode( notes[num]["msg"], "\n" );
// title, num 這兩個變數拿來再利用
title = sprintf(GRN"> %s 在 %s 留下這篇留言﹕\n"NOR,
notes[num]["author"],
"(" + ctime(notes[num]["time"])[0..9] + ")" );
num = sizeof(text);
for( i=0; i
{
// 空行跳過, 上上一篇跳過
if( text[i] == "" || strsrch(text[i], "> ") != -1)
continue;
// 簽名檔, 結束
if( text[i][0..1] == "--" )
i=num;
else title = title + GRN + "> " + text[i] + NOR + "\n";
}
note["msg"] = title;
this_player()->edit( (: done_post, this_player(), note :), title );
return 1;
}