1
0
Fork 0
mirror of git://git.psyced.org/git/psyced synced 2024-08-15 03:25:10 +00:00
psyced/world/net/place/mailcast.c

69 lines
2.1 KiB
C

// $Id: mailcast.c,v 1.7 2008/01/05 12:42:17 lynx Exp $
#include <net.h>
#include <person.h>
#include <status.h>
inherit NET_PATH "place/basic";
// noch nicht ganz klar ob das nicht einfach ein job der /history ist..
// und wir ganz generell hin und wieder mehrfache histories brauchen
//
array(mapping) mails = ({ });
//
// wieviele mails sollen gespeichert bleiben?
// ...waer gut, wenn man das im raumfile definieren koennt und hier bleibts..
//
#ifndef _limit_amount_history_mailcast
#define _limit_amount_history_mailcast 7
#endif
msg(source, mc, data, mapping vars) {
if (abbrev("_notice_email_delivered", mc)) {
// eine _notice_email_delivered wird im server-fenster angezeigt, nicht im raum..
// naja, der raum ist eh nicht zum chatten da..
// net/irc sollte das problem geschickter lösen dann..
// und nicht hier sowas komisches da:
castmsg(source, "_message_public_mail",
vars["_subject"]+":\n"+vars["_content"],
vars);
if (sizeof(mails) >= _limit_amount_history_mailcast) {
mails[0] = 0;
mails -= ({ 0 });
}
mails += ({ ([
"_source" : source,
"_subject" : vars["_subject"],
"_content" : vars["_content"]
]) });
save();
return;
}
return ::msg(source, mc, data, vars);
}
htget(prot, query, headers, qs, data, noprocess) {
htok(prot);
#ifndef STYLESHEET
# define STYLESHEET (v("_uniform_style") || "http://www.psyced.org/mail.css")
#endif
write("<link rel='stylesheet' type='text/css' href='"+
STYLESHEET +"'>\n");
// typically use textdb here to obtain different layouts
//
// write("<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\">\n"
// " <tr>\n <td>Source</td>\n <td>Subject</td>\n <td>Content</td>\n </tr>\n");
for (int i=sizeof(mails)-1; i>=0; i--) {
mapping mail = mails[i];
string t = htquote(mail["_content"]);
t = replace(t, "\n", "<br/>\n");
// write(" <tr>\n <td>"+ mail["_source"] +"</td>\n <td>"+ mail["_subject"] +"</td>\n <td>"+ t +"</td>\n </tr>\n");
write("<ul>\n<li>"+ mail["_source"] +"</li>\n<li>"+ mail["_subject"] +"</li>\n<li>"+ t +"</li>\n</ul>\n");
}
// write("</table>");
return 1;
}