Additional logging, moderate cleanup.
[guacd.git] / src / daemon.c
index 0920f44..bd30a8e 100644 (file)
 #include <signal.h>
 #include <sys/types.h>
 
-#ifdef __MINGW32__
-#include <winsock2.h>
-typedef int socklen_t;
-typedef char* sockopt_p;
-#else
 #include <sys/socket.h>
 #include <netinet/in.h>
-typedef void* sockopt_p;
-#endif
 
 #include <errno.h>
+#include <syslog.h>
 
 #include <guacamole/client.h>
-#include <guacamole/thread.h>
-#include <guacamole/log.h>
+#include <guacamole/error.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 "client.h"
 
 typedef struct client_thread_data {
 
@@ -87,30 +63,129 @@ typedef struct client_thread_data {
 void* start_client_thread(void* data) {
 
     guac_client* client;
+    guac_client_plugin* plugin;
+    guac_instruction* select;
+    guac_instruction* connect;
+
+    /* Get thread data */
     client_thread_data* thread_data = (client_thread_data*) data;
 
-    guac_log_info("Spawning client");
+    /* Open guac_socket */
+    guac_socket* socket = guac_socket_open(thread_data->fd);
 
-    /* Load and start client */
-    client = guac_get_client(thread_data->fd); 
+    /* Get protocol from select instruction */
+    select = guac_protocol_expect_instruction(
+            socket, GUAC_USEC_TIMEOUT, "select");
+    if (select == NULL) {
 
-    if (client == NULL) {
-        guac_log_error("Client retrieval failed");
+        /* Log error */
+        syslog(LOG_ERR, "Error reading \"select\": %s",
+                guac_status_string(guac_error));
+
+        /* Free resources */
+        guac_socket_close(socket);
         free(data);
         return NULL;
     }
 
-    guac_start_client(client);
-    guac_free_client(client);
+    /* Validate args to select */
+    if (select->argc != 1) {
 
-    /* Close socket */
-    if (CLOSE_SOCKET(thread_data->fd) < 0) {
-        guac_log_error("Error closing connection: %s", lasterror());
+        /* Log error */
+        syslog(LOG_ERR, "Bad number of arguments to \"select\" (%i)",
+                select->argc);
+
+        /* Free resources */
+        guac_socket_close(socket);
+        free(data);
+        return NULL;
+    }
+
+    syslog(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 */
+        syslog(LOG_ERR, "Error loading client plugin: %s",
+                guac_status_string(guac_error));
+
+        /* Free resources */
+        guac_socket_close(socket);
+        free(data);
+        return NULL;
+    }
+
+    /* Send args response */
+    if (guac_protocol_send_args(socket, plugin->args)
+            || guac_socket_flush(socket)) {
+
+        /* Log error */
+        syslog(LOG_ERR, "Error sending \"args\": %s",
+                guac_status_string(guac_error));
+
+        if (guac_client_plugin_close(plugin))
+            syslog(LOG_ERR, "Error closing client plugin");
+
+        guac_socket_close(socket);
+        free(data);
+        return NULL;
+    }
+
+    /* Get args from connect instruction */
+    connect = guac_protocol_expect_instruction(
+            socket, GUAC_USEC_TIMEOUT, "connect");
+    if (connect == NULL) {
+
+        /* Log error */
+        syslog(LOG_ERR, "Error reading \"connect\": %s",
+                guac_status_string(guac_error));
+
+        if (guac_client_plugin_close(plugin))
+            syslog(LOG_ERR, "Error closing client plugin");
+
+        guac_socket_close(socket);
+        free(data);
+        return NULL;
+    }
+
+    /* Load and init client */
+    client = guac_client_plugin_get_client(plugin, socket,
+            connect->argc, connect->argv); 
+    guac_instruction_free(connect);
+
+    if (client == NULL) {
+
+        syslog(LOG_ERR, "Error instantiating client: %s",
+                guac_status_string(guac_error));
+
+        if (guac_client_plugin_close(plugin))
+            syslog(LOG_ERR, "Error closing client plugin");
+
+        guac_socket_close(socket);
         free(data);
         return NULL;
     }
 
-    guac_log_info("Client finished");
+    /* Start client threads */
+    syslog(LOG_INFO, "Starting client");
+    if (guac_start_client(client))
+        syslog(LOG_ERR, "Client finished abnormally");
+    else
+        syslog(LOG_INFO, "Client finished normally");
+
+    /* Clean up */
+    guac_client_free(client);
+    if (guac_client_plugin_close(plugin))
+        syslog(LOG_ERR, "Error closing client plugin");
+
+    /* Close socket */
+    guac_socket_close(socket);
+    close(thread_data->fd);
+
     free(data);
     return NULL;
 
@@ -137,11 +212,6 @@ int main(int argc, char* argv[]) {
     /* 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) {
         if (opt == 'l') {
@@ -166,29 +236,21 @@ int main(int argc, char* argv[]) {
     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.");
-        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());
+        fprintf(stderr, "Error opening socket: %s\n", strerror(errno));
         exit(EXIT_FAILURE);
     }
 
-    if (setsockopt(socket_fd, SOL_SOCKET, SO_REUSEADDR, (sockopt_p) &opt_on, sizeof(opt_on))) {
-        fprintf(stderr, "Warning: Unable to set socket options for reuse: %s\n", lasterror());
+    if (setsockopt(socket_fd, SOL_SOCKET, SO_REUSEADDR, (void*) &opt_on, sizeof(opt_on))) {
+        fprintf(stderr, "Warning: Unable to set socket options for reuse: %s\n", 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());
+        fprintf(stderr, "Error binding socket: %s\n", strerror(errno));
         exit(EXIT_FAILURE);
     } 
 
@@ -198,7 +260,7 @@ int main(int argc, char* argv[]) {
 
     /* If error, fail */
     if (daemon_pid == -1) {
-        fprintf(stderr, "Error forking daemon process: %s\n", lasterror());
+        fprintf(stderr, "Error forking daemon process: %s\n", strerror(errno));
         exit(EXIT_FAILURE);
     }
 
@@ -216,7 +278,7 @@ int main(int argc, char* argv[]) {
 
             /* Warn on failure */
             else {
-                fprintf(stderr, "WARNING: Could not write PID file: %s\n", lasterror());
+                fprintf(stderr, "WARNING: Could not write PID file: %s\n", strerror(errno));
                 exit(EXIT_FAILURE);
             }
 
@@ -226,24 +288,22 @@ int main(int argc, char* argv[]) {
     }
 #else
     daemon_pid = getpid();
-    guac_log_info("fork() not defined at compile time.");
-    guac_log_info("guacd running in foreground only.");
+    syslog(LOG_INFO, "fork() not defined at compile time.");
+    syslog(LOG_INFO, "guacd running in foreground only.");
 #endif
 
     /* Otherwise, this is the daemon */
-    guac_log_info("Started, listening on port %i", listen_port);
+    syslog(LOG_INFO, "Listening on port %i", listen_port);
 
-#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.");
+        syslog(LOG_ERR, "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.");
+        syslog(LOG_ERR, "Could not set handler for SIGCHLD to ignore. Child processes may pile up in the process table.");
     }
-#endif
 
     /* Daemon loop */
     for (;;) {
@@ -257,7 +317,7 @@ int main(int argc, char* argv[]) {
 
         /* Listen for connections */
         if (listen(socket_fd, 5) < 0) {
-            guac_log_error("Could not listen on socket: %s", lasterror());
+            syslog(LOG_ERR, "Could not listen on socket: %s", strerror(errno));
             return 3;
         }
 
@@ -265,7 +325,7 @@ int main(int argc, char* argv[]) {
         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());
+            syslog(LOG_ERR, "Could not accept client connection: %s", strerror(errno));
             return 3;
         }
 
@@ -294,7 +354,7 @@ int main(int argc, char* argv[]) {
 
         /* If error, log */
         if (child_pid == -1)
-            guac_log_error("Error forking child process: %s\n", lasterror());
+            syslog(LOG_ERR, "Error forking child process: %s\n", strerror(errno));
 
         /* If child, start client, and exit when finished */
         else if (child_pid == 0) {
@@ -303,22 +363,22 @@ int main(int argc, char* argv[]) {
         }
 
         /* If parent, close reference to child's descriptor */
-        else if (CLOSE_SOCKET(connected_socket_fd) < 0) {
-            guac_log_error("Error closing daemon reference to child descriptor: %s", lasterror());
+        else if (close(connected_socket_fd) < 0) {
+            syslog(LOG_ERR, "Error closing daemon reference to child descriptor: %s", strerror(errno));
         }
 
 #else
 
         if (guac_thread_create(&thread, start_client_thread, (void*) data))
-            guac_log_error("Could not create client thread: %s", lasterror());
+            syslog(LOG_ERR, "Could not create client thread: %s", strerror(errno));
 
 #endif
 
     }
 
     /* Close socket */
-    if (CLOSE_SOCKET(socket_fd) < 0) {
-        guac_log_error("Could not close socket: %s", lasterror());
+    if (close(socket_fd) < 0) {
+        syslog(LOG_ERR, "Could not close socket: %s", strerror(errno));
         return 3;
     }