Francois Gouget : testbot/Engine: Simplify the client command dispatching.
Alexandre Julliard
julliard at winehq.org
Thu Oct 25 13:29:48 CDT 2012
Module: tools
Branch: master
Commit: 3708ce43194501b05a1d65c316ad16414e535c17
URL: http://source.winehq.org/git/tools.git/?a=commit;h=3708ce43194501b05a1d65c316ad16414e535c17
Author: Francois Gouget <fgouget at codeweavers.com>
Date: Thu Oct 25 18:13:23 2012 +0200
testbot/Engine: Simplify the client command dispatching.
---
testbot/bin/Engine.pl | 66 +++++++++++++-----------------------------------
1 files changed, 18 insertions(+), 48 deletions(-)
diff --git a/testbot/bin/Engine.pl b/testbot/bin/Engine.pl
index f453927..7834619 100755
--- a/testbot/bin/Engine.pl
+++ b/testbot/bin/Engine.pl
@@ -440,57 +440,27 @@ sub HandleGetScreenshot
return "1" . $ImageBytes;
}
+my %Handlers=(
+ "expectwinetestupdate" => \&HandleExpectWinetestUpdate,
+ "foundwinetestupdate" => \&HandleFoundWinetestUpdate,
+ "getscreenshot" => \&HandleGetScreenshot,
+ "jobcancel" => \&HandleJobCancel,
+ "jobstatuschange" => \&HandleJobStatusChange,
+ "jobsubmit" => \&HandleJobSubmit,
+ "ping" => \&HandlePing,
+ "taskcomplete" => \&HandleTaskComplete,
+ "vmstatuschange" => \&HandleVMStatusChange,
+ "winepatchmlsubmission" => \&HandleWinePatchMLSubmission,
+ "winepatchwebnotification" => \&HandleWinePatchWebNotification,
+ "winepatchwebsubmission" => \&HandleWinePatchWebSubmission,
+ );
+
sub HandleClientCmd
{
my $Cmd = shift;
- if ($Cmd eq "ping")
- {
- return HandlePing(@_);
- }
- if ($Cmd eq "jobsubmit")
- {
- return HandleJobSubmit(@_);
- }
- if ($Cmd eq "jobstatuschange")
- {
- return HandleJobStatusChange(@_);
- }
- if ($Cmd eq "jobcancel")
- {
- return HandleJobCancel(@_);
- }
- if ($Cmd eq "taskcomplete")
- {
- return HandleTaskComplete(@_);
- }
- if ($Cmd eq "vmstatuschange")
- {
- return HandleVMStatusChange(@_);
- }
- if ($Cmd eq "expectwinetestupdate")
- {
- return HandleExpectWinetestUpdate(@_);
- }
- if ($Cmd eq "foundwinetestupdate")
- {
- return HandleFoundWinetestUpdate(@_);
- }
- if ($Cmd eq "winepatchmlsubmission")
- {
- return HandleWinePatchMLSubmission(@_);
- }
- if ($Cmd eq "winepatchwebnotification")
- {
- return HandleWinePatchWebNotification(@_);
- }
- if ($Cmd eq "winepatchwebsubmission")
- {
- return HandleWinePatchWebSubmission(@_);
- }
- if ($Cmd eq "getscreenshot")
- {
- return HandleGetScreenshot(@_);
- }
+
+ my $handler = $Handlers{$Cmd};
+ return &$handler(@_) if (defined $handler);
LogMsg "Unknown command $Cmd\n";
return "0Unknown command $Cmd\n";
More information about the wine-cvs
mailing list