From ccc598d85c7542c89abba9e0196f4f1bd0ca7358 Mon Sep 17 00:00:00 2001
From: Vladimir Sokolovsky <vlad@mellanox.co.il>
Date: Wed, 10 Sep 2008 15:51:23 +0300
Subject: [PATCH] Comment "install ib_core ..." line in the
 /etc/modprobe.conf.dist (if exist). This prevents from HCA driver to be
 unloaded.

Signed-off-by: Vladimir Sokolovsky <vlad@mellanox.co.il>
---
 install.pl | 22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/install.pl b/install.pl
index e63f8d0..7cb97da 100755
--- a/install.pl
+++ b/install.pl
@@ -3885,7 +3885,7 @@ sub main
 {
     if ($print_available) {
         set_availability();
-        open(CONFIG, ">>$config") || die "Can't open $config: $!";;
+        open(CONFIG, ">>$config") || die "Can't open $config: $!";
         flock CONFIG, $LOCK_EXCLUSIVE;
         for my $package ( @all_packages, @hidden_packages) {
             next if (not $packages_info{$package}{'available'});
@@ -4028,6 +4028,26 @@ sub main
 
     system("/sbin/ldconfig > /dev/null 2>&1");
 
+    if (-f "/etc/modprobe.conf.dist") {
+        open(MDIST, "/etc/modprobe.conf.dist") or die "Can't open /etc/modprobe.conf.dist: $!";
+        my @mdist_lines;
+        while (<MDIST>) {
+            push @mdist_lines, $_;
+        }
+        close(MDIST);
+
+        open(MDIST, ">/etc/modprobe.conf.dist") or die "Can't open /etc/modprobe.conf.dist: $!";
+        foreach my $line (@mdist_lines) {
+            chomp $line;
+            if ($line =~ /^\s*install ib_core/) {
+                print MDIST "# $line\n";
+            } else {
+                print MDIST "$line\n";
+            }
+        }
+        close(MDIST);
+    }
+
     if (length($vendor_pre_uninstall) > 0) {
 	    system "cp $vendor_pre_uninstall $prefix/sbin/vendor_pre_uninstall.sh";
     }
-- 
2.41.0