2013-11-30
2013-11-30 12:40:13 by Henrik Grubbström (Grubba) <grubba@grubba.org>
-
70b7f945fa1de32bbc149491f133acf45958b191
(16 lines)
(+16/-0)
[
Show
| Annotate
]
Branch: 8.0
SSL.https: Added some more diagnostics.
The active cipher suites are now listed symbolically
at start in debug mode.
32: Inside #if constant(SSL.Cipher.CipherAlgorithm) and #if undefined(HTTPS_CLIENT)
werror("Accept!\n");
conn(accept());
}
+
+ protected string fmt_cipher_suites(array(int) s)
+ {
+ String.Buffer b = String.Buffer();
+ mapping(int:string) ciphers = ([]);
+ foreach([array(string)]indices(SSL.Constants), string id)
+ if( has_prefix(id, "SSL_") || has_prefix(id, "TLS_") ||
+ has_prefix(id, "SSL2_") )
+ ciphers[SSL.Constants[id]] = id;
+ foreach(s, int c)
+ b->sprintf(" %-6d: %09x: %s\n",
+ c, cipher_suite_sort_key(c), ciphers[c]||"unknown");
+ return (string)b;
+ }
#endif
string my_certificate = MIME.decode_base64(
209:
#endif /* 0 */
// Make sure all cipher suites are available.
rsa_mode();
+ SSL3_DEBUG_MSG("Cipher suites:\n%s", fmt_cipher_suites(preferred_suites));
certificates = ({ my_certificate });
random = no_random()->read;
werror("Starting\n");