{

use esmith::AccountsDB;
my $admpass = $phpmyadmin{'AdminPassword'} || 'admpass';
my $a = esmith::AccountsDB->open_ro or die "Couldn't open AccountsDB\n";

$OUT .= "// login and password for MySQL access\n";

foreach my $u ($a->users,$a->get('admin')){
    my $user = $u->key;
    my $login = $u->prop('SqlLogin') || '';
    my $pass = $u->prop('SqlPassword') || '';
    # Members of the admins group automatically have
    # full privileges on MySQL
    if (($a->is_user_in_group($user,'admins')) ||
        ($a->is_user_in_group($user,'mysqladmins')) ||
        ($user eq 'admin')){
        $login = 'sqladmin';
        $pass = $admpass;
    }
    next unless (($login ne '') && ($pass ne ''));
    $OUT .= "// Credentials for $user\n";
    $OUT .= '$login["'.$user.'"] = "'.$login."\";\n";
    $OUT .= '$password["'.$user.'"] = "'.$pass."\";\n";
}

}
