Home | History | Annotate | Download | only in speculation
      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 (the "License").
      6  * You may not use this file except in compliance with the License.
      7  *
      8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
      9  * or http://www.opensolaris.org/os/licensing.
     10  * See the License for the specific language governing permissions
     11  * and limitations under the License.
     12  *
     13  * When distributing Covered Code, include this CDDL HEADER in each
     14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
     15  * If applicable, add the following below this CDDL HEADER, with the
     16  * fields enclosed by brackets "[]" replaced with your own identifying
     17  * information: Portions Copyright [yyyy] [name of copyright owner]
     18  *
     19  * CDDL HEADER END
     20  */
     21 
     22 /*
     23  * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
     24  * Use is subject to license terms.
     25  */
     26 
     27 #pragma ident	"%Z%%M%	%I%	%E% SMI"
     28 
     29 /*
     30  * ASSERTION:
     31  * Data recording actions may not follow commit.
     32  *
     33  * SECTION: Speculative Tracing/Committing a Speculation;
     34  *	Options and Tunables/cleanrate
     35  *
     36  */
     37 #pragma D option quiet
     38 #pragma D option cleanrate=2000hz
     39 
     40 BEGIN
     41 {
     42 	self->speculateFlag = 0;
     43 }
     44 
     45 syscall:::entry
     46 {
     47 	self->spec = speculation();
     48 }
     49 
     50 syscall:::
     51 /self->spec/
     52 {
     53 	speculate(self->spec);
     54 	printf("Called speculate with id: %d\n", self->spec);
     55 	self->speculateFlag++;
     56 }
     57 
     58 syscall:::
     59 /(self->spec) && (self->speculateFlag)/
     60 {
     61 	commit(self->spec);
     62 	printf("Data recording after commit\n");
     63 }
     64 
     65 END
     66 {
     67 	exit(0);
     68 }
     69 
     70 ERROR
     71 {
     72 	exit(0);
     73 }
     74