diff options
| author | Michael Haro <mharo@FreeBSD.org> | 2000-01-22 22:06:04 +0000 |
|---|---|---|
| committer | Michael Haro <mharo@FreeBSD.org> | 2000-01-22 22:06:04 +0000 |
| commit | 4922b641a802704ec886537ad03a8c6cc3b1f617 (patch) | |
| tree | a287a4e94b6f96b9dd084c41ab144f605f1be989 /ports-mgmt | |
| parent | Upgrade to Apache 1.3.11 + mod_ssl 2.5.0 (diff) | |
add support for @owner and @group in PLIST
Notes
Notes:
svn path=/head/; revision=24948
Diffstat (limited to 'ports-mgmt')
| -rw-r--r-- | ports-mgmt/portlint/src/portlint.pl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/ports-mgmt/portlint/src/portlint.pl b/ports-mgmt/portlint/src/portlint.pl index d575e78944a0..c86ef300fe56 100644 --- a/ports-mgmt/portlint/src/portlint.pl +++ b/ports-mgmt/portlint/src/portlint.pl @@ -280,6 +280,18 @@ sub checkplist { } } elsif ($_ =~ /^\@(comment)/) { $rcsidseen++ if (/\$$rcsidstr[:\$]/); + } elsif ($_ =~ /^\@(owner|group)\s+$/) { + &perror("WARN: $_ missing name in PLIST"); + } elsif ($_ =~ /^\@(owner)(\s+)(.*)/) { + $space = $2; + $user = $3; + &perror("WARN: multiple spaces found in \"$_\"") if ($space =~ /\s\s+/); + &perror("WARN: \"$user\" unknown user in PLIST") if (getpwnam($user) eq ""); + } elsif ($_ =~ /^\@(group)(\s+)(.*)/) { + $space = $2; + $group = $3; + &perror("WARN: multiple spaces found in \"$_\"") if ($space =~ /\s\s+/); + &perror("WARN: \"$group\" unknown group in PLIST") if (getgrnam($group) eq ""); } elsif ($_ =~ /^\@(dirrm|option)/) { ; # no check made } else { |