uhub/src/netevent.c

341 lines
7.0 KiB
C
Raw Normal View History

2009-02-19 16:14:09 +00:00
/*
* uhub - A tiny ADC p2p connection hub
* Copyright (C) 2007-2009, Jan Vidar Krey
*
* 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 3 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, see <http://www.gnu.org/licenses/>.
*
*/
#include "uhub.h"
#include "hubio.h"
2009-02-19 16:14:09 +00:00
/* FIXME: This should not be needed! */
extern struct hub_info* g_hub;
2009-02-19 16:14:09 +00:00
2009-06-22 16:44:07 +00:00
#ifdef DEBUG_SENDQ
void debug_sendq_send(struct user* user, int sent, int total)
{
printf("SEND: sd=%d, %d/%d bytes\n", user->net.sd, sent, total);
if (sent == -1)
{
int err = net_error();
printf(" errno: %d - %s\n", err, net_error_string(err));
}
}
void debug_sendq_recv(struct user* user, int received, int max, const char* buffer)
{
printf("RECV: %d/%d bytes\n", ret, (int) len);
if (ret == -1)
{
int err = net_error();
printf(" errno: %d - %s\n", err, net_error_string(err));
}
else if (ret > 0)
{
char* data = hub_malloc_zero(ret + 1);
memcpy(data, buf, ret);
printf("RECV: \"%s\"\n", data);
hub_free(data);
}
}
#endif
int net_user_send(void* ptr, const void* buf, size_t len)
{
struct user* user = (struct user*) ptr;
int ret = net_send(user->net.sd, buf, len, UHUB_SEND_SIGNAL);
2009-05-26 19:05:06 +00:00
#ifdef DEBUG_SENDQ
2009-06-22 16:44:07 +00:00
debug_sendq_send(user, ret, len);
#endif
if (ret > 0)
2009-05-26 19:05:06 +00:00
{
2009-06-22 16:44:07 +00:00
user_reset_last_write(user);
}
else if (ret == -1 && net_error() == EWOULDBLOCK)
{
return -2;
}
else
{
// user->close_flag = quit_socket_error;
return 0;
2009-05-26 19:05:06 +00:00
}
2009-06-22 16:44:07 +00:00
return ret;
}
#ifdef SSL_SUPPORT
int net_user_send_ssl(void* ptr, const void* buf, size_t len)
{
struct user* user = (struct user*) ptr;
int ret = SSL_write(user->net.ssl, buf, (int) len);
#ifdef DEBUG_SENDQ
debug_sendq_send(user, ret, len);
2009-05-26 19:05:06 +00:00
#endif
if (ret > 0)
{
2009-06-22 16:44:07 +00:00
user_reset_last_write(user);
}
else if (ret == -1 && net_error() == EWOULDBLOCK)
{
return -2;
}
else
{
// user->close_flag = quit_socket_error;
return 0;
}
return ret;
}
2009-06-22 16:44:07 +00:00
#endif
int net_user_recv(void* ptr, void* buf, size_t len)
{
struct user* user = (struct user*) ptr;
2009-06-22 16:44:07 +00:00
int ret = net_recv(user->net.sd, buf, len, 0);
if (ret > 0)
{
2009-06-22 16:44:07 +00:00
user_reset_last_read(user);
}
2009-06-22 16:44:07 +00:00
#ifdef DEBUG_SENDQ
debug_sendq_recv(user, ret, len, buf);
#endif
return ret;
}
2009-06-22 16:44:07 +00:00
#ifdef SSL_SUPPORT
int net_user_recv_ssl(void* ptr, void* buf, size_t len)
{
struct user* user = (struct user*) ptr;
int ret = SSL_read(user->net.ssl, buf, len);
2009-05-26 19:05:06 +00:00
if (ret > 0)
{
2009-06-22 16:44:07 +00:00
user_reset_last_read(user);
}
2009-06-22 16:44:07 +00:00
#ifdef DEBUG_SENDQ
debug_sendq_recv(user, ret, len, buf);
2009-05-26 19:05:06 +00:00
#endif
return ret;
}
2009-06-22 16:44:07 +00:00
#endif
2009-02-19 16:14:09 +00:00
void net_on_read(int fd, short ev, void *arg)
{
static char buf[MAX_RECV_BUF];
2009-02-19 16:14:09 +00:00
struct user* user = (struct user*) arg;
struct hub_recvq* q = user->net.recv_queue;
size_t buf_size;
2009-02-19 16:14:09 +00:00
int more = 1;
int flag_close = 0;
2009-06-22 16:44:07 +00:00
#ifdef DEBUG_SENDQ
2009-02-19 16:14:09 +00:00
hub_log(log_trace, "net_on_read() : fd=%d, ev=%d, arg=%p", fd, (int) ev, arg);
2009-06-22 16:44:07 +00:00
#endif
2009-02-19 16:14:09 +00:00
if (ev == EV_TIMEOUT)
{
more = 0;
if (user_is_connecting(user))
{
flag_close = quit_timeout;
}
else
{
// FIXME: hub is not neccesarily set!
// hub_send_ping(hub, user);
2009-02-19 16:14:09 +00:00
}
}
buf_size = hub_recvq_get(q, buf, MAX_RECV_BUF);
int size = net_user_recv(user, &buf[buf_size], MAX_RECV_BUF - buf_size);
if (size > 0)
2009-02-19 16:14:09 +00:00
{
buf_size += size;
}
if (size == -1)
{
if (net_error() != EWOULDBLOCK)
flag_close = quit_socket_error;
}
else if (size == 0)
{
flag_close = quit_disconnected;
}
else
{
size_t offset = 0;
size_t length;
char* start = buf;
char* pos = 0;
while ((pos = memchr(start, '\n', (buf_size - offset))))
2009-02-19 16:14:09 +00:00
{
char* line = start;
length = pos - start;
pos[0] = '\0';
2009-05-26 19:05:06 +00:00
#ifdef DEBUG_SENDQ
printf("PROC: \"%s\" (%d)\n", line, (int) length);
2009-05-26 19:05:06 +00:00
#endif
if (hub_handle_message(g_hub, user, line, length) == -1)
2009-05-26 19:05:06 +00:00
{
flag_close = quit_protocol_error;
break;
2009-02-19 16:14:09 +00:00
}
start = pos;
start++;
offset += length;
}
if (start < buf + buf_size)
{
hub_recvq_set(q, buf+offset, buf_size);
}
else
{
hub_recvq_set(q, 0, 0);
2009-02-19 16:14:09 +00:00
}
}
2009-02-19 16:14:09 +00:00
if (flag_close)
{
hub_disconnect_user(g_hub, user, flag_close);
2009-02-19 16:14:09 +00:00
return;
}
if (user_is_logged_in(user))
{
if (user->net.ev_read)
2009-02-19 16:14:09 +00:00
{
struct timeval timeout = { TIMEOUT_IDLE, 0 };
event_add(user->net.ev_read, &timeout);
2009-02-19 16:14:09 +00:00
}
}
else if (user_is_connecting(user))
{
if (user->net.ev_read)
2009-02-19 16:14:09 +00:00
{
struct timeval timeout = { TIMEOUT_HANDSHAKE, 0 };
event_add(user->net.ev_read, &timeout);
2009-02-19 16:14:09 +00:00
}
}
}
void net_on_write(int fd, short ev, void *arg)
{
struct user* user = (struct user*) arg;
int sent = 0;
for (;;)
2009-02-19 16:14:09 +00:00
{
int ret = hub_sendq_send(user->net.send_queue, net_user_send, user);
if (ret > 0)
sent += ret;
2009-02-19 16:14:09 +00:00
else
break;
}
if (hub_sendq_get_bytes(user->net.send_queue))
2009-02-19 16:14:09 +00:00
{
2009-05-27 23:48:31 +00:00
user_net_io_want_write(user);
2009-02-19 16:14:09 +00:00
}
}
static void prepare_user_net(struct hub_info* hub, struct user* user)
{
int fd = user->net.sd;
struct timeval timeout = { TIMEOUT_CONNECTED, 0 };
size_t sendbuf = 0;
size_t recvbuf = 0;
net_set_nonblocking(fd, 1);
net_set_nosigpipe(fd, 1);
if (net_get_recvbuf_size(fd, &recvbuf) != -1)
{
if (recvbuf > MAX_RECV_BUF || !recvbuf) recvbuf = MAX_RECV_BUF;
net_set_recvbuf_size(fd, recvbuf);
}
if (net_get_sendbuf_size(fd, &sendbuf) != -1)
{
if (sendbuf > MAX_SEND_BUF || !sendbuf) sendbuf = MAX_SEND_BUF;
net_set_sendbuf_size(fd, sendbuf);
}
event_set(user->net.ev_read, fd, EV_READ | EV_PERSIST, net_on_read, user);
event_set(user->net.ev_write, fd, EV_WRITE, net_on_write, user);
event_base_set(hub->evbase, user->net.ev_read);
event_base_set(hub->evbase, user->net.ev_write);
event_add(user->net.ev_read, &timeout);
}
2009-02-19 16:14:09 +00:00
void net_on_accept(int server_fd, short ev, void *arg)
{
struct hub_info* hub = (struct hub_info*) arg;
struct user* user = 0;
struct ip_addr_encap ipaddr;
2009-02-19 16:14:09 +00:00
const char* addr;
for (;;)
2009-02-19 16:14:09 +00:00
{
int fd = net_accept(server_fd, &ipaddr);
2009-02-19 16:14:09 +00:00
if (fd == -1)
{
if (net_error() == EWOULDBLOCK)
{
break;
}
else
{
hub_log(log_error, "Accept error: %d %s", net_error(), strerror(net_error()));
break;
}
}
addr = ip_convert_to_string(&ipaddr);
2009-02-19 16:14:09 +00:00
/* FIXME: Should have a plugin log this */
hub_log(log_trace, "Got connection from %s", addr);
/* FIXME: A plugin should perform this check: is IP banned? */
if (acl_is_ip_banned(hub->acl, addr))
{
hub_log(log_info, "Denied [%s] (IP banned)", addr);
net_close(fd);
continue;
}
user = user_create(hub, fd);
if (!user)
{
hub_log(log_error, "Unable to create user after socket accepted. Out of memory?");
net_close(fd);
break;
}
/* Store IP address in user object */
memcpy(&user->net.ipaddr, &ipaddr, sizeof(ipaddr));
prepare_user_net(hub, user);
2009-02-19 16:14:09 +00:00
}
}