cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/aggs/tst.aggpack.d

   1 /*
   2  * This file and its contents are supplied under the terms of the
   3  * Common Development and Distribution License ("CDDL"), version 1.0.
   4  * You may only use this file in accordance with the terms of version
   5  * 1.0 of the CDDL.
   6  *
   7  * A full copy of the text of the CDDL should have accompanied this
   8  * source.  A copy of the CDDL is also available via the Internet at
   9  * http://www.illumos.org/license/CDDL.
  10  */
  11
  12 /*
  13  * Copyright (c) 2013 Joyent, Inc.  All rights reserved.
  14  */
  15
  16 #pragma D option aggpack
  17 #pragma D option encoding=ascii
  18 #pragma D option quiet
  19
  20 BEGIN
  21 {
  22         @x = quantize(1 << 32);
  23         @y[1] = quantize(1);
  24         @z["mumble"] = quantize(1);
  25         @xx["foo", (char)1, (short)2, (long)3] = quantize(1);
  26
  27         @neg = lquantize(-10, -10, 20, 1, -1);
  28         @neg = lquantize(-5, -10, 20, 1, 1);
  29         @neg = lquantize(0, -10, 20, 1, 1);
  30
  31         i = 0;
  32 }
  33
  34 tick-1ms
  35 {
  36         @a[i] = quantize(0, i);
  37         @a[i] = quantize(1, 100 - i);
  38         i++;
  39 }
  40
  41 tick-1ms
  42 /i > 100/
  43 {
  44         exit(0);
  45 }
  46
  47 END
  48 {
  49         setopt("aggzoom", "true");
  50         printa(@neg);
  51         setopt("aggzoom", "false");
  52         printa(@neg);
  53 }