Navigation

Changeset 763

Timestamp:

09/23/07 00:17:11 (1 year ago)

Author:

bradfitz

Message:

Michael Scherer <misc@mandriva.org>: more helpful error
messages in logs after dialback failure (shows hosts in question)

Files:

r757	r763
	1	- Michael Scherer <misc@mandriva.org>: more helpful error
	2	messages in logs after dialback failure (shows hosts in question)
	3
1	4	- don't leak UDP sockets on DNS SRV lookup timeouts
2	5

r498	r763
111	111
112	112	sub dialback_verify_invalid {
113		my ($self, $reason) = @_;
114		warn "Dialback verify invalid for $self, reason: $reason\n";
	113	my $self = shift;
	114	my %opts = @_;
	115
	116	$self->log->warn("Dialback verify invalid for $self, from $opts{orig_server} to $opts{recv_server}, reason: $opts{reason}");
115	117	$self->close_stream;
116	118	}
…	…
128	130
129	131	sub dialback_result_invalid {
130		my ($self, $reason) = @_;
131		$self->log->warn("Dialback result invalid for $self, reason: $reason");
	132	my $self = shift;
	133	my %opts = @_;
	134
	135	$self->log->warn("Dialback result invalid for $self, from $opts{orig_server} to $opts{recv_server}, reason: $opts{reason}");
132	136	$self->close_stream;
133	137	}

r481	r763
44	44	fail => sub {
45	45	my ($self_cb, $reason) = @_;
46		$conn->dialback_result_invalid($reason);;
	46	$conn->dialback_result_invalid(reason => $reason,
	47	orig_server => $orig_server,
	48	recv_server => $recv_server);
47	49	},
48	50	});

r297	r763
54	54	on_failure => sub {
55	55	$logger->warn("Dialback verify success for connection $conn->{id}");
56		$conn->dialback_verify_invalid;
	56	$conn->dialback_verify_invalid(recv_server => $self->recv_server,
	57	orig_server => $self->orig_server);
57	58	});
58	59	}