Send a zwrite to -c afsadm if there is a quota change of 40MB+

diff --git a/incremental/afs_quota.pl b/incremental/afs_quota.pl
index 487f9283c5da77b4cca5a778d809434f2dc23516..de75feee8e2c5eb2077d9dac3d29007b189d7d37 100644 (file)
--- a/incremental/afs_quota.pl
+++ b/incremental/afs_quota.pl
@@ -39,8 +39,13 @@ shift(@tmp), $_ = shift(@tmp);
 
 system("$fs","sq",$path,$newq);
 die "Unable to change quota on $path\n" if ($?);
+
 &afs_quota_adj($cell,$asrv,$apart,$newq-$oldq);
 
+system("$zwrite","-c","afsadm","-m",
+       "Changed quota on volume $vname ($asrv:$apart) from $oldq to $newq")
+    if (($newq-$oldq > 39999) || ($oldq-$newq > 39999));
+
 #$stat_fs = $?;
 #$stat_qa = &afs_quota_adj($cell,$asrv,$apart,($stat_fs ? 0 : $newq-$oldq));
 #die "Unable to change quota on $path\n" if ($stat_fs && $stat_qa);