Branch: Tag:

1997-08-25

1997-08-25 17:22:53 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Nicer startup-message.

Rev: server/base_server/roxen.pike:1.114

1: - constant cvs_version = "$Id: roxen.pike,v 1.113 1997/08/21 15:36:07 per Exp $"; + constant cvs_version = "$Id: roxen.pike,v 1.114 1997/08/25 17:22:53 grubba Exp $";   #define IN_ROXEN   #include <roxen.h>   #include <config.h>
1697:    {    foreach(QUERY(ConfigPorts), port)    { +  array old = port; +  mixed erro; +  erro = catch {    if ((< "ssl", "ssleay" >)[port[1]]) {    // Obsolete versions of the SSL protocol.    report_warning("Obsolete SSL protocol-module \""+port[1]+"\".\n"
1717:    object privs;    if(port[0] < 1024)    privs = ((program)"privs")("Opening listen port below 1024"); -  if(o=create_listen_socket(port[0],0,port[2],requestprogram,port)) -  { -  perror("Configuration port: "+port[1]+" port number " -  +port[0]+" interface " +port[2]+"\n"); +  if(o=create_listen_socket(port[0],0,port[2],requestprogram,port)) { +  perror("Configuration port: "+port[1]+" port number "+ +  port[0]+" interface " +port[2]+"\n");    main_configuration_port = o;    configuration_ports += ({ o });    } else { -  report_error("The configuration port "+port[0] -  +" on the interface " +port[2]+" " +  report_error("The configuration port " + port[0] + +  " on the interface " + port[2] + " (" + port[1] + ") "    "could not be opened\n");    } -  +  }; +  if (erro) { +  report_error("Failed to open configuration port " + +  old[0] + " at " + old[2] + " (" + old[1] + "): " + +  (stringp(erro)?erro:describe_backtrace(erro)));    } -  +  }    if(!main_configuration_port)    {    report_error("No configuration ports could be created.\n"