Changeset 236

Timestamp:

03/30/07 15:55:10 (2 years ago)

Author:

kindlund

Message:

Updated FW code, so that DNS lookups will fail after 10 seconds (instead of 2 minutes).

Files:

• honeyclient/trunk/lib/HoneyClient/Manager/FW.pm (modified) (2 diffs)

honeyclient/trunk/lib/HoneyClient/Manager/FW.pm

@@ -2455 +2455 @@
-    my $errorcode  = q{};
-    my $res        = Net::DNS::Resolver->new();
+    # TODO: Make these timeouts non-static.
+    $res->tcp_timeout(10);
+    $res->udp_timeout(10);
-    my @iplist     = ();
-    my %resolvedip = ();
@@ -2984 +2987 @@
-    my $resolver = Net::DNS::Resolver->new();
-
+    # TODO: Make these timeouts non-static.
+    $resolver->tcp_timeout(10);
+    $resolver->udp_timeout(10);
+
-    # Extract arguments -  passed in
-    my ($host) = @_;