Changeset 781

Show
Ignore:
Timestamp:
07/27/08 22:11:09 (4 months ago)
Author:
kane
Message:

r6512@coke: josboum | 2008-07-27 01:07:51 +0200

  • log stream errors clearly and don't just silently disconnect
  • this addresses a FIXME
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/DJabberd/lib/DJabberd/Connection/ServerIn.pm

    r771 r781  
    2323    my ($self, $ss) = @_; 
    2424    $self->{in_stream} = 1; 
    25     return $self->close unless $ss->xmlns eq $self->namespace; # FIXME: should be stream error 
    2625 
     26    ### namespace mismatch is a streamerror 
     27    unless( $ss->xmlns eq $self->namespace ) { 
     28        $self->stream_error(  
     29            sprintf "namespace mismatch: client->%s server->%s", 
     30            $ss->xmlns, $self->namespace 
     31        ); 
     32        $self->close; 
     33    }               
     34     
    2735    if ($ss->announced_dialback) { 
    2836        $self->{announced_dialback} = 1;