src/server/server.c

   1 /*
   2  * Copyright (C) 2010-2016 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 #define _LARGEFILE_SOURCE 1
  20 #include "config.h"
  21
  22 #include <locale.h>
  23 #include <libintl.h>
  24 #define _(str) gettext(str)
  25
  26 #include <limits.h>
  27 #include <stdarg.h>
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31 #include <sys/stat.h>
  32 #include <sys/types.h>
  33 #include <sys/select.h>
  34 #include <sys/socket.h>
  35 #include <getopt.h>
  36 #include <stdint.h>
  37 #include <pthread.h>
  38 #include <unistd.h>
  39 #include <microhttpd.h>
  40
  41 #ifdef HAVE_GTOP
  42 #include "sysinfo.h"
  43 #include <pgtop2.h>
  44 #endif
  45
  46 #include <hdd.h>
  47 #include <lmsensor.h>
  48 #include <plog.h>
  49 #include "psensor_json.h"
  50 #include <pmutex.h>
  51 #include "url.h"
  52 #include "server.h"
  53 #include "slog.h"
  54
  55 static const char *DEFAULT_LOG_FILE = "/var/log/psensor-server.log";
  56
  57 #define HTML_STOP_REQUESTED \
  58 (_("<html><body><p>Server stop requested</p></body></html>"))
  59
  60 static const char *program_name;
  61
  62 static const int DEFAULT_PORT = 3131;
  63
  64 #define PAGE_NOT_FOUND (_("<html><body><p>"\
  65 "Page not found - Go to <a href='/'>Main page</a></p></body>"))
  66
  67 static struct option long_options[] = {
  68         {"version", no_argument, NULL, 'v'},
  69         {"help", no_argument, NULL, 'h'},
  70         {"port", required_argument, NULL, 'p'},
  71         {"wdir", required_argument, NULL, 'w'},
  72         {"debug", required_argument, NULL, 'd'},
  73         {"log-file", required_argument, NULL, 'l'},
  74         {"sensor-log-file", required_argument, NULL, 0},
  75         {"sensor-log-interval", required_argument, NULL, 0},
  76         {NULL, 0, NULL, 0}
  77 };
  78
  79 static struct server_data server_data;
  80
  81 static pthread_mutex_t mutex;
  82
  83 static int server_stop_requested;
  84
  85 static void print_version(void)
  86 {
  87         printf("psensor-server %s\n", VERSION);
  88         printf(_("Copyright (C) %s jeanfi@gmail.com\n"
  89                  "License GPLv2: GNU GPL version 2 or later "
  90                  "<http://www.gnu.org/licenses/old-licenses/gpl-2.0.html>\n"
  91                  "This is free software: you are free to change and redistribute it.\n"
  92                  "There is NO WARRANTY, to the extent permitted by law.\n"),
  93                "2010-2012");
  94 }
  95
  96 static void print_help(void)
  97 {
  98         printf(_("Usage: %s [OPTION]...\n"), program_name);
  99
 100         puts(_("psensor-server is an HTTP server for monitoring hardware "
 101                "sensors remotely."));
 102
 103         puts("");
 104         puts("Options:");
 105         puts(_("  -h, --help            display this help and exit\n"
 106                "  -v, --version         display version information and exit"));
 107
 108         puts("");
 109         puts(_("  -p,--port=PORT        webserver port\n"
 110                "  -w,--wdir=DIR         directory containing webserver pages"));
 111
 112         puts("");
 113         puts(_("  -d, --debug=LEVEL     "
 114                "set the debug level, integer between 0 and 3"));
 115         puts(_("  -l, --log-file=PATH   set the log file to PATH"));
 116         puts(_("  --sensor-log-file=PATH set the sensor log file to PATH"));
 117         puts(_("  --sensor-log-interval=S "
 118                "set the sensor log interval to S (seconds)"));
 119
 120         puts("");
 121         printf(_("Report bugs to: %s\n"), PACKAGE_BUGREPORT);
 122         puts("");
 123         printf(_("%s home page: <%s>\n"), PACKAGE_NAME, PACKAGE_URL);
 124 }
 125
 126 /*
 127  * Returns the file path corresponding to a given URL
 128  */
 129 static char *get_path(const char *url, const char *www_dir)
 130 {
 131         const char *p;
 132         char *res;
 133
 134         if (!strlen(url) || !strcmp(url, ".") || !strcmp(url, "/"))
 135                 p = "/index.html";
 136         else
 137                 p = url;
 138
 139         res = malloc(strlen(www_dir)+strlen(p)+1);
 140
 141         strcpy(res, www_dir);
 142         strcat(res, p);
 143
 144         return res;
 145 }
 146
 147 #if MHD_VERSION >= 0x00090200
 148 static ssize_t
 149 file_reader(void *cls, uint64_t pos, char *buf, size_t max)
 150 #else
 151 static int
 152 file_reader(void *cls, uint64_t pos, char *buf, int max)
 153 #endif
 154 {
 155         FILE *file = cls;
 156
 157         fseeko(file, pos, SEEK_SET);
 158         return fread(buf, 1, max, file);
 159 }
 160
 161 static struct MHD_Response *
 162 create_response_api(const char *nurl, const char *method, unsigned int *rp_code)
 163 {
 164         struct MHD_Response *resp;
 165         struct psensor *s;
 166         char *page = NULL;
 167
 168         if (!strcmp(nurl, URL_BASE_API_1_1_SENSORS))  {
 169                 page = sensors_to_json_string(server_data.sensors);
 170 #ifdef HAVE_GTOP
 171         } else if (!strcmp(nurl, URL_API_1_1_SYSINFO)) {
 172                 page = sysinfo_to_json_string(&server_data.psysinfo);
 173         } else if (!strcmp(nurl, URL_API_1_1_CPU_USAGE)) {
 174                 page = sensor_to_json_string(server_data.cpu_usage);
 175 #endif
 176         } else if (!strncmp(nurl, URL_BASE_API_1_1_SENSORS,
 177                             strlen(URL_BASE_API_1_1_SENSORS))
 178                    && nurl[strlen(URL_BASE_API_1_1_SENSORS)] == '/') {
 179
 180                 const char *sid = nurl + strlen(URL_BASE_API_1_1_SENSORS) + 1;
 181
 182                 s = psensor_list_get_by_id(server_data.sensors, sid);
 183
 184                 if (s)
 185                         page = sensor_to_json_string(s);
 186
 187         } else if (!strcmp(nurl, URL_API_1_1_SERVER_STOP)) {
 188
 189                 server_stop_requested = 1;
 190                 page = strdup(HTML_STOP_REQUESTED);
 191         }
 192
 193         if (page) {
 194                 *rp_code = MHD_HTTP_OK;
 195
 196                 resp = MHD_create_response_from_buffer(strlen(page),
 197                                                        page,
 198                                                        MHD_RESPMEM_MUST_FREE);
 199
 200                 MHD_add_response_header(resp, MHD_HTTP_HEADER_CONTENT_TYPE,
 201                                         "application/json");
 202
 203                 return resp;
 204         }
 205
 206         return NULL;
 207 }
 208
 209 static struct MHD_Response *create_response_file(const char *nurl,
 210                                                  const char *method,
 211                                                  unsigned int *rp_code,
 212                                                  const char *fpath)
 213 {
 214         struct stat st;
 215         int ret;
 216         FILE *file;
 217
 218         ret = stat(fpath, &st);
 219
 220         if (!ret && (S_ISREG(st.st_mode) || S_ISLNK(st.st_mode))) {
 221                 file = fopen(fpath, "rb");
 222
 223                 if (file) {
 224                         *rp_code = MHD_HTTP_OK;
 225
 226                         if (!st.st_size) {
 227                                 fclose(file);
 228                                 return MHD_create_response_from_buffer
 229                                         (0, NULL, 0);
 230                         }
 231
 232                         return MHD_create_response_from_callback
 233                                 (st.st_size,
 234                                  32 * 1024,
 235                                  &file_reader,
 236                                  file,
 237                                  (MHD_ContentReaderFreeCallback)&fclose);
 238
 239                 } else {
 240                         log_err("Failed to open: %s.", fpath);
 241                 }
 242         }
 243
 244         return NULL;
 245 }
 246
 247 static int is_access_allowed(char *path)
 248 {
 249         char *rpath;
 250         int n, ret;
 251
 252         rpath = realpath(path, NULL);
 253         if (rpath) {
 254                 n = strlen(server_data.www_dir);
 255                 if (!strncmp(server_data.www_dir, rpath, n)
 256                     || !strcmp(rpath,
 257                                "/usr/share/javascript/jquery/jquery.js")) {
 258                         ret = 1;
 259                 } else {
 260                         ret = 0;
 261
 262                         log_err(_("Resource access refused %s real path is %s"),
 263                                 path,
 264                                 rpath);
 265                 }
 266
 267                 free(rpath);
 268         } else {
 269                 log_err(_("Cannot get real path of %s"), path);
 270
 271                 ret = 0;
 272         }
 273
 274         return ret;
 275 }
 276
 277 static struct MHD_Response *
 278 create_response(const char *nurl, const char *method, unsigned int *rp_code)
 279 {
 280         char *page, *fpath;
 281         struct MHD_Response *resp = NULL;
 282
 283         if (!strncmp(nurl, URL_BASE_API_1_1, strlen(URL_BASE_API_1_1))) {
 284                 resp = create_response_api(nurl, method, rp_code);
 285         } else {
 286                 fpath = get_path(nurl, server_data.www_dir);
 287
 288                 if (is_access_allowed(fpath))
 289                         resp = create_response_file(nurl,
 290                                                     method,
 291                                                     rp_code,
 292                                                     fpath);
 293
 294                 free(fpath);
 295         }
 296
 297         if (resp)
 298                 return resp;
 299
 300         page = strdup(PAGE_NOT_FOUND);
 301         *rp_code = MHD_HTTP_NOT_FOUND;
 302
 303         return MHD_create_response_from_buffer(strlen(page),
 304                                                page,
 305                                                MHD_RESPMEM_MUST_FREE);
 306 }
 307
 308 static int cbk_http_request(void *cls,
 309                             struct MHD_Connection *connection,
 310                             const char *url,
 311                             const char *method,
 312                             const char *version,
 313                             const char *upload_data,
 314                             size_t *upload_data_size,
 315                             void **ptr)
 316 {
 317         static int dummy;
 318         struct MHD_Response *response;
 319         int ret;
 320         char *nurl;
 321         unsigned int resp_code;
 322
 323         if (strcmp(method, "GET"))
 324                 return MHD_NO;
 325
 326         if (&dummy != *ptr) {
 327                 /* The first time only the headers are valid, do not
 328                  * respond in the first round...
 329                  */
 330                 *ptr = &dummy;
 331                 return MHD_YES;
 332         }
 333
 334         if (*upload_data_size)
 335                 return MHD_NO;
 336
 337         *ptr = NULL;            /* clear context pointer */
 338
 339         log_debug(_("HTTP Request: %s"), url);
 340
 341         nurl = url_normalize(url);
 342
 343         pmutex_lock(&mutex);
 344         response = create_response(nurl, method, &resp_code);
 345         pmutex_unlock(&mutex);
 346
 347         ret = MHD_queue_response(connection, resp_code, response);
 348         MHD_destroy_response(response);
 349
 350         free(nurl);
 351
 352         return ret;
 353 }
 354
 355 int main(int argc, char *argv[])
 356 {
 357         struct MHD_Daemon *d;
 358         int port, opti, optc, cmdok, ret, slog_interval;
 359         char *log_file, *slog_file;
 360
 361         program_name = argv[0];
 362
 363         setlocale(LC_ALL, "");
 364
 365 #if ENABLE_NLS
 366         bindtextdomain(PACKAGE, LOCALEDIR);
 367         textdomain(PACKAGE);
 368 #endif
 369
 370         server_data.www_dir = NULL;
 371 #ifdef HAVE_GTOP
 372         server_data.psysinfo.interfaces = NULL;
 373 #endif
 374         log_file = NULL;
 375         slog_file = NULL;
 376         slog_interval = 300;
 377         port = DEFAULT_PORT;
 378         cmdok = 1;
 379
 380         while ((optc = getopt_long(argc,
 381                                    argv,
 382                                    "vhp:w:d:l:",
 383                                    long_options,
 384                                    &opti)) != -1) {
 385                 switch (optc) {
 386                 case 'w':
 387                         if (optarg)
 388                                 server_data.www_dir = realpath(optarg, NULL);
 389                         break;
 390                 case 'p':
 391                         if (optarg)
 392                                 port = atoi(optarg);
 393                         break;
 394                 case 'h':
 395                         print_help();
 396                         exit(EXIT_SUCCESS);
 397                 case 'v':
 398                         print_version();
 399                         exit(EXIT_SUCCESS);
 400                 case 'd':
 401                         log_level = atoi(optarg);
 402                         log_info(_("Enables debug mode: %d"), log_level);
 403                         break;
 404                 case 'l':
 405                         if (optarg)
 406                                 log_file = strdup(optarg);
 407                         break;
 408                 case 0:
 409                         if (!strcmp(long_options[opti].name, "sensor-log-file"))
 410                                 slog_file = strdup(optarg);
 411                         else if (!strcmp(long_options[opti].name,
 412                                          "sensor-log-interval"))
 413                                 slog_interval = atoi(optarg);
 414                         break;
 415                 default:
 416                         cmdok = 0;
 417                         break;
 418                 }
 419         }
 420
 421         if (!cmdok || optind != argc) {
 422                 fprintf(stderr, _("Try `%s --help' for more information.\n"),
 423                         program_name);
 424                 exit(EXIT_FAILURE);
 425         }
 426
 427         if (!server_data.www_dir) {
 428                 server_data.www_dir = realpath(DEFAULT_WWW_DIR, NULL);
 429                 if (!server_data.www_dir) {
 430                         fprintf(stderr,
 431                                 _("Webserver directory does not exist.\n"));
 432                         exit(EXIT_FAILURE);
 433                 }
 434         }
 435
 436         if (!log_file)
 437                 log_file = strdup(DEFAULT_LOG_FILE);
 438
 439         pmutex_init(&mutex);
 440
 441         log_open(log_file);
 442
 443         hddtemp_psensor_list_append(&server_data.sensors, 600);
 444
 445         lmsensor_psensor_list_append(&server_data.sensors, 600);
 446
 447 #ifdef HAVE_GTOP
 448         server_data.cpu_usage = create_cpu_usage_sensor(600);
 449 #endif
 450
 451         if (!server_data.sensors || !*server_data.sensors)
 452                 log_err(_("No sensors detected."));
 453
 454         d = MHD_start_daemon(MHD_USE_THREAD_PER_CONNECTION,
 455                              port,
 456                              NULL, NULL, &cbk_http_request, server_data.sensors,
 457                              MHD_OPTION_END);
 458         if (!d) {
 459                 log_err(_("Failed to create Web server."));
 460                 exit(EXIT_FAILURE);
 461         }
 462
 463         log_info(_("Web server started on port: %d"), port);
 464         log_info(_("WWW directory: %s"), server_data.www_dir);
 465         log_info(_("URL: http://localhost:%d"), port);
 466
 467         if (slog_file) {
 468                 if (slog_interval <= 0)
 469                         slog_interval = 300;
 470                 ret = slog_activate(slog_file,
 471                                     server_data.sensors,
 472                                     &mutex,
 473                                     slog_interval);
 474                 if (!ret)
 475                         log_err(_("Failed to activate logging of sensors."));
 476         }
 477
 478         while (!server_stop_requested) {
 479                 pmutex_lock(&mutex);
 480
 481 #ifdef HAVE_GTOP
 482                 sysinfo_update(&server_data.psysinfo);
 483                 cpu_usage_sensor_update(server_data.cpu_usage);
 484 #endif
 485
 486 #ifdef HAVE_ATASMART
 487                 atasmart_psensor_list_update(server_data.sensors);
 488 #endif
 489
 490                 hddtemp_psensor_list_update(server_data.sensors);
 491
 492                 lmsensor_psensor_list_update(server_data.sensors);
 493
 494                 psensor_log_measures(server_data.sensors);
 495
 496                 pmutex_unlock(&mutex);
 497                 sleep(5);
 498         }
 499
 500         slog_close();
 501
 502         MHD_stop_daemon(d);
 503
 504         /* sanity cleanup for valgrind */
 505         psensor_list_free(server_data.sensors);
 506 #ifdef HAVE_GTOP
 507         psensor_free(server_data.cpu_usage);
 508 #endif
 509         free(server_data.www_dir);
 510         lmsensor_cleanup();
 511
 512 #ifdef HAVE_GTOP
 513         sysinfo_cleanup();
 514 #endif
 515
 516         if (log_file != DEFAULT_LOG_FILE)
 517                 free(log_file);
 518
 519         return EXIT_SUCCESS;
 520 }