vlserver: --enable-ubik-read-while-write configure option
[openafs.git] / src / vlserver / vlprocs.c
index 4bf14f5..016ff51 100644 (file)
@@ -1,7 +1,7 @@
 /*
  * Copyright 2000, International Business Machines Corporation and others.
  * All Rights Reserved.
- * 
+ *
  * This software has been released under the terms of the IBM Public
  * License.  For details, see the LICENSE file in the top-level source
  * directory or online at http://www.openafs.org/dl/license10.html
 #include <afsconfig.h>
 #include <afs/param.h>
 
-RCSID
-    ("$Header$");
+#include <roken.h>
 
-#include <sys/types.h>
-#include <stdio.h>
-#include <string.h>
 #include <lock.h>
 #include <afs/afsutil.h>
 #include <ubik.h>
 #include <rx/xdr.h>
 #include <rx/rx.h>
-#ifdef AFS_NT40_ENV
-#include <winsock2.h>
-#else
-#include <netinet/in.h>
-#endif
+#include <rx/rxkad.h>
 #include <afs/keys.h>
+#include <afs/cellconfig.h>
+
 #include "vlserver.h"
+#include "vlserver_internal.h"
 #include "afs/audit.h"
-#ifndef AFS_NT40_ENV
-#include <unistd.h>
-#endif
+
 #ifdef HAVE_POSIX_REGEX                /* use POSIX regexp library */
 #include <regex.h>
 #endif
 
 extern int smallMem;
-extern extent_mod;
+extern int restrictedQueryLevel;
+extern int extent_mod;
 extern struct afsconf_dir *vldb_confdir;
 extern struct ubik_dbase *VL_dbase;
-struct vlheader cheader;       /* kept in network byte order */
-extern afs_uint32 HostAddress[];       /* host addresses kept in host byte order */
 int maxnservers;
-struct extentaddr *ex_addr[VL_MAX_ADDREXTBLKS] = { 0, 0, 0, 0 };
-static char rxinfo_str[128];   /* Need rxinfo string to be non-local */
-#define ABORT(c) { errorcode = (c); goto abort; }
-#undef END
-#define END(c) { errorcode = (c); goto end; }
+#define ABORT(c) do { \
+    code = (c); \
+    goto abort; \
+} while (0)
 
 #define VLDBALLOCLIMIT 10000
 #define VLDBALLOCINCR  2048
 
-static int put_attributeentry();
-static int put_nattributeentry();
-static int RemoveEntry();
-static void ReleaseEntry();
-static int check_vldbentry();
-static int check_nvldbentry();
-static int vldbentry_to_vlentry();
-static int nvldbentry_to_vlentry();
-static get_vldbupdateentry();
-static int repsite_exists();
-static void repsite_compress();
-static void vlentry_to_vldbentry();
-static void vlentry_to_nvldbentry();
-static void vlentry_to_uvldbentry();
-static int InvalidVolname();
-static int InvalidVoltype();
-static int InvalidOperation();
-static int InvalidReleasetype();
-static int IpAddrToRelAddr();
-static int ChangeIPAddr();
-
-char *
-rxinfo(rxcall)
-     struct rx_call *rxcall;
+static int put_attributeentry(struct vl_ctx *ctx,
+                             struct vldbentry **, struct vldbentry **,
+                             struct vldbentry **, bulkentries *,
+                             struct nvlentry *, afs_int32 *, afs_int32 *);
+static int put_nattributeentry(struct vl_ctx *ctx,
+                              struct nvldbentry **, struct nvldbentry **,
+                              struct nvldbentry **, nbulkentries *,
+                              struct nvlentry *, afs_int32, afs_int32,
+                              afs_int32 *, afs_int32 *);
+static int RemoveEntry(struct vl_ctx *ctx, afs_int32 entryptr,
+                      struct nvlentry *tentry);
+static void ReleaseEntry(struct nvlentry *tentry, afs_int32 releasetype);
+static int check_vldbentry(struct vldbentry *aentry);
+static int check_nvldbentry(struct nvldbentry *aentry);
+static int vldbentry_to_vlentry(struct vl_ctx *ctx,
+                               struct vldbentry *VldbEntry,
+                               struct nvlentry *VlEntry);
+static int nvldbentry_to_vlentry(struct vl_ctx *ctx,
+                                struct nvldbentry *VldbEntry,
+                                struct nvlentry *VlEntry);
+static int get_vldbupdateentry(struct vl_ctx *ctx, afs_int32 blockindex,
+                              struct VldbUpdateEntry *updateentry,
+                              struct nvlentry *VlEntry);
+static int repsite_exists(struct nvlentry *VlEntry, int server, int partition);
+static void repsite_compress(struct nvlentry *VlEntry, int offset);
+static int vlentry_to_vldbentry(struct vl_ctx *ctx,
+                               struct nvlentry *VlEntry,
+                               struct vldbentry *VldbEntry);
+static int vlentry_to_nvldbentry(struct vl_ctx *ctx,
+                                struct nvlentry *VlEntry,
+                                struct nvldbentry *VldbEntry);
+static int vlentry_to_uvldbentry(struct vl_ctx *ctx,
+                                struct nvlentry *VlEntry,
+                                struct uvldbentry *VldbEntry);
+static int InvalidVolname(char *volname);
+static int InvalidVoltype(afs_int32 voltype);
+static int InvalidOperation(afs_int32 voloper);
+static int InvalidReleasetype(afs_int32 releasetype);
+static int IpAddrToRelAddr(struct vl_ctx *ctx, afs_uint32 ipaddr, int create);
+static int ChangeIPAddr(struct vl_ctx *ctx, afs_uint32 ipaddr1,
+                        afs_uint32 ipaddr2);
+
+static_inline void
+countRequest(int opcode)
+{
+    if (opcode != 0) {
+        dynamic_statistics.requests[opcode - VL_LOWEST_OPCODE]++;
+    }
+}
+
+static_inline void
+countAbort(int opcode)
+{
+    if (opcode != 0) {
+       dynamic_statistics.aborts[opcode - VL_LOWEST_OPCODE]++;
+    }
+}
+
+
+static_inline int
+multiHomedExtentBase(struct vl_ctx *ctx, int srvidx, struct extentaddr **exp,
+                    int *basePtr)
+{
+    int base;
+    int index;
+
+    *exp = NULL;
+    *basePtr = 0;
+
+    if ((ctx->hostaddress[srvidx] & 0xff000000) == 0xff000000) {
+       base = (ctx->hostaddress[srvidx] >> 16) & 0xff;
+       index = ctx->hostaddress[srvidx] & 0x0000ffff;
+       if (base >= VL_MAX_ADDREXTBLKS) {
+           VLog(0, ("Internal error: Multihome extent base is too large. "
+                    "Base %d index %d\n", base, index));
+           return VL_IO;
+       }
+       if (index >= VL_MHSRV_PERBLK) {
+           VLog(0, ("Internal error: Multihome extent index is too large. "
+                    "Base %d index %d\n", base, index));
+           return VL_IO;
+       }
+       if (!ctx->ex_addr[base]) {
+           VLog(0, ("Internal error: Multihome extent does not exist. "
+                    "Base %d\n", base));
+           return VL_IO;
+       }
+
+       *basePtr = base;
+       *exp = &ctx->ex_addr[base][index];
+    }
+
+    return 0;
+}
+
+static_inline int
+multiHomedExtent(struct vl_ctx *ctx, int srvidx, struct extentaddr **exp)
+{
+    int base;
+
+    return multiHomedExtentBase(ctx, srvidx, exp, &base);
+}
+
+#define AFS_RXINFO_LEN 128
+static char *
+rxkadInfo(char *str, struct rx_connection *conn, struct in_addr hostAddr)
 {
     int code;
-    register struct rx_connection *tconn;
-    char tname[64];
-    char tinst[64];
-    char tcell[64];
+    char tname[64] = "";
+    char tinst[64] = "";
+    char tcell[64] = "";
     afs_uint32 exp;
-    struct in_addr hostAddr;
 
-    tconn = rx_ConnectionOf(rxcall);
-    hostAddr.s_addr = rx_HostOf(rx_PeerOf(tconn));
-    code =
-       rxkad_GetServerInfo(rxcall->conn, NULL, &exp, tname, tinst, tcell,
-                           NULL);
+    code = rxkad_GetServerInfo(conn, NULL, &exp, tname, tinst, tcell,
+                              NULL);
     if (!code)
-       sprintf(rxinfo_str, "%s %s%s%s%s%s", inet_ntoa(hostAddr), tname,
-               tinst?".":"", tinst?tinst:"", tcell?"@":"", tcell?tcell:"");
+       snprintf(str, AFS_RXINFO_LEN,
+                "%s rxkad:%s%s%s%s%s", inet_ntoa(hostAddr), tname,
+               (tinst[0] == '\0') ? "" : ".",
+               (tinst[0] == '\0') ? "" : tinst,
+               (tcell[0] == '\0') ? "" : "@",
+               (tcell[0] == '\0') ? "" : tcell);
     else
-       sprintf(rxinfo_str, "%s noauth", inet_ntoa(hostAddr));
-    return (rxinfo_str);
+       snprintf(str, AFS_RXINFO_LEN, "%s noauth", inet_ntoa(hostAddr));
+    return (str);
 }
 
+static char *
+rxinfo(char *str, struct rx_call *rxcall)
+{
+    struct rx_connection *conn;
+    struct in_addr hostAddr;
+    rx_securityIndex authClass;
+
+    conn = rx_ConnectionOf(rxcall);
+    authClass = rx_SecurityClassOf(conn);
+    hostAddr.s_addr = rx_HostOf(rx_PeerOf(conn));
+
+    switch(authClass) {
+    case RX_SECIDX_KAD:
+       return rxkadInfo(str, conn, hostAddr);
+    default:
+       ;
+    }
+
+    snprintf(str, AFS_RXINFO_LEN, "%s noauth", inet_ntoa(hostAddr));
+    return str;
+}
+
+
 /* This is called to initialize the database, set the appropriate locks and make sure that the vldb header is valid */
 int
-Init_VLdbase(trans, locktype, this_op)
-     struct ubik_trans **trans;
-     int locktype;             /* indicate read or write transaction */
-     int this_op;
+Init_VLdbase(struct vl_ctx *ctx,
+            int locktype,      /* indicate read or write transaction */
+            int opcode)
 {
-    int errorcode = 0, pass, wl;
+    int code = 0, pass, wl;
 
     for (pass = 1; pass <= 3; pass++) {
        if (pass == 2) {        /* take write lock to rebuild the db */
-           errorcode = ubik_BeginTrans(VL_dbase, UBIK_WRITETRANS, trans);
+           code = ubik_BeginTrans(VL_dbase, UBIK_WRITETRANS, &ctx->trans);
            wl = 1;
        } else if (locktype == LOCKREAD) {
-           errorcode =
-               ubik_BeginTransReadAny(VL_dbase, UBIK_READTRANS, trans);
+#ifdef UBIK_READ_WHILE_WRITE
+           code = ubik_BeginTransReadAnyWrite(VL_dbase, UBIK_READTRANS, &ctx->trans);
+#else
+           code = ubik_BeginTransReadAny(VL_dbase, UBIK_READTRANS, &ctx->trans);
+#endif
            wl = 0;
        } else {
-           errorcode = ubik_BeginTrans(VL_dbase, UBIK_WRITETRANS, trans);
+           code = ubik_BeginTrans(VL_dbase, UBIK_WRITETRANS, &ctx->trans);
            wl = 1;
        }
-       if (errorcode)
-           return errorcode;
+       if (code)
+           return code;
 
-       errorcode = ubik_SetLock(*trans, 1, 1, locktype);
-       if (errorcode) {
-           COUNT_ABO;
-           ubik_AbortTrans(*trans);
-           return errorcode;
+       code = ubik_SetLock(ctx->trans, 1, 1, locktype);
+       if (code) {
+           countAbort(opcode);
+           ubik_AbortTrans(ctx->trans);
+           return code;
        }
 
        /* check that dbase is initialized and setup cheader */
        /* 2nd pass we try to rebuild the header */
-       errorcode = CheckInit(*trans, ((pass == 2) ? 1 : 0));
-       if (!errorcode && wl && extent_mod)
-           errorcode = readExtents(*trans);    /* Fix the mh extent blocks */
-       if (errorcode) {
-           COUNT_ABO;
-           ubik_AbortTrans(*trans);
+       code = CheckInit(ctx->trans, ((pass == 2) ? 1 : 0));
+       if (!code && wl && extent_mod)
+           code = readExtents(ctx->trans);     /* Fix the mh extent blocks */
+       if (code) {
+           countAbort(opcode);
+           ubik_AbortTrans(ctx->trans);
            /* Only rebuld if the database is empty */
            /* Exit if can't rebuild */
-           if ((pass == 1) && (errorcode != VL_EMPTY))
-               return errorcode;
+           if ((pass == 1) && (code != VL_EMPTY))
+               return code;
            if (pass == 2)
-               return errorcode;
-       } else {                /* No errorcode */
+               return code;
+       } else {                /* No code */
            if (pass == 2) {
-               ubik_EndTrans(*trans);  /* Rebuilt db. End trans, then retake original lock */
+               /* The database header was rebuilt; end the write transaction.
+                * This will call vlsynccache() to copy the write header buffers
+                * to the read header buffers, before calling vlsetache().
+                * Do a third pass to re-acquire the original lock, which
+                * may be a read lock. */
+               ubik_EndTrans(ctx->trans);
            } else {
                break;          /* didn't rebuild and successful - exit */
            }
        }
     }
-    return errorcode;
+    if (code == 0) {
+       code = vlsetcache(ctx, locktype);
+    }
+    return code;
 }
 
 
-/* Create a new vldb entry; both new volume id and name must be unique (non-existant in vldb). */
+/* Create a new vldb entry; both new volume id and name must be unique
+ * (non-existant in vldb).
+ */
 
-afs_int32
-SVL_CreateEntry(rxcall, newentry)
-     struct rx_call *rxcall;
-     struct vldbentry *newentry;
+static afs_int32
+CreateEntry(struct rx_call *rxcall, struct vldbentry *newentry)
 {
-    struct ubik_trans *trans;
-    afs_int32 errorcode, blockindex;
+    int this_op = VLCREATEENTRY;
+    struct vl_ctx ctx;
+    afs_int32 code, blockindex;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLCREATEENTRY);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL)) {
-       errorcode = VL_PERM;
-       goto end;
+       return VL_PERM;
     }
 
     /* Do some validity tests on new entry */
-    if ((errorcode = check_vldbentry(newentry))
-       || (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op)))
-       goto end;
+    if ((code = check_vldbentry(newentry))
+       || (code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
     VLog(1,
         ("OCreate Volume %d %s\n", newentry->volumeId[RWVOL],
-         rxinfo(rxcall)));
-    /* XXX shouldn't we check to see if the r/o volume is duplicated? */
-    if (newentry->volumeId[RWVOL]
-       && FindByID(trans, newentry->volumeId[RWVOL], RWVOL, &tentry, &errorcode)) {    /* entry already exists, we fail */
-       errorcode = VL_IDEXIST;
+         rxinfo(rxstr, rxcall)));
+    if (EntryIDExists(&ctx, newentry->volumeId, MAXTYPES, &code)) {
+       /* at least one of the specified IDs already exists; we fail */
+       code = VL_IDEXIST;
        goto abort;
-    } else if (errorcode) {
+    } else if (code) {
        goto abort;
     }
 
     /* Is this following check (by volume name) necessary?? */
     /* If entry already exists, we fail */
-    if (FindByName(trans, newentry->name, &tentry, &errorcode)) {
-       errorcode = VL_NAMEEXIST;
+    if (FindByName(&ctx, newentry->name, &tentry, &code)) {
+       code = VL_NAMEEXIST;
        goto abort;
-    } else if (errorcode) {
+    } else if (code) {
        goto abort;
     }
 
-    blockindex = AllocBlock(trans, &tentry);
+    blockindex = AllocBlock(&ctx, &tentry);
     if (blockindex == 0) {
-       errorcode = VL_CREATEFAIL;
+       code = VL_CREATEFAIL;
        goto abort;
     }
 
     memset(&tentry, 0, sizeof(struct nvlentry));
     /* Convert to its internal representation; both in host byte order */
-    if (errorcode = vldbentry_to_vlentry(trans, newentry, &tentry)) {
-       FreeBlock(trans, blockindex);
+    if ((code = vldbentry_to_vlentry(&ctx, newentry, &tentry))) {
+       FreeBlock(&ctx, blockindex);
        goto abort;
     }
 
     /* Actually insert the entry in vldb */
-    errorcode = ThreadVLentry(trans, blockindex, &tentry);
-    if (errorcode) {
-       FreeBlock(trans, blockindex);
+    code = ThreadVLentry(&ctx, blockindex, &tentry);
+    if (code) {
+       FreeBlock(&ctx, blockindex);
        goto abort;
     } else {
-       errorcode = ubik_EndTrans(trans);
-       goto end;
+       return ubik_EndTrans(ctx.trans);
     }
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+}
 
-  end:
-    osi_auditU(rxcall, VLCreateEntryEvent, errorcode, AUD_STR,
+afs_int32
+SVL_CreateEntry(struct rx_call *rxcall, struct vldbentry *newentry)
+{
+    afs_int32 code;
+
+    code = CreateEntry(rxcall, newentry);
+    osi_auditU(rxcall, VLCreateEntryEvent, code, AUD_STR,
               (newentry ? newentry->name : NULL), AUD_END);
-    return errorcode;
+    return code;
 }
 
-
-afs_int32
-SVL_CreateEntryN(rxcall, newentry)
-     struct rx_call *rxcall;
-     struct nvldbentry *newentry;
+static afs_int32
+CreateEntryN(struct rx_call *rxcall, struct nvldbentry *newentry)
 {
-    struct ubik_trans *trans;
-    afs_int32 errorcode, blockindex;
+    int this_op = VLCREATEENTRYN;
+    struct vl_ctx ctx;
+    afs_int32 code, blockindex;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLCREATEENTRYN);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL)) {
-       errorcode = VL_PERM;
-       goto end;
+       return VL_PERM;
     }
 
     /* Do some validity tests on new entry */
-    if ((errorcode = check_nvldbentry(newentry))
-       || (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op)))
-       goto end;
+    if ((code = check_nvldbentry(newentry))
+       || (code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
     VLog(1,
         ("Create Volume %d %s\n", newentry->volumeId[RWVOL],
-         rxinfo(rxcall)));
-    /* XXX shouldn't we check to see if the r/o volume is duplicated? */
-    if (newentry->volumeId[RWVOL]
-       && FindByID(trans, newentry->volumeId[RWVOL], RWVOL, &tentry, &errorcode)) {    /* entry already exists, we fail */
-       errorcode = VL_IDEXIST;
+         rxinfo(rxstr, rxcall)));
+    if (EntryIDExists(&ctx, newentry->volumeId, MAXTYPES, &code)) {
+       /* at least one of the specified IDs already exists; we fail */
+       code = VL_IDEXIST;
        goto abort;
-    } else if (errorcode) {
+    } else if (code) {
        goto abort;
     }
 
     /* Is this following check (by volume name) necessary?? */
     /* If entry already exists, we fail */
-    if (FindByName(trans, newentry->name, &tentry, &errorcode)) {
-       errorcode = VL_NAMEEXIST;
+    if (FindByName(&ctx, newentry->name, &tentry, &code)) {
+       code = VL_NAMEEXIST;
        goto abort;
-    } else if (errorcode) {
+    } else if (code) {
        goto abort;
     }
 
-    blockindex = AllocBlock(trans, &tentry);
+    blockindex = AllocBlock(&ctx, &tentry);
     if (blockindex == 0) {
-       errorcode = VL_CREATEFAIL;
+       code = VL_CREATEFAIL;
        goto abort;
     }
 
     memset(&tentry, 0, sizeof(struct nvlentry));
     /* Convert to its internal representation; both in host byte order */
-    if (errorcode = nvldbentry_to_vlentry(trans, newentry, &tentry)) {
-       FreeBlock(trans, blockindex);
+    if ((code = nvldbentry_to_vlentry(&ctx, newentry, &tentry))) {
+       FreeBlock(&ctx, blockindex);
        goto abort;
     }
 
     /* Actually insert the entry in vldb */
-    errorcode = ThreadVLentry(trans, blockindex, &tentry);
-    if (errorcode) {
-       FreeBlock(trans, blockindex);
+    code = ThreadVLentry(&ctx, blockindex, &tentry);
+    if (code) {
+       FreeBlock(&ctx, blockindex);
        goto abort;
     } else {
-       errorcode = ubik_EndTrans(trans);
-       goto end;
+       return ubik_EndTrans(ctx.trans);
     }
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+}
+
+afs_int32
+SVL_CreateEntryN(struct rx_call *rxcall, struct nvldbentry *newentry)
+{
+    afs_int32 code;
 
-  end:
-    osi_auditU(rxcall, VLCreateEntryEvent, errorcode, AUD_STR,
+    code = CreateEntryN(rxcall, newentry);
+    osi_auditU(rxcall, VLCreateEntryEvent, code, AUD_STR,
               (newentry ? newentry->name : NULL), AUD_END);
-    return errorcode;
+    return code;
 }
 
-
-afs_int32
-SVL_ChangeAddr(rxcall, ip1, ip2)
-     struct rx_call *rxcall;
-     afs_int32 ip1, ip2;
+static afs_int32
+ChangeAddr(struct rx_call *rxcall, afs_uint32 ip1, afs_uint32 ip2)
 {
-    struct ubik_trans *trans;
-    afs_int32 errorcode;
+    int this_op = VLCHANGEADDR;
+    struct vl_ctx ctx;
+    afs_int32 code;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLCHANGEADDR);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL)) {
-       errorcode = VL_PERM;
-       goto end;
+       return VL_PERM;
     }
 
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("Change Addr %d -> %d %s\n", ip1, ip2, rxinfo(rxcall)));
-    if (errorcode = ChangeIPAddr(ip1, ip2, trans))
+    VLog(1, ("Change Addr %u -> %u %s\n", ip1, ip2, rxinfo(rxstr, rxcall)));
+    if ((code = ChangeIPAddr(&ctx, ip1, ip2)))
        goto abort;
     else {
-       errorcode = ubik_EndTrans(trans);
-       goto end;
+       code = ubik_EndTrans(ctx.trans);
+       return code;
     }
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+}
 
-  end:
-    osi_auditU(rxcall, VLChangeAddrEvent, errorcode, AUD_LONG, ip1, AUD_LONG,
+afs_int32
+SVL_ChangeAddr(struct rx_call *rxcall, afs_uint32 ip1, afs_uint32 ip2)
+{
+    afs_int32 code;
+
+    code = ChangeAddr(rxcall, ip1, ip2);
+    osi_auditU(rxcall, VLChangeAddrEvent, code, AUD_LONG, ip1, AUD_LONG,
               ip2, AUD_END);
-    return errorcode;
+    return code;
 }
 
 /* Delete a vldb entry given the volume id. */
-afs_int32
-SVL_DeleteEntry(rxcall, volid, voltype)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype;
+static afs_int32
+DeleteEntry(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype)
 {
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode;
+    int this_op = VLDELETEENTRY;
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLDELETEENTRY);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
 
     if ((voltype != -1) && (InvalidVoltype(voltype)))
-       END(VL_BADVOLTYPE);
+       return VL_BADVOLTYPE;
 
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("Delete Volume %d %s\n", volid, rxinfo(rxcall)));
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    VLog(1, ("Delete Volume %u %s\n", volid, rxinfo(rxstr, rxcall)));
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == 0) {     /* volid not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
 
     if (tentry.flags & VLDELETED) {    /* Already deleted; return */
        ABORT(VL_ENTDELETED);
     }
-    if (errorcode = RemoveEntry(trans, blockindex, &tentry)) {
+    if ((code = RemoveEntry(&ctx, blockindex, &tentry))) {
        goto abort;
     }
-    errorcode = (ubik_EndTrans(trans));
-    goto end;
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+}
+
+afs_int32
+SVL_DeleteEntry(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype)
+{
+    afs_int32 code;
 
-  end:
-    osi_auditU(rxcall, VLDeleteEntryEvent, errorcode, AUD_LONG, volid,
+    code = DeleteEntry(rxcall, volid, voltype);
+    osi_auditU(rxcall, VLDeleteEntryEvent, code, AUD_LONG, volid,
               AUD_END);
-    return errorcode;
+    return code;
 }
 
 
 /* Get a vldb entry given its volume id; make sure it's not a deleted entry. */
-GetEntryByID(rxcall, volid, voltype, aentry, new, this_op)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype, new, this_op;
-     char *aentry;             /* entry data copied here */
-{
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode;
+static int
+GetEntryByID(struct rx_call *rxcall,
+            afs_uint32 volid,
+            afs_int32 voltype,
+            char *aentry,      /* entry data copied here */
+            afs_int32 new,
+            afs_int32 this_op)
+{
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
+
+    countRequest(this_op);
 
     if ((voltype != -1) && (InvalidVoltype(voltype)))
        return VL_BADVOLTYPE;
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
 
-    VLog(5, ("GetVolumeByID %d (%d) %s\n", volid, new, rxinfo(rxcall)));
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    VLog(5, ("GetVolumeByID %u (%d) %s\n", volid, new,
+             rxinfo(rxstr, rxcall)));
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == 0) {     /* entry not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return errorcode;
+       if (!code)
+           code = VL_NOENT;
+       goto abort;
     }
     if (tentry.flags & VLDELETED) {    /* Entry is deleted! */
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return VL_ENTDELETED;
+       code = VL_ENTDELETED;
+       goto abort;
     }
     /* Convert from the internal to external form */
     if (new == 1)
-       vlentry_to_nvldbentry(&tentry, (struct nvldbentry *)aentry);
+       code = vlentry_to_nvldbentry(&ctx, &tentry, (struct nvldbentry *)aentry);
     else if (new == 2)
-       vlentry_to_uvldbentry(&tentry, (struct uvldbentry *)aentry);
+       code = vlentry_to_uvldbentry(&ctx, &tentry, (struct uvldbentry *)aentry);
     else
-       vlentry_to_vldbentry(&tentry, (struct vldbentry *)aentry);
-    return (ubik_EndTrans(trans));
+       code = vlentry_to_vldbentry(&ctx, &tentry, (struct vldbentry *)aentry);
+
+    if (code)
+       goto abort;
+
+    return (ubik_EndTrans(ctx.trans));
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
 afs_int32
-SVL_GetEntryByID(rxcall, volid, voltype, aentry)
-     struct rx_call *rxcall;
-     afs_int32 volid, voltype;
-     vldbentry *aentry;                /* entry data copied here */
+SVL_GetEntryByID(struct rx_call *rxcall,
+                afs_uint32 volid,
+                afs_int32 voltype,
+                vldbentry *aentry)             /* entry data copied here */
 {
-    COUNT_REQ(VLGETENTRYBYID);
-    return (GetEntryByID(rxcall, volid, voltype, (char *)aentry, 0, this_op));
+    return (GetEntryByID(rxcall, volid, voltype, (char *)aentry, 0,
+                        VLGETENTRYBYID));
 }
 
 afs_int32
-SVL_GetEntryByIDN(rxcall, volid, voltype, aentry)
-     struct rx_call *rxcall;
-     afs_int32 volid, voltype;
-     nvldbentry *aentry;       /* entry data copied here */
+SVL_GetEntryByIDN(struct rx_call *rxcall,
+                 afs_uint32 volid,
+                 afs_int32 voltype,
+                 nvldbentry *aentry)   /* entry data copied here */
 {
-    COUNT_REQ(VLGETENTRYBYIDN);
-    return (GetEntryByID(rxcall, volid, voltype, (char *)aentry, 1, this_op));
+    return (GetEntryByID(rxcall, volid, voltype, (char *)aentry, 1,
+                        VLGETENTRYBYIDN));
 }
 
 afs_int32
-SVL_GetEntryByIDU(rxcall, volid, voltype, aentry)
-     struct rx_call *rxcall;
-     afs_int32 volid, voltype;
-     uvldbentry *aentry;       /* entry data copied here */
+SVL_GetEntryByIDU(struct rx_call *rxcall,
+                 afs_uint32 volid,
+                 afs_int32 voltype,
+                 uvldbentry *aentry)   /* entry data copied here */
 {
-    COUNT_REQ(VLGETENTRYBYIDU);
-    return (GetEntryByID(rxcall, volid, voltype, (char *)aentry, 2, this_op));
+    return (GetEntryByID(rxcall, volid, voltype, (char *)aentry, 2,
+                        VLGETENTRYBYIDU));
 }
 
-
-
-/* returns true if the id is a decimal integer, in which case we interpret it
-    as an id.  make the cache manager much simpler */
+/* returns true if the id is a decimal integer, in which case we interpret
+ * it as an id.  make the cache manager much simpler */
 static int
-NameIsId(aname)
-     register char *aname;
+NameIsId(char *aname)
 {
-    register int tc;
-    while (tc = *aname++) {
+    int tc;
+    while ((tc = *aname++)) {
        if (tc > '9' || tc < '0')
            return 0;
     }
     return 1;
 }
 
-/* Get a vldb entry given the volume's name; of course, very similar to VLGetEntryByID() above. */
-GetEntryByName(rxcall, volname, aentry, new, this_op)
-     struct rx_call *rxcall;
-     char *volname;
-     char *aentry;             /* entry data copied here */
-     int new, this_op;
+/* Get a vldb entry given the volume's name; of course, very similar to
+ * VLGetEntryByID() above. */
+static afs_int32
+GetEntryByName(struct rx_call *rxcall,
+              char *volname,
+              char *aentry,            /* entry data copied here */
+              int new,
+              int this_op)
 {
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode;
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
     if (NameIsId(volname)) {
-       return GetEntryByID(rxcall, atoi(volname), -1, aentry, new, this_op);
+       return GetEntryByID(rxcall, strtoul(volname, NULL, 10), -1, aentry, new, this_op);
     }
+
+    countRequest(this_op);
+
     if (InvalidVolname(volname))
        return VL_BADNAME;
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
-    VLog(5, ("GetVolumeByName %s (%d) %s\n", volname, new, rxinfo(rxcall)));
-    blockindex = FindByName(trans, volname, &tentry, &errorcode);
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
+    VLog(5, ("GetVolumeByName %s (%d) %s\n", volname, new, rxinfo(rxstr, rxcall)));
+    blockindex = FindByName(&ctx, volname, &tentry, &code);
     if (blockindex == 0) {     /* entry not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return errorcode;
+       if (!code)
+           code = VL_NOENT;
+       goto abort;
     }
     if (tentry.flags & VLDELETED) {    /* Entry is deleted */
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return VL_ENTDELETED;
+       code = VL_ENTDELETED;
+       goto abort;
     }
     /* Convert to external entry representation */
     if (new == 1)
-       vlentry_to_nvldbentry(&tentry, (struct nvldbentry *)aentry);
+       code = vlentry_to_nvldbentry(&ctx, &tentry, (struct nvldbentry *)aentry);
     else if (new == 2)
-       vlentry_to_uvldbentry(&tentry, (struct uvldbentry *)aentry);
+       code = vlentry_to_uvldbentry(&ctx, &tentry, (struct uvldbentry *)aentry);
     else
-       vlentry_to_vldbentry(&tentry, (struct vldbentry *)aentry);
-    return (ubik_EndTrans(trans));
+       code = vlentry_to_vldbentry(&ctx, &tentry, (struct vldbentry *)aentry);
+
+    if (code)
+       goto abort;
+
+    return (ubik_EndTrans(ctx.trans));
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+
 }
 
 afs_int32
-SVL_GetEntryByNameO(rxcall, volname, aentry)
-     struct rx_call *rxcall;
-     char *volname;
-     struct vldbentry *aentry; /* entry data copied here */
+SVL_GetEntryByNameO(struct rx_call *rxcall,
+                   char *volname,
+                   struct vldbentry *aentry)   /* entry data copied here */
 {
-    COUNT_REQ(VLGETENTRYBYNAME);
-    return (GetEntryByName(rxcall, volname, (char *)aentry, 0, this_op));
+    return (GetEntryByName(rxcall, volname, (char *)aentry, 0,
+                          VLGETENTRYBYNAME));
 }
 
-
 afs_int32
-SVL_GetEntryByNameN(rxcall, volname, aentry)
-     struct rx_call *rxcall;
-     char *volname;
-     struct nvldbentry *aentry;        /* entry data copied here */
+SVL_GetEntryByNameN(struct rx_call *rxcall,
+                   char *volname,
+                   struct nvldbentry *aentry)  /* entry data copied here */
 {
-    COUNT_REQ(VLGETENTRYBYNAMEN);
-    return (GetEntryByName(rxcall, volname, (char *)aentry, 1, this_op));
+    return (GetEntryByName(rxcall, volname, (char *)aentry, 1,
+                          VLGETENTRYBYNAMEN));
 }
 
 afs_int32
-SVL_GetEntryByNameU(rxcall, volname, aentry)
-     struct rx_call *rxcall;
-     char *volname;
-     struct uvldbentry *aentry;        /* entry data copied here */
+SVL_GetEntryByNameU(struct rx_call *rxcall,
+                   char *volname,
+                   struct uvldbentry *aentry)  /* entry data copied here */
 {
-    COUNT_REQ(VLGETENTRYBYNAMEU);
-    return (GetEntryByName(rxcall, volname, (char *)aentry, 2, this_op));
+    return (GetEntryByName(rxcall, volname, (char *)aentry, 2,
+                          VLGETENTRYBYNAMEU));
 }
 
-
-
 /* Get the current value of the maximum volume id and bump the volume id counter by Maxvolidbump. */
-afs_int32
-SVL_GetNewVolumeId(rxcall, Maxvolidbump, newvolumeid)
-     struct rx_call *rxcall;
-     afs_int32 Maxvolidbump;
-     afs_int32 *newvolumeid;
+static afs_int32
+getNewVolumeId(struct rx_call *rxcall, afs_uint32 Maxvolidbump,
+                  afs_uint32 *newvolumeid)
 {
-    register afs_int32 errorcode, maxvolumeid;
-    struct ubik_trans *trans;
+    int this_op = VLGETNEWVOLUMEID;
+    afs_int32 code;
+    afs_uint32 maxvolumeid;
+    struct vl_ctx ctx;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLGETNEWVOLUMEID);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
 
-    if (Maxvolidbump < 0 || Maxvolidbump > MAXBUMPCOUNT)
-       END(VL_BADVOLIDBUMP);
+    if (Maxvolidbump > MAXBUMPCOUNT)
+       return VL_BADVOLIDBUMP;
 
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
+
+    *newvolumeid = maxvolumeid = NextUnusedID(&ctx,
+       ntohl(ctx.cheader->vital_header.MaxVolumeId), Maxvolidbump, &code);
+    if (code) {
+       goto abort;
+    }
 
-    *newvolumeid = maxvolumeid = ntohl(cheader.vital_header.MaxVolumeId);
     maxvolumeid += Maxvolidbump;
-    VLog(1, ("GetNewVolid newmax=%d %s\n", maxvolumeid, rxinfo(rxcall)));
-    cheader.vital_header.MaxVolumeId = htonl(maxvolumeid);
-    if (write_vital_vlheader(trans)) {
+    VLog(1, ("GetNewVolid newmax=%u %s\n", maxvolumeid, rxinfo(rxstr, rxcall)));
+    ctx.cheader->vital_header.MaxVolumeId = htonl(maxvolumeid);
+    if (write_vital_vlheader(&ctx)) {
        ABORT(VL_IO);
     }
-    errorcode = (ubik_EndTrans(trans));
-    goto end;
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+}
+
+afs_int32
+SVL_GetNewVolumeId(struct rx_call *rxcall, afs_uint32 Maxvolidbump,
+                  afs_uint32 *newvolumeid)
+{
+    afs_int32 code;
 
-  end:
-    osi_auditU(rxcall, VLGetNewVolumeIdEvent, errorcode, AUD_END);
-    return errorcode;
+    code = getNewVolumeId(rxcall, Maxvolidbump, newvolumeid);
+    osi_auditU(rxcall, VLGetNewVolumeIdEvent, code, AUD_END);
+    return code;
 }
 
 
@@ -596,44 +749,43 @@ SVL_GetNewVolumeId(rxcall, Maxvolidbump, newvolumeid)
  * newentry. No individual checking/updating per field (alike
  * VLUpdateEntry) is done. */
 
-afs_int32
-SVL_ReplaceEntry(rxcall, volid, voltype, newentry, releasetype)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype;
-     struct vldbentry *newentry;
-     afs_int32 releasetype;
-{
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode, typeindex;
+static afs_int32
+ReplaceEntry(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+                struct vldbentry *newentry, afs_int32 releasetype)
+{
+    int this_op = VLREPLACEENTRY;
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code, typeindex;
     int hashnewname;
     int hashVol[MAXTYPES];
     struct nvlentry tentry;
+    afs_uint32 checkids[MAXTYPES];
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLREPLACEENTRY);
+    countRequest(this_op);
     for (typeindex = 0; typeindex < MAXTYPES; typeindex++)
        hashVol[typeindex] = 0;
     hashnewname = 0;
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
 
-    if (errorcode = check_vldbentry(newentry))
-       goto end;
+    if ((code = check_vldbentry(newentry)))
+       return code;
 
     if (voltype != -1 && InvalidVoltype(voltype))
-       END(VL_BADVOLTYPE);
+       return VL_BADVOLTYPE;
 
     if (releasetype && InvalidReleasetype(releasetype))
-       END(VL_BADRELLOCKTYPE);
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+       return VL_BADRELLOCKTYPE;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("OReplace Volume %d %s\n", volid, rxinfo(rxcall)));
+    VLog(1, ("OReplace Volume %u %s\n", volid, rxinfo(rxstr, rxcall)));
     /* find vlentry we're changing */
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == 0) {     /* entry not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
 
@@ -642,14 +794,37 @@ SVL_ReplaceEntry(rxcall, volid, voltype, newentry, releasetype)
        ABORT(VL_BADENTRY);
     }
 
+    /* make sure none of the IDs we are changing to are already in use */
+    memset(&checkids, 0, sizeof(checkids));
+    for (typeindex = ROVOL; typeindex < MAXTYPES; typeindex++) {
+       if (tentry.volumeId[typeindex] != newentry->volumeId[typeindex]) {
+           checkids[typeindex] = newentry->volumeId[typeindex];
+       }
+    }
+    if (EntryIDExists(&ctx, checkids, MAXTYPES, &code)) {
+       ABORT(VL_IDEXIST);
+    } else if (code) {
+       goto abort;
+    }
+
+    /* make sure the name we're changing to doesn't already exist */
+    if (strcmp(newentry->name, tentry.name)) {
+       struct nvlentry tmp_entry;
+       if (FindByName(&ctx, newentry->name, &tmp_entry, &code)) {
+           ABORT(VL_NAMEEXIST);
+       } else if (code) {
+           goto abort;
+       }
+    }
+
     /* unhash volid entries if they're disappearing or changing.
      * Remember if we need to hash in the new value (we don't have to
      * rehash if volid stays same */
     for (typeindex = ROVOL; typeindex <= BACKVOL; typeindex++) {
        if (tentry.volumeId[typeindex] != newentry->volumeId[typeindex]) {
            if (tentry.volumeId[typeindex])
-               if (errorcode =
-                   UnhashVolid(trans, typeindex, blockindex, &tentry)) {
+               if ((code =
+                   UnhashVolid(&ctx, typeindex, blockindex, &tentry))) {
                    goto abort;
                }
            /* we must rehash new id if the id is different and the ID is nonzero */
@@ -659,7 +834,7 @@ SVL_ReplaceEntry(rxcall, volid, voltype, newentry, releasetype)
 
     /* Rehash volname if it changes */
     if (strcmp(newentry->name, tentry.name)) { /* Name changes; redo hashing */
-       if (errorcode = UnhashVolname(trans, blockindex, &tentry)) {
+       if ((code = UnhashVolname(&ctx, blockindex, &tentry))) {
            goto abort;
        }
        hashnewname = 1;
@@ -667,77 +842,82 @@ SVL_ReplaceEntry(rxcall, volid, voltype, newentry, releasetype)
 
     /* after this, tentry is new entry, not old one.  vldbentry_to_vlentry
      * doesn't touch hash chains */
-    if (errorcode = vldbentry_to_vlentry(trans, newentry, &tentry)) {
+    if ((code = vldbentry_to_vlentry(&ctx, newentry, &tentry))) {
        goto abort;
     }
 
     for (typeindex = ROVOL; typeindex <= BACKVOL; typeindex++) {
        if (hashVol[typeindex] && tentry.volumeId[typeindex]) {
-           if (errorcode = HashVolid(trans, typeindex, blockindex, &tentry)) {
+           if ((code = HashVolid(&ctx, typeindex, blockindex, &tentry))) {
                goto abort;
            }
        }
     }
 
     if (hashnewname)
-       HashVolname(trans, blockindex, &tentry);
+       HashVolname(&ctx, blockindex, &tentry);
 
     if (releasetype)
        ReleaseEntry(&tentry, releasetype);     /* Unlock entry if necessary */
-    if (vlentrywrite(trans, blockindex, &tentry, sizeof(tentry))) {
+    if (vlentrywrite(ctx.trans, blockindex, &tentry, sizeof(tentry))) {
        ABORT(VL_IO);
     }
 
-    END(ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
-
-  end:
-    osi_auditU(rxcall, VLReplaceVLEntryEvent, errorcode, AUD_LONG, volid,
-              AUD_END);
-    return errorcode;
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
 afs_int32
-SVL_ReplaceEntryN(rxcall, volid, voltype, newentry, releasetype)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype;
-     struct nvldbentry *newentry;
-     afs_int32 releasetype;
-{
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode, typeindex;
+SVL_ReplaceEntry(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+                struct vldbentry *newentry, afs_int32 releasetype)
+{
+    afs_int32 code;
+
+    code = ReplaceEntry(rxcall, volid, voltype, newentry, releasetype);
+    osi_auditU(rxcall, VLReplaceVLEntryEvent, code, AUD_LONG, volid, AUD_END);
+    return code;
+}
+
+static afs_int32
+ReplaceEntryN(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+                 struct nvldbentry *newentry, afs_int32 releasetype)
+{
+    int this_op = VLREPLACEENTRYN;
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code, typeindex;
     int hashnewname;
     int hashVol[MAXTYPES];
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLREPLACEENTRYN);
+    countRequest(this_op);
     for (typeindex = 0; typeindex < MAXTYPES; typeindex++)
        hashVol[typeindex] = 0;
     hashnewname = 0;
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
 
-    if (errorcode = check_nvldbentry(newentry))
-       goto end;
+    if ((code = check_nvldbentry(newentry)))
+       return code;
 
     if (voltype != -1 && InvalidVoltype(voltype))
-       END(VL_BADVOLTYPE);
+       return VL_BADVOLTYPE;
 
     if (releasetype && InvalidReleasetype(releasetype))
-       END(VL_BADRELLOCKTYPE);
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+       return VL_BADRELLOCKTYPE;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("Replace Volume %d %s\n", volid, rxinfo(rxcall)));
+    VLog(1, ("Replace Volume %u %s\n", volid, rxinfo(rxstr, rxcall)));
     /* find vlentry we're changing */
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == 0) {     /* entry not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
 
@@ -752,8 +932,8 @@ SVL_ReplaceEntryN(rxcall, volid, voltype, newentry, releasetype)
     for (typeindex = ROVOL; typeindex <= BACKVOL; typeindex++) {
        if (tentry.volumeId[typeindex] != newentry->volumeId[typeindex]) {
            if (tentry.volumeId[typeindex])
-               if (errorcode =
-                   UnhashVolid(trans, typeindex, blockindex, &tentry)) {
+               if ((code =
+                   UnhashVolid(&ctx, typeindex, blockindex, &tentry))) {
                    goto abort;
                }
            /* we must rehash new id if the id is different and the ID is nonzero */
@@ -763,7 +943,7 @@ SVL_ReplaceEntryN(rxcall, volid, voltype, newentry, releasetype)
 
     /* Rehash volname if it changes */
     if (strcmp(newentry->name, tentry.name)) { /* Name changes; redo hashing */
-       if (errorcode = UnhashVolname(trans, blockindex, &tentry)) {
+       if ((code = UnhashVolname(&ctx, blockindex, &tentry))) {
            goto abort;
        }
        hashnewname = 1;
@@ -771,170 +951,198 @@ SVL_ReplaceEntryN(rxcall, volid, voltype, newentry, releasetype)
 
     /* after this, tentry is new entry, not old one.  vldbentry_to_vlentry
      * doesn't touch hash chains */
-    if (errorcode = nvldbentry_to_vlentry(trans, newentry, &tentry)) {
+    if ((code = nvldbentry_to_vlentry(&ctx, newentry, &tentry))) {
        goto abort;
     }
 
     for (typeindex = ROVOL; typeindex <= BACKVOL; typeindex++) {
        if (hashVol[typeindex] && tentry.volumeId[typeindex]) {
-           if (errorcode = HashVolid(trans, typeindex, blockindex, &tentry)) {
+           if ((code = HashVolid(&ctx, typeindex, blockindex, &tentry))) {
                goto abort;
            }
        }
     }
 
     if (hashnewname)
-       HashVolname(trans, blockindex, &tentry);
+       HashVolname(&ctx, blockindex, &tentry);
 
     if (releasetype)
        ReleaseEntry(&tentry, releasetype);     /* Unlock entry if necessary */
-    if (vlentrywrite(trans, blockindex, &tentry, sizeof(tentry))) {
+    if (vlentrywrite(ctx.trans, blockindex, &tentry, sizeof(tentry))) {
        ABORT(VL_IO);
     }
 
-    END(ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
+}
 
-  end:
-    osi_auditU(rxcall, VLReplaceVLEntryEvent, errorcode, AUD_LONG, volid,
-              AUD_END);
-    return errorcode;
+afs_int32
+SVL_ReplaceEntryN(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+                 struct nvldbentry *newentry, afs_int32 releasetype)
+{
+    afs_int32 code;
+
+    code = ReplaceEntryN(rxcall, volid, voltype, newentry, releasetype);
+    osi_auditU(rxcall, VLReplaceVLEntryEvent, code, AUD_LONG, volid, AUD_END);
+    return code;
 }
 
 
-/* Update a vldb entry (accessed thru its volume id). Almost all of the entry's fields can be modified in a single call by setting the appropriate bits in the Mask field in VldbUpdateentry. */
-/* this routine may never have been tested; use replace entry instead unless you're brave */
-afs_int32
-SVL_UpdateEntry(rxcall, volid, voltype, updateentry, releasetype)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype;
-     afs_int32 releasetype;
-     struct VldbUpdateEntry *updateentry;      /* Update entry copied here */
-{
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode;
+/* Update a vldb entry (accessed thru its volume id). Almost all of the
+ * entry's fields can be modified in a single call by setting the
+ * appropriate bits in the Mask field in VldbUpdateentry. */
+/* this routine may never have been tested; use replace entry instead
+ * unless you're brave */
+static afs_int32
+UpdateEntry(struct rx_call *rxcall,
+           afs_uint32 volid,
+           afs_int32 voltype,
+           struct VldbUpdateEntry *updateentry,        /* Update entry copied here */
+           afs_int32 releasetype)
+{
+    int this_op = VLUPDATEENTRY;
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLUPDATEENTRY);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
     if ((voltype != -1) && (InvalidVoltype(voltype)))
-       END(VL_BADVOLTYPE);
+       return VL_BADVOLTYPE;
     if (releasetype && InvalidReleasetype(releasetype))
-       END(VL_BADRELLOCKTYPE);
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+       return VL_BADRELLOCKTYPE;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("Update Volume %d %s\n", volid, rxinfo(rxcall)));
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    VLog(1, ("Update Volume %u %s\n", volid, rxinfo(rxstr, rxcall)));
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == 0) {     /* entry not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
 
     /* Do the actual updating of the entry, tentry. */
-    if (errorcode =
-       get_vldbupdateentry(trans, blockindex, updateentry, &tentry)) {
+    if ((code =
+       get_vldbupdateentry(&ctx, blockindex, updateentry, &tentry))) {
        goto abort;
     }
     if (releasetype)
        ReleaseEntry(&tentry, releasetype);     /* Unlock entry if necessary */
-    if (vlentrywrite(trans, blockindex, &tentry, sizeof(tentry))) {
+    if (vlentrywrite(ctx.trans, blockindex, &tentry, sizeof(tentry))) {
        ABORT(VL_IO);
     }
-    END(ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
-
-  end:
-    osi_auditU(rxcall, VLUpdateEntryEvent, errorcode, AUD_LONG, volid,
-              AUD_END);
-    return errorcode;
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
-
 afs_int32
-SVL_UpdateEntryByName(rxcall, volname, updateentry, releasetype)
-     struct rx_call *rxcall;
-     char *volname;
-     afs_int32 releasetype;
-     struct VldbUpdateEntry *updateentry;      /* Update entry copied here */
-{
-    struct ubik_trans *trans;
-    afs_int32 blockindex, errorcode;
+SVL_UpdateEntry(struct rx_call *rxcall,
+               afs_uint32 volid,
+               afs_int32 voltype,
+               struct VldbUpdateEntry *updateentry,
+               afs_int32 releasetype)
+{
+    afs_int32 code;
+
+    code = UpdateEntry(rxcall, volid, voltype, updateentry, releasetype);
+    osi_auditU(rxcall, VLUpdateEntryEvent, code, AUD_LONG, volid, AUD_END);
+    return code;
+}
+
+static afs_int32
+UpdateEntryByName(struct rx_call *rxcall,
+                 char *volname,
+                 struct VldbUpdateEntry *updateentry, /* Update entry copied here */
+                 afs_int32 releasetype)
+{
+    int this_op = VLUPDATEENTRYBYNAME;
+    struct vl_ctx ctx;
+    afs_int32 blockindex, code;
     struct nvlentry tentry;
 
-    COUNT_REQ(VLUPDATEENTRYBYNAME);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
     if (releasetype && InvalidReleasetype(releasetype))
-       END(VL_BADRELLOCKTYPE);
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+       return VL_BADRELLOCKTYPE;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    blockindex = FindByName(trans, volname, &tentry, &errorcode);
+    blockindex = FindByName(&ctx, volname, &tentry, &code);
     if (blockindex == 0) {     /* entry not found */
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
 
     /* Do the actual updating of the entry, tentry. */
-    if (errorcode =
-       get_vldbupdateentry(trans, blockindex, updateentry, &tentry)) {
+    if ((code =
+       get_vldbupdateentry(&ctx, blockindex, updateentry, &tentry))) {
        goto abort;
     }
     if (releasetype)
        ReleaseEntry(&tentry, releasetype);     /* Unlock entry if necessary */
-    if (vlentrywrite(trans, blockindex, &tentry, sizeof(tentry))) {
+    if (vlentrywrite(ctx.trans, blockindex, &tentry, sizeof(tentry))) {
        ABORT(VL_IO);
     }
-    END(ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
-
-  end:
-    osi_auditU(rxcall, VLUpdateEntryEvent, errorcode, AUD_LONG, -1, AUD_END);
-    return errorcode;
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
+afs_int32
+SVL_UpdateEntryByName(struct rx_call *rxcall,
+                     char *volname,
+                     struct VldbUpdateEntry *updateentry, /* Update entry copied here */
+                     afs_int32 releasetype)
+{
+    afs_int32 code;
+
+    code = UpdateEntryByName(rxcall, volname, updateentry, releasetype);
+    osi_auditU(rxcall, VLUpdateEntryEvent, code, AUD_LONG, -1, AUD_END);
+    return code;
+}
 
 /* Set a lock to the vldb entry for volid (of type voltype if not -1). */
-afs_int32
-SVL_SetLock(rxcall, volid, voltype, voloper)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype;
-     afs_int32 voloper;
-{
-    afs_int32 timestamp, blockindex, errorcode;
-    struct ubik_trans *trans;
+static afs_int32
+SetLock(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+       afs_int32 voloper)
+{
+    int this_op = VLSETLOCK;
+    afs_int32 timestamp, blockindex, code;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLSETLOCK);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
     if ((voltype != -1) && (InvalidVoltype(voltype)))
-       END(VL_BADVOLTYPE);
+       return VL_BADVOLTYPE;
     if (InvalidOperation(voloper))
-       END(VL_BADVOLOPER);
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+       return VL_BADVOLOPER;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("SetLock Volume %d %s\n", volid, rxinfo(rxcall)));
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    VLog(1, ("SetLock Volume %u %s\n", volid, rxinfo(rxstr, rxcall)));
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == NULLO) {
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
     if (tentry.flags & VLDELETED) {
@@ -959,51 +1167,57 @@ SVL_SetLock(rxcall, volid, voltype, voloper)
     tentry.flags &= ~VLOP_ALLOPERS;    /* Clear any possible older operation bit */
     tentry.flags |= voloper;
 
-    if (vlentrywrite(trans, blockindex, &tentry, sizeof(tentry))) {
+    if (vlentrywrite(ctx.trans, blockindex, &tentry, sizeof(tentry))) {
        ABORT(VL_IO);
     }
-    END(ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
-
-  end:
-    osi_auditU(rxcall, VLSetLockEvent, errorcode, AUD_LONG, volid, AUD_END);
-    return errorcode;
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
+afs_int32
+SVL_SetLock(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+           afs_int32 voloper)
+{
+    afs_int32 code;
+
+    code = SetLock(rxcall, volid, voltype, voloper);
+    osi_auditU(rxcall, VLSetLockEvent, code, AUD_LONG, volid, AUD_END);
+    return code;
+}
 
 /* Release an already locked vldb entry. Releasetype determines what
  * fields (afsid and/or volume operation) will be cleared along with
  * the lock time stamp. */
 
-afs_int32
-SVL_ReleaseLock(rxcall, volid, voltype, releasetype)
-     struct rx_call *rxcall;
-     afs_int32 volid;
-     afs_int32 voltype;
-     afs_int32 releasetype;
-{
-    afs_int32 blockindex, errorcode;
-    struct ubik_trans *trans;
+static afs_int32
+ReleaseLock(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+           afs_int32 releasetype)
+{
+    int this_op = VLRELEASELOCK;
+    afs_int32 blockindex, code;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLRELEASELOCK);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
-       END(VL_PERM);
+       return VL_PERM;
     if ((voltype != -1) && (InvalidVoltype(voltype)))
-       END(VL_BADVOLTYPE);
+       return VL_BADVOLTYPE;
     if (releasetype && InvalidReleasetype(releasetype))
-       END(VL_BADRELLOCKTYPE);
-    if (errorcode = Init_VLdbase(&trans, LOCKWRITE, this_op))
-       goto end;
+       return VL_BADRELLOCKTYPE;
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
+       return code;
 
-    VLog(1, ("ReleaseLock Volume %d %s\n", volid, rxinfo(rxcall)));
-    blockindex = FindByID(trans, volid, voltype, &tentry, &errorcode);
+    VLog(1, ("ReleaseLock Volume %u %s\n", volid, rxinfo(rxstr, rxcall)));
+    blockindex = FindByID(&ctx, volid, voltype, &tentry, &code);
     if (blockindex == NULLO) {
-       if (!errorcode)
-           errorcode = VL_NOENT;
+       if (!code)
+           code = VL_NOENT;
        goto abort;
     }
     if (tentry.flags & VLDELETED) {
@@ -1011,129 +1225,186 @@ SVL_ReleaseLock(rxcall, volid, voltype, releasetype)
     }
     if (releasetype)
        ReleaseEntry(&tentry, releasetype);     /* Unlock the appropriate fields */
-    if (vlentrywrite(trans, blockindex, &tentry, sizeof(tentry))) {
+    if (vlentrywrite(ctx.trans, blockindex, &tentry, sizeof(tentry))) {
        ABORT(VL_IO);
     }
-    END(ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
 
   abort:
-    COUNT_ABO;
-    ubik_AbortTrans(trans);
-
-  end:
-    osi_auditU(rxcall, VLReleaseLockEvent, errorcode, AUD_LONG, volid,
-              AUD_END);
-    return errorcode;
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
-
-/* ListEntry returns a single vldb entry, aentry, with offset previous_index; the remaining parameters (i.e. next_index) are used so that sequential calls to this routine will get the next (all) vldb entries. */
 afs_int32
-SVL_ListEntry(rxcall, previous_index, count, next_index, aentry)
-     struct rx_call *rxcall;
-     afs_int32 previous_index;
-     afs_int32 *count;
-     afs_int32 *next_index;
-     struct vldbentry *aentry;
-{
-    int errorcode;
-    struct ubik_trans *trans;
+SVL_ReleaseLock(struct rx_call *rxcall, afs_uint32 volid, afs_int32 voltype,
+               afs_int32 releasetype)
+{
+    afs_int32 code;
+
+    code = ReleaseLock(rxcall, volid, voltype, releasetype);
+    osi_auditU(rxcall, VLReleaseLockEvent, code, AUD_LONG, volid, AUD_END);
+    return code;
+}
+
+/* ListEntry returns a single vldb entry, aentry, with offset previous_index;
+ * the remaining parameters (i.e. next_index) are used so that sequential
+ * calls to this routine will get the next (all) vldb entries.
+ */
+static afs_int32
+ListEntry(struct rx_call *rxcall, afs_int32 previous_index,
+         afs_int32 *count, afs_int32 *next_index,
+         struct vldbentry *aentry)
+{
+    int this_op = VLLISTENTRY;
+    int code;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
+
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
 
-    COUNT_REQ(VLLISTENTRY);
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
-    VLog(25, ("OListEntry index=%d %s\n", previous_index, rxinfo(rxcall)));
-    *next_index = NextEntry(trans, previous_index, &tentry, count);
-    if (*next_index)
-       vlentry_to_vldbentry(&tentry, aentry);
-    return (ubik_EndTrans(trans));
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
+    VLog(25, ("OListEntry index=%d %s\n", previous_index,
+              rxinfo(rxstr, rxcall)));
+    *next_index = NextEntry(&ctx, previous_index, &tentry, count);
+    if (*next_index) {
+       code = vlentry_to_vldbentry(&ctx, &tentry, aentry);
+       if (code) {
+           countAbort(this_op);
+           ubik_AbortTrans(ctx.trans);
+           return code;
+       }
+    }
+    return ubik_EndTrans(ctx.trans);
 }
 
-/* ListEntry returns a single vldb entry, aentry, with offset previous_index; the remaining parameters (i.e. next_index) are used so that sequential calls to this routine will get the next (all) vldb entries. */
 afs_int32
-SVL_ListEntryN(rxcall, previous_index, count, next_index, aentry)
-     struct rx_call *rxcall;
-     afs_int32 previous_index;
-     afs_int32 *count;
-     afs_int32 *next_index;
-     struct nvldbentry *aentry;
-{
-    int errorcode;
-    struct ubik_trans *trans;
-    struct nvlentry tentry;
+SVL_ListEntry(struct rx_call *rxcall, afs_int32 previous_index,
+             afs_int32 *count, afs_int32 *next_index,
+             struct vldbentry *aentry)
+{
+    afs_int32 code;
 
-    COUNT_REQ(VLLISTENTRYN);
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
-    VLog(25, ("ListEntry index=%d %s\n", previous_index, rxinfo(rxcall)));
-    *next_index = NextEntry(trans, previous_index, &tentry, count);
-    if (*next_index)
-       vlentry_to_nvldbentry(&tentry, aentry);
-    return (ubik_EndTrans(trans));
+    code = ListEntry(rxcall, previous_index, count, next_index, aentry);
+    osi_auditU(rxcall, VLListEntryEvent, code, AUD_LONG, previous_index, AUD_END);
+    return code;
 }
 
+/* ListEntry returns a single vldb entry, aentry, with offset previous_index;
+ * the remaining parameters (i.e. next_index) are used so that sequential
+ * calls to this routine will get the next (all) vldb entries.
+ */
+static afs_int32
+ListEntryN(struct rx_call *rxcall, afs_int32 previous_index,
+          afs_int32 *count, afs_int32 *next_index,
+          struct nvldbentry *aentry)
+{
+    int this_op = VLLISTENTRYN;
+    int code;
+    struct vl_ctx ctx;
+    struct nvlentry tentry;
+    char rxstr[AFS_RXINFO_LEN];
+
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
+
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
+    VLog(25, ("ListEntry index=%d %s\n", previous_index, rxinfo(rxstr, rxcall)));
+    *next_index = NextEntry(&ctx, previous_index, &tentry, count);
+    if (*next_index) {
+       code = vlentry_to_nvldbentry(&ctx, &tentry, aentry);
+       if (code) {
+           countAbort(this_op);
+           ubik_AbortTrans(ctx.trans);
+           return code;
+       }
+    }
+
+    return ubik_EndTrans(ctx.trans);
+}
 
-/* Retrieves in vldbentries all vldb entries that match the specified attributes (by server number, partition, volume type, and flag); if volume id is specified then the associated list for that entry is returned. CAUTION: This could be a very expensive call since in most cases sequential search of all vldb entries is performed. */
 afs_int32
-SVL_ListAttributes(rxcall, attributes, nentries, vldbentries)
-     struct rx_call *rxcall;
-     struct VldbListByAttributes *attributes;
-     afs_int32 *nentries;
-     bulkentries *vldbentries;
-{
-    int errorcode, allocCount = 0;
-    struct ubik_trans *trans;
+SVL_ListEntryN(struct rx_call *rxcall, afs_int32 previous_index,
+              afs_int32 *count, afs_int32 *next_index,
+              struct nvldbentry *aentry)
+{
+    afs_int32 code;
+
+    code = ListEntryN(rxcall, previous_index, count, next_index, aentry);
+    osi_auditU(rxcall, VLListEntryEventN, code, AUD_LONG, previous_index, AUD_END);
+    return code;
+}
+
+/* Retrieves in vldbentries all vldb entries that match the specified
+ * attributes (by server number, partition, volume type, and flag); if volume
+ * id is specified then the associated list for that entry is returned.
+ * CAUTION: This could be a very expensive call since in most cases
+ * sequential search of all vldb entries is performed.
+ */
+static afs_int32
+ListAttributes(struct rx_call *rxcall,
+              struct VldbListByAttributes *attributes,
+              afs_int32 *nentries,
+              bulkentries *vldbentries)
+{
+    int this_op = VLLISTATTRIBUTES;
+    int code, allocCount = 0;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
     struct vldbentry *Vldbentry = 0, *VldbentryFirst = 0, *VldbentryLast = 0;
     int pollcount = 0;
+    char rxstr[AFS_RXINFO_LEN];
+
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
 
-    COUNT_REQ(VLLISTATTRIBUTES);
     vldbentries->bulkentries_val = 0;
     vldbentries->bulkentries_len = *nentries = 0;
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
     allocCount = VLDBALLOCCOUNT;
     Vldbentry = VldbentryFirst = vldbentries->bulkentries_val =
-       (vldbentry *) malloc(allocCount * sizeof(vldbentry));
+       malloc(allocCount * sizeof(vldbentry));
     if (Vldbentry == NULL) {
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return VL_NOMEM;
+       code = VL_NOMEM;
+       goto abort;
     }
     VldbentryLast = VldbentryFirst + allocCount;
-    /* Handle the attribute by volume id totally separate of the rest (thus additional Mask values are ignored if VLLIST_VOLUMEID is set!) */
+    /* Handle the attribute by volume id totally separate of the rest
+     * (thus additional Mask values are ignored if VLLIST_VOLUMEID is set!) */
     if (attributes->Mask & VLLIST_VOLUMEID) {
        afs_int32 blockindex;
 
        blockindex =
-           FindByID(trans, attributes->volumeid, -1, &tentry, &errorcode);
+           FindByID(&ctx, attributes->volumeid, -1, &tentry, &code);
        if (blockindex == 0) {
-           if (!errorcode)
-               errorcode = VL_NOENT;
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           if (vldbentries->bulkentries_val)
-               free((char *)vldbentries->bulkentries_val);
-           vldbentries->bulkentries_val = 0;
-           vldbentries->bulkentries_len = 0;
-           return errorcode;
-       }
-       if (errorcode =
-           put_attributeentry(&Vldbentry, &VldbentryFirst, &VldbentryLast,
-                              vldbentries, &tentry, nentries, &allocCount)) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           if (vldbentries->bulkentries_val)
-               free((char *)vldbentries->bulkentries_val);
-           vldbentries->bulkentries_val = 0;
-           vldbentries->bulkentries_len = 0;
-           return VL_SIZEEXCEEDED;
+           if (!code)
+               code = VL_NOENT;
+           goto abort;
        }
+
+       code = put_attributeentry(&ctx, &Vldbentry, &VldbentryFirst,
+                                 &VldbentryLast, vldbentries, &tentry,
+                                 nentries, &allocCount);
+       if (code)
+           goto abort;
     } else {
        afs_int32 nextblockindex = 0, count = 0, k = 0, match = 0;
-       while (nextblockindex =
-              NextEntry(trans, nextblockindex, &tentry, &count)) {
+       while ((nextblockindex =
+              NextEntry(&ctx, nextblockindex, &tentry, &count))) {
            if (++pollcount > 50) {
 #ifndef AFS_PTHREAD_ENV
                IOMGR_Poll();
@@ -1144,8 +1415,7 @@ SVL_ListAttributes(rxcall, attributes, nentries, vldbentries)
            if (attributes->Mask & VLLIST_SERVER) {
                int serverindex;
                if ((serverindex =
-                    IpAddrToRelAddr(attributes->server,
-                                    (struct ubik_trans *)0)) == -1)
+                    IpAddrToRelAddr(&ctx, attributes->server, 0)) == -1)
                    continue;
                for (k = 0; k < OMAXNSERVERS; k++) {
                    if (tentry.serverNumber[k] == BADSERVERID)
@@ -1181,99 +1451,107 @@ SVL_ListAttributes(rxcall, attributes, nentries, vldbentries)
                if (!(tentry.flags & attributes->flag))
                    continue;
            }
-           if (errorcode =
-               put_attributeentry(&Vldbentry, &VldbentryFirst,
-                                  &VldbentryLast, vldbentries, &tentry,
-                                  nentries, &allocCount)) {
-               COUNT_ABO;
-               ubik_AbortTrans(trans);
-               if (vldbentries->bulkentries_val)
-                   free((char *)vldbentries->bulkentries_val);
-               vldbentries->bulkentries_val = 0;
-               vldbentries->bulkentries_len = 0;
-               return errorcode;
-           }
+           code = put_attributeentry(&ctx, &Vldbentry, &VldbentryFirst,
+                                     &VldbentryLast, vldbentries, &tentry,
+                                     nentries, &allocCount);
+           if (code)
+               goto abort;
        }
     }
     if (vldbentries->bulkentries_len
        && (allocCount > vldbentries->bulkentries_len)) {
 
        vldbentries->bulkentries_val =
-           (vldbentry *) realloc(vldbentries->bulkentries_val,
-                                 vldbentries->bulkentries_len *
-                                 sizeof(vldbentry));
+           realloc(vldbentries->bulkentries_val,
+                   vldbentries->bulkentries_len * sizeof(vldbentry));
        if (vldbentries->bulkentries_val == NULL) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           return VL_NOMEM;
+           code = VL_NOMEM;
+           goto abort;
        }
     }
     VLog(5,
         ("ListAttrs nentries=%d %s\n", vldbentries->bulkentries_len,
-         rxinfo(rxcall)));
-    return (ubik_EndTrans(trans));
+         rxinfo(rxstr, rxcall)));
+    return ubik_EndTrans(ctx.trans);
+
+abort:
+    if (vldbentries->bulkentries_val)
+       free(vldbentries->bulkentries_val);
+    vldbentries->bulkentries_val = 0;
+    vldbentries->bulkentries_len = 0;
+
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
 afs_int32
-SVL_ListAttributesN(rxcall, attributes, nentries, vldbentries)
-     struct rx_call *rxcall;
-     struct VldbListByAttributes *attributes;
-     afs_int32 *nentries;
-     nbulkentries *vldbentries;
-{
-    int errorcode, allocCount = 0;
-    struct ubik_trans *trans;
+SVL_ListAttributes(struct rx_call *rxcall,
+                  struct VldbListByAttributes *attributes,
+                  afs_int32 *nentries,
+                  bulkentries *vldbentries)
+{
+    afs_int32 code;
+
+    code = ListAttributes(rxcall, attributes, nentries, vldbentries);
+    osi_auditU(rxcall, VLListAttributesEvent, code, AUD_END);
+    return code;
+}
+
+static afs_int32
+ListAttributesN(struct rx_call *rxcall,
+               struct VldbListByAttributes *attributes,
+               afs_int32 *nentries,
+               nbulkentries *vldbentries)
+{
+    int this_op = VLLISTATTRIBUTESN;
+    int code, allocCount = 0;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
     struct nvldbentry *Vldbentry = 0, *VldbentryFirst = 0, *VldbentryLast = 0;
     int pollcount = 0;
+    char rxstr[AFS_RXINFO_LEN];
+
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
 
-    COUNT_REQ(VLLISTATTRIBUTESN);
     vldbentries->nbulkentries_val = 0;
     vldbentries->nbulkentries_len = *nentries = 0;
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
     allocCount = VLDBALLOCCOUNT;
     Vldbentry = VldbentryFirst = vldbentries->nbulkentries_val =
-       (nvldbentry *) malloc(allocCount * sizeof(nvldbentry));
+       malloc(allocCount * sizeof(nvldbentry));
     if (Vldbentry == NULL) {
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return VL_NOMEM;
+       code = VL_NOMEM;
+       goto abort;
     }
     VldbentryLast = VldbentryFirst + allocCount;
-    /* Handle the attribute by volume id totally separate of the rest (thus additional Mask values are ignored if VLLIST_VOLUMEID is set!) */
+    /* Handle the attribute by volume id totally separate of the rest
+     * (thus additional Mask values are ignored if VLLIST_VOLUMEID is set!) */
     if (attributes->Mask & VLLIST_VOLUMEID) {
        afs_int32 blockindex;
 
        blockindex =
-           FindByID(trans, attributes->volumeid, -1, &tentry, &errorcode);
+           FindByID(&ctx, attributes->volumeid, -1, &tentry, &code);
        if (blockindex == 0) {
-           if (!errorcode)
-               errorcode = VL_NOENT;
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           if (vldbentries->nbulkentries_val)
-               free((char *)vldbentries->nbulkentries_val);
-           vldbentries->nbulkentries_val = 0;
-           vldbentries->nbulkentries_len = 0;
-           return errorcode;
-       }
-       if (errorcode =
-           put_nattributeentry(&Vldbentry, &VldbentryFirst, &VldbentryLast,
-                               vldbentries, &tentry, 0, 0, nentries,
-                               &allocCount)) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           if (vldbentries->nbulkentries_val)
-               free((char *)vldbentries->nbulkentries_val);
-           vldbentries->nbulkentries_val = 0;
-           vldbentries->nbulkentries_len = 0;
-           return VL_SIZEEXCEEDED;
+           if (!code)
+               code = VL_NOENT;
+           goto abort;
        }
+
+       code = put_nattributeentry(&ctx, &Vldbentry, &VldbentryFirst,
+                                  &VldbentryLast, vldbentries, &tentry,
+                                  0, 0, nentries, &allocCount);
+       if (code)
+           goto abort;
     } else {
        afs_int32 nextblockindex = 0, count = 0, k = 0, match = 0;
-       while (nextblockindex =
-              NextEntry(trans, nextblockindex, &tentry, &count)) {
+       while ((nextblockindex =
+              NextEntry(&ctx, nextblockindex, &tentry, &count))) {
            if (++pollcount > 50) {
 #ifndef AFS_PTHREAD_ENV
                IOMGR_Poll();
@@ -1285,8 +1563,7 @@ SVL_ListAttributesN(rxcall, attributes, nentries, vldbentries)
            if (attributes->Mask & VLLIST_SERVER) {
                int serverindex;
                if ((serverindex =
-                    IpAddrToRelAddr(attributes->server,
-                                    (struct ubik_trans *)0)) == -1)
+                    IpAddrToRelAddr(&ctx, attributes->server, 0)) == -1)
                    continue;
                for (k = 0; k < NMAXNSERVERS; k++) {
                    if (tentry.serverNumber[k] == BADSERVERID)
@@ -1322,84 +1599,103 @@ SVL_ListAttributesN(rxcall, attributes, nentries, vldbentries)
                if (!(tentry.flags & attributes->flag))
                    continue;
            }
-           if (errorcode =
-               put_nattributeentry(&Vldbentry, &VldbentryFirst,
-                                   &VldbentryLast, vldbentries, &tentry, 0,
-                                   0, nentries, &allocCount)) {
-               COUNT_ABO;
-               ubik_AbortTrans(trans);
-               if (vldbentries->nbulkentries_val)
-                   free((char *)vldbentries->nbulkentries_val);
-               vldbentries->nbulkentries_val = 0;
-               vldbentries->nbulkentries_len = 0;
-               return errorcode;
-           }
+           code = put_nattributeentry(&ctx, &Vldbentry, &VldbentryFirst,
+                                      &VldbentryLast, vldbentries,
+                                      &tentry, 0, 0, nentries, &allocCount);
+           if (code)
+               goto abort;
        }
     }
     if (vldbentries->nbulkentries_len
        && (allocCount > vldbentries->nbulkentries_len)) {
 
        vldbentries->nbulkentries_val =
-           (nvldbentry *) realloc(vldbentries->nbulkentries_val,
-                                  vldbentries->nbulkentries_len *
-                                  sizeof(nvldbentry));
+           realloc(vldbentries->nbulkentries_val,
+                   vldbentries->nbulkentries_len * sizeof(nvldbentry));
        if (vldbentries->nbulkentries_val == NULL) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           return VL_NOMEM;
+           code = VL_NOMEM;
+           goto abort;
        }
     }
     VLog(5,
         ("NListAttrs nentries=%d %s\n", vldbentries->nbulkentries_len,
-         rxinfo(rxcall)));
-    return (ubik_EndTrans(trans));
+         rxinfo(rxstr, rxcall)));
+    return ubik_EndTrans(ctx.trans);
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    if (vldbentries->nbulkentries_val)
+       free(vldbentries->nbulkentries_val);
+    vldbentries->nbulkentries_val = 0;
+    vldbentries->nbulkentries_len = 0;
+    return code;
 }
 
-
 afs_int32
-SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
-                    vldbentries, nextstartindex)
-     struct rx_call *rxcall;
-     struct VldbListByAttributes *attributes;
-     char *name;               /* Wildcarded volume name */
-     afs_int32 startindex;
-     afs_int32 *nentries;
-     nbulkentries *vldbentries;
-     afs_int32 *nextstartindex;
-{
-    int errorcode = 0, maxCount = VLDBALLOCCOUNT;
-    struct ubik_trans *trans;
+SVL_ListAttributesN(struct rx_call *rxcall,
+                   struct VldbListByAttributes *attributes,
+                   afs_int32 *nentries,
+                   nbulkentries *vldbentries)
+{
+    afs_int32 code;
+
+    code = ListAttributesN(rxcall, attributes, nentries, vldbentries);
+    osi_auditU(rxcall, VLListAttributesNEvent, code, AUD_END);
+    return code;
+}
+
+static afs_int32
+ListAttributesN2(struct rx_call *rxcall,
+                struct VldbListByAttributes *attributes,
+                char *name,            /* Wildcarded volume name */
+                afs_int32 startindex,
+                afs_int32 *nentries,
+                nbulkentries *vldbentries,
+                afs_int32 *nextstartindex)
+{
+    int this_op = VLLISTATTRIBUTESN2;
+    int code = 0, maxCount = VLDBALLOCCOUNT;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
     struct nvldbentry *Vldbentry = 0, *VldbentryFirst = 0, *VldbentryLast = 0;
     afs_int32 blockindex = 0, count = 0, k, match;
     afs_int32 matchindex = 0;
     int serverindex = -1;      /* no server found */
     int findserver = 0, findpartition = 0, findflag = 0, findname = 0;
-    char *t;
     int pollcount = 0;
     int namematchRWBK, namematchRO, thismatch;
     int matchtype = 0;
-    char volumename[VL_MAXNAMELEN];
+    int size;
+    char volumename[VL_MAXNAMELEN+3]; /* regex anchors */
+    char rxstr[AFS_RXINFO_LEN];
 #ifdef HAVE_POSIX_REGEX
     regex_t re;
     int need_regfree = 0;
+#else
+    char *t;
 #endif
 
-    COUNT_REQ(VLLISTATTRIBUTESN2);
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
+
     vldbentries->nbulkentries_val = 0;
     vldbentries->nbulkentries_len = 0;
     *nentries = 0;
     *nextstartindex = -1;
 
-    errorcode = Init_VLdbase(&trans, LOCKREAD, this_op);
-    if (errorcode)
-       return errorcode;
+    code = Init_VLdbase(&ctx, LOCKREAD, this_op);
+    if (code)
+       return code;
 
     Vldbentry = VldbentryFirst = vldbentries->nbulkentries_val =
-       (nvldbentry *) malloc(maxCount * sizeof(nvldbentry));
+       malloc(maxCount * sizeof(nvldbentry));
     if (Vldbentry == NULL) {
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
+       countAbort(this_op);
+       ubik_AbortTrans(ctx.trans);
        return VL_NOMEM;
     }
 
@@ -1410,16 +1706,16 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
      */
     if (attributes->Mask & VLLIST_VOLUMEID) {
        blockindex =
-           FindByID(trans, attributes->volumeid, -1, &tentry, &errorcode);
+           FindByID(&ctx, attributes->volumeid, -1, &tentry, &code);
        if (blockindex == 0) {
-           if (!errorcode)
-               errorcode = VL_NOENT;
+           if (!code)
+               code = VL_NOENT;
        } else {
-           errorcode =
-               put_nattributeentry(&Vldbentry, &VldbentryFirst,
+           code =
+               put_nattributeentry(&ctx, &Vldbentry, &VldbentryFirst,
                                    &VldbentryLast, vldbentries, &tentry, 0,
                                    0, nentries, &maxCount);
-           if (errorcode)
+           if (code)
                goto done;
        }
     }
@@ -1432,7 +1728,7 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
        /* Get the server index for matching server address */
        if (attributes->Mask & VLLIST_SERVER) {
            serverindex =
-               IpAddrToRelAddr(attributes->server, (struct ubik_trans *)0);
+               IpAddrToRelAddr(&ctx, attributes->server, 0);
            if (serverindex == -1)
                goto done;
            findserver = 1;
@@ -1440,17 +1736,25 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
        findpartition = ((attributes->Mask & VLLIST_PARTITION) ? 1 : 0);
        findflag = ((attributes->Mask & VLLIST_FLAG) ? 1 : 0);
        if (name && (strcmp(name, ".*") != 0) && (strcmp(name, "") != 0)) {
-           sprintf(volumename, "^%s$", name);
+           if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL)) {
+               code = VL_PERM;
+               goto done;
+           }
+           size = snprintf(volumename, sizeof(volumename), "^%s$", name);
+           if (size < 0 || size >= sizeof(volumename)) {
+               code = VL_BADNAME;
+               goto done;
+           }
 #ifdef HAVE_POSIX_REGEX
            if (regcomp(&re, volumename, REG_NOSUB) != 0) {
-               errorcode = VL_BADNAME;
+               code = VL_BADNAME;
                goto done;
            }
            need_regfree = 1;
 #else
            t = (char *)re_comp(volumename);
            if (t) {
-               errorcode = VL_BADNAME;
+               code = VL_BADNAME;
                goto done;
            }
 #endif
@@ -1459,7 +1763,7 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
 
        /* Read each entry and see if it is the one we want */
        blockindex = startindex;
-       while (blockindex = NextEntry(trans, blockindex, &tentry, &count)) {
+       while ((blockindex = NextEntry(&ctx, blockindex, &tentry, &count))) {
            if (++pollcount > 50) {
 #ifndef AFS_PTHREAD_ENV
                IOMGR_Poll();
@@ -1485,7 +1789,12 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
                    /* Does the name match the RW name */
                    if (tentry.flags & VLF_RWEXISTS) {
                        if (findname) {
-                           sprintf(volumename, "%s", tentry.name);
+                           size = snprintf(volumename, sizeof(volumename),
+                                           "%s", tentry.name);
+                           if (size < 0 || size >= sizeof(volumename)) {
+                               code = VL_BADNAME;
+                               goto done;
+                           }
 #ifdef HAVE_POSIX_REGEX
                            if (regexec(&re, volumename, 0, NULL, 0) == 0) {
                                thismatch = VLSF_RWVOL;
@@ -1503,7 +1812,13 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
                    /* Does the name match the BK name */
                    if (!thismatch && (tentry.flags & VLF_BACKEXISTS)) {
                        if (findname) {
-                           sprintf(volumename, "%s.backup", tentry.name);
+                           /* If this fails, the tentry.name is invalid */
+                           size = snprintf(volumename, sizeof(volumename),
+                                           "%s.backup", tentry.name);
+                           if (size < 0 || size >= sizeof(volumename)) {
+                               code = VL_BADNAME;
+                               goto done;
+                           }
 #ifdef HAVE_POSIX_REGEX
                            if (regexec(&re, volumename, 0, NULL, 0) == 0) {
                                thismatch = VLSF_BACKVOL;
@@ -1521,7 +1836,7 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
                    namematchRWBK = (thismatch ? 1 : 2);
                }
 
-               /* Match with the RO volume name. Compare once and 
+               /* Match with the RO volume name. Compare once and
                 * remember results in namematchRO. Note that this will
                 * pick up entries marked NEWREPSITEs and DONTUSE.
                 */
@@ -1532,8 +1847,13 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
                                thismatch =
                                    ((namematchRO == 1) ? VLSF_ROVOL : 0);
                            } else {
-                               sprintf(volumename, "%s.readonly",
-                                       tentry.name);
+                               /* If this fails, the tentry.name is invalid */
+                               size = snprintf(volumename, sizeof(volumename),
+                                               "%s.readonly", tentry.name);
+                               if (size < 0 || size >= sizeof(volumename)) {
+                                   code = VL_BADNAME;
+                                   goto done;
+                               }
 #ifdef HAVE_POSIX_REGEX
                            if (regexec(&re, volumename, 0, NULL, 0) == 0) {
                                thismatch = VLSF_ROVOL;
@@ -1586,12 +1906,12 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
 
            /* Passed all the tests. Take it */
            if (match) {
-               errorcode =
-                   put_nattributeentry(&Vldbentry, &VldbentryFirst,
+               code =
+                   put_nattributeentry(&ctx, &Vldbentry, &VldbentryFirst,
                                        &VldbentryLast, vldbentries, &tentry,
                                        matchtype, matchindex, nentries,
                                        &maxCount);
-               if (errorcode)
+               if (code)
                    goto done;
 
                if (*nentries >= maxCount)
@@ -1607,23 +1927,40 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
        regfree(&re);
 #endif
 
-    if (errorcode) {
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
+    if (code) {
+       countAbort(this_op);
+       ubik_AbortTrans(ctx.trans);
        if (vldbentries->nbulkentries_val)
-           free((char *)vldbentries->nbulkentries_val);
+           free(vldbentries->nbulkentries_val);
        vldbentries->nbulkentries_val = 0;
        vldbentries->nbulkentries_len = 0;
        *nextstartindex = -1;
-       return errorcode;
     } else {
        VLog(5,
             ("N2ListAttrs nentries=%d %s\n", vldbentries->nbulkentries_len,
-             rxinfo(rxcall)));
-       return (ubik_EndTrans(trans));
+             rxinfo(rxstr, rxcall)));
+       code = ubik_EndTrans(ctx.trans);
     }
+
+    return code;
 }
 
+afs_int32
+SVL_ListAttributesN2(struct rx_call *rxcall,
+                    struct VldbListByAttributes *attributes,
+                    char *name,                /* Wildcarded volume name */
+                    afs_int32 startindex,
+                    afs_int32 *nentries,
+                    nbulkentries *vldbentries,
+                    afs_int32 *nextstartindex)
+{
+    afs_int32 code;
+
+    code = ListAttributesN2(rxcall, attributes, name, startindex,
+                           nentries, vldbentries, nextstartindex);
+    osi_auditU(rxcall, VLListAttributesN2Event, code, AUD_END);
+    return code;
+}
 
 /* Retrieves in vldbentries all vldb entries that match the specified
  * attributes (by server number, partition, volume type, and flag); if
@@ -1631,15 +1968,15 @@ SVL_ListAttributesN2(rxcall, attributes, name, startindex, nentries,
  * returned. CAUTION: This could be a very expensive call since in most
  * cases sequential search of all vldb entries is performed.
  */
-afs_int32
-SVL_LinkedList(rxcall, attributes, nentries, vldbentries)
-     struct rx_call *rxcall;
-     struct VldbListByAttributes *attributes;
-     afs_int32 *nentries;
-     vldb_list *vldbentries;
-{
-    int errorcode;
-    struct ubik_trans *trans;
+static afs_int32
+LinkedList(struct rx_call *rxcall,
+          struct VldbListByAttributes *attributes,
+          afs_int32 *nentries,
+          vldb_list *vldbentries)
+{
+    int this_op = VLLINKEDLIST;
+    int code;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
     vldblist vllist, *vllistptr;
     afs_int32 blockindex, count, match;
@@ -1647,9 +1984,14 @@ SVL_LinkedList(rxcall, attributes, nentries, vldbentries)
     int serverindex;
     int pollcount = 0;
 
-    COUNT_REQ(VLLINKEDLIST);
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
+
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
 
     *nentries = 0;
     vldbentries->node = NULL;
@@ -1658,20 +2000,22 @@ SVL_LinkedList(rxcall, attributes, nentries, vldbentries)
     /* List by volumeid */
     if (attributes->Mask & VLLIST_VOLUMEID) {
        blockindex =
-           FindByID(trans, attributes->volumeid, -1, &tentry, &errorcode);
+           FindByID(&ctx, attributes->volumeid, -1, &tentry, &code);
        if (!blockindex) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           return (errorcode ? errorcode : VL_NOENT);
+           if (!code)
+               code = VL_NOENT;
+           goto abort;
        }
 
-       vllist = (single_vldbentry *) malloc(sizeof(single_vldbentry));
+       vllist = malloc(sizeof(single_vldbentry));
        if (vllist == NULL) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           return VL_NOMEM;
+           code = VL_NOMEM;
+           goto abort;
        }
-       vlentry_to_vldbentry(&tentry, &vllist->VldbEntry);
+       code = vlentry_to_vldbentry(&ctx, &tentry, &vllist->VldbEntry);
+       if (code)
+           goto abort;
+
        vllist->next_vldb = NULL;
 
        *vllistptr = vllist;    /* Thread onto list */
@@ -1681,8 +2025,8 @@ SVL_LinkedList(rxcall, attributes, nentries, vldbentries)
 
     /* Search by server, partition, and flags */
     else {
-       for (blockindex = NextEntry(trans, 0, &tentry, &count); blockindex;
-            blockindex = NextEntry(trans, blockindex, &tentry, &count)) {
+       for (blockindex = NextEntry(&ctx, 0, &tentry, &count); blockindex;
+            blockindex = NextEntry(&ctx, blockindex, &tentry, &count)) {
            match = 0;
 
            if (++pollcount > 50) {
@@ -1695,8 +2039,7 @@ SVL_LinkedList(rxcall, attributes, nentries, vldbentries)
            /* Does this volume exist on the desired server */
            if (attributes->Mask & VLLIST_SERVER) {
                serverindex =
-                   IpAddrToRelAddr(attributes->server,
-                                   (struct ubik_trans *)0);
+                   IpAddrToRelAddr(&ctx, attributes->server, 0);
                if (serverindex == -1)
                    continue;
                for (k = 0; k < OMAXNSERVERS; k++) {
@@ -1737,38 +2080,57 @@ SVL_LinkedList(rxcall, attributes, nentries, vldbentries)
                    continue;
            }
 
-           vllist = (single_vldbentry *) malloc(sizeof(single_vldbentry));
+           vllist = malloc(sizeof(single_vldbentry));
            if (vllist == NULL) {
-               COUNT_ABO;
-               ubik_AbortTrans(trans);
-               return VL_NOMEM;
+               code = VL_NOMEM;
+               goto abort;
            }
-           vlentry_to_vldbentry(&tentry, &vllist->VldbEntry);
+           code = vlentry_to_vldbentry(&ctx, &tentry, &vllist->VldbEntry);
+           if (code)
+               goto abort;
+
            vllist->next_vldb = NULL;
 
            *vllistptr = vllist;        /* Thread onto list */
            vllistptr = &vllist->next_vldb;
            (*nentries)++;
            if (smallMem && (*nentries >= VLDBALLOCCOUNT)) {
-               COUNT_ABO;
-               ubik_AbortTrans(trans);
-               return VL_SIZEEXCEEDED;
+               code = VL_SIZEEXCEEDED;
+               goto abort;
            }
        }
     }
     *vllistptr = NULL;
-    return (ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
 afs_int32
-SVL_LinkedListN(rxcall, attributes, nentries, vldbentries)
-     struct rx_call *rxcall;
-     struct VldbListByAttributes *attributes;
-     afs_int32 *nentries;
-     nvldb_list *vldbentries;
-{
-    int errorcode;
-    struct ubik_trans *trans;
+SVL_LinkedList(struct rx_call *rxcall,
+              struct VldbListByAttributes *attributes,
+              afs_int32 *nentries,
+              vldb_list *vldbentries)
+{
+    afs_int32 code;
+
+    code = LinkedList(rxcall, attributes, nentries, vldbentries);
+    osi_auditU(rxcall, VLLinkedListEvent, code, AUD_END);
+    return code;
+}
+
+static afs_int32
+LinkedListN(struct rx_call *rxcall,
+           struct VldbListByAttributes *attributes,
+           afs_int32 *nentries,
+           nvldb_list *vldbentries)
+{
+    int this_op = VLLINKEDLISTN;
+    int code;
+    struct vl_ctx ctx;
     struct nvlentry tentry;
     nvldblist vllist, *vllistptr;
     afs_int32 blockindex, count, match;
@@ -1776,9 +2138,14 @@ SVL_LinkedListN(rxcall, attributes, nentries, vldbentries)
     int serverindex;
     int pollcount = 0;
 
-    COUNT_REQ(VLLINKEDLISTN);
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
+       return VL_PERM;
+
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
 
     *nentries = 0;
     vldbentries->node = NULL;
@@ -1787,20 +2154,22 @@ SVL_LinkedListN(rxcall, attributes, nentries, vldbentries)
     /* List by volumeid */
     if (attributes->Mask & VLLIST_VOLUMEID) {
        blockindex =
-           FindByID(trans, attributes->volumeid, -1, &tentry, &errorcode);
+           FindByID(&ctx, attributes->volumeid, -1, &tentry, &code);
        if (!blockindex) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           return (errorcode ? errorcode : VL_NOENT);
+           if (!code)
+               code = VL_NOENT;
+           goto abort;
        }
 
-       vllist = (single_nvldbentry *) malloc(sizeof(single_nvldbentry));
+       vllist = malloc(sizeof(single_nvldbentry));
        if (vllist == NULL) {
-           COUNT_ABO;
-           ubik_AbortTrans(trans);
-           return VL_NOMEM;
+           code = VL_NOMEM;
+           goto abort;
        }
-       vlentry_to_nvldbentry(&tentry, &vllist->VldbEntry);
+       code = vlentry_to_nvldbentry(&ctx, &tentry, &vllist->VldbEntry);
+       if (code)
+           goto abort;
+
        vllist->next_vldb = NULL;
 
        *vllistptr = vllist;    /* Thread onto list */
@@ -1810,8 +2179,8 @@ SVL_LinkedListN(rxcall, attributes, nentries, vldbentries)
 
     /* Search by server, partition, and flags */
     else {
-       for (blockindex = NextEntry(trans, 0, &tentry, &count); blockindex;
-            blockindex = NextEntry(trans, blockindex, &tentry, &count)) {
+       for (blockindex = NextEntry(&ctx, 0, &tentry, &count); blockindex;
+            blockindex = NextEntry(&ctx, blockindex, &tentry, &count)) {
            match = 0;
 
            if (++pollcount > 50) {
@@ -1824,8 +2193,7 @@ SVL_LinkedListN(rxcall, attributes, nentries, vldbentries)
            /* Does this volume exist on the desired server */
            if (attributes->Mask & VLLIST_SERVER) {
                serverindex =
-                   IpAddrToRelAddr(attributes->server,
-                                   (struct ubik_trans *)0);
+                   IpAddrToRelAddr(&ctx, attributes->server, 0);
                if (serverindex == -1)
                    continue;
                for (k = 0; k < NMAXNSERVERS; k++) {
@@ -1866,52 +2234,87 @@ SVL_LinkedListN(rxcall, attributes, nentries, vldbentries)
                    continue;
            }
 
-           vllist = (single_nvldbentry *) malloc(sizeof(single_nvldbentry));
+           vllist = malloc(sizeof(single_nvldbentry));
            if (vllist == NULL) {
-               COUNT_ABO;
-               ubik_AbortTrans(trans);
-               return VL_NOMEM;
+               code = VL_NOMEM;
+               goto abort;
            }
-           vlentry_to_nvldbentry(&tentry, &vllist->VldbEntry);
+           code = vlentry_to_nvldbentry(&ctx, &tentry, &vllist->VldbEntry);
+           if (code)
+               goto abort;
+
            vllist->next_vldb = NULL;
 
            *vllistptr = vllist;        /* Thread onto list */
            vllistptr = &vllist->next_vldb;
            (*nentries)++;
            if (smallMem && (*nentries >= VLDBALLOCCOUNT)) {
-               COUNT_ABO;
-               ubik_AbortTrans(trans);
-               return VL_SIZEEXCEEDED;
+               code = VL_SIZEEXCEEDED;
+               goto abort;
            }
        }
     }
     *vllistptr = NULL;
-    return (ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
-/* Get back vldb header statistics (allocs, frees, maxvolumeid, totalentries, etc) and dynamic statistics (number of requests and/or aborts per remote procedure call, etc) */
 afs_int32
-SVL_GetStats(rxcall, stats, vital_header)
-     struct rx_call *rxcall;
-     vldstats *stats;
-     vital_vlheader *vital_header;
-{
-    register afs_int32 errorcode;
-    struct ubik_trans *trans;
-
-    COUNT_REQ(VLGETSTATS);
-#ifdef notdef
-    /* Allow users to get statistics freely */
-    if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))        /* Must be in 'UserList' to use */
+SVL_LinkedListN(struct rx_call *rxcall,
+               struct VldbListByAttributes *attributes,
+               afs_int32 *nentries,
+               nvldb_list *vldbentries)
+{
+    afs_int32 code;
+
+    code = LinkedListN(rxcall, attributes, nentries, vldbentries);
+    osi_auditU(rxcall, VLLinkedListNEvent, code, AUD_END);
+    return code;
+}
+
+/* Get back vldb header statistics (allocs, frees, maxvolumeid,
+ * totalentries, etc) and dynamic statistics (number of requests and/or
+ * aborts per remote procedure call, etc)
+ */
+static afs_int32
+GetStats(struct rx_call *rxcall,
+        vldstats *stats,
+        vital_vlheader *vital_header)
+{
+    int this_op = VLGETSTATS;
+    afs_int32 code;
+    struct vl_ctx ctx;
+    char rxstr[AFS_RXINFO_LEN];
+
+    countRequest(this_op);
+
+    if (!afsconf_CheckRestrictedQuery(vldb_confdir, rxcall,
+                                     restrictedQueryLevel))
        return VL_PERM;
-#endif
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
-    VLog(5, ("GetStats %s\n", rxinfo(rxcall)));
-    memcpy((char *)vital_header, (char *)&cheader.vital_header,
+
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
+    VLog(5, ("GetStats %s\n", rxinfo(rxstr, rxcall)));
+    memcpy((char *)vital_header, (char *)&ctx.cheader->vital_header,
           sizeof(vital_vlheader));
     memcpy((char *)stats, (char *)&dynamic_statistics, sizeof(vldstats));
-    return (ubik_EndTrans(trans));
+    return ubik_EndTrans(ctx.trans);
+}
+
+afs_int32
+SVL_GetStats(struct rx_call *rxcall,
+            vldstats *stats,
+            vital_vlheader *vital_header)
+{
+    afs_int32 code;
+
+    code = GetStats(rxcall, stats, vital_header);
+    osi_auditU(rxcall, VLGetStatsEvent, code, AUD_END);
+    return code;
 }
 
 /* Get the list of file server addresses from the VLDB.  Currently it's pretty
@@ -1919,74 +2322,87 @@ SVL_GetStats(rxcall, stats, vital_header)
  * through the VLDB, but that's life.
  */
 afs_int32
-SVL_GetAddrs(rxcall, Handle, spare2, spare3, nentries, addrsp)
-     struct rx_call *rxcall;
-     afs_int32 Handle, spare2;
-     struct VLCallBack *spare3;
-     afs_int32 *nentries;
-     bulkaddrs *addrsp;
-{
-    register afs_int32 errorcode;
-    struct ubik_trans *trans;
+SVL_GetAddrs(struct rx_call *rxcall,
+            afs_int32 Handle,
+            afs_int32 spare2,
+            struct VLCallBack *spare3,
+            afs_int32 *nentries,
+            bulkaddrs *addrsp)
+{
+    int this_op = VLGETADDRS;
+    afs_int32 code;
+    struct vl_ctx ctx;
     int nservers, i;
     afs_uint32 *taddrp;
 
-    COUNT_REQ(VLGETADDRS);
+    countRequest(this_op);
     addrsp->bulkaddrs_len = *nentries = 0;
     addrsp->bulkaddrs_val = 0;
     memset(spare3, 0, sizeof(struct VLCallBack));
 
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
 
     VLog(5, ("GetAddrs\n"));
     addrsp->bulkaddrs_val = taddrp =
-       (afs_uint32 *) malloc(sizeof(afs_int32) * (MAXSERVERID + 1));
+       malloc(sizeof(afs_uint32) * (MAXSERVERID + 1));
     nservers = *nentries = addrsp->bulkaddrs_len = 0;
 
     if (!taddrp) {
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return VL_NOMEM;
+       code = VL_NOMEM;
+       goto abort;
     }
 
     for (i = 0; i <= MAXSERVERID; i++) {
-       if (*taddrp = ntohl(cheader.IpMappedAddr[i])) {
+       if ((*taddrp = ntohl(ctx.cheader->IpMappedAddr[i]))) {
            taddrp++;
            nservers++;
        }
     }
 
     addrsp->bulkaddrs_len = *nentries = nservers;
-    return (ubik_EndTrans(trans));
+    return (ubik_EndTrans(ctx.trans));
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
-#define PADDR(addr) VLog(0,("%d.%d.%d.%d", (addr>>24)&0xff, (addr>>16)&0xff, (addr>>8) &0xff, addr&0xff));
+static_inline void
+append_addr(char *buffer, afs_uint32 addr, size_t buffer_size)
+{
+    int n = strlen(buffer);
+    if (buffer_size > n) {
+       snprintf(buffer + n, buffer_size - n, "%u.%u.%u.%u",
+                (addr >> 24) & 0xff, (addr >> 16) & 0xff, (addr >> 8) & 0xff,
+                addr & 0xff);
+    }
+}
 
 afs_int32
-SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
-     struct rx_call *rxcall;
-     afsUUID *uuidp;
-     afs_int32 spare1;
-     bulkaddrs *addrsp;
+SVL_RegisterAddrs(struct rx_call *rxcall, afsUUID *uuidp, afs_int32 spare1,
+                 bulkaddrs *addrsp)
 {
+    int this_op = VLREGADDR;
     afs_int32 code;
-    struct ubik_trans *trans;
-    int cnt, h, i, j, k, m, base, index;
+    struct vl_ctx ctx;
+    int cnt, h, i, j, k, m;
     struct extentaddr *exp = 0, *tex;
+    char addrbuf[256];
     afsUUID tuuid;
     afs_uint32 addrs[VL_MAXIPADDRS_PERMH];
-    afs_int32 fbase;
+    int base;
     int count, willChangeEntry, foundUuidEntry, willReplaceCnt;
     int WillReplaceEntry, WillChange[MAXSERVERID + 1];
     int FoundUuid = 0;
     int ReplaceEntry = 0;
     int srvidx, mhidx;
 
-    COUNT_REQ(VLREGADDR);
+    countRequest(this_op);
     if (!afsconf_SuperUser(vldb_confdir, rxcall, NULL))
        return (VL_PERM);
-    if (code = Init_VLdbase(&trans, LOCKWRITE, this_op))
+    if ((code = Init_VLdbase(&ctx, LOCKWRITE, this_op)))
        return code;
 
     /* Eliminate duplicates from IP address list */
@@ -2009,8 +2425,8 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        }
     }
     if (cnt <= 0) {
-       ubik_AbortTrans(trans);
-       return VL_INDEXERANGE;
+       code = VL_INDEXERANGE;
+       goto abort;
     }
 
     count = 0;
@@ -2020,31 +2436,12 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
     for (srvidx = 0; srvidx <= MAXSERVERID; srvidx++) {
        willChangeEntry = 0;
        WillReplaceEntry = 1;
-       if ((HostAddress[srvidx] & 0xff000000) == 0xff000000) {
-           /* The server is registered as a multihomed */
-           base = (HostAddress[srvidx] >> 16) & 0xff;
-           index = HostAddress[srvidx] & 0x0000ffff;
-           if (base >= VL_MAX_ADDREXTBLKS) {
-               VLog(0,
-                    ("Internal error: Multihome extent base is too large. Base %d index %d\n",
-                     base, index));
-               continue;
-           }
-           if (index >= VL_MHSRV_PERBLK) {
-               VLog(0,
-                    ("Internal error: Multihome extent index is too large. Base %d index %d\n",
-                     base, index));
-               continue;
-           }
-           if (!ex_addr[base]) {
-               VLog(0,
-                    ("Internal error: Multihome extent does not exist. Base %d\n",
-                     base));
-               continue;
-           }
+       code = multiHomedExtent(&ctx, srvidx, &exp);
+       if (code)
+            continue;
 
+       if (exp) {
            /* See if the addresses to register will change this server entry */
-           exp = &ex_addr[base][index];
            tuuid = exp->ex_hostuuid;
            afs_ntohuuid(&tuuid);
            if (afs_uuid_equal(uuidp, &tuuid)) {
@@ -2070,7 +2467,7 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
             * See if the addresses to register will replace this server entry.
             */
            for (k = 0; k < cnt; k++) {
-               if (HostAddress[srvidx] == addrs[k]) {
+               if (ctx.hostaddress[srvidx] == addrs[k]) {
                    willChangeEntry = 1;
                    WillChange[count] = srvidx;
                    WillReplaceEntry = 1;
@@ -2097,29 +2494,27 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        || (!foundUuidEntry && (count > 1))) {
        VLog(0,
             ("The following fileserver is being registered in the VLDB:\n"));
-       VLog(0, ("      ["));
-       for (k = 0; k < cnt; k++) {
+       for (addrbuf[0] = '\0', k = 0; k < cnt; k++) {
            if (k > 0)
-               VLog(0,(" "));
-           PADDR(addrs[k]);
+               strlcat(addrbuf, " ", sizeof(addrbuf));
+           append_addr(addrbuf, addrs[k], sizeof(addrbuf));
        }
-       VLog(0,("]\n"));
+       VLog(0, ("      [%s]\n", addrbuf));
 
        if (foundUuidEntry) {
-           VLog(0,
-                ("   It would have replaced the existing VLDB server entry:\n"));
-           VLog(0, ("      entry %d: [", FoundUuid));
-           base = (HostAddress[FoundUuid] >> 16) & 0xff;
-           index = HostAddress[FoundUuid] & 0x0000ffff;
-           exp = &ex_addr[base][index];
-           for (mhidx = 0; mhidx < VL_MAXIPADDRS_PERMH; mhidx++) {
-               if (!exp->ex_addrs[mhidx])
-                   continue;
-               if (mhidx > 0)
-                   VLog(0,(" "));
-               PADDR(ntohl(exp->ex_addrs[mhidx]));
+           code = multiHomedExtent(&ctx, FoundUuid, &exp);
+           if (code == 0) {
+               VLog(0, ("   It would have replaced the existing VLDB server "
+                        "entry:\n"));
+               for (addrbuf[0] = '\0', mhidx = 0; mhidx < VL_MAXIPADDRS_PERMH; mhidx++) {
+                   if (!exp->ex_addrs[mhidx])
+                       continue;
+                   if (mhidx > 0)
+                       strlcat(addrbuf, " ", sizeof(addrbuf));
+                   append_addr(addrbuf, ntohl(exp->ex_addrs[mhidx]), sizeof(addrbuf));
+               }
+               VLog(0, ("      entry %d: [%s]\n", FoundUuid, addrbuf));
            }
-           VLog(0, ("]\n"));
        }
 
        if (count == 1)
@@ -2129,37 +2524,38 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        for (j = 0; j < count; j++) {
            srvidx = WillChange[j];
            VLog(0, ("      entry %d: ", srvidx));
-           if ((HostAddress[srvidx] & 0xff000000) == 0xff000000) {
-               VLog(0, ("["));
-               base = (HostAddress[srvidx] >> 16) & 0xff;
-               index = HostAddress[srvidx] & 0x0000ffff;
-               exp = &ex_addr[base][index];
+
+           code = multiHomedExtent(&ctx, srvidx, &exp);
+           if (code)
+               goto abort;
+
+           addrbuf[0] = '\0';
+           if (exp) {
                for (mhidx = 0; mhidx < VL_MAXIPADDRS_PERMH; mhidx++) {
                    if (!exp->ex_addrs[mhidx])
                        continue;
                    if (mhidx > 0)
-                       VLog(0, (" "));
-                   PADDR(ntohl(exp->ex_addrs[mhidx]));
+                       strlcat(addrbuf, " ", sizeof(addrbuf));
+                   append_addr(addrbuf, ntohl(exp->ex_addrs[mhidx]), sizeof(addrbuf));
                }
-               VLog(0, ("]"));
            } else {
-               PADDR(HostAddress[srvidx]);
+               append_addr(addrbuf, ctx.hostaddress[srvidx], sizeof(addrbuf));
            }
-           VLog(0, ("\n"));
+           VLog(0, ("      entry %d: [%s]\n", srvidx, addrbuf));
        }
 
        if (count == 1)
            VLog(0, ("   You must 'vos changeaddr' this other server entry\n"));
        else
-           VLog(0, 
+           VLog(0,
                ("   You must 'vos changeaddr' these other server entries\n"));
        if (foundUuidEntry)
-           VLog(0, 
+           VLog(0,
                ("   and/or remove the sysid file from the registering fileserver\n"));
        VLog(0, ("   before the fileserver can be registered in the VLDB.\n"));
 
-       ubik_AbortTrans(trans);
-       return VL_MULTIPADDR;
+       code = VL_MULTIPADDR;
+       goto abort;
     }
 
     /* Passed the checks. Now find and update the existing mh entry, or create
@@ -2169,9 +2565,9 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        /* Found the entry with same uuid. See if we need to change it */
        int change = 0;
 
-       fbase = (HostAddress[FoundUuid] >> 16) & 0xff;
-       index = HostAddress[FoundUuid] & 0x0000ffff;
-       exp = &ex_addr[fbase][index];
+       code = multiHomedExtentBase(&ctx, FoundUuid, &exp, &base);
+       if (code)
+           goto abort;
 
        /* Determine if the entry has changed */
        for (k = 0; ((k < cnt) && !change); k++) {
@@ -2183,31 +2579,29 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
                change = 1;
        }
        if (!change) {
-           return (ubik_EndTrans(trans));
+           return (ubik_EndTrans(ctx.trans));
        }
     }
 
     VLog(0, ("The following fileserver is being registered in the VLDB:\n"));
-    VLog(0, ("      ["));
-    for (k = 0; k < cnt; k++) {
+    for (addrbuf[0] = '\0', k = 0; k < cnt; k++) {
        if (k > 0)
-           VLog(0, (" "));
-       PADDR(addrs[k]);
+           strlcat(addrbuf, " ", sizeof(addrbuf));
+       append_addr(addrbuf, addrs[k], sizeof(addrbuf));
     }
-    VLog(0, ("]\n"));
+    VLog(0, ("      [%s]\n", addrbuf));
 
     if (foundUuidEntry) {
-       VLog(0, 
+       VLog(0,
            ("   It will replace the following existing entry in the VLDB (same uuid):\n"));
-       VLog(0, ("      entry %d: [", FoundUuid));
-       for (k = 0; k < VL_MAXIPADDRS_PERMH; k++) {
+       for (addrbuf[0] = '\0', k = 0; k < VL_MAXIPADDRS_PERMH; k++) {
            if (exp->ex_addrs[k] == 0)
                continue;
            if (k > 0)
-               VLog(0, (" "));
-           PADDR(ntohl(exp->ex_addrs[k]));
+               strlcat(addrbuf, " ", sizeof(addrbuf));
+           append_addr(addrbuf, ntohl(exp->ex_addrs[k]), sizeof(addrbuf));
        }
-       VLog(0, ("]\n"));
+       VLog(0, ("      entry %d: [%s]\n", FoundUuid, addrbuf));
     } else if (willReplaceCnt || (count == 1)) {
        /* If we are not replacing an entry and there is only one entry to change,
         * then we will replace that entry.
@@ -2218,46 +2612,47 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        }
 
        /* Have an entry that needs to be replaced */
-       if ((HostAddress[ReplaceEntry] & 0xff000000) == 0xff000000) {
-           fbase = (HostAddress[ReplaceEntry] >> 16) & 0xff;
-           index = HostAddress[ReplaceEntry] & 0x0000ffff;
-           exp = &ex_addr[fbase][index];
+       code = multiHomedExtentBase(&ctx, ReplaceEntry, &exp, &base);
+       if (code)
+           goto abort;
 
-           VLog(0, 
+       if (exp) {
+           VLog(0,
                ("   It will replace the following existing entry in the VLDB (new uuid):\n"));
-           VLog(0, ("      entry %d: [", ReplaceEntry));
-           for (k = 0; k < VL_MAXIPADDRS_PERMH; k++) {
+           for (addrbuf[0] = '\0', k = 0; k < VL_MAXIPADDRS_PERMH; k++) {
                if (exp->ex_addrs[k] == 0)
                    continue;
                if (k > 0)
-                   VLog(0, (" "));
-               PADDR(ntohl(exp->ex_addrs[k]));
+                   strlcat(addrbuf, " ", sizeof(addrbuf));
+               append_addr(addrbuf, ntohl(exp->ex_addrs[k]), sizeof(addrbuf));
            }
-           VLog(0, ("]\n"));
+           VLog(0, ("      entry %d: [%s]\n", ReplaceEntry, addrbuf));
        } else {
-           /* Not a mh entry. So we have to create a new mh entry and 
-            * put it on the ReplaceEntry slot of the HostAddress array.
+           /* Not a mh entry. So we have to create a new mh entry and
+            * put it on the ReplaceEntry slot of the ctx.hostaddress array.
             */
-           VLog(0, ("   It will replace existing entry %d, ", ReplaceEntry));
-           PADDR(HostAddress[ReplaceEntry]);
-           VLog(0,(", in the VLDB (new uuid):\n"));
-
+           addrbuf[0] = '\0';
+           append_addr(addrbuf, ctx.hostaddress[ReplaceEntry], sizeof(addrbuf));
+           VLog(0, ("   It will replace existing entry %d, %s,"
+                    " in the VLDB (new uuid):\n", ReplaceEntry, addrbuf));
            code =
-               FindExtentBlock(trans, uuidp, 1, ReplaceEntry, &exp, &fbase);
+               FindExtentBlock(&ctx, uuidp, 1, ReplaceEntry, &exp, &base);
            if (code || !exp) {
-               ubik_AbortTrans(trans);
-               return (code ? code : VL_IO);
+               if (!code)
+                   code = VL_IO;
+               goto abort;
            }
        }
     } else {
        /* There is no entry for this server, must create a new mh entry as
-        * well as use a new slot of the HostAddress array.
+        * well as use a new slot of the ctx.hostaddress array.
         */
        VLog(0, ("   It will create a new entry in the VLDB.\n"));
-       code = FindExtentBlock(trans, uuidp, 1, -1, &exp, &fbase);
+       code = FindExtentBlock(&ctx, uuidp, 1, -1, &exp, &base);
        if (code || !exp) {
-           ubik_AbortTrans(trans);
-           return (code ? code : VL_IO);
+           if (!code)
+               code = VL_IO;
+           goto abort;
        }
     }
 
@@ -2277,15 +2672,15 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
 
     /* Write the new mh entry out */
     if (vlwrite
-       (trans,
-        DOFFSET(ntohl(ex_addr[0]->ex_contaddrs[fbase]),
-                (char *)ex_addr[fbase], (char *)exp), (char *)exp,
+       (ctx.trans,
+        DOFFSET(ntohl(ctx.ex_addr[0]->ex_contaddrs[base]),
+                (char *)ctx.ex_addr[base], (char *)exp), (char *)exp,
         sizeof(*exp))) {
-       ubik_AbortTrans(trans);
-       return VL_IO;
+       code = VL_IO;
+       goto abort;
     }
 
-    /* Remove any common addresses from other mh entres. We know these entries 
+    /* Remove any common addresses from other mh entres. We know these entries
      * are being changed and not replaced so they are mh entries.
      */
     m = 0;
@@ -2296,20 +2691,19 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        if (willReplaceCnt && (WillChange[i] == ReplaceEntry))
            continue;
 
-       base = (HostAddress[WillChange[i]] >> 16) & 0xff;
-       index = HostAddress[WillChange[i]] & 0x0000ffff;
-       tex = &ex_addr[fbase][index];
+       code = multiHomedExtentBase(&ctx, WillChange[i], &tex, &base);
+       if (code)
+           goto abort;
 
        if (++m == 1)
-           VLog(0, 
+           VLog(0,
                ("   The following existing entries in the VLDB will be updated:\n"));
 
-       VLog(0, ("      entry %d: [", WillChange[i]));
-       for (h = j = 0; j < VL_MAXIPADDRS_PERMH; j++) {
+       for (addrbuf[0] = '\0', h = j = 0; j < VL_MAXIPADDRS_PERMH; j++) {
            if (tex->ex_addrs[j]) {
                if (j > 0)
-                   printf(" ");
-               PADDR(ntohl(tex->ex_addrs[j]));
+                   strlcat(addrbuf, " ", sizeof(addrbuf));
+               append_addr(addrbuf, ntohl(tex->ex_addrs[j]), sizeof(addrbuf));
            }
 
            for (k = 0; k < cnt; k++) {
@@ -2325,58 +2719,63 @@ SVL_RegisterAddrs(rxcall, uuidp, spare1, addrsp)
        for (j = h; j < VL_MAXIPADDRS_PERMH; j++) {
            tex->ex_addrs[j] = 0;       /* zero rest of mh entry */
        }
-       VLog(0, ("]\n"));
+       VLog(0, ("      entry %d: [%s]\n", WillChange[i], addrbuf));
 
        /* Write out the modified mh entry */
        tex->ex_uniquifier = htonl(ntohl(tex->ex_uniquifier) + 1);
        doff =
-           DOFFSET(ntohl(ex_addr[0]->ex_contaddrs[base]),
-                   (char *)ex_addr[base], (char *)tex);
-       if (vlwrite(trans, doff, (char *)tex, sizeof(*tex))) {
-           ubik_AbortTrans(trans);
-           return VL_IO;
+           DOFFSET(ntohl(ctx.ex_addr[0]->ex_contaddrs[base]),
+                   (char *)ctx.ex_addr[base], (char *)tex);
+       if (vlwrite(ctx.trans, doff, (char *)tex, sizeof(*tex))) {
+           code = VL_IO;
+           goto abort;
        }
     }
 
-    return (ubik_EndTrans(trans));
+    return (ubik_EndTrans(ctx.trans));
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
 afs_int32
-SVL_GetAddrsU(rxcall, attributes, uuidpo, uniquifier, nentries, addrsp)
-     struct rx_call *rxcall;
-     struct ListAddrByAttributes *attributes;
-     afsUUID *uuidpo;
-     afs_int32 *uniquifier, *nentries;
-     bulkaddrs *addrsp;
-{
-    register afs_int32 errorcode, index = -1, offset;
-    struct ubik_trans *trans;
+SVL_GetAddrsU(struct rx_call *rxcall,
+             struct ListAddrByAttributes *attributes,
+             afsUUID *uuidpo,
+             afs_int32 *uniquifier,
+             afs_int32 *nentries,
+             bulkaddrs *addrsp)
+{
+    int this_op = VLGETADDRSU;
+    afs_int32 code, index;
+    struct vl_ctx ctx;
     int nservers, i, j, base = 0;
     struct extentaddr *exp = 0;
     afsUUID tuuid;
     afs_uint32 *taddrp, taddr;
+    char rxstr[AFS_RXINFO_LEN];
 
-    COUNT_REQ(VLGETADDRSU);
+    countRequest(this_op);
     addrsp->bulkaddrs_len = *nentries = 0;
     addrsp->bulkaddrs_val = 0;
-    VLog(5, ("GetAddrsU %s\n", rxinfo(rxcall)));
-    if (errorcode = Init_VLdbase(&trans, LOCKREAD, this_op))
-       return errorcode;
+    VLog(5, ("GetAddrsU %s\n", rxinfo(rxstr, rxcall)));
+    if ((code = Init_VLdbase(&ctx, LOCKREAD, this_op)))
+       return code;
 
     if (attributes->Mask & VLADDR_IPADDR) {
        if (attributes->Mask & (VLADDR_INDEX | VLADDR_UUID)) {
-           ubik_AbortTrans(trans);
-           return VL_BADMASK;
+           code = VL_BADMASK;
+           goto abort;
        }
-       for (base = 0; base < VL_MAX_ADDREXTBLKS; base++) {
-           if (!ex_addr[base])
-               break;
-           for (i = 1; i < VL_MHSRV_PERBLK; i++) {
-               exp = &ex_addr[base][i];
-               tuuid = exp->ex_hostuuid;
-               afs_ntohuuid(&tuuid);
-               if (afs_uuid_is_nil(&tuuid))
-                   continue;
+       /* Search for a server registered with the VLDB with this ip address. */
+       for (index = 0; index <= MAXSERVERID; index++) {
+           code = multiHomedExtent(&ctx, index, &exp);
+           if (code)
+               continue;
+
+           if (exp) {
                for (j = 0; j < VL_MAXIPADDRS_PERMH; j++) {
                    if (exp->ex_addrs[j]
                        && (ntohl(exp->ex_addrs[j]) == attributes->ipaddr)) {
@@ -2386,70 +2785,60 @@ SVL_GetAddrsU(rxcall, attributes, uuidpo, uniquifier, nentries, addrsp)
                if (j < VL_MAXIPADDRS_PERMH)
                    break;
            }
-           if (i < VL_MHSRV_PERBLK)
-               break;
        }
-       if (base >= VL_MAX_ADDREXTBLKS) {
-           ubik_AbortTrans(trans);
-           return VL_NOENT;
+       if (index > MAXSERVERID) {
+           code = VL_NOENT;
+           goto abort;
        }
     } else if (attributes->Mask & VLADDR_INDEX) {
        if (attributes->Mask & (VLADDR_IPADDR | VLADDR_UUID)) {
-           ubik_AbortTrans(trans);
-           return VL_BADMASK;
-       }
-       index = attributes->index;
-       if (index < 1 || index >= (VL_MAX_ADDREXTBLKS * VL_MHSRV_PERBLK)) {
-           ubik_AbortTrans(trans);
-           return VL_INDEXERANGE;
+           code = VL_BADMASK;
+           goto abort;
        }
-       base = index / VL_MHSRV_PERBLK;
-       offset = index % VL_MHSRV_PERBLK;
-       if (offset == 0) {
-           ubik_AbortTrans(trans);
-           return VL_NOENT;
+       /* VLADDR_INDEX index is one based */
+       if (attributes->index < 1 || attributes->index > MAXSERVERID) {
+           code = VL_INDEXERANGE;
+           goto abort;
        }
-       if (!ex_addr[base]) {
-           ubik_AbortTrans(trans);
-           return VL_INDEXERANGE;
+       index = attributes->index - 1;
+       code = multiHomedExtent(&ctx, index, &exp);
+       if (code) {
+           code = VL_NOENT;
+           goto abort;
        }
-       exp = &ex_addr[base][offset];
     } else if (attributes->Mask & VLADDR_UUID) {
        if (attributes->Mask & (VLADDR_IPADDR | VLADDR_INDEX)) {
-           ubik_AbortTrans(trans);
-           return VL_BADMASK;
-       }
-       if (!ex_addr[0]) {      /* mh servers probably aren't setup on this vldb */
-           ubik_AbortTrans(trans);
-           return VL_NOENT;
+           code = VL_BADMASK;
+           goto abort;
        }
-       if (errorcode =
-           FindExtentBlock(trans, &attributes->uuid, 0, -1, &exp, &base)) {
-           ubik_AbortTrans(trans);
-           return errorcode;
+       if (!ctx.ex_addr[0]) {  /* mh servers probably aren't setup on this vldb */
+           code = VL_NOENT;
+           goto abort;
        }
+       code = FindExtentBlock(&ctx, &attributes->uuid, 0, -1, &exp, &base);
+       if (code)
+           goto abort;
     } else {
-       ubik_AbortTrans(trans);
-       return VL_BADMASK;
+       code = VL_BADMASK;
+       goto abort;
     }
 
     if (exp == NULL) {
-       ubik_AbortTrans(trans);
-       return VL_NOENT;
+       code = VL_NOENT;
+       goto abort;
     }
     addrsp->bulkaddrs_val = taddrp =
-       (afs_uint32 *) malloc(sizeof(afs_int32) * (MAXSERVERID + 1));
+       malloc(sizeof(afs_uint32) * (MAXSERVERID + 1));
     nservers = *nentries = addrsp->bulkaddrs_len = 0;
     if (!taddrp) {
-       COUNT_ABO;
-       ubik_AbortTrans(trans);
-       return VL_NOMEM;
+       code = VL_NOMEM;
+       goto abort;
     }
     tuuid = exp->ex_hostuuid;
     afs_ntohuuid(&tuuid);
     if (afs_uuid_is_nil(&tuuid)) {
-       ubik_AbortTrans(trans);
-       return VL_NOENT;
+       code = VL_NOENT;
+       goto abort;
     }
     if (uuidpo)
        *uuidpo = tuuid;
@@ -2470,7 +2859,12 @@ SVL_GetAddrsU(rxcall, attributes, uuidpo, uniquifier, nentries, addrsp)
        }
     }
     addrsp->bulkaddrs_len = *nentries = nservers;
-    return (ubik_EndTrans(trans));
+    return (ubik_EndTrans(ctx.trans));
+
+abort:
+    countAbort(this_op);
+    ubik_AbortTrans(ctx.trans);
+    return code;
 }
 
 /* ============> End of Exported vldb RPC functions <============= */
@@ -2478,28 +2872,30 @@ SVL_GetAddrsU(rxcall, attributes, uuidpo, uniquifier, nentries, addrsp)
 
 /* Routine that copies the given vldb entry to the output buffer, vldbentries. */
 static int
-put_attributeentry(Vldbentry, VldbentryFirst, VldbentryLast, vldbentries,
-                  entry, nentries, alloccnt)
-     struct vldbentry **Vldbentry, **VldbentryFirst, **VldbentryLast;
-     bulkentries *vldbentries;
-     struct nvlentry *entry;
-     afs_int32 *nentries, *alloccnt;
+put_attributeentry(struct vl_ctx *ctx,
+                  struct vldbentry **Vldbentry,
+                  struct vldbentry **VldbentryFirst,
+                  struct vldbentry **VldbentryLast,
+                  bulkentries *vldbentries,
+                  struct nvlentry *entry,
+                  afs_int32 *nentries,
+                  afs_int32 *alloccnt)
 {
     vldbentry *reall;
     afs_int32 allo;
+    int code;
 
     if (*Vldbentry == *VldbentryLast) {
        if (smallMem)
            return VL_SIZEEXCEEDED;     /* no growing if smallMem defined */
 
        /* Allocate another set of memory; each time allocate twice as
-        * many blocks as the last time. When we reach VLDBALLOCLIMIT, 
+        * many blocks as the last time. When we reach VLDBALLOCLIMIT,
         * then grow in increments of VLDBALLOCINCR.
         */
        allo = (*alloccnt > VLDBALLOCLIMIT) ? VLDBALLOCINCR : *alloccnt;
-       reall =
-           (vldbentry *) realloc(*VldbentryFirst,
-                                 (*alloccnt + allo) * sizeof(vldbentry));
+       reall = realloc(*VldbentryFirst,
+                       (*alloccnt + allo) * sizeof(vldbentry));
        if (reall == NULL)
            return VL_NOMEM;
 
@@ -2508,7 +2904,11 @@ put_attributeentry(Vldbentry, VldbentryFirst, VldbentryLast, vldbentries,
        *VldbentryLast = *Vldbentry + allo;
        *alloccnt += allo;
     }
-    vlentry_to_vldbentry(entry, *Vldbentry);
+
+    code = vlentry_to_vldbentry(ctx, entry, *Vldbentry);
+    if (code)
+       return code;
+
     (*Vldbentry)++;
     (*nentries)++;
     vldbentries->bulkentries_len++;
@@ -2516,28 +2916,32 @@ put_attributeentry(Vldbentry, VldbentryFirst, VldbentryLast, vldbentries,
 }
 
 static int
-put_nattributeentry(Vldbentry, VldbentryFirst, VldbentryLast, vldbentries,
-                   entry, matchtype, matchindex, nentries, alloccnt)
-     struct nvldbentry **Vldbentry, **VldbentryFirst, **VldbentryLast;
-     nbulkentries *vldbentries;
-     struct nvlentry *entry;
-     afs_int32 matchtype, matchindex, *nentries, *alloccnt;
+put_nattributeentry(struct vl_ctx *ctx,
+                   struct nvldbentry **Vldbentry,
+                   struct nvldbentry **VldbentryFirst,
+                   struct nvldbentry **VldbentryLast,
+                   nbulkentries *vldbentries,
+                   struct nvlentry *entry,
+                   afs_int32 matchtype,
+                   afs_int32 matchindex,
+                   afs_int32 *nentries,
+                   afs_int32 *alloccnt)
 {
     nvldbentry *reall;
     afs_int32 allo;
+    int code;
 
     if (*Vldbentry == *VldbentryLast) {
        if (smallMem)
            return VL_SIZEEXCEEDED;     /* no growing if smallMem defined */
 
        /* Allocate another set of memory; each time allocate twice as
-        * many blocks as the last time. When we reach VLDBALLOCLIMIT, 
+        * many blocks as the last time. When we reach VLDBALLOCLIMIT,
         * then grow in increments of VLDBALLOCINCR.
         */
        allo = (*alloccnt > VLDBALLOCLIMIT) ? VLDBALLOCINCR : *alloccnt;
-       reall =
-           (nvldbentry *) realloc(*VldbentryFirst,
-                                  (*alloccnt + allo) * sizeof(nvldbentry));
+       reall = realloc(*VldbentryFirst,
+                       (*alloccnt + allo) * sizeof(nvldbentry));
        if (reall == NULL)
            return VL_NOMEM;
 
@@ -2546,7 +2950,10 @@ put_nattributeentry(Vldbentry, VldbentryFirst, VldbentryLast, vldbentries,
        *VldbentryLast = *Vldbentry + allo;
        *alloccnt += allo;
     }
-    vlentry_to_nvldbentry(entry, *Vldbentry);
+    code = vlentry_to_nvldbentry(ctx, entry, *Vldbentry);
+    if (code)
+       return code;
+
     (*Vldbentry)->matchindex = (matchtype << 16) + matchindex;
     (*Vldbentry)++;
     (*nentries)++;
@@ -2557,24 +2964,20 @@ put_nattributeentry(Vldbentry, VldbentryFirst, VldbentryLast, vldbentries,
 
 /* Common code to actually remove a vldb entry from the database. */
 static int
-RemoveEntry(trans, entryptr, tentry)
-     struct ubik_trans *trans;
-     afs_int32 entryptr;
-     struct nvlentry *tentry;
+RemoveEntry(struct vl_ctx *ctx, afs_int32 entryptr,
+           struct nvlentry *tentry)
 {
-    register int errorcode;
+    int code;
 
-    if (errorcode = UnthreadVLentry(trans, entryptr, tentry))
-       return errorcode;
-    if (errorcode = FreeBlock(trans, entryptr))
-       return errorcode;
+    if ((code = UnthreadVLentry(ctx, entryptr, tentry)))
+       return code;
+    if ((code = FreeBlock(ctx, entryptr)))
+       return code;
     return 0;
 }
 
 static void
-ReleaseEntry(tentry, releasetype)
-     struct nvlentry *tentry;
-     afs_int32 releasetype;
+ReleaseEntry(struct nvlentry *tentry, afs_int32 releasetype)
 {
     if (releasetype & LOCKREL_TIMESTAMP)
        tentry->LockTimestamp = 0;
@@ -2585,10 +2988,10 @@ ReleaseEntry(tentry, releasetype)
 }
 
 
-/* Verify that the incoming vldb entry is valid; multi type of error codes are returned. */
+/* Verify that the incoming vldb entry is valid; multi type of error codes
+ * are returned. */
 static int
-check_vldbentry(aentry)
-     struct vldbentry *aentry;
+check_vldbentry(struct vldbentry *aentry)
 {
     afs_int32 i;
 
@@ -2610,8 +3013,7 @@ check_vldbentry(aentry)
 }
 
 static int
-check_nvldbentry(aentry)
-     struct nvldbentry *aentry;
+check_nvldbentry(struct nvldbentry *aentry)
 {
     afs_int32 i;
 
@@ -2636,17 +3038,16 @@ check_nvldbentry(aentry)
 /* Convert from the external vldb entry representation to its internal
    (more compact) form.  This call should not change the hash chains! */
 static int
-vldbentry_to_vlentry(atrans, VldbEntry, VlEntry)
-     struct ubik_trans *atrans;
-     struct vldbentry *VldbEntry;
-     struct nvlentry *VlEntry;
+vldbentry_to_vlentry(struct vl_ctx *ctx,
+                    struct vldbentry *VldbEntry,
+                    struct nvlentry *VlEntry)
 {
     int i, serverindex;
 
     if (strcmp(VlEntry->name, VldbEntry->name))
        strncpy(VlEntry->name, VldbEntry->name, sizeof(VlEntry->name));
     for (i = 0; i < VldbEntry->nServers; i++) {
-       serverindex = IpAddrToRelAddr(VldbEntry->serverNumber[i], atrans);
+       serverindex = IpAddrToRelAddr(ctx, VldbEntry->serverNumber[i], 1);
        if (serverindex == -1)
            return VL_BADSERVER;
        VlEntry->serverNumber[i] = serverindex;
@@ -2664,17 +3065,16 @@ vldbentry_to_vlentry(atrans, VldbEntry, VlEntry)
 }
 
 static int
-nvldbentry_to_vlentry(atrans, VldbEntry, VlEntry)
-     struct ubik_trans *atrans;
-     struct nvldbentry *VldbEntry;
-     struct nvlentry *VlEntry;
+nvldbentry_to_vlentry(struct vl_ctx *ctx,
+                     struct nvldbentry *VldbEntry,
+                     struct nvlentry *VlEntry)
 {
     int i, serverindex;
 
     if (strcmp(VlEntry->name, VldbEntry->name))
        strncpy(VlEntry->name, VldbEntry->name, sizeof(VlEntry->name));
     for (i = 0; i < VldbEntry->nServers; i++) {
-       serverindex = IpAddrToRelAddr(VldbEntry->serverNumber[i], atrans);
+       serverindex = IpAddrToRelAddr(ctx, VldbEntry->serverNumber[i], 1);
        if (serverindex == -1)
            return VL_BADSERVER;
        VlEntry->serverNumber[i] = serverindex;
@@ -2692,31 +3092,63 @@ nvldbentry_to_vlentry(atrans, VldbEntry, VlEntry)
 }
 
 
-/* Update the vldb entry with the new fields as indicated by the value of the Mask entry in the updateentry structure. All necessary validation checks are performed. */
-static
-get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
-     struct ubik_trans *trans;
-     afs_int32 blockindex;
-     struct VldbUpdateEntry *updateentry;
-     struct nvlentry *VlEntry;
+/* Update the vldb entry with the new fields as indicated by the value of
+ * the Mask entry in the updateentry structure. All necessary validation
+ * checks are performed.
+ */
+static int
+get_vldbupdateentry(struct vl_ctx *ctx,
+                   afs_int32 blockindex,
+                   struct VldbUpdateEntry *updateentry,
+                   struct nvlentry *VlEntry)
 {
-    int i, j, errorcode, serverindex;
+    int i, j, code, serverindex;
+    afs_uint32 checkids[MAXTYPES];
+
+    /* check if any specified new IDs are already present in the db. Do
+     * this check before doing anything else, so we don't get a half-
+     * updated entry. */
+    memset(&checkids, 0, sizeof(checkids));
+    if (updateentry->Mask & VLUPDATE_RWID) {
+       checkids[RWVOL] = updateentry->spares3; /* rw id */
+    }
+    if (updateentry->Mask & VLUPDATE_READONLYID) {
+       checkids[ROVOL] = updateentry->ReadOnlyId;
+    }
+    if (updateentry->Mask & VLUPDATE_BACKUPID) {
+       checkids[BACKVOL] = updateentry->BackupId;
+    }
+
+    if (EntryIDExists(ctx, checkids, MAXTYPES, &code)) {
+       return VL_IDEXIST;
+    } else if (code) {
+       return code;
+    }
 
     if (updateentry->Mask & VLUPDATE_VOLUMENAME) {
+       struct nvlentry tentry;
+
        if (InvalidVolname(updateentry->name))
            return VL_BADNAME;
-       if (errorcode = UnhashVolname(trans, blockindex, VlEntry))
-           return errorcode;
+
+       if (FindByName(ctx, updateentry->name, &tentry, &code)) {
+           return VL_NAMEEXIST;
+       } else if (code) {
+           return code;
+       }
+
+       if ((code = UnhashVolname(ctx, blockindex, VlEntry)))
+           return code;
        strncpy(VlEntry->name, updateentry->name, sizeof(VlEntry->name));
-       HashVolname(trans, blockindex, VlEntry);
+       HashVolname(ctx, blockindex, VlEntry);
     }
 
     if (updateentry->Mask & VLUPDATE_VOLNAMEHASH) {
-       if (errorcode = UnhashVolname(trans, blockindex, VlEntry)) {
-           if (errorcode != VL_NOENT)
-               return errorcode;
+       if ((code = UnhashVolname(ctx, blockindex, VlEntry))) {
+           if (code != VL_NOENT)
+               return code;
        }
-       HashVolname(trans, blockindex, VlEntry);
+       HashVolname(ctx, blockindex, VlEntry);
     }
 
     if (updateentry->Mask & VLUPDATE_FLAGS) {
@@ -2726,31 +3158,31 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
        VlEntry->cloneId = updateentry->cloneId;
     }
     if (updateentry->Mask & VLUPDATE_RWID) {
-       if (errorcode = UnhashVolid(trans, RWVOL, blockindex, VlEntry)) {
-           if (errorcode != VL_NOENT)
-               return errorcode;
+       if ((code = UnhashVolid(ctx, RWVOL, blockindex, VlEntry))) {
+           if (code != VL_NOENT)
+               return code;
        }
        VlEntry->volumeId[RWVOL] = updateentry->spares3;        /* rw id */
-       if (errorcode = HashVolid(trans, RWVOL, blockindex, VlEntry))
-           return errorcode;
+       if ((code = HashVolid(ctx, RWVOL, blockindex, VlEntry)))
+           return code;
     }
     if (updateentry->Mask & VLUPDATE_READONLYID) {
-       if (errorcode = UnhashVolid(trans, ROVOL, blockindex, VlEntry)) {
-           if (errorcode != VL_NOENT)
-               return errorcode;
+       if ((code = UnhashVolid(ctx, ROVOL, blockindex, VlEntry))) {
+           if (code != VL_NOENT)
+               return code;
        }
        VlEntry->volumeId[ROVOL] = updateentry->ReadOnlyId;
-       if (errorcode = HashVolid(trans, ROVOL, blockindex, VlEntry))
-           return errorcode;
+       if ((code = HashVolid(ctx, ROVOL, blockindex, VlEntry)))
+           return code;
     }
     if (updateentry->Mask & VLUPDATE_BACKUPID) {
-       if (errorcode = UnhashVolid(trans, BACKVOL, blockindex, VlEntry)) {
-           if (errorcode != VL_NOENT)
-               return errorcode;
+       if ((code = UnhashVolid(ctx, BACKVOL, blockindex, VlEntry))) {
+           if (code != VL_NOENT)
+               return code;
        }
        VlEntry->volumeId[BACKVOL] = updateentry->BackupId;
-       if (errorcode = HashVolid(trans, BACKVOL, blockindex, VlEntry))
-           return errorcode;
+       if ((code = HashVolid(ctx, BACKVOL, blockindex, VlEntry)))
+           return code;
     }
     if (updateentry->Mask & VLUPDATE_REPSITES) {
        if (updateentry->nModifiedRepsites <= 0
@@ -2765,9 +3197,9 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
            if (updateentry->RepsitesMask[i] & VLUPDATE_REPS_DELETE) {
                if ((j =
                     repsite_exists(VlEntry,
-                                   IpAddrToRelAddr(updateentry->
+                                   IpAddrToRelAddr(ctx, updateentry->
                                                    RepsitesTargetServer[i],
-                                                   trans),
+                                                   1),
                                    updateentry->RepsitesTargetPart[i])) !=
                    -1)
                    repsite_compress(VlEntry, j);
@@ -2782,8 +3214,7 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
                    return VL_BADPARTITION;
                if (repsite_exists
                    (VlEntry,
-                    IpAddrToRelAddr(updateentry->RepsitesNewServer[i],
-                                    trans),
+                    IpAddrToRelAddr(ctx, updateentry->RepsitesNewServer[i], 1),
                     updateentry->RepsitesNewPart[i]) != -1)
                    return VL_DUPREPSERVER;
                for (j = 0;
@@ -2792,8 +3223,8 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
                if (j >= OMAXNSERVERS)
                    return VL_REPSFULL;
                if ((serverindex =
-                    IpAddrToRelAddr(updateentry->RepsitesNewServer[i],
-                                    trans)) == -1)
+                    IpAddrToRelAddr(ctx, updateentry->RepsitesNewServer[i],
+                                    1)) == -1)
                    return VL_BADSERVER;
                VlEntry->serverNumber[j] = serverindex;
                VlEntry->serverPartition[j] = updateentry->RepsitesNewPart[i];
@@ -2807,14 +3238,14 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
                    return VL_BADSERVER;            */
                if ((j =
                     repsite_exists(VlEntry,
-                                   IpAddrToRelAddr(updateentry->
+                                   IpAddrToRelAddr(ctx, updateentry->
                                                    RepsitesTargetServer[i],
-                                                   trans),
+                                                   1),
                                    updateentry->RepsitesTargetPart[i])) !=
                    -1) {
                    VlEntry->serverNumber[j] =
-                       IpAddrToRelAddr(updateentry->RepsitesNewServer[i],
-                                       trans);
+                       IpAddrToRelAddr(ctx, updateentry->RepsitesNewServer[i],
+                                       1);
                } else
                    return VL_NOREPSERVER;
            }
@@ -2824,9 +3255,9 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
                    return VL_BADPARTITION;
                if ((j =
                     repsite_exists(VlEntry,
-                                   IpAddrToRelAddr(updateentry->
+                                   IpAddrToRelAddr(ctx, updateentry->
                                                    RepsitesTargetServer[i],
-                                                   trans),
+                                                   1),
                                    updateentry->RepsitesTargetPart[i])) !=
                    -1)
                    VlEntry->serverPartition[j] =
@@ -2837,9 +3268,9 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
            if (updateentry->RepsitesMask[i] & VLUPDATE_REPS_MODFLAG) {
                if ((j =
                     repsite_exists(VlEntry,
-                                   IpAddrToRelAddr(updateentry->
+                                   IpAddrToRelAddr(ctx, updateentry->
                                                    RepsitesTargetServer[i],
-                                                   trans),
+                                                   1),
                                    updateentry->RepsitesTargetPart[i])) !=
                    -1) {
                    if (updateentry->RepsitesNewFlags[i] < 0
@@ -2856,11 +3287,11 @@ get_vldbupdateentry(trans, blockindex, updateentry, VlEntry)
 }
 
 
-/* Check if the specified [server,partition] entry is found in the vldb entry's repsite table; it's offset in the table is returned, if it's present there. */
+/* Check if the specified [server,partition] entry is found in the vldb
+ * entry's repsite table; it's offset in the table is returned, if it's
+ * present there. */
 static int
-repsite_exists(VlEntry, server, partition)
-     struct nvlentry *VlEntry;
-     int server, partition;
+repsite_exists(struct nvlentry *VlEntry, int server, int partition)
 {
     int i;
 
@@ -2875,11 +3306,10 @@ repsite_exists(VlEntry, server, partition)
 
 
 
-/* Repsite table compression: used when deleting a repsite entry so that all active repsite entries are on the top of the table. */
+/* Repsite table compression: used when deleting a repsite entry so that
+ * all active repsite entries are on the top of the table. */
 static void
-repsite_compress(VlEntry, offset)
-     struct nvlentry *VlEntry;
-     int offset;
+repsite_compress(struct nvlentry *VlEntry, int offset)
 {
     int repsite_offset = offset;
     for (;
@@ -2896,27 +3326,24 @@ repsite_compress(VlEntry, offset)
 }
 
 
-/* Convert from the internal (compacted) vldb entry to the external representation used by the interface. */
-static void
-vlentry_to_vldbentry(VlEntry, VldbEntry)
-     struct nvlentry *VlEntry;
-     struct vldbentry *VldbEntry;
+/* Convert from the internal (compacted) vldb entry to the external
+ * representation used by the interface. */
+static int
+vlentry_to_vldbentry(struct vl_ctx *ctx, struct nvlentry *VlEntry,
+                     struct vldbentry *VldbEntry)
 {
-    int i, j;
+    int i, j, code;
+    struct extentaddr *exp;
 
     memset(VldbEntry, 0, sizeof(struct vldbentry));
     strncpy(VldbEntry->name, VlEntry->name, sizeof(VldbEntry->name));
     for (i = 0; i < OMAXNSERVERS; i++) {
        if (VlEntry->serverNumber[i] == BADSERVERID)
            break;
-       if ((HostAddress[j = VlEntry->serverNumber[i]] & 0xff000000) ==
-           0xff000000) {
-           struct extentaddr *exp;
-           int base, index;
-
-           base = (HostAddress[j] >> 16) & 0xff;
-           index = HostAddress[j] & 0x0000ffff;
-           exp = &ex_addr[base][index];
+       code = multiHomedExtent(ctx, VlEntry->serverNumber[i], &exp);
+       if (code)
+           return code;
+       if (exp) {
            /* For now return the first ip address back */
            for (j = 0; j < VL_MAXIPADDRS_PERMH; j++) {
                if (exp->ex_addrs[j]) {
@@ -2926,7 +3353,7 @@ vlentry_to_vldbentry(VlEntry, VldbEntry)
            }
        } else
            VldbEntry->serverNumber[i] =
-               HostAddress[VlEntry->serverNumber[i]];
+               ctx->hostaddress[VlEntry->serverNumber[i]];
        VldbEntry->serverPartition[i] = VlEntry->serverPartition[i];
        VldbEntry->serverFlags[i] = VlEntry->serverFlags[i];
     }
@@ -2935,30 +3362,30 @@ vlentry_to_vldbentry(VlEntry, VldbEntry)
        VldbEntry->volumeId[i] = VlEntry->volumeId[i];
     VldbEntry->cloneId = VlEntry->cloneId;
     VldbEntry->flags = VlEntry->flags;
+
+    return 0;
 }
 
 
-/* Convert from the internal (compacted) vldb entry to the external representation used by the interface. */
-static void
-vlentry_to_nvldbentry(VlEntry, VldbEntry)
-     struct nvlentry *VlEntry;
-     struct nvldbentry *VldbEntry;
+/* Convert from the internal (compacted) vldb entry to the external
+ * representation used by the interface. */
+static int
+vlentry_to_nvldbentry(struct vl_ctx *ctx, struct nvlentry *VlEntry,
+                      struct nvldbentry *VldbEntry)
 {
-    int i, j;
+    int i, j, code;
+    struct extentaddr *exp;
 
-    memset(VldbEntry, 0, sizeof(struct vldbentry));
+    memset(VldbEntry, 0, sizeof(struct nvldbentry));
     strncpy(VldbEntry->name, VlEntry->name, sizeof(VldbEntry->name));
     for (i = 0; i < NMAXNSERVERS; i++) {
        if (VlEntry->serverNumber[i] == BADSERVERID)
            break;
-       if ((HostAddress[j = VlEntry->serverNumber[i]] & 0xff000000) ==
-           0xff000000) {
-           struct extentaddr *exp;
-           int base, index;
-
-           base = (HostAddress[j] >> 16) & 0xff;
-           index = HostAddress[j] & 0x0000ffff;
-           exp = &ex_addr[base][index];
+       code = multiHomedExtent(ctx, VlEntry->serverNumber[i], &exp);
+       if (code)
+           return code;
+
+       if (exp) {
            /* For now return the first ip address back */
            for (j = 0; j < VL_MAXIPADDRS_PERMH; j++) {
                if (exp->ex_addrs[j]) {
@@ -2968,7 +3395,7 @@ vlentry_to_nvldbentry(VlEntry, VldbEntry)
            }
        } else
            VldbEntry->serverNumber[i] =
-               HostAddress[VlEntry->serverNumber[i]];
+               ctx->hostaddress[VlEntry->serverNumber[i]];
        VldbEntry->serverPartition[i] = VlEntry->serverPartition[i];
        VldbEntry->serverFlags[i] = VlEntry->serverFlags[i];
     }
@@ -2977,39 +3404,39 @@ vlentry_to_nvldbentry(VlEntry, VldbEntry)
        VldbEntry->volumeId[i] = VlEntry->volumeId[i];
     VldbEntry->cloneId = VlEntry->cloneId;
     VldbEntry->flags = VlEntry->flags;
+
+    return 0;
 }
 
-static void
-vlentry_to_uvldbentry(VlEntry, VldbEntry)
-     struct nvlentry *VlEntry;
-     struct uvldbentry *VldbEntry;
+static int
+vlentry_to_uvldbentry(struct vl_ctx *ctx, struct nvlentry *VlEntry,
+                      struct uvldbentry *VldbEntry)
 {
-    int i, j;
+    int i, code;
+    struct extentaddr *exp;
 
-    memset(VldbEntry, 0, sizeof(struct vldbentry));
+    memset(VldbEntry, 0, sizeof(struct uvldbentry));
     strncpy(VldbEntry->name, VlEntry->name, sizeof(VldbEntry->name));
     for (i = 0; i < NMAXNSERVERS; i++) {
        if (VlEntry->serverNumber[i] == BADSERVERID)
            break;
        VldbEntry->serverFlags[i] = VlEntry->serverFlags[i];
        VldbEntry->serverUnique[i] = 0;
-       if ((HostAddress[j = VlEntry->serverNumber[i]] & 0xff000000) ==
-           0xff000000) {
-           struct extentaddr *exp;
-           int base, index;
+       code = multiHomedExtent(ctx, VlEntry->serverNumber[i], &exp);
+       if (code)
+           return code;
+
+       if (exp) {
            afsUUID tuuid;
 
-           base = (HostAddress[j] >> 16) & 0xff;
-           index = HostAddress[j] & 0x0000ffff;
-           exp = &ex_addr[base][index];
            tuuid = exp->ex_hostuuid;
            afs_ntohuuid(&tuuid);
-           VldbEntry->serverFlags[i] |= VLSERVER_FLAG_UUID;
+           VldbEntry->serverFlags[i] |= VLSF_UUID;
            VldbEntry->serverNumber[i] = tuuid;
            VldbEntry->serverUnique[i] = ntohl(exp->ex_uniquifier);
        } else {
            VldbEntry->serverNumber[i].time_low =
-               HostAddress[VlEntry->serverNumber[i]];
+               ctx->hostaddress[VlEntry->serverNumber[i]];
        }
        VldbEntry->serverPartition[i] = VlEntry->serverPartition[i];
 
@@ -3019,6 +3446,8 @@ vlentry_to_uvldbentry(VlEntry, VldbEntry)
        VldbEntry->volumeId[i] = VlEntry->volumeId[i];
     VldbEntry->cloneId = VlEntry->cloneId;
     VldbEntry->flags = VlEntry->flags;
+
+    return 0;
 }
 
 #define LEGALCHARS ".ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_"
@@ -3026,8 +3455,7 @@ vlentry_to_uvldbentry(VlEntry, VldbEntry)
 
 /* Verify that the volname is a valid volume name. */
 static int
-InvalidVolname(volname)
-     char *volname;
+InvalidVolname(char *volname)
 {
     char *map;
     int slen;
@@ -3042,8 +3470,7 @@ InvalidVolname(volname)
 
 /* Verify that the given volume type is valid. */
 static int
-InvalidVoltype(voltype)
-     afs_int32 voltype;
+InvalidVoltype(afs_int32 voltype)
 {
     if (voltype != RWVOL && voltype != ROVOL && voltype != BACKVOL)
        return 1;
@@ -3052,8 +3479,7 @@ InvalidVoltype(voltype)
 
 
 static int
-InvalidOperation(voloper)
-     afs_int32 voloper;
+InvalidOperation(afs_int32 voloper)
 {
     if (voloper != VLOP_MOVE && voloper != VLOP_RELEASE
        && voloper != VLOP_BACKUP && voloper != VLOP_DELETE
@@ -3063,8 +3489,7 @@ InvalidOperation(voloper)
 }
 
 static int
-InvalidReleasetype(releasetype)
-     afs_int32 releasetype;
+InvalidReleasetype(afs_int32 releasetype)
 {
     if ((releasetype & LOCKREL_TIMESTAMP) || (releasetype & LOCKREL_OPCODE)
        || (releasetype & LOCKREL_AFSID))
@@ -3073,39 +3498,19 @@ InvalidReleasetype(releasetype)
 }
 
 static int
-IpAddrToRelAddr(ipaddr, atrans)
-     struct ubik_trans *atrans;
-     register afs_uint32 ipaddr;
+IpAddrToRelAddr(struct vl_ctx *ctx, afs_uint32 ipaddr, int create)
 {
-    register int i, j;
-    register afs_int32 code, base, index;
+    int i, j;
+    afs_int32 code;
     struct extentaddr *exp;
 
     for (i = 0; i <= MAXSERVERID; i++) {
-       if (HostAddress[i] == ipaddr)
+       if (ctx->hostaddress[i] == ipaddr)
            return i;
-       if ((HostAddress[i] & 0xff000000) == 0xff000000) {
-           base = (HostAddress[i] >> 16) & 0xff;
-           index = HostAddress[i] & 0x0000ffff;
-           if (base >= VL_MAX_ADDREXTBLKS) {
-               VLog(0,
-                    ("Internal error: Multihome extent base is too large. Base %d index %d\n",
-                     base, index));
-               return -1;      /* EINVAL */
-           }
-           if (index >= VL_MHSRV_PERBLK) {
-               VLog(0,
-                    ("Internal error: Multihome extent index is too large. Base %d index %d\n",
-                     base, index));
-               return -1;      /* EINVAL */
-           }
-           if (!ex_addr[base]) {
-               VLog(0,
-                    ("Internal error: Multihome extent does not exist. Base %d\n",
-                     base));
-               return -1;      /* EINVAL */
-           }
-           exp = &ex_addr[base][index];
+       code = multiHomedExtent(ctx, i, &exp);
+       if (code)
+           return -1;
+       if (exp) {
            for (j = 0; j < VL_MAXIPADDRS_PERMH; j++) {
                if (exp->ex_addrs[j] && (ntohl(exp->ex_addrs[j]) == ipaddr)) {
                    return i;
@@ -3115,16 +3520,16 @@ IpAddrToRelAddr(ipaddr, atrans)
     }
 
     /* allocate the new server a server id pronto */
-    if (atrans) {
+    if (create) {
        for (i = 0; i <= MAXSERVERID; i++) {
-           if (cheader.IpMappedAddr[i] == 0) {
-               cheader.IpMappedAddr[i] = htonl(ipaddr);
+           if (ctx->cheader->IpMappedAddr[i] == 0) {
+               ctx->cheader->IpMappedAddr[i] = htonl(ipaddr);
                code =
-                   vlwrite(atrans,
-                           DOFFSET(0, &cheader, &cheader.IpMappedAddr[i]),
-                           (char *)&cheader.IpMappedAddr[i],
+                   vlwrite(ctx->trans,
+                           DOFFSET(0, ctx->cheader, &ctx->cheader->IpMappedAddr[i]),
+                           (char *)&ctx->cheader->IpMappedAddr[i],
                            sizeof(afs_int32));
-               HostAddress[i] = ipaddr;
+               ctx->hostaddress[i] = ipaddr;
                if (code)
                    return -1;
                return i;
@@ -3135,24 +3540,22 @@ IpAddrToRelAddr(ipaddr, atrans)
 }
 
 static int
-ChangeIPAddr(ipaddr1, ipaddr2, atrans)
-     struct ubik_trans *atrans;
-     register afs_uint32 ipaddr1, ipaddr2;
+ChangeIPAddr(struct vl_ctx *ctx, afs_uint32 ipaddr1, afs_uint32 ipaddr2)
 {
     int i, j;
     afs_int32 code;
     struct extentaddr *exp = NULL;
-    int base = 0;
-    int index, mhidx;
+    int base = -1;
+    int mhidx;
     afsUUID tuuid;
     afs_int32 blockindex, count;
     int pollcount = 0;
     struct nvlentry tentry;
+    int ipaddr1_id = -1, ipaddr2_id = -1;
+    char addrbuf1[256];
+    char addrbuf2[256];
 
-    if (!atrans)
-       return VL_CREATEFAIL;
-
-    /* Don't let addr change to 256.*.*.* : Causes internal error below */
+    /* Don't let addr change to 255.*.*.* : Causes internal error below */
     if ((ipaddr2 & 0xff000000) == 0xff000000)
        return (VL_BADSERVER);
 
@@ -3168,43 +3571,65 @@ ChangeIPAddr(ipaddr1, ipaddr2, atrans)
     }
 
     for (i = 0; i <= MAXSERVERID; i++) {
-       if ((HostAddress[i] & 0xff000000) == 0xff000000) {
-           base = (HostAddress[i] >> 16) & 0xff;
-           index = HostAddress[i] & 0x0000ffff;
-           if ((base >= VL_MAX_ADDREXTBLKS) || (index >= VL_MHSRV_PERBLK)) {
-               VLog(0,
-                    ("Internal error: Multihome extent addr is too large. Base %d index %d\n",
-                     base, index));
-               return -1;      /* EINVAL */
-           }
+       struct extentaddr *texp = NULL;
+       int tbase;
+
+       code = multiHomedExtentBase(ctx, i, &texp, &tbase);
+       if (code)
+           return code;
 
-           exp = &ex_addr[base][index];
+       if (texp) {
            for (mhidx = 0; mhidx < VL_MAXIPADDRS_PERMH; mhidx++) {
-               if (!exp->ex_addrs[mhidx])
+               if (!texp->ex_addrs[mhidx])
                    continue;
-               if (ntohl(exp->ex_addrs[mhidx]) == ipaddr1)
-                   break;
+               if (ntohl(texp->ex_addrs[mhidx]) == ipaddr1) {
+                   ipaddr1_id = i;
+                   exp = texp;
+                   base = tbase;
+               }
+               if (ipaddr2 != 0 && ntohl(texp->ex_addrs[mhidx]) == ipaddr2) {
+                   ipaddr2_id = i;
+               }
            }
-           if (mhidx < VL_MAXIPADDRS_PERMH) {
-               break;
+       } else {
+           if (ctx->hostaddress[i] == ipaddr1) {
+               exp = NULL;
+               base = -1;
+               ipaddr1_id = i;
+           }
+           if (ipaddr2 != 0 && ctx->hostaddress[i] == ipaddr2) {
+               ipaddr2_id = i;
            }
-       } else if (HostAddress[i] == ipaddr1) {
-           exp = NULL;
+       }
+
+       if (ipaddr1_id >= 0 && (ipaddr2 == 0 || ipaddr2_id >= 0)) {
+           /* we've either found both IPs already in the VLDB, or we found
+            * ipaddr1, and we're not going to find ipaddr2 because it's 0 */
            break;
        }
     }
 
-    if (i >= MAXSERVERID) {
+    if (ipaddr1_id < 0) {
        return VL_NOENT;        /* not found */
     }
 
+    if (ipaddr2_id >= 0 && ipaddr2_id != ipaddr1_id) {
+       char buf1[16], buf2[16];
+       VLog(0, ("Cannot change IP address from %s to %s because the latter "
+                "is in use by server id %d\n",
+                afs_inet_ntoa_r(htonl(ipaddr1), buf1),
+                afs_inet_ntoa_r(htonl(ipaddr2), buf2),
+                ipaddr2_id));
+       return VL_MULTIPADDR;
+    }
+
     /* If we are removing a server entry, a volume cannot
      * exist on the server. If one does, don't remove the
      * server entry: return error "volume entry exists".
      */
     if (ipaddr2 == 0) {
-       for (blockindex = NextEntry(atrans, 0, &tentry, &count); blockindex;
-            blockindex = NextEntry(atrans, blockindex, &tentry, &count)) {
+       for (blockindex = NextEntry(ctx, 0, &tentry, &count); blockindex;
+            blockindex = NextEntry(ctx, blockindex, &tentry, &count)) {
            if (++pollcount > 50) {
 #ifndef AFS_PTHREAD_ENV
                IOMGR_Poll();
@@ -3214,58 +3639,64 @@ ChangeIPAddr(ipaddr1, ipaddr2, atrans)
            for (j = 0; j < NMAXNSERVERS; j++) {
                if (tentry.serverNumber[j] == BADSERVERID)
                    break;
-               if (tentry.serverNumber[j] == i) {
+               if (tentry.serverNumber[j] == ipaddr1_id) {
                    return VL_IDEXIST;
                }
            }
        }
+    } else if (exp) {
+       /* Do not allow changing addresses in multi-homed entries.
+          Older versions of this RPC would silently "downgrade" mh entries
+          to single-homed entries and orphan the mh enties. */
+       addrbuf1[0] = '\0';
+       append_addr(addrbuf1, ipaddr1, sizeof(addrbuf1));
+       VLog(0, ("Refusing to change address %s in multi-homed entry; "
+                "use RegisterAddrs instead.\n", addrbuf1));
+       return VL_NOENT;        /* single-homed entry not found */
     }
 
     /* Log a message saying we are changing/removing an IP address */
     VLog(0,
         ("The following IP address is being %s:\n",
          (ipaddr2 ? "changed" : "removed")));
-    VLog(0, ("      entry %d: ", i));
+    addrbuf1[0] = addrbuf2[0] = '\0';
     if (exp) {
-       VLog(0, ("["));
        for (mhidx = 0; mhidx < VL_MAXIPADDRS_PERMH; mhidx++) {
            if (!exp->ex_addrs[mhidx])
                continue;
            if (mhidx > 0)
-               VLog(0, (" "));
-           PADDR(ntohl(exp->ex_addrs[mhidx]));
+               strlcat(addrbuf1, " ", sizeof(addrbuf1));
+           append_addr(addrbuf1, ntohl(exp->ex_addrs[mhidx]), sizeof(addrbuf1));
        }
-       VLog(0, ("]"));
     } else {
-       PADDR(ipaddr1);
+       append_addr(addrbuf1, ipaddr1, sizeof(addrbuf1));
     }
     if (ipaddr2) {
-       VLog(0, (" -> "));
-       PADDR(ipaddr2);
+       append_addr(addrbuf2, ipaddr2, sizeof(addrbuf2));
     }
-    VLog(0, ("\n"));
+    VLog(0, ("      entry %d: [%s] -> [%s]\n", ipaddr1_id, addrbuf1, addrbuf2));
 
     /* Change the registered uuuid addresses */
-    if (exp) {
+    if (exp && base != -1) {
        memset(&tuuid, 0, sizeof(afsUUID));
        afs_htonuuid(&tuuid);
        exp->ex_hostuuid = tuuid;
        code =
-           vlwrite(atrans,
-                   DOFFSET(ntohl(ex_addr[0]->ex_contaddrs[base]),
-                           (char *)ex_addr[base], (char *)exp),
+           vlwrite(ctx->trans,
+                   DOFFSET(ntohl(ctx->ex_addr[0]->ex_contaddrs[base]),
+                           (char *)ctx->ex_addr[base], (char *)exp),
                    (char *)&tuuid, sizeof(tuuid));
        if (code)
            return VL_IO;
     }
 
     /* Now change the host address entry */
-    cheader.IpMappedAddr[i] = htonl(ipaddr2);
+    ctx->cheader->IpMappedAddr[ipaddr1_id] = htonl(ipaddr2);
     code =
-       vlwrite(atrans, DOFFSET(0, &cheader, &cheader.IpMappedAddr[i]),
+       vlwrite(ctx->trans, DOFFSET(0, ctx->cheader, &ctx->cheader->IpMappedAddr[ipaddr1_id]),
                (char *)
-               &cheader.IpMappedAddr[i], sizeof(afs_int32));
-    HostAddress[i] = ipaddr2;
+               &ctx->cheader->IpMappedAddr[ipaddr1_id], sizeof(afs_int32));
+    ctx->hostaddress[ipaddr1_id] = ipaddr2;
     if (code)
        return VL_IO;
 
@@ -3274,8 +3705,7 @@ ChangeIPAddr(ipaddr1, ipaddr2, atrans)
 
 /* see if the vlserver is back yet */
 afs_int32
-SVL_ProbeServer(rxcall)
-     struct rx_call *rxcall;
+SVL_ProbeServer(struct rx_call *rxcall)
 {
     return 0;
 }