55 lines
1.5 KiB
D
55 lines
1.5 KiB
D
#!/usr/sbin/dtrace -s
|
|
/*
|
|
Copyright (c) 2009, 2014, Oracle and/or its affiliates. All rights reserved.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; version 2 of the License.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
|
|
/*
|
|
Show query execution times, indicating whether the query-cache was used
|
|
*/
|
|
|
|
#pragma D option quiet
|
|
|
|
dtrace:::BEGIN
|
|
{
|
|
printf("%-20s %-20s %-40s %2s %-9s\n", "Who", "Database", "Query", "QC", "Time(ms)");
|
|
}
|
|
|
|
mysql*:::query-start
|
|
{
|
|
self->query = copyinstr(arg0);
|
|
self->connid = arg1;
|
|
self->db = copyinstr(arg2);
|
|
self->who = strjoin(copyinstr(arg3),strjoin("@",copyinstr(arg4)));
|
|
self->querystart = timestamp;
|
|
self->qc = 0;
|
|
}
|
|
|
|
mysql*:::query-cache-hit
|
|
{
|
|
self->qc = 1;
|
|
}
|
|
|
|
mysql*:::query-cache-miss
|
|
{
|
|
self->qc = 0;
|
|
}
|
|
|
|
mysql*:::query-done
|
|
{
|
|
printf("%-20s %-20s %-40s %-2s %-9d\n",self->who,self->db,self->query,(self->qc ? "Y" : "N"),
|
|
(timestamp - self->querystart) / 1000000);
|
|
}
|