Use the '-P' option with rude so it runs at a real-time priority. In

wait_all, just add one to the error_count instead of the exit code,
otherwise sync gets unhappy.

event/linktest/linktest.pl.in

@@ -86,6 +86,7 @@ use constant EVENT_REPORT => "REPORT";
 use constant EVENT_LOG => "LOG";
 use constant PING_SEND_COUNT => 10;
 use constant SYNC_NAMESPACE => "linktest";
+use constant RUDE_PRI => 5;
 
 # test levels
 use constant TEST_LATENCY => 1; # direct link connectivity & latency
@@ -320,7 +321,7 @@ if(&dotest(TEST_BW)){
     sleep(1);
 }
 if(&dotest(TEST_LOSS)){
-    &my_system_initonly(PATH_CRUDE,"-l",CRUDE_DAT);
+    &my_system_initonly(PATH_CRUDE,"-l",CRUDE_DAT,"-P",RUDE_PRI);
     sleep(1);
 }
 
@@ -500,7 +501,7 @@ sub loss_test {
 	    if($hostname eq $edge->src) {
 		if(valid_loss($edge)) {
 		    &write_rude_cfg($stream_id,$edge);
-		    &my_system(PATH_RUDE,"-s", RUDE_CFG);
+		    &my_system(PATH_RUDE,"-s", RUDE_CFG, "-P", RUDE_PRI);
 		    $analyze{$stream_id} = $other_edge;
 		} else {
 		    &debug("Skipping loss test for " . &print_link($edge) . "\n");
@@ -508,7 +509,7 @@ sub loss_test {
 	    } elsif ($hostname eq $other_edge->src) {
 		if(valid_loss($other_edge)) {
 		    &write_rude_cfg($stream_id,$other_edge);
-		    &my_system(PATH_RUDE,"-s", RUDE_CFG);
+		    &my_system(PATH_RUDE,"-s", RUDE_CFG, "-P", RUDE_PRI);
 		    $analyze{$stream_id} = $edge;
 		} else {
 		    &debug("Skipping loss test for " . &print_link($other_edge) . "\n");
@@ -1296,7 +1297,9 @@ sub wait_all {
     my (%list_ref) = @_;
     while (scalar(%list_ref)) {
 	my $pid = wait();
-	$error_count += $? >> 8;
+	if ($? >> 8) {
+	    $error_count += 1;
+	}
 	delete $list_ref{$pid};
     }
 }