Roxen.git/ server/ base_server/ roxen.pike

2009-07-21

2009-07-21 09:22:15 by Martin Stjernholm <mast@lysator.liu.se>

• 98acd5e62c93a8b1b9fd48a8bb7b5d27290ab3d7 (88 lines) (+42/-46) ^{[ Show | Annotate ]}
  Branch: 5.2

A little more robustness for strange input to find_ips_for.

Rev: server/base_server/roxen.pike:1.1040

6:   // Per Hedbor, Henrik Grubbström, Pontus Hagland, David Hedbor and others.   // ABS and suicide systems contributed freely by Francesco Chemolli    - constant cvs_version="$Id: roxen.pike,v 1.1039 2009/07/15 15:28:03 grubba Exp $"; + constant cvs_version="$Id: roxen.pike,v 1.1040 2009/07/21 09:22:15 mast Exp $";      //! @appears roxen   //!
2489:       if( is_ip( what ) )    return ({ what }); -  else if (what[0] == '[' && what[-1] == ']') { +  else if (has_prefix (what, "[") && what[-1] == ']') {    /* RFC 3986 3.2.2. Host    *    * host = IP-literal / IPv4address / reg-name
2627:    if( (int)opts->nobind )    {    report_warning( -  LOC_M(61,"Not binding the port %O, disabled in configuration")+"\n", +  LOC_M(61,"Not binding the port %O - disabled in configuration.")+"\n",    (string) ui );    return 0;    }    -  +  string display_url = normalize_url (url, 0);    url = normalize_url (url, 1);    ui = Standards.URI (url);       string protocol = ui->scheme;    string host = ui->host;    if (host == "" || !protocols[protocol]) { -  report_error(LOC_M(19,"Bad URL %O for server `%s'")+"\n", +  report_error(LOC_M(19,"Bad URL %O for server %O.")+"\n",    ourl, conf->query_name());    }   
2658:    if( urls[ url ]->conf != conf )    {    report_error(LOC_M(20, -  "Cannot register URL %s, " -  "already registered by %s!")+"\n", -  url, urls[ url ]->conf->name); +  "Cannot register URL %s - " +  "already registered by %s.")+"\n", +  display_url, urls[ url ]->conf->name);    return 0;    }    urls[ url ]->port->ref(url, urls[url]);
2674:       if( !( prot = protocols[ protocol ] ) )    { -  report_error(LOC_M(21, "Cannot register URL %s, " -  "cannot find the protocol %s!")+"\n", -  url, protocol); +  report_error(LOC_M(21, "Cannot register URL %s - " +  "cannot find the protocol %s.")+"\n", +  display_url, protocol);    return 0;    }   
2689:    if (is_ip(host))    required_hosts = ({ host });    else if(!sizeof(required_hosts = -  filter(replace(opts->ip||"", " ","")/",", is_ip)) ) +  filter(replace(opts->ip||"", " ","")/",", is_ip)) ) {    required_hosts = find_ips_for( host ); -  +     if (!required_hosts) {    // FIXME: Used to fallback to ANY.    // Will this work with glob URLs? -  report_error(LOC_M(23, "Cannot register URL %s!")+"\n", url); +     return 0;    } -  +  }       mapping(string:mapping(int:Protocol)) m;    if( !( m = open_ports[ protocol ] ) )
2729:   #else    if (sizeof(ipv6)) {    foreach(ipv6, string p) { -  report_warning(LOC_M(65, "IPv6 port for URL %s disabled: %s\n"), -  url, p); +  report_warning(LOC_M(65, "Cannot open port %s for URL %s - " +  "IPv6 support disabled.\n"), +  p, display_url);    }    }    required_hosts = ipv4;
2761:    if( !m[ required_host ] )    m[ required_host ] = ([ ]);    +  +  Protocol prot_obj;    if (mixed err = catch { -  m[ required_host ][ port ] = +  prot_obj = m[ required_host ][ port ] =    prot( port, required_host,    // Don't complain if binding IPv6 ANY fails with    // EADDRINUSE after we've bound IPv4 ANY. At least on
2772:    required_host == "::" && opened_ipv4_any_port);    }) {    failures++; + #if 0    if (has_prefix(describe_error(err), "Invalid address") &&    required_host && has_value(required_host, ":")) {    report_error(sprintf("Failed to initialize IPv6 port for URL %s" -  " (ip %s). Not supported?\n", -  url, required_host)); -  } else { -  report_error(sprintf("Initializing the port handler for URL %s" -  " failed! (ip %s)\n" -  "%s\n", -  url, +  " (ip %s).\n", +  display_url, required_host)); +  } else + #endif +  report_error(sprintf("Initializing the port handler for " +  "URL %s (ip %s) failed: %s\n", +  display_url,    required_host||"ANY", -  describe_backtrace(err))); -  } + #ifdef DEBUG +  describe_backtrace(err) + #else +  describe_error (err) + #endif +  ));    continue;    }       if (!required_host) opened_ipv4_any_port = 1;    -  Protocol prot_obj = m[required_host][port]; -  -  if( !prot_obj ) -  { -  m_delete( m[ required_host ], port ); -  failures++; -  if (required_host) { -  report_warning(LOC_M(22, "Binding the port on IP %s failed\n" -  " for URL %s!\n"), -  required_host, url); -  } -  continue; -  } -  +     if (prot_obj->bound == -1) {    // Got EADDRINUSE for the IPv6 case - see above. Just forget    // about this one.
2825:    }    if (failures == sizeof(required_hosts))    { -  report_error(LOC_M(23, "Cannot register URL %s!")+"\n", url); +  report_error(LOC_M(23, "Failed to register URL %s for %O.")+"\n", +  display_url, conf->query_name());    return 0;    }    sort_urls();       // The following will show the punycoded version for IDN hostnames.    // That is intentional, to make it clear what actually happens. -  report_notice(" "+LOC_S(3, "Registered %s for %s")+"\n", -  url, conf->query_name() ); +  report_notice(" "+LOC_S(3, "Registered URL %s for %O.")+"\n", +  display_url, conf->query_name() );    return 1;   }