src/common/mi-lttng.c

   1 /*
   2  * Copyright (C) 2014 - Jonathan Rajotte <jonathan.r.julien@gmail.com>
   3  *                    - Olivier Cotte <olivier.cotte@polymtl.ca>
   4  * Copyright (C) 2016 - Jérémie Galarneau <jeremie.galarneau@efficios.com>
   5  *
   6  * This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU General Public License, version 2 only, as
   8  * published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but WITHOUT
  11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
  13  * more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along with
  16  * this program; if not, write to the Free Software Foundation, Inc., 51
  17  * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18  */
  19
  20 #define _LGPL_SOURCE
  21 #include <common/config/session-config.h>
  22 #include <common/defaults.h>
  23 #include <lttng/snapshot-internal.h>
  24 #include <lttng/channel.h>
  25 #include "mi-lttng.h"
  26
  27 #include <assert.h>
  28
  29 #define MI_SCHEMA_MAJOR_VERSION 3
  30 #define MI_SCHEMA_MINOR_VERSION 0
  31
  32 /* Machine interface namespace URI */
  33 LTTNG_HIDDEN const char * const mi_lttng_xmlns = "xmlns";
  34 LTTNG_HIDDEN const char * const mi_lttng_xmlns_xsi = "xmlns:xsi";
  35 LTTNG_HIDDEN const char * const mi_lttng_w3_schema_uri = "http://www.w3.org/2001/XMLSchema-instance";
  36 LTTNG_HIDDEN const char * const mi_lttng_schema_location = "xsi:schemaLocation";
  37 LTTNG_HIDDEN const char * const mi_lttng_schema_location_uri =
  38         DEFAULT_LTTNG_MI_NAMESPACE " "
  39         "http://lttng.org/xml/schemas/lttng-mi/" XSTR(MI_SCHEMA_MAJOR_VERSION)
  40         "/lttng-mi-" XSTR(MI_SCHEMA_MAJOR_VERSION) "."
  41         XSTR(MI_SCHEMA_MINOR_VERSION) ".xsd";
  42 LTTNG_HIDDEN const char * const mi_lttng_schema_version = "schemaVersion";
  43 LTTNG_HIDDEN const char * const mi_lttng_schema_version_value = XSTR(MI_SCHEMA_MAJOR_VERSION)
  44         "." XSTR(MI_SCHEMA_MINOR_VERSION);
  45
  46 /* Strings related to command */
  47 const char * const mi_lttng_element_command = "command";
  48 const char * const mi_lttng_element_command_action = "snapshot_action";
  49 const char * const mi_lttng_element_command_add_context = "add-context";
  50 const char * const mi_lttng_element_command_calibrate = "calibrate";
  51 const char * const mi_lttng_element_command_create = "create";
  52 const char * const mi_lttng_element_command_destroy = "destroy";
  53 const char * const mi_lttng_element_command_disable_channel = "disable-channel";
  54 const char * const mi_lttng_element_command_disable_event = "disable-event";
  55 const char * const mi_lttng_element_command_enable_channels = "enable-channel";
  56 const char * const mi_lttng_element_command_enable_event = "enable-event";
  57 const char * const mi_lttng_element_command_list = "list";
  58 const char * const mi_lttng_element_command_load = "load";
  59 LTTNG_HIDDEN const char * const mi_lttng_element_command_metadata = "metadata";
  60 LTTNG_HIDDEN const char * const mi_lttng_element_command_metadata_action = "metadata_action";
  61 const char * const mi_lttng_element_command_name = "name";
  62 const char * const mi_lttng_element_command_output = "output";
  63 const char * const mi_lttng_element_command_save = "save";
  64 const char * const mi_lttng_element_command_set_session = "set-session";
  65 const char * const mi_lttng_element_command_snapshot = "snapshot";
  66 const char * const mi_lttng_element_command_snapshot_add = "add_snapshot";
  67 const char * const mi_lttng_element_command_snapshot_del = "del_snapshot";
  68 const char * const mi_lttng_element_command_snapshot_list = "list_snapshot";
  69 const char * const mi_lttng_element_command_snapshot_record = "record_snapshot";
  70 const char * const mi_lttng_element_command_start = "start";
  71 const char * const mi_lttng_element_command_stop = "stop";
  72 const char * const mi_lttng_element_command_success = "success";
  73 const char * const mi_lttng_element_command_track = "track";
  74 const char * const mi_lttng_element_command_untrack = "untrack";
  75 const char * const mi_lttng_element_command_version = "version";
  76
  77 /* Strings related to version command */
  78 const char * const mi_lttng_element_version = "version";
  79 const char * const mi_lttng_element_version_commit = "commit";
  80 const char * const mi_lttng_element_version_description = "description";
  81 const char * const mi_lttng_element_version_license = "license";
  82 const char * const mi_lttng_element_version_major = "major";
  83 const char * const mi_lttng_element_version_minor = "minor";
  84 const char * const mi_lttng_element_version_patch_level = "patchLevel";
  85 const char * const mi_lttng_element_version_str = "string";
  86 const char * const mi_lttng_element_version_web = "url";
  87
  88 /* String related to a lttng_event_field */
  89 const char * const mi_lttng_element_event_field = "event_field";
  90 const char * const mi_lttng_element_event_fields = "event_fields";
  91
  92 /* String related to lttng_event_perf_counter_ctx */
  93 const char * const mi_lttng_element_perf_counter_context = "perf";
  94
  95 /* Strings related to pid */
  96 const char * const mi_lttng_element_pid_id = "id";
  97
  98 /* Strings related to save command */
  99 const char * const mi_lttng_element_save = "save";
 100
 101 /* Strings related to load command */
 102 const char * const mi_lttng_element_load = "load";
 103
 104 /* General elements of mi_lttng */
 105 const char * const mi_lttng_element_empty = "";
 106 const char * const mi_lttng_element_id = "id";
 107 const char * const mi_lttng_element_nowrite = "nowrite";
 108 const char * const mi_lttng_element_success = "success";
 109 const char * const mi_lttng_element_type_enum = "ENUM";
 110 const char * const mi_lttng_element_type_float = "FLOAT";
 111 const char * const mi_lttng_element_type_integer = "INTEGER";
 112 const char * const mi_lttng_element_type_other = "OTHER";
 113 const char * const mi_lttng_element_type_string = "STRING";
 114
 115 /* String related to loglevel */
 116 const char * const mi_lttng_loglevel_str_alert = "TRACE_ALERT";
 117 const char * const mi_lttng_loglevel_str_crit = "TRACE_CRIT";
 118 const char * const mi_lttng_loglevel_str_debug = "TRACE_DEBUG";
 119 const char * const mi_lttng_loglevel_str_debug_function = "TRACE_DEBUG_FUNCTION";
 120 const char * const mi_lttng_loglevel_str_debug_line = "TRACE_DEBUG_LINE";
 121 const char * const mi_lttng_loglevel_str_debug_module = "TRACE_DEBUG_MODULE";
 122 const char * const mi_lttng_loglevel_str_debug_process = "TRACE_DEBUG_PROCESS";
 123 const char * const mi_lttng_loglevel_str_debug_program = "TRACE_DEBUG_PROGRAM";
 124 const char * const mi_lttng_loglevel_str_debug_system = "TRACE_DEBUG_SYSTEM";
 125 const char * const mi_lttng_loglevel_str_debug_unit = "TRACE_DEBUG_UNIT";
 126 const char * const mi_lttng_loglevel_str_emerg = "TRACE_EMERG";
 127 const char * const mi_lttng_loglevel_str_err = "TRACE_ERR";
 128 const char * const mi_lttng_loglevel_str_info = "TRACE_INFO";
 129 const char * const mi_lttng_loglevel_str_notice = "TRACE_NOTICE";
 130 const char * const mi_lttng_loglevel_str_unknown = "UNKNOWN";
 131 const char * const mi_lttng_loglevel_str_warning = "TRACE_WARNING";
 132
 133 /* String related to loglevel JUL */
 134 const char * const mi_lttng_loglevel_str_jul_all = "JUL_ALL";
 135 const char * const mi_lttng_loglevel_str_jul_config = "JUL_CONFIG";
 136 const char * const mi_lttng_loglevel_str_jul_fine = "JUL_FINE";
 137 const char * const mi_lttng_loglevel_str_jul_finer = "JUL_FINER";
 138 const char * const mi_lttng_loglevel_str_jul_finest = "JUL_FINEST";
 139 const char * const mi_lttng_loglevel_str_jul_info = "JUL_INFO";
 140 const char * const mi_lttng_loglevel_str_jul_off = "JUL_OFF";
 141 const char * const mi_lttng_loglevel_str_jul_severe = "JUL_SEVERE";
 142 const char * const mi_lttng_loglevel_str_jul_warning = "JUL_WARNING";
 143
 144 /* String related to loglevel LOG4J */
 145 const char * const mi_lttng_loglevel_str_log4j_off = "LOG4J_OFF";
 146 const char * const mi_lttng_loglevel_str_log4j_fatal = "LOG4J_FATAL";
 147 const char * const mi_lttng_loglevel_str_log4j_error = "LOG4J_ERROR";
 148 const char * const mi_lttng_loglevel_str_log4j_warn = "LOG4J_WARN";
 149 const char * const mi_lttng_loglevel_str_log4j_info = "LOG4J_INFO";
 150 const char * const mi_lttng_loglevel_str_log4j_debug = "LOG4J_DEBUG";
 151 const char * const mi_lttng_loglevel_str_log4j_trace = "LOG4J_TRACE";
 152 const char * const mi_lttng_loglevel_str_log4j_all = "LOG4J_ALL";
 153
 154 /* String related to loglevel Python */
 155 const char * const mi_lttng_loglevel_str_python_critical = "PYTHON_CRITICAL";
 156 const char * const mi_lttng_loglevel_str_python_error = "PYTHON_ERROR";
 157 const char * const mi_lttng_loglevel_str_python_warning = "PYTHON_WARNING";
 158 const char * const mi_lttng_loglevel_str_python_info = "PYTHON_INFO";
 159 const char * const mi_lttng_loglevel_str_python_debug = "PYTHON_DEBUG";
 160 const char * const mi_lttng_loglevel_str_python_notset = "PYTHON_NOTSET";
 161
 162 /* String related to loglevel type */
 163 const char * const mi_lttng_loglevel_type_all = "ALL";
 164 const char * const mi_lttng_loglevel_type_range = "RANGE";
 165 const char * const mi_lttng_loglevel_type_single = "SINGLE";
 166 const char * const mi_lttng_loglevel_type_unknown = "UNKNOWN";
 167
 168 /* String related to lttng_calibrate */
 169 const char * const mi_lttng_element_calibrate = "calibrate";
 170 const char * const mi_lttng_element_calibrate_function = "FUNCTION";
 171
 172 /* String related to a lttng_snapshot_output */
 173 const char * const mi_lttng_element_snapshot_ctrl_url = "ctrl_url";
 174 const char * const mi_lttng_element_snapshot_data_url = "data_url";
 175 const char * const mi_lttng_element_snapshot_max_size = "max_size";
 176 const char * const mi_lttng_element_snapshot_n_ptr = "n_ptr";
 177 const char * const mi_lttng_element_snapshot_session_name = "session_name";
 178 const char * const mi_lttng_element_snapshots = "snapshots";
 179
 180 /* String related to track/untrack command */
 181 const char * const mi_lttng_element_track_untrack_all_wildcard = "*";
 182
 183 /* Deprecated symbols preserved for ABI compatibility. */
 184 const char * const mi_lttng_context_type_perf_counter;
 185 const char * const mi_lttng_context_type_perf_cpu_counter;
 186 const char * const mi_lttng_context_type_perf_thread_counter;
 187 const char * const mi_lttng_element_track_untrack_pid_target;
 188 const char * const mi_lttng_element_track_untrack_targets;
 189
 190 /* This is a merge of jul loglevel and regular loglevel
 191  * Those should never overlap by definition
 192  * (see struct lttng_event loglevel)
 193  */
 194 LTTNG_HIDDEN
 195 const char *mi_lttng_loglevel_string(int value, enum lttng_domain_type domain)
 196 {
 197         switch (domain) {
 198         case LTTNG_DOMAIN_KERNEL:
 199         case LTTNG_DOMAIN_UST:
 200                 switch (value) {
 201                 case -1:
 202                         return mi_lttng_element_empty;
 203                 case LTTNG_LOGLEVEL_EMERG:
 204                         return mi_lttng_loglevel_str_emerg;
 205                 case LTTNG_LOGLEVEL_ALERT:
 206                         return mi_lttng_loglevel_str_alert;
 207                 case LTTNG_LOGLEVEL_CRIT:
 208                         return mi_lttng_loglevel_str_crit;
 209                 case LTTNG_LOGLEVEL_ERR:
 210                         return mi_lttng_loglevel_str_err;
 211                 case LTTNG_LOGLEVEL_WARNING:
 212                         return mi_lttng_loglevel_str_warning;
 213                 case LTTNG_LOGLEVEL_NOTICE:
 214                         return mi_lttng_loglevel_str_notice;
 215                 case LTTNG_LOGLEVEL_INFO:
 216                         return mi_lttng_loglevel_str_info;
 217                 case LTTNG_LOGLEVEL_DEBUG_SYSTEM:
 218                         return mi_lttng_loglevel_str_debug_system;
 219                 case LTTNG_LOGLEVEL_DEBUG_PROGRAM:
 220                         return mi_lttng_loglevel_str_debug_program;
 221                 case LTTNG_LOGLEVEL_DEBUG_PROCESS:
 222                         return mi_lttng_loglevel_str_debug_process;
 223                 case LTTNG_LOGLEVEL_DEBUG_MODULE:
 224                         return mi_lttng_loglevel_str_debug_module;
 225                 case LTTNG_LOGLEVEL_DEBUG_UNIT:
 226                         return mi_lttng_loglevel_str_debug_unit;
 227                 case LTTNG_LOGLEVEL_DEBUG_FUNCTION:
 228                         return mi_lttng_loglevel_str_debug_function;
 229                 case LTTNG_LOGLEVEL_DEBUG_LINE:
 230                         return mi_lttng_loglevel_str_debug_line;
 231                 case LTTNG_LOGLEVEL_DEBUG:
 232                         return mi_lttng_loglevel_str_debug;
 233                 default:
 234                         return mi_lttng_loglevel_str_unknown;
 235                 }
 236                 break;
 237         case LTTNG_DOMAIN_LOG4J:
 238                 switch (value) {
 239                 case -1:
 240                         return mi_lttng_element_empty;
 241                 case LTTNG_LOGLEVEL_LOG4J_OFF:
 242                         return mi_lttng_loglevel_str_log4j_off;
 243                 case LTTNG_LOGLEVEL_LOG4J_FATAL:
 244                         return mi_lttng_loglevel_str_log4j_fatal;
 245                 case LTTNG_LOGLEVEL_LOG4J_ERROR:
 246                         return mi_lttng_loglevel_str_log4j_error;
 247                 case LTTNG_LOGLEVEL_LOG4J_WARN:
 248                         return mi_lttng_loglevel_str_log4j_warn;
 249                 case LTTNG_LOGLEVEL_LOG4J_INFO:
 250                         return mi_lttng_loglevel_str_log4j_info;
 251                 case LTTNG_LOGLEVEL_LOG4J_DEBUG:
 252                         return mi_lttng_loglevel_str_log4j_debug;
 253                 case LTTNG_LOGLEVEL_LOG4J_TRACE:
 254                         return mi_lttng_loglevel_str_log4j_trace;
 255                 case LTTNG_LOGLEVEL_LOG4J_ALL:
 256                         return mi_lttng_loglevel_str_log4j_all;
 257                 default:
 258                         return mi_lttng_loglevel_str_unknown;
 259                 }
 260                 break;
 261         case LTTNG_DOMAIN_JUL:
 262                 switch (value) {
 263                 case -1:
 264                         return mi_lttng_element_empty;
 265                 case LTTNG_LOGLEVEL_JUL_OFF:
 266                         return mi_lttng_loglevel_str_jul_off;
 267                 case LTTNG_LOGLEVEL_JUL_SEVERE:
 268                         return mi_lttng_loglevel_str_jul_severe;
 269                 case LTTNG_LOGLEVEL_JUL_WARNING:
 270                         return mi_lttng_loglevel_str_jul_warning;
 271                 case LTTNG_LOGLEVEL_JUL_INFO:
 272                         return mi_lttng_loglevel_str_jul_info;
 273                 case LTTNG_LOGLEVEL_JUL_CONFIG:
 274                         return mi_lttng_loglevel_str_jul_config;
 275                 case LTTNG_LOGLEVEL_JUL_FINE:
 276                         return mi_lttng_loglevel_str_jul_fine;
 277                 case LTTNG_LOGLEVEL_JUL_FINER:
 278                         return mi_lttng_loglevel_str_jul_finer;
 279                 case LTTNG_LOGLEVEL_JUL_FINEST:
 280                         return mi_lttng_loglevel_str_jul_finest;
 281                 case LTTNG_LOGLEVEL_JUL_ALL:
 282                         return mi_lttng_loglevel_str_jul_all;
 283                 default:
 284                         return mi_lttng_loglevel_str_unknown;
 285                 }
 286                 break;
 287         case LTTNG_DOMAIN_PYTHON:
 288                 switch (value) {
 289                 case LTTNG_LOGLEVEL_PYTHON_CRITICAL:
 290                         return mi_lttng_loglevel_str_python_critical;
 291                 case LTTNG_LOGLEVEL_PYTHON_ERROR:
 292                         return mi_lttng_loglevel_str_python_error;
 293                 case LTTNG_LOGLEVEL_PYTHON_WARNING:
 294                         return mi_lttng_loglevel_str_python_warning;
 295                 case LTTNG_LOGLEVEL_PYTHON_INFO:
 296                         return mi_lttng_loglevel_str_python_info;
 297                 case LTTNG_LOGLEVEL_PYTHON_DEBUG:
 298                         return mi_lttng_loglevel_str_python_debug;
 299                 case LTTNG_LOGLEVEL_PYTHON_NOTSET:
 300                         return mi_lttng_loglevel_str_python_notset;
 301                 default:
 302                         return mi_lttng_loglevel_str_unknown;
 303                 }
 304                 break;
 305         }
 306
 307         /* Reaching this means the domain is unknown. */
 308         return mi_lttng_loglevel_str_unknown;
 309 }
 310
 311 LTTNG_HIDDEN
 312 const char *mi_lttng_logleveltype_string(enum lttng_loglevel_type value)
 313 {
 314         switch (value) {
 315         case LTTNG_EVENT_LOGLEVEL_ALL:
 316                 return mi_lttng_loglevel_type_all;
 317         case LTTNG_EVENT_LOGLEVEL_RANGE:
 318                 return mi_lttng_loglevel_type_range;
 319         case LTTNG_EVENT_LOGLEVEL_SINGLE:
 320                 return mi_lttng_loglevel_type_single;
 321         default:
 322                 return mi_lttng_loglevel_type_unknown;
 323         }
 324 }
 325
 326 LTTNG_HIDDEN
 327 const char *mi_lttng_eventtype_string(enum lttng_event_type value)
 328 {
 329         switch (value) {
 330         case LTTNG_EVENT_ALL:
 331                 return config_event_type_all;
 332         case LTTNG_EVENT_TRACEPOINT:
 333                 return config_event_type_tracepoint;
 334         case LTTNG_EVENT_PROBE:
 335                 return config_event_type_probe;
 336         case LTTNG_EVENT_FUNCTION:
 337                 return config_event_type_function;
 338         case LTTNG_EVENT_FUNCTION_ENTRY:
 339                 return config_event_type_function_entry;
 340         case LTTNG_EVENT_SYSCALL:
 341                 return config_event_type_syscall;
 342         case LTTNG_EVENT_NOOP:
 343                 return config_event_type_noop;
 344         default:
 345                 return mi_lttng_element_empty;
 346         }
 347 }
 348
 349 static
 350 const char *mi_lttng_event_contexttype_string(enum lttng_event_context_type val)
 351 {
 352         switch (val) {
 353         case LTTNG_EVENT_CONTEXT_PID:
 354                 return config_event_context_pid;
 355         case LTTNG_EVENT_CONTEXT_PROCNAME:
 356                 return config_event_context_procname;
 357         case LTTNG_EVENT_CONTEXT_PRIO:
 358                 return config_event_context_prio;
 359         case LTTNG_EVENT_CONTEXT_NICE:
 360                 return config_event_context_nice;
 361         case LTTNG_EVENT_CONTEXT_VPID:
 362                 return config_event_context_vpid;
 363         case LTTNG_EVENT_CONTEXT_TID:
 364                 return config_event_context_tid;
 365         case LTTNG_EVENT_CONTEXT_VTID:
 366                 return config_event_context_vtid;
 367         case LTTNG_EVENT_CONTEXT_PPID:
 368                 return config_event_context_ppid;
 369         case LTTNG_EVENT_CONTEXT_VPPID:
 370                 return config_event_context_vppid;
 371         case LTTNG_EVENT_CONTEXT_PTHREAD_ID:
 372                 return config_event_context_pthread_id;
 373         case LTTNG_EVENT_CONTEXT_HOSTNAME:
 374                 return config_event_context_hostname;
 375         case LTTNG_EVENT_CONTEXT_IP:
 376                 return config_event_context_ip;
 377         default:
 378                 return NULL;
 379         }
 380 }
 381
 382 LTTNG_HIDDEN
 383 const char *mi_lttng_eventfieldtype_string(enum lttng_event_field_type val)
 384 {
 385         switch (val) {
 386         case(LTTNG_EVENT_FIELD_INTEGER):
 387                 return mi_lttng_element_type_integer;
 388         case(LTTNG_EVENT_FIELD_ENUM):
 389                 return mi_lttng_element_type_enum;
 390         case(LTTNG_EVENT_FIELD_FLOAT):
 391                 return mi_lttng_element_type_float;
 392         case(LTTNG_EVENT_FIELD_STRING):
 393                 return mi_lttng_element_type_string;
 394         default:
 395                 return mi_lttng_element_type_other;
 396         }
 397 }
 398
 399 LTTNG_HIDDEN
 400 const char *mi_lttng_domaintype_string(enum lttng_domain_type value)
 401 {
 402         /* Note: This is a *duplicate* of get_domain_str from bin/lttng/utils.c */
 403         switch (value) {
 404         case LTTNG_DOMAIN_KERNEL:
 405                 return config_domain_type_kernel;
 406         case LTTNG_DOMAIN_UST:
 407                 return config_domain_type_ust;
 408         case LTTNG_DOMAIN_JUL:
 409                 return config_domain_type_jul;
 410         case LTTNG_DOMAIN_LOG4J:
 411                 return config_domain_type_log4j;
 412         case LTTNG_DOMAIN_PYTHON:
 413                 return config_domain_type_python;
 414         default:
 415                 /* Should not have an unknown domain */
 416                 assert(0);
 417                 return NULL;
 418         }
 419 }
 420
 421 LTTNG_HIDDEN
 422 const char *mi_lttng_buffertype_string(enum lttng_buffer_type value)
 423 {
 424         switch (value) {
 425         case LTTNG_BUFFER_PER_PID:
 426                 return config_buffer_type_per_pid;
 427         case LTTNG_BUFFER_PER_UID:
 428                 return config_buffer_type_per_uid;
 429         case LTTNG_BUFFER_GLOBAL:
 430                 return config_buffer_type_global;
 431         default:
 432                 /* Should not have an unknow buffer type */
 433                 assert(0);
 434                 return NULL;
 435         }
 436 }
 437
 438 LTTNG_HIDDEN
 439 const char *mi_lttng_calibratetype_string(enum lttng_calibrate_type val)
 440 {
 441         const char *ret;
 442
 443         switch (val) {
 444         case LTTNG_CALIBRATE_FUNCTION:
 445                 ret = mi_lttng_element_calibrate_function;
 446                 break;
 447         default:
 448                 ret = mi_lttng_element_empty;
 449                 break;
 450         }
 451         return ret;
 452 }
 453
 454 LTTNG_HIDDEN
 455 struct mi_writer *mi_lttng_writer_create(int fd_output, int mi_output_type)
 456 {
 457         struct mi_writer *mi_writer;
 458
 459         mi_writer = zmalloc(sizeof(struct mi_writer));
 460         if (!mi_writer) {
 461                 PERROR("zmalloc mi_writer_create");
 462                 goto end;
 463         }
 464         if (mi_output_type == LTTNG_MI_XML) {
 465                 mi_writer->writer = config_writer_create(fd_output, 0);
 466                 if (!mi_writer->writer) {
 467                         goto err_destroy;
 468                 }
 469                 mi_writer->type = LTTNG_MI_XML;
 470         } else {
 471                 goto err_destroy;
 472         }
 473
 474 end:
 475         return mi_writer;
 476
 477 err_destroy:
 478         free(mi_writer);
 479         return NULL;
 480 }
 481
 482 LTTNG_HIDDEN
 483 int mi_lttng_writer_destroy(struct mi_writer *writer)
 484 {
 485         int ret;
 486
 487         if (!writer) {
 488                 ret = -EINVAL;
 489                 goto end;
 490         }
 491
 492         ret = config_writer_destroy(writer->writer);
 493         if (ret < 0) {
 494                 goto end;
 495         }
 496
 497         free(writer);
 498 end:
 499         return ret;
 500 }
 501
 502 LTTNG_HIDDEN
 503 int mi_lttng_writer_command_open(struct mi_writer *writer, const char *command)
 504 {
 505         int ret;
 506
 507         /*
 508          * A command is always the MI's root node, it must declare the current
 509          * namespace and schema URIs and the schema's version.
 510          */
 511         ret = config_writer_open_element(writer->writer,
 512                         mi_lttng_element_command);
 513         if (ret) {
 514                 goto end;
 515         }
 516
 517         ret = config_writer_write_attribute(writer->writer,
 518                         mi_lttng_xmlns, DEFAULT_LTTNG_MI_NAMESPACE);
 519         if (ret) {
 520                 goto end;
 521         }
 522
 523         ret = config_writer_write_attribute(writer->writer,
 524                         mi_lttng_xmlns_xsi, mi_lttng_w3_schema_uri);
 525         if (ret) {
 526                 goto end;
 527         }
 528
 529         ret = config_writer_write_attribute(writer->writer,
 530                         mi_lttng_schema_location,
 531                         mi_lttng_schema_location_uri);
 532         if (ret) {
 533                 goto end;
 534         }
 535
 536         ret = config_writer_write_attribute(writer->writer,
 537                         mi_lttng_schema_version,
 538                         mi_lttng_schema_version_value);
 539         if (ret) {
 540                 goto end;
 541         }
 542
 543         ret = mi_lttng_writer_write_element_string(writer,
 544                         mi_lttng_element_command_name, command);
 545 end:
 546         return ret;
 547 }
 548
 549 LTTNG_HIDDEN
 550 int mi_lttng_writer_command_close(struct mi_writer *writer)
 551 {
 552         return mi_lttng_writer_close_element(writer);
 553 }
 554
 555 LTTNG_HIDDEN
 556 int mi_lttng_writer_open_element(struct mi_writer *writer,
 557                 const char *element_name)
 558 {
 559         return config_writer_open_element(writer->writer, element_name);
 560 }
 561
 562 LTTNG_HIDDEN
 563 int mi_lttng_writer_close_element(struct mi_writer *writer)
 564 {
 565         return config_writer_close_element(writer->writer);
 566 }
 567
 568 LTTNG_HIDDEN
 569 int mi_lttng_close_multi_element(struct mi_writer *writer,
 570                 unsigned int nb_element)
 571 {
 572         int ret, i;
 573
 574         if (nb_element < 1) {
 575                 ret = 0;
 576                 goto end;
 577         }
 578         for (i = 0; i < nb_element; i++) {
 579                 ret = mi_lttng_writer_close_element(writer);
 580                 if (ret) {
 581                         goto end;
 582                 }
 583         }
 584 end:
 585         return ret;
 586 }
 587
 588 LTTNG_HIDDEN
 589 int mi_lttng_writer_write_element_unsigned_int(struct mi_writer *writer,
 590                 const char *element_name, uint64_t value)
 591 {
 592         return config_writer_write_element_unsigned_int(writer->writer,
 593                         element_name, value);
 594 }
 595
 596 LTTNG_HIDDEN
 597 int mi_lttng_writer_write_element_signed_int(struct mi_writer *writer,
 598                 const char *element_name, int64_t value)
 599 {
 600         return config_writer_write_element_signed_int(writer->writer,
 601                         element_name, value);
 602 }
 603
 604 LTTNG_HIDDEN
 605 int mi_lttng_writer_write_element_bool(struct mi_writer *writer,
 606                 const char *element_name, int value)
 607 {
 608         return config_writer_write_element_bool(writer->writer,
 609                         element_name, value);
 610 }
 611
 612 LTTNG_HIDDEN
 613 int mi_lttng_writer_write_element_string(struct mi_writer *writer,
 614                 const char *element_name, const char *value)
 615 {
 616         return config_writer_write_element_string(writer->writer,
 617                         element_name, value);
 618 }
 619
 620 LTTNG_HIDDEN
 621 int mi_lttng_version(struct mi_writer *writer, struct mi_lttng_version *version,
 622         const char *lttng_description, const char *lttng_license)
 623 {
 624         int ret;
 625
 626         /* Open version */
 627         ret = mi_lttng_writer_open_element(writer, mi_lttng_element_version);
 628         if (ret) {
 629                 goto end;
 630         }
 631
 632         /* Version string (contain info like rc etc.) */
 633         ret = mi_lttng_writer_write_element_string(writer,
 634                         mi_lttng_element_version_str, version->version);
 635         if (ret) {
 636                 goto end;
 637         }
 638
 639         /* Major version number */
 640         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 641                         mi_lttng_element_version_major, version->version_major);
 642         if (ret) {
 643                 goto end;
 644         }
 645
 646         /* Minor version number */
 647         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 648                         mi_lttng_element_version_minor, version->version_minor);
 649         if (ret) {
 650                 goto end;
 651         }
 652
 653         /* Commit version number */
 654         ret = mi_lttng_writer_write_element_string(writer,
 655                         mi_lttng_element_version_commit, version->version_commit);
 656         if (ret) {
 657                 goto end;
 658         }
 659
 660         /* Patch number */
 661         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 662                         mi_lttng_element_version_patch_level, version->version_patchlevel);
 663         if (ret) {
 664                 goto end;
 665         }
 666
 667         /* Name of the version */
 668         ret = mi_lttng_writer_write_element_string(writer,
 669                         config_element_name, version->version_name);
 670         if (ret) {
 671                 goto end;
 672         }
 673
 674         /* Description mostly related to beer... */
 675         ret = mi_lttng_writer_write_element_string(writer,
 676                         mi_lttng_element_version_description, lttng_description);
 677         if (ret) {
 678                 goto end;
 679         }
 680
 681         /* url */
 682         ret = mi_lttng_writer_write_element_string(writer,
 683                         mi_lttng_element_version_web, version->package_url);
 684         if (ret) {
 685                 goto end;
 686         }
 687
 688         /* License: free as in free beer...no...*speech* */
 689         ret = mi_lttng_writer_write_element_string(writer,
 690                         mi_lttng_element_version_license, lttng_license);
 691         if (ret) {
 692                 goto end;
 693         }
 694
 695         /* Close version element */
 696         ret = mi_lttng_writer_close_element(writer);
 697
 698 end:
 699         return ret;
 700 }
 701
 702 LTTNG_HIDDEN
 703 int mi_lttng_sessions_open(struct mi_writer *writer)
 704 {
 705         return mi_lttng_writer_open_element(writer, config_element_sessions);
 706 }
 707
 708 LTTNG_HIDDEN
 709 int mi_lttng_session(struct mi_writer *writer,
 710                 struct lttng_session *session, int is_open)
 711 {
 712         int ret;
 713
 714         assert(session);
 715
 716         /* Open sessions element */
 717         ret = mi_lttng_writer_open_element(writer,
 718                         config_element_session);
 719         if (ret) {
 720                 goto end;
 721         }
 722
 723         /* Name of the session */
 724         ret = mi_lttng_writer_write_element_string(writer,
 725                         config_element_name, session->name);
 726         if (ret) {
 727                 goto end;
 728         }
 729
 730         /* Path */
 731         ret = mi_lttng_writer_write_element_string(writer,
 732                         config_element_path, session->path);
 733         if (ret) {
 734                 goto end;
 735         }
 736
 737         /* Enabled ? */
 738         ret = mi_lttng_writer_write_element_bool(writer,
 739                         config_element_enabled, session->enabled);
 740         if (ret) {
 741                 goto end;
 742         }
 743
 744         /* Snapshot mode */
 745         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 746                         config_element_snapshot_mode, session->snapshot_mode);
 747         if (ret) {
 748                 goto end;
 749         }
 750
 751         /* Live timer interval in usec */
 752         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 753                         config_element_live_timer_interval,
 754                         session->live_timer_interval);
 755         if (ret) {
 756                 goto end;
 757         }
 758
 759         if (!is_open) {
 760                 /* Closing session element */
 761                 ret = mi_lttng_writer_close_element(writer);
 762         }
 763 end:
 764         return ret;
 765
 766 }
 767
 768 LTTNG_HIDDEN
 769 int mi_lttng_domains_open(struct mi_writer *writer)
 770 {
 771         return mi_lttng_writer_open_element(writer, config_element_domains);
 772 }
 773
 774 LTTNG_HIDDEN
 775 int mi_lttng_domain(struct mi_writer *writer,
 776                 struct lttng_domain *domain, int is_open)
 777 {
 778         int ret = 0;
 779         const char *str_domain;
 780         const char *str_buffer;
 781
 782         assert(domain);
 783
 784         /* Open domain element */
 785         ret = mi_lttng_writer_open_element(writer, config_element_domain);
 786         if (ret) {
 787                 goto end;
 788         }
 789
 790         /* Domain Type */
 791         str_domain = mi_lttng_domaintype_string(domain->type);
 792         ret = mi_lttng_writer_write_element_string(writer, config_element_type,
 793                         str_domain);
 794         if (ret) {
 795                 goto end;
 796         }
 797
 798         /* Buffer Type */
 799         str_buffer= mi_lttng_buffertype_string(domain->buf_type);
 800         ret = mi_lttng_writer_write_element_string(writer,
 801                         config_element_buffer_type, str_buffer);
 802         if (ret) {
 803                 goto end;
 804         }
 805
 806         /* TODO: union  attr
 807          * This union is not currently used and was added for
 808          * future ust domain support.
 809          * Date: 25-06-2014
 810          * */
 811
 812         if (!is_open) {
 813                 /* Closing domain element */
 814                 ret = mi_lttng_writer_close_element(writer);
 815         }
 816
 817 end:
 818         return ret;
 819
 820 }
 821
 822 LTTNG_HIDDEN
 823 int mi_lttng_channels_open(struct mi_writer *writer)
 824 {
 825         return mi_lttng_writer_open_element(writer, config_element_channels);
 826 }
 827
 828 LTTNG_HIDDEN
 829 int mi_lttng_channel(struct mi_writer *writer,
 830                 struct lttng_channel *channel, int is_open)
 831 {
 832         int ret = 0;
 833
 834         assert(channel);
 835
 836         /* Opening channel element */
 837         ret = mi_lttng_writer_open_element(writer, config_element_channel);
 838         if (ret) {
 839                 goto end;
 840         }
 841
 842         /* Name */
 843         ret = mi_lttng_writer_write_element_string(writer, config_element_name,
 844                         channel->name);
 845         if (ret) {
 846                 goto end;
 847         }
 848
 849         /* Enabled ? */
 850         ret = mi_lttng_writer_write_element_bool(writer,
 851                         config_element_enabled, channel->enabled);
 852         if (ret) {
 853                 goto end;
 854         }
 855
 856         /* Attribute */
 857         ret = mi_lttng_channel_attr(writer, &channel->attr);
 858         if (ret) {
 859                 goto end;
 860         }
 861
 862         if (!is_open) {
 863                 /* Closing channel element */
 864                 ret = mi_lttng_writer_close_element(writer);
 865                 if (ret) {
 866                         goto end;
 867                 }
 868         }
 869 end:
 870         return ret;
 871 }
 872
 873 LTTNG_HIDDEN
 874 int mi_lttng_channel_attr(struct mi_writer *writer,
 875                 struct lttng_channel_attr *attr)
 876 {
 877         int ret = 0;
 878         struct lttng_channel *chan = caa_container_of(attr,
 879                         struct lttng_channel, attr);
 880         uint64_t discarded_events, lost_packets;
 881
 882         assert(attr);
 883
 884         ret = lttng_channel_get_discarded_event_count(chan, &discarded_events);
 885         if (ret) {
 886                 goto end;
 887         }
 888
 889         ret = lttng_channel_get_lost_packet_count(chan, &lost_packets);
 890         if (ret) {
 891                 goto end;
 892         }
 893
 894         /* Opening Attributes */
 895         ret = mi_lttng_writer_open_element(writer, config_element_attributes);
 896         if (ret) {
 897                 goto end;
 898         }
 899
 900         /* Overwrite */
 901         ret = mi_lttng_writer_write_element_string(writer,
 902                 config_element_overwrite_mode,
 903                 attr->overwrite ? config_overwrite_mode_overwrite :
 904                         config_overwrite_mode_discard);
 905         if (ret) {
 906                 goto end;
 907         }
 908
 909         /* Sub buffer size in byte */
 910         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 911                 config_element_subbuf_size, attr->subbuf_size);
 912         if (ret) {
 913                 goto end;
 914         }
 915
 916         /* Number of subbuffer (power of two) */
 917         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 918                 config_element_num_subbuf,
 919                 attr->num_subbuf);
 920         if (ret) {
 921                 goto end;
 922         }
 923
 924         /* Switch timer interval in usec */
 925         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 926                 config_element_switch_timer_interval,
 927                 attr->switch_timer_interval);
 928         if (ret) {
 929                 goto end;
 930         }
 931
 932         /* Read timer interval in usec */
 933         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 934                 config_element_read_timer_interval,
 935                 attr->read_timer_interval);
 936         if (ret) {
 937                 goto end;
 938         }
 939
 940         /* Event output */
 941         ret = mi_lttng_writer_write_element_string(writer,
 942                 config_element_output_type,
 943                 attr->output == LTTNG_EVENT_SPLICE ?
 944                 config_output_type_splice : config_output_type_mmap);
 945         if (ret) {
 946                 goto end;
 947         }
 948
 949         /* Tracefile size in bytes */
 950         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 951                 config_element_tracefile_size, attr->tracefile_size);
 952         if (ret) {
 953                 goto end;
 954         }
 955
 956         /* Count of tracefiles */
 957         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 958                 config_element_tracefile_count,
 959                 attr->tracefile_count);
 960         if (ret) {
 961                 goto end;
 962         }
 963
 964         /* Live timer interval in usec*/
 965         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 966                 config_element_live_timer_interval,
 967                 attr->live_timer_interval);
 968         if (ret) {
 969                 goto end;
 970         }
 971
 972         /* Discarded events */
 973         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 974                 config_element_discarded_events,
 975                 discarded_events);
 976         if (ret) {
 977                 goto end;
 978         }
 979
 980         /* Lost packets */
 981         ret = mi_lttng_writer_write_element_unsigned_int(writer,
 982                 config_element_lost_packets,
 983                 lost_packets);
 984         if (ret) {
 985                 goto end;
 986         }
 987
 988         /* Closing attributes */
 989         ret = mi_lttng_writer_close_element(writer);
 990         if (ret) {
 991                 goto end;
 992         }
 993 end:
 994         return ret;
 995
 996 }
 997
 998 LTTNG_HIDDEN
 999 int mi_lttng_event_common_attributes(struct mi_writer *writer,
1000                 struct lttng_event *event)
1001 {
1002         int ret;
1003         const char *filter_expression;
1004
1005         /* Open event element */
1006         ret = mi_lttng_writer_open_element(writer, config_element_event);
1007         if (ret) {
1008                 goto end;
1009         }
1010
1011         /* Event name */
1012         ret = mi_lttng_writer_write_element_string(writer,
1013                         config_element_name, event->name);
1014         if (ret) {
1015                 goto end;
1016         }
1017
1018         /* Event type */
1019         ret = mi_lttng_writer_write_element_string(writer,
1020                         config_element_type, mi_lttng_eventtype_string(event->type));
1021         if (ret) {
1022                 goto end;
1023         }
1024
1025         /* Is event enabled */
1026         ret = mi_lttng_writer_write_element_bool(writer,
1027                         config_element_enabled, event->enabled);
1028         if (ret) {
1029                 goto end;
1030         }
1031
1032         /* Event filter expression */
1033         ret = lttng_event_get_filter_expression(event, &filter_expression);
1034         if (ret) {
1035                 goto end;
1036         }
1037
1038         if (filter_expression) {
1039                 ret = mi_lttng_writer_write_element_string(writer,
1040                                 config_element_filter_expression,
1041                                 filter_expression);
1042                 if (ret) {
1043                         goto end;
1044                 }
1045         }
1046
1047 end:
1048         return ret;
1049 }
1050
1051 static int write_event_exclusions(struct mi_writer *writer,
1052                 struct lttng_event *event)
1053 {
1054         int i;
1055         int ret;
1056         int exclusion_count;
1057
1058         /* Open event exclusions */
1059         ret = mi_lttng_writer_open_element(writer, config_element_exclusions);
1060         if (ret) {
1061                 goto end;
1062         }
1063
1064         exclusion_count = lttng_event_get_exclusion_name_count(event);
1065         if (exclusion_count < 0) {
1066                 ret = exclusion_count;
1067                 goto end;
1068         }
1069
1070         for (i = 0; i < exclusion_count; i++) {
1071                 const char *name;
1072
1073                 ret = lttng_event_get_exclusion_name(event, i, &name);
1074                 if (ret) {
1075                         /* Close exclusions */
1076                         mi_lttng_writer_close_element(writer);
1077                         goto end;
1078                 }
1079
1080                 ret = mi_lttng_writer_write_element_string(writer,
1081                                 config_element_exclusion, name);
1082                 if (ret) {
1083                         /* Close exclusions */
1084                         mi_lttng_writer_close_element(writer);
1085                         goto end;
1086                 }
1087         }
1088
1089         /* Close exclusions */
1090         ret = mi_lttng_writer_close_element(writer);
1091
1092 end:
1093         return ret;
1094 }
1095
1096 LTTNG_HIDDEN
1097 int mi_lttng_event_tracepoint_loglevel(struct mi_writer *writer,
1098                 struct lttng_event *event, enum lttng_domain_type domain)
1099 {
1100         int ret;
1101
1102         /* Event loglevel */
1103         ret = mi_lttng_writer_write_element_string(writer,
1104                         config_element_loglevel,
1105                         mi_lttng_loglevel_string(event->loglevel, domain));
1106         if (ret) {
1107                 goto end;
1108         }
1109
1110         /* Log level type */
1111         ret = mi_lttng_writer_write_element_string(writer,
1112                         config_element_loglevel_type,
1113                         mi_lttng_logleveltype_string(event->loglevel_type));
1114         if (ret) {
1115                 goto end;
1116         }
1117
1118         /* Event exclusions */
1119         ret = write_event_exclusions(writer, event);
1120
1121 end:
1122         return ret;
1123 }
1124
1125 LTTNG_HIDDEN
1126 int mi_lttng_event_tracepoint_no_loglevel(struct mi_writer *writer,
1127                 struct lttng_event *event)
1128 {
1129         /* event exclusion filter */
1130         return write_event_exclusions(writer, event);
1131 }
1132
1133 LTTNG_HIDDEN
1134 int mi_lttng_event_function_probe(struct mi_writer *writer,
1135                 struct lttng_event *event)
1136 {
1137         int ret;
1138
1139         ret = mi_lttng_writer_open_element(writer, config_element_attributes);
1140         if (ret) {
1141                 goto end;
1142         }
1143
1144         ret = mi_lttng_writer_open_element(writer, config_element_probe_attributes);
1145         if (ret) {
1146                 goto end;
1147         }
1148
1149         if (event->attr.probe.addr != 0) {
1150                 /* event probe address */
1151                 ret = mi_lttng_writer_write_element_unsigned_int(writer,
1152                                 config_element_address, event->attr.probe.addr);
1153                 if (ret) {
1154                         goto end;
1155                 }
1156         } else {
1157                 /* event probe offset */
1158                 ret = mi_lttng_writer_write_element_unsigned_int(writer,
1159                                 config_element_offset, event->attr.probe.offset);
1160                 if (ret) {
1161                         goto end;
1162                 }
1163
1164                 /* event probe symbol_name */
1165                 ret = mi_lttng_writer_write_element_string(writer,
1166                                 config_element_symbol_name, event->attr.probe.symbol_name);
1167                 if (ret) {
1168                         goto end;
1169                 }
1170         }
1171
1172         /* Close probe_attributes and attributes */
1173         ret = mi_lttng_close_multi_element(writer, 2);
1174 end:
1175         return ret;
1176 }
1177
1178 LTTNG_HIDDEN
1179 int mi_lttng_event_function_entry(struct mi_writer *writer,
1180                 struct lttng_event *event)
1181 {
1182         int ret;
1183
1184         ret = mi_lttng_writer_open_element(writer, config_element_attributes);
1185         if (ret) {
1186                 goto end;
1187         }
1188
1189         ret = mi_lttng_writer_open_element(writer, config_element_probe_attributes);
1190         if (ret) {
1191                 goto end;
1192         }
1193
1194         /* event probe symbol_name */
1195         ret = mi_lttng_writer_write_element_string(writer,
1196                         config_element_symbol_name, event->attr.ftrace.symbol_name);
1197         if (ret) {
1198                 goto end;
1199         }
1200
1201         /* Close function_attributes and attributes */
1202         ret = mi_lttng_close_multi_element(writer, 2);
1203 end:
1204         return ret;
1205 }
1206
1207 LTTNG_HIDDEN
1208 int mi_lttng_events_open(struct mi_writer *writer)
1209 {
1210         return mi_lttng_writer_open_element(writer, config_element_events);
1211 }
1212
1213 LTTNG_HIDDEN
1214 int mi_lttng_event(struct mi_writer *writer,
1215                 struct lttng_event *event, int is_open, enum lttng_domain_type domain)
1216 {
1217         int ret;
1218
1219         ret = mi_lttng_event_common_attributes(writer, event);
1220         if (ret) {
1221                 goto end;
1222         }
1223
1224         switch (event->type) {
1225         case LTTNG_EVENT_TRACEPOINT:
1226         {
1227                 if (event->loglevel != -1) {
1228                         ret = mi_lttng_event_tracepoint_loglevel(writer, event, domain);
1229                 } else {
1230                         ret = mi_lttng_event_tracepoint_no_loglevel(writer, event);
1231                 }
1232                 break;
1233         }
1234         case LTTNG_EVENT_FUNCTION:
1235                 /* Fallthrough */
1236         case LTTNG_EVENT_PROBE:
1237                 ret = mi_lttng_event_function_probe(writer, event);
1238                 break;
1239         case LTTNG_EVENT_FUNCTION_ENTRY:
1240                 ret = mi_lttng_event_function_entry(writer, event);
1241                 break;
1242         case LTTNG_EVENT_ALL:
1243                 /* Fallthrough */
1244         default:
1245                 break;
1246         }
1247
1248         if (!is_open) {
1249                 ret = mi_lttng_writer_close_element(writer);
1250         }
1251
1252 end:
1253         return ret;
1254 }
1255
1256 LTTNG_HIDDEN
1257 int mi_lttng_trackers_open(struct mi_writer *writer)
1258 {
1259         return mi_lttng_writer_open_element(writer, config_element_trackers);
1260 }
1261
1262 LTTNG_HIDDEN
1263 int mi_lttng_pid_tracker_open(struct mi_writer *writer)
1264 {
1265         int ret;
1266
1267         /* Open element pid_tracker */
1268         ret = mi_lttng_writer_open_element(writer, config_element_pid_tracker);
1269         if (ret) {
1270                 goto end;
1271         }
1272
1273         /* Open targets element */
1274         ret = mi_lttng_targets_open(writer);
1275 end:
1276         return ret;
1277 }
1278
1279 LTTNG_HIDDEN
1280 int mi_lttng_pids_open(struct mi_writer *writer)
1281 {
1282         return mi_lttng_writer_open_element(writer, config_element_pids);
1283 }
1284
1285 /*
1286  * TODO: move the listing of pid for user agent to process semantic on
1287  * mi api bump. The use of process element break the mi api.
1288  */
1289 LTTNG_HIDDEN
1290 int mi_lttng_pid(struct mi_writer *writer, pid_t pid , const char *name,
1291                 int is_open)
1292 {
1293         int ret;
1294
1295         /* Open pid process */
1296         ret = mi_lttng_writer_open_element(writer, config_element_pid);
1297         if (ret) {
1298                 goto end;
1299         }
1300
1301         /* Writing pid number */
1302         ret = mi_lttng_writer_write_element_signed_int(writer,
1303                         mi_lttng_element_pid_id, (int)pid);
1304         if (ret) {
1305                 goto end;
1306         }
1307
1308         /* Writing name of the process */
1309         if (name) {
1310                 ret = mi_lttng_writer_write_element_string(writer, config_element_name,
1311                                 name);
1312                 if (ret) {
1313                         goto end;
1314                 }
1315         }
1316
1317         if (!is_open) {
1318                 /* Closing Pid */
1319                 ret = mi_lttng_writer_close_element(writer);
1320         }
1321
1322 end:
1323         return ret;
1324 }
1325
1326 LTTNG_HIDDEN
1327 int mi_lttng_targets_open(struct mi_writer *writer)
1328 {
1329         return mi_lttng_writer_open_element(writer,
1330                         config_element_targets);
1331 }
1332
1333 LTTNG_HIDDEN
1334 int mi_lttng_pid_target(struct mi_writer *writer, pid_t pid, int is_open)
1335 {
1336         int ret;
1337
1338         ret = mi_lttng_writer_open_element(writer,
1339                         config_element_target_pid);
1340         if (ret) {
1341                 goto end;
1342         }
1343
1344         /* Writing pid number
1345          * Special case for element all on track untrack command
1346          * All pid is represented as wildcard *
1347          */
1348         if ((int) pid == -1) {
1349                 ret = mi_lttng_writer_write_element_string(writer,
1350                                 config_element_pid,
1351                                 mi_lttng_element_track_untrack_all_wildcard);
1352         } else {
1353                 ret = mi_lttng_writer_write_element_signed_int(writer,
1354                                 config_element_pid, (int) pid);
1355         }
1356         if (ret) {
1357                 goto end;
1358         }
1359
1360         if (!is_open) {
1361                 ret = mi_lttng_writer_close_element(writer);
1362                 if (ret) {
1363                         goto end;
1364                 }
1365         }
1366
1367 end:
1368         return ret;
1369 }
1370
1371 LTTNG_HIDDEN
1372 int mi_lttng_event_fields_open(struct mi_writer *writer)
1373 {
1374         return mi_lttng_writer_open_element(writer, mi_lttng_element_event_fields);
1375 }
1376
1377 LTTNG_HIDDEN
1378 int mi_lttng_event_field(struct mi_writer *writer,
1379                 struct lttng_event_field *field)
1380 {
1381         int ret;
1382
1383         if (!field->field_name[0]) {
1384                 ret = 0;
1385                 goto end;
1386         }
1387
1388         /* Open field */
1389         ret = mi_lttng_writer_open_element(writer, mi_lttng_element_event_field);
1390         if (ret) {
1391                 goto end;
1392         }
1393
1394         if (!field->field_name[0]) {
1395                 goto close;
1396         }
1397
1398         /* Name */
1399         ret = mi_lttng_writer_write_element_string(writer, config_element_name,
1400                         field->field_name);
1401         if (ret) {
1402                 goto end;
1403         }
1404
1405         /* Type */
1406         ret = mi_lttng_writer_write_element_string(writer, config_element_type,
1407                         mi_lttng_eventfieldtype_string(field->type));
1408         if (ret) {
1409                 goto end;
1410         }
1411
1412         /* nowrite  */
1413         ret = mi_lttng_writer_write_element_signed_int(writer,
1414                         mi_lttng_element_nowrite, field->nowrite);
1415         if (ret) {
1416                 goto end;
1417         }
1418
1419 close:
1420         /* Close field element */
1421         ret = mi_lttng_writer_close_element(writer);
1422
1423 end:
1424         return ret;
1425 }
1426
1427 LTTNG_HIDDEN
1428 int mi_lttng_calibrate(struct mi_writer *writer,
1429                 struct lttng_calibrate *calibrate)
1430 {
1431         int ret;
1432
1433         /* Open calibrate element */
1434         ret = mi_lttng_writer_open_element(writer, mi_lttng_element_calibrate);
1435         if (ret) {
1436                 goto end;
1437         }
1438
1439         /* Calibration type */
1440         ret = mi_lttng_writer_write_element_string(writer, config_element_type,
1441                         mi_lttng_calibratetype_string(calibrate->type));
1442         if (ret) {
1443                 goto end;
1444         }
1445
1446         /* Closing calibrate element */
1447         ret = mi_lttng_writer_close_element(writer);
1448 end:
1449         return ret;
1450 }
1451
1452 LTTNG_HIDDEN
1453 int mi_lttng_perf_counter_context(struct mi_writer *writer,
1454                 struct lttng_event_perf_counter_ctx  *perf_context)
1455 {
1456         int ret;
1457
1458         /* Open perf_counter_context */
1459         ret = mi_lttng_writer_open_element(writer,
1460                         mi_lttng_element_perf_counter_context);
1461         if (ret) {
1462                 goto end;
1463         }
1464
1465         /* Type */
1466         ret = mi_lttng_writer_write_element_unsigned_int(writer,
1467                         config_element_type, perf_context->type);
1468         if (ret) {
1469                 goto end;
1470         }
1471
1472         /* Config */
1473         ret = mi_lttng_writer_write_element_unsigned_int(writer,
1474                         config_element_config, perf_context->config);
1475         if (ret) {
1476                 goto end;
1477         }
1478
1479         /* Name of the perf counter */
1480         ret = mi_lttng_writer_write_element_string(writer,
1481                         config_element_name, perf_context->name);
1482         if (ret) {
1483                 goto end;
1484         }
1485
1486         /* Close perf_counter_context */
1487         ret = mi_lttng_writer_close_element(writer);
1488 end:
1489         return ret;
1490 }
1491
1492 static
1493 int mi_lttng_app_context(struct mi_writer *writer,
1494                 const char *provider_name, const char *ctx_name)
1495 {
1496         int ret;
1497
1498         /* Open app */
1499         ret = mi_lttng_writer_open_element(writer,
1500                         config_element_context_app);
1501         if (ret) {
1502                 goto end;
1503         }
1504
1505         /* provider_name */
1506         ret = mi_lttng_writer_write_element_string(writer,
1507                         config_element_context_app_provider_name,
1508                         provider_name);
1509         if (ret) {
1510                 goto end;
1511         }
1512
1513         /* ctx_name */
1514         ret = mi_lttng_writer_write_element_string(writer,
1515                         config_element_context_app_ctx_name, ctx_name);
1516         if (ret) {
1517                 goto end;
1518         }
1519
1520         /* Close app */
1521         ret = mi_lttng_writer_close_element(writer);
1522 end:
1523         return ret;
1524 }
1525
1526 LTTNG_HIDDEN
1527 int mi_lttng_context(struct mi_writer *writer,
1528                 struct lttng_event_context *context, int is_open)
1529 {
1530         int ret;
1531
1532         /* Open context */
1533         ret = mi_lttng_writer_open_element(writer , config_element_context);
1534         if (ret) {
1535                 goto end;
1536         }
1537
1538         /* Special case for PERF_*_COUNTER
1539          * print the lttng_event_perf_counter_ctx*/
1540         switch (context->ctx) {
1541         case LTTNG_EVENT_CONTEXT_PERF_COUNTER:
1542         case LTTNG_EVENT_CONTEXT_PERF_THREAD_COUNTER:
1543         case LTTNG_EVENT_CONTEXT_PERF_CPU_COUNTER:
1544         {
1545                 struct lttng_event_perf_counter_ctx *perf_context =
1546                                 &context->u.perf_counter;
1547                 ret =  mi_lttng_perf_counter_context(writer, perf_context);
1548                 if (ret) {
1549                         goto end;
1550                 }
1551                 break;
1552         }
1553         case LTTNG_EVENT_CONTEXT_APP_CONTEXT:
1554         {
1555                 ret = mi_lttng_app_context(writer,
1556                                 context->u.app_ctx.provider_name,
1557                                 context->u.app_ctx.ctx_name);
1558                 if (ret) {
1559                         goto end;
1560                 }
1561                 break;
1562         }
1563         default:
1564         {
1565                 const char *type_string = mi_lttng_event_contexttype_string(
1566                                 context->ctx);
1567                 if (!type_string) {
1568                         ret = -LTTNG_ERR_INVALID;
1569                         goto end;
1570                 }
1571
1572                 /* Print context type */
1573                 ret = mi_lttng_writer_write_element_string(writer,
1574                                 config_element_type, type_string);
1575                 break;
1576         }
1577         }
1578
1579         /* Close context */
1580         if (!is_open) {
1581                 ret = mi_lttng_writer_close_element(writer);
1582         }
1583
1584 end:
1585         return ret;
1586 }
1587
1588 LTTNG_HIDDEN
1589 int mi_lttng_snapshot_output_session_name(struct mi_writer *writer,
1590                 const char *session_name)
1591 {
1592         int ret;
1593
1594         /* Open session element */
1595         ret = mi_lttng_writer_open_element(writer, config_element_session);
1596         if (ret) {
1597                 goto end;
1598         }
1599
1600         /* Snapshot output list for current session name */
1601         ret = mi_lttng_writer_write_element_string(writer, config_element_name,
1602                         session_name);
1603         if (ret) {
1604                 goto end;
1605         }
1606
1607         /* Open element snapshots (sequence one snapshot) */
1608         ret = mi_lttng_writer_open_element(writer, mi_lttng_element_snapshots);
1609         if (ret) {
1610                 goto end;
1611         }
1612
1613 end:
1614         return ret;
1615 }
1616
1617 LTTNG_HIDDEN
1618 int mi_lttng_snapshot_list_output(struct mi_writer *writer,
1619                 struct lttng_snapshot_output *output)
1620 {
1621         int ret;
1622
1623         /* Open element snapshot output */
1624         ret = mi_lttng_writer_open_element(writer,
1625                         mi_lttng_element_command_snapshot);
1626         if (ret) {
1627                 goto end;
1628         }
1629
1630         /* ID of the snapshot output */
1631         ret = mi_lttng_writer_write_element_unsigned_int(writer,
1632                         mi_lttng_element_id, output->id);
1633         if (ret) {
1634                 goto end;
1635         }
1636
1637         /* Name of the output */
1638         ret = mi_lttng_writer_write_element_string(writer, config_element_name,
1639                         output->name);
1640         if (ret) {
1641                 goto end;
1642         }
1643
1644         /* Destination of the output (ctrl_url)*/
1645         ret = mi_lttng_writer_write_element_string(writer,
1646                         mi_lttng_element_snapshot_ctrl_url, output->ctrl_url);
1647         if (ret) {
1648                 goto end;
1649         }
1650
1651         /* Destination of the output (data_url) */
1652         ret = mi_lttng_writer_write_element_string(writer,
1653                         mi_lttng_element_snapshot_data_url, output->data_url);
1654         if (ret) {
1655                 goto end;
1656         }
1657
1658         /* total size of all stream combined */
1659         ret = mi_lttng_writer_write_element_unsigned_int(writer,
1660                         mi_lttng_element_snapshot_max_size, output->max_size);
1661         if (ret) {
1662                 goto end;
1663         }
1664
1665         /* Close snapshot output element */
1666         ret = mi_lttng_writer_close_element(writer);
1667
1668 end:
1669         return ret;
1670 }
1671
1672 LTTNG_HIDDEN
1673 int mi_lttng_snapshot_del_output(struct mi_writer *writer, int id,
1674                 const char *name, const char *current_session_name)
1675 {
1676         int ret;
1677
1678         /* Open element del_snapshot */
1679         ret = mi_lttng_writer_open_element(writer,
1680                         mi_lttng_element_command_snapshot);
1681         if (ret) {
1682                 goto end;
1683         }
1684
1685
1686         if (id != UINT32_MAX) {
1687                 /* "Snapshot output "id" successfully deleted
1688                  * for "current_session_name"
1689                  * ID of the snapshot output
1690                  */
1691                 ret = mi_lttng_writer_write_element_unsigned_int(writer,
1692                                 mi_lttng_element_id, id);
1693                 if (ret) {
1694                         goto end;
1695                 }
1696         } else {
1697                 /* "Snapshot output "name" successfully deleted
1698                  * for session "current_session_name"
1699                  * Name of the output
1700                  */
1701                 ret = mi_lttng_writer_write_element_string(writer, config_element_name,
1702                                 name);
1703                 if (ret) {
1704                         goto end;
1705                 }
1706         }
1707
1708         /* Snapshot was deleted for session "current_session_name"*/
1709         ret = mi_lttng_writer_write_element_string(writer,
1710                         mi_lttng_element_snapshot_session_name,
1711                         current_session_name);
1712         if (ret) {
1713                 goto end;
1714         }
1715
1716         /* Close snapshot element */
1717         ret = mi_lttng_writer_close_element(writer);
1718
1719 end:
1720         return ret;
1721 }
1722
1723 LTTNG_HIDDEN
1724 int mi_lttng_snapshot_add_output(struct mi_writer *writer,
1725                 const char *current_session_name, const char *n_ptr,
1726                 struct lttng_snapshot_output *output)
1727 {
1728         int ret;
1729
1730         /* Open element snapshot */
1731         ret = mi_lttng_writer_open_element(writer,
1732                         mi_lttng_element_command_snapshot);
1733         if (ret) {
1734                 goto end;
1735         }
1736
1737         /* Snapshot output id */
1738         ret = mi_lttng_writer_write_element_unsigned_int(writer,
1739                         mi_lttng_element_id, output->id);
1740         if (ret) {
1741                 goto end;
1742         }
1743
1744         /* Snapshot output names */
1745         ret = mi_lttng_writer_write_element_string(writer,
1746                         config_element_name, n_ptr);
1747         if (ret) {
1748                 goto end;
1749         }
1750
1751         /* Destination of the output (ctrl_url)*/
1752         ret = mi_lttng_writer_write_element_string(writer,
1753                         mi_lttng_element_snapshot_ctrl_url, output->ctrl_url);
1754         if (ret) {
1755                 goto end;
1756         }
1757
1758         /* Snapshot added for session "current_session_name"*/
1759         ret = mi_lttng_writer_write_element_string(writer,
1760                         mi_lttng_element_snapshot_session_name, current_session_name);
1761         if (ret) {
1762                 goto end;
1763         }
1764
1765         /* total size of all stream combined */
1766         ret = mi_lttng_writer_write_element_unsigned_int(writer,
1767                         mi_lttng_element_snapshot_max_size, output->max_size);
1768         if (ret) {
1769                 goto end;
1770         }
1771
1772         /* Close snapshot element */
1773         ret = mi_lttng_writer_close_element(writer);
1774
1775 end:
1776         return ret;
1777 }
1778
1779 LTTNG_HIDDEN
1780 int mi_lttng_snapshot_record(struct mi_writer *writer,
1781                 const char *current_session_name, const char *url,
1782                 const char *cmdline_ctrl_url, const char *cmdline_data_url)
1783 {
1784         int ret;
1785
1786         /* Open element snapshot */
1787         ret = mi_lttng_writer_open_element(writer,
1788                         mi_lttng_element_command_snapshot);
1789         if (ret) {
1790                 goto end;
1791         }
1792
1793         /*
1794          * If a valid an URL was given, serialize it,
1795          * else take the command line data and ctrl urls*/
1796         if (url) {
1797                 /* Destination of the output (ctrl_url)*/
1798                 ret = mi_lttng_writer_write_element_string(writer,
1799                                 mi_lttng_element_snapshot_ctrl_url, url);
1800                 if (ret) {
1801                         goto end;
1802                 }
1803         } else if (cmdline_ctrl_url) {
1804                 /* Destination of the output (ctrl_url)*/
1805                 ret = mi_lttng_writer_write_element_string(writer,
1806                                 mi_lttng_element_snapshot_ctrl_url, cmdline_ctrl_url);
1807                 if (ret) {
1808                         goto end;
1809                 }
1810
1811                 /* Destination of the output (data_url) */
1812                 ret = mi_lttng_writer_write_element_string(writer,
1813                                 mi_lttng_element_snapshot_data_url, cmdline_data_url);
1814                 if (ret) {
1815                         goto end;
1816                 }
1817         }
1818
1819         /* Close record_snapshot element */
1820         ret = mi_lttng_writer_close_element(writer);
1821
1822 end:
1823         return ret;
1824 }