src/bin/lttng-relayd/live.c

   1 /*
   2  * Copyright (C) 2013 - Julien Desfossez <jdesfossez@efficios.com>
   3  *                      David Goulet <dgoulet@efficios.com>
   4  *               2015 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License, version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but WITHOUT
  11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  13  * more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along
  16  * with this program; if not, write to the Free Software Foundation, Inc.,
  17  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18  */
  19
  20 #define _GNU_SOURCE
  21 #include <getopt.h>
  22 #include <grp.h>
  23 #include <limits.h>
  24 #include <pthread.h>
  25 #include <signal.h>
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <sys/mman.h>
  30 #include <sys/mount.h>
  31 #include <sys/resource.h>
  32 #include <sys/socket.h>
  33 #include <sys/stat.h>
  34 #include <sys/types.h>
  35 #include <sys/wait.h>
  36 #include <inttypes.h>
  37 #include <urcu/futex.h>
  38 #include <urcu/uatomic.h>
  39 #include <urcu/rculist.h>
  40 #include <unistd.h>
  41 #include <fcntl.h>
  42 #include <config.h>
  43
  44 #include <lttng/lttng.h>
  45 #include <common/common.h>
  46 #include <common/compat/poll.h>
  47 #include <common/compat/socket.h>
  48 #include <common/compat/endian.h>
  49 #include <common/defaults.h>
  50 #include <common/futex.h>
  51 #include <common/index/index.h>
  52 #include <common/sessiond-comm/sessiond-comm.h>
  53 #include <common/sessiond-comm/inet.h>
  54 #include <common/sessiond-comm/relayd.h>
  55 #include <common/uri.h>
  56 #include <common/utils.h>
  57
  58 #include "cmd.h"
  59 #include "live.h"
  60 #include "lttng-relayd.h"
  61 #include "utils.h"
  62 #include "health-relayd.h"
  63 #include "testpoint.h"
  64 #include "viewer-stream.h"
  65 #include "stream.h"
  66 #include "session.h"
  67 #include "ctf-trace.h"
  68 #include "connection.h"
  69 #include "viewer-session.h"
  70
  71 #define SESSION_BUF_DEFAULT_COUNT       16
  72
  73 static struct lttng_uri *live_uri;
  74
  75 /*
  76  * This pipe is used to inform the worker thread that a command is queued and
  77  * ready to be processed.
  78  */
  79 static int live_conn_pipe[2] = { -1, -1 };
  80
  81 /* Shared between threads */
  82 static int live_dispatch_thread_exit;
  83
  84 static pthread_t live_listener_thread;
  85 static pthread_t live_dispatcher_thread;
  86 static pthread_t live_worker_thread;
  87
  88 /*
  89  * Relay command queue.
  90  *
  91  * The live_thread_listener and live_thread_dispatcher communicate with this
  92  * queue.
  93  */
  94 static struct relay_conn_queue viewer_conn_queue;
  95
  96 static uint64_t last_relay_viewer_session_id;
  97 static pthread_mutex_t last_relay_viewer_session_id_lock =
  98                 PTHREAD_MUTEX_INITIALIZER;
  99
 100 /*
 101  * Cleanup the daemon
 102  */
 103 static
 104 void cleanup_relayd_live(void)
 105 {
 106         DBG("Cleaning up");
 107
 108         free(live_uri);
 109 }
 110
 111 /*
 112  * Receive a request buffer using a given socket, destination allocated buffer
 113  * of length size.
 114  *
 115  * Return the size of the received message or else a negative value on error
 116  * with errno being set by recvmsg() syscall.
 117  */
 118 static
 119 ssize_t recv_request(struct lttcomm_sock *sock, void *buf, size_t size)
 120 {
 121         ssize_t ret;
 122
 123         ret = sock->ops->recvmsg(sock, buf, size, 0);
 124         if (ret < 0 || ret != size) {
 125                 if (ret == 0) {
 126                         /* Orderly shutdown. Not necessary to print an error. */
 127                         DBG("Socket %d did an orderly shutdown", sock->fd);
 128                 } else {
 129                         ERR("Relay failed to receive request.");
 130                 }
 131                 ret = -1;
 132         }
 133
 134         return ret;
 135 }
 136
 137 /*
 138  * Send a response buffer using a given socket, source allocated buffer of
 139  * length size.
 140  *
 141  * Return the size of the sent message or else a negative value on error with
 142  * errno being set by sendmsg() syscall.
 143  */
 144 static
 145 ssize_t send_response(struct lttcomm_sock *sock, void *buf, size_t size)
 146 {
 147         ssize_t ret;
 148
 149         ret = sock->ops->sendmsg(sock, buf, size, 0);
 150         if (ret < 0) {
 151                 ERR("Relayd failed to send response.");
 152         }
 153
 154         return ret;
 155 }
 156
 157 /*
 158  * Atomically check if new streams got added in one of the sessions attached
 159  * and reset the flag to 0.
 160  *
 161  * Returns 1 if new streams got added, 0 if nothing changed, a negative value
 162  * on error.
 163  */
 164 static
 165 int check_new_streams(struct relay_connection *conn)
 166 {
 167         struct relay_session *session;
 168         unsigned long current_val;
 169         int ret = 0;
 170
 171         if (!conn->viewer_session) {
 172                 goto end;
 173         }
 174         rcu_read_lock();
 175         cds_list_for_each_entry_rcu(session,
 176                         &conn->viewer_session->session_list,
 177                         viewer_session_node) {
 178                 if (!session_get(session)) {
 179                         continue;
 180                 }
 181                 current_val = uatomic_cmpxchg(&session->new_streams, 1, 0);
 182                 ret = current_val;
 183                 session_put(session);
 184                 if (ret == 1) {
 185                         goto end;
 186                 }
 187         }
 188 end:
 189         rcu_read_unlock();
 190         return ret;
 191 }
 192
 193 /*
 194  * Send viewer streams to the given socket. The ignore_sent_flag indicates if
 195  * this function should ignore the sent flag or not.
 196  *
 197  * Return 0 on success or else a negative value.
 198  */
 199 static
 200 ssize_t send_viewer_streams(struct lttcomm_sock *sock,
 201                 struct relay_session *session, unsigned int ignore_sent_flag)
 202 {
 203         ssize_t ret;
 204         struct lttng_viewer_stream send_stream;
 205         struct lttng_ht_iter iter;
 206         struct relay_viewer_stream *vstream;
 207
 208         rcu_read_lock();
 209
 210         cds_lfht_for_each_entry(viewer_streams_ht->ht, &iter.iter, vstream,
 211                         stream_n.node) {
 212                 struct ctf_trace *ctf_trace;
 213
 214                 health_code_update();
 215
 216                 if (!viewer_stream_get(vstream)) {
 217                         continue;
 218                 }
 219
 220                 pthread_mutex_lock(&vstream->stream->lock);
 221                 /* Ignore if not the same session. */
 222                 if (vstream->stream->trace->session->id != session->id ||
 223                                 (!ignore_sent_flag && vstream->sent_flag)) {
 224                         pthread_mutex_unlock(&vstream->stream->lock);
 225                         viewer_stream_put(vstream);
 226                         continue;
 227                 }
 228
 229                 ctf_trace = vstream->stream->trace;
 230                 send_stream.id = htobe64(vstream->stream->stream_handle);
 231                 send_stream.ctf_trace_id = htobe64(ctf_trace->id);
 232                 send_stream.metadata_flag = htobe32(
 233                                 vstream->stream->is_metadata);
 234                 strncpy(send_stream.path_name, vstream->path_name,
 235                                 sizeof(send_stream.path_name));
 236                 strncpy(send_stream.channel_name, vstream->channel_name,
 237                                 sizeof(send_stream.channel_name));
 238
 239                 DBG("Sending stream %" PRIu64 " to viewer",
 240                                 vstream->stream->stream_handle);
 241                 vstream->sent_flag = 1;
 242                 pthread_mutex_unlock(&vstream->stream->lock);
 243
 244                 ret = send_response(sock, &send_stream, sizeof(send_stream));
 245                 viewer_stream_put(vstream);
 246                 if (ret < 0) {
 247                         goto end_unlock;
 248                 }
 249         }
 250
 251         ret = 0;
 252
 253 end_unlock:
 254         rcu_read_unlock();
 255         return ret;
 256 }
 257
 258 /*
 259  * Create every viewer stream possible for the given session with the seek
 260  * type. Three counters *can* be return which are in order the total amount of
 261  * viewer stream of the session, the number of unsent stream and the number of
 262  * stream created. Those counters can be NULL and thus will be ignored.
 263  *
 264  * Return 0 on success or else a negative value.
 265  */
 266 static
 267 int make_viewer_streams(struct relay_session *session,
 268                 enum lttng_viewer_seek seek_t, uint32_t *nb_total, uint32_t *nb_unsent,
 269                 uint32_t *nb_created, bool *closed)
 270 {
 271         int ret;
 272         struct lttng_ht_iter iter;
 273         struct ctf_trace *ctf_trace;
 274
 275         assert(session);
 276
 277         /*
 278          * Hold the session lock to ensure that we see either none or
 279          * all initial streams for a session, but no intermediate state.
 280          */
 281         pthread_mutex_lock(&session->lock);
 282
 283         if (session->connection_closed) {
 284                 *closed = true;
 285         }
 286
 287         /*
 288          * Create viewer streams for relay streams that are ready to be
 289          * used for a the given session id only.
 290          */
 291         rcu_read_lock();
 292         cds_lfht_for_each_entry(session->ctf_traces_ht->ht, &iter.iter, ctf_trace,
 293                         node.node) {
 294                 struct relay_stream *stream;
 295
 296                 health_code_update();
 297
 298                 if (!ctf_trace_get(ctf_trace)) {
 299                         continue;
 300                 }
 301
 302                 cds_list_for_each_entry_rcu(stream, &ctf_trace->stream_list, stream_node) {
 303                         struct relay_viewer_stream *vstream;
 304
 305                         if (!stream_get(stream)) {
 306                                 continue;
 307                         }
 308                         /*
 309                          * stream published is protected by the session
 310                          * lock.
 311                          */
 312                         if (!stream->published) {
 313                                 goto next;
 314                         }
 315                         /*
 316                          * Stream has no data, don't consider it yet.
 317                          */
 318                         if (stream->is_metadata) {
 319                                 if (!stream->metadata_received) {
 320                                         goto next;
 321                                 }
 322                         } else {
 323                                 if (stream->prev_seq == -1ULL) {
 324                                         goto next;
 325                                 }
 326                         }
 327                         vstream = viewer_stream_get_by_id(stream->stream_handle);
 328                         if (!vstream) {
 329                                 vstream = viewer_stream_create(stream, seek_t);
 330                                 if (!vstream) {
 331                                         ret = -1;
 332                                         ctf_trace_put(ctf_trace);
 333                                         stream_put(stream);
 334                                         goto error_unlock;
 335                                 }
 336
 337                                 if (nb_created) {
 338                                         /* Update number of created stream counter. */
 339                                         (*nb_created)++;
 340                                 }
 341                                 /*
 342                                  * Ensure a self-reference is preserved even
 343                                  * after we have put our local reference.
 344                                  */
 345                                 viewer_stream_get(vstream);
 346                         } else {
 347                                 if (!vstream->sent_flag && nb_unsent) {
 348                                         /* Update number of unsent stream counter. */
 349                                         (*nb_unsent)++;
 350                                 }
 351                         }
 352                         /* Update number of total stream counter. */
 353                         if (nb_total) {
 354                                 if (stream->is_metadata) {
 355                                         if (!stream->closed ||
 356                                                         stream->metadata_received > vstream->metadata_sent) {
 357                                                 (*nb_total)++;
 358                                         }
 359                                 } else {
 360                                         if (!stream->closed ||
 361                                                 !(((int64_t) (stream->prev_seq - stream->last_net_seq_num)) >= 0)) {
 362
 363                                                 (*nb_total)++;
 364                                         }
 365                                 }
 366                         }
 367                         /* Put local reference. */
 368                         viewer_stream_put(vstream);
 369                 next:
 370                         stream_put(stream);
 371                 }
 372                 ctf_trace_put(ctf_trace);
 373         }
 374
 375         ret = 0;
 376
 377 error_unlock:
 378         rcu_read_unlock();
 379         pthread_mutex_unlock(&session->lock);
 380         return ret;
 381 }
 382
 383 int relayd_live_stop(void)
 384 {
 385         /* Stop dispatch thread */
 386         CMM_STORE_SHARED(live_dispatch_thread_exit, 1);
 387         futex_nto1_wake(&viewer_conn_queue.futex);
 388         return 0;
 389 }
 390
 391 /*
 392  * Create a poll set with O_CLOEXEC and add the thread quit pipe to the set.
 393  */
 394 static
 395 int create_thread_poll_set(struct lttng_poll_event *events, int size)
 396 {
 397         int ret;
 398
 399         if (events == NULL || size == 0) {
 400                 ret = -1;
 401                 goto error;
 402         }
 403
 404         ret = lttng_poll_create(events, size, LTTNG_CLOEXEC);
 405         if (ret < 0) {
 406                 goto error;
 407         }
 408
 409         /* Add quit pipe */
 410         ret = lttng_poll_add(events, thread_quit_pipe[0], LPOLLIN | LPOLLERR);
 411         if (ret < 0) {
 412                 goto error;
 413         }
 414
 415         return 0;
 416
 417 error:
 418         return ret;
 419 }
 420
 421 /*
 422  * Check if the thread quit pipe was triggered.
 423  *
 424  * Return 1 if it was triggered else 0;
 425  */
 426 static
 427 int check_thread_quit_pipe(int fd, uint32_t events)
 428 {
 429         if (fd == thread_quit_pipe[0] && (events & LPOLLIN)) {
 430                 return 1;
 431         }
 432
 433         return 0;
 434 }
 435
 436 /*
 437  * Create and init socket from uri.
 438  */
 439 static
 440 struct lttcomm_sock *init_socket(struct lttng_uri *uri)
 441 {
 442         int ret;
 443         struct lttcomm_sock *sock = NULL;
 444
 445         sock = lttcomm_alloc_sock_from_uri(uri);
 446         if (sock == NULL) {
 447                 ERR("Allocating socket");
 448                 goto error;
 449         }
 450
 451         ret = lttcomm_create_sock(sock);
 452         if (ret < 0) {
 453                 goto error;
 454         }
 455         DBG("Listening on sock %d for live", sock->fd);
 456
 457         ret = sock->ops->bind(sock);
 458         if (ret < 0) {
 459                 goto error;
 460         }
 461
 462         ret = sock->ops->listen(sock, -1);
 463         if (ret < 0) {
 464                 goto error;
 465
 466         }
 467
 468         return sock;
 469
 470 error:
 471         if (sock) {
 472                 lttcomm_destroy_sock(sock);
 473         }
 474         return NULL;
 475 }
 476
 477 /*
 478  * This thread manages the listening for new connections on the network
 479  */
 480 static
 481 void *thread_listener(void *data)
 482 {
 483         int i, ret, pollfd, err = -1;
 484         uint32_t revents, nb_fd;
 485         struct lttng_poll_event events;
 486         struct lttcomm_sock *live_control_sock;
 487
 488         DBG("[thread] Relay live listener started");
 489
 490         health_register(health_relayd, HEALTH_RELAYD_TYPE_LIVE_LISTENER);
 491
 492         health_code_update();
 493
 494         live_control_sock = init_socket(live_uri);
 495         if (!live_control_sock) {
 496                 goto error_sock_control;
 497         }
 498
 499         /* Pass 2 as size here for the thread quit pipe and control sockets. */
 500         ret = create_thread_poll_set(&events, 2);
 501         if (ret < 0) {
 502                 goto error_create_poll;
 503         }
 504
 505         /* Add the control socket */
 506         ret = lttng_poll_add(&events, live_control_sock->fd, LPOLLIN | LPOLLRDHUP);
 507         if (ret < 0) {
 508                 goto error_poll_add;
 509         }
 510
 511         lttng_relay_notify_ready();
 512
 513         if (testpoint(relayd_thread_live_listener)) {
 514                 goto error_testpoint;
 515         }
 516
 517         while (1) {
 518                 health_code_update();
 519
 520                 DBG("Listener accepting live viewers connections");
 521
 522 restart:
 523                 health_poll_entry();
 524                 ret = lttng_poll_wait(&events, -1);
 525                 health_poll_exit();
 526                 if (ret < 0) {
 527                         /*
 528                          * Restart interrupted system call.
 529                          */
 530                         if (errno == EINTR) {
 531                                 goto restart;
 532                         }
 533                         goto error;
 534                 }
 535                 nb_fd = ret;
 536
 537                 DBG("Relay new viewer connection received");
 538                 for (i = 0; i < nb_fd; i++) {
 539                         health_code_update();
 540
 541                         /* Fetch once the poll data */
 542                         revents = LTTNG_POLL_GETEV(&events, i);
 543                         pollfd = LTTNG_POLL_GETFD(&events, i);
 544
 545                         if (!revents) {
 546                                 /* No activity for this FD (poll implementation). */
 547                                 continue;
 548                         }
 549
 550                         /* Thread quit pipe has been closed. Killing thread. */
 551                         ret = check_thread_quit_pipe(pollfd, revents);
 552                         if (ret) {
 553                                 err = 0;
 554                                 goto exit;
 555                         }
 556
 557                         if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
 558                                 ERR("socket poll error");
 559                                 goto error;
 560                         } else if (revents & LPOLLIN) {
 561                                 /*
 562                                  * A new connection is requested, therefore a
 563                                  * viewer connection is allocated in this
 564                                  * thread, enqueued to a global queue and
 565                                  * dequeued (and freed) in the worker thread.
 566                                  */
 567                                 int val = 1;
 568                                 struct relay_connection *new_conn;
 569                                 struct lttcomm_sock *newsock;
 570
 571                                 newsock = live_control_sock->ops->accept(live_control_sock);
 572                                 if (!newsock) {
 573                                         PERROR("accepting control sock");
 574                                         goto error;
 575                                 }
 576                                 DBG("Relay viewer connection accepted socket %d", newsock->fd);
 577
 578                                 ret = setsockopt(newsock->fd, SOL_SOCKET, SO_REUSEADDR, &val,
 579                                                 sizeof(val));
 580                                 if (ret < 0) {
 581                                         PERROR("setsockopt inet");
 582                                         lttcomm_destroy_sock(newsock);
 583                                         goto error;
 584                                 }
 585                                 new_conn = connection_create(newsock, RELAY_CONNECTION_UNKNOWN);
 586                                 if (!new_conn) {
 587                                         lttcomm_destroy_sock(newsock);
 588                                         goto error;
 589                                 }
 590                                 /* Ownership assumed by the connection. */
 591                                 newsock = NULL;
 592
 593                                 /* Enqueue request for the dispatcher thread. */
 594                                 cds_wfcq_enqueue(&viewer_conn_queue.head, &viewer_conn_queue.tail,
 595                                                  &new_conn->qnode);
 596
 597                                 /*
 598                                  * Wake the dispatch queue futex.
 599                                  * Implicit memory barrier with the
 600                                  * exchange in cds_wfcq_enqueue.
 601                                  */
 602                                 futex_nto1_wake(&viewer_conn_queue.futex);
 603                         }
 604                 }
 605         }
 606
 607 exit:
 608 error:
 609 error_poll_add:
 610 error_testpoint:
 611         lttng_poll_clean(&events);
 612 error_create_poll:
 613         if (live_control_sock->fd >= 0) {
 614                 ret = live_control_sock->ops->close(live_control_sock);
 615                 if (ret) {
 616                         PERROR("close");
 617                 }
 618         }
 619         lttcomm_destroy_sock(live_control_sock);
 620 error_sock_control:
 621         if (err) {
 622                 health_error();
 623                 DBG("Live viewer listener thread exited with error");
 624         }
 625         health_unregister(health_relayd);
 626         DBG("Live viewer listener thread cleanup complete");
 627         if (lttng_relay_stop_threads()) {
 628                 ERR("Error stopping threads");
 629         }
 630         return NULL;
 631 }
 632
 633 /*
 634  * This thread manages the dispatching of the requests to worker threads
 635  */
 636 static
 637 void *thread_dispatcher(void *data)
 638 {
 639         int err = -1;
 640         ssize_t ret;
 641         struct cds_wfcq_node *node;
 642         struct relay_connection *conn = NULL;
 643
 644         DBG("[thread] Live viewer relay dispatcher started");
 645
 646         health_register(health_relayd, HEALTH_RELAYD_TYPE_LIVE_DISPATCHER);
 647
 648         if (testpoint(relayd_thread_live_dispatcher)) {
 649                 goto error_testpoint;
 650         }
 651
 652         health_code_update();
 653
 654         while (!CMM_LOAD_SHARED(live_dispatch_thread_exit)) {
 655                 health_code_update();
 656
 657                 /* Atomically prepare the queue futex */
 658                 futex_nto1_prepare(&viewer_conn_queue.futex);
 659
 660                 do {
 661                         health_code_update();
 662
 663                         /* Dequeue commands */
 664                         node = cds_wfcq_dequeue_blocking(&viewer_conn_queue.head,
 665                                                          &viewer_conn_queue.tail);
 666                         if (node == NULL) {
 667                                 DBG("Woken up but nothing in the live-viewer "
 668                                                 "relay command queue");
 669                                 /* Continue thread execution */
 670                                 break;
 671                         }
 672                         conn = caa_container_of(node, struct relay_connection, qnode);
 673                         DBG("Dispatching viewer request waiting on sock %d",
 674                                         conn->sock->fd);
 675
 676                         /*
 677                          * Inform worker thread of the new request. This
 678                          * call is blocking so we can be assured that
 679                          * the data will be read at some point in time
 680                          * or wait to the end of the world :)
 681                          */
 682                         ret = lttng_write(live_conn_pipe[1], &conn, sizeof(conn));
 683                         if (ret < 0) {
 684                                 PERROR("write conn pipe");
 685                                 connection_put(conn);
 686                                 goto error;
 687                         }
 688                 } while (node != NULL);
 689
 690                 /* Futex wait on queue. Blocking call on futex() */
 691                 health_poll_entry();
 692                 futex_nto1_wait(&viewer_conn_queue.futex);
 693                 health_poll_exit();
 694         }
 695
 696         /* Normal exit, no error */
 697         err = 0;
 698
 699 error:
 700 error_testpoint:
 701         if (err) {
 702                 health_error();
 703                 ERR("Health error occurred in %s", __func__);
 704         }
 705         health_unregister(health_relayd);
 706         DBG("Live viewer dispatch thread dying");
 707         if (lttng_relay_stop_threads()) {
 708                 ERR("Error stopping threads");
 709         }
 710         return NULL;
 711 }
 712
 713 /*
 714  * Establish connection with the viewer and check the versions.
 715  *
 716  * Return 0 on success or else negative value.
 717  */
 718 static
 719 int viewer_connect(struct relay_connection *conn)
 720 {
 721         int ret;
 722         struct lttng_viewer_connect reply, msg;
 723
 724         conn->version_check_done = 1;
 725
 726         health_code_update();
 727
 728         DBG("Viewer is establishing a connection to the relayd.");
 729
 730         ret = recv_request(conn->sock, &msg, sizeof(msg));
 731         if (ret < 0) {
 732                 goto end;
 733         }
 734
 735         health_code_update();
 736
 737         memset(&reply, 0, sizeof(reply));
 738         reply.major = RELAYD_VERSION_COMM_MAJOR;
 739         reply.minor = RELAYD_VERSION_COMM_MINOR;
 740
 741         /* Major versions must be the same */
 742         if (reply.major != be32toh(msg.major)) {
 743                 DBG("Incompatible major versions ([relayd] %u vs [client] %u)",
 744                                 reply.major, be32toh(msg.major));
 745                 ret = -1;
 746                 goto end;
 747         }
 748
 749         conn->major = reply.major;
 750         /* We adapt to the lowest compatible version */
 751         if (reply.minor <= be32toh(msg.minor)) {
 752                 conn->minor = reply.minor;
 753         } else {
 754                 conn->minor = be32toh(msg.minor);
 755         }
 756
 757         if (be32toh(msg.type) == LTTNG_VIEWER_CLIENT_COMMAND) {
 758                 conn->type = RELAY_VIEWER_COMMAND;
 759         } else if (be32toh(msg.type) == LTTNG_VIEWER_CLIENT_NOTIFICATION) {
 760                 conn->type = RELAY_VIEWER_NOTIFICATION;
 761         } else {
 762                 ERR("Unknown connection type : %u", be32toh(msg.type));
 763                 ret = -1;
 764                 goto end;
 765         }
 766
 767         reply.major = htobe32(reply.major);
 768         reply.minor = htobe32(reply.minor);
 769         if (conn->type == RELAY_VIEWER_COMMAND) {
 770                 /*
 771                  * Increment outside of htobe64 macro, because the argument can
 772                  * be used more than once within the macro, and thus the
 773                  * operation may be undefined.
 774                  */
 775                 pthread_mutex_lock(&last_relay_viewer_session_id_lock);
 776                 last_relay_viewer_session_id++;
 777                 pthread_mutex_unlock(&last_relay_viewer_session_id_lock);
 778                 reply.viewer_session_id = htobe64(last_relay_viewer_session_id);
 779         }
 780
 781         health_code_update();
 782
 783         ret = send_response(conn->sock, &reply, sizeof(reply));
 784         if (ret < 0) {
 785                 goto end;
 786         }
 787
 788         health_code_update();
 789
 790         DBG("Version check done using protocol %u.%u", conn->major, conn->minor);
 791         ret = 0;
 792
 793 end:
 794         return ret;
 795 }
 796
 797 /*
 798  * Send the viewer the list of current sessions.
 799  * We need to create a copy of the hash table content because otherwise
 800  * we cannot assume the number of entries stays the same between getting
 801  * the number of HT elements and iteration over the HT.
 802  *
 803  * Return 0 on success or else a negative value.
 804  */
 805 static
 806 int viewer_list_sessions(struct relay_connection *conn)
 807 {
 808         int ret;
 809         struct lttng_viewer_list_sessions session_list;
 810         struct lttng_ht_iter iter;
 811         struct relay_session *session;
 812         struct lttng_viewer_session *send_session_buf = NULL;
 813         uint32_t buf_count = SESSION_BUF_DEFAULT_COUNT;
 814         uint32_t count = 0;
 815
 816         DBG("List sessions received");
 817
 818         send_session_buf = zmalloc(SESSION_BUF_DEFAULT_COUNT * sizeof(*send_session_buf));
 819         if (!send_session_buf) {
 820                 return -1;
 821         }
 822
 823         rcu_read_lock();
 824         cds_lfht_for_each_entry(sessions_ht->ht, &iter.iter, session,
 825                         session_n.node) {
 826                 struct lttng_viewer_session *send_session;
 827
 828                 health_code_update();
 829
 830                 if (count >= buf_count) {
 831                         struct lttng_viewer_session *newbuf;
 832                         uint32_t new_buf_count = buf_count << 1;
 833
 834                         newbuf = realloc(send_session_buf,
 835                                 new_buf_count * sizeof(*send_session_buf));
 836                         if (!newbuf) {
 837                                 ret = -1;
 838                                 rcu_read_unlock();
 839                                 goto end_free;
 840                         }
 841                         send_session_buf = newbuf;
 842                         buf_count = new_buf_count;
 843                 }
 844                 send_session = &send_session_buf[count];
 845                 strncpy(send_session->session_name, session->session_name,
 846                                 sizeof(send_session->session_name));
 847                 strncpy(send_session->hostname, session->hostname,
 848                                 sizeof(send_session->hostname));
 849                 send_session->id = htobe64(session->id);
 850                 send_session->live_timer = htobe32(session->live_timer);
 851                 if (session->viewer_attached) {
 852                         send_session->clients = htobe32(1);
 853                 } else {
 854                         send_session->clients = htobe32(0);
 855                 }
 856                 send_session->streams = htobe32(session->stream_count);
 857                 count++;
 858         }
 859         rcu_read_unlock();
 860
 861         session_list.sessions_count = htobe32(count);
 862
 863         health_code_update();
 864
 865         ret = send_response(conn->sock, &session_list, sizeof(session_list));
 866         if (ret < 0) {
 867                 goto end_free;
 868         }
 869
 870         health_code_update();
 871
 872         ret = send_response(conn->sock, send_session_buf,
 873                         count * sizeof(*send_session_buf));
 874         if (ret < 0) {
 875                 goto end_free;
 876         }
 877         health_code_update();
 878
 879         ret = 0;
 880 end_free:
 881         free(send_session_buf);
 882         return ret;
 883 }
 884
 885 /*
 886  * Send the viewer the list of current streams.
 887  */
 888 static
 889 int viewer_get_new_streams(struct relay_connection *conn)
 890 {
 891         int ret, send_streams = 0;
 892         uint32_t nb_created = 0, nb_unsent = 0, nb_streams = 0, nb_total = 0;
 893         struct lttng_viewer_new_streams_request request;
 894         struct lttng_viewer_new_streams_response response;
 895         struct relay_session *session;
 896         uint64_t session_id;
 897         bool closed = false;
 898
 899         assert(conn);
 900
 901         DBG("Get new streams received");
 902
 903         health_code_update();
 904
 905         /* Receive the request from the connected client. */
 906         ret = recv_request(conn->sock, &request, sizeof(request));
 907         if (ret < 0) {
 908                 goto error;
 909         }
 910         session_id = be64toh(request.session_id);
 911
 912         health_code_update();
 913
 914         memset(&response, 0, sizeof(response));
 915
 916         session = session_get_by_id(session_id);
 917         if (!session) {
 918                 DBG("Relay session %" PRIu64 " not found", session_id);
 919                 response.status = htobe32(LTTNG_VIEWER_NEW_STREAMS_ERR);
 920                 goto send_reply;
 921         }
 922
 923         if (!viewer_session_is_attached(conn->viewer_session, session)) {
 924                 send_streams = 0;
 925                 response.status = htobe32(LTTNG_VIEWER_NEW_STREAMS_ERR);
 926                 goto send_reply;
 927         }
 928
 929         send_streams = 1;
 930         response.status = htobe32(LTTNG_VIEWER_NEW_STREAMS_OK);
 931
 932         ret = make_viewer_streams(session, LTTNG_VIEWER_SEEK_LAST, &nb_total, &nb_unsent,
 933                         &nb_created, &closed);
 934         if (ret < 0) {
 935                 goto end_put_session;
 936         }
 937         /* Only send back the newly created streams with the unsent ones. */
 938         nb_streams = nb_created + nb_unsent;
 939         response.streams_count = htobe32(nb_streams);
 940
 941         /*
 942          * If the session is closed, HUP when there are no more streams
 943          * with data.
 944          */
 945         if (closed && nb_total == 0) {
 946                 send_streams = 0;
 947                 response.streams_count = 0;
 948                 response.status = htobe32(LTTNG_VIEWER_NEW_STREAMS_HUP);
 949                 goto send_reply;
 950         }
 951
 952 send_reply:
 953         health_code_update();
 954         ret = send_response(conn->sock, &response, sizeof(response));
 955         if (ret < 0) {
 956                 goto end_put_session;
 957         }
 958         health_code_update();
 959
 960         /*
 961          * Unknown or empty session, just return gracefully, the viewer
 962          * knows what is happening.
 963          */
 964         if (!send_streams || !nb_streams) {
 965                 ret = 0;
 966                 goto end_put_session;
 967         }
 968
 969         /*
 970          * Send stream and *DON'T* ignore the sent flag so every viewer
 971          * streams that were not sent from that point will be sent to
 972          * the viewer.
 973          */
 974         ret = send_viewer_streams(conn->sock, session, 0);
 975         if (ret < 0) {
 976                 goto end_put_session;
 977         }
 978
 979 end_put_session:
 980         if (session) {
 981                 session_put(session);
 982         }
 983 error:
 984         return ret;
 985 }
 986
 987 /*
 988  * Send the viewer the list of current sessions.
 989  */
 990 static
 991 int viewer_attach_session(struct relay_connection *conn)
 992 {
 993         int send_streams = 0;
 994         ssize_t ret;
 995         uint32_t nb_streams = 0;
 996         enum lttng_viewer_seek seek_type;
 997         struct lttng_viewer_attach_session_request request;
 998         struct lttng_viewer_attach_session_response response;
 999         struct relay_session *session = NULL;
1000         bool closed = false;
1001
1002         assert(conn);
1003
1004         health_code_update();
1005
1006         /* Receive the request from the connected client. */
1007         ret = recv_request(conn->sock, &request, sizeof(request));
1008         if (ret < 0) {
1009                 goto error;
1010         }
1011
1012         health_code_update();
1013
1014         memset(&response, 0, sizeof(response));
1015
1016         if (!conn->viewer_session) {
1017                 DBG("Client trying to attach before creating a live viewer session");
1018                 response.status = htobe32(LTTNG_VIEWER_ATTACH_NO_SESSION);
1019                 goto send_reply;
1020         }
1021
1022         session = session_get_by_id(be64toh(request.session_id));
1023         if (!session) {
1024                 DBG("Relay session %" PRIu64 " not found",
1025                                 be64toh(request.session_id));
1026                 response.status = htobe32(LTTNG_VIEWER_ATTACH_UNK);
1027                 goto send_reply;
1028         }
1029         DBG("Attach session ID %" PRIu64 " received",
1030                 be64toh(request.session_id));
1031
1032         if (session->live_timer == 0) {
1033                 DBG("Not live session");
1034                 response.status = htobe32(LTTNG_VIEWER_ATTACH_NOT_LIVE);
1035                 goto send_reply;
1036         }
1037
1038         send_streams = 1;
1039         ret = viewer_session_attach(conn->viewer_session, session);
1040         if (ret) {
1041                 DBG("Already a viewer attached");
1042                 response.status = htobe32(LTTNG_VIEWER_ATTACH_ALREADY);
1043                 goto send_reply;
1044         }
1045
1046         switch (be32toh(request.seek)) {
1047         case LTTNG_VIEWER_SEEK_BEGINNING:
1048         case LTTNG_VIEWER_SEEK_LAST:
1049                 response.status = htobe32(LTTNG_VIEWER_ATTACH_OK);
1050                 seek_type = be32toh(request.seek);
1051                 break;
1052         default:
1053                 ERR("Wrong seek parameter");
1054                 response.status = htobe32(LTTNG_VIEWER_ATTACH_SEEK_ERR);
1055                 send_streams = 0;
1056                 goto send_reply;
1057         }
1058
1059         ret = make_viewer_streams(session, seek_type, &nb_streams, NULL,
1060                         NULL, &closed);
1061         if (ret < 0) {
1062                 goto end_put_session;
1063         }
1064         response.streams_count = htobe32(nb_streams);
1065
1066         /*
1067          * If the session is closed when the viewer is attaching, it
1068          * means some of the streams may have been concurrently removed,
1069          * so we don't allow the viewer to attach, even if there are
1070          * streams available.
1071          */
1072         if (closed) {
1073                 send_streams = 0;
1074                 response.streams_count = 0;
1075                 response.status = htobe32(LTTNG_VIEWER_NEW_STREAMS_HUP);
1076                 goto send_reply;
1077         }
1078
1079 send_reply:
1080         health_code_update();
1081         ret = send_response(conn->sock, &response, sizeof(response));
1082         if (ret < 0) {
1083                 goto end_put_session;
1084         }
1085         health_code_update();
1086
1087         /*
1088          * Unknown or empty session, just return gracefully, the viewer
1089          * knows what is happening.
1090          */
1091         if (!send_streams || !nb_streams) {
1092                 ret = 0;
1093                 goto end_put_session;
1094         }
1095
1096         /* Send stream and ignore the sent flag. */
1097         ret = send_viewer_streams(conn->sock, session, 1);
1098         if (ret < 0) {
1099                 goto end_put_session;
1100         }
1101
1102 end_put_session:
1103         if (session) {
1104                 session_put(session);
1105         }
1106 error:
1107         return ret;
1108 }
1109
1110 /*
1111  * Open the index file if needed for the given vstream.
1112  *
1113  * If an index file is successfully opened, the vstream index_fd set with
1114  * it.
1115  *
1116  * Return 0 on success, a negative value on error (-ENOENT if not ready yet).
1117  *
1118  * Called with rstream lock held.
1119  */
1120 static int try_open_index(struct relay_viewer_stream *vstream,
1121                 struct relay_stream *rstream)
1122 {
1123         int ret = 0;
1124
1125         if (vstream->index_fd) {
1126                 goto end;
1127         }
1128
1129         /*
1130          * First time, we open the index file and at least one index is ready.
1131          */
1132         if (rstream->index_received_seqcount == 0) {
1133                 ret = -ENOENT;
1134                 goto end;
1135         }
1136         ret = index_open(vstream->path_name, vstream->channel_name,
1137                         vstream->stream->tracefile_count,
1138                         vstream->current_tracefile_id);
1139         if (ret >= 0) {
1140                 vstream->index_fd = stream_fd_create(ret);
1141                 if (!vstream->index_fd) {
1142                         if (close(ret)) {
1143                                 PERROR("close");
1144                         }
1145                         ret = -1;
1146                 } else {
1147                         ret = 0;
1148                 }
1149                 goto end;
1150         }
1151
1152 end:
1153         return ret;
1154 }
1155
1156 /*
1157  * Check the status of the index for the given stream. This function
1158  * updates the index structure if needed and can put (close) the vstream
1159  * in the HUP situation.
1160  *
1161  * Return 0 means that we can proceed with the index. A value of 1 means
1162  * that the index has been updated and is ready to be sent to the
1163  * client. A negative value indicates an error that can't be handled.
1164  *
1165  * Called with rstream lock held.
1166  */
1167 static int check_index_status(struct relay_viewer_stream *vstream,
1168                 struct relay_stream *rstream, struct ctf_trace *trace,
1169                 struct lttng_viewer_index *index)
1170 {
1171         int ret;
1172
1173         if (trace->session->connection_closed
1174                         && rstream->index_received_seqcount
1175                                 == vstream->index_sent_seqcount) {
1176                 /* Last index sent and session connection is closed. */
1177                 index->status = htobe32(LTTNG_VIEWER_INDEX_HUP);
1178                 goto hup;
1179         } else if (rstream->beacon_ts_end != -1ULL &&
1180                         rstream->index_received_seqcount
1181                                 == vstream->index_sent_seqcount) {
1182                 /*
1183                  * We've received a synchronization beacon and the last index
1184                  * available has been sent, the index for now is inactive.
1185                  *
1186                  * In this case, we have received a beacon which allows us to
1187                  * inform the client of a time interval during which we can
1188                  * guarantee that there are no events to read (and never will
1189                  * be).
1190                  */
1191                 index->status = htobe32(LTTNG_VIEWER_INDEX_INACTIVE);
1192                 index->timestamp_end = htobe64(rstream->beacon_ts_end);
1193                 index->stream_id = htobe64(rstream->ctf_stream_id);
1194                 goto index_ready;
1195         } else if (rstream->index_received_seqcount
1196                         == vstream->index_sent_seqcount) {
1197                 /*
1198                  * This checks whether received == sent seqcount. In
1199                  * this case, we have not received a beacon. Therefore,
1200                  * we can only ask the client to retry later.
1201                  */
1202                 index->status = htobe32(LTTNG_VIEWER_INDEX_RETRY);
1203                 goto index_ready;
1204         } else if (!tracefile_array_seq_in_file(rstream->tfa,
1205                         vstream->current_tracefile_id,
1206                         vstream->index_sent_seqcount)) {
1207                 /*
1208                  * The next index we want to send cannot be read either
1209                  * because we need to perform a rotation, or due to
1210                  * the producer having overwritten its trace file.
1211                  */
1212                 DBG("Viewer stream %" PRIu64 " rotation",
1213                                 vstream->stream->stream_handle);
1214                 ret = viewer_stream_rotate(vstream);
1215                 if (ret < 0) {
1216                         goto end;
1217                 } else if (ret == 1) {
1218                         /* EOF across entire stream. */
1219                         index->status = htobe32(LTTNG_VIEWER_INDEX_HUP);
1220                         goto hup;
1221                 }
1222                 /*
1223                  * If we have been pushed due to overwrite, it
1224                  * necessarily means there is data that can be read in
1225                  * the stream. If we rotated because we reached the end
1226                  * of a tracefile, it means the following tracefile
1227                  * needs to contain at least one index, else we would
1228                  * have already returned LTTNG_VIEWER_INDEX_RETRY to the
1229                  * viewer. The updated index_sent_seqcount needs to
1230                  * point to a readable index entry now.
1231                  *
1232                  * In the case where we "rotate" on a single file, we
1233                  * can end up in a case where the requested index is
1234                  * still unavailable.
1235                  */
1236                 if (rstream->tracefile_count == 1 &&
1237                                 !tracefile_array_seq_in_file(
1238                                         rstream->tfa,
1239                                         vstream->current_tracefile_id,
1240                                         vstream->index_sent_seqcount)) {
1241                         index->status = htobe32(LTTNG_VIEWER_INDEX_RETRY);
1242                         goto index_ready;
1243                 }
1244                 assert(tracefile_array_seq_in_file(rstream->tfa,
1245                                 vstream->current_tracefile_id,
1246                                 vstream->index_sent_seqcount));
1247         }
1248         /* ret == 0 means successful so we continue. */
1249         ret = 0;
1250 end:
1251         return ret;
1252
1253 hup:
1254         viewer_stream_put(vstream);
1255 index_ready:
1256         return 1;
1257 }
1258
1259 /*
1260  * Send the next index for a stream.
1261  *
1262  * Return 0 on success or else a negative value.
1263  */
1264 static
1265 int viewer_get_next_index(struct relay_connection *conn)
1266 {
1267         int ret;
1268         ssize_t read_ret;
1269         struct lttng_viewer_get_next_index request_index;
1270         struct lttng_viewer_index viewer_index;
1271         struct ctf_packet_index packet_index;
1272         struct relay_viewer_stream *vstream = NULL;
1273         struct relay_stream *rstream = NULL;
1274         struct ctf_trace *ctf_trace = NULL;
1275         struct relay_viewer_stream *metadata_viewer_stream = NULL;
1276
1277         assert(conn);
1278
1279         DBG("Viewer get next index");
1280
1281         memset(&viewer_index, 0, sizeof(viewer_index));
1282         health_code_update();
1283
1284         ret = recv_request(conn->sock, &request_index, sizeof(request_index));
1285         if (ret < 0) {
1286                 goto end;
1287         }
1288         health_code_update();
1289
1290         vstream = viewer_stream_get_by_id(be64toh(request_index.stream_id));
1291         if (!vstream) {
1292                 DBG("Client requested index of unknown stream id %" PRIu64,
1293                                 be64toh(request_index.stream_id));
1294                 viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_ERR);
1295                 goto send_reply;
1296         }
1297
1298         /* Use back. ref. Protected by refcounts. */
1299         rstream = vstream->stream;
1300         ctf_trace = rstream->trace;
1301
1302         /* metadata_viewer_stream may be NULL. */
1303         metadata_viewer_stream =
1304                         ctf_trace_get_viewer_metadata_stream(ctf_trace);
1305
1306         pthread_mutex_lock(&rstream->lock);
1307
1308         /*
1309          * The viewer should not ask for index on metadata stream.
1310          */
1311         if (rstream->is_metadata) {
1312                 viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_HUP);
1313                 goto send_reply;
1314         }
1315
1316         /* Try to open an index if one is needed for that stream. */
1317         ret = try_open_index(vstream, rstream);
1318         if (ret < 0) {
1319                 if (ret == -ENOENT) {
1320                         /*
1321                          * The index is created only when the first data
1322                          * packet arrives, it might not be ready at the
1323                          * beginning of the session
1324                          */
1325                         viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_RETRY);
1326                 } else {
1327                         /* Unhandled error. */
1328                         viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_ERR);
1329                 }
1330                 goto send_reply;
1331         }
1332
1333         ret = check_index_status(vstream, rstream, ctf_trace, &viewer_index);
1334         if (ret < 0) {
1335                 goto error_put;
1336         } else if (ret == 1) {
1337                 /*
1338                  * We have no index to send and check_index_status has populated
1339                  * viewer_index's status.
1340                  */
1341                 goto send_reply;
1342         }
1343         /* At this point, ret is 0 thus we will be able to read the index. */
1344         assert(!ret);
1345
1346         /*
1347          * vstream->stream_fd may be NULL if it has been closed by
1348          * tracefile rotation, or if we are at the beginning of the
1349          * stream. We open the data stream file here to protect against
1350          * overwrite caused by tracefile rotation (in association with
1351          * unlink performed before overwrite).
1352          */
1353         if (!vstream->stream_fd) {
1354                 char fullpath[PATH_MAX];
1355
1356                 if (vstream->stream->tracefile_count > 0) {
1357                         ret = snprintf(fullpath, PATH_MAX, "%s/%s_%" PRIu64,
1358                                         vstream->path_name,
1359                                         vstream->channel_name,
1360                                         vstream->current_tracefile_id);
1361                 } else {
1362                         ret = snprintf(fullpath, PATH_MAX, "%s/%s",
1363                                         vstream->path_name,
1364                                         vstream->channel_name);
1365                 }
1366                 if (ret < 0) {
1367                         goto error_put;
1368                 }
1369                 ret = open(fullpath, O_RDONLY);
1370                 if (ret < 0) {
1371                         PERROR("Relay opening trace file");
1372                         goto error_put;
1373                 }
1374                 vstream->stream_fd = stream_fd_create(ret);
1375                 if (!vstream->stream_fd) {
1376                         if (close(ret)) {
1377                                 PERROR("close");
1378                         }
1379                         goto error_put;
1380                 }
1381         }
1382
1383         ret = check_new_streams(conn);
1384         if (ret < 0) {
1385                 viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_ERR);
1386                 goto send_reply;
1387         } else if (ret == 1) {
1388                 viewer_index.flags |= LTTNG_VIEWER_FLAG_NEW_STREAM;
1389         }
1390
1391         read_ret = lttng_read(vstream->index_fd->fd, &packet_index,
1392                         sizeof(packet_index));
1393         if (read_ret < sizeof(packet_index)) {
1394                 ERR("Relay reading index file %d returned %zd",
1395                         vstream->index_fd->fd, read_ret);
1396                 viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_ERR);
1397                 goto send_reply;
1398         } else {
1399                 viewer_index.status = htobe32(LTTNG_VIEWER_INDEX_OK);
1400                 vstream->index_sent_seqcount++;
1401         }
1402
1403         /*
1404          * Indexes are stored in big endian, no need to switch before sending.
1405          */
1406         DBG("Sending viewer index for stream %" PRIu64 " offset %" PRIu64,
1407                 rstream->stream_handle,
1408                 be64toh(packet_index.offset));
1409         viewer_index.offset = packet_index.offset;
1410         viewer_index.packet_size = packet_index.packet_size;
1411         viewer_index.content_size = packet_index.content_size;
1412         viewer_index.timestamp_begin = packet_index.timestamp_begin;
1413         viewer_index.timestamp_end = packet_index.timestamp_end;
1414         viewer_index.events_discarded = packet_index.events_discarded;
1415         viewer_index.stream_id = packet_index.stream_id;
1416
1417 send_reply:
1418         if (rstream) {
1419                 pthread_mutex_unlock(&rstream->lock);
1420         }
1421
1422         if (metadata_viewer_stream) {
1423                 pthread_mutex_lock(&metadata_viewer_stream->stream->lock);
1424                 DBG("get next index metadata check: recv %" PRIu64
1425                                 " sent %" PRIu64,
1426                         metadata_viewer_stream->stream->metadata_received,
1427                         metadata_viewer_stream->metadata_sent);
1428                 if (!metadata_viewer_stream->stream->metadata_received ||
1429                                 metadata_viewer_stream->stream->metadata_received >
1430                                         metadata_viewer_stream->metadata_sent) {
1431                         viewer_index.flags |= LTTNG_VIEWER_FLAG_NEW_METADATA;
1432                 }
1433                 pthread_mutex_unlock(&metadata_viewer_stream->stream->lock);
1434         }
1435
1436         viewer_index.flags = htobe32(viewer_index.flags);
1437         health_code_update();
1438
1439         ret = send_response(conn->sock, &viewer_index, sizeof(viewer_index));
1440         if (ret < 0) {
1441                 goto end;
1442         }
1443         health_code_update();
1444
1445         if (vstream) {
1446                 DBG("Index %" PRIu64 " for stream %" PRIu64 " sent",
1447                                 vstream->index_sent_seqcount,
1448                                 vstream->stream->stream_handle);
1449         }
1450 end:
1451         if (metadata_viewer_stream) {
1452                 viewer_stream_put(metadata_viewer_stream);
1453         }
1454         if (vstream) {
1455                 viewer_stream_put(vstream);
1456         }
1457         return ret;
1458
1459 error_put:
1460         pthread_mutex_unlock(&rstream->lock);
1461         if (metadata_viewer_stream) {
1462                 viewer_stream_put(metadata_viewer_stream);
1463         }
1464         viewer_stream_put(vstream);
1465         return ret;
1466 }
1467
1468 /*
1469  * Send the next index for a stream
1470  *
1471  * Return 0 on success or else a negative value.
1472  */
1473 static
1474 int viewer_get_packet(struct relay_connection *conn)
1475 {
1476         int ret, send_data = 0;
1477         char *data = NULL;
1478         uint32_t len = 0;
1479         ssize_t read_len;
1480         struct lttng_viewer_get_packet get_packet_info;
1481         struct lttng_viewer_trace_packet reply;
1482         struct relay_viewer_stream *vstream = NULL;
1483
1484         DBG2("Relay get data packet");
1485
1486         health_code_update();
1487
1488         ret = recv_request(conn->sock, &get_packet_info,
1489                         sizeof(get_packet_info));
1490         if (ret < 0) {
1491                 goto end;
1492         }
1493         health_code_update();
1494
1495         /* From this point on, the error label can be reached. */
1496         memset(&reply, 0, sizeof(reply));
1497
1498         vstream = viewer_stream_get_by_id(be64toh(get_packet_info.stream_id));
1499         if (!vstream) {
1500                 DBG("Client requested packet of unknown stream id %" PRIu64,
1501                                 be64toh(get_packet_info.stream_id));
1502                 reply.status = htobe32(LTTNG_VIEWER_GET_PACKET_ERR);
1503                 goto send_reply_nolock;
1504         }
1505
1506         pthread_mutex_lock(&vstream->stream->lock);
1507
1508         len = be32toh(get_packet_info.len);
1509         data = zmalloc(len);
1510         if (!data) {
1511                 PERROR("relay data zmalloc");
1512                 goto error;
1513         }
1514
1515         ret = lseek(vstream->stream_fd->fd, be64toh(get_packet_info.offset),
1516                         SEEK_SET);
1517         if (ret < 0) {
1518                 PERROR("lseek fd %d to offset %" PRIu64, vstream->stream_fd->fd,
1519                         be64toh(get_packet_info.offset));
1520                 goto error;
1521         }
1522         read_len = lttng_read(vstream->stream_fd->fd, data, len);
1523         if (read_len < len) {
1524                 PERROR("Relay reading trace file, fd: %d, offset: %" PRIu64,
1525                                 vstream->stream_fd->fd,
1526                                 be64toh(get_packet_info.offset));
1527                 goto error;
1528         }
1529         reply.status = htobe32(LTTNG_VIEWER_GET_PACKET_OK);
1530         reply.len = htobe32(len);
1531         send_data = 1;
1532         goto send_reply;
1533
1534 error:
1535         reply.status = htobe32(LTTNG_VIEWER_GET_PACKET_ERR);
1536
1537 send_reply:
1538         if (vstream) {
1539                 pthread_mutex_unlock(&vstream->stream->lock);
1540         }
1541 send_reply_nolock:
1542         reply.flags = htobe32(reply.flags);
1543
1544         health_code_update();
1545
1546         ret = send_response(conn->sock, &reply, sizeof(reply));
1547         if (ret < 0) {
1548                 goto end_free;
1549         }
1550         health_code_update();
1551
1552         if (send_data) {
1553                 health_code_update();
1554                 ret = send_response(conn->sock, data, len);
1555                 if (ret < 0) {
1556                         goto end_free;
1557                 }
1558                 health_code_update();
1559         }
1560
1561         DBG("Sent %u bytes for stream %" PRIu64, len,
1562                         be64toh(get_packet_info.stream_id));
1563
1564 end_free:
1565         free(data);
1566 end:
1567         if (vstream) {
1568                 viewer_stream_put(vstream);
1569         }
1570         return ret;
1571 }
1572
1573 /*
1574  * Send the session's metadata
1575  *
1576  * Return 0 on success else a negative value.
1577  */
1578 static
1579 int viewer_get_metadata(struct relay_connection *conn)
1580 {
1581         int ret = 0;
1582         ssize_t read_len;
1583         uint64_t len = 0;
1584         char *data = NULL;
1585         struct lttng_viewer_get_metadata request;
1586         struct lttng_viewer_metadata_packet reply;
1587         struct relay_viewer_stream *vstream = NULL;
1588
1589         assert(conn);
1590
1591         DBG("Relay get metadata");
1592
1593         health_code_update();
1594
1595         ret = recv_request(conn->sock, &request, sizeof(request));
1596         if (ret < 0) {
1597                 goto end;
1598         }
1599         health_code_update();
1600
1601         memset(&reply, 0, sizeof(reply));
1602
1603         vstream = viewer_stream_get_by_id(be64toh(request.stream_id));
1604         if (!vstream) {
1605                 /*
1606                  * The metadata stream can be closed by a CLOSE command
1607                  * just before we attach. It can also be closed by
1608                  * per-pid tracing during tracing. Therefore, it is
1609                  * possible that we cannot find this viewer stream.
1610                  * Reply back to the client with an error if we cannot
1611                  * find it.
1612                  */
1613                 DBG("Client requested metadata of unknown stream id %" PRIu64,
1614                                 be64toh(request.stream_id));
1615                 reply.status = htobe32(LTTNG_VIEWER_METADATA_ERR);
1616                 goto send_reply;
1617         }
1618         pthread_mutex_lock(&vstream->stream->lock);
1619         if (!vstream->stream->is_metadata) {
1620                 ERR("Invalid metadata stream");
1621                 goto error;
1622         }
1623
1624         assert(vstream->metadata_sent <= vstream->stream->metadata_received);
1625
1626         len = vstream->stream->metadata_received - vstream->metadata_sent;
1627         if (len == 0) {
1628                 reply.status = htobe32(LTTNG_VIEWER_NO_NEW_METADATA);
1629                 goto send_reply;
1630         }
1631
1632         /* first time, we open the metadata file */
1633         if (!vstream->stream_fd) {
1634                 char fullpath[PATH_MAX];
1635
1636                 ret = snprintf(fullpath, PATH_MAX, "%s/%s", vstream->path_name,
1637                                 vstream->channel_name);
1638                 if (ret < 0) {
1639                         goto error;
1640                 }
1641                 ret = open(fullpath, O_RDONLY);
1642                 if (ret < 0) {
1643                         PERROR("Relay opening metadata file");
1644                         goto error;
1645                 }
1646                 vstream->stream_fd = stream_fd_create(ret);
1647                 if (!vstream->stream_fd) {
1648                         if (close(ret)) {
1649                                 PERROR("close");
1650                         }
1651                         goto error;
1652                 }
1653         }
1654
1655         reply.len = htobe64(len);
1656         data = zmalloc(len);
1657         if (!data) {
1658                 PERROR("viewer metadata zmalloc");
1659                 goto error;
1660         }
1661
1662         read_len = lttng_read(vstream->stream_fd->fd, data, len);
1663         if (read_len < len) {
1664                 PERROR("Relay reading metadata file");
1665                 goto error;
1666         }
1667         vstream->metadata_sent += read_len;
1668         if (vstream->metadata_sent == vstream->stream->metadata_received
1669                         && vstream->stream->closed) {
1670                 /* Release ownership for the viewer metadata stream. */
1671                 viewer_stream_put(vstream);
1672         }
1673
1674         reply.status = htobe32(LTTNG_VIEWER_METADATA_OK);
1675
1676         goto send_reply;
1677
1678 error:
1679         reply.status = htobe32(LTTNG_VIEWER_METADATA_ERR);
1680
1681 send_reply:
1682         health_code_update();
1683         if (vstream) {
1684                 pthread_mutex_unlock(&vstream->stream->lock);
1685         }
1686         ret = send_response(conn->sock, &reply, sizeof(reply));
1687         if (ret < 0) {
1688                 goto end_free;
1689         }
1690         health_code_update();
1691
1692         if (len > 0) {
1693                 ret = send_response(conn->sock, data, len);
1694                 if (ret < 0) {
1695                         goto end_free;
1696                 }
1697         }
1698
1699         DBG("Sent %" PRIu64 " bytes of metadata for stream %" PRIu64, len,
1700                         be64toh(request.stream_id));
1701
1702         DBG("Metadata sent");
1703
1704 end_free:
1705         free(data);
1706 end:
1707         if (vstream) {
1708                 viewer_stream_put(vstream);
1709         }
1710         return ret;
1711 }
1712
1713 /*
1714  * Create a viewer session.
1715  *
1716  * Return 0 on success or else a negative value.
1717  */
1718 static
1719 int viewer_create_session(struct relay_connection *conn)
1720 {
1721         int ret;
1722         struct lttng_viewer_create_session_response resp;
1723
1724         DBG("Viewer create session received");
1725
1726         memset(&resp, 0, sizeof(resp));
1727         resp.status = htobe32(LTTNG_VIEWER_CREATE_SESSION_OK);
1728         conn->viewer_session = viewer_session_create();
1729         if (!conn->viewer_session) {
1730                 ERR("Allocation viewer session");
1731                 resp.status = htobe32(LTTNG_VIEWER_CREATE_SESSION_ERR);
1732                 goto send_reply;
1733         }
1734
1735 send_reply:
1736         health_code_update();
1737         ret = send_response(conn->sock, &resp, sizeof(resp));
1738         if (ret < 0) {
1739                 goto end;
1740         }
1741         health_code_update();
1742         ret = 0;
1743
1744 end:
1745         return ret;
1746 }
1747
1748
1749 /*
1750  * live_relay_unknown_command: send -1 if received unknown command
1751  */
1752 static
1753 void live_relay_unknown_command(struct relay_connection *conn)
1754 {
1755         struct lttcomm_relayd_generic_reply reply;
1756
1757         memset(&reply, 0, sizeof(reply));
1758         reply.ret_code = htobe32(LTTNG_ERR_UNK);
1759         (void) send_response(conn->sock, &reply, sizeof(reply));
1760 }
1761
1762 /*
1763  * Process the commands received on the control socket
1764  */
1765 static
1766 int process_control(struct lttng_viewer_cmd *recv_hdr,
1767                 struct relay_connection *conn)
1768 {
1769         int ret = 0;
1770         uint32_t msg_value;
1771
1772         msg_value = be32toh(recv_hdr->cmd);
1773
1774         /*
1775          * Make sure we've done the version check before any command other then a
1776          * new client connection.
1777          */
1778         if (msg_value != LTTNG_VIEWER_CONNECT && !conn->version_check_done) {
1779                 ERR("Viewer conn value %" PRIu32 " before version check", msg_value);
1780                 ret = -1;
1781                 goto end;
1782         }
1783
1784         switch (msg_value) {
1785         case LTTNG_VIEWER_CONNECT:
1786                 ret = viewer_connect(conn);
1787                 break;
1788         case LTTNG_VIEWER_LIST_SESSIONS:
1789                 ret = viewer_list_sessions(conn);
1790                 break;
1791         case LTTNG_VIEWER_ATTACH_SESSION:
1792                 ret = viewer_attach_session(conn);
1793                 break;
1794         case LTTNG_VIEWER_GET_NEXT_INDEX:
1795                 ret = viewer_get_next_index(conn);
1796                 break;
1797         case LTTNG_VIEWER_GET_PACKET:
1798                 ret = viewer_get_packet(conn);
1799                 break;
1800         case LTTNG_VIEWER_GET_METADATA:
1801                 ret = viewer_get_metadata(conn);
1802                 break;
1803         case LTTNG_VIEWER_GET_NEW_STREAMS:
1804                 ret = viewer_get_new_streams(conn);
1805                 break;
1806         case LTTNG_VIEWER_CREATE_SESSION:
1807                 ret = viewer_create_session(conn);
1808                 break;
1809         default:
1810                 ERR("Received unknown viewer command (%u)",
1811                                 be32toh(recv_hdr->cmd));
1812                 live_relay_unknown_command(conn);
1813                 ret = -1;
1814                 goto end;
1815         }
1816
1817 end:
1818         return ret;
1819 }
1820
1821 static
1822 void cleanup_connection_pollfd(struct lttng_poll_event *events, int pollfd)
1823 {
1824         int ret;
1825
1826         (void) lttng_poll_del(events, pollfd);
1827
1828         ret = close(pollfd);
1829         if (ret < 0) {
1830                 ERR("Closing pollfd %d", pollfd);
1831         }
1832 }
1833
1834 /*
1835  * This thread does the actual work
1836  */
1837 static
1838 void *thread_worker(void *data)
1839 {
1840         int ret, err = -1;
1841         uint32_t nb_fd;
1842         struct lttng_poll_event events;
1843         struct lttng_ht *viewer_connections_ht;
1844         struct lttng_ht_iter iter;
1845         struct lttng_viewer_cmd recv_hdr;
1846         struct relay_connection *destroy_conn;
1847
1848         DBG("[thread] Live viewer relay worker started");
1849
1850         rcu_register_thread();
1851
1852         health_register(health_relayd, HEALTH_RELAYD_TYPE_LIVE_WORKER);
1853
1854         if (testpoint(relayd_thread_live_worker)) {
1855                 goto error_testpoint;
1856         }
1857
1858         /* table of connections indexed on socket */
1859         viewer_connections_ht = lttng_ht_new(0, LTTNG_HT_TYPE_ULONG);
1860         if (!viewer_connections_ht) {
1861                 goto viewer_connections_ht_error;
1862         }
1863
1864         ret = create_thread_poll_set(&events, 2);
1865         if (ret < 0) {
1866                 goto error_poll_create;
1867         }
1868
1869         ret = lttng_poll_add(&events, live_conn_pipe[0], LPOLLIN | LPOLLRDHUP);
1870         if (ret < 0) {
1871                 goto error;
1872         }
1873
1874 restart:
1875         while (1) {
1876                 int i;
1877
1878                 health_code_update();
1879
1880                 /* Infinite blocking call, waiting for transmission */
1881                 DBG3("Relayd live viewer worker thread polling...");
1882                 health_poll_entry();
1883                 ret = lttng_poll_wait(&events, -1);
1884                 health_poll_exit();
1885                 if (ret < 0) {
1886                         /*
1887                          * Restart interrupted system call.
1888                          */
1889                         if (errno == EINTR) {
1890                                 goto restart;
1891                         }
1892                         goto error;
1893                 }
1894
1895                 nb_fd = ret;
1896
1897                 /*
1898                  * Process control. The control connection is prioritised so we don't
1899                  * starve it with high throughput tracing data on the data
1900                  * connection.
1901                  */
1902                 for (i = 0; i < nb_fd; i++) {
1903                         /* Fetch once the poll data */
1904                         uint32_t revents = LTTNG_POLL_GETEV(&events, i);
1905                         int pollfd = LTTNG_POLL_GETFD(&events, i);
1906
1907                         health_code_update();
1908
1909                         if (!revents) {
1910                                 /* No activity for this FD (poll implementation). */
1911                                 continue;
1912                         }
1913
1914                         /* Thread quit pipe has been closed. Killing thread. */
1915                         ret = check_thread_quit_pipe(pollfd, revents);
1916                         if (ret) {
1917                                 err = 0;
1918                                 goto exit;
1919                         }
1920
1921                         /* Inspect the relay conn pipe for new connection. */
1922                         if (pollfd == live_conn_pipe[0]) {
1923                                 if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
1924                                         ERR("Relay live pipe error");
1925                                         goto error;
1926                                 } else if (revents & LPOLLIN) {
1927                                         struct relay_connection *conn;
1928
1929                                         ret = lttng_read(live_conn_pipe[0],
1930                                                         &conn, sizeof(conn));
1931                                         if (ret < 0) {
1932                                                 goto error;
1933                                         }
1934                                         lttng_poll_add(&events, conn->sock->fd,
1935                                                         LPOLLIN | LPOLLRDHUP);
1936                                         connection_ht_add(viewer_connections_ht, conn);
1937                                         DBG("Connection socket %d added to poll", conn->sock->fd);
1938                                 }
1939                         } else {
1940                                 /* Connection activity. */
1941                                 struct relay_connection *conn;
1942
1943                                 conn = connection_get_by_sock(viewer_connections_ht, pollfd);
1944                                 if (!conn) {
1945                                         continue;
1946                                 }
1947
1948                                 if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
1949                                         cleanup_connection_pollfd(&events, pollfd);
1950                                         /* Put "create" ownership reference. */
1951                                         connection_put(conn);
1952                                 } else if (revents & LPOLLIN) {
1953                                         ret = conn->sock->ops->recvmsg(conn->sock, &recv_hdr,
1954                                                         sizeof(recv_hdr), 0);
1955                                         if (ret <= 0) {
1956                                                 /* Connection closed. */
1957                                                 cleanup_connection_pollfd(&events, pollfd);
1958                                                 /* Put "create" ownership reference. */
1959                                                 connection_put(conn);
1960                                                 DBG("Viewer control conn closed with %d", pollfd);
1961                                         } else {
1962                                                 ret = process_control(&recv_hdr, conn);
1963                                                 if (ret < 0) {
1964                                                         /* Clear the session on error. */
1965                                                         cleanup_connection_pollfd(&events, pollfd);
1966                                                         /* Put "create" ownership reference. */
1967                                                         connection_put(conn);
1968                                                         DBG("Viewer connection closed with %d", pollfd);
1969                                                 }
1970                                         }
1971                                 }
1972                                 /* Put local "get_by_sock" reference. */
1973                                 connection_put(conn);
1974                         }
1975                 }
1976         }
1977
1978 exit:
1979 error:
1980         lttng_poll_clean(&events);
1981
1982         /* Cleanup reamaining connection object. */
1983         rcu_read_lock();
1984         cds_lfht_for_each_entry(viewer_connections_ht->ht, &iter.iter,
1985                         destroy_conn,
1986                         sock_n.node) {
1987                 health_code_update();
1988                 connection_put(destroy_conn);
1989         }
1990         rcu_read_unlock();
1991 error_poll_create:
1992         lttng_ht_destroy(viewer_connections_ht);
1993 viewer_connections_ht_error:
1994         /* Close relay conn pipes */
1995         utils_close_pipe(live_conn_pipe);
1996         if (err) {
1997                 DBG("Viewer worker thread exited with error");
1998         }
1999         DBG("Viewer worker thread cleanup complete");
2000 error_testpoint:
2001         if (err) {
2002                 health_error();
2003                 ERR("Health error occurred in %s", __func__);
2004         }
2005         health_unregister(health_relayd);
2006         if (lttng_relay_stop_threads()) {
2007                 ERR("Error stopping threads");
2008         }
2009         rcu_unregister_thread();
2010         return NULL;
2011 }
2012
2013 /*
2014  * Create the relay command pipe to wake thread_manage_apps.
2015  * Closed in cleanup().
2016  */
2017 static int create_conn_pipe(void)
2018 {
2019         return utils_create_pipe_cloexec(live_conn_pipe);
2020 }
2021
2022 int relayd_live_join(void)
2023 {
2024         int ret, retval = 0;
2025         void *status;
2026
2027         ret = pthread_join(live_listener_thread, &status);
2028         if (ret) {
2029                 errno = ret;
2030                 PERROR("pthread_join live listener");
2031                 retval = -1;
2032         }
2033
2034         ret = pthread_join(live_worker_thread, &status);
2035         if (ret) {
2036                 errno = ret;
2037                 PERROR("pthread_join live worker");
2038                 retval = -1;
2039         }
2040
2041         ret = pthread_join(live_dispatcher_thread, &status);
2042         if (ret) {
2043                 errno = ret;
2044                 PERROR("pthread_join live dispatcher");
2045                 retval = -1;
2046         }
2047
2048         cleanup_relayd_live();
2049
2050         return retval;
2051 }
2052
2053 /*
2054  * main
2055  */
2056 int relayd_live_create(struct lttng_uri *uri)
2057 {
2058         int ret = 0, retval = 0;
2059         void *status;
2060         int is_root;
2061
2062         if (!uri) {
2063                 retval = -1;
2064                 goto exit_init_data;
2065         }
2066         live_uri = uri;
2067
2068         /* Check if daemon is UID = 0 */
2069         is_root = !getuid();
2070
2071         if (!is_root) {
2072                 if (live_uri->port < 1024) {
2073                         ERR("Need to be root to use ports < 1024");
2074                         retval = -1;
2075                         goto exit_init_data;
2076                 }
2077         }
2078
2079         /* Setup the thread apps communication pipe. */
2080         if (create_conn_pipe()) {
2081                 retval = -1;
2082                 goto exit_init_data;
2083         }
2084
2085         /* Init relay command queue. */
2086         cds_wfcq_init(&viewer_conn_queue.head, &viewer_conn_queue.tail);
2087
2088         /* Set up max poll set size */
2089         lttng_poll_set_max_size();
2090
2091         /* Setup the dispatcher thread */
2092         ret = pthread_create(&live_dispatcher_thread, NULL,
2093                         thread_dispatcher, (void *) NULL);
2094         if (ret) {
2095                 errno = ret;
2096                 PERROR("pthread_create viewer dispatcher");
2097                 retval = -1;
2098                 goto exit_dispatcher_thread;
2099         }
2100
2101         /* Setup the worker thread */
2102         ret = pthread_create(&live_worker_thread, NULL,
2103                         thread_worker, NULL);
2104         if (ret) {
2105                 errno = ret;
2106                 PERROR("pthread_create viewer worker");
2107                 retval = -1;
2108                 goto exit_worker_thread;
2109         }
2110
2111         /* Setup the listener thread */
2112         ret = pthread_create(&live_listener_thread, NULL,
2113                         thread_listener, (void *) NULL);
2114         if (ret) {
2115                 errno = ret;
2116                 PERROR("pthread_create viewer listener");
2117                 retval = -1;
2118                 goto exit_listener_thread;
2119         }
2120
2121         /*
2122          * All OK, started all threads.
2123          */
2124         return retval;
2125
2126         /*
2127          * Join on the live_listener_thread should anything be added after
2128          * the live_listener thread's creation.
2129          */
2130
2131 exit_listener_thread:
2132
2133         ret = pthread_join(live_worker_thread, &status);
2134         if (ret) {
2135                 errno = ret;
2136                 PERROR("pthread_join live worker");
2137                 retval = -1;
2138         }
2139 exit_worker_thread:
2140
2141         ret = pthread_join(live_dispatcher_thread, &status);
2142         if (ret) {
2143                 errno = ret;
2144                 PERROR("pthread_join live dispatcher");
2145                 retval = -1;
2146         }
2147 exit_dispatcher_thread:
2148
2149 exit_init_data:
2150         cleanup_relayd_live();
2151
2152         return retval;
2153 }