2 * Copyright 2010-2011 EfficiOS Inc. and Linux Foundation
4 * Author: Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
25 #define BT_LOG_TAG "CLI"
28 #include <babeltrace2/babeltrace.h>
29 #include "common/common.h"
30 #include "string-format/format-plugin-comp-cls-name.h"
39 #include "babeltrace2-cfg.h"
40 #include "babeltrace2-cfg-cli-args.h"
41 #include "babeltrace2-cfg-cli-args-default.h"
42 #include "babeltrace2-log-level.h"
43 #include "babeltrace2-plugins.h"
44 #include "babeltrace2-query.h"
46 #define ENV_BABELTRACE_WARN_COMMAND_NAME_DIRECTORY_CLASH "BABELTRACE_CLI_WARN_COMMAND_NAME_DIRECTORY_CLASH"
47 #define NSEC_PER_SEC 1000000000LL
51 BT_CMD_STATUS_ERROR
= -1,
52 BT_CMD_STATUS_INTERRUPTED
= -2,
56 const char *bt_cmd_status_string(enum bt_cmd_status cmd_status
)
59 case BT_CMD_STATUS_OK
:
61 case BT_CMD_STATUS_ERROR
:
63 case BT_CMD_STATUS_INTERRUPTED
:
70 /* Application's interrupter (owned by this) */
71 static bt_interrupter
*the_interrupter
;
78 BOOL WINAPI
signal_handler(DWORD signal
) {
79 if (the_interrupter
) {
80 bt_interrupter_set(the_interrupter
);
87 void set_signal_handler(void)
89 if (!SetConsoleCtrlHandler(signal_handler
, TRUE
)) {
90 BT_LOGE("Failed to set the Ctrl+C handler.");
94 #else /* __MINGW32__ */
97 void signal_handler(int signum
)
99 if (signum
!= SIGINT
) {
103 if (the_interrupter
) {
104 bt_interrupter_set(the_interrupter
);
109 void set_signal_handler(void)
111 struct sigaction new_action
, old_action
;
113 new_action
.sa_handler
= signal_handler
;
114 sigemptyset(&new_action
.sa_mask
);
115 new_action
.sa_flags
= 0;
116 sigaction(SIGINT
, NULL
, &old_action
);
118 if (old_action
.sa_handler
!= SIG_IGN
) {
119 sigaction(SIGINT
, &new_action
, NULL
);
123 #endif /* __MINGW32__ */
126 int query(struct bt_config
*cfg
, const bt_component_class
*comp_cls
,
127 const char *obj
, const bt_value
*params
,
128 const bt_value
**user_result
, const char **fail_reason
)
130 return cli_query(comp_cls
, obj
, params
, cfg
->log_level
,
131 the_interrupter
, user_result
, fail_reason
);
134 typedef const void *(*plugin_borrow_comp_cls_func_t
)(
135 const bt_plugin
*, const char *);
138 const void *find_component_class_from_plugin(const char *plugin_name
,
139 const char *comp_class_name
,
140 plugin_borrow_comp_cls_func_t plugin_borrow_comp_cls_func
)
142 const void *comp_class
= NULL
;
143 const bt_plugin
*plugin
;
145 BT_LOGI("Finding component class: plugin-name=\"%s\", "
146 "comp-cls-name=\"%s\"", plugin_name
, comp_class_name
);
148 plugin
= find_loaded_plugin(plugin_name
);
153 comp_class
= plugin_borrow_comp_cls_func(plugin
, comp_class_name
);
154 bt_object_get_ref(comp_class
);
155 BT_PLUGIN_PUT_REF_AND_RESET(plugin
);
159 BT_LOGI("Found component class: plugin-name=\"%s\", "
160 "comp-cls-name=\"%s\"", plugin_name
, comp_class_name
);
162 BT_LOGI("Cannot find source component class: "
163 "plugin-name=\"%s\", comp-cls-name=\"%s\"",
164 plugin_name
, comp_class_name
);
171 const bt_component_class_source
*find_source_component_class(
172 const char *plugin_name
, const char *comp_class_name
)
174 return (const void *) find_component_class_from_plugin(
175 plugin_name
, comp_class_name
,
176 (plugin_borrow_comp_cls_func_t
)
177 bt_plugin_borrow_source_component_class_by_name_const
);
181 const bt_component_class_filter
*find_filter_component_class(
182 const char *plugin_name
, const char *comp_class_name
)
184 return (const void *) find_component_class_from_plugin(
185 plugin_name
, comp_class_name
,
186 (plugin_borrow_comp_cls_func_t
)
187 bt_plugin_borrow_filter_component_class_by_name_const
);
191 const bt_component_class_sink
*find_sink_component_class(
192 const char *plugin_name
, const char *comp_class_name
)
194 return (const void *) find_component_class_from_plugin(plugin_name
,
196 (plugin_borrow_comp_cls_func_t
)
197 bt_plugin_borrow_sink_component_class_by_name_const
);
201 const bt_component_class
*find_component_class(const char *plugin_name
,
202 const char *comp_class_name
,
203 bt_component_class_type comp_class_type
)
205 const bt_component_class
*comp_cls
= NULL
;
207 switch (comp_class_type
) {
208 case BT_COMPONENT_CLASS_TYPE_SOURCE
:
209 comp_cls
= bt_component_class_source_as_component_class_const(find_source_component_class(plugin_name
, comp_class_name
));
211 case BT_COMPONENT_CLASS_TYPE_FILTER
:
212 comp_cls
= bt_component_class_filter_as_component_class_const(find_filter_component_class(plugin_name
, comp_class_name
));
214 case BT_COMPONENT_CLASS_TYPE_SINK
:
215 comp_cls
= bt_component_class_sink_as_component_class_const(find_sink_component_class(plugin_name
, comp_class_name
));
225 void print_indent(FILE *fp
, size_t indent
)
229 for (i
= 0; i
< indent
; i
++) {
235 void print_value(FILE *, const bt_value
*, size_t);
238 void print_value_rec(FILE *, const bt_value
*, size_t);
241 void print_map_value(const char *key
, const bt_value
*object
, FILE *fp
,
244 print_indent(fp
, indent
);
245 fprintf(fp
, "%s: ", key
);
248 if (bt_value_is_array(object
) &&
249 bt_value_array_is_empty(object
)) {
250 fprintf(fp
, "[ ]\n");
254 if (bt_value_is_map(object
) &&
255 bt_value_map_is_empty(object
)) {
256 fprintf(fp
, "{ }\n");
260 if (bt_value_is_array(object
) ||
261 bt_value_is_map(object
)) {
265 print_value_rec(fp
, object
, indent
+ 2);
272 bt_value_map_foreach_entry_const_func_status
collect_map_keys(
273 const char *key
, const bt_value
*object
, void *data
)
275 GPtrArray
*map_keys
= data
;
277 g_ptr_array_add(map_keys
, (gpointer
*) key
);
279 return BT_VALUE_MAP_FOREACH_ENTRY_CONST_FUNC_STATUS_OK
;
283 gint
g_ptr_array_sort_strings(gconstpointer a
, gconstpointer b
) {
284 const char *s1
= *((const char **) a
);
285 const char *s2
= *((const char **) b
);
287 return g_strcmp0(s1
, s2
);
291 void print_value_rec(FILE *fp
, const bt_value
*value
, size_t indent
)
298 GPtrArray
*map_keys
= NULL
;
302 switch (bt_value_get_type(value
)) {
303 case BT_VALUE_TYPE_NULL
:
304 fprintf(fp
, "%snull%s\n", bt_common_color_bold(),
305 bt_common_color_reset());
307 case BT_VALUE_TYPE_BOOL
:
308 bool_val
= bt_value_bool_get(value
);
309 fprintf(fp
, "%s%s%s%s\n", bt_common_color_bold(),
310 bt_common_color_fg_bright_cyan(), bool_val
? "yes" : "no",
311 bt_common_color_reset());
313 case BT_VALUE_TYPE_UNSIGNED_INTEGER
:
314 uint_val
= bt_value_integer_unsigned_get(value
);
315 fprintf(fp
, "%s%s%" PRIu64
"%s\n", bt_common_color_bold(),
316 bt_common_color_fg_bright_red(), uint_val
,
317 bt_common_color_reset());
319 case BT_VALUE_TYPE_SIGNED_INTEGER
:
320 int_val
= bt_value_integer_signed_get(value
);
321 fprintf(fp
, "%s%s%" PRId64
"%s\n", bt_common_color_bold(),
322 bt_common_color_fg_bright_red(), int_val
,
323 bt_common_color_reset());
325 case BT_VALUE_TYPE_REAL
:
326 dbl_val
= bt_value_real_get(value
);
327 fprintf(fp
, "%s%s%lf%s\n", bt_common_color_bold(),
328 bt_common_color_fg_bright_red(), dbl_val
,
329 bt_common_color_reset());
331 case BT_VALUE_TYPE_STRING
:
332 str_val
= bt_value_string_get(value
);
333 fprintf(fp
, "%s%s%s%s\n", bt_common_color_bold(),
334 bt_common_color_fg_bright_green(), str_val
,
335 bt_common_color_reset());
337 case BT_VALUE_TYPE_ARRAY
:
340 size
= bt_value_array_get_length(value
);
342 print_indent(fp
, indent
);
343 fprintf(fp
, "[ ]\n");
347 for (i
= 0; i
< size
; i
++) {
348 const bt_value
*element
=
349 bt_value_array_borrow_element_by_index_const(
352 print_indent(fp
, indent
);
355 if (bt_value_is_array(element
) &&
356 bt_value_array_is_empty(element
)) {
357 fprintf(fp
, "[ ]\n");
361 if (bt_value_is_map(element
) &&
362 bt_value_map_is_empty(element
)) {
363 fprintf(fp
, "{ }\n");
367 if (bt_value_is_array(element
) ||
368 bt_value_is_map(element
)) {
372 print_value_rec(fp
, element
, indent
+ 2);
376 case BT_VALUE_TYPE_MAP
:
379 bt_value_map_foreach_entry_const_status foreach_status
;
381 if (bt_value_map_is_empty(value
)) {
382 print_indent(fp
, indent
);
383 fprintf(fp
, "{ }\n");
387 map_keys
= g_ptr_array_new();
389 BT_CLI_LOGE_APPEND_CAUSE("Failed to allocated on GPtrArray.");
394 * We want to print the map entries in a stable order. Collect
395 * all the map's keys in a GPtrArray, sort it, then print the
396 * entries in that order.
398 foreach_status
= bt_value_map_foreach_entry_const(value
,
399 collect_map_keys
, map_keys
);
400 if (foreach_status
!= BT_VALUE_MAP_FOREACH_ENTRY_CONST_STATUS_OK
) {
401 BT_CLI_LOGE_APPEND_CAUSE("Failed to iterator on map value.");
405 g_ptr_array_sort(map_keys
, g_ptr_array_sort_strings
);
407 for (i
= 0; i
< map_keys
->len
; i
++) {
408 const char *map_key
= g_ptr_array_index(map_keys
, i
);
409 const bt_value
*map_value
;
411 map_value
= bt_value_map_borrow_entry_value_const(value
, map_key
);
412 BT_ASSERT(map_value
);
414 print_map_value(map_key
, map_value
, fp
, indent
);
427 g_ptr_array_free(map_keys
, TRUE
);
432 void print_value(FILE *fp
, const bt_value
*value
, size_t indent
)
434 if (!bt_value_is_array(value
) && !bt_value_is_map(value
)) {
435 print_indent(fp
, indent
);
438 print_value_rec(fp
, value
, indent
);
442 void print_bt_config_component(struct bt_config_component
*bt_config_component
)
446 comp_cls_str
= format_plugin_comp_cls_opt(
447 bt_config_component
->plugin_name
->str
,
448 bt_config_component
->comp_cls_name
->str
,
449 bt_config_component
->type
,
450 BT_COMMON_COLOR_WHEN_AUTO
);
451 BT_ASSERT(comp_cls_str
);
453 fprintf(stderr
, " %s:\n", comp_cls_str
);
455 if (bt_config_component
->instance_name
->len
> 0) {
456 fprintf(stderr
, " Name: %s\n",
457 bt_config_component
->instance_name
->str
);
460 fprintf(stderr
, " Parameters:\n");
461 print_value(stderr
, bt_config_component
->params
, 8);
463 g_free(comp_cls_str
);
467 void print_bt_config_components(GPtrArray
*array
)
471 for (i
= 0; i
< array
->len
; i
++) {
472 struct bt_config_component
*cfg_component
=
473 bt_config_get_component(array
, i
);
474 print_bt_config_component(cfg_component
);
475 BT_OBJECT_PUT_REF_AND_RESET(cfg_component
);
480 void print_plugin_paths(const bt_value
*plugin_paths
)
482 fprintf(stderr
, " Plugin paths:\n");
483 print_value(stderr
, plugin_paths
, 4);
487 void print_cfg_run(struct bt_config
*cfg
)
491 print_plugin_paths(cfg
->plugin_paths
);
492 fprintf(stderr
, " Source component instances:\n");
493 print_bt_config_components(cfg
->cmd_data
.run
.sources
);
495 if (cfg
->cmd_data
.run
.filters
->len
> 0) {
496 fprintf(stderr
, " Filter component instances:\n");
497 print_bt_config_components(cfg
->cmd_data
.run
.filters
);
500 fprintf(stderr
, " Sink component instances:\n");
501 print_bt_config_components(cfg
->cmd_data
.run
.sinks
);
502 fprintf(stderr
, " Connections:\n");
504 for (i
= 0; i
< cfg
->cmd_data
.run
.connections
->len
; i
++) {
505 struct bt_config_connection
*cfg_connection
=
506 g_ptr_array_index(cfg
->cmd_data
.run
.connections
,
509 fprintf(stderr
, " %s%s%s -> %s%s%s\n",
510 cfg_connection
->upstream_comp_name
->str
,
511 cfg_connection
->upstream_port_glob
->len
> 0 ? "." : "",
512 cfg_connection
->upstream_port_glob
->str
,
513 cfg_connection
->downstream_comp_name
->str
,
514 cfg_connection
->downstream_port_glob
->len
> 0 ? "." : "",
515 cfg_connection
->downstream_port_glob
->str
);
520 void print_cfg_list_plugins(struct bt_config
*cfg
)
522 print_plugin_paths(cfg
->plugin_paths
);
526 void print_cfg_help(struct bt_config
*cfg
)
528 print_plugin_paths(cfg
->plugin_paths
);
532 void print_cfg_print_ctf_metadata(struct bt_config
*cfg
)
534 print_plugin_paths(cfg
->plugin_paths
);
535 fprintf(stderr
, " Path: %s\n",
536 cfg
->cmd_data
.print_ctf_metadata
.path
->str
);
540 void print_cfg_print_lttng_live_sessions(struct bt_config
*cfg
)
542 print_plugin_paths(cfg
->plugin_paths
);
543 fprintf(stderr
, " URL: %s\n",
544 cfg
->cmd_data
.print_lttng_live_sessions
.url
->str
);
548 void print_cfg_query(struct bt_config
*cfg
)
550 print_plugin_paths(cfg
->plugin_paths
);
551 fprintf(stderr
, " Object: `%s`\n", cfg
->cmd_data
.query
.object
->str
);
552 fprintf(stderr
, " Component class:\n");
553 print_bt_config_component(cfg
->cmd_data
.query
.cfg_component
);
557 void print_cfg(struct bt_config
*cfg
)
559 if (!BT_LOG_ON_INFO
) {
563 BT_LOGI_STR("CLI configuration:");
565 switch (cfg
->command
) {
566 case BT_CONFIG_COMMAND_RUN
:
569 case BT_CONFIG_COMMAND_LIST_PLUGINS
:
570 print_cfg_list_plugins(cfg
);
572 case BT_CONFIG_COMMAND_HELP
:
575 case BT_CONFIG_COMMAND_QUERY
:
576 print_cfg_query(cfg
);
578 case BT_CONFIG_COMMAND_PRINT_CTF_METADATA
:
579 print_cfg_print_ctf_metadata(cfg
);
581 case BT_CONFIG_COMMAND_PRINT_LTTNG_LIVE_SESSIONS
:
582 print_cfg_print_lttng_live_sessions(cfg
);
590 void print_plugin_info(const bt_plugin
*plugin
)
592 unsigned int major
, minor
, patch
;
594 bt_property_availability version_avail
;
595 const char *plugin_name
;
599 const char *plugin_description
;
601 plugin_name
= bt_plugin_get_name(plugin
);
602 path
= bt_plugin_get_path(plugin
);
603 author
= bt_plugin_get_author(plugin
);
604 license
= bt_plugin_get_license(plugin
);
605 plugin_description
= bt_plugin_get_description(plugin
);
606 version_avail
= bt_plugin_get_version(plugin
, &major
, &minor
,
608 printf("%s%s%s%s:\n", bt_common_color_bold(),
609 bt_common_color_fg_bright_blue(), plugin_name
,
610 bt_common_color_reset());
612 printf(" %sPath%s: %s\n", bt_common_color_bold(),
613 bt_common_color_reset(), path
);
618 if (version_avail
== BT_PROPERTY_AVAILABILITY_AVAILABLE
) {
619 printf(" %sVersion%s: %u.%u.%u",
620 bt_common_color_bold(), bt_common_color_reset(),
621 major
, minor
, patch
);
630 printf(" %sDescription%s: %s\n", bt_common_color_bold(),
631 bt_common_color_reset(),
632 plugin_description
? plugin_description
: "(None)");
633 printf(" %sAuthor%s: %s\n", bt_common_color_bold(),
634 bt_common_color_reset(), author
? author
: "(Unknown)");
635 printf(" %sLicense%s: %s\n", bt_common_color_bold(),
636 bt_common_color_reset(),
637 license
? license
: "(Unknown)");
641 enum bt_cmd_status
cmd_query(struct bt_config
*cfg
)
644 enum bt_cmd_status cmd_status
;
645 const bt_component_class
*comp_cls
= NULL
;
646 const bt_value
*results
= NULL
;
647 const char *fail_reason
= NULL
;
649 comp_cls
= find_component_class(
650 cfg
->cmd_data
.query
.cfg_component
->plugin_name
->str
,
651 cfg
->cmd_data
.query
.cfg_component
->comp_cls_name
->str
,
652 cfg
->cmd_data
.query
.cfg_component
->type
);
654 BT_CLI_LOGE_APPEND_CAUSE(
655 "Cannot find component class: plugin-name=\"%s\", "
656 "comp-cls-name=\"%s\", comp-cls-type=%d",
657 cfg
->cmd_data
.query
.cfg_component
->plugin_name
->str
,
658 cfg
->cmd_data
.query
.cfg_component
->comp_cls_name
->str
,
659 cfg
->cmd_data
.query
.cfg_component
->type
);
663 ret
= query(cfg
, comp_cls
, cfg
->cmd_data
.query
.object
->str
,
664 cfg
->cmd_data
.query
.cfg_component
->params
,
665 &results
, &fail_reason
);
667 BT_CLI_LOGE_APPEND_CAUSE(
668 "Failed to query component class: %s: plugin-name=\"%s\", "
669 "comp-cls-name=\"%s\", comp-cls-type=%d "
670 "object=\"%s\"", fail_reason
,
671 cfg
->cmd_data
.query
.cfg_component
->plugin_name
->str
,
672 cfg
->cmd_data
.query
.cfg_component
->comp_cls_name
->str
,
673 cfg
->cmd_data
.query
.cfg_component
->type
,
674 cfg
->cmd_data
.query
.object
->str
);
678 print_value(stdout
, results
, 0);
679 cmd_status
= BT_CMD_STATUS_OK
;
683 cmd_status
= BT_CMD_STATUS_ERROR
;
686 bt_component_class_put_ref(comp_cls
);
687 bt_value_put_ref(results
);
692 void print_component_class_help(const char *plugin_name
,
693 const bt_component_class
*comp_cls
)
695 const char *comp_class_name
=
696 bt_component_class_get_name(comp_cls
);
697 const char *comp_class_description
=
698 bt_component_class_get_description(comp_cls
);
699 const char *comp_class_help
=
700 bt_component_class_get_help(comp_cls
);
701 bt_component_class_type type
=
702 bt_component_class_get_type(comp_cls
);
705 comp_cls_str
= format_plugin_comp_cls_opt(plugin_name
, comp_class_name
,
706 type
, BT_COMMON_COLOR_WHEN_AUTO
);
707 BT_ASSERT(comp_cls_str
);
709 printf("%s\n", comp_cls_str
);
710 printf(" %sDescription%s: %s\n", bt_common_color_bold(),
711 bt_common_color_reset(),
712 comp_class_description
? comp_class_description
: "(None)");
714 if (comp_class_help
) {
715 printf("\n%s\n", comp_class_help
);
718 g_free(comp_cls_str
);
722 enum bt_cmd_status
cmd_help(struct bt_config
*cfg
)
724 enum bt_cmd_status cmd_status
;
725 const bt_plugin
*plugin
= NULL
;
726 const bt_component_class
*needed_comp_cls
= NULL
;
728 plugin
= find_loaded_plugin(cfg
->cmd_data
.help
.cfg_component
->plugin_name
->str
);
730 BT_CLI_LOGE_APPEND_CAUSE(
731 "Cannot find plugin: plugin-name=\"%s\"",
732 cfg
->cmd_data
.help
.cfg_component
->plugin_name
->str
);
736 print_plugin_info(plugin
);
737 printf(" %sSource component classes%s: %d\n",
738 bt_common_color_bold(),
739 bt_common_color_reset(),
740 (int) bt_plugin_get_source_component_class_count(plugin
));
741 printf(" %sFilter component classes%s: %d\n",
742 bt_common_color_bold(),
743 bt_common_color_reset(),
744 (int) bt_plugin_get_filter_component_class_count(plugin
));
745 printf(" %sSink component classes%s: %d\n",
746 bt_common_color_bold(),
747 bt_common_color_reset(),
748 (int) bt_plugin_get_sink_component_class_count(plugin
));
750 if (strlen(cfg
->cmd_data
.help
.cfg_component
->comp_cls_name
->str
) == 0) {
751 /* Plugin help only */
752 cmd_status
= BT_CMD_STATUS_OK
;
756 needed_comp_cls
= find_component_class(
757 cfg
->cmd_data
.help
.cfg_component
->plugin_name
->str
,
758 cfg
->cmd_data
.help
.cfg_component
->comp_cls_name
->str
,
759 cfg
->cmd_data
.help
.cfg_component
->type
);
760 if (!needed_comp_cls
) {
761 BT_CLI_LOGE_APPEND_CAUSE(
762 "Cannot find component class: plugin-name=\"%s\", "
763 "comp-cls-name=\"%s\", comp-cls-type=%d",
764 cfg
->cmd_data
.help
.cfg_component
->plugin_name
->str
,
765 cfg
->cmd_data
.help
.cfg_component
->comp_cls_name
->str
,
766 cfg
->cmd_data
.help
.cfg_component
->type
);
771 print_component_class_help(
772 cfg
->cmd_data
.help
.cfg_component
->plugin_name
->str
,
774 cmd_status
= BT_CMD_STATUS_OK
;
778 cmd_status
= BT_CMD_STATUS_ERROR
;
781 bt_component_class_put_ref(needed_comp_cls
);
782 bt_plugin_put_ref(plugin
);
786 typedef void *(* plugin_borrow_comp_cls_by_index_func_t
)(const bt_plugin
*,
788 typedef const bt_component_class
*(* spec_comp_cls_borrow_comp_cls_func_t
)(
792 void cmd_list_plugins_print_component_classes(const bt_plugin
*plugin
,
793 const char *cc_type_name
, uint64_t count
,
794 plugin_borrow_comp_cls_by_index_func_t borrow_comp_cls_by_index_func
,
795 spec_comp_cls_borrow_comp_cls_func_t spec_comp_cls_borrow_comp_cls_func
)
798 gchar
*comp_cls_str
= NULL
;
801 printf(" %s%s component classes%s: (none)\n",
802 bt_common_color_bold(),
804 bt_common_color_reset());
807 printf(" %s%s component classes%s:\n",
808 bt_common_color_bold(),
810 bt_common_color_reset());
813 for (i
= 0; i
< count
; i
++) {
814 const bt_component_class
*comp_class
=
815 spec_comp_cls_borrow_comp_cls_func(
816 borrow_comp_cls_by_index_func(plugin
, i
));
817 const char *comp_class_name
=
818 bt_component_class_get_name(comp_class
);
819 const char *comp_class_description
=
820 bt_component_class_get_description(comp_class
);
821 bt_component_class_type type
=
822 bt_component_class_get_type(comp_class
);
824 g_free(comp_cls_str
);
825 comp_cls_str
= format_plugin_comp_cls_opt(
826 bt_plugin_get_name(plugin
), comp_class_name
, type
,
827 BT_COMMON_COLOR_WHEN_AUTO
);
828 printf(" %s", comp_cls_str
);
830 if (comp_class_description
) {
831 printf(": %s", comp_class_description
);
838 g_free(comp_cls_str
);
842 enum bt_cmd_status
cmd_list_plugins(struct bt_config
*cfg
)
844 int plugins_count
, component_classes_count
= 0, i
;
846 printf("From the following plugin paths:\n\n");
847 print_value(stdout
, cfg
->plugin_paths
, 2);
849 plugins_count
= get_loaded_plugins_count();
850 if (plugins_count
== 0) {
851 printf("No plugins found.\n");
855 for (i
= 0; i
< plugins_count
; i
++) {
856 const bt_plugin
*plugin
= borrow_loaded_plugin(i
);
858 component_classes_count
+=
859 bt_plugin_get_source_component_class_count(plugin
) +
860 bt_plugin_get_filter_component_class_count(plugin
) +
861 bt_plugin_get_sink_component_class_count(plugin
);
864 printf("Found %s%d%s component classes in %s%d%s plugins.\n",
865 bt_common_color_bold(),
866 component_classes_count
,
867 bt_common_color_reset(),
868 bt_common_color_bold(),
870 bt_common_color_reset());
872 for (i
= 0; i
< plugins_count
; i
++) {
873 const bt_plugin
*plugin
= borrow_loaded_plugin(i
);
876 print_plugin_info(plugin
);
877 cmd_list_plugins_print_component_classes(plugin
, "Source",
878 bt_plugin_get_source_component_class_count(plugin
),
879 (plugin_borrow_comp_cls_by_index_func_t
)
880 bt_plugin_borrow_source_component_class_by_index_const
,
881 (spec_comp_cls_borrow_comp_cls_func_t
)
882 bt_component_class_source_as_component_class
);
883 cmd_list_plugins_print_component_classes(plugin
, "Filter",
884 bt_plugin_get_filter_component_class_count(plugin
),
885 (plugin_borrow_comp_cls_by_index_func_t
)
886 bt_plugin_borrow_filter_component_class_by_index_const
,
887 (spec_comp_cls_borrow_comp_cls_func_t
)
888 bt_component_class_filter_as_component_class
);
889 cmd_list_plugins_print_component_classes(plugin
, "Sink",
890 bt_plugin_get_sink_component_class_count(plugin
),
891 (plugin_borrow_comp_cls_by_index_func_t
)
892 bt_plugin_borrow_sink_component_class_by_index_const
,
893 (spec_comp_cls_borrow_comp_cls_func_t
)
894 bt_component_class_sink_as_component_class
);
898 return BT_CMD_STATUS_OK
;
902 enum bt_cmd_status
cmd_print_lttng_live_sessions(struct bt_config
*cfg
)
905 enum bt_cmd_status cmd_status
;
906 const bt_component_class
*comp_cls
= NULL
;
907 const bt_value
*results
= NULL
;
908 bt_value
*params
= NULL
;
909 const bt_value
*map
= NULL
;
910 const bt_value
*v
= NULL
;
911 static const char * const plugin_name
= "ctf";
912 static const char * const comp_cls_name
= "lttng-live";
913 static const bt_component_class_type comp_cls_type
=
914 BT_COMPONENT_CLASS_TYPE_SOURCE
;
915 uint64_t array_size
, i
;
916 const char *fail_reason
= NULL
;
917 FILE *out_stream
= stdout
;
919 BT_ASSERT(cfg
->cmd_data
.print_lttng_live_sessions
.url
);
920 comp_cls
= find_component_class(plugin_name
, comp_cls_name
,
923 BT_CLI_LOGE_APPEND_CAUSE(
924 "Cannot find component class: plugin-name=\"%s\", "
925 "comp-cls-name=\"%s\", comp-cls-type=%d",
926 plugin_name
, comp_cls_name
,
927 BT_COMPONENT_CLASS_TYPE_SOURCE
);
931 params
= bt_value_map_create();
936 ret
= bt_value_map_insert_string_entry(params
, "url",
937 cfg
->cmd_data
.print_lttng_live_sessions
.url
->str
);
942 ret
= query(cfg
, comp_cls
, "sessions", params
,
943 &results
, &fail_reason
);
945 BT_CLI_LOGE_APPEND_CAUSE("Failed to query `sessions` object: %s",
952 if (!bt_value_is_array(results
)) {
953 BT_CLI_LOGE_APPEND_CAUSE(
954 "Expecting an array for LTTng live `sessions` query.");
958 if (cfg
->cmd_data
.print_lttng_live_sessions
.output_path
->len
> 0) {
960 fopen(cfg
->cmd_data
.print_lttng_live_sessions
.output_path
->str
,
963 BT_LOGE_ERRNO("Cannot open file for writing",
965 cfg
->cmd_data
.print_lttng_live_sessions
.output_path
->str
);
966 (void) BT_CURRENT_THREAD_ERROR_APPEND_CAUSE_FROM_UNKNOWN(
968 "Cannot open file for writing: path=\"%s\"",
969 cfg
->cmd_data
.print_lttng_live_sessions
.output_path
->str
);
974 array_size
= bt_value_array_get_length(results
);
975 for (i
= 0; i
< array_size
; i
++) {
976 const char *url_text
;
977 int64_t timer_us
, streams
, clients
;
979 map
= bt_value_array_borrow_element_by_index_const(results
, i
);
980 if (!bt_value_is_map(map
)) {
981 BT_CLI_LOGE_APPEND_CAUSE("Unexpected entry type.");
985 v
= bt_value_map_borrow_entry_value_const(map
, "url");
987 BT_CLI_LOGE_APPEND_CAUSE("Missing `url` entry.");
990 url_text
= bt_value_string_get(v
);
991 fprintf(out_stream
, "%s", url_text
);
992 v
= bt_value_map_borrow_entry_value_const(map
, "timer-us");
994 BT_CLI_LOGE_APPEND_CAUSE("Missing `timer-us` entry.");
997 timer_us
= bt_value_integer_unsigned_get(v
);
998 fprintf(out_stream
, " (timer = %" PRIu64
", ", timer_us
);
999 v
= bt_value_map_borrow_entry_value_const(map
, "stream-count");
1001 BT_CLI_LOGE_APPEND_CAUSE(
1002 "Missing `stream-count` entry.");
1005 streams
= bt_value_integer_unsigned_get(v
);
1006 fprintf(out_stream
, "%" PRIu64
" stream(s), ", streams
);
1007 v
= bt_value_map_borrow_entry_value_const(map
, "client-count");
1009 BT_CLI_LOGE_APPEND_CAUSE(
1010 "Missing `client-count` entry.");
1013 clients
= bt_value_integer_unsigned_get(v
);
1014 fprintf(out_stream
, "%" PRIu64
" client(s) connected)\n", clients
);
1017 cmd_status
= BT_CMD_STATUS_OK
;
1021 cmd_status
= BT_CMD_STATUS_ERROR
;
1024 bt_value_put_ref(results
);
1025 bt_value_put_ref(params
);
1026 bt_component_class_put_ref(comp_cls
);
1028 if (out_stream
&& out_stream
!= stdout
) {
1029 int fclose_ret
= fclose(out_stream
);
1032 BT_LOGE_ERRNO("Cannot close file stream",
1034 cfg
->cmd_data
.print_lttng_live_sessions
.output_path
->str
);
1042 enum bt_cmd_status
cmd_print_ctf_metadata(struct bt_config
*cfg
)
1045 enum bt_cmd_status cmd_status
;
1046 const bt_component_class
*comp_cls
= NULL
;
1047 const bt_value
*results
= NULL
;
1048 bt_value
*params
= NULL
;
1049 const bt_value
*metadata_text_value
= NULL
;
1050 const char *metadata_text
= NULL
;
1051 static const char * const plugin_name
= "ctf";
1052 static const char * const comp_cls_name
= "fs";
1053 static const bt_component_class_type comp_cls_type
=
1054 BT_COMPONENT_CLASS_TYPE_SOURCE
;
1055 const char *fail_reason
= NULL
;
1056 FILE *out_stream
= stdout
;
1058 BT_ASSERT(cfg
->cmd_data
.print_ctf_metadata
.path
);
1059 comp_cls
= find_component_class(plugin_name
, comp_cls_name
,
1062 BT_CLI_LOGE_APPEND_CAUSE(
1063 "Cannot find component class: plugin-name=\"%s\", "
1064 "comp-cls-name=\"%s\", comp-cls-type=%d",
1065 plugin_name
, comp_cls_name
,
1066 BT_COMPONENT_CLASS_TYPE_SOURCE
);
1070 params
= bt_value_map_create();
1075 ret
= bt_value_map_insert_string_entry(params
, "path",
1076 cfg
->cmd_data
.print_ctf_metadata
.path
->str
);
1081 ret
= query(cfg
, comp_cls
, "metadata-info",
1082 params
, &results
, &fail_reason
);
1084 BT_CLI_LOGE_APPEND_CAUSE(
1085 "Failed to query `metadata-info` object: %s", fail_reason
);
1089 metadata_text_value
= bt_value_map_borrow_entry_value_const(results
,
1091 if (!metadata_text_value
) {
1092 BT_CLI_LOGE_APPEND_CAUSE(
1093 "Cannot find `text` string value in the resulting metadata info object.");
1097 metadata_text
= bt_value_string_get(metadata_text_value
);
1099 if (cfg
->cmd_data
.print_ctf_metadata
.output_path
->len
> 0) {
1101 fopen(cfg
->cmd_data
.print_ctf_metadata
.output_path
->str
,
1104 BT_LOGE_ERRNO("Cannot open file for writing",
1106 cfg
->cmd_data
.print_ctf_metadata
.output_path
->str
);
1107 (void) BT_CURRENT_THREAD_ERROR_APPEND_CAUSE_FROM_UNKNOWN(
1109 "Cannot open file for writing: path=\"%s\"",
1110 cfg
->cmd_data
.print_ctf_metadata
.output_path
->str
);
1115 ret
= fprintf(out_stream
, "%s\n", metadata_text
);
1117 BT_CLI_LOGE_APPEND_CAUSE(
1118 "Cannot write whole metadata text to output stream: "
1123 cmd_status
= BT_CMD_STATUS_OK
;
1127 cmd_status
= BT_CMD_STATUS_ERROR
;
1130 bt_value_put_ref(results
);
1131 bt_value_put_ref(params
);
1132 bt_component_class_put_ref(comp_cls
);
1134 if (out_stream
&& out_stream
!= stdout
) {
1135 int fclose_ret
= fclose(out_stream
);
1138 BT_LOGE_ERRNO("Cannot close file stream",
1140 cfg
->cmd_data
.print_ctf_metadata
.output_path
->str
);
1148 char *instance_name
;
1152 struct trace_range
{
1153 uint64_t intersection_range_begin_ns
;
1154 uint64_t intersection_range_end_ns
;
1158 guint
port_id_hash(gconstpointer v
)
1160 const struct port_id
*id
= v
;
1162 BT_ASSERT(id
->instance_name
);
1163 BT_ASSERT(id
->port_name
);
1165 return g_str_hash(id
->instance_name
) ^ g_str_hash(id
->port_name
);
1169 gboolean
port_id_equal(gconstpointer v1
, gconstpointer v2
)
1171 const struct port_id
*id1
= v1
;
1172 const struct port_id
*id2
= v2
;
1174 return strcmp(id1
->instance_name
, id2
->instance_name
) == 0 &&
1175 strcmp(id1
->port_name
, id2
->port_name
) == 0;
1179 void port_id_destroy(gpointer data
)
1181 struct port_id
*id
= data
;
1183 free(id
->instance_name
);
1184 free(id
->port_name
);
1189 void trace_range_destroy(gpointer data
)
1194 struct cmd_run_ctx
{
1196 GHashTable
*src_components
;
1199 GHashTable
*flt_components
;
1202 GHashTable
*sink_components
;
1208 struct bt_config
*cfg
;
1212 bool stream_intersection_mode
;
1215 * Association of struct port_id -> struct trace_range.
1217 GHashTable
*intersections
;
1220 /* Returns a timestamp of the form "(-)s.ns" */
1222 char *s_from_ns(int64_t ns
)
1227 int64_t ts_sec_abs
, ts_nsec_abs
;
1228 int64_t ts_sec
= ns
/ NSEC_PER_SEC
;
1229 int64_t ts_nsec
= ns
% NSEC_PER_SEC
;
1231 if (ts_sec
>= 0 && ts_nsec
>= 0) {
1232 is_negative
= false;
1233 ts_sec_abs
= ts_sec
;
1234 ts_nsec_abs
= ts_nsec
;
1235 } else if (ts_sec
> 0 && ts_nsec
< 0) {
1236 is_negative
= false;
1237 ts_sec_abs
= ts_sec
- 1;
1238 ts_nsec_abs
= NSEC_PER_SEC
+ ts_nsec
;
1239 } else if (ts_sec
== 0 && ts_nsec
< 0) {
1241 ts_sec_abs
= ts_sec
;
1242 ts_nsec_abs
= -ts_nsec
;
1243 } else if (ts_sec
< 0 && ts_nsec
> 0) {
1245 ts_sec_abs
= -(ts_sec
+ 1);
1246 ts_nsec_abs
= NSEC_PER_SEC
- ts_nsec
;
1247 } else if (ts_sec
< 0 && ts_nsec
== 0) {
1249 ts_sec_abs
= -ts_sec
;
1250 ts_nsec_abs
= ts_nsec
;
1251 } else { /* (ts_sec < 0 && ts_nsec < 0) */
1253 ts_sec_abs
= -ts_sec
;
1254 ts_nsec_abs
= -ts_nsec
;
1257 ret
= asprintf(&s_ret
, "%s%" PRId64
".%09" PRId64
,
1258 is_negative
? "-" : "", ts_sec_abs
, ts_nsec_abs
);
1266 int cmd_run_ctx_connect_upstream_port_to_downstream_component(
1267 struct cmd_run_ctx
*ctx
,
1268 const bt_component
*upstream_comp
,
1269 const bt_port_output
*out_upstream_port
,
1270 struct bt_config_connection
*cfg_conn
)
1272 typedef uint64_t (*input_port_count_func_t
)(void *);
1273 typedef const bt_port_input
*(*borrow_input_port_by_index_func_t
)(
1274 const void *, uint64_t);
1275 const bt_port
*upstream_port
=
1276 bt_port_output_as_port_const(out_upstream_port
);
1279 GQuark downstreamp_comp_name_quark
;
1280 void *downstream_comp
;
1281 uint64_t downstream_port_count
;
1283 input_port_count_func_t port_count_fn
;
1284 borrow_input_port_by_index_func_t port_by_index_fn
;
1285 bt_graph_connect_ports_status connect_ports_status
=
1286 BT_GRAPH_CONNECT_PORTS_STATUS_OK
;
1287 bool insert_trimmer
= false;
1288 bt_value
*trimmer_params
= NULL
;
1289 char *intersection_begin
= NULL
;
1290 char *intersection_end
= NULL
;
1291 const bt_component_filter
*trimmer
= NULL
;
1292 const bt_component_class_filter
*trimmer_class
= NULL
;
1293 const bt_port_input
*trimmer_input
= NULL
;
1294 const bt_port_output
*trimmer_output
= NULL
;
1296 if (ctx
->intersections
&&
1297 bt_component_get_class_type(upstream_comp
) ==
1298 BT_COMPONENT_CLASS_TYPE_SOURCE
) {
1299 struct trace_range
*range
;
1300 struct port_id port_id
= {
1301 .instance_name
= (char *) bt_component_get_name(upstream_comp
),
1302 .port_name
= (char *) bt_port_get_name(upstream_port
)
1305 if (!port_id
.instance_name
|| !port_id
.port_name
) {
1309 range
= (struct trace_range
*) g_hash_table_lookup(
1310 ctx
->intersections
, &port_id
);
1312 bt_value_map_insert_entry_status insert_status
;
1314 intersection_begin
= s_from_ns(
1315 range
->intersection_range_begin_ns
);
1316 intersection_end
= s_from_ns(
1317 range
->intersection_range_end_ns
);
1318 if (!intersection_begin
|| !intersection_end
) {
1319 BT_CLI_LOGE_APPEND_CAUSE(
1320 "Cannot create trimmer argument timestamp string.");
1324 insert_trimmer
= true;
1325 trimmer_params
= bt_value_map_create();
1326 if (!trimmer_params
) {
1330 insert_status
= bt_value_map_insert_string_entry(
1331 trimmer_params
, "begin", intersection_begin
);
1332 if (insert_status
< 0) {
1335 insert_status
= bt_value_map_insert_string_entry(
1337 "end", intersection_end
);
1338 if (insert_status
< 0) {
1343 trimmer_class
= find_filter_component_class("utils", "trimmer");
1344 if (!trimmer_class
) {
1349 BT_LOGI("Connecting upstream port to the next available downstream port: "
1350 "upstream-port-addr=%p, upstream-port-name=\"%s\", "
1351 "downstream-comp-name=\"%s\", conn-arg=\"%s\"",
1352 upstream_port
, bt_port_get_name(upstream_port
),
1353 cfg_conn
->downstream_comp_name
->str
,
1354 cfg_conn
->arg
->str
);
1355 downstreamp_comp_name_quark
= g_quark_from_string(
1356 cfg_conn
->downstream_comp_name
->str
);
1357 BT_ASSERT(downstreamp_comp_name_quark
> 0);
1358 downstream_comp
= g_hash_table_lookup(ctx
->flt_components
,
1359 GUINT_TO_POINTER(downstreamp_comp_name_quark
));
1360 port_count_fn
= (input_port_count_func_t
)
1361 bt_component_filter_get_input_port_count
;
1362 port_by_index_fn
= (borrow_input_port_by_index_func_t
)
1363 bt_component_filter_borrow_input_port_by_index_const
;
1365 if (!downstream_comp
) {
1366 downstream_comp
= g_hash_table_lookup(ctx
->sink_components
,
1367 GUINT_TO_POINTER(downstreamp_comp_name_quark
));
1368 port_count_fn
= (input_port_count_func_t
)
1369 bt_component_sink_get_input_port_count
;
1370 port_by_index_fn
= (borrow_input_port_by_index_func_t
)
1371 bt_component_sink_borrow_input_port_by_index_const
;
1374 if (!downstream_comp
) {
1375 BT_CLI_LOGE_APPEND_CAUSE("Cannot find downstream component: "
1376 "comp-name=\"%s\", conn-arg=\"%s\"",
1377 cfg_conn
->downstream_comp_name
->str
,
1378 cfg_conn
->arg
->str
);
1382 downstream_port_count
= port_count_fn(downstream_comp
);
1384 for (i
= 0; i
< downstream_port_count
; i
++) {
1385 const bt_port_input
*in_downstream_port
=
1386 port_by_index_fn(downstream_comp
, i
);
1387 const bt_port
*downstream_port
=
1388 bt_port_input_as_port_const(in_downstream_port
);
1389 const char *upstream_port_name
;
1390 const char *downstream_port_name
;
1392 BT_ASSERT(downstream_port
);
1394 /* Skip port if it's already connected. */
1395 if (bt_port_is_connected(downstream_port
)) {
1396 BT_LOGI("Skipping downstream port: already connected: "
1397 "port-addr=%p, port-name=\"%s\"",
1399 bt_port_get_name(downstream_port
));
1403 downstream_port_name
= bt_port_get_name(downstream_port
);
1404 BT_ASSERT(downstream_port_name
);
1405 upstream_port_name
= bt_port_get_name(upstream_port
);
1406 BT_ASSERT(upstream_port_name
);
1408 if (!bt_common_star_glob_match(
1409 cfg_conn
->downstream_port_glob
->str
, SIZE_MAX
,
1410 downstream_port_name
, SIZE_MAX
)) {
1414 if (insert_trimmer
) {
1416 * In order to insert the trimmer between the
1417 * two components that were being connected, we
1418 * create a connection configuration entry which
1419 * describes a connection from the trimmer's
1420 * output to the original input that was being
1423 * Hence, the creation of the trimmer will cause
1424 * the graph "new port" listener to establish
1425 * all downstream connections as its output port
1426 * is connected. We will then establish the
1427 * connection between the original upstream
1428 * source and the trimmer.
1430 char *trimmer_name
= NULL
;
1431 bt_graph_add_component_status add_comp_status
;
1433 ret
= asprintf(&trimmer_name
,
1434 "stream-intersection-trimmer-%s",
1435 upstream_port_name
);
1441 ctx
->connect_ports
= false;
1442 add_comp_status
= bt_graph_add_filter_component(
1443 ctx
->graph
, trimmer_class
, trimmer_name
,
1444 trimmer_params
, ctx
->cfg
->log_level
,
1447 if (add_comp_status
!=
1448 BT_GRAPH_ADD_COMPONENT_STATUS_OK
) {
1454 bt_component_filter_borrow_input_port_by_index_const(
1456 if (!trimmer_input
) {
1460 bt_component_filter_borrow_output_port_by_index_const(
1462 if (!trimmer_output
) {
1467 * Replace the current downstream port by the trimmer's
1470 in_downstream_port
= trimmer_input
;
1472 bt_port_input_as_port_const(in_downstream_port
);
1473 downstream_port_name
= bt_port_get_name(
1475 BT_ASSERT(downstream_port_name
);
1478 /* We have a winner! */
1479 connect_ports_status
= bt_graph_connect_ports(ctx
->graph
,
1480 out_upstream_port
, in_downstream_port
, NULL
);
1481 downstream_port
= NULL
;
1482 switch (connect_ports_status
) {
1483 case BT_GRAPH_CONNECT_PORTS_STATUS_OK
:
1486 BT_CLI_LOGE_APPEND_CAUSE(
1487 "Cannot create connection: graph refuses to connect ports: "
1488 "upstream-comp-addr=%p, upstream-comp-name=\"%s\", "
1489 "upstream-port-addr=%p, upstream-port-name=\"%s\", "
1490 "downstream-comp-addr=%p, downstream-comp-name=\"%s\", "
1491 "downstream-port-addr=%p, downstream-port-name=\"%s\", "
1493 upstream_comp
, bt_component_get_name(upstream_comp
),
1494 upstream_port
, bt_port_get_name(upstream_port
),
1495 downstream_comp
, cfg_conn
->downstream_comp_name
->str
,
1496 downstream_port
, downstream_port_name
,
1497 cfg_conn
->arg
->str
);
1501 BT_LOGI("Connected component ports: "
1502 "upstream-comp-addr=%p, upstream-comp-name=\"%s\", "
1503 "upstream-port-addr=%p, upstream-port-name=\"%s\", "
1504 "downstream-comp-addr=%p, downstream-comp-name=\"%s\", "
1505 "downstream-port-addr=%p, downstream-port-name=\"%s\", "
1507 upstream_comp
, bt_component_get_name(upstream_comp
),
1508 upstream_port
, bt_port_get_name(upstream_port
),
1509 downstream_comp
, cfg_conn
->downstream_comp_name
->str
,
1510 downstream_port
, downstream_port_name
,
1511 cfg_conn
->arg
->str
);
1513 if (insert_trimmer
) {
1515 * The first connection, from the source to the trimmer,
1516 * has been done. We now connect the trimmer to the
1517 * original downstream port.
1519 ret
= cmd_run_ctx_connect_upstream_port_to_downstream_component(
1521 bt_component_filter_as_component_const(trimmer
),
1522 trimmer_output
, cfg_conn
);
1526 ctx
->connect_ports
= true;
1530 * We found a matching downstream port: the search is
1536 /* No downstream port found */
1537 BT_CLI_LOGE_APPEND_CAUSE(
1538 "Cannot create connection: cannot find a matching downstream port for upstream port: "
1539 "upstream-port-addr=%p, upstream-port-name=\"%s\", "
1540 "downstream-comp-name=\"%s\", conn-arg=\"%s\"",
1541 upstream_port
, bt_port_get_name(upstream_port
),
1542 cfg_conn
->downstream_comp_name
->str
,
1543 cfg_conn
->arg
->str
);
1549 free(intersection_begin
);
1550 free(intersection_end
);
1551 BT_VALUE_PUT_REF_AND_RESET(trimmer_params
);
1552 BT_COMPONENT_CLASS_FILTER_PUT_REF_AND_RESET(trimmer_class
);
1553 BT_COMPONENT_FILTER_PUT_REF_AND_RESET(trimmer
);
1558 int cmd_run_ctx_connect_upstream_port(struct cmd_run_ctx
*ctx
,
1559 const bt_port_output
*upstream_port
)
1562 const char *upstream_port_name
;
1563 const char *upstream_comp_name
;
1564 const bt_component
*upstream_comp
= NULL
;
1568 BT_ASSERT(upstream_port
);
1569 upstream_port_name
= bt_port_get_name(
1570 bt_port_output_as_port_const(upstream_port
));
1571 BT_ASSERT(upstream_port_name
);
1572 upstream_comp
= bt_port_borrow_component_const(
1573 bt_port_output_as_port_const(upstream_port
));
1574 BT_ASSERT(upstream_comp
);
1575 upstream_comp_name
= bt_component_get_name(upstream_comp
);
1576 BT_ASSERT(upstream_comp_name
);
1577 BT_LOGI("Connecting upstream port: comp-addr=%p, comp-name=\"%s\", "
1578 "port-addr=%p, port-name=\"%s\"",
1579 upstream_comp
, upstream_comp_name
,
1580 upstream_port
, upstream_port_name
);
1582 for (i
= 0; i
< ctx
->cfg
->cmd_data
.run
.connections
->len
; i
++) {
1583 struct bt_config_connection
*cfg_conn
=
1585 ctx
->cfg
->cmd_data
.run
.connections
, i
);
1587 if (strcmp(cfg_conn
->upstream_comp_name
->str
,
1588 upstream_comp_name
)) {
1592 if (!bt_common_star_glob_match(
1593 cfg_conn
->upstream_port_glob
->str
,
1594 SIZE_MAX
, upstream_port_name
, SIZE_MAX
)) {
1598 ret
= cmd_run_ctx_connect_upstream_port_to_downstream_component(
1599 ctx
, upstream_comp
, upstream_port
, cfg_conn
);
1601 BT_CLI_LOGE_APPEND_CAUSE(
1602 "Cannot connect upstream port: "
1603 "port-addr=%p, port-name=\"%s\"",
1605 upstream_port_name
);
1611 BT_CLI_LOGE_APPEND_CAUSE(
1612 "Cannot connect upstream port: port does not match any connection argument: "
1613 "port-addr=%p, port-name=\"%s\"", upstream_port
,
1614 upstream_port_name
);
1624 bt_graph_listener_func_status
1625 graph_output_port_added_listener(struct cmd_run_ctx
*ctx
,
1626 const bt_port_output
*out_port
)
1628 const bt_component
*comp
;
1629 const bt_port
*port
= bt_port_output_as_port_const(out_port
);
1630 bt_graph_listener_func_status ret
=
1631 BT_GRAPH_LISTENER_FUNC_STATUS_OK
;
1633 comp
= bt_port_borrow_component_const(port
);
1634 BT_LOGI("Port added to a graph's component: comp-addr=%p, "
1635 "comp-name=\"%s\", port-addr=%p, port-name=\"%s\"",
1636 comp
, comp
? bt_component_get_name(comp
) : "",
1637 port
, bt_port_get_name(port
));
1639 if (!ctx
->connect_ports
) {
1645 if (bt_port_is_connected(port
)) {
1646 BT_LOGW_STR("Port is already connected.");
1650 if (cmd_run_ctx_connect_upstream_port(ctx
, out_port
)) {
1651 BT_CLI_LOGE_APPEND_CAUSE("Cannot connect upstream port.");
1652 ret
= BT_GRAPH_LISTENER_FUNC_STATUS_ERROR
;
1661 bt_graph_listener_func_status
graph_source_output_port_added_listener(
1662 const bt_component_source
*component
,
1663 const bt_port_output
*port
, void *data
)
1665 return graph_output_port_added_listener(data
, port
);
1669 bt_graph_listener_func_status
graph_filter_output_port_added_listener(
1670 const bt_component_filter
*component
,
1671 const bt_port_output
*port
, void *data
)
1673 return graph_output_port_added_listener(data
, port
);
1677 void cmd_run_ctx_destroy(struct cmd_run_ctx
*ctx
)
1683 if (ctx
->src_components
) {
1684 g_hash_table_destroy(ctx
->src_components
);
1685 ctx
->src_components
= NULL
;
1688 if (ctx
->flt_components
) {
1689 g_hash_table_destroy(ctx
->flt_components
);
1690 ctx
->flt_components
= NULL
;
1693 if (ctx
->sink_components
) {
1694 g_hash_table_destroy(ctx
->sink_components
);
1695 ctx
->sink_components
= NULL
;
1698 if (ctx
->intersections
) {
1699 g_hash_table_destroy(ctx
->intersections
);
1700 ctx
->intersections
= NULL
;
1703 BT_GRAPH_PUT_REF_AND_RESET(ctx
->graph
);
1708 int add_descriptor_to_component_descriptor_set(
1709 bt_component_descriptor_set
*comp_descr_set
,
1710 const char *plugin_name
, const char *comp_cls_name
,
1711 bt_component_class_type comp_cls_type
,
1712 const bt_value
*params
)
1714 const bt_component_class
*comp_cls
;
1717 comp_cls
= find_component_class(plugin_name
, comp_cls_name
,
1720 BT_CLI_LOGE_APPEND_CAUSE(
1721 "Cannot find component class: plugin-name=\"%s\", "
1722 "comp-cls-name=\"%s\", comp-cls-type=%d",
1723 plugin_name
, comp_cls_name
, comp_cls_type
);
1728 status
= bt_component_descriptor_set_add_descriptor(
1729 comp_descr_set
, comp_cls
, params
);
1730 if (status
!= BT_COMPONENT_DESCRIPTOR_SET_ADD_DESCRIPTOR_STATUS_OK
) {
1731 BT_CLI_LOGE_APPEND_CAUSE(
1732 "Cannot append descriptor to component descriptor set: "
1733 "status=%s", bt_common_func_status_string(status
));
1738 bt_component_class_put_ref(comp_cls
);
1743 int append_descriptors_from_bt_config_component_array(
1744 bt_component_descriptor_set
*comp_descr_set
,
1745 GPtrArray
*component_configs
)
1750 for (i
= 0; i
< component_configs
->len
; i
++) {
1751 struct bt_config_component
*cfg_comp
=
1752 component_configs
->pdata
[i
];
1754 ret
= add_descriptor_to_component_descriptor_set(
1756 cfg_comp
->plugin_name
->str
,
1757 cfg_comp
->comp_cls_name
->str
,
1758 cfg_comp
->type
, cfg_comp
->params
);
1769 bt_get_greatest_operative_mip_version_status
get_greatest_operative_mip_version(
1770 struct bt_config
*cfg
, uint64_t *mip_version
)
1772 bt_get_greatest_operative_mip_version_status status
=
1773 BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_OK
;
1774 bt_component_descriptor_set
*comp_descr_set
= NULL
;
1778 BT_ASSERT(mip_version
);
1779 comp_descr_set
= bt_component_descriptor_set_create();
1780 if (!comp_descr_set
) {
1781 BT_CLI_LOGE_APPEND_CAUSE(
1782 "Failed to create a component descriptor set object.");
1783 status
= BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_MEMORY_ERROR
;
1787 ret
= append_descriptors_from_bt_config_component_array(
1788 comp_descr_set
, cfg
->cmd_data
.run
.sources
);
1790 status
= BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_ERROR
;
1794 ret
= append_descriptors_from_bt_config_component_array(
1795 comp_descr_set
, cfg
->cmd_data
.run
.filters
);
1797 status
= BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_ERROR
;
1801 ret
= append_descriptors_from_bt_config_component_array(
1802 comp_descr_set
, cfg
->cmd_data
.run
.sinks
);
1804 status
= BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_ERROR
;
1808 if (cfg
->cmd_data
.run
.stream_intersection_mode
) {
1810 * Stream intersection mode adds `flt.utils.trimmer`
1811 * components; we need to include this type of component
1812 * in the component descriptor set to get the real
1813 * greatest operative MIP version.
1815 ret
= add_descriptor_to_component_descriptor_set(
1816 comp_descr_set
, "utils", "trimmer",
1817 BT_COMPONENT_CLASS_TYPE_FILTER
, NULL
);
1819 status
= BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_ERROR
;
1824 status
= bt_get_greatest_operative_mip_version(comp_descr_set
,
1825 bt_cli_log_level
, mip_version
);
1828 bt_component_descriptor_set_put_ref(comp_descr_set
);
1833 int cmd_run_ctx_init(struct cmd_run_ctx
*ctx
, struct bt_config
*cfg
)
1836 bt_graph_add_listener_status add_listener_status
;
1837 bt_get_greatest_operative_mip_version_status mip_version_status
;
1838 uint64_t mip_version
= UINT64_C(-1);
1841 ctx
->connect_ports
= false;
1842 ctx
->src_components
= g_hash_table_new_full(g_direct_hash
,
1843 g_direct_equal
, NULL
, (GDestroyNotify
) bt_object_put_ref
);
1844 if (!ctx
->src_components
) {
1848 ctx
->flt_components
= g_hash_table_new_full(g_direct_hash
,
1849 g_direct_equal
, NULL
, (GDestroyNotify
) bt_object_put_ref
);
1850 if (!ctx
->flt_components
) {
1854 ctx
->sink_components
= g_hash_table_new_full(g_direct_hash
,
1855 g_direct_equal
, NULL
, (GDestroyNotify
) bt_object_put_ref
);
1856 if (!ctx
->sink_components
) {
1860 if (cfg
->cmd_data
.run
.stream_intersection_mode
) {
1861 ctx
->stream_intersection_mode
= true;
1862 ctx
->intersections
= g_hash_table_new_full(port_id_hash
,
1863 port_id_equal
, port_id_destroy
, trace_range_destroy
);
1864 if (!ctx
->intersections
) {
1870 * Get the greatest operative MIP version to use to configure
1871 * the graph to create.
1873 mip_version_status
= get_greatest_operative_mip_version(
1875 if (mip_version_status
== BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_NO_MATCH
) {
1876 BT_CLI_LOGE_APPEND_CAUSE(
1877 "Failed to find an operative message interchange "
1878 "protocol version to use to create the `run` command's "
1879 "graph (components are not interoperable).");
1881 } else if (mip_version_status
< 0) {
1882 BT_CLI_LOGE_APPEND_CAUSE(
1883 "Cannot find an operative message interchange "
1884 "protocol version to use to create the `run` command's "
1886 bt_common_func_status_string(mip_version_status
));
1890 BT_ASSERT(mip_version_status
== BT_GET_GREATEST_OPERATIVE_MIP_VERSION_STATUS_OK
);
1891 BT_LOGI("Found operative message interchange protocol version to "
1892 "configure the `run` command's graph: mip-version=%" PRIu64
,
1894 ctx
->graph
= bt_graph_create(mip_version
);
1899 bt_graph_add_interrupter(ctx
->graph
, the_interrupter
);
1900 add_listener_status
= bt_graph_add_source_component_output_port_added_listener(
1901 ctx
->graph
, graph_source_output_port_added_listener
, NULL
, ctx
,
1903 if (add_listener_status
!= BT_GRAPH_ADD_LISTENER_STATUS_OK
) {
1904 BT_CLI_LOGE_APPEND_CAUSE(
1905 "Cannot add \"port added\" listener to graph.");
1909 add_listener_status
= bt_graph_add_filter_component_output_port_added_listener(
1910 ctx
->graph
, graph_filter_output_port_added_listener
, NULL
, ctx
,
1912 if (add_listener_status
!= BT_GRAPH_ADD_LISTENER_STATUS_OK
) {
1913 BT_CLI_LOGE_APPEND_CAUSE(
1914 "Cannot add \"port added\" listener to graph.");
1921 cmd_run_ctx_destroy(ctx
);
1929 * Compute the intersection of all streams in the array `streams`, write it
1934 int compute_stream_intersection(const bt_value
*streams
,
1935 struct trace_range
*range
)
1937 uint64_t i
, stream_count
;
1940 BT_ASSERT(bt_value_get_type(streams
) == BT_VALUE_TYPE_ARRAY
);
1942 stream_count
= bt_value_array_get_length(streams
);
1944 BT_ASSERT(stream_count
> 0);
1946 range
->intersection_range_begin_ns
= 0;
1947 range
->intersection_range_end_ns
= UINT64_MAX
;
1949 for (i
= 0; i
< stream_count
; i
++) {
1950 int64_t begin_ns
, end_ns
;
1951 uint64_t begin_ns_u
, end_ns_u
;
1952 const bt_value
*stream_value
;
1953 const bt_value
*range_ns_value
;
1954 const bt_value
*begin_value
;
1955 const bt_value
*end_value
;
1957 stream_value
= bt_value_array_borrow_element_by_index_const(streams
, i
);
1958 if (bt_value_get_type(stream_value
) != BT_VALUE_TYPE_MAP
) {
1959 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
1960 "expected streams array element to be a map, got %s.",
1961 bt_common_value_type_string(bt_value_get_type(stream_value
)));
1965 range_ns_value
= bt_value_map_borrow_entry_value_const(
1966 stream_value
, "range-ns");
1967 if (!range_ns_value
) {
1968 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
1969 "missing expected `range-ns` key in stream map.");
1973 if (bt_value_get_type(range_ns_value
) != BT_VALUE_TYPE_MAP
) {
1974 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
1975 "expected `range-ns` entry value of stream map to be a map, got %s.",
1976 bt_common_value_type_string(bt_value_get_type(range_ns_value
)));
1980 begin_value
= bt_value_map_borrow_entry_value_const(range_ns_value
, "begin");
1982 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
1983 "missing expected `begin` key in range-ns map.");
1987 if (bt_value_get_type(begin_value
) != BT_VALUE_TYPE_SIGNED_INTEGER
) {
1988 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
1989 "expected `begin` entry value of range-ns map to be a signed integer, got %s.",
1990 bt_common_value_type_string(bt_value_get_type(range_ns_value
)));
1994 end_value
= bt_value_map_borrow_entry_value_const(range_ns_value
, "end");
1996 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
1997 "missing expected `end` key in range-ns map.");
2001 if (bt_value_get_type(end_value
) != BT_VALUE_TYPE_SIGNED_INTEGER
) {
2002 BT_CLI_LOGE_APPEND_CAUSE("Unexpected format of `babeltrace.trace-infos` query result: "
2003 "expected `end` entry value of range-ns map to be a signed integer, got %s.",
2004 bt_common_value_type_string(bt_value_get_type(range_ns_value
)));
2008 begin_ns
= bt_value_integer_signed_get(begin_value
);
2009 end_ns
= bt_value_integer_signed_get(end_value
);
2011 if (begin_ns
< 0 || end_ns
< 0 || end_ns
< begin_ns
) {
2012 BT_CLI_LOGE_APPEND_CAUSE(
2013 "Invalid stream range values: "
2014 "range-ns:begin=%" PRId64
", "
2015 "range-ns:end=%" PRId64
,
2020 begin_ns_u
= begin_ns
;
2023 range
->intersection_range_begin_ns
=
2024 MAX(range
->intersection_range_begin_ns
, begin_ns_u
);
2025 range
->intersection_range_end_ns
=
2026 MIN(range
->intersection_range_end_ns
, end_ns_u
);
2039 int set_stream_intersections(struct cmd_run_ctx
*ctx
,
2040 struct bt_config_component
*cfg_comp
,
2041 const bt_component_class_source
*src_comp_cls
)
2045 uint64_t trace_count
;
2046 const bt_value
*query_result
= NULL
;
2047 const bt_value
*trace_info
= NULL
;
2048 const bt_value
*stream_infos
= NULL
;
2049 const bt_value
*stream_info
= NULL
;
2050 struct port_id
*port_id
= NULL
;
2051 struct trace_range
*stream_intersection
= NULL
;
2052 const char *fail_reason
= NULL
;
2053 const bt_component_class
*comp_cls
=
2054 bt_component_class_source_as_component_class_const(src_comp_cls
);
2056 ret
= query(ctx
->cfg
, comp_cls
, "babeltrace.trace-infos",
2057 cfg_comp
->params
, &query_result
,
2060 BT_CLI_LOGE_APPEND_CAUSE("Failed to execute `babeltrace.trace-infos` query: %s: "
2061 "comp-class-name=\"%s\"", fail_reason
,
2062 bt_component_class_get_name(comp_cls
));
2067 BT_ASSERT(query_result
);
2069 if (!bt_value_is_array(query_result
)) {
2070 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: expecting result to be an array: "
2071 "component-class-name=%s, actual-type=%s",
2072 bt_component_class_get_name(comp_cls
),
2073 bt_common_value_type_string(bt_value_get_type(query_result
)));
2078 trace_count
= bt_value_array_get_length(query_result
);
2079 if (trace_count
== 0) {
2080 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: result is empty: "
2081 "component-class-name=%s", bt_component_class_get_name(comp_cls
));
2086 for (trace_idx
= 0; trace_idx
< trace_count
; trace_idx
++) {
2087 uint64_t stream_idx
;
2088 int64_t stream_count
;
2089 struct trace_range trace_intersection
;
2091 trace_info
= bt_value_array_borrow_element_by_index_const(
2092 query_result
, trace_idx
);
2093 if (!bt_value_is_map(trace_info
)) {
2095 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: expecting element to be a map: "
2096 "component-class-name=%s, actual-type=%s",
2097 bt_component_class_get_name(comp_cls
),
2098 bt_common_value_type_string(bt_value_get_type(trace_info
)));
2102 stream_infos
= bt_value_map_borrow_entry_value_const(
2103 trace_info
, "stream-infos");
2104 if (!stream_infos
) {
2106 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: missing `streams` key in trace info map: "
2107 "component-class-name=%s",
2108 bt_component_class_get_name(comp_cls
));
2112 if (!bt_value_is_array(stream_infos
)) {
2114 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: expecting `streams` entry of trace info map to be an array: "
2115 "component-class-name=%s, actual-type=%s",
2116 bt_component_class_get_name(comp_cls
),
2117 bt_common_value_type_string(bt_value_get_type(stream_infos
)));
2121 stream_count
= bt_value_array_get_length(stream_infos
);
2122 if (stream_count
== 0) {
2124 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: list of streams is empty: "
2125 "component-class-name=%s",
2126 bt_component_class_get_name(comp_cls
));
2130 ret
= compute_stream_intersection(stream_infos
, &trace_intersection
);
2132 BT_CLI_LOGE_APPEND_CAUSE("Failed to compute trace streams intersection.");
2136 for (stream_idx
= 0; stream_idx
< stream_count
; stream_idx
++) {
2137 const bt_value
*port_name
;
2139 port_id
= g_new0(struct port_id
, 1);
2142 BT_CLI_LOGE_APPEND_CAUSE(
2143 "Cannot allocate memory for port_id structure.");
2146 port_id
->instance_name
= strdup(cfg_comp
->instance_name
->str
);
2147 if (!port_id
->instance_name
) {
2149 BT_CLI_LOGE_APPEND_CAUSE(
2150 "Cannot allocate memory for port_id component instance name.");
2154 stream_intersection
= g_new0(struct trace_range
, 1);
2155 if (!stream_intersection
) {
2157 BT_CLI_LOGE_APPEND_CAUSE(
2158 "Cannot allocate memory for trace_range structure.");
2162 *stream_intersection
= trace_intersection
;
2164 stream_info
= bt_value_array_borrow_element_by_index_const(
2165 stream_infos
, stream_idx
);
2166 if (!bt_value_is_map(stream_info
)) {
2168 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: "
2169 "expecting element of stream list to be a map: "
2170 "component-class-name=%s, actual-type=%s",
2171 bt_component_class_get_name(comp_cls
),
2172 bt_common_value_type_string(bt_value_get_type(stream_info
)));
2176 port_name
= bt_value_map_borrow_entry_value_const(stream_info
, "port-name");
2179 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: "
2180 "missing `port-name` key in stream info map: "
2181 "component-class-name=%s",
2182 bt_component_class_get_name(comp_cls
));
2186 if (!bt_value_is_string(port_name
)) {
2188 BT_CLI_LOGE_APPEND_CAUSE("`babeltrace.trace-infos` query: "
2189 "expecting `port-name` entry of stream info map to be a string: "
2190 "component-class-name=%s, actual-type=%s",
2191 bt_component_class_get_name(comp_cls
),
2192 bt_common_value_type_string(bt_value_get_type(port_name
)));
2196 port_id
->port_name
= g_strdup(bt_value_string_get(port_name
));
2197 if (!port_id
->port_name
) {
2199 BT_CLI_LOGE_APPEND_CAUSE(
2200 "Cannot allocate memory for port_id port_name.");
2204 BT_LOGD("Inserting stream intersection ");
2206 g_hash_table_insert(ctx
->intersections
, port_id
, stream_intersection
);
2209 stream_intersection
= NULL
;
2216 bt_value_put_ref(query_result
);
2218 g_free(stream_intersection
);
2223 int cmd_run_ctx_create_components_from_config_components(
2224 struct cmd_run_ctx
*ctx
, GPtrArray
*cfg_components
)
2227 const void *comp_cls
= NULL
;
2228 const void *comp
= NULL
;
2231 for (i
= 0; i
< cfg_components
->len
; i
++) {
2232 struct bt_config_component
*cfg_comp
=
2233 g_ptr_array_index(cfg_components
, i
);
2236 switch (cfg_comp
->type
) {
2237 case BT_COMPONENT_CLASS_TYPE_SOURCE
:
2238 comp_cls
= find_source_component_class(
2239 cfg_comp
->plugin_name
->str
,
2240 cfg_comp
->comp_cls_name
->str
);
2242 case BT_COMPONENT_CLASS_TYPE_FILTER
:
2243 comp_cls
= find_filter_component_class(
2244 cfg_comp
->plugin_name
->str
,
2245 cfg_comp
->comp_cls_name
->str
);
2247 case BT_COMPONENT_CLASS_TYPE_SINK
:
2248 comp_cls
= find_sink_component_class(
2249 cfg_comp
->plugin_name
->str
,
2250 cfg_comp
->comp_cls_name
->str
);
2257 BT_CLI_LOGE_APPEND_CAUSE(
2258 "Cannot find component class: plugin-name=\"%s\", "
2259 "comp-cls-name=\"%s\", comp-cls-type=%d",
2260 cfg_comp
->plugin_name
->str
,
2261 cfg_comp
->comp_cls_name
->str
,
2266 BT_ASSERT(cfg_comp
->log_level
>= BT_LOG_TRACE
);
2268 switch (cfg_comp
->type
) {
2269 case BT_COMPONENT_CLASS_TYPE_SOURCE
:
2270 ret
= bt_graph_add_source_component(ctx
->graph
,
2271 comp_cls
, cfg_comp
->instance_name
->str
,
2272 cfg_comp
->params
, cfg_comp
->log_level
,
2275 case BT_COMPONENT_CLASS_TYPE_FILTER
:
2276 ret
= bt_graph_add_filter_component(ctx
->graph
,
2277 comp_cls
, cfg_comp
->instance_name
->str
,
2278 cfg_comp
->params
, cfg_comp
->log_level
,
2281 case BT_COMPONENT_CLASS_TYPE_SINK
:
2282 ret
= bt_graph_add_sink_component(ctx
->graph
,
2283 comp_cls
, cfg_comp
->instance_name
->str
,
2284 cfg_comp
->params
, cfg_comp
->log_level
,
2292 BT_CLI_LOGE_APPEND_CAUSE(
2293 "Cannot create component: plugin-name=\"%s\", "
2294 "comp-cls-name=\"%s\", comp-cls-type=%d, "
2296 cfg_comp
->plugin_name
->str
,
2297 cfg_comp
->comp_cls_name
->str
,
2298 cfg_comp
->type
, cfg_comp
->instance_name
->str
);
2302 if (ctx
->stream_intersection_mode
&&
2303 cfg_comp
->type
== BT_COMPONENT_CLASS_TYPE_SOURCE
) {
2304 ret
= set_stream_intersections(ctx
, cfg_comp
, comp_cls
);
2306 BT_CLI_LOGE_APPEND_CAUSE(
2307 "Cannot determine stream intersection of trace.");
2312 BT_LOGI("Created and inserted component: comp-addr=%p, comp-name=\"%s\"",
2313 comp
, cfg_comp
->instance_name
->str
);
2314 quark
= g_quark_from_string(cfg_comp
->instance_name
->str
);
2315 BT_ASSERT(quark
> 0);
2317 switch (cfg_comp
->type
) {
2318 case BT_COMPONENT_CLASS_TYPE_SOURCE
:
2319 g_hash_table_insert(ctx
->src_components
,
2320 GUINT_TO_POINTER(quark
), (void *) comp
);
2322 case BT_COMPONENT_CLASS_TYPE_FILTER
:
2323 g_hash_table_insert(ctx
->flt_components
,
2324 GUINT_TO_POINTER(quark
), (void *) comp
);
2326 case BT_COMPONENT_CLASS_TYPE_SINK
:
2327 g_hash_table_insert(ctx
->sink_components
,
2328 GUINT_TO_POINTER(quark
), (void *) comp
);
2335 BT_OBJECT_PUT_REF_AND_RESET(comp_cls
);
2344 bt_object_put_ref(comp
);
2345 bt_object_put_ref(comp_cls
);
2350 int cmd_run_ctx_create_components(struct cmd_run_ctx
*ctx
)
2355 * Make sure that, during this phase, our graph's "port added"
2356 * listener does not connect ports while we are creating the
2357 * components because we have a special, initial phase for
2360 ctx
->connect_ports
= false;
2362 ret
= cmd_run_ctx_create_components_from_config_components(
2363 ctx
, ctx
->cfg
->cmd_data
.run
.sources
);
2369 ret
= cmd_run_ctx_create_components_from_config_components(
2370 ctx
, ctx
->cfg
->cmd_data
.run
.filters
);
2376 ret
= cmd_run_ctx_create_components_from_config_components(
2377 ctx
, ctx
->cfg
->cmd_data
.run
.sinks
);
2387 typedef uint64_t (*output_port_count_func_t
)(const void *);
2388 typedef const bt_port_output
*(*borrow_output_port_by_index_func_t
)(
2389 const void *, uint64_t);
2392 int cmd_run_ctx_connect_comp_ports(struct cmd_run_ctx
*ctx
,
2393 void *comp
, output_port_count_func_t port_count_fn
,
2394 borrow_output_port_by_index_func_t port_by_index_fn
)
2400 count
= port_count_fn(comp
);
2402 for (i
= 0; i
< count
; i
++) {
2403 const bt_port_output
*upstream_port
= port_by_index_fn(comp
, i
);
2405 BT_ASSERT(upstream_port
);
2406 ret
= cmd_run_ctx_connect_upstream_port(ctx
, upstream_port
);
2417 int cmd_run_ctx_connect_ports(struct cmd_run_ctx
*ctx
)
2420 GHashTableIter iter
;
2421 gpointer g_name_quark
, g_comp
;
2423 ctx
->connect_ports
= true;
2424 g_hash_table_iter_init(&iter
, ctx
->src_components
);
2426 while (g_hash_table_iter_next(&iter
, &g_name_quark
, &g_comp
)) {
2427 ret
= cmd_run_ctx_connect_comp_ports(ctx
, g_comp
,
2428 (output_port_count_func_t
)
2429 bt_component_source_get_output_port_count
,
2430 (borrow_output_port_by_index_func_t
)
2431 bt_component_source_borrow_output_port_by_index_const
);
2437 g_hash_table_iter_init(&iter
, ctx
->flt_components
);
2439 while (g_hash_table_iter_next(&iter
, &g_name_quark
, &g_comp
)) {
2440 ret
= cmd_run_ctx_connect_comp_ports(ctx
, g_comp
,
2441 (output_port_count_func_t
)
2442 bt_component_filter_get_output_port_count
,
2443 (borrow_output_port_by_index_func_t
)
2444 bt_component_filter_borrow_output_port_by_index_const
);
2455 enum bt_cmd_status
cmd_run(struct bt_config
*cfg
)
2457 enum bt_cmd_status cmd_status
;
2458 struct cmd_run_ctx ctx
= { 0 };
2460 /* Initialize the command's context and the graph object */
2461 if (cmd_run_ctx_init(&ctx
, cfg
)) {
2462 BT_CLI_LOGE_APPEND_CAUSE(
2463 "Cannot initialize the command's context.");
2467 if (bt_interrupter_is_set(the_interrupter
)) {
2468 BT_CLI_LOGW_APPEND_CAUSE(
2469 "Interrupted by user before creating components.");
2473 BT_LOGI_STR("Creating components.");
2475 /* Create the requested component instances */
2476 if (cmd_run_ctx_create_components(&ctx
)) {
2477 BT_CLI_LOGE_APPEND_CAUSE("Cannot create components.");
2481 if (bt_interrupter_is_set(the_interrupter
)) {
2482 BT_CLI_LOGW_APPEND_CAUSE(
2483 "Interrupted by user before connecting components.");
2487 BT_LOGI_STR("Connecting components.");
2489 /* Connect the initially visible component ports */
2490 if (cmd_run_ctx_connect_ports(&ctx
)) {
2491 BT_CLI_LOGE_APPEND_CAUSE(
2492 "Cannot connect initial component ports.");
2496 BT_LOGI_STR("Running the graph.");
2500 bt_graph_run_status run_status
= bt_graph_run(ctx
.graph
);
2503 * Reset console in case something messed with console
2504 * codes during the graph's execution.
2506 printf("%s", bt_common_color_reset());
2508 fprintf(stderr
, "%s", bt_common_color_reset());
2509 BT_LOGT("bt_graph_run() returned: status=%s",
2510 bt_common_func_status_string(run_status
));
2512 switch (run_status
) {
2513 case BT_GRAPH_RUN_STATUS_OK
:
2514 cmd_status
= BT_CMD_STATUS_OK
;
2516 case BT_GRAPH_RUN_STATUS_AGAIN
:
2517 if (bt_interrupter_is_set(the_interrupter
)) {
2519 * The graph was interrupted by a SIGINT.
2521 cmd_status
= BT_CMD_STATUS_INTERRUPTED
;
2525 if (cfg
->cmd_data
.run
.retry_duration_us
> 0) {
2526 BT_LOGT("Got BT_GRAPH_RUN_STATUS_AGAIN: sleeping: "
2528 cfg
->cmd_data
.run
.retry_duration_us
);
2530 if (usleep(cfg
->cmd_data
.run
.retry_duration_us
)) {
2531 if (bt_interrupter_is_set(the_interrupter
)) {
2532 cmd_status
= BT_CMD_STATUS_INTERRUPTED
;
2539 if (bt_interrupter_is_set(the_interrupter
)) {
2540 cmd_status
= BT_CMD_STATUS_INTERRUPTED
;
2544 BT_CLI_LOGE_APPEND_CAUSE(
2545 "Graph failed to complete successfully");
2550 cmd_status
= BT_CMD_STATUS_ERROR
;
2553 cmd_run_ctx_destroy(&ctx
);
2558 void warn_command_name_and_directory_clash(struct bt_config
*cfg
)
2560 const char *env_clash
;
2562 if (!cfg
->command_name
) {
2566 env_clash
= getenv(ENV_BABELTRACE_WARN_COMMAND_NAME_DIRECTORY_CLASH
);
2567 if (env_clash
&& strcmp(env_clash
, "0") == 0) {
2571 if (g_file_test(cfg
->command_name
,
2572 G_FILE_TEST_EXISTS
| G_FILE_TEST_IS_DIR
)) {
2573 _bt_log_write_d(_BT_LOG_SRCLOC_FUNCTION
, __FILE__
, __LINE__
,
2574 BT_LOG_WARNING
, BT_LOG_TAG
,
2575 "The `%s` command was executed. "
2576 "If you meant to convert a trace located in "
2577 "the local `%s` directory, please use:\n\n"
2578 " babeltrace2 convert %s [OPTIONS]",
2579 cfg
->command_name
, cfg
->command_name
,
2585 void init_log_level(void)
2587 bt_cli_log_level
= bt_log_get_level_from_env(ENV_BABELTRACE_CLI_LOG_LEVEL
);
2591 void print_error_causes(void)
2593 const bt_error
*error
= bt_current_thread_take_error();
2595 GString
*folded
= NULL
;
2596 unsigned int columns
;
2597 gchar
*comp_cls_str
= NULL
;
2599 if (!error
|| bt_error_get_cause_count(error
) == 0) {
2600 fprintf(stderr
, "%s%sUnknown command-line error.%s\n",
2601 bt_common_color_bold(), bt_common_color_fg_bright_red(),
2602 bt_common_color_reset());
2606 /* Try to get terminal width to fold the error cause messages */
2607 if (bt_common_get_term_size(&columns
, NULL
) < 0) {
2608 /* Width not found: default to 80 */
2613 * This helps visually separate the error causes from the last
2614 * logging statement.
2616 fprintf(stderr
, "\n");
2618 /* Reverse order: deepest (root) cause printed at the end */
2619 for (i
= bt_error_get_cause_count(error
) - 1; i
>= 0; i
--) {
2620 const bt_error_cause
*cause
=
2621 bt_error_borrow_cause_by_index(error
, (uint64_t) i
);
2622 const char *prefix_fmt
=
2623 i
== bt_error_get_cause_count(error
) - 1 ?
2624 "%s%sERROR%s: " : "%s%sCAUSED BY%s ";
2627 fprintf(stderr
, prefix_fmt
,
2628 bt_common_color_bold(), bt_common_color_fg_bright_red(),
2629 bt_common_color_reset());
2631 /* Print actor name */
2632 fprintf(stderr
, "[");
2633 switch (bt_error_cause_get_actor_type(cause
)) {
2634 case BT_ERROR_CAUSE_ACTOR_TYPE_UNKNOWN
:
2635 fprintf(stderr
, "%s%s%s",
2636 bt_common_color_bold(),
2637 bt_error_cause_get_module_name(cause
),
2638 bt_common_color_reset());
2640 case BT_ERROR_CAUSE_ACTOR_TYPE_COMPONENT
:
2641 comp_cls_str
= format_plugin_comp_cls_opt(
2642 bt_error_cause_component_actor_get_plugin_name(cause
),
2643 bt_error_cause_component_actor_get_component_class_name(cause
),
2644 bt_error_cause_component_actor_get_component_class_type(cause
),
2645 BT_COMMON_COLOR_WHEN_AUTO
);
2646 BT_ASSERT(comp_cls_str
);
2648 fprintf(stderr
, "%s%s%s: %s",
2649 bt_common_color_bold(),
2650 bt_error_cause_component_actor_get_component_name(cause
),
2651 bt_common_color_reset(),
2654 case BT_ERROR_CAUSE_ACTOR_TYPE_COMPONENT_CLASS
:
2655 comp_cls_str
= format_plugin_comp_cls_opt(
2656 bt_error_cause_component_class_actor_get_plugin_name(cause
),
2657 bt_error_cause_component_class_actor_get_component_class_name(cause
),
2658 bt_error_cause_component_class_actor_get_component_class_type(cause
),
2659 BT_COMMON_COLOR_WHEN_AUTO
);
2660 BT_ASSERT(comp_cls_str
);
2662 fputs(comp_cls_str
, stderr
);
2664 case BT_ERROR_CAUSE_ACTOR_TYPE_MESSAGE_ITERATOR
:
2665 comp_cls_str
= format_plugin_comp_cls_opt(
2666 bt_error_cause_message_iterator_actor_get_plugin_name(cause
),
2667 bt_error_cause_message_iterator_actor_get_component_class_name(cause
),
2668 bt_error_cause_message_iterator_actor_get_component_class_type(cause
)
2669 ,BT_COMMON_COLOR_WHEN_AUTO
);
2670 BT_ASSERT(comp_cls_str
);
2672 fprintf(stderr
, "%s%s%s (%s%s%s): %s",
2673 bt_common_color_bold(),
2674 bt_error_cause_message_iterator_actor_get_component_name(cause
),
2675 bt_common_color_reset(),
2676 bt_common_color_bold(),
2677 bt_error_cause_message_iterator_actor_get_component_output_port_name(cause
),
2678 bt_common_color_reset(),
2685 /* Print file name and line number */
2686 fprintf(stderr
, "] (%s%s%s%s:%s%" PRIu64
"%s)\n",
2687 bt_common_color_bold(),
2688 bt_common_color_fg_bright_magenta(),
2689 bt_error_cause_get_file_name(cause
),
2690 bt_common_color_reset(),
2691 bt_common_color_fg_green(),
2692 bt_error_cause_get_line_number(cause
),
2693 bt_common_color_reset());
2696 folded
= bt_common_fold(bt_error_cause_get_message(cause
),
2699 BT_LOGE_STR("Could not fold string.");
2700 fprintf(stderr
, "%s\n",
2701 bt_error_cause_get_message(cause
));
2705 fprintf(stderr
, "%s\n", folded
->str
);
2706 g_string_free(folded
, TRUE
);
2714 bt_error_release(error
);
2717 g_free(comp_cls_str
);
2720 int main(int argc
, const char **argv
)
2723 enum bt_cmd_status cmd_status
;
2724 struct bt_config
*cfg
= NULL
;
2727 set_signal_handler();
2728 init_loaded_plugins();
2730 BT_ASSERT(!the_interrupter
);
2731 the_interrupter
= bt_interrupter_create();
2732 if (!the_interrupter
) {
2733 BT_CLI_LOGE_APPEND_CAUSE("Failed to create an interrupter object.");
2738 cfg
= bt_config_cli_args_create_with_default(argc
, argv
, &retcode
,
2742 /* Quit without errors; typically usage/version */
2744 BT_LOGI_STR("Quitting without errors.");
2749 BT_CLI_LOGE_APPEND_CAUSE(
2750 "Command-line error: retcode=%d", retcode
);
2755 BT_CLI_LOGE_APPEND_CAUSE(
2756 "Failed to create a valid Babeltrace CLI configuration.");
2763 if (cfg
->command_needs_plugins
) {
2764 ret
= require_loaded_plugins(cfg
->plugin_paths
);
2766 BT_CLI_LOGE_APPEND_CAUSE(
2767 "Failed to load plugins: ret=%d", ret
);
2773 BT_LOGI("Executing command: cmd=%d, command-name=\"%s\"",
2774 cfg
->command
, cfg
->command_name
);
2776 switch (cfg
->command
) {
2777 case BT_CONFIG_COMMAND_RUN
:
2778 cmd_status
= cmd_run(cfg
);
2780 case BT_CONFIG_COMMAND_LIST_PLUGINS
:
2781 cmd_status
= cmd_list_plugins(cfg
);
2783 case BT_CONFIG_COMMAND_HELP
:
2784 cmd_status
= cmd_help(cfg
);
2786 case BT_CONFIG_COMMAND_QUERY
:
2787 cmd_status
= cmd_query(cfg
);
2789 case BT_CONFIG_COMMAND_PRINT_CTF_METADATA
:
2790 cmd_status
= cmd_print_ctf_metadata(cfg
);
2792 case BT_CONFIG_COMMAND_PRINT_LTTNG_LIVE_SESSIONS
:
2793 cmd_status
= cmd_print_lttng_live_sessions(cfg
);
2796 BT_LOGF("Invalid/unknown command: cmd=%d", cfg
->command
);
2800 BT_LOGI("Command completed: cmd=%d, command-name=\"%s\", command-status=\"%s\"",
2801 cfg
->command
, cfg
->command_name
, bt_cmd_status_string(cmd_status
));
2802 warn_command_name_and_directory_clash(cfg
);
2804 switch (cmd_status
) {
2805 case BT_CMD_STATUS_OK
:
2808 case BT_CMD_STATUS_ERROR
:
2811 case BT_CMD_STATUS_INTERRUPTED
:
2815 BT_LOGF("Invalid command status: cmd-status=%d", cmd_status
);
2821 print_error_causes();
2824 BT_OBJECT_PUT_REF_AND_RESET(cfg
);
2825 fini_loaded_plugins();
2826 bt_interrupter_put_ref(the_interrupter
);
2829 * Clear current thread's error in case there is one to avoid a
2832 bt_current_thread_clear_error();