Because there's chances we clash with the system's types.h, rename our
[oweals/openssl.git] / crypto / tmdiff.c
1 /* crypto/tmdiff.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3  * All rights reserved.
4  *
5  * This package is an SSL implementation written
6  * by Eric Young (eay@cryptsoft.com).
7  * The implementation was written so as to conform with Netscapes SSL.
8  * 
9  * This library is free for commercial and non-commercial use as long as
10  * the following conditions are aheared to.  The following conditions
11  * apply to all code found in this distribution, be it the RC4, RSA,
12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
13  * included with this distribution is covered by the same copyright terms
14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15  * 
16  * Copyright remains Eric Young's, and as such any Copyright notices in
17  * the code are not to be removed.
18  * If this package is used in a product, Eric Young should be given attribution
19  * as the author of the parts of the library used.
20  * This can be in the form of a textual message at program startup or
21  * in documentation (online or textual) provided with the package.
22  * 
23  * Redistribution and use in source and binary forms, with or without
24  * modification, are permitted provided that the following conditions
25  * are met:
26  * 1. Redistributions of source code must retain the copyright
27  *    notice, this list of conditions and the following disclaimer.
28  * 2. Redistributions in binary form must reproduce the above copyright
29  *    notice, this list of conditions and the following disclaimer in the
30  *    documentation and/or other materials provided with the distribution.
31  * 3. All advertising materials mentioning features or use of this software
32  *    must display the following acknowledgement:
33  *    "This product includes cryptographic software written by
34  *     Eric Young (eay@cryptsoft.com)"
35  *    The word 'cryptographic' can be left out if the rouines from the library
36  *    being used are not cryptographic related :-).
37  * 4. If you include any Windows specific code (or a derivative thereof) from 
38  *    the apps directory (application code) you must include an acknowledgement:
39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40  * 
41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51  * SUCH DAMAGE.
52  * 
53  * The licence and distribution terms for any publically available version or
54  * derivative of this code cannot be changed.  i.e. this code cannot simply be
55  * copied and put under another distribution licence
56  * [including the GNU Public Licence.]
57  */
58 #include <stdio.h>
59 #include <stdlib.h>
60 #include "cryptlib.h"
61 #include <openssl/tmdiff.h>
62
63 #ifdef TIMEB
64 #undef OPENSSL_SYS_WIN32
65 #undef TIMES
66 #endif
67
68 #if !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WIN32) && !defined(OPENSSL_SYS_VMS) || defined(__DECC) && !defined(OPENSSL_SYS_MACOSX)
69 # define TIMES
70 #endif
71
72 #ifndef _IRIX
73 #  include <time.h>
74 #endif
75 #ifdef TIMES
76 #  include <sys/types.h>
77 #  include <sys/times.h>
78 #endif
79
80 /* Depending on the VMS version, the tms structure is perhaps defined.
81    The __TMS macro will show if it was.  If it wasn't defined, we should
82    undefine TIMES, since that tells the rest of the program how things
83    should be handled.                           -- Richard Levitte */
84 #if defined(OPENSSL_SYS_VMS_DECC) && !defined(__TMS)
85 #undef TIMES
86 #endif
87
88 #if defined(sun) || defined(__ultrix)
89 #define _POSIX_SOURCE
90 #include <limits.h>
91 #include <sys/param.h>
92 #endif
93
94 #ifndef TIMES
95 #include <sys/timeb.h>
96 #endif
97
98 #ifdef OPENSSL_SYS_WIN32
99 #include <windows.h>
100 #endif
101
102 /* The following if from times(3) man page.  It may need to be changed */
103 #ifndef HZ
104 # ifndef CLK_TCK
105 #  ifndef _BSD_CLK_TCK_ /* FreeBSD hack */
106 #   define HZ  100.0
107 #  else /* _BSD_CLK_TCK_ */
108 #   define HZ ((double)_BSD_CLK_TCK_)
109 #  endif
110 # else /* CLK_TCK */
111 #  define HZ ((double)CLK_TCK)
112 # endif
113 #endif
114
115 typedef struct ms_tm
116         {
117 #ifdef TIMES
118         struct tms ms_tms;
119 #else
120 #  ifdef OPENSSL_SYS_WIN32
121         HANDLE thread_id;
122         FILETIME ms_win32;
123 #  else
124         struct timeb ms_timeb;
125 #  endif
126 #endif
127         } MS_TM;
128
129 char *ms_time_new(void)
130         {
131         MS_TM *ret;
132
133         ret=(MS_TM *)OPENSSL_malloc(sizeof(MS_TM));
134         if (ret == NULL)
135                 return(NULL);
136         memset(ret,0,sizeof(MS_TM));
137 #ifdef OPENSSL_SYS_WIN32
138         ret->thread_id=GetCurrentThread();
139 #endif
140         return((char *)ret);
141         }
142
143 void ms_time_free(char *a)
144         {
145         if (a != NULL)
146                 OPENSSL_free(a);
147         }
148
149 void ms_time_get(char *a)
150         {
151         MS_TM *tm=(MS_TM *)a;
152 #ifdef OPENSSL_SYS_WIN32
153         FILETIME tmpa,tmpb,tmpc;
154 #endif
155
156 #ifdef TIMES
157         times(&tm->ms_tms);
158 #else
159 #  ifdef OPENSSL_SYS_WIN32
160         GetThreadTimes(tm->thread_id,&tmpa,&tmpb,&tmpc,&(tm->ms_win32));
161 #  else
162         ftime(&tm->ms_timeb);
163 #  endif
164 #endif
165         }
166
167 double ms_time_diff(char *ap, char *bp)
168         {
169         MS_TM *a=(MS_TM *)ap;
170         MS_TM *b=(MS_TM *)bp;
171         double ret;
172
173 #ifdef TIMES
174         ret=(b->ms_tms.tms_utime-a->ms_tms.tms_utime)/HZ;
175 #else
176 # ifdef OPENSSL_SYS_WIN32
177         {
178 #ifdef __GNUC__
179         signed long long la,lb;
180 #else
181         signed _int64 la,lb;
182 #endif
183         la=a->ms_win32.dwHighDateTime;
184         lb=b->ms_win32.dwHighDateTime;
185         la<<=32;
186         lb<<=32;
187         la+=a->ms_win32.dwLowDateTime;
188         lb+=b->ms_win32.dwLowDateTime;
189         ret=((double)(lb-la))/1e7;
190         }
191 # else
192         ret=     (double)(b->ms_timeb.time-a->ms_timeb.time)+
193                 (((double)b->ms_timeb.millitm)-
194                 ((double)a->ms_timeb.millitm))/1000.0;
195 #  endif
196 #endif
197         return((ret < 0.0000001)?0.0000001:ret);
198         }
199
200 int ms_time_cmp(char *ap, char *bp)
201         {
202         MS_TM *a=(MS_TM *)ap,*b=(MS_TM *)bp;
203         double d;
204         int ret;
205
206 #ifdef TIMES
207         d=(b->ms_tms.tms_utime-a->ms_tms.tms_utime)/HZ;
208 #else
209 # ifdef OPENSSL_SYS_WIN32
210         d =(b->ms_win32.dwHighDateTime&0x000fffff)*10+b->ms_win32.dwLowDateTime/1e7;
211         d-=(a->ms_win32.dwHighDateTime&0x000fffff)*10+a->ms_win32.dwLowDateTime/1e7;
212 # else
213         d=       (double)(b->ms_timeb.time-a->ms_timeb.time)+
214                 (((double)b->ms_timeb.millitm)-(double)a->ms_timeb.millitm)/1000.0;
215 #  endif
216 #endif
217         if (d == 0.0)
218                 ret=0;
219         else if (d < 0)
220                 ret= -1;
221         else
222                 ret=1;
223         return(ret);
224         }
225