src/common/common.h

   1 #ifndef BABELTRACE_COMMON_INTERNAL_H
   2 #define BABELTRACE_COMMON_INTERNAL_H
   3
   4 /*
   5  * Copyright (c) 2018 EfficiOS Inc. and Linux Foundation
   6  * Copyright (c) 2018 Philippe Proulx <pproulx@efficios.com>
   7  *
   8  * Permission is hereby granted, free of charge, to any person obtaining a copy
   9  * of this software and associated documentation files (the "Software"), to deal
  10  * in the Software without restriction, including without limitation the rights
  11  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  12  * copies of the Software, and to permit persons to whom the Software is
  13  * furnished to do so, subject to the following conditions:
  14  *
  15  * The above copyright notice and this permission notice shall be included in
  16  * all copies or substantial portions of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  19  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  20  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  21  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  22  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  23  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  24  * SOFTWARE.
  25  */
  26
  27 #include <errno.h>
  28 #include <glib.h>
  29 #include <inttypes.h>
  30 #include <stdarg.h>
  31 #include <stdbool.h>
  32 #include <stdint.h>
  33 #include <stdlib.h>
  34 #include <stdio.h>
  35 #include <unistd.h>
  36 #include <string.h>
  37
  38 #include <babeltrace2/babeltrace.h>
  39
  40 #define __BT_IN_BABELTRACE_H
  41 #include <babeltrace2/func-status.h>
  42
  43 #include "common/assert.h"
  44 #include "common/macros.h"
  45 #include "common/safe.h"
  46
  47 #define BT_COMMON_COLOR_RESET              "\033[0m"
  48 #define BT_COMMON_COLOR_BOLD               "\033[1m"
  49 #define BT_COMMON_COLOR_FG_DEFAULT         "\033[39m"
  50 #define BT_COMMON_COLOR_FG_RED             "\033[31m"
  51 #define BT_COMMON_COLOR_FG_GREEN           "\033[32m"
  52 #define BT_COMMON_COLOR_FG_YELLOW          "\033[33m"
  53 #define BT_COMMON_COLOR_FG_BLUE            "\033[34m"
  54 #define BT_COMMON_COLOR_FG_MAGENTA         "\033[35m"
  55 #define BT_COMMON_COLOR_FG_CYAN            "\033[36m"
  56 #define BT_COMMON_COLOR_FG_LIGHT_GRAY      "\033[37m"
  57 #define BT_COMMON_COLOR_BG_DEFAULT         "\033[49m"
  58 #define BT_COMMON_COLOR_BG_RED             "\033[41m"
  59 #define BT_COMMON_COLOR_BG_GREEN           "\033[42m"
  60 #define BT_COMMON_COLOR_BG_YELLOW          "\033[43m"
  61 #define BT_COMMON_COLOR_BG_BLUE            "\033[44m"
  62 #define BT_COMMON_COLOR_BG_MAGENTA         "\033[45m"
  63 #define BT_COMMON_COLOR_BG_CYAN            "\033[46m"
  64 #define BT_COMMON_COLOR_BG_LIGHT_GRAY      "\033[47m"
  65
  66 struct bt_common_lttng_live_url_parts {
  67         GString *proto;
  68         GString *hostname;
  69         GString *target_hostname;
  70         GString *session_name;
  71
  72         /* -1 means default port */
  73         int port;
  74 };
  75
  76 /*
  77  * Checks if the current process has setuid or setgid access rights.
  78  * Returns `true` if so.
  79  */
  80 BT_HIDDEN
  81 bool bt_common_is_setuid_setgid(void);
  82
  83 /*
  84  * Returns the system-wide plugin path, e.g.
  85  * `/usr/lib/babeltrace2/plugins`. Do not free the return value.
  86  */
  87 BT_HIDDEN
  88 const char *bt_common_get_system_plugin_path(void);
  89
  90 /*
  91  * Returns the user plugin path, e.g.
  92  * `/home/user/.local/lib/babeltrace2/plugins`. You need to free the
  93  * return value.
  94  */
  95 BT_HIDDEN
  96 char *bt_common_get_home_plugin_path(int log_level);
  97
  98 /*
  99  * Appends the list of directories in `paths` to the array `dirs`.
 100  * `paths` is a list of directories separated by `:`. Returns 0 on
 101  * success.
 102  */
 103 BT_HIDDEN
 104 int bt_common_append_plugin_path_dirs(const char *paths, GPtrArray *dirs);
 105
 106 /*
 107  * Returns `true` if terminal color codes are supported for this
 108  * process.
 109  */
 110 BT_HIDDEN
 111 bool bt_common_colors_supported(void);
 112
 113 BT_HIDDEN
 114 const char *bt_common_color_reset(void);
 115
 116 BT_HIDDEN
 117 const char *bt_common_color_bold(void);
 118
 119 BT_HIDDEN
 120 const char *bt_common_color_fg_default(void);
 121
 122 BT_HIDDEN
 123 const char *bt_common_color_fg_red(void);
 124
 125 BT_HIDDEN
 126 const char *bt_common_color_fg_green(void);
 127
 128 BT_HIDDEN
 129 const char *bt_common_color_fg_yellow(void);
 130
 131 BT_HIDDEN
 132 const char *bt_common_color_fg_blue(void);
 133
 134 BT_HIDDEN
 135 const char *bt_common_color_fg_magenta(void);
 136
 137 BT_HIDDEN
 138 const char *bt_common_color_fg_cyan(void);
 139
 140 BT_HIDDEN
 141 const char *bt_common_color_fg_light_gray(void);
 142
 143 BT_HIDDEN
 144 const char *bt_common_color_bg_default(void);
 145
 146 BT_HIDDEN
 147 const char *bt_common_color_bg_red(void);
 148
 149 BT_HIDDEN
 150 const char *bt_common_color_bg_green(void);
 151
 152 BT_HIDDEN
 153 const char *bt_common_color_bg_yellow(void);
 154
 155 BT_HIDDEN
 156 const char *bt_common_color_bg_blue(void);
 157
 158 BT_HIDDEN
 159 const char *bt_common_color_bg_magenta(void);
 160
 161 BT_HIDDEN
 162 const char *bt_common_color_bg_cyan(void);
 163
 164 BT_HIDDEN
 165 const char *bt_common_color_bg_light_gray(void);
 166
 167 /*
 168  * Returns the substring from `input` to the first character found
 169  * in the list of characters `end_chars`, unescaping any character
 170  * found in `escapable_chars`, and sets `*end_pos` to the position of
 171  * the end (from `input`). The caller owns the returned GString.
 172  */
 173 BT_HIDDEN
 174 GString *bt_common_string_until(const char *input, const char *escapable_chars,
 175                     const char *end_chars, size_t *end_pos);
 176
 177 /*
 178  * Returns the quoted version of `input` for a shell. If
 179  * `with_single_quotes` is `true`, prepends and appends the `'` prefix
 180  * and suffix to the returned string; otherwise the caller should
 181  * prepend and append them manually, although they are not always
 182  * required. The caller owns the returned GString.
 183  */
 184 BT_HIDDEN
 185 GString *bt_common_shell_quote(const char *input, bool with_single_quotes);
 186
 187 /*
 188  * Returns `true` if `input` is a string made only of printable
 189  * characters.
 190  */
 191 BT_HIDDEN
 192 bool bt_common_string_is_printable(const char *input);
 193
 194 /*
 195  * Destroys the parts of an LTTng live URL as returned by
 196  * bt_common_parse_lttng_live_url().
 197  */
 198 BT_HIDDEN
 199 void bt_common_destroy_lttng_live_url_parts(
 200                 struct bt_common_lttng_live_url_parts *parts);
 201
 202 /*
 203  * Parses the LTTng live URL `url` and returns its different parts.
 204  * If there's an error, writes the error message into `*error_buf`
 205  * up to `error_buf_size` bytes. You must destroy the returned value
 206  * with bt_common_destroy_lttng_live_url_parts().
 207  */
 208 BT_HIDDEN
 209 struct bt_common_lttng_live_url_parts bt_common_parse_lttng_live_url(
 210                 const char *url, char *error_buf, size_t error_buf_size);
 211
 212 /*
 213  * Normalizes (in place) a star globbing pattern to be used with
 214  * bt_common_star_glob_match(). This function always succeeds.
 215  */
 216 BT_HIDDEN
 217 void bt_common_normalize_star_glob_pattern(char *pattern);
 218
 219 /*
 220  * Returns `true` if `candidate` (of size `candidate_len`) matches
 221  * the star globbing pattern `pattern` (of size `pattern_len`).
 222  */
 223 BT_HIDDEN
 224 bool bt_common_star_glob_match(const char *pattern, size_t pattern_len,
 225                 const char *candidate, size_t candidate_len);
 226
 227 /*
 228  * Normalizes the path `path`:
 229  *
 230  * * If it's a relative path, converts it to an absolute path using
 231  *   `wd` as the working directory (or the current working directory
 232  *   if `wd` is NULL).
 233  * * Removes consecutive and trailing slashes.
 234  * * Resolves `..` and `.` in the path (both in `path` and in `wd`).
 235  * * Does NOT resolve symbolic links.
 236  *
 237  * The caller owns the returned GString.
 238  */
 239 BT_HIDDEN
 240 GString *bt_common_normalize_path(const char *path, const char *wd);
 241
 242 typedef void (* bt_common_handle_custom_specifier_func)(void *priv_data,
 243                 char **buf, size_t avail_size, const char **fmt, va_list *args);
 244
 245 /*
 246  * This is a custom vsnprintf() which handles the standard conversion
 247  * specifier as well as custom ones.
 248  *
 249  * `fmt` is a typical printf()-style format string, with the following
 250  * limitations:
 251  *
 252  * * The `*` width specifier is not accepted.
 253  * * The `*` precision specifier is not accepted.
 254  * * The `j` and `t` length modifiers are not accepted.
 255  * * The `n` format specifier is not accepted.
 256  * * The format specifiers defined in <inttypes.h> are not accepted
 257  *   except for `PRId64`, `PRIu64`, `PRIx64`, `PRIX64`, `PRIo64`, and
 258  *   `PRIi64`.
 259  *
 260  * `intro` specifies which special character immediately following an
 261  * introductory `%` character in `fmt` is used to indicate a custom
 262  * conversion specifier. For example, if `intro` is '@', then any `%@`
 263  * sequence in `fmt` is the beginning of a custom conversion specifier.
 264  *
 265  * When a custom conversion specifier is encountered in `fmt`,
 266  * the function calls `handle_specifier`. This callback receives:
 267  *
 268  * `priv_data`:
 269  *     Custom, private data.
 270  *
 271  * `buf`:
 272  *     Address of the current buffer pointer. `*buf` is the position to
 273  *     append new data. The callback must update `*buf` when appending
 274  *     new data. The callback must ensure not to write passed the whole
 275  *     buffer passed to bt_common_custom_vsnprintf().
 276  *
 277  * `avail_size`:
 278  *     Number of bytes left in whole buffer from the `*buf` point.
 279  *
 280  * `fmt`:
 281  *     Address of the current format string pointer. `*fmt` points to
 282  *     the introductory `%` character, which is followed by the
 283  *     character `intro`. The callback must update `*fmt` so that it
 284  *     points after the whole custom conversion specifier.
 285  *
 286  * `args`:
 287  *     Variable argument list. Use va_arg() to get new arguments from
 288  *     this list and update it at the same time.
 289  *
 290  * Because this is an internal utility, this function and its callback
 291  * do not return error codes: they abort when there's any error (bad
 292  * format string, for example).
 293  */
 294 BT_HIDDEN
 295 void bt_common_custom_vsnprintf(char *buf, size_t buf_size,
 296                 char intro,
 297                 bt_common_handle_custom_specifier_func handle_specifier,
 298                 void *priv_data, const char *fmt, va_list *args);
 299
 300 /*
 301  * Variadic form of bt_common_custom_vsnprintf().
 302  */
 303 BT_HIDDEN
 304 void bt_common_custom_snprintf(char *buf, size_t buf_size,
 305                 char intro,
 306                 bt_common_handle_custom_specifier_func handle_specifier,
 307                 void *priv_data, const char *fmt, ...);
 308
 309 /*
 310  * Returns the system page size.
 311  */
 312 BT_HIDDEN
 313 size_t bt_common_get_page_size(int log_level);
 314
 315 /*
 316  * Adds the digit separator `sep` as many times as needed to form groups
 317  * of `digits_per_group` digits within `str`. `str` must have enough
 318  * room to accomodate the new separators, that is:
 319  *
 320  *     strlen(str) + (strlen(str) / digits_per_group) + 1
 321  *
 322  * Example: with `str` `1983198398213`, `digits_per_group` 3, and `sep`
 323  * `,`, `str` becomes `1,983,198,398,213`.
 324  *
 325  * `strlen(str)` must not be 0. `digits_per_group` must not be 0. `sep`
 326  * must not be `\0`.
 327  */
 328 BT_HIDDEN
 329 void bt_common_sep_digits(char *str, unsigned int digits_per_group, char sep);
 330
 331 /*
 332  * This is similar to what the command `fold --spaces` does: it wraps
 333  * the input lines of `str`, breaking at spaces, and indenting each line
 334  * with `indent` spaces so that each line fits the total length
 335  * `total_length`.
 336  *
 337  * If an original line in `str` contains a word which is >= the content
 338  * length (`total_length - indent`), then the corresponding folded line
 339  * is also larger than the content length. In other words, breaking at
 340  * spaces is a best effort, but it might not be possible.
 341  *
 342  * The returned string, on success, is owned by the caller.
 343  */
 344 BT_HIDDEN
 345 GString *bt_common_fold(const char *str, unsigned int total_length,
 346                 unsigned int indent);
 347
 348 /*
 349  * Writes the terminal's width to `*width`, its height to `*height`,
 350  * and returns 0 on success, or returns -1 on error.
 351  */
 352 BT_HIDDEN
 353 int bt_common_get_term_size(unsigned int *width, unsigned int *height);
 354
 355 /*
 356  * Appends the textual content of `fp` to `str`, starting from its
 357  * current position to the end of the file.
 358  *
 359  * This function does NOT rewind `fp` once it's done or on error.
 360  */
 361 BT_HIDDEN
 362 int bt_common_append_file_content_to_g_string(GString *str, FILE *fp);
 363
 364 /*
 365  * Wraps read() function to handle EINTR and partial reads.
 366  * On success, it returns `count` received as parameter. On error, it returns a
 367  * value smaller than the requested `count`.
 368  */
 369 static inline
 370 ssize_t bt_common_read(int fd, void *buf, size_t count, int log_level)
 371 {
 372         size_t i = 0;
 373         ssize_t ret;
 374
 375         BT_ASSERT(buf);
 376
 377         /* Never return an overflow value. */
 378         BT_ASSERT(count <= SSIZE_MAX);
 379
 380         do {
 381                 ret = read(fd, buf + i, count - i);
 382                 if (ret < 0) {
 383                         if (errno == EINTR) {
 384 #ifdef BT_LOG_WRITE_CUR_LVL
 385                                 BT_LOG_WRITE_CUR_LVL(BT_LOG_DEBUG, log_level,
 386                                         BT_LOG_TAG,
 387                                         "read() call interrupted; retrying...");
 388 #endif
 389                                 /* retry operation */
 390                                 continue;
 391                         } else {
 392 #ifdef BT_LOG_WRITE_ERRNO_CUR_LVL
 393                                 BT_LOG_WRITE_ERRNO_CUR_LVL(BT_LOG_ERROR,
 394                                         log_level, BT_LOG_TAG,
 395                                         "Error while reading", ": fd=%d", fd);
 396 #endif
 397                                 goto end;
 398                         }
 399                 }
 400                 i += ret;
 401                 BT_ASSERT(i <= count);
 402         } while (count - i > 0 && ret > 0);
 403
 404 end:
 405         if (ret >= 0) {
 406                 if (i == 0) {
 407                         ret = -1;
 408                 } else {
 409                         ret = i;
 410                 }
 411         }
 412
 413         return ret;
 414 }
 415
 416 static inline
 417 const char *bt_common_field_class_type_string(enum bt_field_class_type class_type)
 418 {
 419         switch (class_type) {
 420         case BT_FIELD_CLASS_TYPE_BOOL:
 421                 return "BOOL";
 422         case BT_FIELD_CLASS_TYPE_BIT_ARRAY:
 423                 return "BIT_ARRAY";
 424         case BT_FIELD_CLASS_TYPE_UNSIGNED_INTEGER:
 425                 return "UNSIGNED_INTEGER";
 426         case BT_FIELD_CLASS_TYPE_SIGNED_INTEGER:
 427                 return "SIGNED_INTEGER";
 428         case BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION:
 429                 return "UNSIGNED_ENUMERATION";
 430         case BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION:
 431                 return "SIGNED_ENUMERATION";
 432         case BT_FIELD_CLASS_TYPE_SINGLE_PRECISION_REAL:
 433                 return "SINGLE_PRECISION_REAL";
 434         case BT_FIELD_CLASS_TYPE_DOUBLE_PRECISION_REAL:
 435                 return "DOUBLE_PRECISION_REAL";
 436         case BT_FIELD_CLASS_TYPE_STRING:
 437                 return "STRING";
 438         case BT_FIELD_CLASS_TYPE_STRUCTURE:
 439                 return "STRUCTURE";
 440         case BT_FIELD_CLASS_TYPE_STATIC_ARRAY:
 441                 return "STATIC_ARRAY";
 442         case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY_WITHOUT_LENGTH_FIELD:
 443                 return "DYNAMIC_ARRAY_WITHOUT_LENGTH_FIELD";
 444         case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY_WITH_LENGTH_FIELD:
 445                 return "DYNAMIC_ARRAY_WITH_LENGTH_FIELD";
 446         case BT_FIELD_CLASS_TYPE_OPTION_WITHOUT_SELECTOR_FIELD:
 447                 return "OPTION_WITHOUT_SELECTOR_FIELD";
 448         case BT_FIELD_CLASS_TYPE_OPTION_WITH_BOOL_SELECTOR_FIELD:
 449                 return "OPTION_WITH_BOOL_SELECTOR_FIELD";
 450         case BT_FIELD_CLASS_TYPE_OPTION_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD:
 451                 return "OPTION_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD";
 452         case BT_FIELD_CLASS_TYPE_OPTION_WITH_SIGNED_INTEGER_SELECTOR_FIELD:
 453                 return "OPTION_WITH_SIGNED_INTEGER_SELECTOR_FIELD";
 454         case BT_FIELD_CLASS_TYPE_VARIANT_WITHOUT_SELECTOR_FIELD:
 455                 return "VARIANT_WITHOUT_SELECTOR_FIELD";
 456         case BT_FIELD_CLASS_TYPE_VARIANT_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD:
 457                 return "VARIANT_WITH_UNSIGNED_INTEGER_SELECTOR_FIELD";
 458         case BT_FIELD_CLASS_TYPE_VARIANT_WITH_SIGNED_INTEGER_SELECTOR_FIELD:
 459                 return "VARIANT_WITH_SIGNED_INTEGER_SELECTOR_FIELD";
 460         default:
 461                 return "(unknown)";
 462         }
 463 };
 464
 465 static inline
 466 const char *bt_common_field_class_integer_preferred_display_base_string(enum bt_field_class_integer_preferred_display_base base)
 467 {
 468         switch (base) {
 469         case BT_FIELD_CLASS_INTEGER_PREFERRED_DISPLAY_BASE_BINARY:
 470                 return "BINARY";
 471         case BT_FIELD_CLASS_INTEGER_PREFERRED_DISPLAY_BASE_OCTAL:
 472                 return "OCTAL";
 473         case BT_FIELD_CLASS_INTEGER_PREFERRED_DISPLAY_BASE_DECIMAL:
 474                 return "DECIMAL";
 475         case BT_FIELD_CLASS_INTEGER_PREFERRED_DISPLAY_BASE_HEXADECIMAL:
 476                 return "HEXADECIMAL";
 477         default:
 478                 return "(unknown)";
 479         }
 480 }
 481
 482 static inline
 483 const char *bt_common_scope_string(enum bt_field_path_scope scope)
 484 {
 485         switch (scope) {
 486         case BT_FIELD_PATH_SCOPE_PACKET_CONTEXT:
 487                 return "PACKET_CONTEXT";
 488         case BT_FIELD_PATH_SCOPE_EVENT_COMMON_CONTEXT:
 489                 return "EVENT_COMMON_CONTEXT";
 490         case BT_FIELD_PATH_SCOPE_EVENT_SPECIFIC_CONTEXT:
 491                 return "EVENT_SPECIFIC_CONTEXT";
 492         case BT_FIELD_PATH_SCOPE_EVENT_PAYLOAD:
 493                 return "EVENT_PAYLOAD";
 494         default:
 495                 return "(unknown)";
 496         }
 497 }
 498
 499 static inline
 500 const char *bt_common_event_class_log_level_string(
 501                 enum bt_event_class_log_level level)
 502 {
 503         switch (level) {
 504         case BT_EVENT_CLASS_LOG_LEVEL_EMERGENCY:
 505                 return "EMERGENCY";
 506         case BT_EVENT_CLASS_LOG_LEVEL_ALERT:
 507                 return "ALERT";
 508         case BT_EVENT_CLASS_LOG_LEVEL_CRITICAL:
 509                 return "CRITICAL";
 510         case BT_EVENT_CLASS_LOG_LEVEL_ERROR:
 511                 return "ERROR";
 512         case BT_EVENT_CLASS_LOG_LEVEL_WARNING:
 513                 return "WARNING";
 514         case BT_EVENT_CLASS_LOG_LEVEL_NOTICE:
 515                 return "NOTICE";
 516         case BT_EVENT_CLASS_LOG_LEVEL_INFO:
 517                 return "INFO";
 518         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_SYSTEM:
 519                 return "DEBUG_SYSTEM";
 520         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_PROGRAM:
 521                 return "DEBUG_PROGRAM";
 522         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_PROCESS:
 523                 return "DEBUG_PROCESS";
 524         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_MODULE:
 525                 return "DEBUG_MODULE";
 526         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_UNIT:
 527                 return "DEBUG_UNIT";
 528         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_FUNCTION:
 529                 return "DEBUG_FUNCTION";
 530         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG_LINE:
 531                 return "DEBUG_LINE";
 532         case BT_EVENT_CLASS_LOG_LEVEL_DEBUG:
 533                 return "DEBUG";
 534         default:
 535                 return "(unknown)";
 536         }
 537 };
 538
 539 static inline
 540 const char *bt_common_value_type_string(enum bt_value_type type)
 541 {
 542         switch (type) {
 543         case BT_VALUE_TYPE_NULL:
 544                 return "NULL";
 545         case BT_VALUE_TYPE_BOOL:
 546                 return "BOOL";
 547         case BT_VALUE_TYPE_UNSIGNED_INTEGER:
 548                 return "UNSIGNED_INTEGER";
 549         case BT_VALUE_TYPE_SIGNED_INTEGER:
 550                 return "SIGNED_INTEGER";
 551         case BT_VALUE_TYPE_REAL:
 552                 return "REAL";
 553         case BT_VALUE_TYPE_STRING:
 554                 return "STRING";
 555         case BT_VALUE_TYPE_ARRAY:
 556                 return "ARRAY";
 557         case BT_VALUE_TYPE_MAP:
 558                 return "MAP";
 559         default:
 560                 return "(unknown)";
 561         }
 562 };
 563
 564 static inline
 565 GString *bt_common_field_path_string(struct bt_field_path *path)
 566 {
 567         GString *str = g_string_new(NULL);
 568         uint64_t i;
 569
 570         BT_ASSERT(path);
 571
 572         if (!str) {
 573                 goto end;
 574         }
 575
 576         g_string_append_printf(str, "[%s", bt_common_scope_string(
 577                 bt_field_path_get_root_scope(path)));
 578
 579         for (i = 0; i < bt_field_path_get_item_count(path); i++) {
 580                 const struct bt_field_path_item *fp_item =
 581                         bt_field_path_borrow_item_by_index_const(path, i);
 582
 583                 switch (bt_field_path_item_get_type(fp_item)) {
 584                 case BT_FIELD_PATH_ITEM_TYPE_INDEX:
 585                         g_string_append_printf(str, ", %" PRIu64,
 586                                 bt_field_path_item_index_get_index(fp_item));
 587                         break;
 588                 case BT_FIELD_PATH_ITEM_TYPE_CURRENT_ARRAY_ELEMENT:
 589                         g_string_append(str, ", <CUR>");
 590                         break;
 591                 default:
 592                         abort();
 593                 }
 594         }
 595
 596         g_string_append(str, "]");
 597
 598 end:
 599         return str;
 600 }
 601
 602 static inline
 603 const char *bt_common_logging_level_string(
 604                 enum bt_logging_level level)
 605 {
 606         switch (level) {
 607         case BT_LOGGING_LEVEL_TRACE:
 608                 return "TRACE";
 609         case BT_LOGGING_LEVEL_DEBUG:
 610                 return "DEBUG";
 611         case BT_LOGGING_LEVEL_INFO:
 612                 return "INFO";
 613         case BT_LOGGING_LEVEL_WARNING:
 614                 return "WARNING";
 615         case BT_LOGGING_LEVEL_ERROR:
 616                 return "ERROR";
 617         case BT_LOGGING_LEVEL_FATAL:
 618                 return "FATAL";
 619         case BT_LOGGING_LEVEL_NONE:
 620                 return "NONE";
 621         default:
 622                 return "(unknown)";
 623         }
 624 };
 625
 626 static inline
 627 const char *bt_common_func_status_string(int status)
 628 {
 629         switch (status) {
 630         case __BT_FUNC_STATUS_OVERFLOW_ERROR:
 631                 return "OVERFLOW";
 632         case __BT_FUNC_STATUS_UNKNOWN_OBJECT:
 633                 return "UNKNOWN_OBJECT";
 634         case __BT_FUNC_STATUS_MEMORY_ERROR:
 635                 return "MEMORY_ERROR";
 636         case __BT_FUNC_STATUS_ERROR:
 637                 return "ERROR";
 638         case __BT_FUNC_STATUS_OK:
 639                 return "OK";
 640         case __BT_FUNC_STATUS_END:
 641                 return "END";
 642         case __BT_FUNC_STATUS_NOT_FOUND:
 643                 return "NOT_FOUND";
 644         case __BT_FUNC_STATUS_AGAIN:
 645                 return "AGAIN";
 646         case __BT_FUNC_STATUS_INTERRUPTED:
 647                 return "INTERRUPTED";
 648         default:
 649                 return "(unknown)";
 650         }
 651 }
 652
 653 #define NS_PER_S_I      INT64_C(1000000000)
 654 #define NS_PER_S_U      UINT64_C(1000000000)
 655
 656 static inline
 657 int bt_common_clock_value_from_ns_from_origin(
 658                 int64_t cc_offset_seconds, uint64_t cc_offset_cycles,
 659                 uint64_t cc_freq, int64_t ns_from_origin,
 660                 uint64_t *raw_value)
 661 {
 662         int ret = 0;
 663         int64_t offset_in_ns;
 664         uint64_t value_in_ns;
 665         uint64_t rem_value_in_ns;
 666         uint64_t value_periods;
 667         uint64_t value_period_cycles;
 668         int64_t ns_to_add;
 669
 670         BT_ASSERT(raw_value);
 671
 672         /* Compute offset part of requested value, in nanoseconds */
 673         if (!bt_safe_to_mul_int64(cc_offset_seconds, NS_PER_S_I)) {
 674                 ret = -1;
 675                 goto end;
 676         }
 677
 678         offset_in_ns = cc_offset_seconds * NS_PER_S_I;
 679
 680         if (cc_freq == NS_PER_S_U) {
 681                 ns_to_add = (int64_t) cc_offset_cycles;
 682         } else {
 683                 if (!bt_safe_to_mul_int64((int64_t) cc_offset_cycles,
 684                                 NS_PER_S_I)) {
 685                         ret = -1;
 686                         goto end;
 687                 }
 688
 689                 ns_to_add = ((int64_t) cc_offset_cycles * NS_PER_S_I) /
 690                         (int64_t) cc_freq;
 691         }
 692
 693         if (!bt_safe_to_add_int64(offset_in_ns, ns_to_add)) {
 694                 ret = -1;
 695                 goto end;
 696         }
 697
 698         offset_in_ns += ns_to_add;
 699
 700         /* Value part in nanoseconds */
 701         if (ns_from_origin < offset_in_ns) {
 702                 ret = -1;
 703                 goto end;
 704         }
 705
 706         value_in_ns = (uint64_t) (ns_from_origin - offset_in_ns);
 707
 708         /* Number of whole clock periods in `value_in_ns` */
 709         value_periods = value_in_ns / NS_PER_S_U;
 710
 711         /* Remaining nanoseconds in cycles + whole clock periods in cycles */
 712         rem_value_in_ns = value_in_ns - value_periods * NS_PER_S_U;
 713
 714         if (value_periods > UINT64_MAX / cc_freq) {
 715                 ret = -1;
 716                 goto end;
 717         }
 718
 719         if (!bt_safe_to_mul_uint64(value_periods, cc_freq)) {
 720                 ret = -1;
 721                 goto end;
 722         }
 723
 724         value_period_cycles = value_periods * cc_freq;
 725
 726         if (!bt_safe_to_mul_uint64(cc_freq, rem_value_in_ns)) {
 727                 ret = -1;
 728                 goto end;
 729         }
 730
 731         if (!bt_safe_to_add_uint64(cc_freq * rem_value_in_ns / NS_PER_S_U,
 732                         value_period_cycles)) {
 733                 ret = -1;
 734                 goto end;
 735         }
 736
 737         *raw_value = cc_freq * rem_value_in_ns / NS_PER_S_U +
 738                 value_period_cycles;
 739
 740 end:
 741         return ret;
 742 }
 743
 744 /*
 745  * bt_g_string_append_printf cannot be inlined because it expects a
 746  * variadic argument list.
 747  */
 748 BT_HIDDEN
 749 int bt_common_g_string_append_printf(GString *str, const char *fmt, ...);
 750
 751 static inline
 752 void bt_common_g_string_append(GString *str, const char *s)
 753 {
 754         gsize len, allocated_len, s_len;
 755
 756         /* str->len excludes \0. */
 757         len = str->len;
 758         /* Exclude \0. */
 759         allocated_len = str->allocated_len - 1;
 760         s_len = strlen(s);
 761         if (G_UNLIKELY(allocated_len < len + s_len)) {
 762                 /* Resize. */
 763                 g_string_set_size(str, len + s_len);
 764         } else {
 765                 str->len = len + s_len;
 766         }
 767         memcpy(str->str + len, s, s_len + 1);
 768 }
 769
 770 static inline
 771 void bt_common_g_string_append_c(GString *str, char c)
 772 {
 773         gsize len, allocated_len, s_len;
 774
 775         /* str->len excludes \0. */
 776         len = str->len;
 777         /* Exclude \0. */
 778         allocated_len = str->allocated_len - 1;
 779         s_len = 1;
 780         if (G_UNLIKELY(allocated_len < len + s_len)) {
 781                 /* Resize. */
 782                 g_string_set_size(str, len + s_len);
 783         } else {
 784                 str->len = len + s_len;
 785         }
 786         str->str[len] = c;
 787         str->str[len + 1] = '\0';
 788 }
 789
 790 #endif /* BABELTRACE_COMMON_INTERNAL_H */