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() && (vcmp(ubik_dbVersion, ubik_dbase->version) == 0))) {       /* && 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         adbase->version.epoch = 1;      /* value for newly-initialized db */
 369         adbase->version.counter = 1;
 370         code = (*adbase->setlabel) (adbase, 0, &adbase->version);
 371         if (code) {
 372             /* failed, try to set it back */
 373             adbase->version.epoch = 0;
 374             adbase->version.counter = 0;
 375             (*adbase->setlabel) (adbase, 0, &adbase->version);
 376         }
 377 #ifdef AFS_PTHREAD_ENV
 378         CV_BROADCAST(&adbase->version_cond);
 379 #else
 380         LWP_NoYieldSignal(&adbase->version);
 381 #endif
 382     }
 383     return 0;
 384 }
 385
 386 /*!
 387  * \brief initialize the local ubik_dbase
 388  *
 389  * We replay the logs and then read the resulting file to figure out what version we've really got.
 390  */
 391 int
 392 urecovery_Initialize(struct ubik_dbase *adbase)
 393 {
 394     afs_int32 code;
 395
 396     code = ReplayLog(adbase);
 397     if (code)
 398         return code;
 399     code = InitializeDB(adbase);
 400     return code;
 401 }
 402
 403 /*!
 404  * \brief Main interaction loop for the recovery manager
 405  *
 406  * The recovery light-weight process only runs when you're the
 407  * synchronization site.  It performs the following tasks, if and only
 408  * if the prerequisite tasks have been performed successfully (it
 409  * keeps track of which ones have been performed in its bit map,
 410  * \p urecovery_state).
 411  *
 412  * First, it is responsible for probing that all servers are up.  This
 413  * is the only operation that must be performed even if this is not
 414  * yet the sync site, since otherwise this site may not notice that
 415  * enough other machines are running to even elect this guy to be the
 416  * sync site.
 417  *
 418  * After that, the recovery process does nothing until the beacon and
 419  * voting modules manage to get this site elected sync site.
 420  *
 421  * After becoming sync site, recovery first attempts to find the best
 422  * database available in the network (it must do this in order to
 423  * ensure finding the latest committed data).  After finding the right
 424  * database, it must fetch this dbase to the sync site.
 425  *
 426  * After fetching the dbase, it relabels it with a new version number,
 427  * to ensure that everyone recognizes this dbase as the most recent
 428  * dbase.
 429  *
 430  * One the dbase has been relabelled, this machine can start handling
 431  * requests.  However, the recovery module still has one more task:
 432  * propagating the dbase out to everyone who is up in the network.
 433  */
 434 void *
 435 urecovery_Interact(void *dummy)
 436 {
 437     afs_int32 code, tcode;
 438     struct ubik_server *bestServer = NULL;
 439     struct ubik_server *ts;
 440     int dbok, doingRPC, now;
 441     afs_int32 lastProbeTime;
 442     /* if we're the sync site, the best db version we've found yet */
 443     static struct ubik_version bestDBVersion;
 444     struct ubik_version tversion;
 445     struct timeval tv;
 446     int length, tlen, offset, file, nbytes;
 447     struct rx_call *rxcall;
 448     char tbuffer[1024];
 449     struct ubik_stat ubikstat;
 450     struct in_addr inAddr;
 451     char hoststr[16];
 452     char pbuffer[1028];
 453     int fd = -1;
 454     afs_int32 pass;
 455
 456     /* otherwise, begin interaction */
 457     urecovery_state = 0;
 458     lastProbeTime = 0;
 459     while (1) {
 460         /* Run through this loop every 4 seconds */
 461         tv.tv_sec = 4;
 462         tv.tv_usec = 0;
 463 #ifdef AFS_PTHREAD_ENV
 464         select(0, 0, 0, 0, &tv);
 465 #else
 466         IOMGR_Select(0, 0, 0, 0, &tv);
 467 #endif
 468
 469         ubik_dprint("recovery running in state %x\n", urecovery_state);
 470
 471         /* Every 30 seconds, check all the down servers and mark them
 472          * as up if they respond. When a server comes up or found to
 473          * not be current, then re-find the the best database and
 474          * propogate it.
 475          */
 476         if ((now = FT_ApproxTime()) > 30 + lastProbeTime) {
 477
 478 #ifdef AFS_PTHREAD_ENV
 479             DBHOLD(ubik_dbase);
 480 #endif
 481
 482             for (ts = ubik_servers, doingRPC = 0; ts; ts = ts->next) {
 483                 UBIK_BEACON_LOCK;
 484                 if (!ts->up) {
 485                     UBIK_BEACON_UNLOCK;
 486                     doingRPC = 1;
 487                     code = DoProbe(ts);
 488                     if (code == 0) {
 489                         UBIK_BEACON_LOCK;
 490                         ts->up = 1;
 491                         urecovery_state &= ~UBIK_RECFOUNDDB;
 492                     }
 493                 } else if (!ts->currentDB) {
 494                     urecovery_state &= ~UBIK_RECFOUNDDB;
 495                 }
 496                 UBIK_BEACON_UNLOCK;
 497             }
 498
 499 #ifdef AFS_PTHREAD_ENV
 500             DBRELE(ubik_dbase);
 501 #endif
 502
 503             if (doingRPC)
 504                 now = FT_ApproxTime();
 505             lastProbeTime = now;
 506         }
 507
 508         /* Mark whether we are the sync site */
 509         if (!ubeacon_AmSyncSite()) {
 510             urecovery_state &= ~UBIK_RECSYNCSITE;
 511             continue;           /* nothing to do */
 512         }
 513         urecovery_state |= UBIK_RECSYNCSITE;
 514
 515         /* If a server has just come up or if we have not found the
 516          * most current database, then go find the most current db.
 517          */
 518         if (!(urecovery_state & UBIK_RECFOUNDDB)) {
 519             bestServer = (struct ubik_server *)0;
 520             bestDBVersion.epoch = 0;
 521             bestDBVersion.counter = 0;
 522             for (ts = ubik_servers; ts; ts = ts->next) {
 523                 UBIK_BEACON_LOCK;
 524                 if (!ts->up) {
 525                     UBIK_BEACON_UNLOCK;
 526                     continue;   /* don't bother with these guys */
 527                 }
 528                 UBIK_BEACON_UNLOCK;
 529                 if (ts->isClone)
 530                     continue;
 531                 code = DISK_GetVersion(ts->disk_rxcid, &ts->version);
 532                 if (code == 0) {
 533                     /* perhaps this is the best version */
 534                     if (vcmp(ts->version, bestDBVersion) > 0) {
 535                         /* new best version */
 536                         bestDBVersion = ts->version;
 537                         bestServer = ts;
 538                     }
 539                 }
 540             }
 541             /* take into consideration our version. Remember if we,
 542              * the sync site, have the best version. Also note that
 543              * we may need to send the best version out.
 544              */
 545             if (vcmp(ubik_dbase->version, bestDBVersion) >= 0) {
 546                 bestDBVersion = ubik_dbase->version;
 547                 bestServer = (struct ubik_server *)0;
 548                 urecovery_state |= UBIK_RECHAVEDB;
 549             } else {
 550                 /* Clear the flag only when we know we have to retrieve
 551                  * the db. Because urecovery_AllBetter() looks at it.
 552                  */
 553                 urecovery_state &= ~UBIK_RECHAVEDB;
 554             }
 555             urecovery_state |= UBIK_RECFOUNDDB;
 556             urecovery_state &= ~UBIK_RECSENTDB;
 557         }
 558         if (!(urecovery_state & UBIK_RECFOUNDDB))
 559             continue;           /* not ready */
 560
 561         /* If we, the sync site, do not have the best db version, then
 562          * go and get it from the server that does.
 563          */
 564         if ((urecovery_state & UBIK_RECHAVEDB) || !bestServer) {
 565             urecovery_state |= UBIK_RECHAVEDB;
 566         } else {
 567             /* we don't have the best version; we should fetch it. */
 568             DBHOLD(ubik_dbase);
 569             urecovery_AbortAll(ubik_dbase);
 570
 571             /* Rx code to do the Bulk fetch */
 572             file = 0;
 573             offset = 0;
 574             rxcall = rx_NewCall(bestServer->disk_rxcid);
 575
 576             ubik_print("Ubik: Synchronize database with server %s\n",
 577                        afs_inet_ntoa_r(bestServer->addr[0], hoststr));
 578
 579             code = StartDISK_GetFile(rxcall, file);
 580             if (code) {
 581                 ubik_dprint("StartDiskGetFile failed=%d\n", code);
 582                 goto FetchEndCall;
 583             }
 584             nbytes = rx_Read(rxcall, (char *)&length, sizeof(afs_int32));
 585             length = ntohl(length);
 586             if (nbytes != sizeof(afs_int32)) {
 587                 ubik_dprint("Rx-read length error=%d\n", code = BULK_ERROR);
 588                 code = EIO;
 589                 goto FetchEndCall;
 590             }
 591
 592             /* give invalid label during file transit */
 593             tversion.epoch = 0;
 594             code = (*ubik_dbase->setlabel) (ubik_dbase, file, &tversion);
 595             if (code) {
 596                 ubik_dprint("setlabel io error=%d\n", code);
 597                 goto FetchEndCall;
 598             }
 599             snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.TMP",
 600                      ubik_dbase->pathName, (file<0)?"SYS":"",
 601                      (file<0)?-file:file);
 602             fd = open(pbuffer, O_CREAT | O_RDWR | O_TRUNC, 0600);
 603             if (fd < 0) {
 604                 code = errno;
 605                 goto FetchEndCall;
 606             }
 607             code = lseek(fd, HDRSIZE, 0);
 608             if (code != HDRSIZE) {
 609                 close(fd);
 610                 goto FetchEndCall;
 611             }
 612
 613             pass = 0;
 614             while (length > 0) {
 615                 tlen = (length > sizeof(tbuffer) ? sizeof(tbuffer) : length);
 616 #ifndef AFS_PTHREAD_ENV
 617                 if (pass % 4 == 0)
 618                     IOMGR_Poll();
 619 #endif
 620                 nbytes = rx_Read(rxcall, tbuffer, tlen);
 621                 if (nbytes != tlen) {
 622                     ubik_dprint("Rx-read bulk error=%d\n", code = BULK_ERROR);
 623                     code = EIO;
 624                     close(fd);
 625                     goto FetchEndCall;
 626                 }
 627                 nbytes = write(fd, tbuffer, tlen);
 628                 pass++;
 629                 if (nbytes != tlen) {
 630                     code = UIOERROR;
 631                     close(fd);
 632                     goto FetchEndCall;
 633                 }
 634                 offset += tlen;
 635                 length -= tlen;
 636             }
 637             code = close(fd);
 638             if (code)
 639                 goto FetchEndCall;
 640             code = EndDISK_GetFile(rxcall, &tversion);
 641           FetchEndCall:
 642             tcode = rx_EndCall(rxcall, code);
 643             if (!code)
 644                 code = tcode;
 645             if (!code) {
 646                 /* we got a new file, set up its header */
 647                 urecovery_state |= UBIK_RECHAVEDB;
 648                 memcpy(&ubik_dbase->version, &tversion,
 649                        sizeof(struct ubik_version));
 650                 snprintf(tbuffer, sizeof(tbuffer), "%s.DB%s%d",
 651                          ubik_dbase->pathName, (file<0)?"SYS":"",
 652                          (file<0)?-file:file);
 653 #ifdef AFS_NT40_ENV
 654                 snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.OLD",
 655                          ubik_dbase->pathName, (file<0)?"SYS":"",
 656                          (file<0)?-file:file);
 657                 code = unlink(pbuffer);
 658                 if (!code)
 659                     code = rename(tbuffer, pbuffer);
 660                 snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.TMP",
 661                          ubik_dbase->pathName, (file<0)?"SYS":"",
 662                          (file<0)?-file:file);
 663 #endif
 664                 if (!code)
 665                     code = rename(pbuffer, tbuffer);
 666                 if (!code) {
 667                     (*ubik_dbase->open) (ubik_dbase, file);
 668                     /* after data is good, sync disk with correct label */
 669                     code =
 670                         (*ubik_dbase->setlabel) (ubik_dbase, 0,
 671                                                  &ubik_dbase->version);
 672                 }
 673 #ifdef AFS_NT40_ENV
 674                 snprintf(pbuffer, sizeof(pbuffer), "%s.DB%s%d.OLD",
 675                          ubik_dbase->pathName, (file<0)?"SYS":"",
 676                          (file<0)?-file:file);
 677                 unlink(pbuffer);
 678 #endif
 679             }
 680             if (code) {
 681                 unlink(pbuffer);
 682                 /*
 683                  * We will effectively invalidate the old data forever now.
 684                  * Unclear if we *should* but we do.
 685                  */
 686                 ubik_dbase->version.epoch = 0;
 687                 ubik_dbase->version.counter = 0;
 688                 ubik_print("Ubik: Synchronize database failed (error = %d)\n",
 689                            code);
 690             } else {
 691                 ubik_print("Ubik: Synchronize database completed\n");
 692                 urecovery_state |= UBIK_RECHAVEDB;
 693             }
 694             udisk_Invalidate(ubik_dbase, 0);    /* data has changed */
 695 #ifdef AFS_PTHREAD_ENV
 696             CV_BROADCAST(&ubik_dbase->version_cond);
 697 #else
 698             LWP_NoYieldSignal(&ubik_dbase->version);
 699 #endif
 700             DBRELE(ubik_dbase);
 701         }
 702         if (!(urecovery_state & UBIK_RECHAVEDB))
 703             continue;           /* not ready */
 704
 705         /* If the database was newly initialized, then when we establish quorum, write
 706          * a new label. This allows urecovery_AllBetter() to allow access for reads.
 707          * Setting it to 2 also allows another site to come along with a newer
 708          * database and overwrite this one.
 709          */
 710         if (ubik_dbase->version.epoch == 1) {
 711             DBHOLD(ubik_dbase);
 712             urecovery_AbortAll(ubik_dbase);
 713             ubik_epochTime = 2;
 714             ubik_dbase->version.epoch = ubik_epochTime;
 715             ubik_dbase->version.counter = 1;
 716             code =
 717                 (*ubik_dbase->setlabel) (ubik_dbase, 0, &ubik_dbase->version);
 718             udisk_Invalidate(ubik_dbase, 0);    /* data may have changed */
 719 #ifdef AFS_PTHREAD_ENV
 720             CV_BROADCAST(&ubik_dbase->version_cond);
 721 #else
 722             LWP_NoYieldSignal(&ubik_dbase->version);
 723 #endif
 724             DBRELE(ubik_dbase);
 725         }
 726
 727         /* Check the other sites and send the database to them if they
 728          * do not have the current db.
 729          */
 730         if (!(urecovery_state & UBIK_RECSENTDB)) {
 731             /* now propagate out new version to everyone else */
 732             dbok = 1;           /* start off assuming they all worked */
 733
 734             DBHOLD(ubik_dbase);
 735             /*
 736              * Check if a write transaction is in progress. We can't send the
 737              * db when a write is in progress here because the db would be
 738              * obsolete as soon as it goes there. Also, ops after the begin
 739              * trans would reach the recepient and wouldn't find a transaction
 740              * pending there.  Frankly, I don't think it's possible to get past
 741              * the write-lock above if there is a write transaction in progress,
 742              * but then, it won't hurt to check, will it?
 743              */
 744             if (ubik_dbase->flags & DBWRITING) {
 745                 struct timeval tv;
 746                 int safety = 0;
 747                 tv.tv_sec = 0;
 748                 tv.tv_usec = 50000;
 749                 while ((ubik_dbase->flags & DBWRITING) && (safety < 500)) {
 750                     DBRELE(ubik_dbase);
 751                     /* sleep for a little while */
 752 #ifdef AFS_PTHREAD_ENV
 753                     select(0, 0, 0, 0, &tv);
 754 #else
 755                     IOMGR_Select(0, 0, 0, 0, &tv);
 756 #endif
 757                     tv.tv_usec += 10000;
 758                     safety++;
 759                     DBHOLD(ubik_dbase);
 760                 }
 761             }
 762
 763             for (ts = ubik_servers; ts; ts = ts->next) {
 764                 inAddr.s_addr = ts->addr[0];
 765                 UBIK_BEACON_LOCK;
 766                 if (!ts->up) {
 767                     UBIK_BEACON_UNLOCK;
 768                     ubik_dprint("recovery cannot send version to %s\n",
 769                                 afs_inet_ntoa_r(inAddr.s_addr, hoststr));
 770                     dbok = 0;
 771                     continue;
 772                 }
 773                 UBIK_BEACON_UNLOCK;
 774                 ubik_dprint("recovery sending version to %s\n",
 775                             afs_inet_ntoa_r(inAddr.s_addr, hoststr));
 776                 if (vcmp(ts->version, ubik_dbase->version) != 0) {
 777                     ubik_dprint("recovery stating local database\n");
 778
 779                     /* Rx code to do the Bulk Store */
 780                     code = (*ubik_dbase->stat) (ubik_dbase, 0, &ubikstat);
 781                     if (!code) {
 782                         length = ubikstat.size;
 783                         file = offset = 0;
 784                         rxcall = rx_NewCall(ts->disk_rxcid);
 785                         code =
 786                             StartDISK_SendFile(rxcall, file, length,
 787                                                &ubik_dbase->version);
 788                         if (code) {
 789                             ubik_dprint("StartDiskSendFile failed=%d\n",
 790                                         code);
 791                             goto StoreEndCall;
 792                         }
 793                         while (length > 0) {
 794                             tlen =
 795                                 (length >
 796                                  sizeof(tbuffer) ? sizeof(tbuffer) : length);
 797                             nbytes =
 798                                 (*ubik_dbase->read) (ubik_dbase, file,
 799                                                      tbuffer, offset, tlen);
 800                             if (nbytes != tlen) {
 801                                 ubik_dprint("Local disk read error=%d\n",
 802                                             code = UIOERROR);
 803                                 goto StoreEndCall;
 804                             }
 805                             nbytes = rx_Write(rxcall, tbuffer, tlen);
 806                             if (nbytes != tlen) {
 807                                 ubik_dprint("Rx-write bulk error=%d\n", code =
 808                                             BULK_ERROR);
 809                                 goto StoreEndCall;
 810                             }
 811                             offset += tlen;
 812                             length -= tlen;
 813                         }
 814                         code = EndDISK_SendFile(rxcall);
 815                       StoreEndCall:
 816                         code = rx_EndCall(rxcall, code);
 817                     }
 818                     if (code == 0) {
 819                         /* we set a new file, process its header */
 820                         ts->version = ubik_dbase->version;
 821                         ts->currentDB = 1;
 822                     } else
 823                         dbok = 0;
 824                 } else {
 825                     /* mark file up to date */
 826                     ts->currentDB = 1;
 827                 }
 828             }
 829             DBRELE(ubik_dbase);
 830             if (dbok)
 831                 urecovery_state |= UBIK_RECSENTDB;
 832         }
 833     }
 834     return NULL;
 835 }
 836
 837 /*!
 838  * \brief send a Probe to all the network address of this server
 839  *
 840  * \return 0 if success, else return 1
 841  */
 842 int
 843 DoProbe(struct ubik_server *server)
 844 {
 845     struct rx_connection *conns[UBIK_MAX_INTERFACE_ADDR];
 846     struct rx_connection *connSuccess = 0;
 847     int i, j, success_i = -1;
 848     afs_uint32 addr;
 849     char buffer[32];
 850     char hoststr[16];
 851     extern afs_int32 ubikSecIndex;
 852     extern struct rx_securityClass *ubikSecClass;
 853
 854     for (i = 0; (addr = server->addr[i]) && (i < UBIK_MAX_INTERFACE_ADDR);
 855          i++) {
 856         conns[i] =
 857             rx_NewConnection(addr, ubik_callPortal, DISK_SERVICE_ID,
 858                              ubikSecClass, ubikSecIndex);
 859
 860         /* user requirement to use only the primary interface */
 861         if (ubikPrimaryAddrOnly) {
 862             i = 1;
 863             break;
 864         }
 865     }
 866     osi_Assert(i);                      /* at least one interface address for this server */
 867
 868 #ifdef AFS_PTHREAD_ENV
 869     DBRELE(ubik_dbase);
 870 #endif
 871
 872     multi_Rx(conns, i) {
 873         multi_DISK_Probe();
 874         if (!multi_error) {     /* first success */
 875             success_i = multi_i;
 876
 877             multi_Abort;
 878         }
 879     } multi_End_Ignore;
 880
 881 #ifdef AFS_PTHREAD_ENV
 882     DBHOLD(ubik_dbase);
 883 #endif
 884
 885     if (success_i >= 0) {
 886         addr = server->addr[success_i]; /* successful interface addr */
 887
 888         if (server->disk_rxcid) /* destroy existing conn */
 889             rx_DestroyConnection(server->disk_rxcid);
 890         if (server->vote_rxcid)
 891             rx_DestroyConnection(server->vote_rxcid);
 892
 893         /* make new connections */
 894         server->disk_rxcid = conns[success_i];
 895         server->vote_rxcid = rx_NewConnection(addr, ubik_callPortal,
 896                                               VOTE_SERVICE_ID, ubikSecClass,
 897                                               ubikSecIndex);
 898
 899         connSuccess = conns[success_i];
 900         strcpy(buffer, afs_inet_ntoa_r(server->addr[0], hoststr));
 901
 902         ubik_print("ubik:server %s is back up: will be contacted through %s\n",
 903              buffer, afs_inet_ntoa_r(addr, hoststr));
 904     }
 905
 906     /* Destroy all connections except the one on which we succeeded */
 907     for (j = 0; j < i; j++)
 908         if (conns[j] != connSuccess)
 909             rx_DestroyConnection(conns[j]);
 910
 911     if (!connSuccess)
 912         ubik_dprint("ubik:server %s still down\n",
 913                     afs_inet_ntoa_r(server->addr[0], hoststr));
 914
 915     if (connSuccess)
 916         return 0;               /* success */
 917     else
 918         return 1;               /* failure */
 919 }