VMware-server-config-kernel.patch

   1 --- vmware-server-distrib/bin/vmware-config.pl  2007-11-09 14:22:03.000000000 +0200
   2 +++ vmware-server-distrib/bin/vmware-config.pl  2008-04-07 15:57:41.590945387 +0300
   3 @@ -3774,7 +3776,7 @@
   4      $mod_dir = db_get_answer('LIBDIR') . '/modules';
   5    }
   6
   7 -  if (($name eq 'vmxnet') and (not is64BitKernel()) and ($gOption{'kernel_version'} eq '')) {
   8 +  if (0 && ($name eq 'vmxnet') and (not is64BitKernel()) and ($gOption{'kernel_version'} eq '')) {
   9      # Figure out the correct network script.
  10      my $init_dir = db_get_answer('INITSCRIPTSDIR');
  11      my $network_path = find_first_exist("$init_dir/network",
  12 @@ -3820,6 +3822,26 @@
  13
  14      print wrap('Trying to find a suitable ' . $name
  15                 . ' module for your running kernel.' . "\n\n", 0);
  16 +
  17 +    my $kmod_dir = $cKernelModuleDir . '/'. $gSystem{'uts_release'};
  18 +    if (-d $kmod_dir) {
  19 +      if (not open(MODULESDEP, $kmod_dir .'/modules.dep')) {
  20 +         error("Unable to open kernel module dependency file\n.");
  21 +      }
  22 +
  23 +      my $found;
  24 +      my $match = qr/\Q$name\E\.ko(?:\.gz)?:$/;
  25 +      while (<MODULESDEP>) {
  26 +         if ($match) {
  27 +            $found = 'yes';
  28 +            last;
  29 +         }
  30 +      }
  31 +      close(MODULESDEP);
  32 +
  33 +      return $found if $found;
  34 +    }
  35 +
  36      @mod_list = get_suitable_modules($mod_dir . '/binary');
  37      while ($#mod_list > -1) {
  38        my $candidate = shift(@mod_list);