mirror of
git://git.psyced.org/git/psyced
synced 2024-08-15 03:25:10 +00:00
55 lines
1.1 KiB
C
55 lines
1.1 KiB
C
|
// $Id: inbox.c,v 1.4 2007/07/12 06:08:29 lynx Exp $ // vim:syntax=lpc
|
||
|
|
//
|
||
|
|
// WAP account management
|
||
|
|
//
|
||
|
|
#include <sys/time.h>
|
||
|
|
#include <net.h>
|
||
|
|
#include <text.h>
|
||
|
|
#include <person.h>
|
||
|
|
#include "wap.h"
|
||
|
|
|
||
|
|
inherit NET_PATH "lastlog";
|
||
|
|
inherit WAP_PATH "common";
|
||
|
|
|
||
|
|
volatile string inbox_buffer;
|
||
|
|
|
||
|
|
showInbox() {
|
||
|
|
int count;
|
||
|
|
array(mixed) log = user->logQuery();
|
||
|
|
|
||
|
|
HTOK;
|
||
|
|
HEADER_WML("inbox");
|
||
|
|
NAV_WML;
|
||
|
|
|
||
|
|
if (user->vQuery("new")) {
|
||
|
|
logInit(copy(log));
|
||
|
|
inbox_buffer = "";
|
||
|
|
|
||
|
|
count = logView(user->vQuery("new"), 1);
|
||
|
|
|
||
|
|
write(inbox_buffer);
|
||
|
|
}
|
||
|
|
|
||
|
|
unless (count) {
|
||
|
|
write("No new messages.");
|
||
|
|
}
|
||
|
|
|
||
|
|
FOOTER_WML;
|
||
|
|
}
|
||
|
|
|
||
|
|
msgView(source, mc, data, vars, showingLog) {
|
||
|
|
array(int) t = localtime(vars["_time_INTERNAL"]);
|
||
|
|
|
||
|
|
// we want the newest message on top.. buffering output
|
||
|
|
inbox_buffer = sprintf(" - %d:%d, %d.%d.%d<br/>%s<br/><br/>",
|
||
|
|
t[TM_HOUR], t[TM_MIN], t[TM_MDAY], t[TM_MON], t[TM_YEAR], data) + inbox_buffer;
|
||
|
|
// make person's nick clickable
|
||
|
|
inbox_buffer = SEND_PERSON(vars["_nick_verbatim"] || vars["_nick"]) + inbox_buffer;
|
||
|
|
}
|
||
|
|
|
||
|
|
authChecked(val) {
|
||
|
|
if (::authChecked(val)) {
|
||
|
|
showInbox();
|
||
|
|
}
|
||
|
|
}
|