Lines 105-114
sub process_request {
Link Here
|
105 |
$self->{account} = undef; # Clear out the account from the last request, it may be different |
105 |
$self->{account} = undef; # Clear out the account from the last request, it may be different |
106 |
$self->{logger} = set_logger( Koha::Logger->get( { interface => 'sip' } ) ); |
106 |
$self->{logger} = set_logger( Koha::Logger->get( { interface => 'sip' } ) ); |
107 |
|
107 |
|
108 |
# Flush previous MDCs to prevent accidentally leaking incorrect MDC-entries |
|
|
109 |
Log::Log4perl::MDC->put( "accountid", undef ); |
110 |
Log::Log4perl::MDC->put( "peeraddr", undef ); |
111 |
|
112 |
my $sockname = getsockname(STDIN); |
108 |
my $sockname = getsockname(STDIN); |
113 |
|
109 |
|
114 |
# Check if socket connection is IPv6 before resolving address |
110 |
# Check if socket connection is IPv6 before resolving address |
Lines 183-192
sub raw_transport {
Link Here
|
183 |
) |
179 |
) |
184 |
); |
180 |
); |
185 |
|
181 |
|
186 |
# Set MDCs after properly authenticating |
|
|
187 |
Log::Log4perl::MDC->put( "accountid", $self->{account}->{id} ); |
188 |
Log::Log4perl::MDC->put( "peeraddr", $self->{server}->{peeraddr} ); |
189 |
|
190 |
siplog("LOG_DEBUG", "raw_transport: uname/inst: '%s/%s'", |
182 |
siplog("LOG_DEBUG", "raw_transport: uname/inst: '%s/%s'", |
191 |
$self->{account}->{id}, |
183 |
$self->{account}->{id}, |
192 |
$self->{account}->{institution}); |
184 |
$self->{account}->{institution}); |