2 * ircd-ratbox: A slightly useful ircd.
3 * listener.c: Listens on a port.
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2005 ircd-ratbox development team
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
24 * $Id: listener.c 25169 2008-03-29 21:41:31Z jilles $
29 #include "ratbox_lib.h"
36 #include "s_newconf.h"
45 static rb_dlink_list listener_list
;
46 static int accept_precallback(rb_fde_t
*F
, struct sockaddr
*addr
, rb_socklen_t addrlen
, void *data
);
47 static void accept_callback(rb_fde_t
*F
, int status
, struct sockaddr
*addr
, rb_socklen_t addrlen
, void *data
);
51 static struct Listener
*
52 make_listener(struct rb_sockaddr_storage
*addr
)
54 struct Listener
*listener
= rb_malloc(sizeof(struct Listener
));
55 s_assert(0 != listener
);
56 listener
->name
= ServerInfo
.name
; /* me.name may not be valid yet -- jilles */
58 memcpy(&listener
->addr
, addr
, sizeof(struct rb_sockaddr_storage
));
63 free_listener(struct Listener
*listener
)
65 s_assert(NULL
!= listener
);
69 rb_dlinkDelete(&listener
->node
, &listener_list
);
73 #define PORTNAMELEN 6 /* ":31337" */
76 * get_listener_name - return displayable listener name and port
77 * returns "host.foo.org:6667" for a given listener
80 get_listener_name(struct Listener
*listener
)
82 static char buf
[HOSTLEN
+ HOSTLEN
+ PORTNAMELEN
+ 4];
85 s_assert(NULL
!= listener
);
90 if(GET_SS_FAMILY(&listener
->addr
) == AF_INET6
)
91 port
= ntohs(((const struct sockaddr_in6
*)&listener
->addr
)->sin6_port
);
94 port
= ntohs(((const struct sockaddr_in
*)&listener
->addr
)->sin_port
);
96 rb_snprintf(buf
, sizeof(buf
), "%s[%s/%u]", me
.name
, listener
->name
, port
);
101 * show_ports - send port listing to a client
102 * inputs - pointer to client to show ports to
104 * side effects - show ports
107 show_ports(struct Client
*source_p
)
109 struct Listener
*listener
;
112 RB_DLINK_FOREACH(ptr
, listener_list
.head
)
114 listener
= ptr
->data
;
115 sendto_one_numeric(source_p
, RPL_STATSPLINE
,
116 form_str(RPL_STATSPLINE
), 'P',
118 ntohs(GET_SS_FAMILY(&listener
->addr
) == AF_INET
? ((struct sockaddr_in
*)&listener
->addr
)->sin_port
:
119 ((struct sockaddr_in6
*)&listener
->addr
)->sin6_port
),
121 ntohs(((struct sockaddr_in
*)&listener
->addr
)->sin_port
),
123 IsOperAdmin(source_p
) ? listener
->name
: me
.name
,
124 listener
->ref_count
, (listener
->active
) ? "active" : "disabled",
125 listener
->ssl
? " ssl" : "");
130 * inetport - create a listener socket in the AF_INET or AF_INET6 domain,
131 * bind it to the port given in 'port' and listen to it
132 * returns true (1) if successful false (0) on error.
134 * If the operating system has a define for SOMAXCONN, use it, otherwise
135 * use RATBOX_SOMAXCONN
138 #undef RATBOX_SOMAXCONN
139 #define RATBOX_SOMAXCONN SOMAXCONN
143 inetport(struct Listener
*listener
)
150 * At first, open a new socket
153 F
= rb_socket(GET_SS_FAMILY(&listener
->addr
), SOCK_STREAM
, 0, "Listener socket");
156 if(GET_SS_FAMILY(&listener
->addr
) == AF_INET6
)
158 struct sockaddr_in6
*in6
= (struct sockaddr_in6
*)&listener
->addr
;
159 if(!IN6_ARE_ADDR_EQUAL(&in6
->sin6_addr
, &in6addr_any
))
161 rb_inet_ntop(AF_INET6
, &in6
->sin6_addr
, listener
->vhost
, sizeof(listener
->vhost
));
162 listener
->name
= listener
->vhost
;
167 struct sockaddr_in
*in
= (struct sockaddr_in
*)&listener
->addr
;
168 if(in
->sin_addr
.s_addr
!= INADDR_ANY
)
170 rb_inet_ntop(AF_INET
, &in
->sin_addr
, listener
->vhost
, sizeof(listener
->vhost
));
171 listener
->name
= listener
->vhost
;
178 report_error("opening listener socket %s:%s",
179 get_listener_name(listener
),
180 get_listener_name(listener
), errno
);
183 else if((maxconnections
- 10) < rb_get_fd(F
)) /* XXX this is kinda bogus*/
185 report_error("no more connections left for listener %s:%s",
186 get_listener_name(listener
),
187 get_listener_name(listener
), errno
);
192 * XXX - we don't want to do all this crap for a listener
193 * set_sock_opts(listener);
195 if(setsockopt(rb_get_fd(F
), SOL_SOCKET
, SO_REUSEADDR
, (char *) &opt
, sizeof(opt
)))
197 report_error("setting SO_REUSEADDR for listener %s:%s",
198 get_listener_name(listener
),
199 get_listener_name(listener
), errno
);
205 * Bind a port to listen for new connections if port is non-null,
206 * else assume it is already open and try get something from it.
209 if(bind(rb_get_fd(F
), (struct sockaddr
*) &listener
->addr
, GET_SS_LEN(&listener
->addr
)))
211 report_error("binding listener socket %s:%s",
212 get_listener_name(listener
),
213 get_listener_name(listener
), errno
);
218 if((ret
= rb_listen(F
, RATBOX_SOMAXCONN
)))
220 report_error("listen failed for %s:%s",
221 get_listener_name(listener
),
222 get_listener_name(listener
), errno
);
229 rb_accept_tcp(listener
->F
, accept_precallback
, accept_callback
, listener
);
233 static struct Listener
*
234 find_listener(struct rb_sockaddr_storage
*addr
)
236 struct Listener
*listener
= NULL
;
237 struct Listener
*last_closed
= NULL
;
240 RB_DLINK_FOREACH(ptr
, listener_list
.head
)
242 listener
= ptr
->data
;
243 if(GET_SS_FAMILY(addr
) != GET_SS_FAMILY(&listener
->addr
))
246 switch(GET_SS_FAMILY(addr
))
250 struct sockaddr_in
*in4
= (struct sockaddr_in
*)addr
;
251 struct sockaddr_in
*lin4
= (struct sockaddr_in
*)&listener
->addr
;
252 if(in4
->sin_addr
.s_addr
== lin4
->sin_addr
.s_addr
&&
253 in4
->sin_port
== lin4
->sin_port
)
255 if(listener
->F
== NULL
)
256 last_closed
= listener
;
265 struct sockaddr_in6
*in6
= (struct sockaddr_in6
*)addr
;
266 struct sockaddr_in6
*lin6
=(struct sockaddr_in6
*)&listener
->addr
;
267 if(IN6_ARE_ADDR_EQUAL(&in6
->sin6_addr
, &lin6
->sin6_addr
) &&
268 in6
->sin6_port
== lin6
->sin6_port
)
270 if(listener
->F
== NULL
)
271 last_closed
= listener
;
288 * add_listener- create a new listener
289 * port - the port number to listen on
290 * vhost_ip - if non-null must contain a valid IP address string in
291 * the format "255.255.255.255"
294 add_listener(int port
, const char *vhost_ip
, int family
, int ssl
)
296 struct Listener
*listener
;
297 struct rb_sockaddr_storage vaddr
;
300 * if no port in conf line, don't bother
305 memset(&vaddr
, 0, sizeof(vaddr
));
306 GET_SS_FAMILY(&vaddr
) = family
;
310 if(rb_inet_pton_sock(vhost_ip
, (struct sockaddr
*)&vaddr
) <= 0)
317 ((struct sockaddr_in
*)&vaddr
)->sin_addr
.s_addr
= INADDR_ANY
;
321 memcpy(&((struct sockaddr_in6
*)&vaddr
)->sin6_addr
, &in6addr_any
, sizeof(struct in6_addr
));
331 SET_SS_LEN(&vaddr
, sizeof(struct sockaddr_in
));
332 ((struct sockaddr_in
*)&vaddr
)->sin_port
= htons(port
);
336 SET_SS_LEN(&vaddr
, sizeof(struct sockaddr_in6
));
337 ((struct sockaddr_in6
*)&vaddr
)->sin6_port
= htons(port
);
343 if((listener
= find_listener(&vaddr
)))
345 if(listener
->F
!= NULL
)
350 listener
= make_listener(&vaddr
);
351 rb_dlinkAdd(listener
, &listener
->node
, &listener_list
);
356 if(inetport(listener
))
357 listener
->active
= 1;
359 close_listener(listener
);
363 * close_listener - close a single listener
366 close_listener(struct Listener
*listener
)
368 s_assert(listener
!= NULL
);
371 if(listener
->F
!= NULL
)
373 rb_close(listener
->F
);
377 listener
->active
= 0;
379 if(listener
->ref_count
)
382 free_listener(listener
);
386 * close_listeners - close and free all listeners that are not being used
391 struct Listener
*listener
;
392 rb_dlink_node
*ptr
, *next
;
394 RB_DLINK_FOREACH_SAFE(ptr
, next
, listener_list
.head
)
396 listener
= ptr
->data
;
397 close_listener(listener
);
402 * add_connection - creates a client which has just connected to us on
403 * the given fd. The sockhost field is initialized with the ip# of the host.
404 * The client is sent to the auth module for verification, and not put in
405 * any client list yet.
408 add_connection(struct Listener
*listener
, rb_fde_t
*F
, struct sockaddr
*sai
, struct sockaddr
*lai
, void *ssl_ctl
)
410 struct Client
*new_client
;
411 s_assert(NULL
!= listener
);
413 * get the client socket name from the socket
414 * the client has already been checked out in accept_connection
416 new_client
= make_client(NULL
);
418 memcpy(&new_client
->localClient
->ip
, sai
, sizeof(struct rb_sockaddr_storage
));
419 new_client
->localClient
->lip
= rb_malloc(sizeof(struct rb_sockaddr_storage
));
420 memcpy(new_client
->localClient
->lip
, lai
, sizeof(struct rb_sockaddr_storage
));
423 * copy address to 'sockhost' as a string, copy it to host too
424 * so we have something valid to put into error messages...
426 rb_inet_ntop_sock((struct sockaddr
*)&new_client
->localClient
->ip
, new_client
->sockhost
,
427 sizeof(new_client
->sockhost
));
430 rb_strlcpy(new_client
->host
, new_client
->sockhost
, sizeof(new_client
->host
));
433 if(GET_SS_FAMILY(&new_client
->localClient
->ip
) == AF_INET6
&& ConfigFileEntry
.dot_in_ip6_addr
== 1)
435 rb_strlcat(new_client
->host
, ".", sizeof(new_client
->host
));
439 new_client
->localClient
->F
= F
;
440 add_to_cli_fd_hash(new_client
);
441 new_client
->localClient
->listener
= listener
;
442 new_client
->localClient
->ssl_ctl
= ssl_ctl
;
443 if(ssl_ctl
!= NULL
|| rb_fd_ssl(F
))
446 ++listener
->ref_count
;
448 start_auth(new_client
);
451 static time_t last_oper_notice
= 0;
453 static const char *toofast
= "ERROR :Reconnecting too fast, throttled.\r\n";
456 accept_precallback(rb_fde_t
*F
, struct sockaddr
*addr
, rb_socklen_t addrlen
, void *data
)
458 struct Listener
*listener
= (struct Listener
*)data
;
460 struct ConfItem
*aconf
;
462 if(listener
->ssl
&& (!ssl_ok
|| !get_ssld_count()))
464 fprintf(stderr
, "closed socket\n");
469 if((maxconnections
- 10) < rb_get_fd(F
)) /* XXX this is kinda bogus */
471 ++ServerStats
.is_ref
;
473 * slow down the whining to opers bit
475 if((last_oper_notice
+ 20) <= rb_current_time())
477 sendto_realops_flags(UMODE_ALL
, L_ALL
,
478 "All connections in use. (%s)",
479 get_listener_name(listener
));
480 last_oper_notice
= rb_current_time();
483 rb_write(F
, "ERROR :All connections in use\r\n", 32);
485 /* Re-register a new IO request for the next accept .. */
489 aconf
= find_dline(addr
);
490 if(aconf
!= NULL
&& (aconf
->status
& CONF_EXEMPTDLINE
))
493 /* Do an initial check we aren't connecting too fast or with too many
497 ServerStats
.is_ref
++;
499 if(ConfigFileEntry
.dline_with_reason
)
501 if (rb_snprintf(buf
, sizeof(buf
), "ERROR :*** Banned: %s\r\n", aconf
->passwd
) >= (int)(sizeof(buf
)-1))
503 buf
[sizeof(buf
) - 3] = '\r';
504 buf
[sizeof(buf
) - 2] = '\n';
505 buf
[sizeof(buf
) - 1] = '\0';
509 strcpy(buf
, "ERROR :You have been D-lined.\r\n");
511 rb_write(F
, buf
, strlen(buf
));
516 if(check_reject(F
, addr
))
519 if(throttle_add(addr
))
521 rb_write(F
, toofast
, strlen(toofast
));
530 accept_ssld(rb_fde_t
*F
, struct sockaddr
*addr
, struct sockaddr
*laddr
, struct Listener
*listener
)
534 rb_socketpair(AF_UNIX
, SOCK_STREAM
, 0, &xF
[0], &xF
[1], "Incoming ssld Connection");
535 ctl
= start_ssld_accept(F
, xF
[1], rb_get_fd(xF
[0])); /* this will close F for us */
536 add_connection(listener
, xF
[0], addr
, laddr
, ctl
);
540 accept_callback(rb_fde_t
*F
, int status
, struct sockaddr
*addr
, rb_socklen_t addrlen
, void *data
)
542 struct Listener
*listener
= data
;
543 struct rb_sockaddr_storage lip
;
544 unsigned int locallen
= sizeof(struct rb_sockaddr_storage
);
547 if(getsockname(rb_get_fd(F
), (struct sockaddr
*) &lip
, &locallen
) < 0)
549 /* this shouldn't fail so... */
550 /* XXX add logging of this */
554 accept_ssld(F
, addr
, (struct sockaddr
*)&lip
, listener
);
556 add_connection(listener
, F
, addr
, (struct sockaddr
*)&lip
, NULL
);