* 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
***************************************************************************/
+#include <stdio.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <sys/un.h>
+#include <sys/time.h>
+#include <arpa/inet.h>
+#include <netinet/in.h>
+#include <netdb.h>
+#include <fcntl.h>
+#include <time.h>
+#include <pwd.h>
+#include <grp.h>
+
+#include <sstream>
+
#include "socket_server.hxx"
+#include "t2n_exception.hxx"
+
+using namespace std;
namespace libt2n
{
socket_server::socket_server(int port, const char* ip)
: server()
{
- type=tcp;
+ socket_type=tcp_s;
}
-socket_server::socket_server(const char* path, mode_t chmod, const char* user, const char* group)
+socket_server::socket_server(const char* path, mode_t filemode, const char* user, const char* group)
: server()
{
- type=unix;
+ socket_type=unix_s;
unix_path=path;
- struct sockaddr_un unix_name;
-
/* Create the socket. */
- socket = socket (PF_UNIX, SOCK_STREAM, 0);
- if (socket < 0)
+ sock = socket (PF_UNIX, SOCK_STREAM, 0);
+ if (sock < 0)
{
string err="error opening socket: ";
- err+=::strerror(errno);
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ set_socket_options(sock);
+
+ /* Give the socket a name. */
+ struct sockaddr_un unix_name;
+ unix_name.sun_family = AF_UNIX;
+ strncpy (unix_name.sun_path, unix_path.c_str(),sizeof(unix_name.sun_path));
+
+ /* just to make sure there is no other socket file */
+ unlink (unix_name.sun_path);
+
+ if (bind (sock, (struct sockaddr *) &unix_name, sizeof (unix_name)) < 0)
+ {
+ string err="error binding socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ /* change permissions */
+ if (chmod (unix_name.sun_path, filemode) != 0)
+ {
+ string err="error changing permission: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ struct passwd *socket_user = getpwnam (user);
+ if (socket_user == NULL)
+ {
+ string err="error getting socket user: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ struct group *socket_group = getgrnam (group);
+ if (socket_group == NULL)
+ {
+ string err="error getting socket group: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ if (chown (unix_name.sun_path, socket_user->pw_uid, socket_group->gr_gid) != 0)
+ {
+ string err="error changing socket ownership: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ if (listen (sock, 5) < 0)
+ {
+ string err="error listening to socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
-// throw EXCEPTION(network_server_error,err);
+ /* clear & insert server sock into the fd_tab to prepare select */
+ FD_ZERO(&connection_set);
+ FD_SET (sock, &connection_set);
+}
+
+void socket_server::set_socket_options(int sock)
+{
+ int i=1;
+
+ /* fast reuse enable */
+ if (setsockopt(sock,SOL_SOCKET, SO_REUSEADDR, &i, sizeof(i)) < 0)
+ {
+ string err="error setting socket option: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ /* keepalive enable */
+ if (setsockopt(sock,SOL_SOCKET, SO_KEEPALIVE, &i, sizeof(i)) < 0)
+ {
+ string err="error setting socket option: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
}
+ /* close on exec */
+ int fdflags;
+ fdflags=fcntl(sock,F_GETFD, 0);
+ if (fdflags < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+ fdflags |= FD_CLOEXEC;
+ if (fcntl(sock,F_SETFD,fdflags) < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ /* non-blocking mode */
+ int flflags;
+ flflags=fcntl(sock,F_GETFL,0);
+ if (flflags < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+ flflags |= O_NONBLOCK;
+ if (fcntl(sock,F_SETFL,flflags) < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
}
socket_server::~socket_server()
{
- close(socket);
+ close(sock);
- if (type==unix)
+ if (socket_type==unix_s)
unlink(unix_path.c_str());
}
+void socket_server::new_connection()
+{
+ struct sockaddr_un clientname;
+
+ unsigned int size = sizeof (clientname);
+ int newsock = accept (sock,(struct sockaddr *) &clientname,&size);
+ if (newsock < 0)
+ {
+ if (errno == EAGAIN)
+ {
+ log(error, "accept error (EAGAIN): no connection waiting");
+ return;
+ }
+
+ /* default: break */
+ string err="error accepting connection: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ FD_SET (newsock, &connection_set);
+
+ int i=1;
+
+ /* keepalive enable */
+ if (setsockopt(newsock,SOL_SOCKET, SO_KEEPALIVE, &i, sizeof(i)) < 0)
+ {
+ string err="error setting socket option: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ /* close on exec */
+ int fdflags;
+ fdflags=fcntl(newsock,F_GETFD, 0);
+ if (fdflags < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+ fdflags |= FD_CLOEXEC;
+ if (fcntl(newsock,F_SETFD,fdflags) < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+
+ /* non-blocking mode */
+ int flflags;
+ flflags=fcntl(newsock,F_GETFL,0);
+ if (flflags < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+ flflags |= O_NONBLOCK;
+ if (fcntl(newsock,F_SETFL,flflags) < 0)
+ {
+ string err="fcntl error on socket: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+ add_connection(new socket_connection(newsock, get_default_timeout()));
+
+ return;
+}
void socket_server::fill_buffer(long long usec_timeout)
{
+ fd_set used_fdset=connection_set;
+
+ /* set timeout */
+ struct timeval tval;
+ struct timeval *timeout_ptr;
+
+ if (usec_timeout == -1)
+ timeout_ptr = NULL;
+ else
+ {
+ timeout_ptr = &tval;
+ // timeout von long long usec in int sec + int usec umrechnen
+ tval.tv_sec = usec_timeout / 1000000;
+ tval.tv_usec = usec_timeout % 1000000;
+ }
+
+ int ret=select (FD_SETSIZE, &used_fdset, NULL, NULL, timeout_ptr);
+
+ if (ret < 0)
+ {
+ if (errno == EINTR)
+ {
+ // select interrupted by signal
+ ret=0;
+ }
+ else
+ {
+ string err="select error: ";
+ err+=strerror(errno);
+ log(error, err);
+ throw t2n_server_error(err);
+ }
+ }
+
+ if (ret > 0)
+ {
+ // we have data pending
+
+ // check for new connection
+ if (FD_ISSET (sock, &used_fdset))
+ {
+ new_connection();
+ }
+
+ // check all connections for pending data
+ fill_connection_buffers();
+ }
+
+ return;
}
-socket_connection::socket_connection(int _socket, int _timeout)
- : connection(_timeout)
+void socket_server::fill_connection_buffers()
{
+ std::map<unsigned int, connection*>::iterator ie=connections.end();
+ for(std::map<unsigned int, connection*>::iterator i=connections.begin(); i != ie; i++)
+ if (!i->second->is_closed())
+ {
+ socket_connection* cp=dynamic_cast<socket_connection*>(i->second);
+ cp->fill_buffer(connection_set);
+ }
+}
+socket_connection::socket_connection(int _sock, int _timeout)
+ : connection(_timeout)
+{
+ sock=_sock;
}
void socket_connection::close()
}
-void socket_connection::fill_buffer(void)
+void socket_connection::fill_buffer(fd_set &cur_fdset)
{
+ bool try_again=false;
+
+ if (is_closed() || !FD_ISSET (sock, &cur_fdset))
+ return; // no data pending or connection closed
+
+ // data pending -> go and get it
+ char socket_buffer[recv_buffer_size];
+
+ int nbytes = read (sock, socket_buffer, recv_buffer_size);
+ if (nbytes < 0)
+ {
+ if (errno == EAGAIN)
+ {
+ if (my_server)
+ my_server->log(server::error,"read error: no data (EAGAIN) for connection "+get_id_string());
+ return;
+ }
+ else if (errno == EINTR)
+ {
+ // interrupted, try again
+ try_again=true;
+ }
+ else
+ {
+ if (my_server)
+ my_server->log(server::error,"error reading from socket of connection "+get_id_string()+": "+strerror(errno));
+ return;
+ }
+ }
+
+ // End-of-file
+ if (nbytes == 0 && !try_again)
+ {
+ close();
+ return;
+ }
+
+ // Data read -> store it
+ if (nbytes > 0)
+ buffer.assign(socket_buffer,nbytes);
+
+ // more data waiting?
+ fd_set active_fd_set;
+ struct timeval tval;
+
+ FD_ZERO (&active_fd_set);
+ FD_SET (sock, &active_fd_set);
+
+ /* no waiting */
+ tval.tv_sec=0;
+ tval.tv_usec=0;
+
+ if (select (FD_SETSIZE, &active_fd_set, NULL, NULL, &tval) >0)
+ {
+ /* more data waiting -> recurse */
+ fill_buffer(active_fd_set);
+ }
+ reset_timeout();
+
+ return;
}
void socket_connection::write(const std::string& data)
{
+ static const unsigned int write_block_size=4096;
+
+ if (is_closed())
+ return;
+
+ // prepend packet size to data
+ packet_size_indicator psize=data.size();
+ string send_data(data);
+ send_data.insert(0,(char*)psize,sizeof(packet_size_indicator));
+
+ int offset = 0;
+ while (offset < send_data.size())
+ {
+ unsigned int write_size=write_block_size;
+
+ if (offset+write_size > send_data.size())
+ write_size = send_data.size()-offset;
+
+ int rtn;
+ while ((rtn=::write(sock, send_data.data()+offset, write_size)) &&
+ rtn == -1 && (errno == EAGAIN || errno == EINTR))
+ {
+ usleep (80000);
+ if (my_server)
+ my_server->log(server::debug,"resuming write() call after EAGAIN or EINTR for connection "+get_id_string());
+ }
+
+ if (rtn == -1)
+ {
+ if (my_server)
+ my_server->log(server::error,"write() error on connection "+get_id_string()+": "+strerror(errno));
+ }
+ else if (rtn != write_size)
+ {
+ if (my_server)
+ {
+ ostringstream msg;
+ msg << "write() error on connection " << get_id()
+ << ": wrote " << rtn << " bytes, should have been "
+ << write_size << " (complete: " << send_data.size() << ")";
+
+ my_server->log(server::error,msg.str());
+ }
+ }
+
+ offset += write_size;
+ }
+
+ reset_timeout();
+ return;
}
}