2 * Copyright (C) 1996-2002 Hybrid Development Team
3 * Copyright (C) 2004 ircd-ratbox Development Team
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
9 * 1.Redistributions of source code must retain the above copyright notice,
10 * this list of conditions and the following disclaimer.
11 * 2.Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3.The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
20 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
21 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
22 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
23 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
25 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
26 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
27 * POSSIBILITY OF SUCH DAMAGE.
29 * $Id: m_force.c 3297 2007-03-28 14:49:48Z jilles $
42 #include "s_newconf.h"
51 static int mo_forcejoin(struct Client
*client_p
, struct Client
*source_p
,
52 int parc
, const char *parv
[]);
53 static int mo_forcepart(struct Client
*client_p
, struct Client
*source_p
,
54 int parc
, const char *parv
[]);
56 struct Message forcejoin_msgtab
= {
57 "FORCEJOIN", 0, 0, 0, MFLG_SLOW
,
58 {mg_unreg
, mg_not_oper
, mg_ignore
, mg_ignore
, mg_ignore
, {mo_forcejoin
, 3}}
61 struct Message forcepart_msgtab
= {
62 "FORCEPART", 0, 0, 0, MFLG_SLOW
,
63 {mg_unreg
, mg_not_oper
, mg_ignore
, mg_ignore
, mg_ignore
, {mo_forcepart
, 3}}
66 mapi_clist_av1 force_clist
[] = { &forcejoin_msgtab
, &forcepart_msgtab
, NULL
};
68 DECLARE_MODULE_AV1(force
, NULL
, NULL
, force_clist
, NULL
, NULL
, "$Revision: 3297 $");
72 * parv[1] = user to force
73 * parv[2] = channel to force them into
76 mo_forcejoin(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
78 struct Client
*target_p
;
79 struct Channel
*chptr
;
85 if(!IsOperAdmin(source_p
))
87 sendto_one(source_p
, form_str(ERR_NOPRIVS
), me
.name
, source_p
->name
, "admin");
91 if((hunt_server(client_p
, source_p
, ":%s FORCEJOIN %s %s", 1, parc
, parv
)) != HUNTED_ISME
)
94 /* if target_p is not existant, print message
95 * to source_p and bail - scuzzy
97 if((target_p
= find_client(parv
[1])) == NULL
)
99 sendto_one(source_p
, form_str(ERR_NOSUCHNICK
), me
.name
, source_p
->name
, parv
[1]);
103 if(!IsPerson(target_p
))
106 sendto_wallops_flags(UMODE_WALLOP
, &me
,
107 "FORCEJOIN called for %s %s by %s!%s@%s",
108 parv
[1], parv
[2], source_p
->name
, source_p
->username
, source_p
->host
);
109 ilog(L_MAIN
, "FORCEJOIN called for %s %s by %s!%s@%s",
110 parv
[1], parv
[2], source_p
->name
, source_p
->username
, source_p
->host
);
111 sendto_server(NULL
, NULL
, NOCAPS
, NOCAPS
,
112 ":%s WALLOPS :FORCEJOIN called for %s %s by %s!%s@%s",
113 me
.name
, parv
[1], parv
[2],
114 source_p
->name
, source_p
->username
, source_p
->host
);
116 /* select our modes from parv[2] if they exist... (chanop) */
123 else if(*parv
[2] == '+')
132 mode
= sjmode
= '\0';
138 if((chptr
= find_channel(parv
[2])) != NULL
)
140 if(IsMember(target_p
, chptr
))
142 /* debugging is fun... */
143 sendto_one_notice(source_p
, ":*** Notice -- %s is already in %s",
144 target_p
->name
, chptr
->chname
);
148 add_user_to_channel(chptr
, target_p
, type
);
150 sendto_server(target_p
, chptr
, NOCAPS
, NOCAPS
,
151 ":%s SJOIN %ld %s + :%c%s",
152 me
.name
, (long) chptr
->channelts
,
153 chptr
->chname
, type
? sjmode
: ' ', target_p
->name
);
155 sendto_channel_local(ALL_MEMBERS
, chptr
, ":%s!%s@%s JOIN :%s",
156 target_p
->name
, target_p
->username
,
157 target_p
->host
, chptr
->chname
);
160 sendto_channel_local(ALL_MEMBERS
, chptr
, ":%s MODE %s +%c %s",
161 me
.name
, chptr
->chname
, mode
, target_p
->name
);
163 if(chptr
->topic
!= NULL
)
165 sendto_one(target_p
, form_str(RPL_TOPIC
), me
.name
,
166 target_p
->name
, chptr
->chname
, chptr
->topic
);
167 sendto_one(target_p
, form_str(RPL_TOPICWHOTIME
),
168 me
.name
, source_p
->name
, chptr
->chname
,
169 chptr
->topic_info
, chptr
->topic_time
);
172 channel_member_names(chptr
, target_p
, 1);
176 newch
= LOCAL_COPY(parv
[2]);
177 if(!check_channel_name(newch
))
179 sendto_one(source_p
, form_str(ERR_BADCHANNAME
), me
.name
,
180 source_p
->name
, (unsigned char *) newch
);
184 /* channel name must begin with & or # */
185 if(!IsChannelName(newch
))
187 sendto_one(source_p
, form_str(ERR_BADCHANNAME
), me
.name
,
188 source_p
->name
, (unsigned char *) newch
);
192 /* newch can't be longer than CHANNELLEN */
193 if(strlen(newch
) > CHANNELLEN
)
195 sendto_one_notice(source_p
, ":Channel name is too long");
199 chptr
= get_or_create_channel(target_p
, newch
, NULL
);
200 add_user_to_channel(chptr
, target_p
, CHFL_CHANOP
);
202 /* send out a join, make target_p join chptr */
203 sendto_server(target_p
, chptr
, NOCAPS
, NOCAPS
,
204 ":%s SJOIN %ld %s +nt :@%s", me
.name
,
205 (long) chptr
->channelts
, chptr
->chname
, target_p
->name
);
207 sendto_channel_local(ALL_MEMBERS
, chptr
, ":%s!%s@%s JOIN :%s",
208 target_p
->name
, target_p
->username
,
209 target_p
->host
, chptr
->chname
);
211 chptr
->mode
.mode
|= MODE_TOPICLIMIT
;
212 chptr
->mode
.mode
|= MODE_NOPRIVMSGS
;
214 sendto_channel_local(ALL_MEMBERS
, chptr
, ":%s MODE %s +nt", me
.name
, chptr
->chname
);
216 target_p
->localClient
->last_join_time
= rb_current_time();
217 channel_member_names(chptr
, target_p
, 1);
219 /* we do this to let the oper know that a channel was created, this will be
220 * seen from the server handling the command instead of the server that
223 sendto_one_notice(source_p
, ":*** Notice -- Creating channel %s", chptr
->chname
);
230 mo_forcepart(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
232 struct Client
*target_p
;
233 struct Channel
*chptr
;
234 struct membership
*msptr
;
236 if(!IsOperAdmin(source_p
))
238 sendto_one(source_p
, form_str(ERR_NOPRIVS
), me
.name
, source_p
->name
, "admin");
242 if((hunt_server(client_p
, source_p
, ":%s FORCEPART %s %s", 1, parc
, parv
)) != HUNTED_ISME
)
245 /* if target_p == NULL then let the oper know */
246 if((target_p
= find_client(parv
[1])) == NULL
)
248 sendto_one(source_p
, form_str(ERR_NOSUCHNICK
), me
.name
, source_p
->name
, parv
[1]);
252 if(!IsClient(target_p
))
255 sendto_wallops_flags(UMODE_WALLOP
, &me
,
256 "FORCEPART called for %s %s by %s!%s@%s",
257 parv
[1], parv
[2], source_p
->name
, source_p
->username
, source_p
->host
);
258 ilog(L_MAIN
, "FORCEPART called for %s %s by %s!%s@%s",
259 parv
[1], parv
[2], source_p
->name
, source_p
->username
, source_p
->host
);
260 sendto_server(NULL
, NULL
, NOCAPS
, NOCAPS
,
261 ":%s WALLOPS :FORCEPART called for %s %s by %s!%s@%s",
262 me
.name
, parv
[1], parv
[2],
263 source_p
->name
, source_p
->username
, source_p
->host
);
265 if((chptr
= find_channel(parv
[2])) == NULL
)
267 sendto_one_numeric(source_p
, ERR_NOSUCHCHANNEL
,
268 form_str(ERR_NOSUCHCHANNEL
), parv
[1]);
272 if((msptr
= find_channel_membership(chptr
, target_p
)) == NULL
)
274 sendto_one_numeric(source_p
, ERR_USERNOTINCHANNEL
,
275 form_str(ERR_USERNOTINCHANNEL
),
280 sendto_server(target_p
, chptr
, NOCAPS
, NOCAPS
,
281 ":%s PART %s :%s", target_p
->name
, chptr
->chname
, target_p
->name
);
283 sendto_channel_local(ALL_MEMBERS
, chptr
, ":%s!%s@%s PART %s :%s",
284 target_p
->name
, target_p
->username
,
285 target_p
->host
, chptr
->chname
, target_p
->name
);
288 remove_user_from_channel(msptr
);