Code

update: new log line to debug server problems
authorrettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 30 Sep 2008 07:41:17 +0000 (07:41 +0000)
committerrettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 30 Sep 2008 07:41:17 +0000 (07:41 +0000)
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@12559 594d385d-05f5-0310-b6e9-bd551577e9d8

gosa-si/gosa-si-server

index 57845bec80710955167f2700717843c8c945c218..92b803c75068938f059cb1e8ce8f1f90322a0914 100755 (executable)
@@ -205,7 +205,7 @@ my $messaging_file_name;
 our $client_fai_log_dir = "/var/log/fai"; 
 
 # queue which stores taskes until one of the $max_children children are ready to process the task
-my @tasks = qw();
+#my @tasks = qw();
 my @msgs_to_decrypt = qw();
 my $max_children = 2;
 
@@ -3328,9 +3328,11 @@ POE::Component::Server::TCP->new(
        Alias => "TCP_SERVER",
        Port => $server_port,
        ClientInput => sub {
-               my ($kernel, $input) = @_[KERNEL, ARG0];
-               push(@tasks, $input);
+               my ($kernel, $input, $heap, $session) = @_[KERNEL, ARG0, HEAP, SESSION];
+        my $session_id = $session->ID;
+        my $remote_ip = $heap->{'remote_ip'};
                push(@msgs_to_decrypt, $input);
+        &daemon_log("$session_id DEBUG: incoming message from '$remote_ip'", 7);
                $kernel->yield("msg_to_decrypt");
        },
        InlineStates => {