src.ctf.fs: use C++ value wrappers in queries

[babeltrace.git] / src / plugins / ctf / fs-src / query.cpp

/*
 * SPDX-License-Identifier: MIT
 *
 * Copyright 2017 Jérémie Galarneau <jeremie.galarneau@efficios.com>
 *
 * Babeltrace CTF file system Reader Component queries
 */

#include <glib.h>
#include <glib/gstdio.h>
#include <sys/types.h>

#include <babeltrace2/babeltrace.h>

#include "cpp-common/bt2/exc.hpp"
#include "cpp-common/bt2c/libc-up.hpp"

#include "../common/src/metadata/tsdl/decoder.hpp"
#include "fs.hpp"
#include "query.hpp"

#define METADATA_TEXT_SIG "/* CTF 1.8"

struct range
{
    int64_t begin_ns = 0;
    int64_t end_ns = 0;
    bool set = false;
};

bt2::Value::Shared metadata_info_query(const bt2::ConstMapValue params, const bt2c::Logger& logger)
{
    const auto pathValue = params["path"];
    if (!pathValue) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error,
                                               "Mandatory `path` parameter missing");
    }

    if (!pathValue->isString()) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error,
                                               "`path` parameter is required to be a string value");
    }

    const auto path = pathValue->asString().value();
    bt2c::FileUP metadataFp {ctf_fs_metadata_open_file(path, logger)};
    if (!metadataFp) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error,
                                               "Cannot open trace metadata: path=\"{}\".", path);
    }

    bool is_packetized;
    int bo;
    int ret = ctf_metadata_decoder_is_packetized(metadataFp.get(), &is_packetized, &bo, logger);

    if (ret) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(
            logger, bt2::Error,
            "Cannot check whether or not the metadata stream is packetized: path=\"{}\".", path);
    }

    ctf_metadata_decoder_config decoder_cfg {logger};
    decoder_cfg.keep_plain_text = true;
    ctf_metadata_decoder_up decoder = ctf_metadata_decoder_create(&decoder_cfg);
    if (!decoder) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(
            logger, bt2::Error, "Cannot create metadata decoder: path=\"{}}\".", path);
    }

    rewind(metadataFp.get());
    ctf_metadata_decoder_status decoder_status =
        ctf_metadata_decoder_append_content(decoder.get(), metadataFp.get());
    if (decoder_status) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(
            logger, bt2::Error, "Cannot update metadata decoder's content: path=\"{}\".", path);
    }

    const char *plain_text = ctf_metadata_decoder_get_text(decoder.get());
    std::string metadata_text;

    if (strncmp(plain_text, METADATA_TEXT_SIG, sizeof(METADATA_TEXT_SIG) - 1) != 0) {
        metadata_text = METADATA_TEXT_SIG;
        metadata_text += " */\n\n";
    }

    metadata_text += plain_text;

    const auto result = bt2::MapValue::create();
    result->insert("text", metadata_text);
    result->insert("is-packetized", is_packetized);

    return result;
}

static void add_range(const bt2::MapValue info, struct range *range, const char *range_name)
{
    if (!range->set) {
        /* Not an error. */
        return;
    }

    const auto rangeMap = info.insertEmptyMap(range_name);
    rangeMap.insert("begin", range->begin_ns);
    rangeMap.insert("end", range->end_ns);
}

static void populate_stream_info(struct ctf_fs_ds_file_group *group, const bt2::MapValue groupInfo,
                                 struct range *stream_range, const bt2c::Logger& logger)
{
    /*
     * Since each `struct ctf_fs_ds_file_group` has a sorted array of
     * `struct ctf_fs_ds_index_entry`, we can compute the stream range from
     * the timestamp_begin of the first index entry and the timestamp_end
     * of the last index entry.
     */
    BT_ASSERT(group->index);
    BT_ASSERT(group->index->entries);
    BT_ASSERT(group->index->entries->len > 0);

    /* First entry. */
    ctf_fs_ds_index_entry *first_ds_index_entry =
        (struct ctf_fs_ds_index_entry *) g_ptr_array_index(group->index->entries, 0);

    /* Last entry. */
    ctf_fs_ds_index_entry *last_ds_index_entry = (struct ctf_fs_ds_index_entry *) g_ptr_array_index(
        group->index->entries, group->index->entries->len - 1);

    stream_range->begin_ns = first_ds_index_entry->timestamp_begin_ns;
    stream_range->end_ns = last_ds_index_entry->timestamp_end_ns;

    /*
     * If any of the begin and end timestamps is not set it means that
     * packets don't include `timestamp_begin` _and_ `timestamp_end` fields
     * in their packet context so we can't set the range.
     */
    stream_range->set =
        stream_range->begin_ns != UINT64_C(-1) && stream_range->end_ns != UINT64_C(-1);

    add_range(groupInfo, stream_range, "range-ns");

    bt2c::GCharUP portName = ctf_fs_make_port_name(group);
    if (!portName) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error, "Failed to make port name");
    }

    groupInfo.insert("port-name", portName.get());
}

static void populate_trace_info(const struct ctf_fs_trace *trace, const bt2::MapValue traceInfo,
                                const bt2c::Logger& logger)
{
    BT_ASSERT(trace->ds_file_groups);
    /* Add trace range info only if it contains streams. */
    if (trace->ds_file_groups->len == 0) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(
            logger, bt2::Error, "Trace has no streams: trace-path={}", trace->path->str);
    }

    const auto fileGroups = traceInfo.insertEmptyArray("stream-infos");

    /* Find range of all stream groups, and of the trace. */
    for (size_t group_idx = 0; group_idx < trace->ds_file_groups->len; group_idx++) {
        range group_range;
        ctf_fs_ds_file_group *group =
            (ctf_fs_ds_file_group *) g_ptr_array_index(trace->ds_file_groups, group_idx);

        const auto groupInfo = fileGroups.appendEmptyMap();
        populate_stream_info(group, groupInfo, &group_range, logger);
    }
}

bt2::Value::Shared trace_infos_query(const bt2::ConstMapValue params, const bt2c::Logger& logger)
{
    ctf_fs_component::UP ctf_fs = ctf_fs_component_create(logger);
    if (!ctf_fs) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error,
                                               "Cannot create ctf_fs_component");
    }

    const bt_value *inputs_value = NULL;
    const bt_value *trace_name_value;

    if (!read_src_fs_parameters(params.libObjPtr(), &inputs_value, &trace_name_value,
                                ctf_fs.get())) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error, "Failed to read parameters");
    }

    if (ctf_fs_component_create_ctf_fs_trace(ctf_fs.get(), inputs_value, trace_name_value, NULL)) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error, "Failed to create trace");
    }

    const auto result = bt2::ArrayValue::create();
    const auto traceInfo = result->appendEmptyMap();
    populate_trace_info(ctf_fs->trace, traceInfo, logger);

    return result;
}

bt2::Value::Shared support_info_query(const bt2::ConstMapValue params, const bt2c::Logger& logger)
{
    const auto typeValue = params["type"];
    BT_ASSERT(typeValue);
    BT_ASSERT(typeValue->isString());
    const auto type = typeValue->asString().value();

    if (strcmp(type, "directory") != 0) {
        const auto result = bt2::MapValue::create();
        result->insert("weight", 0.0f);
        return result;
    }

    const auto inputValue = params["input"];
    BT_ASSERT(inputValue);
    BT_ASSERT(inputValue->isString());
    const auto input = inputValue->asString().value();

    bt2c::GCharUP metadataPath {g_build_filename(input, CTF_FS_METADATA_FILENAME, NULL)};
    if (!metadataPath) {
        BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error, "Failed to read parameters");
    }

    double weight = 0;
    char uuid_str[BT_UUID_STR_LEN + 1];
    bool has_uuid = false;
    bt2c::FileUP metadataFile {g_fopen(metadataPath.get(), "rb")};
    if (metadataFile) {
        enum ctf_metadata_decoder_status decoder_status;
        bt_uuid_t uuid;

        ctf_metadata_decoder_config metadata_decoder_config {logger};

        ctf_metadata_decoder_up metadata_decoder =
            ctf_metadata_decoder_create(&metadata_decoder_config);
        if (!metadata_decoder) {
            BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(logger, bt2::Error,
                                                   "Failed to create metadata decoder");
        }

        decoder_status =
            ctf_metadata_decoder_append_content(metadata_decoder.get(), metadataFile.get());
        if (decoder_status != CTF_METADATA_DECODER_STATUS_OK) {
            BT_CPPLOGE_APPEND_CAUSE_AND_THROW_SPEC(
                logger, bt2::Error, "Failed to append metadata content: metadata-decoder-status={}",
                decoder_status);
        }

        /*
         * We were able to parse the metadata file, so we are
         * confident it's a CTF trace.
         */
        weight = 0.75;

        /* If the trace has a UUID, return the stringified UUID as the group. */
        if (ctf_metadata_decoder_get_trace_class_uuid(metadata_decoder.get(), uuid) == 0) {
            bt_uuid_to_str(uuid, uuid_str);
            has_uuid = true;
        }
    }

    const auto result = bt2::MapValue::create();
    result->insert("weight", weight);

    /* We are not supposed to have weight == 0 and a UUID. */
    BT_ASSERT(weight > 0 || !has_uuid);

    if (weight > 0 && has_uuid) {
        result->insert("group", uuid_str);
    }

    return result;
}