1*0Sstevel@tonic-gate /* 2*0Sstevel@tonic-gate * CDDL HEADER START 3*0Sstevel@tonic-gate * 4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*0Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*0Sstevel@tonic-gate * with the License. 8*0Sstevel@tonic-gate * 9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*0Sstevel@tonic-gate * See the License for the specific language governing permissions 12*0Sstevel@tonic-gate * and limitations under the License. 13*0Sstevel@tonic-gate * 14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*0Sstevel@tonic-gate * 20*0Sstevel@tonic-gate * CDDL HEADER END 21*0Sstevel@tonic-gate */ 22*0Sstevel@tonic-gate /* 23*0Sstevel@tonic-gate * Copyright (c) 1994, by Sun Microsytems, Inc. 24*0Sstevel@tonic-gate */ 25*0Sstevel@tonic-gate 26*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 27*0Sstevel@tonic-gate 28*0Sstevel@tonic-gate /* 29*0Sstevel@tonic-gate * Includes 30*0Sstevel@tonic-gate */ 31*0Sstevel@tonic-gate 32*0Sstevel@tonic-gate #ifndef DEBUG 33*0Sstevel@tonic-gate #define NDEBUG 1 34*0Sstevel@tonic-gate #endif 35*0Sstevel@tonic-gate 36*0Sstevel@tonic-gate #include <assert.h> 37*0Sstevel@tonic-gate #include <limits.h> 38*0Sstevel@tonic-gate #include <values.h> 39*0Sstevel@tonic-gate #include <stdio.h> 40*0Sstevel@tonic-gate #include <string.h> 41*0Sstevel@tonic-gate #include <unistd.h> 42*0Sstevel@tonic-gate 43*0Sstevel@tonic-gate #include "tnf_trace.h" 44*0Sstevel@tonic-gate 45*0Sstevel@tonic-gate /* 46*0Sstevel@tonic-gate * Defines 47*0Sstevel@tonic-gate */ 48*0Sstevel@tonic-gate 49*0Sstevel@tonic-gate #define ASSERT(expr) assert(expr) 50*0Sstevel@tonic-gate 51*0Sstevel@tonic-gate #define ENCODED_TAG(tag, tagarg) \ 52*0Sstevel@tonic-gate (((tag) | ((tagarg) & 0xfffc)) | TNF_REF32_T_PAIR) 53*0Sstevel@tonic-gate 54*0Sstevel@tonic-gate /* 55*0Sstevel@tonic-gate * CAUTION: halfword_accessible assumes that the pointer is to a reclaimable 56*0Sstevel@tonic-gate * block - i.e. negative offsets have a 0 in high bit 57*0Sstevel@tonic-gate */ 58*0Sstevel@tonic-gate #define HALFWORD_ACCESSIBLE(x) \ 59*0Sstevel@tonic-gate ((((x) & 0xffff8000) == 0) || (((x) & 0xffff8000) == 0x7fff8000)) 60*0Sstevel@tonic-gate 61*0Sstevel@tonic-gate /* 62*0Sstevel@tonic-gate * Check that x can be encoded in tagarg slot 63*0Sstevel@tonic-gate * Same as above, but operates on ints (no space bit) 64*0Sstevel@tonic-gate */ 65*0Sstevel@tonic-gate #define TAGARG_CHECK(x) \ 66*0Sstevel@tonic-gate (((x) < 32767) && ((x) > -32768)) 67*0Sstevel@tonic-gate 68*0Sstevel@tonic-gate /* 69*0Sstevel@tonic-gate * Check that hi 32 bits of hrtime are zero 70*0Sstevel@tonic-gate */ 71*0Sstevel@tonic-gate #define TIME_CHECK(x) \ 72*0Sstevel@tonic-gate (((x) >> 32) == 0) 73*0Sstevel@tonic-gate 74*0Sstevel@tonic-gate /* 75*0Sstevel@tonic-gate * CAUTION: Use the following macro only when doing a self relative pointer 76*0Sstevel@tonic-gate * to a target in the same block 77*0Sstevel@tonic-gate */ 78*0Sstevel@tonic-gate #define PTR_DIFF(item, ref) \ 79*0Sstevel@tonic-gate ((tnf_ref32_t)((tnf_record_p)(item) - (tnf_record_p)(ref))) 80*0Sstevel@tonic-gate 81*0Sstevel@tonic-gate /* 82*0Sstevel@tonic-gate * Typedefs 83*0Sstevel@tonic-gate */ 84*0Sstevel@tonic-gate 85*0Sstevel@tonic-gate typedef struct { 86*0Sstevel@tonic-gate tnf_probe_event_t probe_event; 87*0Sstevel@tonic-gate tnf_time_delta_t time_delta; 88*0Sstevel@tonic-gate } probe_event_prototype_t; 89*0Sstevel@tonic-gate 90*0Sstevel@tonic-gate /* 91*0Sstevel@tonic-gate * tnf_trace_alloc 92*0Sstevel@tonic-gate * the probe allocation function 93*0Sstevel@tonic-gate */ 94*0Sstevel@tonic-gate 95*0Sstevel@tonic-gate #define IS_NEWBLOCK(blockArray, dataBuffer) \ 96*0Sstevel@tonic-gate (((caddr_t)&blockArray[1]) == (caddr_t)dataBuffer) 97*0Sstevel@tonic-gate 98*0Sstevel@tonic-gate void * 99*0Sstevel@tonic-gate tnf_trace_alloc(tnf_ops_t *ops, tnf_probe_control_t *probe_p, 100*0Sstevel@tonic-gate tnf_probe_setup_t *set_p) 101*0Sstevel@tonic-gate { 102*0Sstevel@tonic-gate TNFW_B_WCB *wcb; 103*0Sstevel@tonic-gate volatile char *file_start; 104*0Sstevel@tonic-gate uintptr_t probe_index; 105*0Sstevel@tonic-gate tnf_record_p sched_record_p; 106*0Sstevel@tonic-gate tnf_reference_t sched_offset, tag_disp; 107*0Sstevel@tonic-gate tnf_block_header_t *block; 108*0Sstevel@tonic-gate tnf_uint32_t shift; 109*0Sstevel@tonic-gate probe_event_prototype_t *buffer; 110*0Sstevel@tonic-gate hrtime_t curr_time, time_diff; 111*0Sstevel@tonic-gate tnf_schedule_t *sched; 112*0Sstevel@tonic-gate tnf_ref32_t *fwd_p; 113*0Sstevel@tonic-gate ulong_t size, asize; 114*0Sstevel@tonic-gate #if defined(DEBUG) || defined(VERYVERBOSE) 115*0Sstevel@tonic-gate char tmp_buf[512]; 116*0Sstevel@tonic-gate #endif 117*0Sstevel@tonic-gate 118*0Sstevel@tonic-gate ASSERT(ops != NULL); 119*0Sstevel@tonic-gate 120*0Sstevel@tonic-gate /* check if already in a probe */ 121*0Sstevel@tonic-gate if (ops->busy) 122*0Sstevel@tonic-gate return (NULL); 123*0Sstevel@tonic-gate ops->busy = 1; 124*0Sstevel@tonic-gate 125*0Sstevel@tonic-gate 126*0Sstevel@tonic-gate #ifdef VERYVERBOSE 127*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc: begin\n"); 128*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 129*0Sstevel@tonic-gate #endif 130*0Sstevel@tonic-gate 131*0Sstevel@tonic-gate /* 132*0Sstevel@tonic-gate * CAUTION: Ordering of function calls in this file is critical because 133*0Sstevel@tonic-gate * we call TNFW_B_GIVEBACK. Between the time we allocate space for the 134*0Sstevel@tonic-gate * event and call TNFW_B_GIVEBACK there can be no other allocations!! 135*0Sstevel@tonic-gate */ 136*0Sstevel@tonic-gate 137*0Sstevel@tonic-gate /* 138*0Sstevel@tonic-gate * Write probe tag if needed 139*0Sstevel@tonic-gate */ 140*0Sstevel@tonic-gate probe_index = probe_p->index; 141*0Sstevel@tonic-gate #ifdef VERYVERBOSE 142*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc: (1) probe_index=%p\n", probe_index); 143*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 144*0Sstevel@tonic-gate #endif 145*0Sstevel@tonic-gate if (probe_index == 0) { 146*0Sstevel@tonic-gate if ((probe_index = tnf_probe_tag(ops, probe_p)) == 0) { 147*0Sstevel@tonic-gate #ifdef VERYVERBOSE 148*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc: (2) probe_index=%p\n", 149*0Sstevel@tonic-gate probe_index); 150*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 151*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc: goto null_ret\n"); 152*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 153*0Sstevel@tonic-gate fflush(stderr); 154*0Sstevel@tonic-gate sleep(2); 155*0Sstevel@tonic-gate #endif 156*0Sstevel@tonic-gate goto null_ret; 157*0Sstevel@tonic-gate } 158*0Sstevel@tonic-gate #ifdef VERYVERBOSE 159*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc: (3) probe_index=%p\n", 160*0Sstevel@tonic-gate probe_index); 161*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 162*0Sstevel@tonic-gate fflush(stderr); 163*0Sstevel@tonic-gate #endif 164*0Sstevel@tonic-gate } 165*0Sstevel@tonic-gate /* 166*0Sstevel@tonic-gate * Determine how much memory is required 167*0Sstevel@tonic-gate */ 168*0Sstevel@tonic-gate size = probe_p->tnf_event_size; 169*0Sstevel@tonic-gate asize = size + sizeof (tnf_ref32_t); /* one fwd ptr */ 170*0Sstevel@tonic-gate 171*0Sstevel@tonic-gate if (PROBE_IS_FILE_PTR(probe_index)) { 172*0Sstevel@tonic-gate /* common case - probe_index is a file ptr */ 173*0Sstevel@tonic-gate tag_disp = probe_index & PROBE_INDEX_LOW_MASK; 174*0Sstevel@tonic-gate } else { 175*0Sstevel@tonic-gate /* rare case -- get an extra fwd ptr */ 176*0Sstevel@tonic-gate asize += sizeof (tnf_ref32_t); 177*0Sstevel@tonic-gate } 178*0Sstevel@tonic-gate 179*0Sstevel@tonic-gate /* 180*0Sstevel@tonic-gate * Allocate memory 181*0Sstevel@tonic-gate */ 182*0Sstevel@tonic-gate wcb = &(ops->wcb); 183*0Sstevel@tonic-gate 184*0Sstevel@tonic-gate #ifdef _TNF_VERBOSE 185*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc, wcb=%p\n", wcb); 186*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 187*0Sstevel@tonic-gate #endif 188*0Sstevel@tonic-gate 189*0Sstevel@tonic-gate buffer = ops->alloc(wcb, asize, ops->mode); 190*0Sstevel@tonic-gate 191*0Sstevel@tonic-gate #ifdef _TNF_VERBOSE 192*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc, buffer=%p\n", buffer); 193*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 194*0Sstevel@tonic-gate #endif 195*0Sstevel@tonic-gate if (buffer == NULL) 196*0Sstevel@tonic-gate goto null_ret; 197*0Sstevel@tonic-gate 198*0Sstevel@tonic-gate /* LINTED pointer cast may result in improper alignment */ 199*0Sstevel@tonic-gate fwd_p = (tnf_ref32_t *) ((char *)(buffer) + size); 200*0Sstevel@tonic-gate 201*0Sstevel@tonic-gate #ifdef _TNF_VERBOSE 202*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc, fwd_pr=%p\n", fwd_p); 203*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 204*0Sstevel@tonic-gate #endif 205*0Sstevel@tonic-gate 206*0Sstevel@tonic-gate /* set file_start after calling alloc because it allocs the file */ 207*0Sstevel@tonic-gate file_start = _tnfw_b_control->tnf_buffer; 208*0Sstevel@tonic-gate 209*0Sstevel@tonic-gate /* Check if the probe tag needs more work */ 210*0Sstevel@tonic-gate if (!PROBE_IS_FILE_PTR(probe_index)) { 211*0Sstevel@tonic-gate /* LINTED use up first fwd ptr */ 212*0Sstevel@tonic-gate *fwd_p = TNF_REF32_MAKE_PERMANENT( 213*0Sstevel@tonic-gate /* LINTED ptr subtraction */ 214*0Sstevel@tonic-gate (tnf_record_p)probe_index - (tnf_record_p) file_start); 215*0Sstevel@tonic-gate /* LINTED ptr subtraction */ 216*0Sstevel@tonic-gate tag_disp = PTR_DIFF(fwd_p, buffer); 217*0Sstevel@tonic-gate ASSERT(TAGARG_CHECK(tag_disp)); 218*0Sstevel@tonic-gate tag_disp |= TNF_TAG16_T_REL; 219*0Sstevel@tonic-gate tag_disp = tag_disp << TNF_REF32_TAG16_SHIFT; 220*0Sstevel@tonic-gate fwd_p++; 221*0Sstevel@tonic-gate } 222*0Sstevel@tonic-gate 223*0Sstevel@tonic-gate /* 224*0Sstevel@tonic-gate * Get timestamp 225*0Sstevel@tonic-gate */ 226*0Sstevel@tonic-gate curr_time = gethrtime(); 227*0Sstevel@tonic-gate 228*0Sstevel@tonic-gate /* 229*0Sstevel@tonic-gate * initialize and write schedule record if needed 230*0Sstevel@tonic-gate * watch out for sched->record_p - it has to be checked after alloc is 231*0Sstevel@tonic-gate * called for the event, because it could be side effected by alloc 232*0Sstevel@tonic-gate * if a fork happened. Pre-requisite to our algorithm - if a fork 233*0Sstevel@tonic-gate * happens all other threads have to be quiescent i.e. not in a probe. 234*0Sstevel@tonic-gate */ 235*0Sstevel@tonic-gate sched = &(ops->schedule); 236*0Sstevel@tonic-gate 237*0Sstevel@tonic-gate #ifdef _TNF_VERBOSE 238*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc, sched=%p\n", sched); 239*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 240*0Sstevel@tonic-gate #endif 241*0Sstevel@tonic-gate 242*0Sstevel@tonic-gate /* LINTED pointer cast */ 243*0Sstevel@tonic-gate shift = ((tnf_buf_file_header_t *)file_start)->com.file_log_size; 244*0Sstevel@tonic-gate block = (tnf_block_header_t *)((ulong_t)buffer & TNF_BLOCK_MASK); 245*0Sstevel@tonic-gate 246*0Sstevel@tonic-gate if ((sched_record_p = sched->record_p) == NULL || 247*0Sstevel@tonic-gate IS_NEWBLOCK(block, buffer)) { 248*0Sstevel@tonic-gate /* No record written yet */ 249*0Sstevel@tonic-gate goto new_schedule; 250*0Sstevel@tonic-gate } 251*0Sstevel@tonic-gate 252*0Sstevel@tonic-gate /* 253*0Sstevel@tonic-gate * Note: Don't bother about space bit here, because we'll 254*0Sstevel@tonic-gate * only use bits 15:2 anyway 255*0Sstevel@tonic-gate */ 256*0Sstevel@tonic-gate sched_offset = ((sched->record_gen - block->generation) << shift) + 257*0Sstevel@tonic-gate /* LINTED - ptr subtraction */ 258*0Sstevel@tonic-gate (uint_t) (sched_record_p - (caddr_t)buffer); 259*0Sstevel@tonic-gate 260*0Sstevel@tonic-gate if (!TAGARG_CHECK(sched_offset)) 261*0Sstevel@tonic-gate /* Record too far away to reference */ 262*0Sstevel@tonic-gate goto new_schedule; 263*0Sstevel@tonic-gate 264*0Sstevel@tonic-gate time_diff = curr_time - sched->time_base; 265*0Sstevel@tonic-gate if (!TIME_CHECK(time_diff)) 266*0Sstevel@tonic-gate /* Time delta can't fit in 32 bits */ 267*0Sstevel@tonic-gate goto new_schedule; 268*0Sstevel@tonic-gate 269*0Sstevel@tonic-gate /* 270*0Sstevel@tonic-gate * Can reuse existing schedule record 271*0Sstevel@tonic-gate * Since we did not allocate any more space, can giveback 272*0Sstevel@tonic-gate */ 273*0Sstevel@tonic-gate /* LINTED - GIVEBACK returns a pointer subtraction */ 274*0Sstevel@tonic-gate TNFW_B_GIVEBACK(wcb, fwd_p); 275*0Sstevel@tonic-gate 276*0Sstevel@tonic-gate good_ret: 277*0Sstevel@tonic-gate /* 278*0Sstevel@tonic-gate * Store return params and two common event members, return buffer 279*0Sstevel@tonic-gate */ 280*0Sstevel@tonic-gate set_p->tpd_p = ops; 281*0Sstevel@tonic-gate set_p->buffer_p = buffer; 282*0Sstevel@tonic-gate set_p->probe_p = probe_p; 283*0Sstevel@tonic-gate buffer->probe_event = ENCODED_TAG(tag_disp, sched_offset); 284*0Sstevel@tonic-gate /* LINTED - TIME_CHECK already passed, see above */ 285*0Sstevel@tonic-gate buffer->time_delta = tnf_time_delta(ops, (unsigned long)time_diff, 286*0Sstevel@tonic-gate &buffer->probe_time_delta); 287*0Sstevel@tonic-gate return (buffer); 288*0Sstevel@tonic-gate 289*0Sstevel@tonic-gate new_schedule: 290*0Sstevel@tonic-gate /* 291*0Sstevel@tonic-gate * Write a new schedule record for this thread 292*0Sstevel@tonic-gate */ 293*0Sstevel@tonic-gate #ifdef VERYVERBOSE 294*0Sstevel@tonic-gate sprintf(tmp_buf, " tnf_trace_alloc: initializing " 295*0Sstevel@tonic-gate "new schedule record\n"); 296*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 297*0Sstevel@tonic-gate #endif 298*0Sstevel@tonic-gate _tnf_sched_init(sched, curr_time); 299*0Sstevel@tonic-gate time_diff = 0; 300*0Sstevel@tonic-gate if ((sched_record_p = tnf_schedule_write(ops, sched)) != NULL) { 301*0Sstevel@tonic-gate /* use one of the extra alloced words for the forwarding ptr */ 302*0Sstevel@tonic-gate /* LINTED - ptr subtraction */ 303*0Sstevel@tonic-gate *fwd_p = TNF_REF32_MAKE_RECLAIMABLE( 304*0Sstevel@tonic-gate ((sched->record_gen - block->generation) << shift) + 305*0Sstevel@tonic-gate (sched_record_p - (tnf_record_p)fwd_p)); 306*0Sstevel@tonic-gate /* LINTED - ptr subtraction */ 307*0Sstevel@tonic-gate sched_offset = PTR_DIFF(fwd_p, buffer); 308*0Sstevel@tonic-gate ASSERT(TAGARG_CHECK(sched_offset)); 309*0Sstevel@tonic-gate } else { 310*0Sstevel@tonic-gate /* Allocation failed (tracing may have been stopped) */ 311*0Sstevel@tonic-gate sched_offset = 0; 312*0Sstevel@tonic-gate *fwd_p = TNF_NULL; 313*0Sstevel@tonic-gate } 314*0Sstevel@tonic-gate goto good_ret; 315*0Sstevel@tonic-gate 316*0Sstevel@tonic-gate null_ret: 317*0Sstevel@tonic-gate /* 318*0Sstevel@tonic-gate * reset re-entrancy protector, because tnf_trace_end() will 319*0Sstevel@tonic-gate * not be called 320*0Sstevel@tonic-gate */ 321*0Sstevel@tonic-gate #ifdef VERYVERBOSE 322*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_alloc: null return\n"); 323*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 324*0Sstevel@tonic-gate #endif 325*0Sstevel@tonic-gate ops->busy = 0; 326*0Sstevel@tonic-gate return (NULL); 327*0Sstevel@tonic-gate } 328*0Sstevel@tonic-gate 329*0Sstevel@tonic-gate /* 330*0Sstevel@tonic-gate * tnf_trace_end 331*0Sstevel@tonic-gate * the last (usually only) function in the list of probe functions 332*0Sstevel@tonic-gate */ 333*0Sstevel@tonic-gate void 334*0Sstevel@tonic-gate tnf_trace_end(tnf_probe_setup_t *set_p) 335*0Sstevel@tonic-gate { 336*0Sstevel@tonic-gate #ifdef VERYVERBOSE 337*0Sstevel@tonic-gate char tmp_buf[512]; 338*0Sstevel@tonic-gate 339*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_end: \n"); 340*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 341*0Sstevel@tonic-gate #endif 342*0Sstevel@tonic-gate 343*0Sstevel@tonic-gate (set_p->probe_p->commit_func)(set_p); 344*0Sstevel@tonic-gate set_p->tpd_p->busy = 0; 345*0Sstevel@tonic-gate } 346*0Sstevel@tonic-gate 347*0Sstevel@tonic-gate /* 348*0Sstevel@tonic-gate * tnf_trace_commit 349*0Sstevel@tonic-gate * a probe commit function that really commits trace data 350*0Sstevel@tonic-gate */ 351*0Sstevel@tonic-gate void 352*0Sstevel@tonic-gate tnf_trace_commit(tnf_probe_setup_t *set_p) 353*0Sstevel@tonic-gate { 354*0Sstevel@tonic-gate #ifdef VERYVERBOSE 355*0Sstevel@tonic-gate char tmp_buf[512]; 356*0Sstevel@tonic-gate 357*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_commit: \n\n"); 358*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 359*0Sstevel@tonic-gate #endif 360*0Sstevel@tonic-gate (void) set_p->tpd_p->commit(&(set_p->tpd_p->wcb)); 361*0Sstevel@tonic-gate 362*0Sstevel@tonic-gate return; 363*0Sstevel@tonic-gate 364*0Sstevel@tonic-gate } 365*0Sstevel@tonic-gate 366*0Sstevel@tonic-gate /* 367*0Sstevel@tonic-gate * tnf_trace_rollback 368*0Sstevel@tonic-gate * a probe commit function that unrolls trace data 369*0Sstevel@tonic-gate */ 370*0Sstevel@tonic-gate void 371*0Sstevel@tonic-gate tnf_trace_rollback(tnf_probe_setup_t *set_p) 372*0Sstevel@tonic-gate { 373*0Sstevel@tonic-gate #ifdef VERYVERBOSE 374*0Sstevel@tonic-gate char tmp_buf[512]; 375*0Sstevel@tonic-gate 376*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_trace_rollback: \n\n"); 377*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 378*0Sstevel@tonic-gate #endif 379*0Sstevel@tonic-gate (void) set_p->tpd_p->rollback(&(set_p->tpd_p->wcb)); 380*0Sstevel@tonic-gate 381*0Sstevel@tonic-gate return; 382*0Sstevel@tonic-gate 383*0Sstevel@tonic-gate } 384*0Sstevel@tonic-gate 385*0Sstevel@tonic-gate /* 386*0Sstevel@tonic-gate * tnf_allocate 387*0Sstevel@tonic-gate * exported interface for allocating trace memory 388*0Sstevel@tonic-gate */ 389*0Sstevel@tonic-gate 390*0Sstevel@tonic-gate void * 391*0Sstevel@tonic-gate tnf_allocate(tnf_ops_t *ops, size_t size) 392*0Sstevel@tonic-gate { 393*0Sstevel@tonic-gate void *retval; 394*0Sstevel@tonic-gate char tmp_buf[512]; 395*0Sstevel@tonic-gate 396*0Sstevel@tonic-gate #ifdef _TNF_VERBOSE 397*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_allocate\n"); 398*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 399*0Sstevel@tonic-gate #endif 400*0Sstevel@tonic-gate 401*0Sstevel@tonic-gate retval = ops->alloc(&(ops->wcb), size, ops->mode); 402*0Sstevel@tonic-gate 403*0Sstevel@tonic-gate #ifdef _TNF_VERBOSE 404*0Sstevel@tonic-gate sprintf(tmp_buf, "tnf_allocate, retval=%p\n", retval); 405*0Sstevel@tonic-gate (void) write(2, tmp_buf, strlen(tmp_buf)); 406*0Sstevel@tonic-gate #endif 407*0Sstevel@tonic-gate 408*0Sstevel@tonic-gate return (retval); 409*0Sstevel@tonic-gate } 410