b09cc7d2871a9b89d9e301b9342eaf5ede8e3b4f
[openssl.git] / ssl / ssl_stat.c
1 /* ssl/ssl_stat.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 /* ====================================================================
59  * Copyright 2005 Nokia. All rights reserved.
60  *
61  * The portions of the attached software ("Contribution") is developed by
62  * Nokia Corporation and is licensed pursuant to the OpenSSL open source
63  * license.
64  *
65  * The Contribution, originally written by Mika Kousa and Pasi Eronen of
66  * Nokia Corporation, consists of the "PSK" (Pre-Shared Key) ciphersuites
67  * support (see RFC 4279) to OpenSSL.
68  *
69  * No patent licenses or other rights except those expressly stated in
70  * the OpenSSL open source license shall be deemed granted or received
71  * expressly, by implication, estoppel, or otherwise.
72  *
73  * No assurances are provided by Nokia that the Contribution does not
74  * infringe the patent or other intellectual property rights of any third
75  * party or that the license provides you with all the necessary rights
76  * to make use of the Contribution.
77  *
78  * THE SOFTWARE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. IN
79  * ADDITION TO THE DISCLAIMERS INCLUDED IN THE LICENSE, NOKIA
80  * SPECIFICALLY DISCLAIMS ANY LIABILITY FOR CLAIMS BROUGHT BY YOU OR ANY
81  * OTHER ENTITY BASED ON INFRINGEMENT OF INTELLECTUAL PROPERTY RIGHTS OR
82  * OTHERWISE.
83  */
84
85 #include <stdio.h>
86 #include "ssl_locl.h"
87
88 const char *SSL_state_string_long(const SSL *s)
89         {
90         const char *str;
91
92         switch (s->state)
93                 {
94 case SSL_ST_BEFORE: str="before SSL initialization"; break;
95 case SSL_ST_ACCEPT: str="before accept initialization"; break;
96 case SSL_ST_CONNECT: str="before connect initialization"; break;
97 case SSL_ST_OK: str="SSL negotiation finished successfully"; break;
98 case SSL_ST_RENEGOTIATE:        str="SSL renegotiate ciphers"; break;
99 case SSL_ST_BEFORE|SSL_ST_CONNECT: str="before/connect initialization"; break;
100 case SSL_ST_OK|SSL_ST_CONNECT: str="ok/connect SSL initialization"; break;
101 case SSL_ST_BEFORE|SSL_ST_ACCEPT: str="before/accept initialization"; break;
102 case SSL_ST_OK|SSL_ST_ACCEPT: str="ok/accept SSL initialization"; break;
103 #ifndef OPENSSL_NO_SSL2
104 case SSL2_ST_CLIENT_START_ENCRYPTION: str="SSLv2 client start encryption"; break;
105 case SSL2_ST_SERVER_START_ENCRYPTION: str="SSLv2 server start encryption"; break;
106 case SSL2_ST_SEND_CLIENT_HELLO_A: str="SSLv2 write client hello A"; break;
107 case SSL2_ST_SEND_CLIENT_HELLO_B: str="SSLv2 write client hello B"; break;
108 case SSL2_ST_GET_SERVER_HELLO_A: str="SSLv2 read server hello A"; break;
109 case SSL2_ST_GET_SERVER_HELLO_B: str="SSLv2 read server hello B"; break;
110 case SSL2_ST_SEND_CLIENT_MASTER_KEY_A: str="SSLv2 write client master key A"; break;
111 case SSL2_ST_SEND_CLIENT_MASTER_KEY_B: str="SSLv2 write client master key B"; break;
112 case SSL2_ST_SEND_CLIENT_FINISHED_A: str="SSLv2 write client finished A"; break;
113 case SSL2_ST_SEND_CLIENT_FINISHED_B: str="SSLv2 write client finished B"; break;
114 case SSL2_ST_SEND_CLIENT_CERTIFICATE_A: str="SSLv2 write client certificate A"; break;
115 case SSL2_ST_SEND_CLIENT_CERTIFICATE_B: str="SSLv2 write client certificate B"; break;
116 case SSL2_ST_SEND_CLIENT_CERTIFICATE_C: str="SSLv2 write client certificate C"; break;
117 case SSL2_ST_SEND_CLIENT_CERTIFICATE_D: str="SSLv2 write client certificate D"; break;
118 case SSL2_ST_GET_SERVER_VERIFY_A: str="SSLv2 read server verify A"; break;
119 case SSL2_ST_GET_SERVER_VERIFY_B: str="SSLv2 read server verify B"; break;
120 case SSL2_ST_GET_SERVER_FINISHED_A: str="SSLv2 read server finished A"; break;
121 case SSL2_ST_GET_SERVER_FINISHED_B: str="SSLv2 read server finished B"; break;
122 case SSL2_ST_GET_CLIENT_HELLO_A: str="SSLv2 read client hello A"; break;
123 case SSL2_ST_GET_CLIENT_HELLO_B: str="SSLv2 read client hello B"; break;
124 case SSL2_ST_GET_CLIENT_HELLO_C: str="SSLv2 read client hello C"; break;
125 case SSL2_ST_SEND_SERVER_HELLO_A: str="SSLv2 write server hello A"; break;
126 case SSL2_ST_SEND_SERVER_HELLO_B: str="SSLv2 write server hello B"; break;
127 case SSL2_ST_GET_CLIENT_MASTER_KEY_A: str="SSLv2 read client master key A"; break;
128 case SSL2_ST_GET_CLIENT_MASTER_KEY_B: str="SSLv2 read client master key B"; break;
129 case SSL2_ST_SEND_SERVER_VERIFY_A: str="SSLv2 write server verify A"; break;
130 case SSL2_ST_SEND_SERVER_VERIFY_B: str="SSLv2 write server verify B"; break;
131 case SSL2_ST_SEND_SERVER_VERIFY_C: str="SSLv2 write server verify C"; break;
132 case SSL2_ST_GET_CLIENT_FINISHED_A: str="SSLv2 read client finished A"; break;
133 case SSL2_ST_GET_CLIENT_FINISHED_B: str="SSLv2 read client finished B"; break;
134 case SSL2_ST_SEND_SERVER_FINISHED_A: str="SSLv2 write server finished A"; break;
135 case SSL2_ST_SEND_SERVER_FINISHED_B: str="SSLv2 write server finished B"; break;
136 case SSL2_ST_SEND_REQUEST_CERTIFICATE_A: str="SSLv2 write request certificate A"; break;
137 case SSL2_ST_SEND_REQUEST_CERTIFICATE_B: str="SSLv2 write request certificate B"; break;
138 case SSL2_ST_SEND_REQUEST_CERTIFICATE_C: str="SSLv2 write request certificate C"; break;
139 case SSL2_ST_SEND_REQUEST_CERTIFICATE_D: str="SSLv2 write request certificate D"; break;
140 case SSL2_ST_X509_GET_SERVER_CERTIFICATE: str="SSLv2 X509 read server certificate"; break;
141 case SSL2_ST_X509_GET_CLIENT_CERTIFICATE: str="SSLv2 X509 read client certificate"; break;
142 #endif
143
144 #ifndef OPENSSL_NO_SSL3
145 /* SSLv3 additions */
146 case SSL3_ST_CW_CLNT_HELLO_A:   str="SSLv3 write client hello A"; break;
147 case SSL3_ST_CW_CLNT_HELLO_B:   str="SSLv3 write client hello B"; break;
148 case SSL3_ST_CR_SRVR_HELLO_A:   str="SSLv3 read server hello A"; break;
149 case SSL3_ST_CR_SRVR_HELLO_B:   str="SSLv3 read server hello B"; break;
150 case SSL3_ST_CR_CERT_A:         str="SSLv3 read server certificate A"; break;
151 case SSL3_ST_CR_CERT_B:         str="SSLv3 read server certificate B"; break;
152 case SSL3_ST_CR_KEY_EXCH_A:     str="SSLv3 read server key exchange A"; break;
153 case SSL3_ST_CR_KEY_EXCH_B:     str="SSLv3 read server key exchange B"; break;
154 case SSL3_ST_CR_CERT_REQ_A:     str="SSLv3 read server certificate request A"; break;
155 case SSL3_ST_CR_CERT_REQ_B:     str="SSLv3 read server certificate request B"; break;
156 case SSL3_ST_CR_SESSION_TICKET_A: str="SSLv3 read server session ticket A";break;
157 case SSL3_ST_CR_SESSION_TICKET_B: str="SSLv3 read server session ticket B";break;
158 case SSL3_ST_CR_SRVR_DONE_A:    str="SSLv3 read server done A"; break;
159 case SSL3_ST_CR_SRVR_DONE_B:    str="SSLv3 read server done B"; break;
160 case SSL3_ST_CW_CERT_A:         str="SSLv3 write client certificate A"; break;
161 case SSL3_ST_CW_CERT_B:         str="SSLv3 write client certificate B"; break;
162 case SSL3_ST_CW_CERT_C:         str="SSLv3 write client certificate C"; break;
163 case SSL3_ST_CW_CERT_D:         str="SSLv3 write client certificate D"; break;
164 case SSL3_ST_CW_KEY_EXCH_A:     str="SSLv3 write client key exchange A"; break;
165 case SSL3_ST_CW_KEY_EXCH_B:     str="SSLv3 write client key exchange B"; break;
166 case SSL3_ST_CW_CERT_VRFY_A:    str="SSLv3 write certificate verify A"; break;
167 case SSL3_ST_CW_CERT_VRFY_B:    str="SSLv3 write certificate verify B"; break;
168
169 case SSL3_ST_CW_CHANGE_A:
170 case SSL3_ST_SW_CHANGE_A:       str="SSLv3 write change cipher spec A"; break;
171 case SSL3_ST_CW_CHANGE_B:       
172 case SSL3_ST_SW_CHANGE_B:       str="SSLv3 write change cipher spec B"; break;
173 case SSL3_ST_CW_FINISHED_A:     
174 case SSL3_ST_SW_FINISHED_A:     str="SSLv3 write finished A"; break;
175 case SSL3_ST_CW_FINISHED_B:     
176 case SSL3_ST_SW_FINISHED_B:     str="SSLv3 write finished B"; break;
177 case SSL3_ST_CR_CHANGE_A:       
178 case SSL3_ST_SR_CHANGE_A:       str="SSLv3 read change cipher spec A"; break;
179 case SSL3_ST_CR_CHANGE_B:       
180 case SSL3_ST_SR_CHANGE_B:       str="SSLv3 read change cipher spec B"; break;
181 case SSL3_ST_CR_FINISHED_A:     
182 case SSL3_ST_SR_FINISHED_A:     str="SSLv3 read finished A"; break;
183 case SSL3_ST_CR_FINISHED_B:     
184 case SSL3_ST_SR_FINISHED_B:     str="SSLv3 read finished B"; break;
185
186 case SSL3_ST_CW_FLUSH:
187 case SSL3_ST_SW_FLUSH:          str="SSLv3 flush data"; break;
188
189 case SSL3_ST_SR_CLNT_HELLO_A:   str="SSLv3 read client hello A"; break;
190 case SSL3_ST_SR_CLNT_HELLO_B:   str="SSLv3 read client hello B"; break;
191 case SSL3_ST_SR_CLNT_HELLO_C:   str="SSLv3 read client hello C"; break;
192 case SSL3_ST_SW_HELLO_REQ_A:    str="SSLv3 write hello request A"; break;
193 case SSL3_ST_SW_HELLO_REQ_B:    str="SSLv3 write hello request B"; break;
194 case SSL3_ST_SW_HELLO_REQ_C:    str="SSLv3 write hello request C"; break;
195 case SSL3_ST_SW_SRVR_HELLO_A:   str="SSLv3 write server hello A"; break;
196 case SSL3_ST_SW_SRVR_HELLO_B:   str="SSLv3 write server hello B"; break;
197 case SSL3_ST_SW_CERT_A:         str="SSLv3 write certificate A"; break;
198 case SSL3_ST_SW_CERT_B:         str="SSLv3 write certificate B"; break;
199 case SSL3_ST_SW_KEY_EXCH_A:     str="SSLv3 write key exchange A"; break;
200 case SSL3_ST_SW_KEY_EXCH_B:     str="SSLv3 write key exchange B"; break;
201 case SSL3_ST_SW_CERT_REQ_A:     str="SSLv3 write certificate request A"; break;
202 case SSL3_ST_SW_CERT_REQ_B:     str="SSLv3 write certificate request B"; break;
203 case SSL3_ST_SW_SESSION_TICKET_A: str="SSLv3 write session ticket A"; break;
204 case SSL3_ST_SW_SESSION_TICKET_B: str="SSLv3 write session ticket B"; break;
205 case SSL3_ST_SW_SRVR_DONE_A:    str="SSLv3 write server done A"; break;
206 case SSL3_ST_SW_SRVR_DONE_B:    str="SSLv3 write server done B"; break;
207 case SSL3_ST_SR_CERT_A:         str="SSLv3 read client certificate A"; break;
208 case SSL3_ST_SR_CERT_B:         str="SSLv3 read client certificate B"; break;
209 case SSL3_ST_SR_KEY_EXCH_A:     str="SSLv3 read client key exchange A"; break;
210 case SSL3_ST_SR_KEY_EXCH_B:     str="SSLv3 read client key exchange B"; break;
211 case SSL3_ST_SR_CERT_VRFY_A:    str="SSLv3 read certificate verify A"; break;
212 case SSL3_ST_SR_CERT_VRFY_B:    str="SSLv3 read certificate verify B"; break;
213 case SSL3_ST_CW_SUPPLEMENTAL_DATA_A: str="SSLv3 client write supplemental data A"; break;
214 case SSL3_ST_CW_SUPPLEMENTAL_DATA_B: str="SSLv3 client write supplemental data B"; break;
215 case SSL3_ST_SW_SUPPLEMENTAL_DATA_A: str="SSLv3 server write supplemental data A"; break;
216 case SSL3_ST_SW_SUPPLEMENTAL_DATA_B: str="SSLv3 client write supplemental data B"; break;
217 case SSL3_ST_CR_SUPPLEMENTAL_DATA_A: str="SSLv3 client read supplemental data A"; break;
218 case SSL3_ST_CR_SUPPLEMENTAL_DATA_B: str="SSLv3 client read supplemental data B"; break;
219 case SSL3_ST_SR_SUPPLEMENTAL_DATA_A: str="SSLv3 server read supplemental data A"; break;
220 case SSL3_ST_SR_SUPPLEMENTAL_DATA_B: str="SSLv3 client read supplemental data B"; break;
221 #endif
222
223 /* SSLv2/v3 compatibility states */
224 /* client */
225 case SSL23_ST_CW_CLNT_HELLO_A:  str="SSLv2/v3 write client hello A"; break;
226 case SSL23_ST_CW_CLNT_HELLO_B:  str="SSLv2/v3 write client hello B"; break;
227 case SSL23_ST_CR_SRVR_HELLO_A:  str="SSLv2/v3 read server hello A"; break;
228 case SSL23_ST_CR_SRVR_HELLO_B:  str="SSLv2/v3 read server hello B"; break;
229 /* server */
230 case SSL23_ST_SR_CLNT_HELLO_A:  str="SSLv2/v3 read client hello A"; break;
231 case SSL23_ST_SR_CLNT_HELLO_B:  str="SSLv2/v3 read client hello B"; break;
232
233 /* DTLS */
234 case DTLS1_ST_CR_HELLO_VERIFY_REQUEST_A: str="DTLS1 read hello verify request A"; break;
235 case DTLS1_ST_CR_HELLO_VERIFY_REQUEST_B: str="DTLS1 read hello verify request B"; break;
236 case DTLS1_ST_SW_HELLO_VERIFY_REQUEST_A: str="DTLS1 write hello verify request A"; break;
237 case DTLS1_ST_SW_HELLO_VERIFY_REQUEST_B: str="DTLS1 write hello verify request B"; break;
238
239 default:        str="unknown state"; break;
240                 }
241         return(str);
242         }
243
244 const char *SSL_rstate_string_long(const SSL *s)
245         {
246         const char *str;
247
248         switch (s->rstate)
249                 {
250         case SSL_ST_READ_HEADER: str="read header"; break;
251         case SSL_ST_READ_BODY: str="read body"; break;
252         case SSL_ST_READ_DONE: str="read done"; break;
253         default: str="unknown"; break;
254                 }
255         return(str);
256         }
257
258 const char *SSL_state_string(const SSL *s)
259         {
260         const char *str;
261
262         switch (s->state)
263                 {
264 case SSL_ST_BEFORE:                             str="PINIT "; break;
265 case SSL_ST_ACCEPT:                             str="AINIT "; break;
266 case SSL_ST_CONNECT:                            str="CINIT "; break;
267 case SSL_ST_OK:                                 str="SSLOK "; break;
268 #ifndef OPENSSL_NO_SSL2
269 case SSL2_ST_CLIENT_START_ENCRYPTION:           str="2CSENC"; break;
270 case SSL2_ST_SERVER_START_ENCRYPTION:           str="2SSENC"; break;
271 case SSL2_ST_SEND_CLIENT_HELLO_A:               str="2SCH_A"; break;
272 case SSL2_ST_SEND_CLIENT_HELLO_B:               str="2SCH_B"; break;
273 case SSL2_ST_GET_SERVER_HELLO_A:                str="2GSH_A"; break;
274 case SSL2_ST_GET_SERVER_HELLO_B:                str="2GSH_B"; break;
275 case SSL2_ST_SEND_CLIENT_MASTER_KEY_A:          str="2SCMKA"; break;
276 case SSL2_ST_SEND_CLIENT_MASTER_KEY_B:          str="2SCMKB"; break;
277 case SSL2_ST_SEND_CLIENT_FINISHED_A:            str="2SCF_A"; break;
278 case SSL2_ST_SEND_CLIENT_FINISHED_B:            str="2SCF_B"; break;
279 case SSL2_ST_SEND_CLIENT_CERTIFICATE_A:         str="2SCC_A"; break;
280 case SSL2_ST_SEND_CLIENT_CERTIFICATE_B:         str="2SCC_B"; break;
281 case SSL2_ST_SEND_CLIENT_CERTIFICATE_C:         str="2SCC_C"; break;
282 case SSL2_ST_SEND_CLIENT_CERTIFICATE_D:         str="2SCC_D"; break;
283 case SSL2_ST_GET_SERVER_VERIFY_A:               str="2GSV_A"; break;
284 case SSL2_ST_GET_SERVER_VERIFY_B:               str="2GSV_B"; break;
285 case SSL2_ST_GET_SERVER_FINISHED_A:             str="2GSF_A"; break;
286 case SSL2_ST_GET_SERVER_FINISHED_B:             str="2GSF_B"; break;
287 case SSL2_ST_GET_CLIENT_HELLO_A:                str="2GCH_A"; break;
288 case SSL2_ST_GET_CLIENT_HELLO_B:                str="2GCH_B"; break;
289 case SSL2_ST_GET_CLIENT_HELLO_C:                str="2GCH_C"; break;
290 case SSL2_ST_SEND_SERVER_HELLO_A:               str="2SSH_A"; break;
291 case SSL2_ST_SEND_SERVER_HELLO_B:               str="2SSH_B"; break;
292 case SSL2_ST_GET_CLIENT_MASTER_KEY_A:           str="2GCMKA"; break;
293 case SSL2_ST_GET_CLIENT_MASTER_KEY_B:           str="2GCMKA"; break;
294 case SSL2_ST_SEND_SERVER_VERIFY_A:              str="2SSV_A"; break;
295 case SSL2_ST_SEND_SERVER_VERIFY_B:              str="2SSV_B"; break;
296 case SSL2_ST_SEND_SERVER_VERIFY_C:              str="2SSV_C"; break;
297 case SSL2_ST_GET_CLIENT_FINISHED_A:             str="2GCF_A"; break;
298 case SSL2_ST_GET_CLIENT_FINISHED_B:             str="2GCF_B"; break;
299 case SSL2_ST_SEND_SERVER_FINISHED_A:            str="2SSF_A"; break;
300 case SSL2_ST_SEND_SERVER_FINISHED_B:            str="2SSF_B"; break;
301 case SSL2_ST_SEND_REQUEST_CERTIFICATE_A:        str="2SRC_A"; break;
302 case SSL2_ST_SEND_REQUEST_CERTIFICATE_B:        str="2SRC_B"; break;
303 case SSL2_ST_SEND_REQUEST_CERTIFICATE_C:        str="2SRC_C"; break;
304 case SSL2_ST_SEND_REQUEST_CERTIFICATE_D:        str="2SRC_D"; break;
305 case SSL2_ST_X509_GET_SERVER_CERTIFICATE:       str="2X9GSC"; break;
306 case SSL2_ST_X509_GET_CLIENT_CERTIFICATE:       str="2X9GCC"; break;
307 #endif
308
309 #ifndef OPENSSL_NO_SSL3
310 /* SSLv3 additions */
311 case SSL3_ST_SW_FLUSH:
312 case SSL3_ST_CW_FLUSH:                          str="3FLUSH"; break;
313 case SSL3_ST_CW_CLNT_HELLO_A:                   str="3WCH_A"; break;
314 case SSL3_ST_CW_CLNT_HELLO_B:                   str="3WCH_B"; break;
315 case SSL3_ST_CR_SRVR_HELLO_A:                   str="3RSH_A"; break;
316 case SSL3_ST_CR_SRVR_HELLO_B:                   str="3RSH_B"; break;
317 case SSL3_ST_CR_CERT_A:                         str="3RSC_A"; break;
318 case SSL3_ST_CR_CERT_B:                         str="3RSC_B"; break;
319 case SSL3_ST_CR_KEY_EXCH_A:                     str="3RSKEA"; break;
320 case SSL3_ST_CR_KEY_EXCH_B:                     str="3RSKEB"; break;
321 case SSL3_ST_CR_CERT_REQ_A:                     str="3RCR_A"; break;
322 case SSL3_ST_CR_CERT_REQ_B:                     str="3RCR_B"; break;
323 case SSL3_ST_CR_SRVR_DONE_A:                    str="3RSD_A"; break;
324 case SSL3_ST_CR_SRVR_DONE_B:                    str="3RSD_B"; break;
325 case SSL3_ST_CW_CERT_A:                         str="3WCC_A"; break;
326 case SSL3_ST_CW_CERT_B:                         str="3WCC_B"; break;
327 case SSL3_ST_CW_CERT_C:                         str="3WCC_C"; break;
328 case SSL3_ST_CW_CERT_D:                         str="3WCC_D"; break;
329 case SSL3_ST_CW_KEY_EXCH_A:                     str="3WCKEA"; break;
330 case SSL3_ST_CW_KEY_EXCH_B:                     str="3WCKEB"; break;
331 case SSL3_ST_CW_CERT_VRFY_A:                    str="3WCV_A"; break;
332 case SSL3_ST_CW_CERT_VRFY_B:                    str="3WCV_B"; break;
333
334 case SSL3_ST_SW_CHANGE_A:
335 case SSL3_ST_CW_CHANGE_A:                       str="3WCCSA"; break;
336 case SSL3_ST_SW_CHANGE_B:
337 case SSL3_ST_CW_CHANGE_B:                       str="3WCCSB"; break;
338 case SSL3_ST_SW_FINISHED_A:
339 case SSL3_ST_CW_FINISHED_A:                     str="3WFINA"; break;
340 case SSL3_ST_SW_FINISHED_B:
341 case SSL3_ST_CW_FINISHED_B:                     str="3WFINB"; break;
342 case SSL3_ST_SR_CHANGE_A:
343 case SSL3_ST_CR_CHANGE_A:                       str="3RCCSA"; break;
344 case SSL3_ST_SR_CHANGE_B:
345 case SSL3_ST_CR_CHANGE_B:                       str="3RCCSB"; break;
346 case SSL3_ST_SR_FINISHED_A:
347 case SSL3_ST_CR_FINISHED_A:                     str="3RFINA"; break;
348 case SSL3_ST_SR_FINISHED_B:
349 case SSL3_ST_CR_FINISHED_B:                     str="3RFINB"; break;
350
351 case SSL3_ST_SW_HELLO_REQ_A:                    str="3WHR_A"; break;
352 case SSL3_ST_SW_HELLO_REQ_B:                    str="3WHR_B"; break;
353 case SSL3_ST_SW_HELLO_REQ_C:                    str="3WHR_C"; break;
354 case SSL3_ST_SR_CLNT_HELLO_A:                   str="3RCH_A"; break;
355 case SSL3_ST_SR_CLNT_HELLO_B:                   str="3RCH_B"; break;
356 case SSL3_ST_SR_CLNT_HELLO_C:                   str="3RCH_C"; break;
357 case SSL3_ST_SW_SRVR_HELLO_A:                   str="3WSH_A"; break;
358 case SSL3_ST_SW_SRVR_HELLO_B:                   str="3WSH_B"; break;
359 case SSL3_ST_SW_CERT_A:                         str="3WSC_A"; break;
360 case SSL3_ST_SW_CERT_B:                         str="3WSC_B"; break;
361 case SSL3_ST_SW_KEY_EXCH_A:                     str="3WSKEA"; break;
362 case SSL3_ST_SW_KEY_EXCH_B:                     str="3WSKEB"; break;
363 case SSL3_ST_SW_CERT_REQ_A:                     str="3WCR_A"; break;
364 case SSL3_ST_SW_CERT_REQ_B:                     str="3WCR_B"; break;
365 case SSL3_ST_SW_SRVR_DONE_A:                    str="3WSD_A"; break;
366 case SSL3_ST_SW_SRVR_DONE_B:                    str="3WSD_B"; break;
367 case SSL3_ST_SR_CERT_A:                         str="3RCC_A"; break;
368 case SSL3_ST_SR_CERT_B:                         str="3RCC_B"; break;
369 case SSL3_ST_SR_KEY_EXCH_A:                     str="3RCKEA"; break;
370 case SSL3_ST_SR_KEY_EXCH_B:                     str="3RCKEB"; break;
371 case SSL3_ST_SR_CERT_VRFY_A:                    str="3RCV_A"; break;
372 case SSL3_ST_SR_CERT_VRFY_B:                    str="3RCV_B"; break;
373 #endif
374
375 /* SSLv2/v3 compatibility states */
376 /* client */
377 case SSL23_ST_CW_CLNT_HELLO_A:                  str="23WCHA"; break;
378 case SSL23_ST_CW_CLNT_HELLO_B:                  str="23WCHB"; break;
379 case SSL23_ST_CR_SRVR_HELLO_A:                  str="23RSHA"; break;
380 case SSL23_ST_CR_SRVR_HELLO_B:                  str="23RSHA"; break;
381 /* server */
382 case SSL23_ST_SR_CLNT_HELLO_A:                  str="23RCHA"; break;
383 case SSL23_ST_SR_CLNT_HELLO_B:                  str="23RCHB"; break;
384
385 /* DTLS */
386 case DTLS1_ST_CR_HELLO_VERIFY_REQUEST_A: str="DRCHVA"; break;
387 case DTLS1_ST_CR_HELLO_VERIFY_REQUEST_B: str="DRCHVB"; break;
388 case DTLS1_ST_SW_HELLO_VERIFY_REQUEST_A: str="DWCHVA"; break;
389 case DTLS1_ST_SW_HELLO_VERIFY_REQUEST_B: str="DWCHVB"; break;
390
391 default:                                        str="UNKWN "; break;
392                 }
393         return(str);
394         }
395
396 const char *SSL_alert_type_string_long(int value)
397         {
398         value>>=8;
399         if (value == SSL3_AL_WARNING)
400                 return("warning");
401         else if (value == SSL3_AL_FATAL)
402                 return("fatal");
403         else
404                 return("unknown");
405         }
406
407 const char *SSL_alert_type_string(int value)
408         {
409         value>>=8;
410         if (value == SSL3_AL_WARNING)
411                 return("W");
412         else if (value == SSL3_AL_FATAL)
413                 return("F");
414         else
415                 return("U");
416         }
417
418 const char *SSL_alert_desc_string(int value)
419         {
420         const char *str;
421
422         switch (value & 0xff)
423                 {
424         case SSL3_AD_CLOSE_NOTIFY:              str="CN"; break;
425         case SSL3_AD_UNEXPECTED_MESSAGE:        str="UM"; break;
426         case SSL3_AD_BAD_RECORD_MAC:            str="BM"; break;
427         case SSL3_AD_DECOMPRESSION_FAILURE:     str="DF"; break;
428         case SSL3_AD_HANDSHAKE_FAILURE:         str="HF"; break;
429         case SSL3_AD_NO_CERTIFICATE:            str="NC"; break;
430         case SSL3_AD_BAD_CERTIFICATE:           str="BC"; break;
431         case SSL3_AD_UNSUPPORTED_CERTIFICATE:   str="UC"; break;
432         case SSL3_AD_CERTIFICATE_REVOKED:       str="CR"; break;
433         case SSL3_AD_CERTIFICATE_EXPIRED:       str="CE"; break;
434         case SSL3_AD_CERTIFICATE_UNKNOWN:       str="CU"; break;
435         case SSL3_AD_ILLEGAL_PARAMETER:         str="IP"; break;
436         case TLS1_AD_DECRYPTION_FAILED:         str="DC"; break;
437         case TLS1_AD_RECORD_OVERFLOW:           str="RO"; break;
438         case TLS1_AD_UNKNOWN_CA:                str="CA"; break;
439         case TLS1_AD_ACCESS_DENIED:             str="AD"; break;
440         case TLS1_AD_DECODE_ERROR:              str="DE"; break;
441         case TLS1_AD_DECRYPT_ERROR:             str="CY"; break;
442         case TLS1_AD_EXPORT_RESTRICTION:        str="ER"; break;
443         case TLS1_AD_PROTOCOL_VERSION:          str="PV"; break;
444         case TLS1_AD_INSUFFICIENT_SECURITY:     str="IS"; break;
445         case TLS1_AD_INTERNAL_ERROR:            str="IE"; break;
446         case TLS1_AD_USER_CANCELLED:            str="US"; break;
447         case TLS1_AD_NO_RENEGOTIATION:          str="NR"; break;
448         case TLS1_AD_UNSUPPORTED_EXTENSION:     str="UE"; break;
449         case TLS1_AD_CERTIFICATE_UNOBTAINABLE:  str="CO"; break;
450         case TLS1_AD_UNRECOGNIZED_NAME:         str="UN"; break;
451         case TLS1_AD_BAD_CERTIFICATE_STATUS_RESPONSE: str="BR"; break;
452         case TLS1_AD_BAD_CERTIFICATE_HASH_VALUE: str="BH"; break;
453         case TLS1_AD_UNKNOWN_PSK_IDENTITY:      str="UP"; break;
454         default:                                str="UK"; break;
455                 }
456         return(str);
457         }
458
459 const char *SSL_alert_desc_string_long(int value)
460         {
461         const char *str;
462
463         switch (value & 0xff)
464                 {
465         case SSL3_AD_CLOSE_NOTIFY:
466                 str="close notify";
467                 break;
468         case SSL3_AD_UNEXPECTED_MESSAGE:
469                 str="unexpected_message";
470                 break;
471         case SSL3_AD_BAD_RECORD_MAC:
472                 str="bad record mac";
473                 break;
474         case SSL3_AD_DECOMPRESSION_FAILURE:
475                 str="decompression failure";
476                 break;
477         case SSL3_AD_HANDSHAKE_FAILURE:
478                 str="handshake failure";
479                 break;
480         case SSL3_AD_NO_CERTIFICATE:
481                 str="no certificate";
482                 break;
483         case SSL3_AD_BAD_CERTIFICATE:
484                 str="bad certificate";
485                 break;
486         case SSL3_AD_UNSUPPORTED_CERTIFICATE:
487                 str="unsupported certificate";
488                 break;
489         case SSL3_AD_CERTIFICATE_REVOKED:
490                 str="certificate revoked";
491                 break;
492         case SSL3_AD_CERTIFICATE_EXPIRED:
493                 str="certificate expired";
494                 break;
495         case SSL3_AD_CERTIFICATE_UNKNOWN:
496                 str="certificate unknown";
497                 break;
498         case SSL3_AD_ILLEGAL_PARAMETER:
499                 str="illegal parameter";
500                 break;
501         case TLS1_AD_DECRYPTION_FAILED:
502                 str="decryption failed";
503                 break;
504         case TLS1_AD_RECORD_OVERFLOW:
505                 str="record overflow";
506                 break;
507         case TLS1_AD_UNKNOWN_CA:
508                 str="unknown CA";
509                 break;
510         case TLS1_AD_ACCESS_DENIED:
511                 str="access denied";
512                 break;
513         case TLS1_AD_DECODE_ERROR:
514                 str="decode error";
515                 break;
516         case TLS1_AD_DECRYPT_ERROR:
517                 str="decrypt error";
518                 break;
519         case TLS1_AD_EXPORT_RESTRICTION:
520                 str="export restriction";
521                 break;
522         case TLS1_AD_PROTOCOL_VERSION:
523                 str="protocol version";
524                 break;
525         case TLS1_AD_INSUFFICIENT_SECURITY:
526                 str="insufficient security";
527                 break;
528         case TLS1_AD_INTERNAL_ERROR:
529                 str="internal error";
530                 break;
531         case TLS1_AD_USER_CANCELLED:
532                 str="user canceled";
533                 break;
534         case TLS1_AD_NO_RENEGOTIATION:
535                 str="no renegotiation";
536                 break;
537         case TLS1_AD_UNSUPPORTED_EXTENSION:
538                 str="unsupported extension";
539                 break;
540         case TLS1_AD_CERTIFICATE_UNOBTAINABLE:
541                 str="certificate unobtainable";
542                 break;
543         case TLS1_AD_UNRECOGNIZED_NAME:
544                 str="unrecognized name";
545                 break;
546         case TLS1_AD_BAD_CERTIFICATE_STATUS_RESPONSE:
547                 str="bad certificate status response";
548                 break;
549         case TLS1_AD_BAD_CERTIFICATE_HASH_VALUE:
550                 str="bad certificate hash value";
551                 break;
552         case TLS1_AD_UNKNOWN_PSK_IDENTITY:
553                 str="unknown PSK identity";
554                 break;
555         default: str="unknown"; break;
556                 }
557         return(str);
558         }
559
560 const char *SSL_rstate_string(const SSL *s)
561         {
562         const char *str;
563
564         switch (s->rstate)
565                 {
566         case SSL_ST_READ_HEADER:str="RH"; break;
567         case SSL_ST_READ_BODY:  str="RB"; break;
568         case SSL_ST_READ_DONE:  str="RD"; break;
569         default: str="unknown"; break;
570                 }
571         return(str);
572         }