illumos downstack

downstack.d

#!/usr/sbin/dtrace -FCs

$1:entry
{
        stack();
        self->trace = 1;
}

$1:return
/self->trace == 1/
{
        printf("Returns 0x%llx", arg1);
        self->trace = 0;
        /* XXX KEBE SAYS just run once for now. */
        exit(1);
}

::entry
/self->trace == 1/
{
}

::return
/self->trace == 1/
{
        printf("Returns 0x%llx", arg1);
}

./downstack lx_socket