trunk/modules/m_connect.c

/*
 *  ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
 *  m_connect.c: Connects to a remote IRC server.
 *
 *  Copyright (C) 2002 by the past and present ircd coders, and others.
 *
 *  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 2 of the License, 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307
 *  USA
 *
 *  $Id$
 */

#include "stdinc.h"
#include "client.h"
#include "ircd.h"
#include "irc_string.h"
#include "numeric.h"
#include "fdlist.h"
#include "s_bsd.h"
#include "conf.h"
#include "log.h"
#include "s_serv.h"
#include "send.h"
#include "parse.h"
#include "hash.h"
#include "modules.h"


/*
 * mo_connect - CONNECT command handler
 * 
 * Added by Jto 11 Feb 1989
 *
 * m_connect
 *      parv[0] = sender prefix
 *      parv[1] = servername
 *      parv[2] = port number
 *      parv[3] = remote server
 */
static void
mo_connect(struct Client *client_p, struct Client *source_p,
           int parc, char *parv[])
{
  int port;
  int tmpport;
  struct MaskItem *conf = NULL;
  const struct Client *target_p = NULL;

  if (EmptyString(parv[1]))
  {
    sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
               me.name, source_p->name, "CONNECT");
    return;
  }

  if (parc > 3)
  {
    if (!HasOFlag(source_p, OPER_FLAG_CONNECT_REMOTE))
    {
      sendto_one(source_p, form_str(ERR_NOPRIVS),
                 me.name, source_p->name, "connect");
      return;
    }

    if (hunt_server(client_p, source_p, ":%s CONNECT %s %s :%s", 3,
                    parc, parv) != HUNTED_ISME)
      return;
  }
  else if (!HasOFlag(source_p, OPER_FLAG_CONNECT))
  {
    sendto_one(source_p, form_str(ERR_NOPRIVS),
               me.name, source_p->name, "connect");
    return;
  }

  if ((target_p = hash_find_server(parv[1])))
  {
    sendto_one(source_p,
               ":%s NOTICE %s :Connect: Server %s already exists from %s.",
               me.name, source_p->name, parv[1], target_p->from->name);
    return;
  }

  /*
   * try to find the name, then host, if both fail notify ops and bail
   */
  if (!(conf = find_matching_name_conf(CONF_SERVER, parv[1], NULL, NULL, 0)))
  {
    if  (!(conf = find_matching_name_conf(CONF_SERVER,  NULL, NULL, parv[1], 0)))
    {
      sendto_one(source_p,
                 ":%s NOTICE %s :Connect: Host %s not listed in ircd.conf",
                 me.name, source_p->name, parv[1]);
      return;
    }
  }

  /* Get port number from user, if given. If not specified,
   * use the default form configuration structure. If missing
   * from there, then use the precompiled default.
   */
  tmpport = port = conf->port;

  if (parc > 2 && !EmptyString(parv[2]))
  {
    if ((port = atoi(parv[2])) <= 0)
    {
      sendto_one(source_p, ":%s NOTICE %s :Connect: Illegal port number",
                 me.name, source_p->name);
      return;
    }
  }
  else if (port <= 0 && (port = PORTNUM) <= 0)
  {
    sendto_one(source_p, ":%s NOTICE %s :Connect: missing port number",
               me.name, source_p->name);
    return;
  }

  if (find_servconn_in_progress(conf->name))
  {
    sendto_one(source_p, ":%s NOTICE %s :Connect: a connection to %s "
               "is already in progress.", me.name, source_p->name, conf->name);
    return;
  }

  /*
   * Notify all operators about remote connect requests
   */
  ilog(LOG_TYPE_IRCD, "CONNECT From %s : %s %s", 
       source_p->name, parv[1], parv[2] ? parv[2] : "");

  conf->port = port;

  /* at this point we should be calling connect_server with a valid
   * C:line and a valid port in the C:line
   */
  if (serv_connect(conf, source_p))
  {
    if (!ConfigServerHide.hide_server_ips && HasUMode(source_p, UMODE_ADMIN))
      sendto_one(source_p, ":%s NOTICE %s :*** Connecting to %s[%s].%d",
                 me.name, source_p->name, conf->host,
                 conf->name, conf->port);
    else
      sendto_one(source_p, ":%s NOTICE %s :*** Connecting to %s.%d",
                 me.name, source_p->name, conf->name, conf->port);
  }
  else
  {
    sendto_one(source_p, ":%s NOTICE %s :*** Couldn't connect to %s.%d",
               me.name, source_p->name, conf->name, conf->port);
  }

  /* client is either connecting with all the data it needs or has been
   * destroyed
   */
  conf->port = tmpport;
}

/*
 * ms_connect - CONNECT command handler
 * 
 * Added by Jto 11 Feb 1989
 *
 * m_connect
 *      parv[0] = sender prefix
 *      parv[1] = servername
 *      parv[2] = port number
 *      parv[3] = remote server
 */
static void
ms_connect(struct Client *client_p, struct Client *source_p,
           int parc, char *parv[])
{
  int port;
  int tmpport;
  struct MaskItem *conf = NULL;
  const struct Client *target_p = NULL;

  if (hunt_server(client_p, source_p,
                  ":%s CONNECT %s %s :%s", 3, parc, parv) != HUNTED_ISME)
    return;

  if (EmptyString(parv[1]))
  {
    sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
               me.name, source_p->name, "CONNECT");
    return;
  }

  if ((target_p = hash_find_server(parv[1])))
  {
    sendto_one(source_p,
               ":%s NOTICE %s :Connect: Server %s already exists from %s.",
               me.name, source_p->name, parv[1], target_p->from->name);
    return;
  }

  /*
   * try to find the name, then host, if both fail notify ops and bail
   */
  if (!(conf = find_matching_name_conf(CONF_SERVER, parv[1], NULL, NULL, 0)))
  { 
    if  (!(conf = find_matching_name_conf(CONF_SERVER,  NULL, NULL, parv[1], 0)))
    {
      sendto_one(source_p,
                 ":%s NOTICE %s :Connect: Host %s not listed in ircd.conf",
                 me.name, source_p->name, parv[1]);
      return;
    }
  }

  /* Get port number from user, if given. If not specified,
   * use the default form configuration structure. If missing
   * from there, then use the precompiled default.
   */
  tmpport = port = conf->port;

  if (parc > 2 && !EmptyString(parv[2]))
  {
    port = atoi(parv[2]);

    /* if someone sends port 0, and we have a config port.. use it */
    if (port == 0 && conf->port)
      port = conf->port;
    else if (port <= 0)
    {
      sendto_one(source_p, ":%s NOTICE %s :Connect: Illegal port number",
                 me.name, source_p->name);
      return;
    }
  }
  else if (port <= 0 && (port = PORTNUM) <= 0)
  {
    sendto_one(source_p, ":%s NOTICE %s :Connect: missing port number",
               me.name, source_p->name);
    return;
  }

  if (find_servconn_in_progress(conf->name))
  {
    sendto_one(source_p, ":%s NOTICE %s :Connect: a connection to %s "
               "is already in progress.", me.name, source_p->name, conf->name);
    return;
  }

  /*
   * Notify all operators about remote connect requests
   */
  sendto_wallops_flags(UMODE_WALLOP, &me, "Remote CONNECT %s %d from %s",
                       parv[1], port, source_p->name);
  sendto_server(NULL, NOCAPS, CAP_TS6,
                ":%s WALLOPS :Remote CONNECT %s %d from %s",
                me.name, parv[1], port, source_p->name);
  sendto_server(NULL, CAP_TS6, NOCAPS,
                ":%s WALLOPS :Remote CONNECT %s %d from %s",
                me.id, parv[1], port, source_p->name);

  ilog(LOG_TYPE_IRCD, "CONNECT From %s : %s %d", 
       source_p->name, parv[1], port);

  conf->port = port;

  /*
   * At this point we should be calling connect_server with a valid
   * C:line and a valid port in the C:line
   */
  if (serv_connect(conf, source_p))
    sendto_one(source_p, ":%s NOTICE %s :*** Connecting to %s.%d",
               me.name, source_p->name, conf->name, conf->port);
  else
    sendto_one(source_p, ":%s NOTICE %s :*** Couldn't connect to %s.%d",
               me.name, source_p->name, conf->name, conf->port);
  /*
   * Client is either connecting with all the data it needs or has been
   * destroyed
   */
  conf->port = tmpport;
}

static struct Message connect_msgtab = {
  "CONNECT", 0, 0, 2, MAXPARA, MFLG_SLOW, 0,
  { m_unregistered, m_not_oper, ms_connect, m_ignore, mo_connect, m_ignore }
};

static void
module_init(void)
{
  mod_add_cmd(&connect_msgtab);
}

static void
module_exit(void)
{
  mod_del_cmd(&connect_msgtab);
}

struct module module_entry = {
  .node    = { NULL, NULL, NULL },
  .name    = NULL,
  .version = "$Revision$",
  .handle  = NULL,
  .modinit = module_init,
  .modexit = module_exit,
  .flags   = 0
};
Revision:	2012
Committed:	Sun May 12 14:47:26 2013 UTC (12 years, 3 months ago) by michael
Content type:	text/x-csrc
File size:	8874 byte(s)
Log Message:	- Removed 'remote', and 'global_kill' oper flags, and added 'connect', 'squit', and 'kill' flags for better fine-tuning instead. Whether or not a specific action is allowed on a remote server can be controlled by appeding the ':remote' flag. For example: 'kill' allows only local clients to be killed, whereas 'kill:remote' allows to issue a KILL for remote clients
#	User	Rev	Content
1	adx	30	/*
2			* ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3			* m_connect.c: Connects to a remote IRC server.
4			*
5			* Copyright (C) 2002 by the past and present ircd coders, and others.
6			*
7			* This program is free software; you can redistribute it and/or modify
8			* it under the terms of the GNU General Public License as published by
9			* the Free Software Foundation; either version 2 of the License, or
10			* (at your option) any later version.
11			*
12			* This program is distributed in the hope that it will be useful,
13			* but WITHOUT ANY WARRANTY; without even the implied warranty of
14			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15			* GNU General Public License for more details.
16			*
17			* You should have received a copy of the GNU General Public License
18			* along with this program; if not, write to the Free Software
19			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
20			* USA
21			*
22	knight	31	* $Id$
23	adx	30	*/
24
25			#include "stdinc.h"
26			#include "client.h"
27			#include "ircd.h"
28			#include "irc_string.h"
29			#include "numeric.h"
30			#include "fdlist.h"
31			#include "s_bsd.h"
32	michael	1309	#include "conf.h"
33			#include "log.h"
34	adx	30	#include "s_serv.h"
35			#include "send.h"
36			#include "parse.h"
37			#include "hash.h"
38			#include "modules.h"
39
40
41			/*
42			* mo_connect - CONNECT command handler
43			*
44			* Added by Jto 11 Feb 1989
45			*
46			* m_connect
47			* parv[0] = sender prefix
48			* parv[1] = servername
49			* parv[2] = port number
50			* parv[3] = remote server
51			*/
52			static void
53	michael	971	mo_connect(struct Client client_p, struct Client source_p,
54			int parc, char *parv[])
55	adx	30	{
56			int port;
57			int tmpport;
58	michael	1632	struct MaskItem *conf = NULL;
59	michael	971	const struct Client *target_p = NULL;
60	adx	30
61	michael	971	if (EmptyString(parv[1]))
62	adx	30	{
63	michael	1834	sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
64	michael	971	me.name, source_p->name, "CONNECT");
65	adx	30	return;
66			}
67
68	michael	971	if (parc > 3)
69			{
70	michael	2012	if (!HasOFlag(source_p, OPER_FLAG_CONNECT_REMOTE))
71	michael	971	{
72	michael	1834	sendto_one(source_p, form_str(ERR_NOPRIVS),
73	michael	971	me.name, source_p->name, "connect");
74			return;
75			}
76	adx	30
77	michael	971	if (hunt_server(client_p, source_p, ":%s CONNECT %s %s :%s", 3,
78			parc, parv) != HUNTED_ISME)
79			return;
80	adx	30	}
81	michael	2012	else if (!HasOFlag(source_p, OPER_FLAG_CONNECT))
82			{
83			sendto_one(source_p, form_str(ERR_NOPRIVS),
84			me.name, source_p->name, "connect");
85			return;
86			}
87	adx	30
88	michael	1169	if ((target_p = hash_find_server(parv[1])))
89	adx	30	{
90			sendto_one(source_p,
91			":%s NOTICE %s :Connect: Server %s already exists from %s.",
92			me.name, source_p->name, parv[1], target_p->from->name);
93			return;
94			}
95
96			/*
97			* try to find the name, then host, if both fail notify ops and bail
98			*/
99	michael	1636	if (!(conf = find_matching_name_conf(CONF_SERVER, parv[1], NULL, NULL, 0)))
100	adx	30	{
101	michael	1636	if (!(conf = find_matching_name_conf(CONF_SERVER, NULL, NULL, parv[1], 0)))
102			{
103			sendto_one(source_p,
104			":%s NOTICE %s :Connect: Host %s not listed in ircd.conf",
105			me.name, source_p->name, parv[1]);
106			return;
107			}
108	adx	30	}
109	michael	971
110	adx	30	/* Get port number from user, if given. If not specified,
111			* use the default form configuration structure. If missing
112			* from there, then use the precompiled default.
113			*/
114	michael	1632	tmpport = port = conf->port;
115	adx	30
116			if (parc > 2 && !EmptyString(parv[2]))
117			{
118			if ((port = atoi(parv[2])) <= 0)
119			{
120			sendto_one(source_p, ":%s NOTICE %s :Connect: Illegal port number",
121			me.name, source_p->name);
122			return;
123			}
124			}
125			else if (port <= 0 && (port = PORTNUM) <= 0)
126			{
127			sendto_one(source_p, ":%s NOTICE %s :Connect: missing port number",
128			me.name, source_p->name);
129			return;
130			}
131
132			if (find_servconn_in_progress(conf->name))
133			{
134			sendto_one(source_p, ":%s NOTICE %s :Connect: a connection to %s "
135			"is already in progress.", me.name, source_p->name, conf->name);
136			return;
137			}
138
139			/*
140			* Notify all operators about remote connect requests
141			*/
142	michael	1247	ilog(LOG_TYPE_IRCD, "CONNECT From %s : %s %s",
143	adx	30	source_p->name, parv[1], parv[2] ? parv[2] : "");
144
145	michael	1632	conf->port = port;
146	adx	30
147			/* at this point we should be calling connect_server with a valid
148			* C:line and a valid port in the C:line
149			*/
150	michael	1632	if (serv_connect(conf, source_p))
151	adx	30	{
152	michael	1219	if (!ConfigServerHide.hide_server_ips && HasUMode(source_p, UMODE_ADMIN))
153	adx	30	sendto_one(source_p, ":%s NOTICE %s :*** Connecting to %s[%s].%d",
154	michael	1632	me.name, source_p->name, conf->host,
155			conf->name, conf->port);
156	adx	30	else
157			sendto_one(source_p, ":%s NOTICE %s :*** Connecting to %s.%d",
158	michael	1632	me.name, source_p->name, conf->name, conf->port);
159	adx	30	}
160			else
161			{
162			sendto_one(source_p, ":%s NOTICE %s :*** Couldn't connect to %s.%d",
163	michael	1632	me.name, source_p->name, conf->name, conf->port);
164	adx	30	}
165
166			/* client is either connecting with all the data it needs or has been
167			* destroyed
168			*/
169	michael	1632	conf->port = tmpport;
170	adx	30	}
171
172			/*
173			* ms_connect - CONNECT command handler
174			*
175			* Added by Jto 11 Feb 1989
176			*
177			* m_connect
178			* parv[0] = sender prefix
179			* parv[1] = servername
180			* parv[2] = port number
181			* parv[3] = remote server
182			*/
183			static void
184			ms_connect(struct Client client_p, struct Client source_p,
185			int parc, char *parv[])
186			{
187			int port;
188			int tmpport;
189	michael	1632	struct MaskItem *conf = NULL;
190	michael	971	const struct Client *target_p = NULL;
191	adx	30
192			if (hunt_server(client_p, source_p,
193			":%s CONNECT %s %s :%s", 3, parc, parv) != HUNTED_ISME)
194			return;
195
196	michael	1413	if (EmptyString(parv[1]))
197	adx	30	{
198	michael	1834	sendto_one(source_p, form_str(ERR_NEEDMOREPARAMS),
199	adx	30	me.name, source_p->name, "CONNECT");
200			return;
201			}
202
203	michael	1169	if ((target_p = hash_find_server(parv[1])))
204	adx	30	{
205			sendto_one(source_p,
206			":%s NOTICE %s :Connect: Server %s already exists from %s.",
207			me.name, source_p->name, parv[1], target_p->from->name);
208			return;
209			}
210
211			/*
212			* try to find the name, then host, if both fail notify ops and bail
213			*/
214	michael	1636	if (!(conf = find_matching_name_conf(CONF_SERVER, parv[1], NULL, NULL, 0)))
215			{
216			if (!(conf = find_matching_name_conf(CONF_SERVER, NULL, NULL, parv[1], 0)))
217			{
218			sendto_one(source_p,
219			":%s NOTICE %s :Connect: Host %s not listed in ircd.conf",
220			me.name, source_p->name, parv[1]);
221			return;
222			}
223	adx	30	}
224
225			/* Get port number from user, if given. If not specified,
226			* use the default form configuration structure. If missing
227			* from there, then use the precompiled default.
228			*/
229	michael	1632	tmpport = port = conf->port;
230	adx	30
231			if (parc > 2 && !EmptyString(parv[2]))
232			{
233			port = atoi(parv[2]);
234
235			/* if someone sends port 0, and we have a config port.. use it */
236	michael	1632	if (port == 0 && conf->port)
237			port = conf->port;
238	adx	30	else if (port <= 0)
239			{
240			sendto_one(source_p, ":%s NOTICE %s :Connect: Illegal port number",
241			me.name, source_p->name);
242			return;
243			}
244			}
245			else if (port <= 0 && (port = PORTNUM) <= 0)
246			{
247			sendto_one(source_p, ":%s NOTICE %s :Connect: missing port number",
248			me.name, source_p->name);
249			return;
250			}
251
252			if (find_servconn_in_progress(conf->name))
253			{
254			sendto_one(source_p, ":%s NOTICE %s :Connect: a connection to %s "
255			"is already in progress.", me.name, source_p->name, conf->name);
256			return;
257			}
258
259			/*
260			* Notify all operators about remote connect requests
261			*/
262			sendto_wallops_flags(UMODE_WALLOP, &me, "Remote CONNECT %s %d from %s",
263			parv[1], port, source_p->name);
264	michael	1474	sendto_server(NULL, NOCAPS, CAP_TS6,
265	adx	30	":%s WALLOPS :Remote CONNECT %s %d from %s",
266			me.name, parv[1], port, source_p->name);
267	michael	1474	sendto_server(NULL, CAP_TS6, NOCAPS,
268	michael	1463	":%s WALLOPS :Remote CONNECT %s %d from %s",
269			me.id, parv[1], port, source_p->name);
270	adx	30
271	michael	1247	ilog(LOG_TYPE_IRCD, "CONNECT From %s : %s %d",
272	adx	30	source_p->name, parv[1], port);
273
274	michael	1632	conf->port = port;
275	adx	30
276	michael	885	/*
277			* At this point we should be calling connect_server with a valid
278	adx	30	* C:line and a valid port in the C:line
279			*/
280	michael	1632	if (serv_connect(conf, source_p))
281	adx	30	sendto_one(source_p, ":%s NOTICE %s :*** Connecting to %s.%d",
282	michael	1632	me.name, source_p->name, conf->name, conf->port);
283	adx	30	else
284			sendto_one(source_p, ":%s NOTICE %s :*** Couldn't connect to %s.%d",
285	michael	1632	me.name, source_p->name, conf->name, conf->port);
286	michael	885	/*
287			* Client is either connecting with all the data it needs or has been
288	adx	30	* destroyed
289			*/
290	michael	1632	conf->port = tmpport;
291	adx	30	}
292	michael	1230
293			static struct Message connect_msgtab = {
294			"CONNECT", 0, 0, 2, MAXPARA, MFLG_SLOW, 0,
295			{ m_unregistered, m_not_oper, ms_connect, m_ignore, mo_connect, m_ignore }
296			};
297
298			static void
299			module_init(void)
300			{
301			mod_add_cmd(&connect_msgtab);
302			}
303
304			static void
305			module_exit(void)
306			{
307			mod_del_cmd(&connect_msgtab);
308			}
309
310			struct module module_entry = {
311			.node = { NULL, NULL, NULL },
312			.name = NULL,
313			.version = "$Revision$",
314			.handle = NULL,
315			.modinit = module_init,
316			.modexit = module_exit,
317			.flags = 0
318			};