Bug#664016: patch adding command line options for username / password

[Dennis Boone]

I've attached a patch which adds command line options for username and
password.

De


--- /usr/lib/mon/mon.d/imap.monitor     2005-08-20 11:27:56.000000000 -0400
+++ /usr/lib/mon/mon.d/imap_local.monitor       2012-03-14 18:13:48.000000000 
-0400
@@ -37,10 +37,12 @@
 use Getopt::Std;
 use English;
 
-getopts ("m:p:t:");
+getopts ("m:p:t:u:w:");
 $PORT = $opt_p || 143;
 $TIMEOUT = $opt_t || 30;
 $MAILBOX=$opt_m || undef;
+$USERNAME=$opt_u || 'ANONYMOUS';
+$PASSWORD=$opt_w || 'ANONYMOUS';
 
 @failures = ();
 
@@ -92,7 +94,7 @@
        }
 
         $cmd="login";
-       print S "A1 LOGIN ANONYMOUS ANONYMOUS\r\n";
+       print S "A1 LOGIN ", $USERNAME, " ", $PASSWORD, "\r\n";
 
        while (defined($in=<S>)) {
            if ($in =~ /^A1 (\w+) (.*)/) {