/*
*******************************************************************************
*  Copyright (c) 1996 Martin Poole                            *
*******************************************************************************
**
** WARNING !!  WARNING !! WARNING !! WARNING !! WARNING !! WARNING !!
**
** Any changes to be made to this file should first be checked with
** mplib1 source control for library integrity.
**
** mplib1 source control can be reached at  mplib1@quatermass.co.uk
** 
*                                                                             *
*  $Source$
*  $Author$
*  $Date$
*  $Revision$
*                                                                             *
*******************************************************************************
*                                                                             *
* $Log$
*
*******************************************************************************
*/

#ident "$Header$"

/* ------------------------------------------------------------------
    Include files
   ------------------------------------------------------------------ */

#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/time.h>
#include <time.h>
#include <string.h>
#include <errno.h>
#ifdef RUSAGE_IN_UCBLIB
#include </usr/ucbinclude/sys/resource.h>
#else
#include <sys/resource.h>
#endif

#include <mplib1/mplib1_config.h>
#include <mplib1/stopwatch.h>

/* ------------------------------------------------------------------
    defines
   ------------------------------------------------------------------ */

#ifndef RUSAGE_SELF
/* Last ditch variation, in case nothing else works */
#define RUSAGE_SELF		1
#define RUSAGE_CHILDREN		2

struct rusage {
    struct timeval ru_utime;
    struct timeval ru_stime;
};

#endif

/* ------------------------------------------------------------------
    Code starts here
   ------------------------------------------------------------------ */

int
init_cpu_stopwatch( struct cpu_stopwatch *cpu_p )
{
    if (cpu_p)
	memset( cpu_p, '\0', sizeof(struct cpu_stopwatch) );
    return(0);
}

int
start_cpu_stopwatch( struct cpu_stopwatch *cpu_p )
{
    struct rusage start_usage;
    getrusage( RUSAGE_SELF, &start_usage );
    memcpy( &cpu_p->u_timing.start_time,
	    &start_usage.ru_utime,
	    sizeof(struct timeval) );
    memcpy( &cpu_p->s_timing.start_time,
	    &start_usage.ru_stime,
	    sizeof(struct timeval) );
    return(0);
}

int
stop_cpu_stopwatch( struct cpu_stopwatch *cpu_p )
{
    struct rusage end_usage;
    getrusage( RUSAGE_SELF, &end_usage );
    accum_stop_timevals( &cpu_p->u_timing, &end_usage.ru_utime );
    accum_stop_timevals( &cpu_p->s_timing, &end_usage.ru_stime );
    return(0);
}

int
accrete_cpu_stopwatch( struct cpu_stopwatch *cpu_p_into,
			struct cpu_stopwatch *cpu_p_from )
{
    add_timevals( &cpu_p_into->u_timing.cumulative_time,
		     &cpu_p_from->u_timing.cumulative_time );
    add_timevals( &cpu_p_into->s_timing.cumulative_time,
		    &cpu_p_from->s_timing.cumulative_time );
    return(0);
}

char *
display_cpu_stopwatch( struct cpu_stopwatch *cpu_p, int mode )
{
    display_stopwatch( &cpu_p->u_timing, mode );
    display_stopwatch( &cpu_p->s_timing, mode );
    sprintf( cpu_p->elps_str, "USR: %s  CPU: %s",
	    cpu_p->u_timing.elps_str,
	    cpu_p->s_timing.elps_str );
    return(0);
}


/* -- End of File -- */