psyc-mirrors/psyced
1
0
Fork 0
mirror of git://git.psyced.org/git/psyced synced 2024-08-15 03:25:10 +00:00
Code Issues 2 Releases Wiki Activity

let the past begone in cvs land. welcome to igit igit!

Browse source
This commit is contained in:
PSYC 2009-01-26 20:21:29 +01:00
commit 4e601cf1c7
509 changed files with 77963 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

20
place/indigestion.c Normal file
View file

@ -0,0 +1,20 @@
#include <place.gen>
msg(source, mc, data, mapping vars) {
int rc = ::msg(source, mc, data, vars);
if (abbrev("_message", mc) && stringp(data)) {
#if __EFUN_DEFINED__(crypt)
castmsg(ME, "_notice_digest_crypt",
"\tcrypt: [_text_crypt]", ([ "_text_crypt" : md5(data) ]) );
#endif
#if __EFUN_DEFINED__(md5)
castmsg(ME, "_notice_digest_md5",
"\t MD5: [_text_md5]", ([ "_text_md5" : md5(data) ]) );
#endif
#if __EFUN_DEFINED__(sha1)
castmsg(ME, "_notice_digest_sha1",
"\t SHA1: [_text_sha1]", ([ "_text_sha1" : sha1(data) ]) );
#endif
}
return rc;
}