/* * IRC - Internet Relay Chat, src/modules/m_sapart.c * (C) 2004 The UnrealIRCd Team * * See file AUTHORS in IRC package for additional names of * the programmers. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 1, or (at your option) * any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */#include "config.h"#include "struct.h"#include "common.h"#include "sys.h"#include "numeric.h"#include "msg.h"#include "proto.h"#include "channel.h"#include <time.h>#include <sys/stat.h>#include <stdio.h>#include <stdlib.h>#include <string.h>#ifdef _WIN32#include <io.h>#endif#include <fcntl.h>#include "h.h"#ifdef STRIPBADWORDS#include "badwords.h"#endif#ifdef _WIN32#include "version.h"#endifDLLFUNC int m_sapart(aClient *cptr, aClient *sptr, int parc, char *parv[]);#define MSG_SAPART "SAPART"#define TOK_SAPART "AY"ModuleHeader MOD_HEADER(m_sapart) = { "m_sapart", "$Id: m_sapart.c,v 1.1.2.3.2.5 2007/01/22 13:01:16 syzop Exp $", "command /sapart", "3.2-b8-1", NULL };DLLFUNC int MOD_INIT(m_sapart)(ModuleInfo *modinfo){ add_Command(MSG_SAPART, TOK_SAPART, m_sapart, 3); MARK_AS_OFFICIAL_MODULE(modinfo); return MOD_SUCCESS;}DLLFUNC int MOD_LOAD(m_sapart)(int module_load){ return MOD_SUCCESS;}DLLFUNC int MOD_UNLOAD(m_sapart)(int module_unload){ if (del_Command(MSG_SAPART, TOK_SAPART, m_sapart) < 0) { sendto_realops("Failed to delete commands when unloading %s", MOD_HEADER(m_sapart).name); } return MOD_SUCCESS;}/* m_sapart() - Lamego - Wed Jul 21 20:04:48 1999 Copied off PTlink IRCd (C) PTlink coders team. Coded for Sadmin by Stskeeps also Modified by NiQuiL (niquil@programmer.net) parv[0] - sender parv[1] - nick to make part parv[2] - channel(s) to part parv[3] - comment*/DLLFUNC CMD_FUNC(m_sapart){ aClient *acptr; aChannel *chptr; Membership *lp; char *name, *p = NULL; int i; char *comment = (parc > 3 && parv[3] ? parv[3] : NULL); char commentx[512]; char jbuf[BUFSIZE]; if (!IsSAdmin(sptr) && !IsULine(sptr)) { sendto_one(sptr, err_str(ERR_NOPRIVILEGES), me.name, parv[0]); return 0; } if (parc < 3) { sendto_one(sptr, err_str(ERR_NEEDMOREPARAMS), me.name, parv[0], "SAPART"); return 0; } if (!(acptr = find_person(parv[1], NULL))) { sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], parv[1]); return 0; } if (MyClient(acptr)) { /* Now works like m_join */ *jbuf = 0; for (i = 0, name = strtoken(&p, parv[2], ","); name; name = strtoken(&p, NULL, ",")) { if (!(chptr = get_channel(acptr, name, 0))) { sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], name); continue; } if (!(lp = find_membership_link(acptr->user->channel, chptr))) { sendto_one(sptr, err_str(ERR_USERNOTINCHANNEL), me.name, parv[0], parv[1], name); continue; } if (*jbuf) (void)strlcat(jbuf, ",", sizeof jbuf); (void)strlncat(jbuf, name, sizeof jbuf, sizeof(jbuf) - i - 1); i += strlen(name) + 1; } if (!*jbuf) return -1; strcpy(parv[2], jbuf); if (comment) { strcpy(commentx, " "); strlcat(commentx, comment, 512); } parv[0] = parv[1]; // nick parv[1] = parv[2]; // chan parv[2] = comment ? commentx : NULL; // comment if (comment) { sendto_realops("%s used SAPART to make %s part %s (%s)", sptr->name, parv[0], parv[1], comment); sendto_serv_butone(&me, ":%s GLOBOPS :%s used SAPART to make %s part %s (%s)", me.name, sptr->name, parv[0], parv[1], comment); /* Logging function added by XeRXeS */ ircd_log(LOG_SACMDS,"SAPART: %s used SAPART to make %s part %s (%s)", sptr->name, parv[0], parv[1], comment); } else { sendto_realops("%s used SAPART to make %s part %s", sptr->name, parv[0], parv[1]); sendto_serv_butone(&me, ":%s GLOBOPS :%s used SAPART to make %s part %s", me.name, sptr->name, parv[0], parv[1]); /* Logging function added by XeRXeS */ ircd_log(LOG_SACMDS,"SAPART: %s used SAPART to make %s part %s", sptr->name, parv[0], parv[1]); } do_cmd(acptr, acptr, "PART", comment ? 3 : 2, parv); } else { if (comment) { sendto_one(acptr, ":%s SAPART %s %s :%s", parv[0], parv[1], parv[2], comment); /* Logging function added by XeRXeS */ ircd_log(LOG_SACMDS,"SAPART: %s used SAPART to make %s part %s (%s)", sptr->name, parv[1], parv[2], comment); } else { sendto_one(acptr, ":%s SAPART %s %s", parv[0], parv[1], parv[2]); /* Logging function added by XeRXeS */ ircd_log(LOG_SACMDS,"SAPART: %s used SAPART to make %s part %s", sptr->name, parv[1], parv[2]); } } return 0;}