summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDaouda Lo <daouda@mandriva.com>2004-05-10 17:02:13 +0000
committerDaouda Lo <daouda@mandriva.com>2004-05-10 17:02:13 +0000
commit67b2ebc3df9be9af9491dd8dea824996f354aaf4 (patch)
tree3ad2673e3ad580bce2fa6d6501d97ce5d2c7d59a
parent2348cfb7d595a5d77e23da54660f0a9886a9a282 (diff)
downloadmgaonline-67b2ebc3df9be9af9491dd8dea824996f354aaf4.tar
mgaonline-67b2ebc3df9be9af9491dd8dea824996f354aaf4.tar.gz
mgaonline-67b2ebc3df9be9af9491dd8dea824996f354aaf4.tar.bz2
mgaonline-67b2ebc3df9be9af9491dd8dea824996f354aaf4.tar.xz
mgaonline-67b2ebc3df9be9af9491dd8dea824996f354aaf4.zip
- what is '96' return code ? Need to ask to ayo
-rwxr-xr-xmdkapplet4
1 files changed, 3 insertions, 1 deletions
diff --git a/mdkapplet b/mdkapplet
index 31073864..b2337c8a 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -194,12 +194,13 @@ sub silentCheck {
logIt(N("Connecting to") . " $lnk ...\n");
my $response = $ua->request($request);
my $ct = $response->content;
- #print "\nCONTENTS = $ct\n";
+ print "\nCONTENTS = $ct\n";
logIt(N("Response from MandrakeOnline server\n") . "$ct");
if ($ct =~ /rpm/) { $u = 11 } elsif ($ct =~ m/(\d+)/) { $u = sprintf("%d",$1); } else { $u = 10 };
# 99 - log or host or action or pass empty, wrong action
# 98 - wrong pass
# 97 - host not active
+ print "Returned value = $u\n";
my $retcode = {
10 => sub { okState() },
11 => sub {
@@ -215,6 +216,7 @@ sub silentCheck {
}
!$comp and okState();
},
+ 96 => sub { logIt(N("Unknown state")) ; go2State('okay') }
97 => sub { logIt(N("Online services disabled. Contact MandrakeOnline site\n")) ; go2State('disabled'); },
98 => sub { logIt(N("Wrong Password.\n")); go2State('critical'); },
99 => sub { logIt(N("Wrong Action or host or login.\n")); go2State('critical'); }