head	1.2;
access;
symbols
	release_4_2:1.2;
locks; strict;
comment	@ * @;


1.2
date	94.06.16.03.23.06;	author aoki;	state Exp;
branches;
next	1.1;

1.1
date	94.06.09.03.22.28;	author aoki;	state Exp;
branches;
next	;


desc
@@


1.2
log
@add getrusage
@
text
@/*
 *   FILE
 *	port.c
 *
 *   DESCRIPTION
 *	SunOS5-specific routines
 *
 *   INTERFACE ROUTINES
 *	sparc_bug_set_outerjoincost
 *	random
 *	srandom
 *	getrusage
 *
 *   NOTES
 *
 *   IDENTIFICATION
 *	$Header: /import/faerie/aoki/postgres/src/backend/port/sparc_solaris/RCS/port.c,v 1.1 1994/06/09 03:22:28 aoki Exp aoki $
 */

#include "nodes/relation.h"
#include <math.h>		/* for pow() prototype */

#include <errno.h>
#include "rusagestub.h"

RcsId("$Header: /import/faerie/aoki/postgres/src/backend/port/sparc_solaris/RCS/port.c,v 1.1 1994/06/09 03:22:28 aoki Exp aoki $");

/*
 * Hackety-hack for Sparc compiler error.
 *
 * See planner/path/joinpath.c
 */
void
sparc_bug_set_outerjoincost(p, val)
    char *p;
    long val;
{
    set_outerjoincost((Path)p, (Cost)val);
}

long
random()
{
    return(lrand48());
}

void
srandom(seed)
    int seed;
{
    srand48((long int) seed);
}

int
getrusage(who, rusage)
    int who;
    struct rusage *rusage;
{
    struct tms tms;
    register int tick_rate = CLK_TCK;	/* ticks per second */
    clock_t u, s;

    if (rusage == (struct rusage *) NULL) {
	errno = EFAULT;
	return(-1);
    }
    if (times(&tms) < 0) {
	/* errno set by times */
	return(-1);
    }
    switch (who) {
    case RUSAGE_SELF:
	u = tms.tms_utime;
	s = tms.tms_stime;
	break;
    case RUSAGE_CHILDREN:
	u = tms.tms_cutime;
	s = tms.tms_cstime;
	break;
    default:
	errno = EINVAL;
	return(-1);
    }
#define TICK_TO_SEC(T, RATE)	((T)/(RATE))
#define	TICK_TO_USEC(T,RATE)	(((T)%(RATE)*1000000)/RATE)
    rusage->ru_utime.tv_sec = TICK_TO_SEC(u, tick_rate);
    rusage->ru_utime.tv_usec = TICK_TO_USEC(u, tick_rate);
    rusage->ru_stime.tv_sec = TICK_TO_SEC(s, tick_rate);
    rusage->ru_stime.tv_usec = TICK_TO_USEC(u, tick_rate);
    return(0);
}
@


1.1
log
@Initial revision
@
text
@d12 1
d17 1
a17 1
 *	$Header: /home2/aoki/master/src/backend/port/sparc/RCS/port.c,v 1.7 1993/08/10 19:54:48 aoki Exp $
d23 2
a24 1
RcsId("$Header: /home2/aoki/master/src/backend/port/sparc/RCS/port.c,v 1.7 1993/08/10 19:54:48 aoki Exp $");
d26 2
d53 39
@