-# struct ifreq { // FOR SIOCGIFFLAGS:
-# char ifrn_name[IFNAMSIZ]
-# short ifru_flags
-# };
-my $STRUCT_IFREQ_SIOCGIFFLAGS = 'Z' . IFNAMSIZ . 's1';
-sub get_active_interfaces {
- # Use the interface name list from /proc/net/dev
- open my $fh, '<', '/proc/net/dev'
- or die "failed to open /proc/net/dev: $!\n";
- # And filter by IFF_UP flag fetched via a PF_INET6 socket ioctl:
- my $sock;
- socket($sock, PF_INET6, SOCK_DGRAM, &IPPROTO_IP)
- or socket($sock, PF_INET, SOCK_DGRAM, &IPPROTO_IP)
- or return [];
-
- my $ifaces = [];
- while(defined(my $line = <$fh>)) {
- next if $line !~ /^\s*([^:\s]+):/;
- my $ifname = $1;
- my $ifreq = pack($STRUCT_IFREQ_SIOCGIFFLAGS, $ifname, 0);
- if (!defined(ioctl($sock, SIOCGIFFLAGS, $ifreq))) {
- warn "failed to get interface flags for: $ifname\n";
- next;
+
+sub get_local_ip_from_cidr {
+ my ($cidr) = @_;
+
+ my $cmd = ['/sbin/ip', 'address', 'show', 'to', $cidr, 'up'];
+
+ my $IPs = [];
+
+ my $code = sub {
+ my $line = shift;
+
+ if ($line =~ m!^\s*inet(?:6)?\s+($PVE::Tools::IPRE)/\d+!) {
+ push @$IPs, $1;