| |
| /*--------------------------------------------------------------------*/ |
| /*--- Profiling machinery -- not for release builds! ---*/ |
| /*--- vg_profile.c ---*/ |
| /*--------------------------------------------------------------------*/ |
| |
| /* |
| This file is part of Valgrind, an x86 protected-mode emulator |
| designed for debugging and profiling binaries on x86-Unixes. |
| |
| Copyright (C) 2000-2002 Julian Seward |
| jseward@acm.org |
| |
| 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; either version 2 of the |
| License, or (at your option) any later version. |
| |
| 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., 59 Temple Place, Suite 330, Boston, MA |
| 02111-1307, USA. |
| |
| The GNU General Public License is contained in the file COPYING. |
| */ |
| |
| #include "vg_include.h" |
| |
| #ifdef VG_PROFILE |
| |
| /* get rid of these, if possible */ |
| #include <signal.h> |
| #include <sys/time.h> |
| |
| #define VGP_PAIR(enumname,str) str |
| static const Char* vgp_names[VGP_M_CCS] = { VGP_LIST }; |
| #undef VGP_PAIR |
| |
| static Int vgp_nticks; |
| static Int vgp_counts[VGP_M_CCS]; |
| static Int vgp_entries[VGP_M_CCS]; |
| |
| static Int vgp_sp; |
| static VgpCC vgp_stack[VGP_M_STACK]; |
| |
| void VGP_(tick) ( int sigNo ) |
| { |
| Int cc; |
| vgp_nticks++; |
| cc = vgp_stack[vgp_sp]; |
| vg_assert(cc >= 0 && cc < VGP_M_CCS); |
| vgp_counts[ cc ]++; |
| } |
| |
| void VGP_(init_profiling) ( void ) |
| { |
| struct itimerval value; |
| Int i, ret; |
| |
| for (i = 0; i < VGP_M_CCS; i++) |
| vgp_counts[i] = vgp_entries[i] = 0; |
| |
| vgp_nticks = 0; |
| vgp_sp = -1; |
| VGP_(pushcc) ( VgpUnc ); |
| |
| value.it_interval.tv_sec = 0; |
| value.it_interval.tv_usec = 10 * 1000; |
| value.it_value = value.it_interval; |
| |
| signal(SIGPROF, VGP_(tick) ); |
| ret = setitimer(ITIMER_PROF, &value, NULL); |
| if (ret != 0) VG_(panic)("vgp_init_profiling"); |
| } |
| |
| void VGP_(done_profiling) ( void ) |
| { |
| Int i; |
| VG_(printf)("Profiling done, %d ticks\n", vgp_nticks); |
| for (i = 0; i < VGP_M_CCS; i++) |
| VG_(printf)("%2d: %4d (%3d %%%%) ticks, %8d entries for %s\n", |
| i, vgp_counts[i], |
| (Int)(1000.0 * (double)vgp_counts[i] / (double)vgp_nticks), |
| vgp_entries[i], |
| vgp_names[i] ); |
| } |
| |
| void VGP_(pushcc) ( VgpCC cc ) |
| { |
| if (vgp_sp >= VGP_M_STACK-1) VG_(panic)("vgp_pushcc"); |
| vgp_sp++; |
| vgp_stack[vgp_sp] = cc; |
| vgp_entries[ cc ] ++; |
| } |
| |
| void VGP_(popcc) ( void ) |
| { |
| if (vgp_sp <= 0) VG_(panic)("vgp_popcc"); |
| vgp_sp--; |
| } |
| |
| #endif /* VG_PROFILE */ |
| |
| /*--------------------------------------------------------------------*/ |
| /*--- end vg_profile.c ---*/ |
| /*--------------------------------------------------------------------*/ |