liblttng-ustconsumer/lttng-ustconsumer.c

   1 /*
   2  * Copyright (C) 2011 - Julien Desfossez <julien.desfossez@polymtl.ca>
   3  *                      Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU General Public License
   7  * as published by the Free Software Foundation; only version 2
   8  * of the License.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18  */
  19
  20 #define _GNU_SOURCE
  21 #include <assert.h>
  22 #include <fcntl.h>
  23 #include <poll.h>
  24 #include <pthread.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <sys/mman.h>
  28 #include <sys/socket.h>
  29 #include <sys/types.h>
  30 #include <unistd.h>
  31
  32 #include <lttng-sessiond-comm.h>
  33 #include <lttng/lttng-ustconsumer.h>
  34 #include <lttng/ust-ctl.h>
  35 #include <lttngerr.h>
  36
  37 extern struct lttng_consumer_global_data consumer_data;
  38 extern int consumer_poll_timeout;
  39 extern volatile int consumer_quit;
  40
  41 /*
  42  * Mmap the ring buffer, read it and write the data to the tracefile.
  43  *
  44  * Returns the number of bytes written
  45  */
  46 int lttng_ustconsumer_on_read_subbuffer_mmap(
  47                 struct lttng_consumer_local_data *ctx,
  48                 struct lttng_consumer_stream *stream, unsigned long len)
  49 {
  50         unsigned long mmap_offset;
  51         long ret = 0;
  52         off_t orig_offset = stream->out_fd_offset;
  53         int outfd = stream->out_fd;
  54
  55         /* get the offset inside the fd to mmap */
  56         ret = ustctl_get_mmap_read_offset(stream->chan->handle,
  57                 stream->buf, &mmap_offset);
  58         if (ret != 0) {
  59                 ret = -errno;
  60                 perror("ustctl_get_mmap_read_offset");
  61                 goto end;
  62         }
  63         while (len > 0) {
  64                 ret = write(outfd, stream->mmap_base + mmap_offset, len);
  65                 if (ret >= len) {
  66                         len = 0;
  67                 } else if (ret < 0) {
  68                         ret = -errno;
  69                         perror("Error in file write");
  70                         goto end;
  71                 }
  72                 /* This won't block, but will start writeout asynchronously */
  73                 sync_file_range(outfd, stream->out_fd_offset, ret,
  74                                 SYNC_FILE_RANGE_WRITE);
  75                 stream->out_fd_offset += ret;
  76         }
  77
  78         lttng_consumer_sync_trace_file(stream, orig_offset);
  79
  80         goto end;
  81
  82 end:
  83         return ret;
  84 }
  85
  86 /*
  87  * Splice the data from the ring buffer to the tracefile.
  88  *
  89  * Returns the number of bytes spliced.
  90  */
  91 int lttng_ustconsumer_on_read_subbuffer_splice(
  92                 struct lttng_consumer_local_data *ctx,
  93                 struct lttng_consumer_stream *stream, unsigned long len)
  94 {
  95         return -ENOSYS;
  96 }
  97
  98 /*
  99  * Take a snapshot for a specific fd
 100  *
 101  * Returns 0 on success, < 0 on error
 102  */
 103 int lttng_ustconsumer_take_snapshot(struct lttng_consumer_local_data *ctx,
 104                 struct lttng_consumer_stream *stream)
 105 {
 106         int ret = 0;
 107
 108         ret = ustctl_snapshot(stream->chan->handle, stream->buf);
 109         if (ret != 0) {
 110                 ret = errno;
 111                 perror("Getting sub-buffer snapshot.");
 112         }
 113
 114         return ret;
 115 }
 116
 117 /*
 118  * Get the produced position
 119  *
 120  * Returns 0 on success, < 0 on error
 121  */
 122 int lttng_ustconsumer_get_produced_snapshot(
 123                 struct lttng_consumer_local_data *ctx,
 124                 struct lttng_consumer_stream *stream,
 125                 unsigned long *pos)
 126 {
 127         int ret;
 128
 129         ret = ustctl_snapshot_get_produced(stream->chan->handle,
 130                         stream->buf, pos);
 131         if (ret != 0) {
 132                 ret = errno;
 133                 perror("kernctl_snapshot_get_produced");
 134         }
 135
 136         return ret;
 137 }
 138
 139 int lttng_ustconsumer_recv_cmd(struct lttng_consumer_local_data *ctx,
 140                 int sock, struct pollfd *consumer_sockpoll)
 141 {
 142         ssize_t ret;
 143         struct lttcomm_consumer_msg msg;
 144
 145         ret = lttcomm_recv_unix_sock(sock, &msg, sizeof(msg));
 146         if (ret != sizeof(msg)) {
 147                 lttng_consumer_send_error(ctx, CONSUMERD_ERROR_RECV_FD);
 148                 return ret;
 149         }
 150         if (msg.cmd_type == LTTNG_CONSUMER_STOP) {
 151                 return -ENOENT;
 152         }
 153
 154         switch (msg.cmd_type) {
 155         case LTTNG_CONSUMER_ADD_CHANNEL:
 156         {
 157                 struct lttng_consumer_channel *new_channel;
 158                 int fds[1];
 159                 size_t nb_fd = 1;
 160
 161                 /* block */
 162                 if (lttng_consumer_poll_socket(consumer_sockpoll) < 0) {
 163                         return -EINTR;
 164                 }
 165                 ret = lttcomm_recv_fds_unix_sock(sock, fds, nb_fd);
 166                 if (ret != sizeof(fds)) {
 167                         lttng_consumer_send_error(ctx, CONSUMERD_ERROR_RECV_FD);
 168                         return ret;
 169                 }
 170
 171                 DBG("consumer_add_channel %d", msg.u.channel.channel_key);
 172
 173                 new_channel = consumer_allocate_channel(msg.u.channel.channel_key,
 174                                 fds[0], -1,
 175                                 msg.u.channel.mmap_len,
 176                                 msg.u.channel.max_sb_size);
 177                 if (new_channel == NULL) {
 178                         lttng_consumer_send_error(ctx, CONSUMERD_OUTFD_ERROR);
 179                         goto end_nosignal;
 180                 }
 181                 if (ctx->on_recv_channel != NULL) {
 182                         ret = ctx->on_recv_channel(new_channel);
 183                         if (ret == 0) {
 184                                 consumer_add_channel(new_channel);
 185                         } else if (ret < 0) {
 186                                 goto end_nosignal;
 187                         }
 188                 } else {
 189                         consumer_add_channel(new_channel);
 190                 }
 191                 goto end_nosignal;
 192         }
 193         case LTTNG_CONSUMER_ADD_STREAM:
 194         {
 195                 struct lttng_consumer_stream *new_stream;
 196                 int fds[2];
 197                 size_t nb_fd = 2;
 198
 199                 /* block */
 200                 if (lttng_consumer_poll_socket(consumer_sockpoll) < 0) {
 201                         return -EINTR;
 202                 }
 203                 ret = lttcomm_recv_fds_unix_sock(sock, fds, nb_fd);
 204                 if (ret != sizeof(fds)) {
 205                         lttng_consumer_send_error(ctx, CONSUMERD_ERROR_RECV_FD);
 206                         return ret;
 207                 }
 208
 209                 DBG("consumer_add_stream %s (%d,%d)", msg.u.stream.path_name,
 210                         fds[0], fds[1]);
 211                 assert(msg.u.stream.output == LTTNG_EVENT_MMAP);
 212                 new_stream = consumer_allocate_stream(msg.u.channel.channel_key,
 213                                 msg.u.stream.stream_key,
 214                                 fds[0], fds[1],
 215                                 msg.u.stream.state,
 216                                 msg.u.stream.mmap_len,
 217                                 msg.u.stream.output,
 218                                 msg.u.stream.path_name);
 219                 if (new_stream == NULL) {
 220                         lttng_consumer_send_error(ctx, CONSUMERD_OUTFD_ERROR);
 221                         goto end;
 222                 }
 223                 if (ctx->on_recv_stream != NULL) {
 224                         ret = ctx->on_recv_stream(new_stream);
 225                         if (ret == 0) {
 226                                 consumer_add_stream(new_stream);
 227                         } else if (ret < 0) {
 228                                 goto end;
 229                         }
 230                 } else {
 231                         consumer_add_stream(new_stream);
 232                 }
 233                 break;
 234         }
 235         case LTTNG_CONSUMER_UPDATE_STREAM:
 236         {
 237                 return -ENOSYS;
 238 #if 0
 239                 if (ctx->on_update_stream != NULL) {
 240                         ret = ctx->on_update_stream(msg.u.stream.stream_key, msg.u.stream.state);
 241                         if (ret == 0) {
 242                                 consumer_change_stream_state(msg.u.stream.stream_key, msg.u.stream.state);
 243                         } else if (ret < 0) {
 244                                 goto end;
 245                         }
 246                 } else {
 247                         consumer_change_stream_state(msg.u.stream.stream_key,
 248                                 msg.u.stream.state);
 249                 }
 250 #endif
 251                 break;
 252         }
 253         default:
 254                 break;
 255         }
 256 end:
 257         /* signal the poll thread */
 258         ret = write(ctx->consumer_poll_pipe[1], "4", 1);
 259         if (ret < 0) {
 260                 perror("write consumer poll");
 261         }
 262 end_nosignal:
 263         return 0;
 264 }
 265
 266 int lttng_ustconsumer_allocate_channel(struct lttng_consumer_channel *chan)
 267 {
 268         struct lttng_ust_object_data obj;
 269
 270         obj.handle = -1;
 271         obj.shm_fd = chan->shm_fd;
 272         obj.wait_fd = chan->wait_fd;
 273         obj.memory_map_size = chan->mmap_len;
 274         chan->handle = ustctl_map_channel(&obj);
 275         if (!chan->handle) {
 276                 return -ENOMEM;
 277         }
 278         /*
 279          * The channel fds are passed to ustctl, we only keep a copy.
 280          */
 281         chan->shm_fd_is_copy = 1;
 282         chan->wait_fd_is_copy = 1;
 283
 284         return 0;
 285 }
 286
 287 void lttng_ustconsumer_on_stream_hangup(struct lttng_consumer_stream *stream)
 288 {
 289         ustctl_flush_buffer(stream->chan->handle, stream->buf, 0);
 290         stream->hangup_flush_done = 1;
 291 }
 292
 293 void lttng_ustconsumer_del_channel(struct lttng_consumer_channel *chan)
 294 {
 295         ustctl_unmap_channel(chan->handle);
 296 }
 297
 298 int lttng_ustconsumer_allocate_stream(struct lttng_consumer_stream *stream)
 299 {
 300         struct lttng_ust_object_data obj;
 301         int ret;
 302
 303         obj.handle = -1;
 304         obj.shm_fd = stream->shm_fd;
 305         obj.wait_fd = stream->wait_fd;
 306         obj.memory_map_size = stream->mmap_len;
 307         ret = ustctl_add_stream(stream->chan->handle, &obj);
 308         if (ret)
 309                 return ret;
 310         stream->buf = ustctl_open_stream_read(stream->chan->handle, stream->cpu);
 311         if (!stream->buf)
 312                 return -EBUSY;
 313         stream->mmap_base = ustctl_get_mmap_base(stream->chan->handle, stream->buf);
 314         if (!stream->mmap_base) {
 315                 return -EINVAL;
 316         }
 317         /*
 318          * The stream fds are passed to ustctl, we only keep a copy.
 319          */
 320         stream->shm_fd_is_copy = 1;
 321         stream->wait_fd_is_copy = 1;
 322
 323         return 0;
 324 }
 325
 326 void lttng_ustconsumer_del_stream(struct lttng_consumer_stream *stream)
 327 {
 328         ustctl_close_stream_read(stream->chan->handle, stream->buf);
 329 }
 330
 331
 332 int lttng_ustconsumer_read_subbuffer(struct lttng_consumer_stream *stream,
 333                 struct lttng_consumer_local_data *ctx)
 334 {
 335         unsigned long len;
 336         int err;
 337         long ret = 0;
 338         struct lttng_ust_shm_handle *handle;
 339         struct lttng_ust_lib_ring_buffer *buf;
 340         char dummy;
 341         ssize_t readlen;
 342
 343         DBG("In read_subbuffer (wait_fd: %d, stream key: %d)",
 344                 stream->wait_fd, stream->key);
 345
 346         /* We can consume the 1 byte written into the wait_fd by UST */
 347         if (!stream->hangup_flush_done) {
 348                 do {
 349                         readlen = read(stream->wait_fd, &dummy, 1);
 350                 } while (readlen == -1 && errno == -EINTR);
 351                 if (readlen == -1) {
 352                         ret = readlen;
 353                         goto end;
 354                 }
 355         }
 356
 357         buf = stream->buf;
 358         handle = stream->chan->handle;
 359         /* Get the next subbuffer */
 360         err = ustctl_get_next_subbuf(handle, buf);
 361         if (err != 0) {
 362                 ret = -ret;     /* ustctl_get_next_subbuf returns negative, caller expect positive. */
 363                 /*
 364                  * This is a debug message even for single-threaded consumer,
 365                  * because poll() have more relaxed criterions than get subbuf,
 366                  * so get_subbuf may fail for short race windows where poll()
 367                  * would issue wakeups.
 368                  */
 369                 DBG("Reserving sub buffer failed (everything is normal, "
 370                                 "it is due to concurrency)");
 371                 goto end;
 372         }
 373         assert(stream->output == LTTNG_EVENT_MMAP);
 374         /* read the used subbuffer size */
 375         err = ustctl_get_padded_subbuf_size(handle, buf, &len);
 376         assert(err == 0);
 377         /* write the subbuffer to the tracefile */
 378         ret = lttng_consumer_on_read_subbuffer_mmap(ctx, stream, len);
 379         if (ret < 0) {
 380                 /*
 381                  * display the error but continue processing to try
 382                  * to release the subbuffer
 383                  */
 384                 ERR("Error writing to tracefile");
 385         }
 386         err = ustctl_put_next_subbuf(handle, buf);
 387         assert(err == 0);
 388 end:
 389         return ret;
 390 }
 391
 392 int lttng_ustconsumer_on_recv_stream(struct lttng_consumer_stream *stream)
 393 {
 394         int ret;
 395
 396         /* Opening the tracefile in write mode */
 397         if (stream->path_name != NULL) {
 398                 ret = open(stream->path_name,
 399                                 O_WRONLY|O_CREAT|O_TRUNC, S_IRWXU|S_IRWXG|S_IRWXO);
 400                 if (ret < 0) {
 401                         ERR("Opening %s", stream->path_name);
 402                         perror("open");
 403                         goto error;
 404                 }
 405                 stream->out_fd = ret;
 406         }
 407
 408         /* we return 0 to let the library handle the FD internally */
 409         return 0;
 410
 411 error:
 412         return ret;
 413 }