Probevue - AIX6 新的程序员工具

<- optional declaring function prot-type so probevue understands your functionarguments
@@BEGIN
{
...                 <- optional start up code, good for initialisation of variables
}

@@<probe-spec>        <- Probe point specification Tuple (see below)
when <predicate>        <- Optional predicate
{
    statements here;<- Probe actions in C like code
...
}

@@END
{
...                              <- Optional ending code.  Can print out final 
                                 results. Gets runs if you hit Control+C
}

#!/usr/bin/probevue                <-- autorun
@@BEGIN
{
int count, total;                       <-- declare the variables (later probevue 
                                                   versions will not need this)
}

@@syscall:*:read:entry            <-- System call: any process ID, read() function, 
                                                    at start of the function
{
   count++;                             <-- increment the counters
   total++;
}

@@interval:*:clock:1000          <-- once per second (1000 ticks per second)
{
   printf("Number of reads = %d\n", count);
   count=0;
}

@@END                                   <-- After you type Control-C
{
    printf("\nTotal reads = %d\n",total);
}

# ./count.e
Number of reads = 0
Number of reads = 1
Number of reads = 0
Number of reads = 0
Number of reads = 2
Number of reads = 0
Number of reads = 5
Number of reads = 269
Number of reads = 0
Number of reads = 0
^C
Total reads = 277

#!/usr/bin/probevue
@@BEGIN
{
int read(int fd, void *buf, int n);       <-- Declare function so ProbeVue understands it
int bad;
int good;
}
@@syscall:*:read:exit
when(__rv == -1)                         <-- __rv means the return value
{
   bad++;
}
@@syscall:*:read:exit
when(__rv != -1)
{
   good++;
}
@@interval:*:clock:1000                  <-- Once a second output counter
{
   printf("Reads good=%d bad=%d\n",good,bad);
   good=0;
}

# ./goodandbad.e
Reads good=0 bad=0
Reads good=55 bad=0
Reads good=0 bad=0
Reads good=0 bad=0
Reads good=57 bad=1
Reads good=0 bad=1
Reads good=0 bad=1
Reads good=55 bad=1
Reads good=0 bad=1
Reads good=1 bad=1
Reads good=55 bad=1
Reads good=40 bad=1
Reads good=1 bad=2
Reads good=55 bad=3
Reads good=1 bad=3
Reads good=0 bad=3
Reads good=56 bad=4

#!/usr/bin/probevue

double engine(int p1, int p2);

@@uft:$1:*:engine:entry
{
     printf("PID=%d TID=%d PPID=%d PGID=%d UID=%d GID=%d InKernel=%d\n", __pid, 
     __tid, __ppid, __pgid, __uid, __euid, __kernelmode);
      printf("ProgName=%s errno=%d\n", __pname, __errno);
       printf("---\n");
      stktrace(GET_USER_TRACE,-1);
      printf("+++\n");
      stktrace(PRINT_SYMBOLS|GET_USER_TRACE,-1);
}

# ps -ef | grep ncpu
    root 299106 307250  27 14:02:00  pts/0 15:16 ./ncpu -p1 -z 90
    root 315596 307250   0 16:48:47  pts/0  0:00 grep ncpu
#  ./engine    299106
PID=299106 TID=630919 PPID=307250 PGID=299106 UID=0 GID=0 InKernel=0 
ProgName=ncpu errno=0
---
0x100001dc
0x10000964
0x100010e8
0xd02fd66c
0x20000c80
0x10001160
+++
.__start+0x8c
.main+0x60c
.work+0x1b4
.random+0x2c

#!/usr/bin/probevue

double engine(int p1, int p2);
int b1, b2, b3, b4;

@@uft:$1:*:engine:entry
{
        tmp = __arg1;
        if( tmp < 250000 ) b1++;
        if( 250000 <= tmp && tmp < 500000 ) b2++;
        if( 500000 <= tmp && tmp < 750000 ) b3++;
        if( tmp  >750000 ) b4++;
}

@@END
{
printf("\nFour bucket results are: %d %d %d %d\n",b1,b2,b3,b4);
}

ps -ef | grep ncpu
    root 299106 307250  27 14:02:00  pts/0 15:16 ./ncpu -p1 -z 90
    root 315596 307250   0 16:48:47  pts/0  0:00 grep ncpu
#  # ./random 299106
[[[Wait 30 seconds here]]]
^C
Four bucket results are: 101524 101262 101454 120657