Bug 1388148 - Test password quality checking code

2 files changed, 20 insertions, 6 deletions

diff --git a/scripts/entrypoint.pl b/scripts/entrypoint.pl
index 2d1ef8fe9..c39551131 100755
--- a/scripts/entrypoint.pl
+++ b/scripts/entrypoint.pl
@@ -3,16 +3,18 @@ use 5.10.1;
 use strict;
 use warnings;
 use lib qw(/app /app/local/lib/perl5);
+
 use Bugzilla::Install::Localconfig ();
 use Bugzilla::Install::Util qw(install_string);
+use Bugzilla::Test::Util qw(create_user);
 use DBI;
 use Data::Dumper;
 use English qw($EUID);
 use File::Copy::Recursive qw(dircopy);
 use Getopt::Long qw(:config gnu_getopt);
 use LWP::Simple qw(get);
-use User::pwent;
 use POSIX qw(WEXITSTATUS setsid);
+use User::pwent;
 
 use IO::Async::Loop;
 use IO::Async::Process;
@@ -53,7 +55,7 @@ sub cmd_load_test_data {
         run( 'perl', 'generate_test_data.pl' );
     }
     else {
-        run( 'perl', 'scripts/generate_bmo_data.pl' );
+        run( 'perl', 'scripts/generate_bmo_data.pl', '--param' => 'use_mailer_queue=0' );
     }
 }
 
@@ -76,6 +78,8 @@ sub cmd_test_webservices {
     my $conf = require $ENV{BZ_QA_CONF_FILE};
 
     check_data_dir();
+    wait_for_db();
+
     my @httpd_cmd = ( '/usr/sbin/httpd', '-DFOREGROUND', '-f', '/app/httpd/httpd.conf' );
     if ($ENV{BZ_QA_LEGACY_MODE}) {
         copy_qa_extension();
@@ -98,6 +102,7 @@ sub cmd_test_selenium {
     my $conf = require $ENV{BZ_QA_CONF_FILE};
 
     check_data_dir();
+    wait_for_db();
     my @httpd_cmd = ( '/usr/sbin/httpd', '-DFOREGROUND', '-f', '/app/httpd/httpd.conf' );
     if ($ENV{BZ_QA_LEGACY_MODE}) {
         copy_qa_extension();
@@ -121,6 +126,16 @@ sub cmd_prove   { run( "prove", "-I/app", "-I/app/local/lib/perl5", @_ ); }
 sub cmd_version { run( 'cat',   '/app/version.json' ); }
 
 sub cmd_test_bmo {
+    check_data_dir();
+    wait_for_db();
+
+    $ENV{BZ_TEST_NEWBIE} = 'newbie@mozilla.example';
+    $ENV{BZ_TEST_NEWBIE_PASS} = 'captain.space.bagel.ROBOT!';
+    create_user($ENV{BZ_TEST_NEWBIE}, $ENV{BZ_TEST_NEWBIE_PASS}, realname => "Newbie User");
+
+    $ENV{BZ_TEST_NEWBIE2} = 'newbie2@mozilla.example';
+    $ENV{BZ_TEST_NEWBIE2_PASS} = 'captain.space.pants.time.lord';
+
     prove_with_httpd(
         httpd_url => $ENV{BZ_BASE_URL},
         httpd_cmd => [ '/usr/sbin/httpd', '-f', '/app/httpd/httpd.conf',  '-DFOREGROUND' ],
@@ -131,9 +146,6 @@ sub cmd_test_bmo {
 sub prove_with_httpd {
     my (%param) = @_;
 
-    check_data_dir();
-    wait_for_db();
-
     unless (-d "/app/logs") {
         mkdir("/app/logs") or die "unable to mkdir(/app/logs): $!\n";
     }
diff --git a/scripts/generate_bmo_data.pl b/scripts/generate_bmo_data.pl
index 788227443..b2df7ddba 100755
--- a/scripts/generate_bmo_data.pl
+++ b/scripts/generate_bmo_data.pl
@@ -63,7 +63,8 @@ my %user_prefs = (
     zoom_textareas         => 'off',
 );
 
-GetOptions('user-pref=s%' => \%user_prefs);
+my %opt_param;
+GetOptions('user-pref=s%' => \%user_prefs, 'param=s' => \%opt_param);
 
 my $admin_email = shift || 'admin@mozilla.bugs';
 Bugzilla->set_user(Bugzilla::User->check({ name => $admin_email }));
@@ -496,6 +497,7 @@ my %set_params = (
     use_mailer_queue          => 1,
     user_info_class           => 'GitHubAuth,CGI',
     user_verify_class         => 'GitHubAuth,DB',
+    %opt_param,
 );
 
 my $params_modified;