Gecko [ www.casapremiada.novaexata.com.br ]

Name	Size	Permission
container_check.meta	1.04 KB	-rw-r--r--
container_check.stp	5.64 KB	-rwxr-xr-x
errno.meta	456 B	-rw-r--r--
errno.stp	970 B	-rwxr-xr-x
fileline-profile.meta	783 B	-rw-r--r--
fileline-profile.stp	1.19 KB	-rwxr-xr-x
fntimes.meta	512 B	-rw-r--r--
fntimes.stp	870 B	-rwxr-xr-x
fntimes.txt	1.34 KB	-rw-r--r--
functioncallcount.meta	649 B	-rw-r--r--
functioncallcount.stp	490 B	-rwxr-xr-x
functioncallcount.tcl	399 B	-rw-r--r--
graphcall.stp	534 B	-rwxr-xr-x
ioctl_handler.meta	1.18 KB	-rw-r--r--
ioctl_handler.stp	801 B	-rwxr-xr-x
latencytap.meta	877 B	-rw-r--r--
latencytap.stp	11.91 KB	-rwxr-xr-x
latencytap.tcl	140 B	-rw-r--r--
latencytap.txt	2.05 KB	-rw-r--r--
linetimes.meta	688 B	-rw-r--r--
linetimes.stp	1.57 KB	-rwxr-xr-x
linetimes.txt	13.61 KB	-rw-r--r--
perf.meta	578 B	-rw-r--r--
perf.stp	1.89 KB	-rwxr-xr-x
perf.tcl	166 B	-rw-r--r--
periodic.meta	895 B	-rw-r--r--
periodic.stp	2.56 KB	-rwxr-xr-x
pf2.meta	420 B	-rw-r--r--
pf2.stp	370 B	-rwxr-xr-x
pf2.txt	406 B	-rw-r--r--
pf3.meta	439 B	-rw-r--r--
pf3.stp	992 B	-rwxr-xr-x
pf3.txt	489 B	-rw-r--r--
pf4.meta	471 B	-rw-r--r--
pf4.stp	952 B	-rwxr-xr-x
pf4.tcl	79 B	-rw-r--r--
pf4.txt	754 B	-rw-r--r--
sched_switch.meta	780 B	-rw-r--r--
sched_switch.stp	2.08 KB	-rwxr-xr-x
syscallerrorsbypid.meta	1.04 KB	-rw-r--r--
syscallerrorsbypid.stp	936 B	-rwxr-xr-x
syscalllatency.meta	1.05 KB	-rw-r--r--
syscalllatency.stp	981 B	-rwxr-xr-x
syscallsbypid.meta	1020 B	-rw-r--r--
syscallsbypid.stp	780 B	-rwxr-xr-x
thread-times.meta	384 B	-rw-r--r--
thread-times.stp	1.21 KB	-rwxr-xr-x
thread-times.txt	1009 B	-rw-r--r--
timeout.meta	728 B	-rw-r--r--
timeout.stp	2.7 KB	-rwxr-xr-x
topsys.meta	446 B	-rw-r--r--
topsys.stp	736 B	-rwxr-xr-x

Code Editor : periodic.stp

#!/usr/bin/stap
# Copyright (C) 2011-2016 Red Hat, Inc.
# Written by William Cohen <wcohen@redhat.com>
#
# This script give an idea what periodic things are running on
# the system. Usage:
#
# stap --all-modules periodic.stp

global last_expire, period, funct, data, proc_info, delayed_work_info

probe kernel.trace("timer_expire_entry")
{
  old_expire = last_expire[$timer]
  new_expire = gettimeofday_us()
  if (old_expire) {
    elapsed = new_expire - old_expire
    period[$timer] <<< elapsed
    funct[$timer] = $timer->function
    data[$timer] = @defined($timer->data) ? $timer->data : 0
    proc_info[$timer] = @defined($timer->data) ? 0 : @container_of($timer, "struct process_timer", timer)->task
    delayed_work_info[$timer] = @defined($timer->data) ? 0 : & @container_of($timer, "struct delayed_work", timer)
  }
  last_expire[$timer] = new_expire
}

function output()
{
  printf("%-7s %-50s %15s %25s %9s\n", "#type", "function", "avg period(us)", "period variance(us^2)", "count")
  # print out the various timers firing
  foreach([timer] in period-) {
    fname = symname(funct[timer])
    if (fname == "process_timeout") {
      ptr = (data[timer] ? data[timer] : proc_info[timer])
      fname = sprintf("%s(%d)",
                      kernel_string_n(@cast(ptr, "struct task_struct", "kernel<linux/sched.h>")->comm, 16),
                      @cast(ptr, "struct task_struct", "kernel<linux/sched.h>")->pid)
      type="process"
    } else if (fname == "delayed_work_timer_fn") {
      ptr = (data[timer] ? data[timer] : delayed_work_info[timer])
      faddr = @defined(@cast(ptr, "struct delayed_work", "kernel<linux/workqueue.h>")->work->func)
      ? @cast(ptr, "struct delayed_work", "kernel<linux/workqueue.h>")->work->func
      : @cast(ptr, "struct work_struct", "kernel<linux/workqueue.h>")->func
      fname = sprintf("%s", symname(faddr))
      type="work_q"
    } else {
      fileline = symfileline(funct[timer])
      if (strtol(fileline, 16)) // fileline is just the address
        fname = sprintf("%s", symdata(funct[timer]))
      else
        fname = sprintf("%s@%s", symname(funct[timer]), fileline)
      type="kernel"
    }
    printf("%-7s %-50.50s %15d %25d %9d\n", type, fname,
           @avg(period[timer]), @variance(period[timer], 2), @count(period[timer]))
  }
}

probe begin
{
  printf("#monitoring timer periods (press control-c for output)\n")
}

probe end { output() }

# allow optional period output from script
%( $# > 0 %?
probe timer.s($1)
{
  output();
  delete last_expire
  delete period
  delete funct
  delete data
  delete proc_info
  delete delayed_work_info
}
%)

${this.title}

Code Editor : periodic.stp