diff options
| author |   schwarze <schwarze@openbsd.org> | 2011-04-23 19:47:06 +0000 |
|---|---|---|
| committer | schwarze <schwarze@openbsd.org> | 2011-04-23 19:47:06 +0000 |
| commit | 94583e3db0629dcb345a85dca17cb6720bee2f02 (patch) | |
| tree | 7c214b3b5203c0dcb131824538d09cac99f52fb3 /libexec/security | |
| parent | Partially revert 1.23, by removing the code which tries to pick the best (diff) | |
| download | wireguard-openbsd-94583e3db0629dcb345a85dca17cb6720bee2f02.tar.xz wireguard-openbsd-94583e3db0629dcb345a85dca17cb6720bee2f02.zip | |
When a device or setuid file is owned by a nonexistent user or group,
undefined data got used.
Fix this by reporting the UID/GID numerically in that case.
Problem reported and patch provided by rd at thrush dot com.
While here, use // rather than || everywhere to detect get*id failure,
as suggested by RD Thrush. The edge case where it matters - a username
of "0" - is rather insane, but the // is more precise anyway.
Diffstat (limited to 'libexec/security')
| -rw-r--r-- | libexec/security/security | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/libexec/security/security b/libexec/security/security index 6b74dd9858a..e46ef711883 100644 --- a/libexec/security/security +++ b/libexec/security/security @@ -1,6 +1,6 @@ #!/usr/bin/perl -T -# $OpenBSD: security,v 1.11 2011/04/23 13:43:44 schwarze Exp $ +# $OpenBSD: security,v 1.12 2011/04/23 19:47:06 schwarze Exp $ # # Copyright (c) 2011 Ingo Schwarze <schwarze@openbsd.org> # Copyright (c) 2011 Andrew Fresh <andrew@afresh1.com> @@ -383,7 +383,7 @@ sub check_homedir { my ($mode, $fuid) = (stat(_))[2,4]; nag $fuid && $fuid != $uid, "user $name home directory is owned by " . - ((getpwuid $fuid)[0] || $fuid); + ((getpwuid $fuid)[0] // $fuid); nag $mode & S_IWGRP, "user $name home directory is group writable"; nag $mode & S_IWOTH, @@ -402,7 +402,7 @@ sub check_dot_readable { my ($mode, $fuid) = (stat(_))[2,4]; nag $fuid && $fuid != $uid, "user $name $f file is owned by " . - ((getpwuid $fuid)[0] || $fuid); + ((getpwuid $fuid)[0] // $fuid); nag $mode & S_IRGRP, "user $name $f file is group readable"; nag $mode & S_IROTH, @@ -430,7 +430,7 @@ sub check_dot_writeable { my ($mode, $fuid) = (stat(_))[2,4]; nag $fuid && $fuid != $uid, "user $name $f file is owned by " . - ((getpwuid $fuid)[0] || $fuid); + ((getpwuid $fuid)[0] // $fuid); nag $mode & S_IWGRP, "user $name $f file is group writable"; nag $mode & S_IWOTH, @@ -445,8 +445,8 @@ sub check_mailboxes { foreach my $name (readdir $dh) { next if $name =~ /^\.\.?$/; my ($mode, $fuid, $fgid) = (stat "$dir/$name")[2,4,5]; - my $fname = (getpwuid $fuid)[0] || $fuid; - my $gname = (getgrgid $fgid)[0] || $fgid; + my $fname = (getpwuid $fuid)[0] // $fuid; + my $gname = (getgrgid $fgid)[0] // $fgid; nag $fname ne $name, "user $name mailbox is owned by $fname"; nag S_IMODE($mode) != (S_IRUSR | S_IWUSR), @@ -564,8 +564,8 @@ sub find_special_files { $file->{mode} = $mode; $file->{strmode} = strmode $mode; $file->{nlink} = $nlink; - $file->{user} = (getpwuid $uid)[0]; - $file->{group} = (getgrgid $gid)[0]; + $file->{user} = (getpwuid $uid)[0] // $uid; + $file->{group} = (getgrgid $gid)[0] // $gid; $file->{size} = $size; @$file{qw(wday mon day time year)} = split ' ', localtime $mtime; |