granicus.if.org Git - postgresql/blob - src/port/getrusage.c

   1 /*-------------------------------------------------------------------------
   2  *
   3  * getrusage.c
   4  *        get information about resource utilisation
   5  *
   6  * Portions Copyright (c) 1996-2006, PostgreSQL Global Development Group
   7  * Portions Copyright (c) 1994, Regents of the University of California
   8  *
   9  *
  10  * IDENTIFICATION
  11  *        $PostgreSQL: pgsql/src/port/getrusage.c,v 1.12 2006/03/05 15:59:10 momjian Exp $
  12  *
  13  *-------------------------------------------------------------------------
  14  */
  15
  16 #include "c.h"
  17
  18 #include "rusagestub.h"
  19
  20 /* This code works on:
  21  *              univel
  22  *              solaris_i386
  23  *              sco
  24  *              solaris_sparc
  25  *              svr4
  26  *              hpux 9.*
  27  *              win32
  28  * which currently is all the supported platforms that don't have a
  29  * native version of getrusage().  So, if configure decides to compile
  30  * this file at all, we just use this version unconditionally.
  31  */
  32
  33 int
  34 getrusage(int who, struct rusage * rusage)
  35 {
  36 #ifdef WIN32
  37
  38         FILETIME        starttime;
  39         FILETIME        exittime;
  40         FILETIME        kerneltime;
  41         FILETIME        usertime;
  42         ULARGE_INTEGER li;
  43
  44         if (rusage == (struct rusage *) NULL)
  45         {
  46                 errno = EFAULT;
  47                 return -1;
  48         }
  49         memset(rusage, 0, sizeof(struct rusage));
  50         if (GetProcessTimes(GetCurrentProcess(),
  51                                                 &starttime, &exittime, &kerneltime, &usertime) == 0)
  52         {
  53                 _dosmaperr(GetLastError());
  54                 return -1;
  55         }
  56
  57         /* Convert FILETIMEs (0.1 us) to struct timeval */
  58         memcpy(&li, &kerneltime, sizeof(FILETIME));
  59         li.QuadPart /= 10L;                     /* Convert to microseconds */
  60         rusage->ru_stime.tv_sec = li.QuadPart / 1000000L;
  61         rusage->ru_stime.tv_usec = li.QuadPart % 1000000L;
  62
  63         memcpy(&li, &usertime, sizeof(FILETIME));
  64         li.QuadPart /= 10L;                     /* Convert to microseconds */
  65         rusage->ru_utime.tv_sec = li.QuadPart / 1000000L;
  66         rusage->ru_utime.tv_usec = li.QuadPart % 1000000L;
  67 #else                                                   /* all but WIN32 */
  68
  69         struct tms      tms;
  70         int                     tick_rate = CLK_TCK;    /* ticks per second */
  71         clock_t         u,
  72                                 s;
  73
  74         if (rusage == (struct rusage *) NULL)
  75         {
  76                 errno = EFAULT;
  77                 return -1;
  78         }
  79         if (times(&tms) < 0)
  80         {
  81                 /* errno set by times */
  82                 return -1;
  83         }
  84         switch (who)
  85         {
  86                 case RUSAGE_SELF:
  87                         u = tms.tms_utime;
  88                         s = tms.tms_stime;
  89                         break;
  90                 case RUSAGE_CHILDREN:
  91                         u = tms.tms_cutime;
  92                         s = tms.tms_cstime;
  93                         break;
  94                 default:
  95                         errno = EINVAL;
  96                         return -1;
  97         }
  98 #define TICK_TO_SEC(T, RATE)    ((T)/(RATE))
  99 #define TICK_TO_USEC(T,RATE)    (((T)%(RATE)*1000000)/RATE)
 100         rusage->ru_utime.tv_sec = TICK_TO_SEC(u, tick_rate);
 101         rusage->ru_utime.tv_usec = TICK_TO_USEC(u, tick_rate);
 102         rusage->ru_stime.tv_sec = TICK_TO_SEC(s, tick_rate);
 103         rusage->ru_stime.tv_usec = TICK_TO_USEC(u, tick_rate);
 104 #endif   /* WIN32 */
 105
 106         return 0;
 107 }