From 191d5f5b9e8c0e24aad37e46d98dfd38f47ad136 Mon Sep 17 00:00:00 2001
From: "Alan T. DeKok" <aland@freeradius.org>
Date: Wed, 1 Apr 2015 08:30:04 -0400
Subject: [PATCH] Revert "Unlock file while waiting for the DB"

This reverts commit a91017d3c391093493757cd4651a455770c4c8c1.

it's better for the server to do this in exfile.c
---
 scripts/sql/radsqlrelay | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/scripts/sql/radsqlrelay b/scripts/sql/radsqlrelay
index 48892e4..3a1efa9 100755
--- a/scripts/sql/radsqlrelay
+++ b/scripts/sql/radsqlrelay
@@ -69,18 +69,6 @@ sub setlock($;$$)
     else { return 0 }
 }
 
-sub unlock($;$$)
-{
-    my ($fh, $start, $len) = @_;
-    $start = 0 unless defined $start;
-    $len = 0 unless defined $len;
-
-                                    #type     whence    start   till  pid
-    my $packed = pack($FLOCK_STRUCT, F_WRLCK, SEEK_SET, $start, $len, 0);
-    if (fcntl($fh, F_UNLCK, $packed)) { return 1 }
-    else { return 0 }
-}
-
 sub usage()
 {
     print STDERR <<HERE;
@@ -139,9 +127,7 @@ sub process_file($$)
             } else {
 		print "error: Lost connection to database\n";
 		$dbinfo->{handle}->disconnect;
-		unlock(\*FILE);
 		connect_wait($dbinfo);
-		setlock(\*FILE);
             }
         }
     }
-- 
2.1.4