25 lines
614 B
C
25 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 );
|
|
|
|
|
|
}
|