src/daemon.c

   1
   2 /*
   3  *  Guacamole - Clientless Remote Desktop
   4  *  Copyright (C) 2010  Michael Jumper
   5  *
   6  *  This program is free software: you can redistribute it and/or modify
   7  *  it under the terms of the GNU Affero General Public License as published by
   8  *  the Free Software Foundation, either version 3 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU Affero General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU Affero General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include <unistd.h>
  21 #include <stdlib.h>
  22 #include <stdio.h>
  23 #include <string.h>
  24 #include <sys/types.h>
  25 #include <sys/socket.h>
  26 #include <netinet/in.h>
  27 #include <pthread.h>
  28
  29 #include <errno.h>
  30 #include <syslog.h>
  31
  32 #include <guacamole/client.h>
  33
  34 typedef struct client_thread_data {
  35
  36     int fd;
  37
  38 } client_thread_data;
  39
  40
  41 void* start_client_thread(void* data) {
  42
  43     guac_client* client;
  44     client_thread_data* thread_data = (client_thread_data*) data;
  45
  46     syslog(LOG_INFO, "Spawning client");
  47
  48     /* Load and start client */
  49     client = guac_get_client(thread_data->fd);
  50
  51     if (client == NULL) {
  52         syslog(LOG_ERR, "Client retrieval failed");
  53         return NULL;
  54     }
  55
  56     guac_start_client(client);
  57
  58     guac_free_client(client);
  59
  60     /* Close socket */
  61     if (close(thread_data->fd) < 0) {
  62         syslog(LOG_ERR, "Error closing connection: %s", strerror(errno));
  63         free(data);
  64         return NULL;
  65     }
  66
  67     syslog(LOG_INFO, "Client finished");
  68     free(data);
  69     return NULL;
  70
  71 }
  72
  73 int main(int argc, char* argv[]) {
  74
  75     /* Server */
  76     int socket_fd;
  77     struct sockaddr_in server_addr;
  78
  79     /* Client */
  80     struct sockaddr_in client_addr;
  81     unsigned int client_addr_len;
  82     int connected_socket_fd;
  83
  84     /* Arguments */
  85     int listen_port = 4822; /* Default port */
  86     int opt;
  87
  88     /* Daemon Process */
  89     pid_t daemon_pid;
  90
  91     /* Parse arguments */
  92     while ((opt = getopt(argc, argv, "l:")) != -1) {
  93         if (opt == 'l') {
  94             listen_port = atoi(optarg);
  95             if (listen_port <= 0) {
  96                 fprintf(stderr, "Invalid port: %s\n", optarg);
  97                 exit(EXIT_FAILURE);
  98             }
  99         }
 100         else {
 101             fprintf(stderr, "USAGE: %s [-l LISTENPORT]\n", argv[0]);
 102             exit(EXIT_FAILURE);
 103         }
 104     }
 105
 106     /* Get binding address */
 107     memset(&server_addr, 0, sizeof(server_addr)); /* Zero struct */
 108     server_addr.sin_family = AF_INET;
 109     server_addr.sin_addr.s_addr = INADDR_ANY;
 110     server_addr.sin_port = htons(listen_port);
 111
 112     /* Get socket */
 113     socket_fd = socket(AF_INET, SOCK_STREAM, 0);
 114     if (socket_fd < 0) {
 115         fprintf(stderr, "Error opening socket: %s\n", strerror(errno));
 116         exit(EXIT_FAILURE);
 117     }
 118
 119     /* Bind socket to address */
 120     if (bind(socket_fd, (struct sockaddr*) &server_addr,
 121                 sizeof(server_addr)) < 0) {
 122         fprintf(stderr, "Error binding socket: %s\n", strerror(errno));
 123         exit(EXIT_FAILURE);
 124     }
 125
 126     /* Fork into background */
 127     daemon_pid = fork();
 128
 129     /* If error, fail */
 130     if (daemon_pid == -1) {
 131         fprintf(stderr, "Error forking daemon process: %s\n", strerror(errno));
 132         exit(EXIT_FAILURE);
 133     }
 134
 135     /* If parent, exit */
 136     else if (daemon_pid != 0) {
 137         exit(EXIT_SUCCESS);
 138     }
 139
 140     /* Otherwise, this is the daemon */
 141     syslog(LOG_INFO, "Started, listening on port %i", listen_port);
 142
 143     /* Daemon loop */
 144     for (;;) {
 145
 146         pthread_t thread;
 147         client_thread_data* data;
 148
 149         /* Listen for connections */
 150         if (listen(socket_fd, 5) < 0) {
 151             syslog(LOG_ERR, "Could not listen on socket: %s", strerror(errno));
 152             return 3;
 153         }
 154
 155         /* Accept connection */
 156         client_addr_len = sizeof(client_addr);
 157         connected_socket_fd = accept(socket_fd, (struct sockaddr*) &client_addr, &client_addr_len);
 158         if (connected_socket_fd < 0) {
 159             syslog(LOG_ERR, "Could not accept client connection: %s", strerror(errno));
 160             return 3;
 161         }
 162
 163         data = malloc(sizeof(client_thread_data));
 164         data->fd = connected_socket_fd;
 165
 166         if (pthread_create(&thread, NULL, start_client_thread, (void*) data)) {
 167             syslog(LOG_ERR, "Could not create client thread: %s", strerror(errno));
 168             return 3;
 169         }
 170
 171     }
 172
 173     /* Close socket */
 174     if (close(socket_fd) < 0) {
 175         syslog(LOG_ERR, "Could not close socket: %s", strerror(errno));
 176         return 3;
 177     }
 178
 179     return 0;
 180
 181 }
 182