#include <signal.h>
#include <sys/types.h>
-#ifdef __MINGW32__
-#include <winsock2.h>
-typedef int socklen_t;
-#else
#include <sys/socket.h>
+#include <netdb.h>
#include <netinet/in.h>
-#endif
#include <errno.h>
+#include <syslog.h>
#include <guacamole/client.h>
-#include <guacamole/thread.h>
-#include <guacamole/log.h>
-
-/* Windows / MINGW32 handles closing sockets differently */
-#ifdef __MINGW32__
-#define CLOSE_SOCKET(socket) closesocket(socket)
-#else
-#define CLOSE_SOCKET(socket) close(socket)
-#endif
-
-
-/* Cross-platform strerror()/errno clone */
-char error[65536];
-char* lasterror() {
-#ifdef __MINGW32__
- snprintf(error, sizeof(error)-1, "ERROR #%li", GetLastError());
- return error;
-#else
- return strerror(errno);
-#endif
-}
+#include <guacamole/error.h>
+
+#include "client.h"
+#include "log.h"
-typedef struct client_thread_data {
+void guacd_handle_connection(int fd) {
- int fd;
+ guac_client* client;
+ guac_client_plugin* plugin;
+ guac_instruction* select;
+ guac_instruction* connect;
-} client_thread_data;
+ /* Open guac_socket */
+ guac_socket* socket = guac_socket_open(fd);
+ /* Get protocol from select instruction */
+ select = guac_protocol_expect_instruction(
+ socket, GUACD_USEC_TIMEOUT, "select");
+ if (select == NULL) {
-void* start_client_thread(void* data) {
+ /* Log error */
+ guacd_log_guac_error("Error reading \"select\"");
- guac_client* client;
- client_thread_data* thread_data = (client_thread_data*) data;
+ /* Free resources */
+ guac_socket_close(socket);
+ return;
+ }
+
+ /* Validate args to select */
+ if (select->argc != 1) {
+
+ /* Log error */
+ guacd_log_error("Bad number of arguments to \"select\" (%i)",
+ select->argc);
+
+ /* Free resources */
+ guac_socket_close(socket);
+ return;
+ }
+
+ guacd_log_info("Protocol \"%s\" selected", select->argv[0]);
+
+ /* Get plugin from protocol in select */
+ plugin = guac_client_plugin_open(select->argv[0]);
+ guac_instruction_free(select);
+
+ if (plugin == NULL) {
+
+ /* Log error */
+ guacd_log_guac_error("Error loading client plugin");
+
+ /* Free resources */
+ guac_socket_close(socket);
+ return;
+ }
+
+ /* Send args response */
+ if (guac_protocol_send_args(socket, plugin->args)
+ || guac_socket_flush(socket)) {
- guac_log_info("Spawning client");
+ /* Log error */
+ guacd_log_guac_error("Error sending \"args\"");
- /* Load and start client */
- client = guac_get_client(thread_data->fd);
+ if (guac_client_plugin_close(plugin))
+ guacd_log_guac_error("Error closing client plugin");
+
+ guac_socket_close(socket);
+ return;
+ }
+
+ /* Get args from connect instruction */
+ connect = guac_protocol_expect_instruction(
+ socket, GUACD_USEC_TIMEOUT, "connect");
+ if (connect == NULL) {
+
+ /* Log error */
+ guacd_log_guac_error("Error reading \"connect\"");
+
+ if (guac_client_plugin_close(plugin))
+ guacd_log_guac_error("Error closing client plugin");
+
+ guac_socket_close(socket);
+ return;
+ }
+
+ /* Load and init client */
+ client = guac_client_plugin_get_client(plugin, socket,
+ connect->argc, connect->argv,
+ guacd_client_log_info, guacd_client_log_error);
+
+ guac_instruction_free(connect);
if (client == NULL) {
- guac_log_error("Client retrieval failed");
- free(data);
- return NULL;
+
+ guacd_log_guac_error("Error instantiating client");
+
+ if (guac_client_plugin_close(plugin))
+ guacd_log_guac_error("Error closing client plugin");
+
+ guac_socket_close(socket);
+ return;
}
- guac_start_client(client);
- guac_free_client(client);
+ /* Start client threads */
+ guacd_log_info("Starting client");
+ if (guacd_client_start(client))
+ guacd_log_error("Client finished abnormally");
+ else
+ guacd_log_info("Client finished normally");
+
+ /* Clean up */
+ guac_client_free(client);
+ if (guac_client_plugin_close(plugin))
+ guacd_log_error("Error closing client plugin");
/* Close socket */
- if (CLOSE_SOCKET(thread_data->fd) < 0) {
- guac_log_error("Error closing connection: %s", lasterror());
- free(data);
- return NULL;
- }
+ guac_socket_close(socket);
- guac_log_info("Client finished");
- free(data);
- return NULL;
+ return;
}
/* Server */
int socket_fd;
- struct sockaddr_in server_addr;
- const char opt_on[] = {1};
+ struct addrinfo* addresses;
+ struct addrinfo* current_address;
+ char bound_address[1024];
+ char bound_port[64];
+ int opt_on = 1;
+
+ struct addrinfo hints = {
+ .ai_family = AF_UNSPEC,
+ .ai_socktype = SOCK_STREAM,
+ .ai_protocol = IPPROTO_TCP
+ };
/* Client */
struct sockaddr_in client_addr;
int connected_socket_fd;
/* Arguments */
- int listen_port = 4822; /* Default port */
+ char* listen_address = NULL; /* Default address of INADDR_ANY */
+ char* listen_port = "4822"; /* Default port */
+ char* pidfile = NULL;
int opt;
- char* pidfile = NULL;
+ /* General */
+ int retval;
/* Daemon Process */
pid_t daemon_pid;
-#ifdef __MINGW32__
- /* Structure for holding winsock version info */
- WSADATA wsadata;
-#endif
-
/* Parse arguments */
- while ((opt = getopt(argc, argv, "l:p:")) != -1) {
+ while ((opt = getopt(argc, argv, "l:b:p:")) != -1) {
if (opt == 'l') {
- listen_port = atoi(optarg);
- if (listen_port <= 0) {
- fprintf(stderr, "Invalid port: %s\n", optarg);
- exit(EXIT_FAILURE);
- }
+ listen_port = strdup(optarg);
+ }
+ else if (opt == 'b') {
+ listen_address = strdup(optarg);
}
else if (opt == 'p') {
pidfile = strdup(optarg);
}
else {
- fprintf(stderr, "USAGE: %s [-l LISTENPORT] [-p PIDFILE]\n", argv[0]);
+
+ fprintf(stderr, "USAGE: %s"
+ " [-l LISTENPORT]"
+ " [-b LISTENADDRESS]"
+ " [-p PIDFILE]\n", argv[0]);
+
exit(EXIT_FAILURE);
}
}
- /* Get binding address */
- memset(&server_addr, 0, sizeof(server_addr)); /* Zero struct */
- server_addr.sin_family = AF_INET;
- server_addr.sin_addr.s_addr = INADDR_ANY;
- server_addr.sin_port = htons(listen_port);
-
-#ifdef __MINGW32__
- /* If compiling for Windows, init winsock. */
- if (WSAStartup(MAKEWORD(1,1), &wsadata) == SOCKET_ERROR) {
- fprintf(stderr, "Error creating socket.");
+ /* Get addresses for binding */
+ if ((retval = getaddrinfo(listen_address, listen_port, &hints, &addresses))) {
+ guacd_log_error("Error parsing given address or port: %s",
+ gai_strerror(retval));
exit(EXIT_FAILURE);
}
-#endif
/* Get socket */
socket_fd = socket(AF_INET, SOCK_STREAM, 0);
if (socket_fd < 0) {
- fprintf(stderr, "Error opening socket: %s\n", lasterror());
+ guacd_log_error("Error opening socket: %s", strerror(errno));
exit(EXIT_FAILURE);
}
- if (setsockopt(socket_fd, SOL_SOCKET, SO_REUSEADDR, opt_on, sizeof(opt_on))) {
- fprintf(stderr, "Warning: Unable to set socket options for reuse: %s\n", lasterror());
+ /* Allow socket reuse */
+ if (setsockopt(socket_fd, SOL_SOCKET, SO_REUSEADDR, (void*) &opt_on, sizeof(opt_on))) {
+ guacd_log_info("Unable to set socket options for reuse: %s", strerror(errno));
}
- /* Bind socket to address */
- if (bind(socket_fd, (struct sockaddr*) &server_addr,
- sizeof(server_addr)) < 0) {
- fprintf(stderr, "Error binding socket: %s\n", lasterror());
+ /* Attempt binding of each address until success */
+ current_address = addresses;
+ while (current_address != NULL) {
+
+ int retval;
+
+ /* Resolve hostname */
+ if ((retval = getnameinfo(current_address->ai_addr,
+ current_address->ai_addrlen,
+ bound_address, sizeof(bound_address),
+ bound_port, sizeof(bound_port),
+ NI_NUMERICHOST | NI_NUMERICSERV)))
+ guacd_log_error("Unable to resolve host: %s",
+ gai_strerror(retval));
+
+ /* Attempt to bind socket to address */
+ if (bind(socket_fd,
+ current_address->ai_addr,
+ current_address->ai_addrlen) == 0) {
+
+ guacd_log_info("Successfully bound socket to "
+ "host %s, port %s", bound_address, bound_port);
+
+ /* Done if successful bind */
+ break;
+
+ }
+
+ /* Otherwise log information regarding bind failure */
+ else
+ guacd_log_info("Unable to bind socket to "
+ "host %s, port %s: %s",
+ bound_address, bound_port, strerror(errno));
+
+ current_address = current_address->ai_next;
+
+ }
+
+ /* If unable to bind to anything, fail */
+ if (current_address == NULL) {
+ guacd_log_error("Unable to bind socket to any addresses.");
exit(EXIT_FAILURE);
- }
+ }
/* Fork into background */
-#ifdef HAVE_FORK
daemon_pid = fork();
/* If error, fail */
if (daemon_pid == -1) {
- fprintf(stderr, "Error forking daemon process: %s\n", lasterror());
+ guacd_log_error("Error forking daemon process: %s", strerror(errno));
exit(EXIT_FAILURE);
}
/* Warn on failure */
else {
- fprintf(stderr, "WARNING: Could not write PID file: %s\n", lasterror());
+ guacd_log_error("Could not write PID file: %s", strerror(errno));
exit(EXIT_FAILURE);
}
exit(EXIT_SUCCESS);
}
-#else
- daemon_pid = getpid();
- guac_log_info("fork() not defined at compile time.");
- guac_log_info("guacd running in foreground only.");
-#endif
- /* Otherwise, this is the daemon */
- guac_log_info("Started, listening on port %i", listen_port);
+ /* Open log */
+ openlog(NULL, LOG_PID, LOG_DAEMON);
-#ifndef __MINGW32__
/* Ignore SIGPIPE */
if (signal(SIGPIPE, SIG_IGN) == SIG_ERR) {
- guac_log_error("Could not set handler for SIGPIPE to ignore. SIGPIPE may cause termination of the daemon.");
+ guacd_log_info("Could not set handler for SIGPIPE to ignore. SIGPIPE may cause termination of the daemon.");
}
/* Ignore SIGCHLD (force automatic removal of children) */
if (signal(SIGCHLD, SIG_IGN) == SIG_ERR) {
- guac_log_error("Could not set handler for SIGCHLD to ignore. Child processes may pile up in the process table.");
+ guacd_log_info("Could not set handler for SIGCHLD to ignore. Child processes may pile up in the process table.");
}
-#endif
+
+ /* Log listening status */
+ syslog(LOG_INFO,
+ "Listening on host %s, port %s", bound_address, bound_port);
+
+ /* Free addresses */
+ freeaddrinfo(addresses);
/* Daemon loop */
for (;;) {
-#ifdef HAVE_FORK
pid_t child_pid;
-#else
- guac_thread_t thread;
-#endif
- client_thread_data* data;
/* Listen for connections */
if (listen(socket_fd, 5) < 0) {
- guac_log_error("Could not listen on socket: %s", lasterror());
+ guacd_log_error("Could not listen on socket: %s", strerror(errno));
return 3;
}
client_addr_len = sizeof(client_addr);
connected_socket_fd = accept(socket_fd, (struct sockaddr*) &client_addr, &client_addr_len);
if (connected_socket_fd < 0) {
- guac_log_error("Could not accept client connection: %s", lasterror());
+ guacd_log_error("Could not accept client connection: %s", strerror(errno));
return 3;
}
- data = malloc(sizeof(client_thread_data));
- data->fd = connected_socket_fd;
-
/*
- * Once connection is accepted, send child into background, whether through
- * fork() or through creating a thread. If thead support is not present on
- * the platform, guacd will still work, but will only be able to handle one
- * connection at a time.
- */
-
-#ifdef HAVE_FORK
-
- /*** FORK ***/
-
- /*
+ * Once connection is accepted, send child into background.
+ *
* Note that we prefer fork() over threads for connection-handling
* processes as they give each connection its own memory area, and
* isolate the main daemon and other connections from errors in any
/* If error, log */
if (child_pid == -1)
- guac_log_error("Error forking child process: %s\n", lasterror());
+ guacd_log_error("Error forking child process: %s", strerror(errno));
/* If child, start client, and exit when finished */
else if (child_pid == 0) {
- start_client_thread(data);
+ guacd_handle_connection(connected_socket_fd);
+ close(connected_socket_fd);
return 0;
}
-#else
-
- if (guac_thread_create(&thread, start_client_thread, (void*) data))
- guac_log_error("Could not create client thread: %s", lasterror());
-
-#endif
+ /* If parent, close reference to child's descriptor */
+ else if (close(connected_socket_fd) < 0) {
+ guacd_log_error("Error closing daemon reference to child descriptor: %s", strerror(errno));
+ }
}
/* Close socket */
- if (CLOSE_SOCKET(socket_fd) < 0) {
- guac_log_error("Could not close socket: %s", lasterror());
+ if (close(socket_fd) < 0) {
+ guacd_log_error("Could not close socket: %s", strerror(errno));
return 3;
}
projects / guacd.git / blobdiff