do better database locking

diff --git a/gen/nfs.qc b/gen/nfs.qc
index 01e639bf0ab67df56bafc0b3a332c95fdddfaa72..7f10feb91b5c38623215aa6f09a1b706a2aea75d 100644 (file)
--- a/gen/nfs.qc
+++ b/gen/nfs.qc
@@ -395,7 +395,6 @@ struct save_queue *machs;
 
     fprintf(stderr, "Building machine files\n");
 
-##  begin transaction
 ##  range of s is serverhosts
 ##  range of m is machine
 ##  range of n is nfsphys
@@ -403,6 +402,14 @@ struct save_queue *machs;
 ##  range of f is filesys
 ##  range of u is users
 ##  range of l is list
+
+/* acquire locks on users, lists, machines & filesystems */
+##  begin transaction
+##  retrieve (listname = u.modtime) where u.users_id = 0
+##  retrieve (listname = l.modtime) where l.list_id = 0
+##  retrieve (listname = m.modtime) where m.mach_id = 0
+##  retrieve (listname = f.modtime) where f.filsys_id = 0
+
     while (sq_get_data(machs, &machname)) {
 ##     repeat retrieve (listname = trim(s.value3))
 ##         where s.mach_id = m.mach_id and m.name = @machname