diff options
| -rwxr-xr-x | rescue/partimage_whole_disk | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/rescue/partimage_whole_disk b/rescue/partimage_whole_disk index 15878505e..2fcd2ee25 100755 --- a/rescue/partimage_whole_disk +++ b/rescue/partimage_whole_disk @@ -37,6 +37,11 @@ my @partimage_cmd = ('partimage', if_($server, '-s', $server)); @ARGV == 1 or usage(); +if ($server && !is_network_configured()) { + run_program::run('drvinst', 'NETWORK'); + run_program::run('dhcp-client'); +} + run_program::run('drvinst', 'STORAGE_SCSI', 'STORAGE_IDE'); my $all_hds = fsedit::get_hds({}); @@ -255,3 +260,8 @@ sub error { log::l($msg); die "$msg\n"; } + +sub is_network_configured() { + my (undef, @l) = cat_('/proc/net/route'); + find { /^(\S+)/ && $1 ne 'lo' } @l; +} |