OS-1723 DTrace should speak JSON
Reviewed by: Bryan Cantrill <bmc@joyent.com>

          --- old/usr/src/cmd/dtrace/test/tst/common/aggs/tst.subr.d
          +++ new/usr/src/cmd/dtrace/test/tst/common/aggs/tst.subr.d

   1    1  /*
   2    2   * CDDL HEADER START
   3    3   *
   4    4   * The contents of this file are subject to the terms of the
   5    5   * Common Development and Distribution License (the "License").
   6    6   * You may not use this file except in compliance with the License.
   7    7   *
   8    8   * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9    9   * or http://www.opensolaris.org/os/licensing.
  10   10   * See the License for the specific language governing permissions
  11   11   * and limitations under the License.
  12   12   *
  13   13   * When distributing Covered Code, include this CDDL HEADER in each
  14   14   * file and include the License file at usr/src/OPENSOLARIS.LICENSE.

  15   15   * If applicable, add the following below this CDDL HEADER, with the
  16   16   * fields enclosed by brackets "[]" replaced with your own identifying
  17   17   * information: Portions Copyright [yyyy] [name of copyright owner]
  18   18   *
  19   19   * CDDL HEADER END
  20   20   */
  21   21  
  22   22  /*
  23   23   * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
  24   24   * Use is subject to license terms.
       25 + * Copyright (c) 2012, Joyent, Inc.  All rights reserved.
  25   26   */
  26   27  
  27   28  #include <sys/dtrace.h>
  28   29  
  29   30  #define INTFUNC(x)                      \
  30   31          BEGIN                           \
  31   32          /*DSTYLED*/                     \
  32   33          {                               \
  33   34                  subr++;                 \
  34   35                  @[(long)x] = sum(1);    \

  35   36          /*DSTYLED*/                     \
  36   37          }
  37   38  
  38   39  #define STRFUNC(x)                      \
  39   40          BEGIN                           \
  40   41          /*DSTYLED*/                     \
  41   42          {                               \
  42   43                  subr++;                 \
  43   44                  @str[x] = sum(1);       \
  44   45          /*DSTYLED*/                     \
  45   46          }
  46   47  
  47   48  #define VOIDFUNC(x)                     \
  48   49          BEGIN                           \
  49   50          /*DSTYLED*/                     \
  50   51          {                               \
  51   52                  subr++;                 \
  52   53          /*DSTYLED*/                     \
  53   54          }
  54   55  
  55   56  INTFUNC(rand())
  56   57  INTFUNC(mutex_owned(&`cpu_lock))
  57   58  INTFUNC(mutex_owner(&`cpu_lock))
  58   59  INTFUNC(mutex_type_adaptive(&`cpu_lock))
  59   60  INTFUNC(mutex_type_spin(&`cpu_lock))
  60   61  INTFUNC(rw_read_held(&`vfssw_lock))
  61   62  INTFUNC(rw_write_held(&`vfssw_lock))
  62   63  INTFUNC(rw_iswriter(&`vfssw_lock))
  63   64  INTFUNC(copyin(NULL, 1))
  64   65  STRFUNC(copyinstr(NULL, 1))
  65   66  INTFUNC(speculation())
  66   67  INTFUNC(progenyof($pid))
  67   68  INTFUNC(strlen("fooey"))
  68   69  VOIDFUNC(copyout)
  69   70  VOIDFUNC(copyoutstr)
  70   71  INTFUNC(alloca(10))
  71   72  VOIDFUNC(bcopy)
  72   73  VOIDFUNC(copyinto)
  73   74  INTFUNC(msgdsize(NULL))
  74   75  INTFUNC(msgsize(NULL))
  75   76  INTFUNC(getmajor(0))
  76   77  INTFUNC(getminor(0))
  77   78  STRFUNC(ddi_pathname(NULL, 0))
  78   79  STRFUNC(strjoin("foo", "bar"))
  79   80  STRFUNC(lltostr(12373))
  80   81  STRFUNC(basename("/var/crash/systemtap"))
  81   82  STRFUNC(dirname("/var/crash/systemtap"))
  82   83  STRFUNC(cleanpath("/var/crash/systemtap"))
  83   84  STRFUNC(strchr("The SystemTap, The.", 't'))
  84   85  STRFUNC(strrchr("The SystemTap, The.", 't'))
  85   86  STRFUNC(strstr("The SystemTap, The.", "The"))
  86   87  STRFUNC(strtok("The SystemTap, The.", "T"))
  87   88  STRFUNC(substr("The SystemTap, The.", 0))
  88   89  INTFUNC(index("The SystemTap, The.", "The"))
  89   90  INTFUNC(rindex("The SystemTap, The.", "The"))
  90   91  INTFUNC(htons(0x1234))
  91   92  INTFUNC(htonl(0x12345678))

  92   93  INTFUNC(htonll(0x1234567890abcdefL))
  93   94  INTFUNC(ntohs(0x1234))
  94   95  INTFUNC(ntohl(0x12345678))
  95   96  INTFUNC(ntohll(0x1234567890abcdefL))
  96   97  STRFUNC(inet_ntoa((ipaddr_t *)alloca(sizeof (ipaddr_t))))
  97   98  STRFUNC(inet_ntoa6((in6_addr_t *)alloca(sizeof (in6_addr_t))))
  98   99  STRFUNC(inet_ntop(AF_INET, (void *)alloca(sizeof (ipaddr_t))))
  99  100  STRFUNC(toupper("foo"))
 100  101  STRFUNC(tolower("BAR"))
 101  102  INTFUNC(getf(0))
      103 +INTFUNC(strtoll("0x12EE5D5", 16))
      104 +STRFUNC(json("{\"systemtap\": false}", "systemtap"))
 102  105  
 103  106  BEGIN
 104  107  /subr == DIF_SUBR_MAX + 1/
 105  108  {
 106  109          exit(0);
 107  110  }
 108  111  
 109  112  BEGIN
 110  113  {
 111  114          printf("found %d subroutines, expected %d\n", subr, DIF_SUBR_MAX + 1);
 112  115          exit(1);
 113  116  }
    

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX