pegasus/anope
1
0
Fork 0
mirror of https://github.com/anope/anope.git synced 2026-07-07 22:03:14 +02:00
Code Activity
Files
77893492da6ef92f386ba7116e02fd62846e9c32
anope/src/messages.c
T
cyberbotx e802b6dfe8 Some more Windows fixes, both in CMake and in the code itself. (I don't like the const casting for the latter, but it's only until we get rid of use of strchr) 
Added CPack setup to automate generation of source package for *nix and NSIS installer for Windows.
Some other minor CMake fixes.
Converted docs/README and docs/WIN32.txt from Unix linefeeds to DOS linefeeds so they show up right in Notepad under Windows.
Added small fix for Visual Studio 2008, CMake doesn't detect the Express version correctly and it must be explicitly defined.

git-svn-id: http://anope.svn.sourceforge.net/svnroot/anope/trunk@1861 5417fbe8-f217-4b02-8779-1006273d7864
2008-12-23 07:38:22 +00:00

351 lines
11 KiB
C
Raw Blame History

/* Definitions of IRC message functions and list of messages.
*
* (C) 2003-2008 Anope Team
* Contact us at info@anope.org
*
* Please read COPYING and README for further details.
*
* Based on the original code of Epona by Lara.
* Based on the original code of Services by Andy Church.
*
* $Id$
*
*/
#include "services.h"
#include "messages.h"
#include "language.h"
/*************************************************************************/
int m_nickcoll(const char *user)
{
introduce_user(user);
return MOD_CONT;
}
/*************************************************************************/
int m_away(const char *source, const char *msg)
{
User *u;
u = finduser(source);
if (u && msg == 0) /* un-away */
check_memos(u);
return MOD_CONT;
}
/*************************************************************************/
int m_kill(const char *nick, const char *msg)
{
BotInfo *bi;
/* Recover if someone kills us. */
/* use nickIsServices() to reduce the number of lines of code - TSL */
if (nickIsServices(nick, 0)) {
introduce_user(nick);
} else if (s_BotServ && (bi = findbot(nick))) {
introduce_user(nick);
bi->RejoinAll();
} else {
do_kill(nick, msg);
}
return MOD_CONT;
}
/*************************************************************************/
int m_time(const char *source, int ac, const char **av)
{
time_t t;
struct tm *tm;
char buf[64];
if (!source) {
return MOD_CONT;
}
time(&t);
tm = localtime(&t);
strftime(buf, sizeof(buf), "%a %b %d %H:%M:%S %Y %Z", tm);
ircdproto->SendNumeric(ServerName, 391, source, "%s :%s", ServerName, buf);
return MOD_CONT;
}
/*************************************************************************/
int m_motd(const char *source)
{
FILE *f;
char buf[BUFSIZE];
if (!source) {
return MOD_CONT;
}
f = fopen(MOTDFilename, "r");
if (f) {
ircdproto->SendNumeric(ServerName, 375, source, ":- %s Message of the Day", ServerName);
while (fgets(buf, sizeof(buf), f)) {
buf[strlen(buf) - 1] = 0;
ircdproto->SendNumeric(ServerName, 372, source, ":- %s", buf);
}
fclose(f);
ircdproto->SendNumeric(ServerName, 376, source, ":End of /MOTD command.");
} else {
ircdproto->SendNumeric(ServerName, 422, source, ":- MOTD file not found! Please contact your IRC administrator.");
}
return MOD_CONT;
}
/*************************************************************************/
int m_privmsg(const char *source, const char *receiver, const char *msg)
{
char *s;
time_t starttime, stoptime; /* When processing started and finished */
BotInfo *bi;
ChannelInfo *ci;
User *u;
if (!source || !*source || !*receiver || !receiver || !msg) {
return MOD_CONT;
}
u = finduser(source);
if (!u) {
alog("%s: user record for %s not found", msg, source);
/* Two lookups naughty, however, this won't happen often. -- w00t */
if (findbot(receiver))
{
ircdproto->SendMessage(findbot(receiver), source,
getstring(NULL, USER_RECORD_NOT_FOUND));
}
return MOD_CONT;
}
if (*receiver == '#') {
if (s_BotServ && (ci = cs_findchan(receiver))) {
/* Some paranoia checks */
if (!(ci->flags & CI_VERBOTEN) && ci->c && ci->bi) {
botchanmsgs(u, ci, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
}
}
} else {
/* Check if we should ignore. Operators always get through. */
if (allow_ignore && !is_oper(u)) {
IgnoreData *ign = get_ignore(source);
if (ign) {
alog("Ignored message from %s: \"%s\"", source, inbuf);
return MOD_CONT;
}
}
/* If a server is specified (nick@server format), make sure it matches
* us, and strip it off. */
s = const_cast<char *>(strchr(receiver, '@'));
if (s) {
*s++ = 0;
if (stricmp(s, ServerName) != 0)
return MOD_CONT;
} else if (UseStrictPrivMsg) {
if (debug) {
alog("Ignored PRIVMSG without @ from %s", source);
}
notice_lang(receiver, u, INVALID_TARGET, receiver, receiver,
ServerName, receiver);
return MOD_CONT;
}
starttime = time(NULL);
if (!stricmp(receiver, s_OperServ)) {
if (!is_oper(u) && OSOpersOnly) {
notice_lang(s_OperServ, u, ACCESS_DENIED);
if (WallBadOS)
ircdproto->SendGlobops(s_OperServ,
"Denied access to %s from %s!%s@%s (non-oper)",
s_OperServ, u->nick, u->username,
u->host);
} else {
operserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
}
} else if (!stricmp(receiver, s_NickServ)) {
nickserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
} else if (!stricmp(receiver, s_ChanServ)) {
if (!is_oper(u) && CSOpersOnly)
notice_lang(s_ChanServ, u, ACCESS_DENIED);
else
chanserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
} else if (!stricmp(receiver, s_MemoServ)) {
memoserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
} else if (s_HostServ && !stricmp(receiver, s_HostServ)) {
hostserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
} else if (s_HelpServ && !stricmp(receiver, s_HelpServ)) {
helpserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
} else if (s_BotServ && !stricmp(receiver, s_BotServ)) {
botserv(u, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
} else if (s_BotServ && (bi = findbot(receiver))) {
botmsgs(u, bi, const_cast<char *>(msg)); // XXX Unsafe cast, this needs reviewing -- CyberBotX
}
/* Add to ignore list if the command took a significant amount of time. */
if (allow_ignore) {
stoptime = time(NULL);
if (stoptime > starttime && *source && !strchr(source, '.'))
add_ignore(source, stoptime - starttime);
}
}
return MOD_CONT;
}
/*************************************************************************/
int m_stats(const char *source, int ac, const char **av)
{
int i;
User *u;
NickCore *nc;
if (ac < 1)
return MOD_CONT;
switch (*av[0]) {
case 'l':
u = finduser(source);
if (u && is_oper(u)) {
ircdproto->SendNumeric(ServerName, 211, source, "Server SendBuf SentBytes SentMsgs RecvBuf RecvBytes RecvMsgs ConnTime");
ircdproto->SendNumeric(ServerName, 211, source, "%s %d %d %d %d %d %d %ld", uplink_server->host, write_buffer_len(), total_written, -1, read_buffer_len(),
total_read, -1, time(NULL) - start_time);
}
ircdproto->SendNumeric(ServerName, 219, source, "%c :End of /STATS report.", *av[0] ? *av[0] : '*');
break;
case 'o':
case 'O':
/* Check whether the user is an operator */
u = finduser(source);
if (u && !is_oper(u) && HideStatsO) {
ircdproto->SendNumeric(ServerName, 219, source, "%c :End of /STATS report.", *av[0] ? *av[0] : '*');
} else {
for (i = 0; i < RootNumber; i++)
ircdproto->SendNumeric(ServerName, 243, source, "O * * %s Root 0", ServicesRoots[i]);
for (i = 0; i < servadmins.count && (nc = static_cast<NickCore *>(servadmins.list[i]));
i++)
ircdproto->SendNumeric(ServerName, 243, source, "O * * %s Admin 0", nc->display);
for (i = 0; i < servopers.count && (nc = static_cast<NickCore *>(servopers.list[i]));
i++)
ircdproto->SendNumeric(ServerName, 243, source, "O * * %s Oper 0", nc->display);
ircdproto->SendNumeric(ServerName, 219, source, "%c :End of /STATS report.", *av[0] ? *av[0] : '*');
}
break;
case 'u':{
int uptime = time(NULL) - start_time;
ircdproto->SendNumeric(ServerName, 242, source, ":Services up %d day%s, %02d:%02d:%02d", uptime / 86400, uptime / 86400 == 1 ? "" : "s",
(uptime / 3600) % 24, (uptime / 60) % 60, uptime % 60);
ircdproto->SendNumeric(ServerName, 250, source, ":Current users: %d (%d ops); maximum %d", usercnt, opcnt, maxusercnt);
ircdproto->SendNumeric(ServerName, 219, source, "%c :End of /STATS report.", *av[0] ? *av[0] : '*');
break;
} /* case 'u' */
default:
ircdproto->SendNumeric(ServerName, 219, source, "%c :End of /STATS report.", *av[0] ? *av[0] : '*');
break;
}
return MOD_CONT;
}
/*************************************************************************/
int m_version(const char *source, int ac, const char **av)
{
if (source) ircdproto->SendNumeric(ServerName, 351, source, "Anope-%s %s :%s - %s (%s) -- %s", version_number, ServerName, ircd->name, version_flags,
EncModule, version_build);
return MOD_CONT;
}
/*************************************************************************/
int m_whois(const char *source, const char *who)
{
BotInfo *bi;
NickAlias *na;
const char *clientdesc;
if (source && who) {
if (stricmp(who, s_NickServ) == 0)
clientdesc = desc_NickServ;
else if (stricmp(who, s_ChanServ) == 0)
clientdesc = desc_ChanServ;
else if (stricmp(who, s_MemoServ) == 0)
clientdesc = desc_MemoServ;
else if (s_BotServ && stricmp(who, s_BotServ) == 0)
clientdesc = desc_BotServ;
else if (s_HostServ && stricmp(who, s_HostServ) == 0)
clientdesc = desc_HostServ;
else if (stricmp(who, s_HelpServ) == 0)
clientdesc = desc_HelpServ;
else if (stricmp(who, s_OperServ) == 0)
clientdesc = desc_OperServ;
else if (stricmp(who, s_GlobalNoticer) == 0)
clientdesc = desc_GlobalNoticer;
else if (s_BotServ && (bi = findbot(who))) {
/* Bots are handled separately */
ircdproto->SendNumeric(ServerName, 311, source, "%s %s %s * :%s", bi->nick, bi->user, bi->host, bi->real);
ircdproto->SendNumeric(ServerName, 307, source, "%s :is a registered nick", bi->nick);
ircdproto->SendNumeric(ServerName, 312, source, "%s %s :%s", bi->nick, ServerName, ServerDesc);
ircdproto->SendNumeric(ServerName, 317, source, "%s %ld %ld :seconds idle, signon time", bi->nick, time(NULL) - bi->lastmsg, start_time);
ircdproto->SendNumeric(ServerName, 318, source, "%s :End of /WHOIS list.", who);
return MOD_CONT;
} else if (!ircd->svshold && (na = findnick(who))
&& (na->status & NS_KILL_HELD)) {
/* We have a nick enforcer client here that we need to respond to.
* We can't just say it doesn't exist here, even tho it does for
* other servers :) -GD
*/
ircdproto->SendNumeric(ServerName, 311, source, "%s %s %s * :Services Enforcer", na->nick, NSEnforcerUser, NSEnforcerHost);
ircdproto->SendNumeric(ServerName, 312, source, "%s %s :%s", na->nick, ServerName, ServerDesc);
ircdproto->SendNumeric(ServerName, 318, source, "%s :End of /WHOIS list.", who);
return MOD_CONT;
} else {
ircdproto->SendNumeric(ServerName, 401, source, "%s :No such service.", who);
return MOD_CONT;
}
ircdproto->SendNumeric(ServerName, 311, source, "%s %s %s * :%s", who, ServiceUser, ServiceHost, clientdesc);
ircdproto->SendNumeric(ServerName, 312, source, "%s %s :%s", who, ServerName, ServerDesc);
ircdproto->SendNumeric(ServerName, 317, source, "%s %ld %ld :seconds idle, signon time", who, time(NULL) - start_time, start_time);
ircdproto->SendNumeric(ServerName, 318, source, "%s :End of /WHOIS list.", who);
}
return MOD_CONT;
}
/* *INDENT-OFF* */
void moduleAddMsgs() {
Message *m;
m = createMessage("STATS", m_stats); addCoreMessage(IRCD,m);
m = createMessage("TIME", m_time); addCoreMessage(IRCD,m);
m = createMessage("VERSION", m_version); addCoreMessage(IRCD,m);
}
/*************************************************************************/
Message *find_message(const char *name)
{
Message *m;
m = findMessage(IRCD, name);
return m;
}
/*************************************************************************/
View Git Blame Copy Permalink