summaryrefslogtreecommitdiffstats
path: root/testsuite/test9.pl
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--testsuite/test9.pl122
1 files changed, 122 insertions, 0 deletions
diff --git a/testsuite/test9.pl b/testsuite/test9.pl
new file mode 100644
index 0000000..6281e59
--- /dev/null
+++ b/testsuite/test9.pl
@@ -0,0 +1,122 @@
+#!/usr/bin/perl -w
+
+# expect:
+# - a new non-system group $groupname
+# - readding the group fails
+# - readding the group as a system group fails
+# - a new system group $groupname
+# - readding the group succeeds
+# - readding the group as a non-system group fails
+
+use strict;
+
+use lib_test;
+
+my $error;
+my $output;
+my $groupname = find_unused_name();
+my $cmd = "addgroup $groupname";
+
+if (!defined (getgrnam($groupname))) {
+ print "Testing (9.1) $cmd... ";
+ $output=`$cmd 2>&1`;
+ $error = ($?>>8);
+ if ($error) {
+ print "failed\n $cmd returned an errorcode != 0 ($error)\n";
+ exit $error;
+ }
+ if ($output !~ /^Adding group `addusertest\d+' \(GID \d+\) ...\nDone\.\n$/) {
+ print "failed\n $cmd returned unexpected output ($output)\n";
+ exit 1;
+ }
+ assert(check_group_exist ($groupname));
+
+ print "ok\n";
+}
+
+# now testing whether adding the group again fails as it should
+
+print "Testing (9.2) $cmd... ";
+$output=`$cmd 2>&1`;
+$error = ($?>>8);
+if ($error ne 1) {
+ print "failed\n $cmd returned an errorcode != 1 ($error)\n";
+ exit 1;
+}
+if ($output !~ /^addgroup: The group `addusertest\d+' already exists\.\n$/ ) {
+ print "failed\n $cmd returned unexpected output ($output)\n";
+ exit 1;
+}
+print "ok\n";
+
+# now testing whether adding the group again (as a system group)
+# fails as it should (#405905)
+
+$cmd = "addgroup --system $groupname";
+print "Testing (9.3) $cmd... ";
+$output=`$cmd 2>&1`;
+$error = ($?>>8);
+if ($error ne 1) {
+ print "failed\n $cmd returned an errorcode != 1 ($error)\n";
+ exit $error;
+}
+if ($output !~ /^addgroup: The group `addusertest\d+' already exists and is not a system group. Exiting.$/ ) {
+ print "failed\n $cmd returned unexpected output ($output)\n";
+ exit 1;
+}
+print "ok\n";
+
+my $sysgroupname = find_unused_name();
+$cmd = "addgroup --system $sysgroupname";
+
+if (!defined (getgrnam($sysgroupname))) {
+ print "Testing (9.4) $cmd... ";
+ $output=`$cmd 2>&1`;
+ $error = ($?>>8);
+ if ($error) {
+ print "failed\n $cmd returned an errorcode != 0 ($error)\n";
+ exit $error;
+ }
+ if ($output !~ /^Adding group `addusertest\d+' \(GID \d+\) ...\nDone\.\n$/ ) {
+ print "failed\n $cmd returned unexpected output ($output)\n";
+ exit 1;
+ }
+ assert(check_group_exist ($sysgroupname));
+
+ print "ok\n";
+}
+
+# now testing whether adding the group again passes as it should
+# ("already exists as a system group")
+
+$cmd = "addgroup --system $sysgroupname" ;
+print "Testing (9.5) $cmd... ";
+$output=`$cmd 2>&1`;
+$error = ($?>>8);
+if ($error) {
+ print "failed\n $cmd returned an errorcode != 0 ($error)\n";
+ exit $error;
+}
+if ($output !~ /^addgroup: The group `addusertest\d+' already exists as a system group\. Exiting\.\n$/ ) {
+ print "failed\n $cmd returned unexpected output ($output)\n";
+ exit 1;
+}
+print "ok\n";
+
+# now testing whether adding the group again (as a normal group)
+# fails as it should
+
+$cmd = "addgroup $sysgroupname";
+print "Testing (9.6) $cmd... ";
+$output=`$cmd 2>&1`;
+$error = ($?>>8);
+if ($error ne 1) {
+ print "failed\n $cmd returned an errorcode != 1 ($error)\n";
+ exit 1;
+}
+if ($output !~ /^addgroup: The group `addusertest\d+' already exists\.$/ ) {
+ print "failed\n $cmd returned unexpected output ($output)\n";
+ exit 1;
+}
+print "ok\n";
+