Branch: Tag:

1997-08-13

1997-08-13 03:02:02 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Added fallback for old SSL's.

Rev: server/base_server/configuration.pike:1.52
Rev: server/base_server/roxen.pike:1.96

1: - string cvs_version = "$Id: configuration.pike,v 1.51 1997/08/13 02:58:26 neotron Exp $"; + string cvs_version = "$Id: configuration.pike,v 1.52 1997/08/13 03:01:09 grubba Exp $";   #include <module.h>   #include <roxen.h>   /* A configuration.. */
652:    "<ul><table>\n";    foreach(sort(indices(extra_statistics->ftp->commands)), string cmd) {    res += sprintf("<tr align=right><td><b>%s</b></td>" -  "<td>%d time%s</td></tr>\n", +  "<td align=right>%d</td><td> time%s</td></tr>\n",    upper_case(cmd), extra_statistics->ftp->commands[cmd],    (extra_statistics->ftp->commands[cmd] == 1)?"":"s");    }
1281:    array old = port;    object o;    +  if ((< "ssl", "ssleay" >)[port[1]]) { +  // Obsolete versions of the SSL protocol. +  report_warning("Obsolete SSL protocol-module \""+port[1]+"\".\n" +  "Converted to SSL3.\n"); +  port[1] = "ssl3"; +  }    if(rp = ((object)("protocols/"+port[1]))->real_port)    if(tmp = rp(port, this_object()))    port = tmp;