Add ECDH support.
[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) && !defined(OPENSSL_SYS_VXWORKS)
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 #if !defined(TIMES) && !defined(OPENSSL_SYS_VXWORKS)
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 #    ifdef OPENSSL_SYS_VSWORKS
125           unsigned long ticks;
126 #    else
127         struct timeb ms_timeb;
128 #    endif
129 #  endif
130 #endif
131         } MS_TM;
132
133 char *ms_time_new(void)
134         {
135         MS_TM *ret;
136
137         ret=(MS_TM *)OPENSSL_malloc(sizeof(MS_TM));
138         if (ret == NULL)
139                 return(NULL);
140         memset(ret,0,sizeof(MS_TM));
141 #ifdef OPENSSL_SYS_WIN32
142         ret->thread_id=GetCurrentThread();
143 #endif
144         return((char *)ret);
145         }
146
147 void ms_time_free(char *a)
148         {
149         if (a != NULL)
150                 OPENSSL_free(a);
151         }
152
153 void ms_time_get(char *a)
154         {
155         MS_TM *tm=(MS_TM *)a;
156 #ifdef OPENSSL_SYS_WIN32
157         FILETIME tmpa,tmpb,tmpc;
158 #endif
159
160 #ifdef TIMES
161         times(&tm->ms_tms);
162 #else
163 #  ifdef OPENSSL_SYS_WIN32
164         GetThreadTimes(tm->thread_id,&tmpa,&tmpb,&tmpc,&(tm->ms_win32));
165 #  else
166 #    ifdef OPENSSL_SYS_VSWORKS
167         tm->ticks = tickGet();
168 #    else
169         ftime(&tm->ms_timeb);
170 #    endif
171 #  endif
172 #endif
173         }
174
175 double ms_time_diff(char *ap, char *bp)
176         {
177         MS_TM *a=(MS_TM *)ap;
178         MS_TM *b=(MS_TM *)bp;
179         double ret;
180
181 #ifdef TIMES
182         ret=(b->ms_tms.tms_utime-a->ms_tms.tms_utime)/HZ;
183 #else
184 # ifdef OPENSSL_SYS_WIN32
185         {
186 #ifdef __GNUC__
187         signed long long la,lb;
188 #else
189         signed _int64 la,lb;
190 #endif
191         la=a->ms_win32.dwHighDateTime;
192         lb=b->ms_win32.dwHighDateTime;
193         la<<=32;
194         lb<<=32;
195         la+=a->ms_win32.dwLowDateTime;
196         lb+=b->ms_win32.dwLowDateTime;
197         ret=((double)(lb-la))/1e7;
198         }
199 # else
200 #  ifdef OPENSSL_SYS_VSWORKS
201         ret = (double)(b->ticks - a->ticks) / (double)sysClkRateGet();
202 #  else
203         ret=     (double)(b->ms_timeb.time-a->ms_timeb.time)+
204                 (((double)b->ms_timeb.millitm)-
205                 ((double)a->ms_timeb.millitm))/1000.0;
206 #  endif
207 # endif
208 #endif
209         return((ret < 0.0000001)?0.0000001:ret);
210         }
211
212 int ms_time_cmp(char *ap, char *bp)
213         {
214         MS_TM *a=(MS_TM *)ap,*b=(MS_TM *)bp;
215         double d;
216         int ret;
217
218 #ifdef TIMES
219         d=(b->ms_tms.tms_utime-a->ms_tms.tms_utime)/HZ;
220 #else
221 # ifdef OPENSSL_SYS_WIN32
222         d =(b->ms_win32.dwHighDateTime&0x000fffff)*10+b->ms_win32.dwLowDateTime/1e7;
223         d-=(a->ms_win32.dwHighDateTime&0x000fffff)*10+a->ms_win32.dwLowDateTime/1e7;
224 # else
225 #  ifdef OPENSSL_SYS_VSWORKS
226         d = (b->ticks - a->ticks);
227 #  else
228         d=       (double)(b->ms_timeb.time-a->ms_timeb.time)+
229                 (((double)b->ms_timeb.millitm)-(double)a->ms_timeb.millitm)/1000.0;
230 #  endif
231 # endif
232 #endif
233         if (d == 0.0)
234                 ret=0;
235         else if (d < 0)
236                 ret= -1;
237         else
238                 ret=1;
239         return(ret);
240         }
241