/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright (c) 1994, by Sun Microsytems, Inc.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#ifndef DEBUG
#define NDEBUG 1
#endif
#include <stdlib.h>
#include <string.h>
#include <tnf/com.h>
#include <tnf/writer.h>
#include <tnf/probe.h>
#include <assert.h>
#include "tnf_types.h"
#include "tnf_trace.h"
#ifdef TNFWB_DEBUG
#ifdef _KERNEL
#error TNFWB_DEBUG
#else /* _KERNEL */
#include <stdio.h>
#include <thread.h>
#endif /* _KERNEL */
#endif /* TNFW_DEBUG */
/*
* Defines
*/
#ifdef _KERNEL
#define TNF_ASSERT(expr) ASSERT(expr)
#else
#define TNF_ASSERT(expr) assert(expr)
#endif
/*
* New properties need for tracing
*/
static tnf_tag_data_t **derived_tagarg_properties[] = {
&TAG_DATA(tnf_derived),
&TAG_DATA(tnf_tag_arg),
0
};
static tnf_tag_data_t ***derived_tagarg_properties_ptr =
derived_tagarg_properties;
/*
* New derived types for probes
*/
TNF_STD_DERIVED_TAG(tnf_probe_event, tnf_tag,
derived_tagarg_properties_ptr, TNF_OPAQUE);
TNF_STD_DERIVED_TAG(tnf_time_base, tnf_int64,
tnf_derived_properties, TNF_INT64);
TNF_STD_DERIVED_TAG(tnf_time_delta, tnf_uint32,
tnf_derived_properties, TNF_UINT32);
TNF_STD_DERIVED_TAG(tnf_pid, tnf_int32,
tnf_derived_properties, TNF_INT32);
TNF_STD_DERIVED_TAG(tnf_lwpid, tnf_uint32,
tnf_derived_properties, TNF_UINT32);
/*
* Schedule records -CAUTION- keep in sync with tnf_internal.h
* Note that tnf_schedule_prototype_t has different sizes for
* kernel and user.
*/
static char *user_schedule_slot_names[] = {
TNF_N_TAG,
TNF_N_TID,
TNF_N_LWPID,
TNF_N_PID,
TNF_N_TIME_BASE,
0};
static tnf_tag_data_t **user_schedule_slots[] = {
&TAG_DATA(tnf_tag), /* tag */
&TAG_DATA(tnf_uint32), /* tid XXX */
&TAG_DATA(tnf_lwpid), /* lwpid */
&TAG_DATA(tnf_pid), /* pid */
&TAG_DATA(tnf_time_base), /* time_base */
0};
TNF_STD_STRUCT_TAG(tnf_sched_rec,
user_schedule_slots,
user_schedule_slot_names,
sizeof (tnf_schedule_prototype_t));
/*
* Probe type record (metatag)
*/
static tnf_tag_data_t **probe_type_slots[] = {
&TAG_DATA(tnf_tag),
&TAG_DATA(tnf_name),
&TAG_DATA(tnf_properties),
&TAG_DATA(tnf_slot_types),
&TAG_DATA(tnf_type_size),
&TAG_DATA(tnf_slot_names),
&TAG_DATA(tnf_string), /* detail */
0};
TNF_STRUCT_TAG(tnf_probe_type,
tnf_type_properties,
probe_type_slots,
0,
sizeof (tnf_probe_prototype_t));
/*
* export all tags
*/
TAG_EXPORT(tnf_probe_event);
TAG_EXPORT(tnf_time_base);
TAG_EXPORT(tnf_time_delta);
TAG_EXPORT(tnf_pid);
TAG_EXPORT(tnf_lwpid);
TAG_EXPORT(tnf_sched_rec);
TAG_EXPORT(tnf_probe_type);
/*
* Write a schedule record
* Can only be written in reusable data space.
*/
tnf_record_p
tnf_schedule_write(tnf_ops_t *ops, tnf_schedule_t *sched)
{
tnf_tag_data_t *metatag_data;
tnf_record_p metatag_index;
tnf_schedule_prototype_t *buffer;
#ifdef _TNF_VERBOSE
fprintf(stderr, "tnf_schedule_write: \n");
#endif
/* Cannot be called when writing into tag space */
TNF_ASSERT(ops->mode == TNF_ALLOC_REUSABLE);
ALLOC(ops, sizeof (*buffer), buffer, sched->record_p, ops->mode);
metatag_data = TAG_DATA(tnf_sched_rec);
metatag_index = metatag_data->tag_index ?
metatag_data->tag_index :
metatag_data->tag_desc(ops, metatag_data);
ASSIGN(buffer, tag, metatag_index);
/* LINTED - tid is 32 bits */
ASSIGN2(buffer, tid, sched->tid, uint32);
/* LINTED - lwpid is 32 bits */
ASSIGN(buffer, lwpid, sched->lwpid);
/* LINTED - pid is 32 bits */
ASSIGN(buffer, pid, sched->pid);
ASSIGN(buffer, time_base, sched->time_base);
/*
* Remember schedule record generation number so the distance
* in virtual space can be calculated from an event record
*/
sched->record_gen = ((tnf_block_header_t *)
((uintptr_t)buffer & TNF_BLOCK_MASK))->generation;
/* Cannot have been written into tag space */
TNF_ASSERT(sched->record_gen != TNF_TAG_GENERATION_NUM);
return ((tnf_record_p) buffer);
}