src/bin/lttng/commands/destroy.c

   1 /*
   2  * Copyright (C) 2011 - David Goulet <david.goulet@polymtl.ca>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License, version 2 only,
   6  * as published by the Free Software Foundation.
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  *
  13  * You should have received a copy of the GNU General Public License along
  14  * with this program; if not, write to the Free Software Foundation, Inc.,
  15  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  16  */
  17
  18 #define _LGPL_SOURCE
  19 #include <popt.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <sys/stat.h>
  24 #include <sys/types.h>
  25 #include <unistd.h>
  26 #include <stdbool.h>
  27
  28 #include "../command.h"
  29
  30 #include <common/mi-lttng.h>
  31 #include <common/sessiond-comm/sessiond-comm.h>
  32 #include <common/utils.h>
  33
  34 static char *opt_session_name;
  35 static int opt_destroy_all;
  36 static int opt_no_wait;
  37
  38 /* Mi writer */
  39 static struct mi_writer *writer;
  40
  41 enum {
  42         OPT_HELP = 1,
  43         OPT_LIST_OPTIONS,
  44 };
  45
  46 static struct poptOption long_options[] = {
  47         /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
  48         {"help",      'h', POPT_ARG_NONE, 0, OPT_HELP, 0, 0},
  49         {"all",       'a', POPT_ARG_VAL, &opt_destroy_all, 1, 0, 0},
  50         {"list-options", 0, POPT_ARG_NONE, NULL, OPT_LIST_OPTIONS, NULL, NULL},
  51         {"no-wait",   'n', POPT_ARG_VAL, &opt_no_wait, 1, 0, 0},
  52         {0, 0, 0, 0, 0, 0, 0}
  53 };
  54
  55 /*
  56  * destroy_session
  57  *
  58  * Unregister the provided session to the session daemon. On success, removes
  59  * the default configuration.
  60  */
  61 static int destroy_session(struct lttng_session *session)
  62 {
  63         int ret;
  64         char *session_name = NULL;
  65         bool session_was_stopped;
  66
  67         ret = lttng_stop_tracing_no_wait(session->name);
  68         if (ret < 0 && ret != -LTTNG_ERR_TRACE_ALREADY_STOPPED) {
  69                 ERR("%s", lttng_strerror(ret));
  70         }
  71         session_was_stopped = ret == -LTTNG_ERR_TRACE_ALREADY_STOPPED;
  72         if (!opt_no_wait) {
  73                 bool printed_wait_msg = false;
  74
  75                 do {
  76                         ret = lttng_data_pending(session->name);
  77                         if (ret < 0) {
  78                                 /* Return the data available call error. */
  79                                 goto error;
  80                         }
  81
  82                         /*
  83                          * Data sleep time before retrying (in usec). Don't sleep if the call
  84                          * returned value indicates availability.
  85                          */
  86                         if (ret) {
  87                                 if (!printed_wait_msg) {
  88                                         _MSG("Waiting for data availability");
  89                                         fflush(stdout);
  90                                 }
  91
  92                                 printed_wait_msg = true;
  93                                 usleep(DEFAULT_DATA_AVAILABILITY_WAIT_TIME);
  94                                 _MSG(".");
  95                                 fflush(stdout);
  96                         }
  97                 } while (ret != 0);
  98                 if (printed_wait_msg) {
  99                         MSG("");
 100                 }
 101         }
 102         if (!session_was_stopped) {
 103                 /*
 104                  * Don't print the event and packet loss warnings since the user
 105                  * already saw them when stopping the trace.
 106                  */
 107                 print_session_stats(session->name);
 108         }
 109
 110         ret = lttng_destroy_session_no_wait(session->name);
 111         if (ret < 0) {
 112                 goto error;
 113         }
 114
 115         MSG("Session %s destroyed", session->name);
 116
 117         session_name = get_session_name_quiet();
 118         if (session_name && !strncmp(session->name, session_name, NAME_MAX)) {
 119                 config_destroy_default();
 120         }
 121
 122         if (lttng_opt_mi) {
 123                 ret = mi_lttng_session(writer, session, 0);
 124                 if (ret) {
 125                         ret = CMD_ERROR;
 126                         goto error;
 127                 }
 128         }
 129
 130         ret = CMD_SUCCESS;
 131 error:
 132         free(session_name);
 133         return ret;
 134 }
 135
 136 /*
 137  * destroy_all_sessions
 138  *
 139  * Call destroy_sessions for each registered sessions
 140  */
 141 static int destroy_all_sessions(struct lttng_session *sessions, int count)
 142 {
 143         int i, ret = CMD_SUCCESS;
 144
 145         if (count == 0) {
 146                 MSG("No session found, nothing to do.");
 147         } else if (count < 0) {
 148                 ERR("%s", lttng_strerror(ret));
 149                 goto error;
 150         }
 151
 152         for (i = 0; i < count; i++) {
 153                 ret = destroy_session(&sessions[i]);
 154                 if (ret < 0) {
 155                         goto error;
 156                 }
 157         }
 158 error:
 159         return ret;
 160 }
 161
 162 /*
 163  * The 'destroy <options>' first level command
 164  */
 165 int cmd_destroy(int argc, const char **argv)
 166 {
 167         int opt;
 168         int ret = CMD_SUCCESS , i, command_ret = CMD_SUCCESS, success = 1;
 169         static poptContext pc;
 170         char *session_name = NULL;
 171
 172         struct lttng_session *sessions;
 173         int count;
 174         int found;
 175
 176         pc = poptGetContext(NULL, argc, argv, long_options, 0);
 177         poptReadDefaultConfig(pc, 0);
 178
 179         while ((opt = poptGetNextOpt(pc)) != -1) {
 180                 switch (opt) {
 181                 case OPT_HELP:
 182                         SHOW_HELP();
 183                         break;
 184                 case OPT_LIST_OPTIONS:
 185                         list_cmd_options(stdout, long_options);
 186                         break;
 187                 default:
 188                         ret = CMD_UNDEFINED;
 189                         break;
 190                 }
 191                 goto end;
 192         }
 193
 194         /* Mi preparation */
 195         if (lttng_opt_mi) {
 196                 writer = mi_lttng_writer_create(fileno(stdout), lttng_opt_mi);
 197                 if (!writer) {
 198                         ret = -LTTNG_ERR_NOMEM;
 199                         goto end;
 200                 }
 201
 202                 /* Open command element */
 203                 ret = mi_lttng_writer_command_open(writer,
 204                                 mi_lttng_element_command_destroy);
 205                 if (ret) {
 206                         ret = CMD_ERROR;
 207                         goto end;
 208                 }
 209
 210                 /* Open output element */
 211                 ret = mi_lttng_writer_open_element(writer,
 212                                 mi_lttng_element_command_output);
 213                 if (ret) {
 214                         ret = CMD_ERROR;
 215                         goto end;
 216                 }
 217
 218                 /* For validation and semantic purpose we open a sessions element */
 219                 ret = mi_lttng_sessions_open(writer);
 220                 if (ret) {
 221                         ret = CMD_ERROR;
 222                         goto end;
 223                 }
 224         }
 225
 226         /* Recuperate all sessions for further operation */
 227         count = lttng_list_sessions(&sessions);
 228         if (count < 0) {
 229                 command_ret = count;
 230                 success = 0;
 231                 goto mi_closing;
 232         }
 233
 234         /* Ignore session name in case all sessions are to be destroyed */
 235         if (opt_destroy_all) {
 236                 command_ret = destroy_all_sessions(sessions, count);
 237                 if (command_ret) {
 238                         success = 0;
 239                 }
 240         } else {
 241                 opt_session_name = (char *) poptGetArg(pc);
 242
 243                 if (!opt_session_name) {
 244                         /* No session name specified, lookup default */
 245                         session_name = get_session_name();
 246                         if (session_name == NULL) {
 247                                 command_ret = CMD_ERROR;
 248                                 success = 0;
 249                                 goto mi_closing;
 250                         }
 251                 } else {
 252                         session_name = opt_session_name;
 253                 }
 254
 255                 /* Find the corresponding lttng_session struct */
 256                 found = 0;
 257                 for (i = 0; i < count; i++) {
 258                         if (strncmp(sessions[i].name, session_name, NAME_MAX) == 0) {
 259                                 found = 1;
 260                                 command_ret = destroy_session(&sessions[i]);
 261                                 if (command_ret) {
 262                                         success = 0;
 263                                 }
 264
 265                         }
 266                 }
 267
 268                 if (!found) {
 269                         ERR("Session name %s not found", session_name);
 270                         command_ret = LTTNG_ERR_SESS_NOT_FOUND;
 271                         success = 0;
 272                         goto mi_closing;
 273                 }
 274         }
 275
 276 mi_closing:
 277         /* Mi closing */
 278         if (lttng_opt_mi) {
 279                 /* Close sessions and output element element */
 280                 ret = mi_lttng_close_multi_element(writer, 2);
 281                 if (ret) {
 282                         ret = CMD_ERROR;
 283                         goto end;
 284                 }
 285
 286                 /* Success ? */
 287                 ret = mi_lttng_writer_write_element_bool(writer,
 288                                 mi_lttng_element_command_success, success);
 289                 if (ret) {
 290                         ret = CMD_ERROR;
 291                         goto end;
 292                 }
 293
 294                 /* Command element close */
 295                 ret = mi_lttng_writer_command_close(writer);
 296                 if (ret) {
 297                         ret = CMD_ERROR;
 298                         goto end;
 299                 }
 300         }
 301 end:
 302         /* Mi clean-up */
 303         if (writer && mi_lttng_writer_destroy(writer)) {
 304                 /* Preserve original error code */
 305                 ret = ret ? ret : -LTTNG_ERR_MI_IO_FAIL;
 306         }
 307
 308         if (opt_session_name == NULL) {
 309                 free(session_name);
 310         }
 311
 312         /* Overwrite ret if an error occurred during destroy_session/all */
 313         ret = command_ret ? command_ret : ret;
 314
 315         poptFreeContext(pc);
 316         return ret;
 317 }