annotate constant-q-cpp/src/ext/kissfft/test/pstats.c @ 372:af71cbdab621 tip

Update bqvec code
author Chris Cannam
date Tue, 19 Nov 2019 10:13:32 +0000
parents 5d0a2ebb4d17
children
rev   line source
Chris@366 1 #include <stdio.h>
Chris@366 2 #include <stdlib.h>
Chris@366 3 #include <sys/times.h>
Chris@366 4 #include <sys/types.h>
Chris@366 5 #include <unistd.h>
Chris@366 6
Chris@366 7 #include "pstats.h"
Chris@366 8
Chris@366 9 static struct tms tms_beg;
Chris@366 10 static struct tms tms_end;
Chris@366 11 static int has_times = 0;
Chris@366 12
Chris@366 13
Chris@366 14 void pstats_init(void)
Chris@366 15 {
Chris@366 16 has_times = times(&tms_beg) != -1;
Chris@366 17 }
Chris@366 18
Chris@366 19 static void tms_report(void)
Chris@366 20 {
Chris@366 21 double cputime;
Chris@366 22 if (! has_times )
Chris@366 23 return;
Chris@366 24 times(&tms_end);
Chris@366 25 cputime = ( ((float)tms_end.tms_utime + tms_end.tms_stime + tms_end.tms_cutime + tms_end.tms_cstime ) -
Chris@366 26 ((float)tms_beg.tms_utime + tms_beg.tms_stime + tms_beg.tms_cutime + tms_beg.tms_cstime ) )
Chris@366 27 / sysconf(_SC_CLK_TCK);
Chris@366 28 fprintf(stderr,"\tcputime=%.3f\n" , cputime);
Chris@366 29 }
Chris@366 30
Chris@366 31 static void ps_report(void)
Chris@366 32 {
Chris@366 33 char buf[1024];
Chris@366 34 #ifdef __APPLE__ /* MAC OS X */
Chris@366 35 sprintf(buf,"ps -o command,majflt,minflt,rss,pagein,vsz -p %d 1>&2",getpid() );
Chris@366 36 #else /* GNU/Linux */
Chris@366 37 sprintf(buf,"ps -o comm,majflt,minflt,rss,drs,pagein,sz,trs,vsz %d 1>&2",getpid() );
Chris@366 38 #endif
Chris@366 39 if (system( buf )==-1) {
Chris@366 40 perror("system call to ps failed");
Chris@366 41 }
Chris@366 42 }
Chris@366 43
Chris@366 44 void pstats_report()
Chris@366 45 {
Chris@366 46 ps_report();
Chris@366 47 tms_report();
Chris@366 48 }
Chris@366 49