src/server/server.c

   1 /*
   2  * Copyright (C) 2010-2012 jeanfi@gmail.com
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License as
   6  * published by the Free Software Foundation; either version 2 of the
   7  * License, or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  17  * 02110-1301 USA
  18  */
  19 #include <locale.h>
  20 #include <libintl.h>
  21 #define _(str) gettext(str)
  22
  23 #include "config.h"
  24
  25 #include <stdarg.h>
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <sys/stat.h>
  30 #include <sys/types.h>
  31 #include <sys/select.h>
  32 #include <sys/socket.h>
  33 #include <getopt.h>
  34 #include <stdint.h>
  35 #include <pthread.h>
  36 #include <unistd.h>
  37 #include <microhttpd.h>
  38
  39 #ifdef HAVE_GTOP
  40 #include "sysinfo.h"
  41 #include "cpu.h"
  42 #endif
  43
  44 #include "psensor_json.h"
  45 #include "url.h"
  46 #include "p_io.h"
  47 #include "server.h"
  48
  49 static const char *program_name;
  50
  51 #define DEFAULT_PORT 3131
  52
  53 #define PAGE_NOT_FOUND (_("<html><body><p>"\
  54 "Page not found - Go to <a href='/'>Main page</a></p></body>"))
  55
  56 static struct option long_options[] = {
  57         {"version", no_argument, 0, 'v'},
  58         {"help", no_argument, 0, 'h'},
  59         {"port", required_argument, 0, 'p'},
  60         {"wdir", required_argument, 0, 'w'},
  61         {"debug", no_argument, 0, 'd'},
  62         {0, 0, 0, 0}
  63 };
  64
  65 static struct server_data server_data;
  66
  67 static pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER;
  68
  69 static int debug;
  70
  71 static int server_stop_requested;
  72
  73 void print_version()
  74 {
  75         printf("psensor-server %s\n", VERSION);
  76         printf(_("Copyright (C) %s jeanfi@gmail.com\n"
  77                  "License GPLv2: GNU GPL version 2 or later "
  78                  "<http://www.gnu.org/licenses/old-licenses/gpl-2.0.html>\n"
  79                  "This is free software: you are free to change and redistribute it.\n"
  80                  "There is NO WARRANTY, to the extent permitted by law.\n"),
  81                "2010-2012");
  82 }
  83
  84 void print_help()
  85 {
  86         printf(_("Usage: %s [OPTION]...\n"), program_name);
  87
  88         puts(_("psensor-server is an HTTP server "
  89                "for monitoring hardware sensors remotely."));
  90
  91         puts("");
  92         puts("Options:");
  93         puts(_("  -h, --help            display this help and exit\n"
  94                "  -v, --version         display version information and exit"));
  95
  96         puts("");
  97
  98         puts(_("  -d,--debug            run in debug mode\n"
  99                "  -p,--port=PORT        webserver port\n"
 100                "  -w,--wdir=DIR         directory containing webserver pages"));
 101
 102         puts("");
 103
 104         printf(_("Report bugs to: %s\n"), PACKAGE_BUGREPORT);
 105         puts("");
 106         printf(_("%s home page: <%s>\n"), PACKAGE_NAME, PACKAGE_URL);
 107 }
 108
 109 /*
 110   Returns the file path corresponding to a given URL
 111 */
 112 char *get_path(const char *url, const char *www_dir)
 113 {
 114         const char *p;
 115         char *res;
 116
 117         if (!strlen(url) || !strcmp(url, ".") || !strcmp(url, "/"))
 118                 p = "/index.html";
 119         else
 120                 p = url;
 121
 122         res = malloc(strlen(www_dir)+strlen(p)+1);
 123
 124         strcpy(res, www_dir);
 125         strcat(res, p);
 126
 127         return res;
 128 }
 129
 130 #if MHD_VERSION >= 0x00090200
 131 static ssize_t
 132 file_reader(void *cls, uint64_t pos, char *buf, size_t max)
 133 #else
 134 static int
 135 file_reader(void *cls, uint64_t pos, char *buf, int max)
 136 #endif
 137 {
 138         FILE *file = cls;
 139
 140         fseek(file, pos, SEEK_SET);
 141         return fread(buf, 1, max, file);
 142 }
 143
 144 struct MHD_Response *
 145 create_response_api(const char *nurl,
 146                     const char *method,
 147                     unsigned int *rp_code)
 148 {
 149         struct MHD_Response *resp;
 150         struct psensor *s;
 151         char *page = NULL;
 152
 153         if (!strcmp(nurl, URL_BASE_API_1_0_SENSORS))  {
 154                 page = sensors_to_json_string(server_data.sensors);
 155 #ifdef HAVE_GTOP
 156         } else if (!strcmp(nurl, URL_API_1_0_SYSINFO)) {
 157                 page = sysinfo_to_json_string(&server_data.psysinfo);
 158         } else if (!strcmp(nurl, URL_API_1_0_CPU_USAGE)) {
 159                 page = sensor_to_json_string(server_data.cpu_usage);
 160 #endif
 161         } else if (!strncmp(nurl, URL_BASE_API_1_0_SENSORS,
 162                             strlen(URL_BASE_API_1_0_SENSORS))
 163                    && nurl[strlen(URL_BASE_API_1_0_SENSORS)] == '/') {
 164
 165                 const char *sid = nurl + strlen(URL_BASE_API_1_0_SENSORS) + 1;
 166
 167                 s = psensor_list_get_by_id(server_data.sensors, sid);
 168
 169                 if (s)
 170                         page = sensor_to_json_string(s);
 171
 172         } else if (debug && !strcmp(nurl, URL_API_1_0_SERVER_STOP)) {
 173
 174                 server_stop_requested = 1;
 175                 page = strdup(_("<html><body><p>"
 176                                 "Server stop requested</p></body></html>"));
 177         }
 178
 179         if (page) {
 180                 *rp_code = MHD_HTTP_OK;
 181
 182                 resp = MHD_create_response_from_data(strlen(page), page,
 183                                                      MHD_YES, MHD_NO);
 184
 185                 MHD_add_response_header(resp, MHD_HTTP_HEADER_CONTENT_TYPE,
 186                                         "application/json");
 187
 188                 return resp;
 189         }
 190
 191         return NULL;
 192 }
 193
 194 struct MHD_Response *
 195 create_response_file(const char *nurl,
 196                      const char *method,
 197                      unsigned int *rp_code,
 198                      const char *fpath)
 199 {
 200         struct stat st;
 201         int ret;
 202         FILE *file;
 203
 204         ret = stat(fpath, &st);
 205
 206         if (!ret && (S_ISREG(st.st_mode) || S_ISLNK(st.st_mode))) {
 207                 file = fopen(fpath, "rb");
 208
 209                 if (file) {
 210                         *rp_code = MHD_HTTP_OK;
 211
 212                         if (!st.st_size) {
 213                                 fclose(file);
 214                                 return MHD_create_response_from_data
 215                                         (0, NULL, MHD_NO, MHD_NO);
 216                         }
 217
 218                         return MHD_create_response_from_callback
 219                                 (st.st_size,
 220                                  32 * 1024,
 221                                  &file_reader,
 222                                  file,
 223                                  (MHD_ContentReaderFreeCallback)&fclose);
 224
 225                 } else {
 226                         log_printf(LOG_ERR, "Failed to open: %s\n", fpath);
 227                 }
 228         }
 229
 230         return NULL;
 231 }
 232
 233 struct MHD_Response *
 234 create_response(const char *nurl, const char *method, unsigned int *rp_code)
 235 {
 236         struct MHD_Response *resp = NULL;
 237
 238         if (!strncmp(nurl, URL_BASE_API_1_0, strlen(URL_BASE_API_1_0))) {
 239                 resp = create_response_api(nurl, method, rp_code);
 240         } else {
 241                 char *fpath = get_path(nurl, server_data.www_dir);
 242
 243                 resp = create_response_file(nurl, method, rp_code, fpath);
 244
 245                 free(fpath);
 246         }
 247
 248         if (resp) {
 249                 return resp;
 250         } else {
 251                 char *page = strdup(PAGE_NOT_FOUND);
 252                 *rp_code = MHD_HTTP_NOT_FOUND;
 253
 254                 return MHD_create_response_from_data
 255                         (strlen(page), page, MHD_YES, MHD_NO);
 256         }
 257 }
 258
 259 static int
 260 cbk_http_request(void *cls,
 261                  struct MHD_Connection *connection,
 262                  const char *url,
 263                  const char *method,
 264                  const char *version,
 265                  const char *upload_data,
 266                  size_t *upload_data_size, void **ptr)
 267 {
 268         static int dummy;
 269         struct MHD_Response *response;
 270         int ret;
 271         char *nurl;
 272         unsigned int resp_code;
 273
 274         if (strcmp(method, "GET"))
 275                 return MHD_NO;
 276
 277         if (&dummy != *ptr) {
 278                 /* The first time only the headers are valid, do not
 279                    respond in the first round... */
 280                 *ptr = &dummy;
 281                 return MHD_YES;
 282         }
 283
 284         if (*upload_data_size)
 285                 return MHD_NO;
 286
 287         *ptr = NULL;            /* clear context pointer */
 288
 289         if (debug)
 290                 printf(_("HTTP Request: %s\n"), url);
 291
 292         nurl = url_normalize(url);
 293
 294         pthread_mutex_lock(&mutex);
 295         response = create_response(nurl, method, &resp_code);
 296         pthread_mutex_unlock(&mutex);
 297
 298         ret = MHD_queue_response(connection, resp_code, response);
 299         MHD_destroy_response(response);
 300
 301         free(nurl);
 302
 303         return ret;
 304 }
 305
 306 int main(int argc, char *argv[])
 307 {
 308         struct MHD_Daemon *d;
 309         int port = DEFAULT_PORT;
 310         int optc;
 311         int cmdok = 1;
 312
 313         program_name = argv[0];
 314
 315         setlocale(LC_ALL, "");
 316
 317 #if ENABLE_NLS
 318         bindtextdomain(PACKAGE, LOCALEDIR);
 319         textdomain(PACKAGE);
 320 #endif
 321
 322         server_data.www_dir = DEFAULT_WWW_DIR;
 323         server_data.psysinfo.interfaces = NULL;
 324
 325         while ((optc = getopt_long(argc, argv,
 326                                    "vhp:w:d", long_options, NULL)) != -1) {
 327                 switch (optc) {
 328                 case 'w':
 329                         if (optarg)
 330                                 server_data.www_dir = strdup(optarg);
 331                         break;
 332                 case 'p':
 333                         if (optarg)
 334                                 port = atoi(optarg);
 335                         break;
 336                 case 'h':
 337                         print_help();
 338                         exit(EXIT_SUCCESS);
 339                 case 'v':
 340                         print_version();
 341                         exit(EXIT_SUCCESS);
 342                 case 'd':
 343                         debug = 1;
 344                         break;
 345                 default:
 346                         cmdok = 0;
 347                         break;
 348                 }
 349         }
 350
 351         if (!cmdok || optind != argc) {
 352                 fprintf(stderr, _("Try `%s --help' for more information.\n"),
 353                         program_name);
 354                 exit(EXIT_FAILURE);
 355         }
 356
 357         psensor_init();
 358
 359         server_data.sensors = get_all_sensors(600);
 360
 361 #ifdef HAVE_GTOP
 362         server_data.cpu_usage = create_cpu_usage_sensor(600);
 363 #endif
 364
 365         if (!*server_data.sensors)
 366                 fprintf(stderr, _("ERROR: no sensors detected\n"));
 367
 368         d = MHD_start_daemon(MHD_USE_THREAD_PER_CONNECTION,
 369                              port,
 370                              NULL, NULL, &cbk_http_request, server_data.sensors,
 371                              MHD_OPTION_END);
 372         if (!d) {
 373                 fprintf(stderr, _("ERROR: Fail to create web server\n"));
 374                 exit(EXIT_FAILURE);
 375         }
 376
 377         log_printf(LOG_INFO, _("Web server started on port: %d"), port);
 378         log_printf(LOG_INFO, _("WWW directory: %s"), server_data.www_dir);
 379         log_printf(LOG_INFO, _("URL: http://localhost:%d"), port);
 380
 381         while (!server_stop_requested) {
 382                 pthread_mutex_lock(&mutex);
 383
 384 #ifdef HAVE_GTOP
 385                 sysinfo_update(&server_data.psysinfo);
 386                 cpu_usage_sensor_update(server_data.cpu_usage);
 387 #endif
 388                 psensor_list_update_measures(server_data.sensors);
 389
 390                 pthread_mutex_unlock(&mutex);
 391                 sleep(5);
 392         }
 393
 394         MHD_stop_daemon(d);
 395
 396         /* sanity cleanup for valgrind */
 397         psensor_list_free(server_data.sensors);
 398 #ifdef HAVE_GTOP
 399         psensor_free(server_data.cpu_usage);
 400 #endif
 401         free(server_data.www_dir);
 402         sensors_cleanup();
 403
 404 #ifdef HAVE_GTOP
 405         sysinfo_cleanup();
 406         cpu_cleanup();
 407 #endif
 408
 409         return EXIT_SUCCESS;
 410 }