moray-ping-errors-prof.d

#!/usr/sbin/dtrace -s

#pragma D option quiet

bunyan*:::log-debug
/json(copyinstr(arg0), "msg") == "pinging moray..."/
{
  this->profiling_enabled = 1;
}

profile-997
/pid == 21884 && this->profiling_enabled == 1/
{
  @stacks[jstack(150, 8000)] = count();
}

bunyan*:::log-debug
/json(copyinstr(arg0), "msg") == "successfully pinged moray"/
{
  this->profiling_enabled = 0;
  clear(@stacks);
}

bunyan*:::log-debug
/json(copyinstr(arg0), "msg") == "moray ping error"/
{
  printf("Error!\n");
  this->profiling_enabled = 0;
  printa(@stacks);
  clear(@stacks);
  exit(0);
}