26 lines
614 B
C
26 lines
614 B
C
|
/* getcpu
|
||
|
* Calculate CPU time used in thousandths of a second. Original
|
||
|
* version used clock() from the standard C library (libc.a).
|
||
|
* The current version now uses times() also in libc.a. This
|
||
|
* function may be called from a C or FORTRAN routine.
|
||
|
*
|
||
|
* Written by D. Page 3 September 1992
|
||
|
* Modified by Dave St. 6 May 1999
|
||
|
*/
|
||
|
|
||
|
#include <time.h>
|
||
|
#include <sys/times.h>
|
||
|
#include <limits.h>
|
||
|
|
||
|
void getcpu(long *cpu_thsdth_sec)
|
||
|
{
|
||
|
struct tms tim;
|
||
|
|
||
|
(void) times(&tim);
|
||
|
|
||
|
*cpu_thsdth_sec = ( 1000L/(long)CLOCKS_PER_SEC ) *
|
||
|
( (long)tim.tms_utime + (long)tim.tms_stime );
|
||
|
|
||
|
|
||
|
}
|