src/ubik/recovery.c

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 #include <afsconfig.h>
  11 #include <afs/param.h>
  12
  13 #include <roken.h>
  14
  15 #include <lock.h>
  16 #include <rx/xdr.h>
  17 #include <rx/rx.h>
  18 #include <afs/afsutil.h>
  19 #include <afs/cellconfig.h>
  20
  21 #define UBIK_INTERNALS
  22 #include "ubik.h"
  23 #include "ubik_int.h"
  24
  25 /*! \file
  26  * This module is responsible for determining when the system has
  27  * recovered to the point that it can handle new transactions.  It
  28  * replays logs, polls to determine the current dbase after a crash,
  29  * and distributes the new database to the others.
  30  *
  31  * The sync site associates a version number with each database.  It
  32  * broadcasts the version associated with its current dbase in every
  33  * one of its beacon messages.  When the sync site send a dbase to a
  34  * server, it also sends the db's version.  A non-sync site server can
  35  * tell if it has the right dbase version by simply comparing the
  36  * version from the beacon message \p uvote_dbVersion with the version
  37  * associated with the database \p ubik_dbase->version.  The sync site
  38  * itself simply has one counter to keep track of all of this (again
  39  * \p ubik_dbase->version).
  40  *
  41  * sync site: routine called when the sync site loses its quorum; this
  42  * procedure is called "up" from the beacon package.  It resyncs the
  43  * dbase and nudges the recovery daemon to try to propagate out the
  44  * changes.  It also resets the recovery daemon's state, since
  45  * recovery must potentially find a new dbase to propagate out.  This
  46  * routine should not do anything with variables used by non-sync site
  47  * servers.
  48  */
  49
  50 /*!
  51  * if this flag is set, then ubik will use only the primary address
  52  * (the address specified in the CellServDB) to contact other
  53  * ubik servers. Ubik recovery will not try opening connections
  54  * to the alternate interface addresses.
  55  */
  56 int ubikPrimaryAddrOnly;
  57
  58 int
  59 urecovery_ResetState(void)
  60 {
  61     urecovery_state = 0;
  62 #if !defined(AFS_PTHREAD_ENV)
  63     /*  No corresponding LWP_WaitProcess found anywhere for this -- klm */
  64     LWP_NoYieldSignal(&urecovery_state);
  65 #endif
  66     return 0;
  67 }
  68
  69 /*!
  70  * \brief sync site
  71  *
  72  * routine called when a non-sync site server goes down; restarts recovery
  73  * process to send missing server the new db when it comes back up for
  74  * non-sync site servers.
  75  *
  76  * \note This routine should not do anything with variables used by non-sync site servers.
  77  */
  78 int
  79 urecovery_LostServer(struct ubik_server *ts)
  80 {
  81     ubeacon_ReinitServer(ts);
  82 #if !defined(AFS_PTHREAD_ENV)
  83     /*  No corresponding LWP_WaitProcess found anywhere for this -- klm */
  84     LWP_NoYieldSignal(&urecovery_state);
  85 #endif
  86     return 0;
  87 }
  88
  89 /*!
  90  * return true iff we have a current database (called by both sync
  91  * sites and non-sync sites) How do we determine this?  If we're the
  92  * sync site, we wait until recovery has finished fetching and
  93  * re-labelling its dbase (it may still be trying to propagate it out
  94  * to everyone else; that's THEIR problem).  If we're not the sync
  95  * site, then we must have a dbase labelled with the right version,
  96  * and we must have a currently-good sync site.
  97  */
  98 int
  99 urecovery_AllBetter(struct ubik_dbase *adbase, int areadAny)
 100 {
 101     afs_int32 rcode;
 102
 103     ubik_dprint_25("allbetter checking\n");
 104     rcode = 0;
 105
 106
 107     if (areadAny) {
 108         if (ubik_dbase->version.epoch > 1)
 109             rcode = 1;          /* Happy with any good version of database */
 110     }
 111
 112     /* Check if we're sync site and we've got the right data */
 113     else if (ubeacon_AmSyncSite() && (urecovery_state & UBIK_RECHAVEDB)) {
 114         rcode = 1;
 115     }
 116
 117     /* next, check if we're aux site, and we've ever been sent the
 118      * right data (note that if a dbase update fails, we won't think
 119      * that the sync site is still the sync site, 'cause it won't talk
 120      * to us until a timeout period has gone by.  When we recover, we
 121      * leave this clear until we get a new dbase */
 122     else if ((uvote_GetSyncSite() && uvote_eq_dbVersion(ubik_dbase->version))) {        /* && order is important */
 123         rcode = 1;
 124     }
 125
 126     ubik_dprint_25("allbetter: returning %d\n", rcode);
 127     return rcode;
 128 }
 129
 130 /*!
 131  * \brief abort all transactions on this database
 132  */
 133 int
 134 urecovery_AbortAll(struct ubik_dbase *adbase)
 135 {
 136     struct ubik_trans *tt;
 137     for (tt = adbase->activeTrans; tt; tt = tt->next) {
 138         udisk_abort(tt);
 139     }
 140     return 0;
 141 }
 142
 143 /*!
 144  * \brief this routine aborts the current remote transaction, if any, if the tid is wrong
 145  */
 146 int
 147 urecovery_CheckTid(struct ubik_tid *atid, int abortalways)
 148 {
 149     if (ubik_currentTrans) {
 150         /* there is remote write trans, see if we match, see if this
 151          * is a new transaction */
 152         if (atid->epoch != ubik_currentTrans->tid.epoch
 153             || atid->counter > ubik_currentTrans->tid.counter || abortalways) {
 154             /* don't match, abort it */
 155             /* If the thread is not waiting for lock - ok to end it */
 156             if (ubik_currentTrans->locktype != LOCKWAIT) {
 157                 udisk_end(ubik_currentTrans);
 158             }
 159             ubik_currentTrans = (struct ubik_trans *)0;
 160         }
 161     }
 162     return 0;
 163 }
 164
 165 /*!
 166  * \brief replay logs
 167  *
 168  * log format is defined here, and implicitly in disk.c
 169  *
 170  * 4 byte opcode, followed by parameters, each 4 bytes long.  All integers
 171  * are in logged in network standard byte order, in case we want to move logs
 172  * from machine-to-machine someday.
 173  *
 174  * Begin transaction: opcode \n
 175  * Commit transaction: opcode, version (8 bytes) \n
 176  * Truncate file: opcode, file number, length \n
 177  * Abort transaction: opcode \n
 178  * Write data: opcode, file, position, length, <length> data bytes \n
 179  *
 180  * A very simple routine, it just replays the log.  Note that this is a new-value only log, which
 181  * implies that no uncommitted data is written to the dbase: one writes data to the log, including
 182  * the commit record, then we allow data to be written through to the dbase.  In our particular
 183  * implementation, once a transaction is done, we write out the pages to the database, so that
 184  * our buffer package doesn't have to know about stable and uncommitted data in the memory buffers:
 185  * any changed data while there is an uncommitted write transaction can be zapped during an
 186  * abort and the remaining dbase on the disk is exactly the right dbase, without having to read
 187  * the log.
 188  */
 189 static int
 190 ReplayLog(struct ubik_dbase *adbase)
 191 {
 192     afs_int32 opcode;
 193     afs_int32 code, tpos;
 194     int logIsGood;
 195     afs_int32 len, thisSize, tfile, filePos;
 196     afs_int32 buffer[4];
 197     afs_int32 syncFile = -1;
 198     afs_int32 data[1024];
 199
 200     /* read the lock twice, once to see whether we have a transaction to deal
 201      * with that committed, (theoretically, we should support more than one
 202      * trans in the log at once, but not yet), and once replaying the
 203      * transactions.  */
 204     tpos = 0;
 205     logIsGood = 0;
 206     /* for now, assume that all ops in log pertain to one transaction; see if there's a commit */
 207     while (1) {
 208         code =
 209             (*adbase->read) (adbase, LOGFILE, (char *)&opcode, tpos,
 210                              sizeof(afs_int32));
 211         if (code != sizeof(afs_int32))
 212             break;
 213         opcode = ntohl(opcode);
 214         if (opcode == LOGNEW) {
 215             /* handle begin trans */
 216             tpos += sizeof(afs_int32);
 217         } else if (opcode == LOGABORT)
 218             break;
 219         else if (opcode == LOGEND) {
 220             logIsGood = 1;
 221             break;
 222         } else if (opcode == LOGTRUNCATE) {
 223             tpos += 4;
 224             code =
 225                 (*adbase->read) (adbase, LOGFILE, (char *)buffer, tpos,
 226                                  2 * sizeof(afs_int32));
 227             if (code != 2 * sizeof(afs_int32))
 228                 break;          /* premature eof or io error */
 229             tpos += 2 * sizeof(afs_int32);
 230         } else if (opcode == LOGDATA) {
 231             tpos += 4;
 232             code =
 233                 (*adbase->read) (adbase, LOGFILE, (char *)buffer, tpos,
 234                                  3 * sizeof(afs_int32));
 235             if (code != 3 * sizeof(afs_int32))
 236                 break;
 237             /* otherwise, skip over the data bytes, too */
 238             tpos += ntohl(buffer[2]) + 3 * sizeof(afs_int32);
 239         } else {
 240             ubik_print("corrupt log opcode (%d) at position %d\n", opcode,
 241                        tpos);
 242             break;              /* corrupt log! */
 243         }
 244     }
 245     if (logIsGood) {
 246         /* actually do the replay; log should go all the way through the commit record, since
 247          * we just read it above. */
 248         tpos = 0;
 249         logIsGood = 0;
 250         syncFile = -1;
 251         while (1) {
 252             code =
 253                 (*adbase->read) (adbase, LOGFILE, (char *)&opcode, tpos,
 254                                  sizeof(afs_int32));
 255             if (code != sizeof(afs_int32))
 256                 break;
 257             opcode = ntohl(opcode);
 258             if (opcode == LOGNEW) {
 259                 /* handle begin trans */
 260                 tpos += sizeof(afs_int32);
 261             } else if (opcode == LOGABORT)
 262                 panic("log abort\n");
 263             else if (opcode == LOGEND) {
 264                 struct ubik_version version;
 265                 tpos += 4;
 266                 code =
 267                     (*adbase->read) (adbase, LOGFILE, (char *)buffer, tpos,
 268                                      2 * sizeof(afs_int32));
 269                 if (code != 2 * sizeof(afs_int32))
 270                     return UBADLOG;
 271                 version.epoch = ntohl(buffer[0]);
 272                 version.counter = ntohl(buffer[1]);
 273                 code = (*adbase->setlabel) (adbase, 0, &version);
 274                 if (code)
 275                     return code;
 276                 ubik_print("Successfully replayed log for interrupted "
 277                            "transaction; db version is now %ld.%ld\n",
 278                            (long) version.epoch, (long) version.counter);
 279                 logIsGood = 1;
 280                 break;          /* all done now */
 281             } else if (opcode == LOGTRUNCATE) {
 282                 tpos += 4;
 283                 code =
 284                     (*adbase->read) (adbase, LOGFILE, (char *)buffer, tpos,
 285                                      2 * sizeof(afs_int32));
 286                 if (code != 2 * sizeof(afs_int32))
 287                     break;      /* premature eof or io error */
 288                 tpos += 2 * sizeof(afs_int32);
 289                 code =
 290                     (*adbase->truncate) (adbase, ntohl(buffer[0]),
 291                                          ntohl(buffer[1]));
 292                 if (code)
 293                     return code;
 294             } else if (opcode == LOGDATA) {
 295                 tpos += 4;
 296                 code =
 297                     (*adbase->read) (adbase, LOGFILE, (char *)buffer, tpos,
 298                                      3 * sizeof(afs_int32));
 299                 if (code != 3 * sizeof(afs_int32))
 300                     break;
 301                 tpos += 3 * sizeof(afs_int32);
 302                 /* otherwise, skip over the data bytes, too */
 303                 len = ntohl(buffer[2]); /* total number of bytes to copy */
 304                 filePos = ntohl(buffer[1]);
 305                 tfile = ntohl(buffer[0]);
 306                 /* try to minimize file syncs */
 307                 if (syncFile != tfile) {
 308                     if (syncFile >= 0)
 309                         code = (*adbase->sync) (adbase, syncFile);
 310                     else
 311                         code = 0;
 312                     syncFile = tfile;
 313                     if (code)
 314                         return code;
 315                 }
 316                 while (len > 0) {
 317                     thisSize = (len > sizeof(data) ? sizeof(data) : len);
 318                     /* copy sizeof(data) buffer bytes at a time */
 319                     code =
 320                         (*adbase->read) (adbase, LOGFILE, (char *)data, tpos,
 321                                          thisSize);
 322                     if (code != thisSize)
 323                         return UBADLOG;
 324                     code =
 325                         (*adbase->write) (adbase, tfile, (char *)data, filePos,
 326                                           thisSize);
 327                     if (code != thisSize)
 328                         return UBADLOG;
 329                     filePos += thisSize;
 330                     tpos += thisSize;
 331                     len -= thisSize;
 332                 }
 333             } else {
 334                 ubik_print("corrupt log opcode (%d) at position %d\n",
 335                            opcode, tpos);
 336                 break;          /* corrupt log! */
 337             }
 338         }
 339         if (logIsGood) {
 340             if (syncFile >= 0)
 341                 code = (*adbase->sync) (adbase, syncFile);
 342             if (code)
 343                 return code;
 344         } else {
 345             ubik_print("Log read error on pass 2\n");
 346             return UBADLOG;
 347         }
 348     }
 349
 350     /* now truncate the log, we're done with it */
 351     code = (*adbase->truncate) (adbase, LOGFILE, 0);
 352     return code;
 353 }
 354
 355 /*! \brief
 356  * Called at initialization to figure out version of the dbase we really have.
 357  *
 358  * This routine is called after replaying the log; it reads the restored labels.
 359  */
 360 static int
 361 InitializeDB(struct ubik_dbase *adbase)
 362 {
 363     afs_int32 code;
 364
 365     code = (*adbase->getlabel) (adbase, 0, &adbase->version);
 366     if (code) {
 367         /* try setting the label to a new value */
 368         UBIK_VERSION_LOCK;
 369         adbase->version.epoch = 1;      /* value for newly-initialized db */
 370         adbase->version.counter = 1;
 371         code = (*adbase->setlabel) (adbase, 0, &adbase->version);
 372         if (code) {
 373             /* failed, try to set it back */
 374             adbase->version.epoch = 0;
 375             adbase->version.counter = 0;
 376             (*adbase->setlabel) (adbase, 0, &adbase->version);
 377         }
 378 #ifdef AFS_PTHREAD_ENV
 379         CV_BROADCAST(&adbase->version_cond);
 380 #else
 381         LWP_NoYieldSignal(&adbase->version);
 382 #endif
 383         UBIK_VERSION_UNLOCK;
 384     }
 385     return 0;
 386 }
 387
 388 /*!
 389  * \brief initialize the local ubik_dbase
 390  *
 391  * We replay the logs and then read the resulting file to figure out what version we've really got.
 392  */
 393 int
 394 urecovery_Initialize(struct ubik_dbase *adbase)
 395 {
 396     afs_int32 code;
 397
 398     code = ReplayLog(adbase);
 399     if (code)
 400         return code;
 401     code = InitializeDB(adbase);
 402     return code;
 403 }
 404
 405 /*!
 406  * \brief Main interaction loop for the recovery manager
 407  *
 408  * The recovery light-weight process only runs when you're the
 409  * synchronization site.  It performs the following tasks, if and only
 410  * if the prerequisite tasks have been performed successfully (it
 411  * keeps track of which ones have been performed in its bit map,
 412  * \p urecovery_state).
 413  *
 414  * First, it is responsible for probing that all servers are up.  This
 415  * is the only operation that must be performed even if this is not
 416  * yet the sync site, since otherwise this site may not notice that
 417  * enough other machines are running to even elect this guy to be the
 418  * sync site.
 419  *
 420  * After that, the recovery process does nothing until the beacon and
 421  * voting modules manage to get this site elected sync site.
 422  *
 423  * After becoming sync site, recovery first attempts to find the best
 424  * database available in the network (it must do this in order to
 425  * ensure finding the latest committed data).  After finding the right
 426  * database, it must fetch this dbase to the sync site.
 427  *
 428  * After fetching the dbase, it relabels it with a new version number,
 429  * to ensure that everyone recognizes this dbase as the most recent
 430  * dbase.
 431  *
 432  * One the dbase has been relabelled, this machine can start handling
 433  * requests.  However, the recovery module still has one more task:
 434  * propagating the dbase out to everyone who is up in the network.
 435  */
 436 void *
 437 urecovery_Interact(void *dummy)
 438 {
 439     afs_int32 code, tcode;
 440     struct ubik_server *bestServer = NULL;
 441     struct ubik_server *ts;
 442     int dbok, doingRPC, now;
 443     afs_int32 lastProbeTime;
 444     /* if we're the sync site, the best db version we've found yet */
 445     static struct ubik_version bestDBVersion;
 446     struct ubik_version tversion;
 447     struct timeval tv;
 448     int length, tlen, offset, file, nbytes;
 449     struct rx_call *rxcall;
 450     char tbuffer[1024];
 451     struct ubik_stat ubikstat;
 452     struct in_addr inAddr;
 453     char hoststr[16];
 454     char pbuffer[1028];
 455     int fd = -1;
 456     afs_int32 pass;
 457
 458     /* otherwise, begin interaction */
 459     urecovery_state = 0;
 460     lastProbeTime = 0;
 461     while (1) {
 462         /* Run through this loop every 4 seconds */
 463         tv.tv_sec = 4;
 464         tv.tv_usec = 0;
 465 #ifdef AFS_PTHREAD_ENV
 466         select(0, 0, 0, 0, &tv);
 467 #else
 468         IOMGR_Select(0, 0, 0, 0, &tv);
 469 #endif
 470
 471         ubik_dprint("recovery running in state %x\n", urecovery_state);
 472
 473         /* Every 30 seconds, check all the down servers and mark them
 474          * as up if they respond. When a server comes up or found to
 475          * not be current, then re-find the the best database and
 476          * propogate it.
 477          */
 478         if ((now = FT_ApproxTime()) > 30 + lastProbeTime) {
 479
 480 #ifdef AFS_PTHREAD_ENV
 481             DBHOLD(ubik_dbase);
 482 #endif
 483
 484             for (ts = ubik_servers, doingRPC = 0; ts; ts = ts->next) {
 485                 UBIK_BEACON_LOCK;
 486                 if (!ts->up) {
 487                     UBIK_BEACON_UNLOCK;
 488                     doingRPC = 1;
 489                     code = DoProbe(ts);
 490                     if (code == 0) {
 491                         UBIK_BEACON_LOCK;
 492                         ts->up = 1;
 493                         urecovery_state &= ~UBIK_RECFOUNDDB;
 494                     }
 495                 } else if (!ts->currentDB) {
 496                     urecovery_state &= ~UBIK_RECFOUNDDB;
 497                 }
 498                 UBIK_BEACON_UNLOCK;
 499             }
 500
 501 #ifdef AFS_PTHREAD_ENV
 502             DBRELE(ubik_dbase);
 503 #endif
 504
 505             if (doingRPC)
 506                 now = FT_ApproxTime();
 507             lastProbeTime = now;
 508         }
 509
 510         /* Mark whether we are the sync site */
 511         if (!ubeacon_AmSyncSite()) {
 512             urecovery_state &= ~UBIK_RECSYNCSITE;
 513             DBRELE(ubik_dbase);
 514             continue;           /* nothing to do */
 515         }
 516         urecovery_state |= UBIK_RECSYNCSITE;
 517
 518         /* If a server has just come up or if we have not found the
 519          * most current database, then go find the most current db.
 520          */
 521         if (!(urecovery_state & UBIK_RECFOUNDDB)) {
 522             bestServer = (struct ubik_server *)0;
 523             bestDBVersion.epoch = 0;
 524             bestDBVersion.counter = 0;
 525             for (ts = ubik_servers; ts; ts = ts->next) {
 526                 UBIK_BEACON_LOCK;
 527                 if (!ts->up) {
 528                     UBIK_BEACON_UNLOCK;
 529                     continue;   /* don't bother with these guys */
 530                 }
 531                 UBIK_BEACON_UNLOCK;
 532                 if (ts->isClone)
 533                     continue;
 534                 UBIK_ADDR_LOCK;
 535                 code = DISK_GetVersion(ts->disk_rxcid, &ts->version);
 536                 UBIK_ADDR_UNLOCK;
 537                 if (code == 0) {
 538                     /* perhaps this is the best version */
 539                     if (vcmp(ts->version, bestDBVersion) > 0) {
 540                         /* new best version */
 541                         bestDBVersion = ts->version;
 542                         bestServer = ts;
 543                     }
 544                 }
 545             }
 546             /* take into consideration our version. Remember if we,
 547              * the sync site, have the best version. Also note that
 548              * we may need to send the best version out.
 549              */
 550             if (vcmp(ubik_dbase->version, bestDBVersion) >= 0) {
 551                 bestDBVersion = ubik_dbase->version;
 552                 bestServer = (struct ubik_server *)0;
 553                 urecovery_state |= UBIK_RECHAVEDB;
 554             } else {
 555                 /* Clear the flag only when we know we have to retrieve
 556                  * the db. Because urecovery_AllBetter() looks at it.
 557                  */
 558                 urecovery_state &= ~UBIK_RECHAVEDB;
 559             }
 560             urecovery_state |= UBIK_RECFOUNDDB;
 561             urecovery_state &= ~UBIK_RECSENTDB;
 562         }
 563         if (!(urecovery_state & UBIK_RECFOUNDDB)) {
 564             DBRELE(ubik_dbase);
 565             continue;           /* not ready */
 566         }
 567
 568         /* If we, the sync site, do not have the best db version, then
 569          * go and get it from the server that does.
 570          */
 571         if ((urecovery_state & UBIK_RECHAVEDB) || !bestServer) {
 572             urecovery_state |= UBIK_RECHAVEDB;
 573         } else {
 574             /* we don't have the best version; we should fetch it. */
 575             urecovery_AbortAll(ubik_dbase);
 576
 577             /* Rx code to do the Bulk fetch */
 578             file = 0;
 579             offset = 0;
 580             UBIK_ADDR_LOCK;
 581             rxcall = rx_NewCall(bestServer->disk_rxcid);
 582
 583             ubik_print("Ubik: Synchronize database with server %s\n",
 584                        afs_inet_ntoa_r(bestServer->addr[0], hoststr));
 585             UBIK_ADDR_UNLOCK;
 586
 587             code = StartDISK_GetFile(rxcall, file);
 588             if (code) {
 589                 ubik_dprint("StartDiskGetFile failed=%d\n", code);
 590                 goto FetchEndCall;
 591             }
 592             nbytes = rx_Read(rxcall, (char *)&length, sizeof(afs_int32));
 593             length = ntohl(length);
 594             if (nbytes != sizeof(afs_int32)) {
 595                 ubik_dprint("Rx-read length error=%d\n", code = BULK_ERROR);
 596                 code = EIO;
 597                 goto FetchEndCall;
 598             }
 599
 600             /* give invalid label during file transit */
 601             UBIK_VERSION_LOCK;
 602             tversion.epoch = 0;
 603             code = (*ubik_dbase->setlabel) (ubik_dbase, file, &tversion);
 604             UBIK_VERSION_UNLOCK;
 605             if (code) {
 606                 ubik_dprint("setlabel io error=%d\n", code);
 607                 goto FetchEndCall;
 608             }
 609             snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.TMP",
 610                      ubik_dbase->pathName, (file<0)?"SYS":"",
 611                      (file<0)?-file:file);
 612             fd = open(pbuffer, O_CREAT | O_RDWR | O_TRUNC, 0600);
 613             if (fd < 0) {
 614                 code = errno;
 615                 goto FetchEndCall;
 616             }
 617             code = lseek(fd, HDRSIZE, 0);
 618             if (code != HDRSIZE) {
 619                 close(fd);
 620                 goto FetchEndCall;
 621             }
 622
 623             pass = 0;
 624             while (length > 0) {
 625                 tlen = (length > sizeof(tbuffer) ? sizeof(tbuffer) : length);
 626 #ifndef AFS_PTHREAD_ENV
 627                 if (pass % 4 == 0)
 628                     IOMGR_Poll();
 629 #endif
 630                 nbytes = rx_Read(rxcall, tbuffer, tlen);
 631                 if (nbytes != tlen) {
 632                     ubik_dprint("Rx-read bulk error=%d\n", code = BULK_ERROR);
 633                     code = EIO;
 634                     close(fd);
 635                     goto FetchEndCall;
 636                 }
 637                 nbytes = write(fd, tbuffer, tlen);
 638                 pass++;
 639                 if (nbytes != tlen) {
 640                     code = UIOERROR;
 641                     close(fd);
 642                     goto FetchEndCall;
 643                 }
 644                 offset += tlen;
 645                 length -= tlen;
 646             }
 647             code = close(fd);
 648             if (code)
 649                 goto FetchEndCall;
 650             code = EndDISK_GetFile(rxcall, &tversion);
 651           FetchEndCall:
 652             tcode = rx_EndCall(rxcall, code);
 653             if (!code)
 654                 code = tcode;
 655             if (!code) {
 656                 /* we got a new file, set up its header */
 657                 urecovery_state |= UBIK_RECHAVEDB;
 658                 UBIK_VERSION_LOCK;
 659                 memcpy(&ubik_dbase->version, &tversion,
 660                        sizeof(struct ubik_version));
 661                 snprintf(tbuffer, sizeof(tbuffer), "%s.DB%s%d",
 662                          ubik_dbase->pathName, (file<0)?"SYS":"",
 663                          (file<0)?-file:file);
 664 #ifdef AFS_NT40_ENV
 665                 snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.OLD",
 666                          ubik_dbase->pathName, (file<0)?"SYS":"",
 667                          (file<0)?-file:file);
 668                 code = unlink(pbuffer);
 669                 if (!code)
 670                     code = rename(tbuffer, pbuffer);
 671                 snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.TMP",
 672                          ubik_dbase->pathName, (file<0)?"SYS":"",
 673                          (file<0)?-file:file);
 674 #endif
 675                 if (!code)
 676                     code = rename(pbuffer, tbuffer);
 677                 if (!code) {
 678                     (*ubik_dbase->open) (ubik_dbase, file);
 679                     /* after data is good, sync disk with correct label */
 680                     code =
 681                         (*ubik_dbase->setlabel) (ubik_dbase, 0,
 682                                                  &ubik_dbase->version);
 683                 }
 684                 UBIK_VERSION_UNLOCK;
 685 #ifdef AFS_NT40_ENV
 686                 snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.OLD",
 687                          ubik_dbase->pathName, (file<0)?"SYS":"",
 688                          (file<0)?-file:file);
 689                 unlink(pbuffer);
 690 #endif
 691             }
 692             if (code) {
 693                 unlink(pbuffer);
 694                 /*
 695                  * We will effectively invalidate the old data forever now.
 696                  * Unclear if we *should* but we do.
 697                  */
 698                 UBIK_VERSION_LOCK;
 699                 ubik_dbase->version.epoch = 0;
 700                 ubik_dbase->version.counter = 0;
 701                 UBIK_VERSION_UNLOCK;
 702                 ubik_print("Ubik: Synchronize database failed (error = %d)\n",
 703                            code);
 704             } else {
 705                 ubik_print("Ubik: Synchronize database completed\n");
 706                 urecovery_state |= UBIK_RECHAVEDB;
 707             }
 708             udisk_Invalidate(ubik_dbase, 0);    /* data has changed */
 709 #ifdef AFS_PTHREAD_ENV
 710             CV_BROADCAST(&ubik_dbase->version_cond);
 711 #else
 712             LWP_NoYieldSignal(&ubik_dbase->version);
 713 #endif
 714             DBRELE(ubik_dbase);
 715         }
 716         if (!(urecovery_state & UBIK_RECHAVEDB)) {
 717             DBRELE(ubik_dbase);
 718             continue;           /* not ready */
 719         }
 720
 721         /* If the database was newly initialized, then when we establish quorum, write
 722          * a new label. This allows urecovery_AllBetter() to allow access for reads.
 723          * Setting it to 2 also allows another site to come along with a newer
 724          * database and overwrite this one.
 725          */
 726         if (ubik_dbase->version.epoch == 1) {
 727             urecovery_AbortAll(ubik_dbase);
 728             UBIK_VERSION_LOCK;
 729             version_globals.ubik_epochTime = 2;
 730             ubik_dbase->version.epoch = version_globals.ubik_epochTime;
 731             ubik_dbase->version.counter = 1;
 732             code =
 733                 (*ubik_dbase->setlabel) (ubik_dbase, 0, &ubik_dbase->version);
 734             UBIK_VERSION_UNLOCK;
 735             udisk_Invalidate(ubik_dbase, 0);    /* data may have changed */
 736 #ifdef AFS_PTHREAD_ENV
 737             CV_BROADCAST(&ubik_dbase->version_cond);
 738 #else
 739             LWP_NoYieldSignal(&ubik_dbase->version);
 740 #endif
 741         }
 742
 743         /* Check the other sites and send the database to them if they
 744          * do not have the current db.
 745          */
 746         if (!(urecovery_state & UBIK_RECSENTDB)) {
 747             /* now propagate out new version to everyone else */
 748             dbok = 1;           /* start off assuming they all worked */
 749
 750             /*
 751              * Check if a write transaction is in progress. We can't send the
 752              * db when a write is in progress here because the db would be
 753              * obsolete as soon as it goes there. Also, ops after the begin
 754              * trans would reach the recepient and wouldn't find a transaction
 755              * pending there.  Frankly, I don't think it's possible to get past
 756              * the write-lock above if there is a write transaction in progress,
 757              * but then, it won't hurt to check, will it?
 758              */
 759             if (ubik_dbase->flags & DBWRITING) {
 760                 struct timeval tv;
 761                 int safety = 0;
 762                 tv.tv_sec = 0;
 763                 tv.tv_usec = 50000;
 764                 while ((ubik_dbase->flags & DBWRITING) && (safety < 500)) {
 765                     DBRELE(ubik_dbase);
 766                     /* sleep for a little while */
 767 #ifdef AFS_PTHREAD_ENV
 768                     select(0, 0, 0, 0, &tv);
 769 #else
 770                     IOMGR_Select(0, 0, 0, 0, &tv);
 771 #endif
 772                     tv.tv_usec += 10000;
 773                     safety++;
 774                     DBHOLD(ubik_dbase);
 775                 }
 776             }
 777
 778             for (ts = ubik_servers; ts; ts = ts->next) {
 779                 UBIK_ADDR_LOCK;
 780                 inAddr.s_addr = ts->addr[0];
 781                 UBIK_ADDR_UNLOCK;
 782                 UBIK_BEACON_LOCK;
 783                 if (!ts->up) {
 784                     UBIK_BEACON_UNLOCK;
 785                     ubik_dprint("recovery cannot send version to %s\n",
 786                                 afs_inet_ntoa_r(inAddr.s_addr, hoststr));
 787                     dbok = 0;
 788                     continue;
 789                 }
 790                 UBIK_BEACON_UNLOCK;
 791                 ubik_dprint("recovery sending version to %s\n",
 792                             afs_inet_ntoa_r(inAddr.s_addr, hoststr));
 793                 if (vcmp(ts->version, ubik_dbase->version) != 0) {
 794                     ubik_dprint("recovery stating local database\n");
 795
 796                     /* Rx code to do the Bulk Store */
 797                     code = (*ubik_dbase->stat) (ubik_dbase, 0, &ubikstat);
 798                     if (!code) {
 799                         length = ubikstat.size;
 800                         file = offset = 0;
 801                         UBIK_ADDR_LOCK;
 802                         rxcall = rx_NewCall(ts->disk_rxcid);
 803                         UBIK_ADDR_UNLOCK;
 804                         code =
 805                             StartDISK_SendFile(rxcall, file, length,
 806                                                &ubik_dbase->version);
 807                         if (code) {
 808                             ubik_dprint("StartDiskSendFile failed=%d\n",
 809                                         code);
 810                             goto StoreEndCall;
 811                         }
 812                         while (length > 0) {
 813                             tlen =
 814                                 (length >
 815                                  sizeof(tbuffer) ? sizeof(tbuffer) : length);
 816                             nbytes =
 817                                 (*ubik_dbase->read) (ubik_dbase, file,
 818                                                      tbuffer, offset, tlen);
 819                             if (nbytes != tlen) {
 820                                 ubik_dprint("Local disk read error=%d\n",
 821                                             code = UIOERROR);
 822                                 goto StoreEndCall;
 823                             }
 824                             nbytes = rx_Write(rxcall, tbuffer, tlen);
 825                             if (nbytes != tlen) {
 826                                 ubik_dprint("Rx-write bulk error=%d\n", code =
 827                                             BULK_ERROR);
 828                                 goto StoreEndCall;
 829                             }
 830                             offset += tlen;
 831                             length -= tlen;
 832                         }
 833                         code = EndDISK_SendFile(rxcall);
 834                       StoreEndCall:
 835                         code = rx_EndCall(rxcall, code);
 836                     }
 837                     if (code == 0) {
 838                         /* we set a new file, process its header */
 839                         ts->version = ubik_dbase->version;
 840                         ts->currentDB = 1;
 841                     } else
 842                         dbok = 0;
 843                 } else {
 844                     /* mark file up to date */
 845                     ts->currentDB = 1;
 846                 }
 847             }
 848             if (dbok)
 849                 urecovery_state |= UBIK_RECSENTDB;
 850         }
 851         DBRELE(ubik_dbase);
 852     }
 853     return NULL;
 854 }
 855
 856 /*!
 857  * \brief send a Probe to all the network address of this server
 858  *
 859  * \return 0 if success, else return 1
 860  */
 861 int
 862 DoProbe(struct ubik_server *server)
 863 {
 864     struct rx_connection *conns[UBIK_MAX_INTERFACE_ADDR];
 865     struct rx_connection *connSuccess = 0;
 866     int i, j, success_i = -1;
 867     afs_uint32 addr;
 868     char buffer[32];
 869     char hoststr[16];
 870
 871     UBIK_ADDR_LOCK;
 872     for (i = 0; (addr = server->addr[i]) && (i < UBIK_MAX_INTERFACE_ADDR);
 873          i++) {
 874         conns[i] =
 875             rx_NewConnection(addr, ubik_callPortal, DISK_SERVICE_ID,
 876                              addr_globals.ubikSecClass, addr_globals.ubikSecIndex);
 877
 878         /* user requirement to use only the primary interface */
 879         if (ubikPrimaryAddrOnly) {
 880             i = 1;
 881             break;
 882         }
 883     }
 884     UBIK_ADDR_UNLOCK;
 885     osi_Assert(i);                      /* at least one interface address for this server */
 886
 887 #ifdef AFS_PTHREAD_ENV
 888     DBRELE(ubik_dbase);
 889 #endif
 890
 891     multi_Rx(conns, i) {
 892         multi_DISK_Probe();
 893         if (!multi_error) {     /* first success */
 894             success_i = multi_i;
 895
 896             multi_Abort;
 897         }
 898     } multi_End_Ignore;
 899
 900 #ifdef AFS_PTHREAD_ENV
 901     DBHOLD(ubik_dbase);
 902 #endif
 903
 904     if (success_i >= 0) {
 905         UBIK_ADDR_LOCK;
 906         addr = server->addr[success_i]; /* successful interface addr */
 907
 908         if (server->disk_rxcid) /* destroy existing conn */
 909             rx_DestroyConnection(server->disk_rxcid);
 910         if (server->vote_rxcid)
 911             rx_DestroyConnection(server->vote_rxcid);
 912
 913         /* make new connections */
 914         server->disk_rxcid = conns[success_i];
 915         server->vote_rxcid = rx_NewConnection(addr, ubik_callPortal,
 916                                               VOTE_SERVICE_ID, addr_globals.ubikSecClass,
 917                                               addr_globals.ubikSecIndex);
 918
 919         connSuccess = conns[success_i];
 920         strcpy(buffer, afs_inet_ntoa_r(server->addr[0], hoststr));
 921
 922         ubik_print("ubik:server %s is back up: will be contacted through %s\n",
 923              buffer, afs_inet_ntoa_r(addr, hoststr));
 924         UBIK_ADDR_UNLOCK;
 925     }
 926
 927     /* Destroy all connections except the one on which we succeeded */
 928     for (j = 0; j < i; j++)
 929         if (conns[j] != connSuccess)
 930             rx_DestroyConnection(conns[j]);
 931
 932     if (!connSuccess)
 933         ubik_dprint("ubik:server %s still down\n",
 934                     afs_inet_ntoa_r(server->addr[0], hoststr));
 935
 936     if (connSuccess)
 937         return 0;               /* success */
 938     else
 939         return 1;               /* failure */
 940 }