2 * Copyright (C) 2014 - Jérémie Galarneau <jeremie.galarneau@efficios.com>
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.
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.
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.
26 #include <common/mi-lttng.h>
27 #include <common/config/session-config.h>
28 #include <lttng/load.h>
30 #include "../command.h"
32 static char *opt_input_path
;
33 static char *opt_override_url
;
35 static int opt_load_all
;
37 static const char *session_name
;
46 static struct mi_writer
*writer
;
48 static struct poptOption load_opts
[] = {
49 /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
50 {"help", 'h', POPT_ARG_NONE
, 0, OPT_HELP
, 0, 0},
51 {"all", 'a', POPT_ARG_NONE
, 0, OPT_ALL
, 0, 0},
52 {"input-path", 'i', POPT_ARG_STRING
, &opt_input_path
, 0, 0, 0},
53 {"force", 'f', POPT_ARG_NONE
, 0, OPT_FORCE
, 0, 0},
54 {"override-url", 'U', POPT_ARG_STRING
, &opt_override_url
, 0, 0, 0},
55 {"list-options", 0, POPT_ARG_NONE
, NULL
, OPT_LIST_OPTIONS
, NULL
, NULL
},
59 static int mi_partial_session(const char *session_name
)
65 /* Open session element */
66 ret
= mi_lttng_writer_open_element(writer
, config_element_session
);
71 ret
= mi_lttng_writer_write_element_string(writer
, config_element_name
,
77 /* Closing session element */
78 ret
= mi_lttng_writer_close_element(writer
);
84 * Mi print of load command
86 static int mi_load_print(const char *session_name
)
92 /* We use a wildcard to represent all sessions */
96 /* Print load element */
97 ret
= mi_lttng_writer_open_element(writer
, mi_lttng_element_load
);
102 /* Print session element */
103 ret
= mi_partial_session(session_name
);
109 if (opt_input_path
) {
110 ret
= mi_lttng_writer_write_element_string(writer
, config_element_path
,
117 /* Close load element */
118 ret
= mi_lttng_writer_close_element(writer
);
125 * The 'load <options>' first level command
127 int cmd_load(int argc
, const char **argv
)
129 int ret
= CMD_SUCCESS
, command_ret
= CMD_SUCCESS
, success
;
132 struct lttng_load_session_attr
*session_attr
= NULL
;
133 char *input_path
= NULL
;
135 pc
= poptGetContext(NULL
, argc
, argv
, load_opts
, 0);
136 poptReadDefaultConfig(pc
, 0);
138 while ((opt
= poptGetNextOpt(pc
)) != -1) {
146 case OPT_LIST_OPTIONS
:
147 list_cmd_options(stdout
, load_opts
);
159 session_name
= poptGetArg(pc
);
161 DBG2("Loading session name: %s", session_name
);
163 /* Default to load_all */
170 writer
= mi_lttng_writer_create(fileno(stdout
), lttng_opt_mi
);
172 ret
= -LTTNG_ERR_NOMEM
;
176 /* Open command element */
177 ret
= mi_lttng_writer_command_open(writer
,
178 mi_lttng_element_command_load
);
184 /* Open output element */
185 ret
= mi_lttng_writer_open_element(writer
,
186 mi_lttng_element_command_output
);
193 /* Prepare load attributes */
194 session_attr
= lttng_load_session_attr_create();
196 ERR("Load session attributes creation failed");
197 ret
= -LTTNG_ERR_NOMEM
;
203 * lttng_load_session_attr_set_input_url support only absolute path.
204 * Use realpath to resolve any relative path.
206 if (opt_input_path
) {
207 input_path
= realpath(opt_input_path
, NULL
);
209 PERROR("Input path is invalid");
215 ret
= lttng_load_session_attr_set_input_url(session_attr
,
218 ERR("Input path is invalid");
222 /* Set the session name. NULL means all sessions should be loaded */
223 ret
= lttng_load_session_attr_set_session_name(session_attr
,
226 ERR("Session name is invalid");
230 /* Set the overwrite attribute */
231 ret
= lttng_load_session_attr_set_overwrite(session_attr
, opt_force
);
233 ERR("Force argument could not be applied");
237 /* Set the overrides attributes if any */
238 if (opt_override_url
) {
239 ret
= lttng_load_session_attr_set_override_url(session_attr
,
242 ERR("Url override is invalid");
247 command_ret
= lttng_load_session(session_attr
);
249 ERR("%s", lttng_strerror(command_ret
));
253 MSG("All sessions have been loaded successfully");
254 } else if (session_name
) {
255 ret
= config_init((char *)session_name
);
259 MSG("Session %s has been loaded successfully", session_name
);
261 MSG("Session has been loaded successfully");
264 if (opt_override_url
) {
265 MSG("Session output url overridden with %s", opt_override_url
);
270 /* Mi Printing and closing */
273 ret
= mi_load_print(session_name
);
279 /* Close output element */
280 ret
= mi_lttng_writer_close_element(writer
);
287 ret
= mi_lttng_writer_write_element_bool(writer
,
288 mi_lttng_element_command_success
, success
);
294 /* Command element close */
295 ret
= mi_lttng_writer_command_close(writer
);
302 if (writer
&& mi_lttng_writer_destroy(writer
)) {
303 /* Preserve original error code */
304 ret
= ret
? ret
: -LTTNG_ERR_MI_IO_FAIL
;
307 /* Overwrite ret if the was an error with the load command */
308 ret
= command_ret
? -command_ret
: ret
;
310 lttng_load_session_attr_destroy(session_attr
);