Branch: Tag:

2013-11-30

2013-11-30 12:40:13 by Henrik Grubbström (Grubba) <grubba@grubba.org>

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");