server.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <stdarg.h>
   4 #include <unistd.h>
   5 #include <limits.h>
   6 #include <errno.h>
   7 #include <fcntl.h>
   8 #include <sys/poll.h>
   9 #include <sys/types.h>
  10 #include <sys/wait.h>
  11 #include <sys/socket.h>
  12 #include <sys/stat.h>
  13 #include <sys/un.h>
  14 #include <netinet/in.h>
  15 #include <arpa/inet.h>
  16 #include <netdb.h>
  17 #include <syslog.h>
  18 #include <signal.h>
  19
  20 #include "fio.h"
  21 #include "server.h"
  22 #include "crc/crc16.h"
  23 #include "ieee754.h"
  24
  25 int fio_net_port = 8765;
  26
  27 int exit_backend = 0;
  28
  29 static int server_fd = -1;
  30 static char *fio_server_arg;
  31 static char *bind_sock;
  32 static struct sockaddr_in saddr_in;
  33
  34 int fio_send_data(int sk, const void *p, unsigned int len)
  35 {
  36         assert(len <= sizeof(struct fio_net_cmd) + FIO_SERVER_MAX_PDU);
  37
  38         do {
  39                 int ret = send(sk, p, len, 0);
  40
  41                 if (ret > 0) {
  42                         len -= ret;
  43                         if (!len)
  44                                 break;
  45                         p += ret;
  46                         continue;
  47                 } else if (!ret)
  48                         break;
  49                 else if (errno == EAGAIN || errno == EINTR)
  50                         continue;
  51         } while (!exit_backend);
  52
  53         if (!len)
  54                 return 0;
  55
  56         return 1;
  57 }
  58
  59 int fio_recv_data(int sk, void *p, unsigned int len)
  60 {
  61         do {
  62                 int ret = recv(sk, p, len, MSG_WAITALL);
  63
  64                 if (ret > 0) {
  65                         len -= ret;
  66                         if (!len)
  67                                 break;
  68                         p += ret;
  69                         continue;
  70                 } else if (!ret)
  71                         break;
  72                 else if (errno == EAGAIN || errno == EINTR)
  73                         continue;
  74         } while (!exit_backend);
  75
  76         if (!len)
  77                 return 0;
  78
  79         return -1;
  80 }
  81
  82 static int verify_convert_cmd(struct fio_net_cmd *cmd)
  83 {
  84         uint16_t crc;
  85
  86         cmd->cmd_crc16 = le16_to_cpu(cmd->cmd_crc16);
  87         cmd->pdu_crc16 = le16_to_cpu(cmd->pdu_crc16);
  88
  89         crc = crc16(cmd, FIO_NET_CMD_CRC_SZ);
  90         if (crc != cmd->cmd_crc16) {
  91                 log_err("fio: server bad crc on command (got %x, wanted %x)\n",
  92                                 cmd->cmd_crc16, crc);
  93                 return 1;
  94         }
  95
  96         cmd->version    = le16_to_cpu(cmd->version);
  97         cmd->opcode     = le16_to_cpu(cmd->opcode);
  98         cmd->flags      = le32_to_cpu(cmd->flags);
  99         cmd->serial     = le64_to_cpu(cmd->serial);
 100         cmd->pdu_len    = le32_to_cpu(cmd->pdu_len);
 101
 102         switch (cmd->version) {
 103         case FIO_SERVER_VER2:
 104                 break;
 105         default:
 106                 log_err("fio: bad server cmd version %d\n", cmd->version);
 107                 return 1;
 108         }
 109
 110         if (cmd->pdu_len > FIO_SERVER_MAX_PDU) {
 111                 log_err("fio: command payload too large: %u\n", cmd->pdu_len);
 112                 return 1;
 113         }
 114
 115         return 0;
 116 }
 117
 118 /*
 119  * Read (and defragment, if necessary) incoming commands
 120  */
 121 struct fio_net_cmd *fio_net_recv_cmd(int sk)
 122 {
 123         struct fio_net_cmd cmd, *cmdret = NULL;
 124         size_t cmd_size = 0, pdu_offset = 0;
 125         uint16_t crc;
 126         int ret, first = 1;
 127         void *pdu = NULL;
 128
 129         do {
 130                 ret = fio_recv_data(sk, &cmd, sizeof(cmd));
 131                 if (ret)
 132                         break;
 133
 134                 /* We have a command, verify it and swap if need be */
 135                 ret = verify_convert_cmd(&cmd);
 136                 if (ret)
 137                         break;
 138
 139                 if (first) {
 140                         /* if this is text, add room for \0 at the end */
 141                         cmd_size = sizeof(cmd) + cmd.pdu_len + 1;
 142                         assert(!cmdret);
 143                 } else
 144                         cmd_size += cmd.pdu_len;
 145
 146                 cmdret = realloc(cmdret, cmd_size);
 147
 148                 if (first)
 149                         memcpy(cmdret, &cmd, sizeof(cmd));
 150                 else
 151                         assert(cmdret->opcode == cmd.opcode);
 152
 153                 if (!cmd.pdu_len)
 154                         break;
 155
 156                 /* There's payload, get it */
 157                 pdu = (void *) cmdret->payload + pdu_offset;
 158                 ret = fio_recv_data(sk, pdu, cmd.pdu_len);
 159                 if (ret)
 160                         break;
 161
 162                 /* Verify payload crc */
 163                 crc = crc16(pdu, cmd.pdu_len);
 164                 if (crc != cmd.pdu_crc16) {
 165                         log_err("fio: server bad crc on payload ");
 166                         log_err("(got %x, wanted %x)\n", cmd.pdu_crc16, crc);
 167                         ret = 1;
 168                         break;
 169                 }
 170
 171                 pdu_offset += cmd.pdu_len;
 172                 if (!first)
 173                         cmdret->pdu_len += cmd.pdu_len;
 174                 first = 0;
 175         } while (cmd.flags & FIO_NET_CMD_F_MORE);
 176
 177         if (ret) {
 178                 free(cmdret);
 179                 cmdret = NULL;
 180         } else if (cmdret) {
 181                 /* zero-terminate text input */
 182                 if (cmdret->pdu_len && (cmdret->opcode == FIO_NET_CMD_TEXT ||
 183                     cmdret->opcode == FIO_NET_CMD_JOB)) {
 184                         char *buf = (char *) cmdret->payload;
 185
 186                         buf[cmdret->pdu_len ] = '\0';
 187                 }
 188                 /* frag flag is internal */
 189                 cmdret->flags &= ~FIO_NET_CMD_F_MORE;
 190         }
 191
 192         return cmdret;
 193 }
 194
 195 void fio_net_cmd_crc(struct fio_net_cmd *cmd)
 196 {
 197         uint32_t pdu_len;
 198
 199         cmd->cmd_crc16 = __cpu_to_le16(crc16(cmd, FIO_NET_CMD_CRC_SZ));
 200
 201         pdu_len = le32_to_cpu(cmd->pdu_len);
 202         if (pdu_len)
 203                 cmd->pdu_crc16 = __cpu_to_le16(crc16(cmd->payload, pdu_len));
 204 }
 205
 206 int fio_net_send_cmd(int fd, uint16_t opcode, const void *buf, off_t size)
 207 {
 208         struct fio_net_cmd *cmd;
 209         size_t this_len;
 210         int ret;
 211
 212         do {
 213                 this_len = size;
 214                 if (this_len > FIO_SERVER_MAX_PDU)
 215                         this_len = FIO_SERVER_MAX_PDU;
 216
 217                 cmd = malloc(sizeof(*cmd) + this_len);
 218
 219                 fio_init_net_cmd(cmd, opcode, buf, this_len);
 220
 221                 if (this_len < size)
 222                         cmd->flags = __cpu_to_le32(FIO_NET_CMD_F_MORE);
 223
 224                 fio_net_cmd_crc(cmd);
 225
 226                 ret = fio_send_data(fd, cmd, sizeof(*cmd) + this_len);
 227                 free(cmd);
 228                 size -= this_len;
 229                 buf += this_len;
 230         } while (!ret && size);
 231
 232         return ret;
 233 }
 234
 235 int fio_net_send_simple_cmd(int sk, uint16_t opcode, uint64_t serial)
 236 {
 237         struct fio_net_cmd cmd;
 238
 239         fio_init_net_cmd(&cmd, opcode, NULL, 0);
 240         fio_net_cmd_crc(&cmd);
 241
 242         return fio_send_data(sk, &cmd, sizeof(cmd));
 243 }
 244
 245 static int fio_server_send_quit_cmd(void)
 246 {
 247         dprint(FD_NET, "server: sending quit\n");
 248         return fio_net_send_simple_cmd(server_fd, FIO_NET_CMD_QUIT, 0);
 249 }
 250
 251 static int handle_job_cmd(struct fio_net_cmd *cmd)
 252 {
 253         char *buf = (char *) cmd->payload;
 254         int ret;
 255
 256         if (parse_jobs_ini(buf, 1, 0)) {
 257                 fio_server_send_quit_cmd();
 258                 return -1;
 259         }
 260
 261         fio_net_send_simple_cmd(server_fd, FIO_NET_CMD_START, 0);
 262
 263         ret = exec_run();
 264         fio_server_send_quit_cmd();
 265         reset_fio_state();
 266         return ret;
 267 }
 268
 269 static int handle_jobline_cmd(struct fio_net_cmd *cmd)
 270 {
 271         struct cmd_line_pdu *pdu = (struct cmd_line_pdu *) cmd->payload;
 272         char *argv[FIO_NET_CMD_JOBLINE_ARGV];
 273         int ret, i;
 274
 275         pdu->argc = le16_to_cpu(pdu->argc);
 276
 277         dprint(FD_NET, "server: %d command line args\n", pdu->argc);
 278
 279         for (i = 0; i < pdu->argc; i++) {
 280                 argv[i] = (char *) pdu->argv[i];
 281                 dprint(FD_NET, "server: %d: %s\n", i, argv[i]);
 282         }
 283
 284         if (parse_cmd_line(pdu->argc, argv)) {
 285                 fio_server_send_quit_cmd();
 286                 return -1;
 287         }
 288
 289         fio_net_send_simple_cmd(server_fd, FIO_NET_CMD_START, 0);
 290
 291         ret = exec_run();
 292         fio_server_send_quit_cmd();
 293         reset_fio_state();
 294         return ret;
 295 }
 296
 297 static int handle_probe_cmd(struct fio_net_cmd *cmd)
 298 {
 299         struct cmd_probe_pdu probe;
 300
 301         memset(&probe, 0, sizeof(probe));
 302         gethostname((char *) probe.hostname, sizeof(probe.hostname));
 303 #ifdef FIO_BIG_ENDIAN
 304         probe.bigendian = 1;
 305 #endif
 306         probe.fio_major = FIO_MAJOR;
 307         probe.fio_minor = FIO_MINOR;
 308         probe.fio_patch = FIO_PATCH;
 309
 310         return fio_net_send_cmd(server_fd, FIO_NET_CMD_PROBE, &probe, sizeof(probe));
 311 }
 312
 313 static int handle_command(struct fio_net_cmd *cmd)
 314 {
 315         int ret;
 316
 317         dprint(FD_NET, "server: got opcode %d\n", cmd->opcode);
 318
 319         switch (cmd->opcode) {
 320         case FIO_NET_CMD_QUIT:
 321                 fio_terminate_threads(TERMINATE_ALL);
 322                 return -1;
 323         case FIO_NET_CMD_EXIT:
 324                 exit_backend = 1;
 325                 return -1;
 326         case FIO_NET_CMD_JOB:
 327                 ret = handle_job_cmd(cmd);
 328                 break;
 329         case FIO_NET_CMD_JOBLINE:
 330                 ret = handle_jobline_cmd(cmd);
 331                 break;
 332         case FIO_NET_CMD_PROBE:
 333                 ret = handle_probe_cmd(cmd);
 334                 break;
 335         default:
 336                 log_err("fio: unknown opcode: %d\n", cmd->opcode);
 337                 ret = 1;
 338         }
 339
 340         return ret;
 341 }
 342
 343 static int handle_connection(int sk, int block)
 344 {
 345         struct fio_net_cmd *cmd = NULL;
 346         int ret = 0;
 347
 348         /* read forever */
 349         while (!exit_backend) {
 350                 struct pollfd pfd = {
 351                         .fd     = sk,
 352                         .events = POLLIN,
 353                 };
 354
 355                 ret = 0;
 356                 do {
 357                         ret = poll(&pfd, 1, 100);
 358                         if (ret < 0) {
 359                                 if (errno == EINTR)
 360                                         break;
 361                                 log_err("fio: poll: %s\n", strerror(errno));
 362                                 break;
 363                         } else if (!ret) {
 364                                 if (!block)
 365                                         return 0;
 366                                 continue;
 367                         }
 368
 369                         if (pfd.revents & POLLIN)
 370                                 break;
 371                         if (pfd.revents & (POLLERR|POLLHUP)) {
 372                                 ret = 1;
 373                                 break;
 374                         }
 375                 } while (!exit_backend);
 376
 377                 if (ret < 0)
 378                         break;
 379
 380                 cmd = fio_net_recv_cmd(sk);
 381                 if (!cmd) {
 382                         ret = -1;
 383                         break;
 384                 }
 385
 386                 ret = handle_command(cmd);
 387                 if (ret)
 388                         break;
 389
 390                 free(cmd);
 391                 cmd = NULL;
 392         }
 393
 394         if (cmd)
 395                 free(cmd);
 396
 397         return ret;
 398 }
 399
 400 void fio_server_idle_loop(void)
 401 {
 402         if (server_fd != -1)
 403                 handle_connection(server_fd, 0);
 404 }
 405
 406 static int accept_loop(int listen_sk)
 407 {
 408         struct sockaddr_in addr;
 409         fio_socklen_t len = sizeof(addr);
 410         struct pollfd pfd;
 411         int ret, sk, flags, exitval = 0;
 412
 413         dprint(FD_NET, "server enter accept loop\n");
 414
 415         flags = fcntl(listen_sk, F_GETFL);
 416         flags |= O_NONBLOCK;
 417         fcntl(listen_sk, F_SETFL, flags);
 418 again:
 419         pfd.fd = listen_sk;
 420         pfd.events = POLLIN;
 421         do {
 422                 ret = poll(&pfd, 1, 100);
 423                 if (ret < 0) {
 424                         if (errno == EINTR)
 425                                 break;
 426                         log_err("fio: poll: %s\n", strerror(errno));
 427                         goto out;
 428                 } else if (!ret)
 429                         continue;
 430
 431                 if (pfd.revents & POLLIN)
 432                         break;
 433         } while (!exit_backend);
 434
 435         if (exit_backend)
 436                 goto out;
 437
 438         sk = accept(listen_sk, (struct sockaddr *) &addr, &len);
 439         if (sk < 0) {
 440                 log_err("fio: accept: %s\n", strerror(errno));
 441                 return -1;
 442         }
 443
 444         dprint(FD_NET, "server: connect from %s\n", inet_ntoa(addr.sin_addr));
 445
 446         server_fd = sk;
 447
 448         exitval = handle_connection(sk, 1);
 449
 450         server_fd = -1;
 451         close(sk);
 452
 453         if (!exit_backend)
 454                 goto again;
 455
 456 out:
 457         return exitval;
 458 }
 459
 460 int fio_server_text_output(const char *buf, unsigned int len)
 461 {
 462         if (server_fd != -1)
 463                 return fio_net_send_cmd(server_fd, FIO_NET_CMD_TEXT, buf, len);
 464
 465         return fwrite(buf, len, 1, f_err);
 466 }
 467
 468 static void convert_io_stat(struct io_stat *dst, struct io_stat *src)
 469 {
 470         dst->max_val    = cpu_to_le64(src->max_val);
 471         dst->min_val    = cpu_to_le64(src->min_val);
 472         dst->samples    = cpu_to_le64(src->samples);
 473
 474         /*
 475          * Encode to IEEE 754 for network transfer
 476          */
 477         dst->mean.u.i   = __cpu_to_le64(fio_double_to_uint64(src->mean.u.f));
 478         dst->S.u.i      = __cpu_to_le64(fio_double_to_uint64(src->S.u.f));
 479 }
 480
 481 static void convert_gs(struct group_run_stats *dst, struct group_run_stats *src)
 482 {
 483         int i;
 484
 485         for (i = 0; i < 2; i++) {
 486                 dst->max_run[i]         = cpu_to_le64(src->max_run[i]);
 487                 dst->min_run[i]         = cpu_to_le64(src->min_run[i]);
 488                 dst->max_bw[i]          = cpu_to_le64(src->max_bw[i]);
 489                 dst->min_bw[i]          = cpu_to_le64(src->min_bw[i]);
 490                 dst->io_kb[i]           = cpu_to_le64(src->io_kb[i]);
 491                 dst->agg[i]             = cpu_to_le64(src->agg[i]);
 492         }
 493
 494         dst->kb_base    = cpu_to_le32(src->kb_base);
 495         dst->groupid    = cpu_to_le32(src->groupid);
 496 }
 497
 498 /*
 499  * Send a CMD_TS, which packs struct thread_stat and group_run_stats
 500  * into a single payload.
 501  */
 502 void fio_server_send_ts(struct thread_stat *ts, struct group_run_stats *rs)
 503 {
 504         struct cmd_ts_pdu p;
 505         int i, j;
 506
 507         dprint(FD_NET, "server sending end stats\n");
 508
 509         memset(&p, 0, sizeof(p));
 510
 511         strcpy(p.ts.name, ts->name);
 512         strcpy(p.ts.verror, ts->verror);
 513         strcpy(p.ts.description, ts->description);
 514
 515         p.ts.error      = cpu_to_le32(ts->error);
 516         p.ts.groupid    = cpu_to_le32(ts->groupid);
 517         p.ts.pid        = cpu_to_le32(ts->pid);
 518         p.ts.members    = cpu_to_le32(ts->members);
 519
 520         for (i = 0; i < 2; i++) {
 521                 convert_io_stat(&p.ts.clat_stat[i], &ts->clat_stat[i]);
 522                 convert_io_stat(&p.ts.slat_stat[i], &ts->slat_stat[i]);
 523                 convert_io_stat(&p.ts.lat_stat[i], &ts->lat_stat[i]);
 524                 convert_io_stat(&p.ts.bw_stat[i], &ts->bw_stat[i]);
 525         }
 526
 527         p.ts.usr_time           = cpu_to_le64(ts->usr_time);
 528         p.ts.sys_time           = cpu_to_le64(ts->sys_time);
 529         p.ts.ctx                = cpu_to_le64(ts->ctx);
 530         p.ts.minf               = cpu_to_le64(ts->minf);
 531         p.ts.majf               = cpu_to_le64(ts->majf);
 532         p.ts.clat_percentiles   = cpu_to_le64(ts->clat_percentiles);
 533
 534         for (i = 0; i < FIO_IO_U_LIST_MAX_LEN; i++) {
 535                 fio_fp64_t *fp = &p.ts.percentile_list[i];
 536
 537                 fp->u.i = __cpu_to_le64(fio_double_to_uint64(fp->u.f));
 538         }
 539
 540         for (i = 0; i < FIO_IO_U_MAP_NR; i++) {
 541                 p.ts.io_u_map[i]        = cpu_to_le32(ts->io_u_map[i]);
 542                 p.ts.io_u_submit[i]     = cpu_to_le32(ts->io_u_submit[i]);
 543                 p.ts.io_u_complete[i]   = cpu_to_le32(ts->io_u_complete[i]);
 544         }
 545
 546         for (i = 0; i < FIO_IO_U_LAT_U_NR; i++) {
 547                 p.ts.io_u_lat_u[i]      = cpu_to_le32(ts->io_u_lat_u[i]);
 548                 p.ts.io_u_lat_m[i]      = cpu_to_le32(ts->io_u_lat_m[i]);
 549         }
 550
 551         for (i = 0; i < 2; i++)
 552                 for (j = 0; j < FIO_IO_U_PLAT_NR; j++)
 553                         p.ts.io_u_plat[i][j] = cpu_to_le32(ts->io_u_plat[i][j]);
 554
 555         for (i = 0; i < 3; i++) {
 556                 p.ts.total_io_u[i]      = cpu_to_le64(ts->total_io_u[i]);
 557                 p.ts.short_io_u[i]      = cpu_to_le64(ts->short_io_u[i]);
 558         }
 559
 560         p.ts.total_submit       = cpu_to_le64(ts->total_submit);
 561         p.ts.total_complete     = cpu_to_le64(ts->total_complete);
 562
 563         for (i = 0; i < 2; i++) {
 564                 p.ts.io_bytes[i]        = cpu_to_le64(ts->io_bytes[i]);
 565                 p.ts.runtime[i]         = cpu_to_le64(ts->runtime[i]);
 566         }
 567
 568         p.ts.total_run_time     = cpu_to_le64(ts->total_run_time);
 569         p.ts.continue_on_error  = cpu_to_le16(ts->continue_on_error);
 570         p.ts.total_err_count    = cpu_to_le64(ts->total_err_count);
 571         p.ts.first_error        = cpu_to_le32(ts->first_error);
 572         p.ts.kb_base            = cpu_to_le32(ts->kb_base);
 573
 574         convert_gs(&p.rs, rs);
 575
 576         fio_net_send_cmd(server_fd, FIO_NET_CMD_TS, &p, sizeof(p));
 577 }
 578
 579 void fio_server_send_gs(struct group_run_stats *rs)
 580 {
 581         struct group_run_stats gs;
 582
 583         dprint(FD_NET, "server sending group run stats\n");
 584
 585         convert_gs(&gs, rs);
 586         fio_net_send_cmd(server_fd, FIO_NET_CMD_GS, &gs, sizeof(gs));
 587 }
 588
 589 void fio_server_send_status(void)
 590 {
 591         struct jobs_eta *je;
 592         size_t size;
 593         void *buf;
 594         int i;
 595
 596         size = sizeof(*je) + thread_number * sizeof(char);
 597         buf = malloc(size);
 598         memset(buf, 0, size);
 599         je = buf;
 600
 601         if (!calc_thread_status(je)) {
 602                 free(je);
 603                 return;
 604         }
 605
 606         dprint(FD_NET, "server sending status\n");
 607
 608         je->nr_running          = cpu_to_le32(je->nr_running);
 609         je->nr_ramp             = cpu_to_le32(je->nr_ramp);
 610         je->nr_pending          = cpu_to_le32(je->nr_pending);
 611         je->files_open          = cpu_to_le32(je->files_open);
 612         je->m_rate              = cpu_to_le32(je->m_rate);
 613         je->t_rate              = cpu_to_le32(je->t_rate);
 614         je->m_iops              = cpu_to_le32(je->m_iops);
 615         je->t_iops              = cpu_to_le32(je->t_iops);
 616
 617         for (i = 0; i < 2; i++) {
 618                 je->rate[i]     = cpu_to_le32(je->rate[i]);
 619                 je->iops[i]     = cpu_to_le32(je->iops[i]);
 620         }
 621
 622         je->elapsed_sec         = cpu_to_le32(je->nr_running);
 623         je->eta_sec             = cpu_to_le64(je->eta_sec);
 624
 625         fio_net_send_cmd(server_fd, FIO_NET_CMD_ETA, buf, size);
 626         free(je);
 627 }
 628
 629 int fio_server_log(const char *format, ...)
 630 {
 631         char buffer[1024];
 632         va_list args;
 633         size_t len;
 634
 635         dprint(FD_NET, "server log\n");
 636
 637         va_start(args, format);
 638         len = vsnprintf(buffer, sizeof(buffer), format, args);
 639         va_end(args);
 640
 641         return fio_server_text_output(buffer, len);
 642 }
 643
 644 static int fio_init_server_ip(void)
 645 {
 646         int sk, opt;
 647
 648         sk = socket(AF_INET, SOCK_STREAM, 0);
 649         if (sk < 0) {
 650                 log_err("fio: socket: %s\n", strerror(errno));
 651                 return -1;
 652         }
 653
 654         opt = 1;
 655         if (setsockopt(sk, SOL_SOCKET, SO_REUSEADDR, &opt, sizeof(opt)) < 0) {
 656                 log_err("fio: setsockopt: %s\n", strerror(errno));
 657                 close(sk);
 658                 return -1;
 659         }
 660 #ifdef SO_REUSEPORT
 661         if (setsockopt(sk, SOL_SOCKET, SO_REUSEPORT, &opt, sizeof(opt)) < 0) {
 662                 log_err("fio: setsockopt: %s\n", strerror(errno));
 663                 close(sk);
 664                 return -1;
 665         }
 666 #endif
 667
 668         saddr_in.sin_family = AF_INET;
 669
 670         if (bind(sk, (struct sockaddr *) &saddr_in, sizeof(saddr_in)) < 0) {
 671                 log_err("fio: bind: %s\n", strerror(errno));
 672                 close(sk);
 673                 return -1;
 674         }
 675
 676         return sk;
 677 }
 678
 679 static int fio_init_server_sock(void)
 680 {
 681         struct sockaddr_un addr;
 682         fio_socklen_t len;
 683         mode_t mode;
 684         int sk;
 685
 686         sk = socket(AF_UNIX, SOCK_STREAM, 0);
 687         if (sk < 0) {
 688                 log_err("fio: socket: %s\n", strerror(errno));
 689                 return -1;
 690         }
 691
 692         mode = umask(000);
 693
 694         memset(&addr, 0, sizeof(addr));
 695         addr.sun_family = AF_UNIX;
 696         strcpy(addr.sun_path, bind_sock);
 697         unlink(bind_sock);
 698
 699         len = sizeof(addr.sun_family) + strlen(bind_sock) + 1;
 700
 701         if (bind(sk, (struct sockaddr *) &addr, len) < 0) {
 702                 log_err("fio: bind: %s\n", strerror(errno));
 703                 close(sk);
 704                 return -1;
 705         }
 706
 707         umask(mode);
 708         return sk;
 709 }
 710
 711 static int fio_init_server_connection(void)
 712 {
 713         char bind_str[128];
 714         int sk;
 715
 716         dprint(FD_NET, "starting server\n");
 717
 718         if (!bind_sock)
 719                 sk = fio_init_server_ip();
 720         else
 721                 sk = fio_init_server_sock();
 722
 723         if (sk < 0)
 724                 return sk;
 725
 726         if (!bind_sock)
 727                 sprintf(bind_str, "%s:%u", inet_ntoa(saddr_in.sin_addr), fio_net_port);
 728         else
 729                 strcpy(bind_str, bind_sock);
 730
 731         log_info("fio: server listening on %s\n", bind_str);
 732
 733         if (listen(sk, 1) < 0) {
 734                 log_err("fio: listen: %s\n", strerror(errno));
 735                 return -1;
 736         }
 737
 738         return sk;
 739 }
 740
 741 int fio_server_parse_string(const char *str, char **ptr, int *is_sock,
 742                             int *port, struct in_addr *inp)
 743 {
 744         *ptr = NULL;
 745         *is_sock = 0;
 746         *port = 0;
 747
 748         if (!strncmp(str, "sock:", 5)) {
 749                 *ptr = strdup(str + 5);
 750                 *is_sock = 1;
 751         } else {
 752                 const char *host = str;
 753                 char *portp;
 754                 int lport = 0;
 755
 756                 /*
 757                  * Is it ip:<ip or host>:port
 758                  */
 759                 if (!strncmp(host, "ip:", 3))
 760                         host += 3;
 761                 else if (host[0] == ':') {
 762                         /* String is :port */
 763                         host++;
 764                         lport = atoi(host);
 765                         if (!lport || lport > 65535) {
 766                                 log_err("fio: bad server port %u\n", port);
 767                                 return 1;
 768                         }
 769                         /* no hostname given, we are done */
 770                         *port = lport;
 771                         return 0;
 772                 }
 773
 774                 /*
 775                  * If no port seen yet, check if there's a last ':' at the end
 776                  */
 777                 if (!lport) {
 778                         portp = strchr(host, ':');
 779                         if (portp) {
 780                                 *portp = '\0';
 781                                 portp++;
 782                                 lport = atoi(portp);
 783                                 if (!lport || lport > 65535) {
 784                                         log_err("fio: bad server port %u\n", port);
 785                                         return 1;
 786                                 }
 787                         }
 788                 }
 789
 790                 if (lport)
 791                         *port = lport;
 792
 793                 *ptr = strdup(host);
 794
 795                 if (inet_aton(host, inp) != 1) {
 796                         struct hostent *hent;
 797
 798                         hent = gethostbyname(host);
 799                         if (!hent) {
 800                                 printf("FAIL\n");
 801                                 free(*ptr);
 802                                 *ptr = NULL;
 803                                 return 1;
 804                         }
 805
 806                         memcpy(inp, hent->h_addr, 4);
 807                 }
 808         }
 809
 810         if (*port == 0)
 811                 *port = fio_net_port;
 812
 813         return 0;
 814 }
 815
 816 /*
 817  * Server arg should be one of:
 818  *
 819  * sock:/path/to/socket
 820  *   ip:1.2.3.4
 821  *      1.2.3.4
 822  *
 823  * Where sock uses unix domain sockets, and ip binds the server to
 824  * a specific interface. If no arguments are given to the server, it
 825  * uses IP and binds to 0.0.0.0.
 826  *
 827  */
 828 static int fio_handle_server_arg(void)
 829 {
 830         int unused;
 831
 832         saddr_in.sin_addr.s_addr = htonl(INADDR_ANY);
 833         saddr_in.sin_port = htons(fio_net_port);
 834
 835         if (!fio_server_arg)
 836                 return 0;
 837
 838         return fio_server_parse_string(fio_server_arg, &bind_sock, &unused,
 839                                         &fio_net_port, &saddr_in.sin_addr);
 840 }
 841
 842 static int fio_server(void)
 843 {
 844         int sk, ret;
 845
 846         dprint(FD_NET, "starting server\n");
 847
 848         if (fio_handle_server_arg())
 849                 return -1;
 850
 851         sk = fio_init_server_connection();
 852         if (sk < 0)
 853                 return -1;
 854
 855         ret = accept_loop(sk);
 856
 857         close(sk);
 858
 859         if (fio_server_arg) {
 860                 free(fio_server_arg);
 861                 fio_server_arg = NULL;
 862         }
 863         if (bind_sock)
 864                 free(bind_sock);
 865
 866         return ret;
 867 }
 868
 869 static void sig_int(int sig)
 870 {
 871         fio_terminate_threads(TERMINATE_ALL);
 872         exit_backend = 1;
 873 }
 874
 875 static void server_signal_handler(void)
 876 {
 877         struct sigaction act;
 878
 879         memset(&act, 0, sizeof(act));
 880         act.sa_handler = sig_int;
 881         act.sa_flags = SA_RESTART;
 882         sigaction(SIGINT, &act, NULL);
 883
 884         memset(&act, 0, sizeof(act));
 885         act.sa_handler = sig_int;
 886         act.sa_flags = SA_RESTART;
 887         sigaction(SIGTERM, &act, NULL);
 888 }
 889
 890 int fio_start_server(int daemonize)
 891 {
 892         pid_t pid;
 893
 894         server_signal_handler();
 895
 896         if (!daemonize)
 897                 return fio_server();
 898
 899         openlog("fio", LOG_NDELAY|LOG_NOWAIT|LOG_PID, LOG_USER);
 900         pid = fork();
 901         if (pid < 0) {
 902                 syslog(LOG_ERR, "failed server fork");
 903                 return -1;
 904         } else if (pid)
 905                 exit(0);
 906
 907         setsid();
 908         close(STDIN_FILENO);
 909         close(STDOUT_FILENO);
 910         close(STDERR_FILENO);
 911         f_out = NULL;
 912         f_err = NULL;
 913         log_syslog = 1;
 914         return fio_server();
 915 }
 916
 917 void fio_server_set_arg(const char *arg)
 918 {
 919         fio_server_arg = strdup(arg);
 920 }