1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright (c) 1994, by Sun Microsytems, Inc.
24 */
25
26 #pragma ident "%Z%%M% %I% %E% SMI"
27
28 #ifndef DEBUG
29 #define NDEBUG 1
30 #endif
31
32 #include <stdlib.h>
33 #include <string.h>
34 #include <tnf/com.h>
35 #include <tnf/writer.h>
36 #include <tnf/probe.h>
37 #include <assert.h>
38
39 #include "tnf_types.h"
40 #include "tnf_trace.h"
41
42 #ifdef TNFWB_DEBUG
43 #ifdef _KERNEL
44 #error TNFWB_DEBUG
45 #else /* _KERNEL */
46 #include <stdio.h>
47 #include <thread.h>
48 #endif /* _KERNEL */
49 #endif /* TNFW_DEBUG */
50
51
52 /*
53 * Defines
54 */
55
56 #ifdef _KERNEL
57 #define TNF_ASSERT(expr) ASSERT(expr)
58 #else
59 #define TNF_ASSERT(expr) assert(expr)
60 #endif
61
62 /*
63 * New properties need for tracing
64 */
65
66 static tnf_tag_data_t **derived_tagarg_properties[] = {
67 &TAG_DATA(tnf_derived),
68 &TAG_DATA(tnf_tag_arg),
69 0
70 };
71
72 static tnf_tag_data_t ***derived_tagarg_properties_ptr =
73 derived_tagarg_properties;
74
75 /*
76 * New derived types for probes
77 */
78
79 TNF_STD_DERIVED_TAG(tnf_probe_event, tnf_tag,
80 derived_tagarg_properties_ptr, TNF_OPAQUE);
81
82 TNF_STD_DERIVED_TAG(tnf_time_base, tnf_int64,
83 tnf_derived_properties, TNF_INT64);
84
85 TNF_STD_DERIVED_TAG(tnf_time_delta, tnf_uint32,
86 tnf_derived_properties, TNF_UINT32);
87
88 TNF_STD_DERIVED_TAG(tnf_pid, tnf_int32,
89 tnf_derived_properties, TNF_INT32);
90
91 TNF_STD_DERIVED_TAG(tnf_lwpid, tnf_uint32,
92 tnf_derived_properties, TNF_UINT32);
93
94 /*
95 * Schedule records -CAUTION- keep in sync with tnf_internal.h
96 * Note that tnf_schedule_prototype_t has different sizes for
97 * kernel and user.
98 */
99
100 static char *user_schedule_slot_names[] = {
101 TNF_N_TAG,
102 TNF_N_TID,
103 TNF_N_LWPID,
104 TNF_N_PID,
105 TNF_N_TIME_BASE,
106 0};
107
108 static tnf_tag_data_t **user_schedule_slots[] = {
109 &TAG_DATA(tnf_tag), /* tag */
110 &TAG_DATA(tnf_uint32), /* tid XXX */
111 &TAG_DATA(tnf_lwpid), /* lwpid */
112 &TAG_DATA(tnf_pid), /* pid */
113 &TAG_DATA(tnf_time_base), /* time_base */
114 0};
115
116 TNF_STD_STRUCT_TAG(tnf_sched_rec,
117 user_schedule_slots,
118 user_schedule_slot_names,
119 sizeof (tnf_schedule_prototype_t));
120
121 /*
122 * Probe type record (metatag)
123 */
124
125 static tnf_tag_data_t **probe_type_slots[] = {
126 &TAG_DATA(tnf_tag),
127 &TAG_DATA(tnf_name),
128 &TAG_DATA(tnf_properties),
129 &TAG_DATA(tnf_slot_types),
130 &TAG_DATA(tnf_type_size),
131 &TAG_DATA(tnf_slot_names),
132 &TAG_DATA(tnf_string), /* detail */
133 0};
134
135 TNF_STRUCT_TAG(tnf_probe_type,
136 tnf_type_properties,
137 probe_type_slots,
138 0,
139 sizeof (tnf_probe_prototype_t));
140
141 /*
142 * export all tags
143 */
144
145 TAG_EXPORT(tnf_probe_event);
146 TAG_EXPORT(tnf_time_base);
147 TAG_EXPORT(tnf_time_delta);
148 TAG_EXPORT(tnf_pid);
149 TAG_EXPORT(tnf_lwpid);
150
151 TAG_EXPORT(tnf_sched_rec);
152 TAG_EXPORT(tnf_probe_type);
153
154 /*
155 * Write a schedule record
156 * Can only be written in reusable data space.
157 */
158
159 tnf_record_p
tnf_schedule_write(tnf_ops_t * ops,tnf_schedule_t * sched)160 tnf_schedule_write(tnf_ops_t *ops, tnf_schedule_t *sched)
161 {
162 tnf_tag_data_t *metatag_data;
163 tnf_record_p metatag_index;
164 tnf_schedule_prototype_t *buffer;
165
166 #ifdef _TNF_VERBOSE
167 fprintf(stderr, "tnf_schedule_write: \n");
168 #endif
169 /* Cannot be called when writing into tag space */
170 TNF_ASSERT(ops->mode == TNF_ALLOC_REUSABLE);
171 ALLOC(ops, sizeof (*buffer), buffer, sched->record_p, ops->mode);
172
173 metatag_data = TAG_DATA(tnf_sched_rec);
174
175 metatag_index = metatag_data->tag_index ?
176 metatag_data->tag_index :
177 metatag_data->tag_desc(ops, metatag_data);
178
179 ASSIGN(buffer, tag, metatag_index);
180 /* LINTED - tid is 32 bits */
181 ASSIGN2(buffer, tid, sched->tid, uint32);
182 /* LINTED - lwpid is 32 bits */
183 ASSIGN(buffer, lwpid, sched->lwpid);
184 /* LINTED - pid is 32 bits */
185 ASSIGN(buffer, pid, sched->pid);
186 ASSIGN(buffer, time_base, sched->time_base);
187
188 /*
189 * Remember schedule record generation number so the distance
190 * in virtual space can be calculated from an event record
191 */
192 sched->record_gen = ((tnf_block_header_t *)
193 ((uintptr_t)buffer & TNF_BLOCK_MASK))->generation;
194 /* Cannot have been written into tag space */
195 TNF_ASSERT(sched->record_gen != TNF_TAG_GENERATION_NUM);
196
197 return ((tnf_record_p) buffer);
198 }
199