Read network device names from Network Manager

tests/microos/network_bonding.pm

@@ -27,11 +27,14 @@ sub run {
     my ($self) = @_;
     select_console 'root-console';
     # remove existing NM-managed connections (except loopback)
-    my @interfaces = grep { !/^lo/ } split('\n', script_output 'nmcli -t -f NAME con');
-    assert_script_run "nmcli con delete '$_'" for @interfaces;
+    my @connections_info = grep { !/^lo/ } split('\n', script_output 'nmcli -t -f DEVICE,UUID conn show --active');
+    my @devices = map { (split /:/)[0] } @connections_info;
+    my @connection_ids = map { (split /:/)[1] } @connections_info;
+    # can fail due to same ID pointing to different connections
+    script_run "nmcli con delete '$_'" for @connection_ids;    
     # create a new bonding interface and connect the two ethernet
     assert_script_run "nmcli con add type bond ifname bond0 con-name bond0";
-    assert_script_run "nmcli con add type ethernet ifname $_ master bond0" for qw{eth0 eth1};
+    assert_script_run "nmcli con add type ethernet ifname $_ master bond0" for @devices;
     # bring up bond interface
     assert_script_run "nmcli con up bond0";
     # reboot to ensure connection properly comes up at start
@@ -41,7 +44,7 @@ sub run {
     # first connectivity check
     assert_script_run 'ping -c1 -I bond0 conncheck.opensuse.org';
     # check device failover
-    test_failover $_ for qw{eth0 eth1};
+    test_failover $_ for @devices;
 }
 
 1;