September 11 2017 File::Path Security Back

TOCTTOU in File::Path::rmtree() Version 2.12 (continued 2)

                # (e.g. funny protection mask such as -w- instead of rwx)
                $perm &= oct '7777';
                my $nperm = $perm | oct '700';
                if (
                    !(
                           $arg->{safe}
                        or $nperm == $perm
                        or chmod( $nperm, $root )
                    )
                  )
                {


Home Last TOC Copyright © 2017 James E Keenan Back Next