diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2003-02-04 20:24:21 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2003-02-04 20:24:21 +0000 |
| commit | 581917eb65b94a0a162aa01372ed9b09a29582cd (patch) | |
| tree | 34397bb1433ba4ccb6790aafc6f41055f2820e01 /perl-install/printer/printerdrake.pm | |
| parent | 4294244045285a6b812b9126939220ade677543e (diff) | |
| download | drakx-backup-do-not-use-581917eb65b94a0a162aa01372ed9b09a29582cd.tar drakx-backup-do-not-use-581917eb65b94a0a162aa01372ed9b09a29582cd.tar.gz drakx-backup-do-not-use-581917eb65b94a0a162aa01372ed9b09a29582cd.tar.bz2 drakx-backup-do-not-use-581917eb65b94a0a162aa01372ed9b09a29582cd.tar.xz drakx-backup-do-not-use-581917eb65b94a0a162aa01372ed9b09a29582cd.zip | |
Fixed auto-detection of a configured (but not started) network.
Diffstat (limited to 'perl-install/printer/printerdrake.pm')
| -rw-r--r-- | perl-install/printer/printerdrake.pm | 22 |
1 files changed, 15 insertions, 7 deletions
diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm index 2389dac79..a144900a0 100644 --- a/perl-install/printer/printerdrake.pm +++ b/perl-install/printer/printerdrake.pm @@ -2862,6 +2862,16 @@ sub start_network { } else { return printer::services::start("network") } } +sub network_configured { + # Do configured networks (/etc/sysconfig/network-scripts/ifcfg*) exist? + my @netscripts = + cat_("ls -1 $::prefix/etc/sysconfig/network-scripts/ |"); + my $netconfigured = 0; + ( /ifcfg-/ and !/(ifcfg-lo|:|rpmsave|rpmorig|rpmnew)/ and + !/(~|\.bak)$/ and $netconfigured = 1) foreach @netscripts; + return $netconfigured; +} + sub check_network { # This routine is called whenever the user tries to configure a remote @@ -2877,12 +2887,10 @@ sub check_network { $in->set_help('checkNetwork') if $::isInstall; - # First check: Does /etc/sysconfig/network-scripts/drakconnect_conf exist - # (otherwise the network is not configured yet and drakconnect has to be - # started) + # First check: Do configured networks + # (/etc/sysconfig/network-scripts/ifcfg*) exist? - if (!files_exist("/etc/sysconfig/network-scripts/drakconnect_conf") && - !$dontconfigure) { + if (!$dontconfigure && !network_configured()) { my $go_on = 0; while (!$go_on) { my $choice = N("Configure the network now"); @@ -2903,7 +2911,7 @@ sub check_network { } else { system("/usr/sbin/drakconnect"); } - $go_on = files_exist("/etc/sysconfig/network-scripts/drakconnect_conf"); + $go_on = network_configured(); } else { return 1; } @@ -2914,7 +2922,7 @@ sub check_network { } # Do not try to start the network if it is not configured - if (!files_exist("/etc/sysconfig/network-scripts/drakconnect_conf")) { return 0 } + if (!network_configured()) { return 0 } # Second check: Is the network running? |