+++ /dev/null
-/*
- * python-complements.c
- *
- * Babeltrace Python module complements, required for Python bindings
- *
- * Copyright 2012 EfficiOS Inc.
- *
- * Author: Danny Serres <danny.serres@efficios.com>
- *
- * Permission is hereby granted, free of charge, to any person obtaining a copy
- * of this software and associated documentation files (the "Software"), to deal
- * in the Software without restriction, including without limitation the rights
- * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
- * copies of the Software, and to permit persons to whom the Software is
- * furnished to do so, subject to the following conditions:
- *
- * The above copyright notice and this permission notice shall be included in
- * all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
- * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
- * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- */
-
-#include "python-complements.h"
-#include <babeltrace/ctf-ir/field-types-internal.h>
-#include <babeltrace/ctf-ir/fields-internal.h>
-#include <babeltrace/ctf-ir/field-types.h>
-#include <babeltrace/ctf-ir/event.h>
-#include <babeltrace/ctf-ir/event-class.h>
-#include <babeltrace/ctf-ir/clock-internal.h>
-#include <babeltrace/iterator.h>
-#include <babeltrace/ctf/iterator.h>
-#include <babeltrace/ctf/events-internal.h>
-#include <glib.h>
-
-/* List-related functions
- ----------------------------------------------------
-*/
-
-/* ctf-field-list */
-struct bt_definition **_bt_python_field_listcaller(
- const struct bt_ctf_event *ctf_event,
- const struct bt_definition *scope,
- unsigned int *len)
-{
- struct bt_definition **list;
- int ret;
-
- ret = bt_ctf_get_field_list(ctf_event, scope,
- (const struct bt_definition * const **)&list, len);
-
- if (ret < 0) /* For python to know an error occured */
- list = NULL;
-
- return list;
-}
-
-struct bt_definition *_bt_python_field_one_from_list(
- struct bt_definition **list, int index)
-{
- return list[index];
-}
-
-/* event_decl_list */
-struct bt_ctf_event_decl **_bt_python_event_decl_listcaller(
- int handle_id,
- struct bt_context *ctx,
- unsigned int *len)
-{
- struct bt_ctf_event_decl **list;
- int ret;
-
- ret = bt_ctf_get_event_decl_list(handle_id, ctx,
- (struct bt_ctf_event_decl * const **)&list, len);
-
- if (ret < 0) /* For python to know an error occured */
- list = NULL;
-
- return list;
-}
-
-struct bt_ctf_event_decl *_bt_python_decl_one_from_list(
- struct bt_ctf_event_decl **list, int index)
-{
- return list[index];
-}
-
-/* decl_fields */
-struct bt_ctf_field_decl **_by_python_field_decl_listcaller(
- struct bt_ctf_event_decl *event_decl,
- enum ctf_scope scope,
- unsigned int *len)
-{
- struct bt_ctf_field_decl **list;
- int ret;
-
- ret = bt_ctf_get_decl_fields(event_decl, scope,
- (const struct bt_ctf_field_decl * const **)&list, len);
-
- if (ret < 0) /* For python to know an error occured */
- list = NULL;
-
- return list;
-}
-
-struct bt_ctf_field_decl *_bt_python_field_decl_one_from_list(
- struct bt_ctf_field_decl **list, int index)
-{
- return list[index];
-}
-
-struct definition_array *_bt_python_get_array_from_def(
- struct bt_definition *field)
-{
- const struct bt_declaration *array_decl;
- struct definition_array *array = NULL;
-
- if (!field) {
- goto end;
- }
-
- array_decl = bt_ctf_get_decl_from_def(field);
- if (bt_ctf_field_type(array_decl) == CTF_TYPE_ARRAY) {
- array = container_of(field, struct definition_array, p);
- }
-end:
- return array;
-}
-
-struct bt_declaration *_bt_python_get_array_element_declaration(
- struct bt_declaration *field)
-{
- struct declaration_array *array_decl;
- struct bt_declaration *ret = NULL;
-
- if (!field) {
- goto end;
- }
-
- array_decl = container_of(field, struct declaration_array, p);
- ret = array_decl->elem;
-end:
- return ret;
-}
-
-struct bt_declaration *_bt_python_get_sequence_element_declaration(
- struct bt_declaration *field)
-{
- struct declaration_sequence *sequence_decl;
- struct bt_declaration *ret = NULL;
-
- if (!field) {
- goto end;
- }
-
- sequence_decl = container_of(field, struct declaration_sequence, p);
- ret = sequence_decl->elem;
-end:
- return ret;
-}
-
-const char *_bt_python_get_array_string(struct bt_definition *field)
-{
- struct definition_array *array;
- const char *ret = NULL;
-
- if (!field) {
- goto end;
- }
-
- array = container_of(field, struct definition_array, p);
- ret = array->string->str;
-end:
- return ret;
-}
-
-const char *_bt_python_get_sequence_string(struct bt_definition *field)
-{
- struct definition_sequence *sequence;
- const char *ret = NULL;
-
- if (!field) {
- goto end;
- }
-
- sequence = container_of(field, struct definition_sequence, p);
- ret = sequence->string->str;
-end:
- return ret;
-}
-
-struct definition_sequence *_bt_python_get_sequence_from_def(
- struct bt_definition *field)
-{
- if (field && bt_ctf_field_type(
- bt_ctf_get_decl_from_def(field)) == CTF_TYPE_SEQUENCE) {
- return container_of(field, struct definition_sequence, p);
- }
-
- return NULL;
-}
-
-int _bt_python_field_integer_get_signedness(const struct bt_ctf_field *field)
-{
- int ret;
-
- if (!field || field->type->declaration->id != CTF_TYPE_INTEGER) {
- ret = -1;
- goto end;
- }
-
- const struct bt_ctf_field_type_integer *type = container_of(field->type,
- const struct bt_ctf_field_type_integer, parent);
- ret = type->declaration.signedness;
-end:
- return ret;
-}
-
-enum ctf_type_id _bt_python_get_field_type(const struct bt_ctf_field *field)
-{
- enum ctf_type_id type_id = CTF_TYPE_UNKNOWN;
-
- if (!field) {
- goto end;
- }
-
- type_id = field->type->declaration->id;
-end:
- return type_id;
-}
-
-/*
- * Swig doesn't handle returning pointers via output arguments properly...
- * These functions only wrap the ctf-ir functions to provide them directly
- * as regular return values.
- */
-const char *_bt_python_ctf_field_type_enumeration_get_mapping(
- struct bt_ctf_field_type *enumeration, size_t index,
- int64_t *range_start, int64_t *range_end)
-{
- int ret;
- const char *name;
-
- ret = bt_ctf_field_type_enumeration_get_mapping(enumeration, index,
- &name, range_start, range_end);
- return !ret ? name : NULL;
-}
-
-const char *_bt_python_ctf_field_type_enumeration_get_mapping_unsigned(
- struct bt_ctf_field_type *enumeration, size_t index,
- uint64_t *range_start, uint64_t *range_end)
-{
- int ret;
- const char *name;
-
- ret = bt_ctf_field_type_enumeration_get_mapping_unsigned(enumeration,
- index, &name, range_start, range_end);
- return !ret ? name : NULL;
-}
-
-const char *_bt_python_ctf_field_type_structure_get_field_name(
- struct bt_ctf_field_type *structure, size_t index)
-{
- int ret;
- const char *name;
- struct bt_ctf_field_type *type;
-
- ret = bt_ctf_field_type_structure_get_field(structure, &name, &type,
- index);
- if (ret) {
- name = NULL;
- goto end;
- }
-
- bt_ctf_field_type_put(type);
-end:
- return name;
-}
-
-struct bt_ctf_field_type *_bt_python_ctf_field_type_structure_get_field_type(
- struct bt_ctf_field_type *structure, size_t index)
-{
- int ret;
- const char *name;
- struct bt_ctf_field_type *type;
-
- ret = bt_ctf_field_type_structure_get_field(structure, &name, &type,
- index);
- return !ret ? type : NULL;
-}
-
-const char *_bt_python_ctf_field_type_variant_get_field_name(
- struct bt_ctf_field_type *variant, size_t index)
-{
- int ret;
- const char *name;
- struct bt_ctf_field_type *type;
-
- ret = bt_ctf_field_type_variant_get_field(variant, &name, &type,
- index);
- if (ret) {
- name = NULL;
- goto end;
- }
-
- bt_ctf_field_type_put(type);
-end:
- return name;
-}
-
-struct bt_ctf_field_type *_bt_python_ctf_field_type_variant_get_field_type(
- struct bt_ctf_field_type *variant, size_t index)
-{
- int ret;
- const char *name;
- struct bt_ctf_field_type *type;
-
- ret = bt_ctf_field_type_variant_get_field(variant, &name, &type,
- index);
- return !ret ? type : NULL;
-}
-
-const char *_bt_python_ctf_event_class_get_field_name(
- struct bt_ctf_event_class *event_class, size_t index)
-{
- int ret;
- const char *name;
- struct bt_ctf_field_type *type;
-
- ret = bt_ctf_event_class_get_field(event_class, &name, &type,
- index);
- if (ret) {
- name = NULL;
- goto end;
- }
-
- bt_ctf_field_type_put(type);
-end:
- return name;
-}
-
-struct bt_ctf_field_type *_bt_python_ctf_event_class_get_field_type(
- struct bt_ctf_event_class *event_class, size_t index)
-{
- int ret;
- const char *name;
- struct bt_ctf_field_type *type;
-
- ret = bt_ctf_event_class_get_field(event_class, &name, &type,
- index);
- return !ret ? type : NULL;
-}
-
-int _bt_python_ctf_clock_get_uuid_index(struct bt_ctf_clock *clock,
- size_t index, unsigned char *value)
-{
- int ret = 0;
- const unsigned char *uuid;
-
- if (index >= 16) {
- ret = -1;
- goto end;
- }
-
- uuid = bt_ctf_clock_get_uuid(clock);
- if (!uuid) {
- ret = -1;
- goto end;
- }
-
- *value = uuid[index];
-end:
- return ret;
-}
-
-int _bt_python_ctf_clock_set_uuid_index(struct bt_ctf_clock *clock,
- size_t index, unsigned char value)
-{
- int ret = 0;
-
- if (index >= 16) {
- ret = -1;
- goto end;
- }
-
- clock->uuid[index] = value;
-end:
- return ret;
-}
-
-/*
- * Python 3.5 changes the StopIteration exception clearing behaviour which
- * erroneously marks swig clean-up function as having failed. This explicit
- * allocation function is intended as a work-around so SWIG doesn't manage
- * the lifetime of a "temporary" object by itself.
- */
-struct bt_iter_pos *_bt_python_create_iter_pos(void)
-{
- return g_new0(struct bt_iter_pos, 1);
-}
-
-struct bt_ctf_iter *_bt_python_ctf_iter_create_intersect(
- struct bt_context *ctx,
- struct bt_iter_pos *inter_begin_pos,
- struct bt_iter_pos *inter_end_pos)
-{
- return bt_ctf_iter_create_intersect(ctx, &inter_begin_pos,
- &inter_end_pos);
-}
-
-int _bt_python_trace_collection_has_intersection(struct bt_context *ctx)
-{
- int ret;
- int64_t begin, end;
-
- ret = ctf_find_tc_stream_packet_intersection_union(ctx, &begin, &end);
-
- return ret == 0 ? 1 : 0;
-}