systemtap Measuring mysqld functions latency

latency.stp

#!/bin/env stap
#
global latency, latency_histogram

probe begin {
    printf("Begin.\n")
}

probe process("/usr/sbin/mysqld").function("*") {
    latency[probefunc()] = gettimeofday_s()
}
probe process("/usr/sbin/mysqld").function("*").return {
    l = gettimeofday_s() - latency[ppfunc()]
    printf("%s %d\n", ppfunc(), l)
    if (l > 1) latency_histogram[ppfunc()] <<< latency[ppfunc()]
}

probe end {
    foreach (lh in latency_histogram) {
        printf("\n>>>>>>> %s latency\n", lh)
        println(@hist_linear(latency_histogram[lh], 0, 10, 1))
    }
}