/*
- * lttng-bytecode.c
- *
- * LTTng UST bytecode code.
+ * SPDX-License-Identifier: MIT
*
* Copyright (C) 2010-2016 Mathieu Desnoyers <mathieu.desnoyers@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
- * SOFTWARE.
+ * LTTng UST bytecode code.
*/
#define _LGPL_SOURCE
#include <urcu/rculist.h>
+#include "context-internal.h"
#include "lttng-bytecode.h"
#include "ust-events-internal.h"
[ BYTECODE_OP_RETURN_S64 ] = "RETURN_S64",
};
-const char *print_op(enum bytecode_op op)
+const char *lttng_bytecode_print_op(enum bytecode_op op)
{
if (op >= NR_BYTECODE_OPS)
return "UNKNOWN";
/* compute field offset */
switch (fields[i].type.atype) {
case atype_integer:
- case atype_enum:
case atype_enum_nestable:
field_offset += sizeof(int64_t);
break;
- case atype_array:
case atype_array_nestable:
- case atype_sequence:
case atype_sequence_nestable:
field_offset += sizeof(unsigned long);
field_offset += sizeof(void *);
field_ref = (struct field_ref *) op->data;
switch (field->type.atype) {
case atype_integer:
- case atype_enum:
case atype_enum_nestable:
op->op = BYTECODE_OP_LOAD_FIELD_REF_S64;
break;
- case atype_array:
case atype_array_nestable:
- case atype_sequence:
case atype_sequence_nestable:
op->op = BYTECODE_OP_LOAD_FIELD_REF_SEQUENCE;
break;
struct load_op *op;
struct lttng_ctx_field *ctx_field;
int idx;
- struct lttng_ctx *ctx = *runtime->p.pctx;
+ struct lttng_ctx **pctx = runtime->p.priv->pctx;
dbg_printf("Apply context reloc: %u %s\n", reloc_offset, context_name);
/* Get context index */
- idx = lttng_get_context_index(ctx, context_name);
+ idx = lttng_get_context_index(*pctx, context_name);
if (idx < 0) {
if (lttng_context_is_app(context_name)) {
int ret;
ret = lttng_ust_add_app_context_to_ctx_rcu(context_name,
- &ctx);
+ pctx);
if (ret)
return ret;
- idx = lttng_get_context_index(ctx, context_name);
+ idx = lttng_get_context_index(*pctx, context_name);
if (idx < 0)
return -ENOENT;
} else {
return -EINVAL;
/* Get context return type */
- ctx_field = &ctx->fields[idx];
+ ctx_field = &(*pctx)->fields[idx];
op = (struct load_op *) &runtime->code[reloc_offset];
switch (bytecode_op) {
field_ref = (struct field_ref *) op->data;
switch (ctx_field->event_field.type.atype) {
case atype_integer:
- case atype_enum:
case atype_enum_nestable:
op->op = BYTECODE_OP_GET_CONTEXT_REF_S64;
break;
/* Sequence and array supported as string */
case atype_string:
- case atype_array:
case atype_array_nestable:
- case atype_sequence:
case atype_sequence_nestable:
op->op = BYTECODE_OP_GET_CONTEXT_REF_STRING;
break;
struct lttng_bytecode_runtime *bc_runtime;
cds_list_for_each_entry(bc_runtime, bytecode_runtime_head, node) {
- if (bc_runtime->bc == bytecode)
+ if (bc_runtime->priv->bc == bytecode)
return 1;
}
return 0;
* bytecode runtime.
*/
static
-int _lttng_filter_link_bytecode(const struct lttng_event_desc *event_desc,
+int link_bytecode(const struct lttng_event_desc *event_desc,
struct lttng_ctx **ctx,
struct lttng_ust_bytecode_node *bytecode,
+ struct cds_list_head *bytecode_runtime_head,
struct cds_list_head *insert_loc)
{
int ret, offset, next_offset;
struct bytecode_runtime *runtime = NULL;
+ struct lttng_ust_bytecode_runtime_private *runtime_priv = NULL;
size_t runtime_alloc_len;
if (!bytecode)
return 0;
/* Bytecode already linked */
- if (bytecode_is_linked(bytecode, insert_loc))
+ if (bytecode_is_linked(bytecode, bytecode_runtime_head))
return 0;
dbg_printf("Linking...\n");
ret = -ENOMEM;
goto alloc_error;
}
- runtime->p.bc = bytecode;
- runtime->p.pctx = ctx;
+ runtime_priv = zmalloc(sizeof(struct lttng_ust_bytecode_runtime_private));
+ if (!runtime_priv) {
+ free(runtime);
+ runtime = NULL;
+ ret = -ENOMEM;
+ goto alloc_error;
+ }
+ runtime->p.priv = runtime_priv;
+ runtime_priv->pub = runtime;
+ runtime_priv->bc = bytecode;
+ runtime_priv->pctx = ctx;
runtime->len = bytecode->bc.reloc_offset;
/* copy original bytecode */
memcpy(runtime->code, bytecode->bc.data, runtime->len);
if (ret) {
goto link_error;
}
- runtime->p.filter = lttng_bytecode_filter_interpret;
- runtime->p.link_failed = 0;
+
+ switch (bytecode->type) {
+ case LTTNG_UST_BYTECODE_NODE_TYPE_FILTER:
+ runtime->p.interpreter_funcs.filter = lttng_bytecode_filter_interpret;
+ break;
+ case LTTNG_UST_BYTECODE_NODE_TYPE_CAPTURE:
+ runtime->p.interpreter_funcs.capture = lttng_bytecode_capture_interpret;
+ break;
+ default:
+ abort();
+ }
+
+ runtime->p.priv->link_failed = 0;
cds_list_add_rcu(&runtime->p.node, insert_loc);
dbg_printf("Linking successful.\n");
return 0;
link_error:
- runtime->p.filter = lttng_bytecode_filter_interpret_false;
- runtime->p.link_failed = 1;
+ switch (bytecode->type) {
+ case LTTNG_UST_BYTECODE_NODE_TYPE_FILTER:
+ runtime->p.interpreter_funcs.filter = lttng_bytecode_filter_interpret_false;
+ break;
+ case LTTNG_UST_BYTECODE_NODE_TYPE_CAPTURE:
+ runtime->p.interpreter_funcs.capture = lttng_bytecode_capture_interpret_false;
+ break;
+ default:
+ abort();
+ }
+
+ runtime_priv->link_failed = 1;
cds_list_add_rcu(&runtime->p.node, insert_loc);
alloc_error:
dbg_printf("Linking failed.\n");
return ret;
}
-void lttng_filter_sync_state(struct lttng_bytecode_runtime *runtime)
+void lttng_bytecode_filter_sync_state(struct lttng_bytecode_runtime *runtime)
+{
+ struct lttng_ust_bytecode_node *bc = runtime->priv->bc;
+
+ if (!bc->enabler->enabled || runtime->priv->link_failed)
+ runtime->interpreter_funcs.filter = lttng_bytecode_filter_interpret_false;
+ else
+ runtime->interpreter_funcs.filter = lttng_bytecode_filter_interpret;
+}
+
+void lttng_bytecode_capture_sync_state(struct lttng_bytecode_runtime *runtime)
{
- struct lttng_ust_bytecode_node *bc = runtime->bc;
+ struct lttng_ust_bytecode_node *bc = runtime->priv->bc;
- if (!bc->enabler->enabled || runtime->link_failed)
- runtime->filter = lttng_bytecode_filter_interpret_false;
+ if (!bc->enabler->enabled || runtime->priv->link_failed)
+ runtime->interpreter_funcs.capture = lttng_bytecode_capture_interpret_false;
else
- runtime->filter = lttng_bytecode_filter_interpret;
+ runtime->interpreter_funcs.capture = lttng_bytecode_capture_interpret;
}
/*
- * Link all bytecodes of the enabler referenced in the provided bytecode list.
+ * Given the lists of bytecode programs of an instance (trigger or event) and
+ * of a matching enabler, try to link all the enabler's bytecode programs with
+ * the instance.
+ *
+ * This function is called after we confirmed that name enabler and the
+ * instance are name matching (or glob pattern matching).
*/
void lttng_enabler_link_bytecode(const struct lttng_event_desc *event_desc,
struct lttng_ctx **ctx,
- struct cds_list_head *bytecode_runtime_head,
- struct lttng_enabler *enabler)
+ struct cds_list_head *instance_bytecode_head,
+ struct cds_list_head *enabler_bytecode_head)
{
- struct lttng_ust_bytecode_node *bc;
+ struct lttng_ust_bytecode_node *enabler_bc;
struct lttng_bytecode_runtime *runtime;
assert(event_desc);
- /* Link each bytecode. */
- cds_list_for_each_entry(bc, &enabler->filter_bytecode_head, node) {
+ /* Go over all the bytecode programs of the enabler. */
+ cds_list_for_each_entry(enabler_bc, enabler_bytecode_head, node) {
int found = 0, ret;
struct cds_list_head *insert_loc;
- cds_list_for_each_entry(runtime,
- bytecode_runtime_head, node) {
- if (runtime->bc == bc) {
+ /*
+ * Check if the current enabler bytecode program is already
+ * linked with the instance.
+ */
+ cds_list_for_each_entry(runtime, instance_bytecode_head, node) {
+ if (runtime->priv->bc == enabler_bc) {
found = 1;
break;
}
}
- /* Skip bytecode already linked */
+
+ /*
+ * Skip bytecode already linked, go to the next enabler
+ * bytecode program.
+ */
if (found)
continue;
* insert the new bytecode right after it.
*/
cds_list_for_each_entry_reverse(runtime,
- bytecode_runtime_head, node) {
- if (runtime->bc->bc.seqnum <= bc->bc.seqnum) {
+ instance_bytecode_head, node) {
+ if (runtime->priv->bc->bc.seqnum <= enabler_bc->bc.seqnum) {
/* insert here */
insert_loc = &runtime->node;
goto add_within;
}
/* Add to head to list */
- insert_loc = bytecode_runtime_head;
+ insert_loc = instance_bytecode_head;
add_within:
dbg_printf("linking bytecode\n");
- ret = _lttng_filter_link_bytecode(event_desc, ctx, bc,
- insert_loc);
+ ret = link_bytecode(event_desc, ctx, enabler_bc, instance_bytecode_head, insert_loc);
if (ret) {
dbg_printf("[lttng filter] warning: cannot link event bytecode\n");
}
cds_list_for_each_entry_safe(runtime, tmp, bytecode_runtime_head,
p.node) {
free(runtime->data);
+ free(runtime->p.priv);
free(runtime);
}
}