Do a write lock in radacct before truncating it in truncate_radacct

diff --git a/Changelog b/Changelog
index f0c0dfba6b4b725d74571821cc904653639ea878..1e4dd0c937dd4279cc13a583cab01bb2630f5866 100644 (file)
--- a/Changelog
+++ b/Changelog
@@ -32,6 +32,7 @@ Ver 1.62:
 * Make things a little bit more simple in lib/ldap/change_attrs.php3
 * Fix a small bug in lib/ldap/create_user.php3. Unset the mod array before adding any values to it.
 * Fix a small problem with debugging
+* Do a write lock in radacct before truncating it in truncate_radacct
 Ver 1.61:
 * Add a string encoder for greek
 * If general_decode_normal_attributes is set then encode attributes in lib/ldap/change_info. In the near future

diff --git a/bin/truncate_radacct b/bin/truncate_radacct
index b12c9d9d3b48261e49fa6030cbb904c122a6daf3..97210714159e5144463848a8281ecec4ec278036 100755 (executable)
--- a/bin/truncate_radacct
+++ b/bin/truncate_radacct
@@ -27,5 +27,5 @@ $date = POSIX::strftime("%Y-%m-%d %T",$sec,$min,$hour,($mday - $back_days),$mon,
 print "$date\n";
 
 $dbh = DBI->connect("DBI:mysql:$sql_database:$sql_server","$sql_username","$sql_password");
-$dbh->do("DELETE FROM $sql_accounting_table WHERE AcctStopTime < '$date';");
+$dbh->do("LOCK TABLES $sql_accounting_table WRITE;DELETE FROM $sql_accounting_table WHERE AcctStopTime < '$date';UNLOCK TABLES;");
 $dbh->disconnect();