![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to proctm.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / unix|
Return to proctm.c CVS log | Up to [MW Coherent from dump] / coherent / g / usr / lib / uucp / tay104 / unix |
1.1 root 1: /* proctm.c
2: Get the time spent in the process.
3:
4: Copyright (C) 1992 Ian Lance Taylor
5:
6: This file is part of the Taylor UUCP package.
7:
8: This program is free software; you can redistribute it and/or
9: modify it under the terms of the GNU General Public License as
10: published by the Free Software Foundation; either version 2 of the
11: License, or (at your option) any later version.
12:
13: This program is distributed in the hope that it will be useful, but
14: WITHOUT ANY WARRANTY; without even the implied warranty of
15: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16: General Public License for more details.
17:
18: You should have received a copy of the GNU General Public License
19: along with this program; if not, write to the Free Software
20: Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21:
22: The author of the program may be contacted at [email protected] or
23: c/o Infinity Development Systems, P.O. Box 520, Waltham, MA 02254.
24: */
25:
26: #include "uucp.h"
27:
28: #include "sysdep.h"
29: #include "system.h"
30:
31: #if HAVE_SYS_PARAM_H
32: #include <sys/param.h>
33: #endif
34:
35: #if HAVE_LIMITS_H
36: #include <limits.h>
37: #endif
38:
39: /* Prefer gettimeofday to ftime to times. */
40:
41: #if HAVE_GETTIMEOFDAY || HAVE_FTIME
42: #undef HAVE_TIMES
43: #define HAVE_TIMES 0
44: #endif
45:
46: #if HAVE_GETTIMEOFDAY
47: #undef HAVE_FTIME
48: #define HAVE_FTIME 0
49: #endif
50:
51: #if HAVE_TIME_H && (HAVE_SYS_TIME_AND_TIME_H || ! HAVE_GETTIMEOFDAY)
52: #include <time.h>
53: #endif
54:
55: #if HAVE_GETTIMEOFDAY
56: #include <sys/time.h>
57: #endif
58:
59: #if HAVE_FTIME
60: #include <sys/timeb.h>
61: #endif
62:
63: #if HAVE_TIMES
64:
65: #if HAVE_SYS_TIMES_H
66: #include <sys/times.h>
67: #endif
68:
69: #if TIMES_DECLARATION_OK
70: /* We use a macro to protect this because times really returns clock_t
71: and on some systems, such as Ultrix 4.0, clock_t is int. We don't
72: leave it out entirely because on some systems, such as System III,
73: the declaration is necessary for correct compilation. */
74: #ifndef times
75: extern long times ();
76: #endif
77: #endif /* TIMES_DECLARATION_OK */
78:
79: #ifdef _SC_CLK_TCK
80: #define HAVE_SC_CLK_TCK 1
81: #else
82: #define HAVE_SC_CLK_TCK 0
83: #endif
84:
85: /* TIMES_TICK may have been set in policy.h, or we may be able to get
86: it using sysconf. If neither is the case, try to find a useful
87: definition from the system header files. */
88: #if TIMES_TICK == 0 && (! HAVE_SYSCONF || ! HAVE_SC_CLK_TCK)
89: #ifdef CLK_TCK
90: #undef TIMES_TICK
91: #define TIMES_TICK CLK_TCK
92: #else /* ! defined (CLK_TCK) */
93: #ifdef HZ
94: #undef TIMES_TICK
95: #define TIMES_TICK HZ
96: #endif /* defined (HZ) */
97: #endif /* ! defined (CLK_TCK) */
98: #endif /* TIMES_TICK == 0 && (! HAVE_SYSCONF || ! HAVE_SC_CLK_TCK) */
99:
100: #endif /* HAVE_TIMES */
101:
102: #ifndef time
103: extern time_t time ();
104: #endif
105: #if HAVE_SYSCONF
106: #ifndef sysconf
107: extern long sysconf ();
108: #endif
109: #endif
110:
111: /* Get the time in seconds and microseconds; this need only work
112: within the process when called from the system independent code.
113: It is also called by ixsysdep_time. */
114:
115: long
116: ixsysdep_process_time (pimicros)
117: long *pimicros;
118: {
119: #if HAVE_GETTIMEOFDAY
120: struct timeval stime;
121: struct timezone stz;
122:
123: (void) gettimeofday (&stime, &stz);
124: if (pimicros != NULL)
125: *pimicros = (long) stime.tv_usec;
126: return (long) stime.tv_sec;
127: #endif /* HAVE_GETTIMEOFDAY */
128:
129: #if HAVE_FTIME
130: static boolean fbad;
131:
132: if (! fbad)
133: {
134: struct timeb stime;
135: static struct timeb slast;
136:
137: (void) ftime (&stime);
138:
139: /* On some systems, such as SCO 3.2.2, ftime can go backwards in
140: time. If we detect this, we switch to using time. */
141: if (slast.time != 0
142: && (stime.time < slast.time
143: || (stime.time == slast.time &&
144: stime.millitm < slast.millitm)))
145: fbad = TRUE;
146: else
147: {
148: slast = stime;
149: if (pimicros != NULL)
150: *pimicros = (long) stime.millitm * (long) 1000;
151: return (long) stime.time;
152: }
153: }
154:
155: if (pimicros != NULL)
156: *pimicros = 0;
157: return (long) time ((time_t *) NULL);
158: #endif /* HAVE_FTIME */
159:
160: #if HAVE_TIMES
161: struct tms s;
162: long i;
163: static int itick;
164:
165: if (itick == 0)
166: {
167: #if TIMES_TICK == 0
168: #if HAVE_SYSCONF && HAVE_SC_CLK_TCK
169: itick = (int) sysconf (_SC_CLK_TCK);
170: #else /* ! HAVE_SYSCONF || ! HAVE_SC_CLK_TCK */
171: const char *z;
172:
173: z = getenv ("HZ");
174: if (z != NULL)
175: itick = (int) strtol (z, (char **) NULL, 10);
176:
177: /* If we really couldn't get anything, just use 60. */
178: if (itick == 0)
179: itick = 60;
180: #endif /* ! HAVE_SYSCONF || ! HAVE_SC_CLK_TCK */
181: #else /* TIMES_TICK != 0 */
182: itick = TIMES_TICK;
183: #endif /* TIMES_TICK == 0 */
184: }
185:
186: i = (long) times (&s);
187: if (pimicros != NULL)
188: *pimicros = (i % (long) itick) * ((long) 1000000 / (long) itick);
189: return i / (long) itick;
190: #endif /* HAVE_TIMES */
191:
192: #if ! HAVE_GETTIMEOFDAY && ! HAVE_FTIME && ! HAVE_TIMES
193: if (pimicros != NULL)
194: *pimicros = 0;
195: return (long) time ((time_t *) NULL);
196: #endif /* ! HAVE_GETTIMEOFDAY && ! HAVE_FTIME && ! HAVE_TIMES */
197: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.