db2/btree/bt_rec.c

   1 /*-
   2  * See the file LICENSE for redistribution information.
   3  *
   4  * Copyright (c) 1996, 1997
   5  *      Sleepycat Software.  All rights reserved.
   6  */
   7
   8 #include "config.h"
   9
  10 #ifndef lint
  11 static const char sccsid[] = "@(#)bt_rec.c      10.13 (Sleepycat) 9/3/97";
  12 #endif /* not lint */
  13
  14 #ifndef NO_SYSTEM_INCLUDES
  15 #include <sys/types.h>
  16
  17 #include <ctype.h>
  18 #include <errno.h>
  19 #include <stddef.h>
  20 #include <stdlib.h>
  21 #include <string.h>
  22 #endif
  23
  24 #include "db_int.h"
  25 #include "db_page.h"
  26 #include "shqueue.h"
  27 #include "hash.h"
  28 #include "btree.h"
  29 #include "log.h"
  30 #include "db_dispatch.h"
  31 #include "common_ext.h"
  32
  33 /*
  34  * __bam_pg_alloc_recover --
  35  *      Recovery function for pg_alloc.
  36  *
  37  * PUBLIC: int __bam_pg_alloc_recover
  38  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
  39  */
  40 int
  41 __bam_pg_alloc_recover(logp, dbtp, lsnp, redo, info)
  42         DB_LOG *logp;
  43         DBT *dbtp;
  44         DB_LSN *lsnp;
  45         int redo;
  46         void *info;
  47 {
  48         __bam_pg_alloc_args *argp;
  49         BTMETA *meta;
  50         DB_MPOOLFILE *mpf;
  51         PAGE *pagep;
  52         DB *file_dbp, *mdbp;
  53         db_pgno_t pgno;
  54         int cmp_n, cmp_p, created, modified, ret;
  55
  56         REC_PRINT(__bam_pg_alloc_print);
  57         REC_INTRO(__bam_pg_alloc_read);
  58
  59         /*
  60          * Fix up the allocated page.  If we're redoing the operation, we have
  61          * to get the page (creating it if it doesn't exist), and update its
  62          * LSN.  If we're undoing the operation, we have to reset the page's
  63          * LSN and put it on the free list.
  64          *
  65          * Fix up the metadata page.  If we're redoing the operation, we have
  66          * to get the metadata page and update its LSN and its free pointer.
  67          * If we're undoing the operation and the page was ever created, we put
  68          * it on the freelist.
  69          */
  70         pgno = PGNO_METADATA;
  71         if ((ret = memp_fget(mpf, &pgno, 0, &meta)) != 0) {
  72                 (void)__db_pgerr(file_dbp, pgno);
  73                 goto out;
  74         }
  75         if ((ret = memp_fget(mpf, &argp->pgno, DB_MPOOL_CREATE, &pagep)) != 0) {
  76                 (void)__db_pgerr(file_dbp, argp->pgno);
  77                 (void)memp_fput(mpf, meta, 0);
  78                 goto out;
  79         }
  80
  81         /* Fix up the allocated page. */
  82         created = IS_ZERO_LSN(LSN(pagep));
  83         modified = 0;
  84         cmp_n = log_compare(lsnp, &LSN(pagep));
  85         cmp_p = log_compare(&LSN(pagep), &argp->page_lsn);
  86         if ((created || cmp_p == 0) && redo) {
  87                 /* Need to redo update described. */
  88                 P_INIT(pagep, file_dbp->pgsize,
  89                     argp->pgno, PGNO_INVALID, PGNO_INVALID, 0, argp->ptype);
  90
  91                 pagep->lsn = *lsnp;
  92                 modified = 1;
  93         } else if ((created || cmp_n == 0) && !redo) {
  94                 /* Need to undo update described. */
  95                 P_INIT(pagep, file_dbp->pgsize,
  96                     argp->pgno, PGNO_INVALID, meta->free, 0, P_INVALID);
  97
  98                 pagep->lsn = argp->page_lsn;
  99                 modified = 1;
 100         }
 101         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) != 0) {
 102                 (void)__db_panic(file_dbp);
 103                 (void)memp_fput(mpf, meta, 0);
 104                 goto out;
 105         }
 106
 107         /* Fix up the metadata page. */
 108         modified = 0;
 109         cmp_n = log_compare(lsnp, &LSN(meta));
 110         cmp_p = log_compare(&LSN(meta), &argp->meta_lsn);
 111         if (cmp_p == 0 && redo) {
 112                 /* Need to redo update described. */
 113                 meta->lsn = *lsnp;
 114                 meta->free = argp->next;
 115                 modified = 1;
 116         } else if (cmp_n == 0 && !redo) {
 117                 /* Need to undo update described. */
 118                 meta->lsn = argp->meta_lsn;
 119                 meta->free = argp->pgno;
 120                 modified = 1;
 121         }
 122         if ((ret = memp_fput(mpf, meta, modified ? DB_MPOOL_DIRTY : 0)) != 0) {
 123                 (void)__db_panic(file_dbp);
 124                 goto out;
 125         }
 126
 127         *lsnp = argp->prev_lsn;
 128         ret = 0;
 129
 130 out:    REC_CLOSE;
 131 }
 132
 133 /*
 134  * __bam_pg_free_recover --
 135  *      Recovery function for pg_free.
 136  *
 137  * PUBLIC: int __bam_pg_free_recover
 138  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
 139  */
 140 int
 141 __bam_pg_free_recover(logp, dbtp, lsnp, redo, info)
 142         DB_LOG *logp;
 143         DBT *dbtp;
 144         DB_LSN *lsnp;
 145         int redo;
 146         void *info;
 147 {
 148         __bam_pg_free_args *argp;
 149         BTMETA *meta;
 150         DB *file_dbp, *mdbp;
 151         DB_MPOOLFILE *mpf;
 152         PAGE *pagep;
 153         db_pgno_t pgno;
 154         int cmp_n, cmp_p, modified, ret;
 155
 156         REC_PRINT(__bam_pg_free_print);
 157         REC_INTRO(__bam_pg_free_read);
 158
 159         /*
 160          * Fix up the freed page.  If we're redoing the operation we get the
 161          * page and explicitly discard its contents, then update its LSN.  If
 162          * we're undoing the operation, we get the page and restore its header.
 163          */
 164         if ((ret = memp_fget(mpf, &argp->pgno, 0, &pagep)) != 0) {
 165                 (void)__db_pgerr(file_dbp, argp->pgno);
 166                 goto out;
 167         }
 168         modified = 0;
 169         cmp_n = log_compare(lsnp, &LSN(pagep));
 170         cmp_p = log_compare(&LSN(pagep), &LSN(argp->header.data));
 171         if (cmp_p == 0 && redo) {
 172                 /* Need to redo update described. */
 173                 P_INIT(pagep, file_dbp->pgsize,
 174                     pagep->pgno, PGNO_INVALID, argp->next, 0, P_INVALID);
 175                 pagep->lsn = *lsnp;
 176
 177                 modified = 1;
 178         } else if (cmp_n == 0 && !redo) {
 179                 /* Need to undo update described. */
 180                 memcpy(pagep, argp->header.data, argp->header.size);
 181
 182                 modified = 1;
 183         }
 184         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) != 0) {
 185                 (void)__db_panic(file_dbp);
 186                 goto out;
 187         }
 188
 189         /*
 190          * Fix up the metadata page.  If we're redoing or undoing the operation
 191          * we get the page and update its LSN and free pointer.
 192          */
 193         pgno = PGNO_METADATA;
 194         if ((ret = memp_fget(mpf, &pgno, 0, &meta)) != 0) {
 195                 (void)__db_pgerr(file_dbp, pgno);
 196                 goto out;
 197         }
 198
 199         modified = 0;
 200         cmp_n = log_compare(lsnp, &LSN(meta));
 201         cmp_p = log_compare(&LSN(meta), &argp->meta_lsn);
 202         if (cmp_p == 0 && redo) {
 203                 /* Need to redo update described. */
 204                 meta->free = argp->pgno;
 205
 206                 meta->lsn = *lsnp;
 207                 modified = 1;
 208         } else if (cmp_n == 0 && !redo) {
 209                 /* Need to undo update described. */
 210                 meta->free = argp->next;
 211
 212                 meta->lsn = argp->meta_lsn;
 213                 modified = 1;
 214         }
 215         if ((ret = memp_fput(mpf, meta, modified ? DB_MPOOL_DIRTY : 0)) != 0) {
 216                 (void)__db_panic(file_dbp);
 217                 goto out;
 218         }
 219
 220         *lsnp = argp->prev_lsn;
 221         ret = 0;
 222
 223 out:    REC_CLOSE;
 224 }
 225
 226 /*
 227  * __bam_split_recover --
 228  *      Recovery function for split.
 229  *
 230  * PUBLIC: int __bam_split_recover
 231  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
 232  */
 233 int
 234 __bam_split_recover(logp, dbtp, lsnp, redo, info)
 235         DB_LOG *logp;
 236         DBT *dbtp;
 237         DB_LSN *lsnp;
 238         int redo;
 239         void *info;
 240 {
 241         __bam_split_args *argp;
 242         DB *file_dbp, *mdbp;
 243         DB_MPOOLFILE *mpf;
 244         PAGE *_lp, *lp, *np, *pp, *_rp, *rp, *sp;
 245         db_pgno_t pgno;
 246         int l_update, p_update, r_update, ret, rootsplit, t_ret;
 247
 248         REC_PRINT(__bam_split_print);
 249
 250         mpf = NULL;
 251         _lp = lp = np = pp = _rp = rp = NULL;
 252
 253         REC_INTRO(__bam_split_read);
 254
 255         /*
 256          * There are two kinds of splits that we have to recover from.  The
 257          * first is a root-page split, where the root page is split from a
 258          * leaf page into an internal page and two new leaf pages are created.
 259          * The second is where a page is split into two pages, and a new key
 260          * is inserted into the parent page.
 261          */
 262         sp = argp->pg.data;
 263         pgno = PGNO(sp);
 264         rootsplit = pgno == PGNO_ROOT;
 265         if (memp_fget(mpf, &argp->left, 0, &lp) != 0)
 266                 lp = NULL;
 267         if (memp_fget(mpf, &argp->right, 0, &rp) != 0)
 268                 rp = NULL;
 269
 270         if (redo) {
 271                 l_update = r_update = p_update = 0;
 272                 /*
 273                  * Decide if we need to resplit the page.
 274                  *
 275                  * If this is a root split, then the root has to exist, it's
 276                  * the page we're splitting and it gets modified.  If this is
 277                  * not a root split, then the left page has to exist, for the
 278                  * same reason.
 279                  */
 280                 if (rootsplit) {
 281                         if ((ret = memp_fget(mpf, &pgno, 0, &pp)) != 0) {
 282                                 (void)__db_pgerr(file_dbp, pgno);
 283                                 pp = NULL;
 284                                 goto out;
 285                         }
 286                         p_update =
 287                             log_compare(&LSN(pp), &LSN(argp->pg.data)) == 0;
 288                 } else
 289                         if (lp == NULL) {
 290                                 (void)__db_pgerr(file_dbp, argp->left);
 291                                 goto out;
 292                         }
 293                 if (lp == NULL || log_compare(&LSN(lp), &argp->llsn) == 0)
 294                         l_update = 1;
 295                 if (rp == NULL || log_compare(&LSN(rp), &argp->rlsn) == 0)
 296                         r_update = 1;
 297                 if (!p_update && !l_update && !r_update)
 298                         goto done;
 299
 300                 /* Allocate and initialize new left/right child pages. */
 301                 if ((_lp = (PAGE *)malloc(file_dbp->pgsize)) == NULL)
 302                         goto nomem;
 303                 if ((_rp = (PAGE *)malloc(file_dbp->pgsize)) == NULL) {
 304 nomem:                  __set_errno(ENOMEM);
 305                         __db_err(file_dbp->dbenv, "%s", strerror(errno));
 306                         goto out;
 307                 }
 308                 if (rootsplit) {
 309                         P_INIT(_lp, file_dbp->pgsize, argp->left,
 310                             PGNO_INVALID,
 311                             ISINTERNAL(sp) ? PGNO_INVALID : argp->right,
 312                             LEVEL(sp), TYPE(sp));
 313                         P_INIT(_rp, file_dbp->pgsize, argp->right,
 314                             ISINTERNAL(sp) ?  PGNO_INVALID : argp->left,
 315                             PGNO_INVALID, LEVEL(sp), TYPE(sp));
 316                 } else {
 317                         P_INIT(_lp, file_dbp->pgsize, PGNO(sp),
 318                             ISINTERNAL(sp) ? PGNO_INVALID : PREV_PGNO(sp),
 319                             ISINTERNAL(sp) ? PGNO_INVALID : argp->right,
 320                             LEVEL(sp), TYPE(sp));
 321                         P_INIT(_rp, file_dbp->pgsize, argp->right,
 322                             ISINTERNAL(sp) ? PGNO_INVALID : sp->pgno,
 323                             ISINTERNAL(sp) ? PGNO_INVALID : NEXT_PGNO(sp),
 324                             LEVEL(sp), TYPE(sp));
 325                 }
 326
 327                 /* Split the page. */
 328                 if ((ret = __bam_copy(file_dbp, sp, _lp, 0, argp->indx)) != 0 ||
 329                     (ret = __bam_copy(file_dbp, sp, _rp, argp->indx,
 330                     NUM_ENT(sp))) != 0)
 331                         goto out;
 332
 333                 /* If the left child is wrong, update it. */
 334                 if (lp == NULL && (ret =
 335                     memp_fget(mpf, &argp->left, DB_MPOOL_CREATE, &lp)) != 0) {
 336                         (void)__db_pgerr(file_dbp, argp->left);
 337                         lp = NULL;
 338                         goto out;
 339                 }
 340                 if (l_update) {
 341                         memcpy(lp, _lp, file_dbp->pgsize);
 342                         lp->lsn = *lsnp;
 343                         if ((ret = memp_fput(mpf, lp, DB_MPOOL_DIRTY)) != 0)
 344                                 goto fatal;
 345                         lp = NULL;
 346                 }
 347
 348                 /* If the right child is wrong, update it. */
 349                 if (rp == NULL && (ret = memp_fget(mpf,
 350                     &argp->right, DB_MPOOL_CREATE, &rp)) != 0) {
 351                         (void)__db_pgerr(file_dbp, argp->right);
 352                         rp = NULL;
 353                         goto out;
 354                 }
 355                 if (r_update) {
 356                         memcpy(rp, _rp, file_dbp->pgsize);
 357                         rp->lsn = *lsnp;
 358                         if ((ret = memp_fput(mpf, rp, DB_MPOOL_DIRTY)) != 0)
 359                                 goto fatal;
 360                         rp = NULL;
 361                 }
 362
 363                 /*
 364                  * If the parent page is wrong, update it.  This is of interest
 365                  * only if it was a root split, since root splits create parent
 366                  * pages.  All other splits modify a parent page, but those are
 367                  * separately logged and recovered.
 368                  */
 369                 if (rootsplit && p_update) {
 370                         if (file_dbp->type == DB_BTREE)
 371                                 P_INIT(pp, file_dbp->pgsize,
 372                                     PGNO_ROOT, PGNO_INVALID, PGNO_INVALID,
 373                                     _lp->level + 1, P_IBTREE);
 374                         else
 375                                 P_INIT(pp, file_dbp->pgsize,
 376                                     PGNO_ROOT, PGNO_INVALID, PGNO_INVALID,
 377                                     _lp->level + 1, P_IRECNO);
 378                         RE_NREC_SET(pp,
 379                             file_dbp->type == DB_RECNO ||
 380                             F_ISSET(file_dbp, DB_BT_RECNUM) ?
 381                             __bam_total(_lp) + __bam_total(_rp) : 0);
 382                         pp->lsn = *lsnp;
 383                         if ((ret = memp_fput(mpf, pp, DB_MPOOL_DIRTY)) != 0)
 384                                 goto fatal;
 385                         pp = NULL;
 386                 }
 387
 388                 /*
 389                  * Finally, redo the next-page link if necessary.  This is of
 390                  * interest only if it wasn't a root split -- inserting a new
 391                  * page in the tree requires that any following page have its
 392                  * previous-page pointer updated to our new page.  The next
 393                  * page had better exist.
 394                  */
 395                 if (!rootsplit && !IS_ZERO_LSN(argp->nlsn)) {
 396                         if ((ret = memp_fget(mpf, &argp->npgno, 0, &np)) != 0) {
 397                                 (void)__db_pgerr(file_dbp, argp->npgno);
 398                                 np = NULL;
 399                                 goto out;
 400                         }
 401                         if (log_compare(&LSN(np), &argp->nlsn) == 0) {
 402                                 PREV_PGNO(np) = argp->right;
 403                                 np->lsn = *lsnp;
 404                                 if ((ret = memp_fput(mpf,
 405                                     np, DB_MPOOL_DIRTY)) != 0)
 406                                         goto fatal;
 407                                 np = NULL;
 408                         }
 409                 }
 410         } else {
 411                 /*
 412                  * If the split page is wrong, replace its contents with the
 413                  * logged page contents.  The split page had better exist.
 414                  */
 415                 if ((ret = memp_fget(mpf, &pgno, 0, &pp)) != 0) {
 416                         (void)__db_pgerr(file_dbp, pgno);
 417                         pp = NULL;
 418                         goto out;
 419                 }
 420                 if (log_compare(lsnp, &LSN(pp)) == 0) {
 421                         memcpy(pp, argp->pg.data, argp->pg.size);
 422                         if ((ret = memp_fput(mpf, pp, DB_MPOOL_DIRTY)) != 0)
 423                                 goto fatal;
 424                         pp = NULL;
 425                 }
 426
 427                 /*
 428                  * If it's a root split and the left child ever existed, put
 429                  * it on the free list.  (If it's not a root split, we just
 430                  * updated the left page -- it's the same as the split page.)
 431                  * If the right child ever existed, root split or not, put it
 432                  * on the free list.
 433                  */
 434                 if ((rootsplit && lp != NULL) || rp != NULL) {
 435                         if (rootsplit && lp != NULL &&
 436                             log_compare(lsnp, &LSN(lp)) == 0) {
 437                                 lp->lsn = argp->llsn;
 438                                 if ((ret =
 439                                     memp_fput(mpf, lp, DB_MPOOL_DIRTY)) != 0)
 440                                         goto fatal;
 441                                 lp = NULL;
 442                         }
 443                         if (rp != NULL &&
 444                             log_compare(lsnp, &LSN(rp)) == 0) {
 445                                 rp->lsn = argp->rlsn;
 446                                 if ((ret =
 447                                     memp_fput(mpf, rp, DB_MPOOL_DIRTY)) != 0)
 448                                         goto fatal;
 449                                 rp = NULL;
 450                         }
 451                 }
 452
 453                 /*
 454                  * Finally, undo the next-page link if necessary.  This is of
 455                  * interest only if it wasn't a root split -- inserting a new
 456                  * page in the tree requires that any following page have its
 457                  * previous-page pointer updated to our new page.  The next
 458                  * page had better exist.
 459                  */
 460                 if (!rootsplit && !IS_ZERO_LSN(argp->nlsn)) {
 461                         if ((ret = memp_fget(mpf, &argp->npgno, 0, &np)) != 0) {
 462                                 (void)__db_pgerr(file_dbp, argp->npgno);
 463                                 np = NULL;
 464                                 goto out;
 465                         }
 466                         if (log_compare(lsnp, &LSN(np)) == 0) {
 467                                 PREV_PGNO(np) = argp->left;
 468                                 np->lsn = argp->nlsn;
 469                                 if (memp_fput(mpf, np, DB_MPOOL_DIRTY))
 470                                         goto fatal;
 471                                 np = NULL;
 472                         }
 473                 }
 474         }
 475
 476 done:   ret = 0;
 477         *lsnp = argp->prev_lsn;
 478
 479         if (0) {
 480 fatal:          (void)__db_panic(file_dbp);
 481         }
 482 out:    /* Free any pages that weren't dirtied. */
 483         if (pp != NULL && (t_ret = memp_fput(mpf, pp, 0)) != 0 && ret == 0)
 484                 ret = t_ret;
 485         if (lp != NULL && (t_ret = memp_fput(mpf, lp, 0)) != 0 && ret == 0)
 486                 ret = t_ret;
 487         if (np != NULL && (t_ret = memp_fput(mpf, np, 0)) != 0 && ret == 0)
 488                 ret = t_ret;
 489         if (rp != NULL && (t_ret = memp_fput(mpf, rp, 0)) != 0 && ret == 0)
 490                 ret = t_ret;
 491
 492         /* Free any allocated space. */
 493         if (_lp != NULL)
 494                 free(_lp);
 495         if (_rp != NULL)
 496                 free(_rp);
 497
 498         REC_CLOSE;
 499 }
 500
 501 /*
 502  * __bam_rsplit_recover --
 503  *      Recovery function for a reverse split.
 504  *
 505  * PUBLIC: int __bam_rsplit_recover
 506  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
 507  */
 508 int
 509 __bam_rsplit_recover(logp, dbtp, lsnp, redo, info)
 510         DB_LOG *logp;
 511         DBT *dbtp;
 512         DB_LSN *lsnp;
 513         int redo;
 514         void *info;
 515 {
 516         __bam_rsplit_args *argp;
 517         DB *file_dbp, *mdbp;
 518         DB_MPOOLFILE *mpf;
 519         PAGE *pagep;
 520         db_pgno_t pgno;
 521         int cmp_n, cmp_p, modified, ret;
 522
 523         REC_PRINT(__bam_rsplit_print);
 524         REC_INTRO(__bam_rsplit_read);
 525
 526         /* Fix the root page. */
 527         pgno = PGNO_ROOT;
 528         if ((ret = memp_fget(mpf, &pgno, 0, &pagep)) != 0) {
 529                 __db_pgerr(file_dbp, pgno);
 530                 pagep = NULL;
 531                 goto out;
 532         }
 533         modified = 0;
 534         cmp_n = log_compare(lsnp, &LSN(pagep));
 535         cmp_p = log_compare(&LSN(pagep), &argp->rootlsn);
 536         if (cmp_p == 0 && redo) {
 537                 /* Need to redo update described. */
 538                 memcpy(pagep, argp->pgdbt.data, argp->pgdbt.size);
 539                 pagep->pgno = PGNO_ROOT;
 540                 pagep->lsn = *lsnp;
 541                 modified = 1;
 542         } else if (cmp_n == 0 && !redo) {
 543                 /* Need to undo update described. */
 544                 P_INIT(pagep, file_dbp->pgsize, PGNO_ROOT,
 545                     PGNO_INVALID, PGNO_INVALID, pagep->level + 1, TYPE(pagep));
 546                 if ((ret = __db_pitem(file_dbp, pagep, 0,
 547                     argp->rootent.size, &argp->rootent, NULL)) != 0)
 548                         goto out;
 549                 pagep->lsn = argp->rootlsn;
 550                 modified = 1;
 551         }
 552         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) != 0) {
 553                 (void)__db_panic(file_dbp);
 554                 goto out;
 555         }
 556
 557         /* Fix the page copied over the root page. */
 558         if ((ret = memp_fget(mpf, &argp->pgno, 0, &pagep)) != 0) {
 559                 (void)__db_pgerr(file_dbp, argp->pgno);
 560                 pagep = NULL;
 561                 goto out;
 562         }
 563         modified = 0;
 564         cmp_n = log_compare(lsnp, &LSN(pagep));
 565         cmp_p = log_compare(&LSN(pagep), &LSN(argp->pgdbt.data));
 566         if (cmp_p == 0 && redo) {
 567                 /* Need to redo update described. */
 568                 pagep->lsn = *lsnp;
 569                 modified = 1;
 570         } else if (cmp_n == 0 && !redo) {
 571                 /* Need to undo update described. */
 572                 memcpy(pagep, argp->pgdbt.data, argp->pgdbt.size);
 573                 modified = 1;
 574         }
 575         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) != 0) {
 576                 (void)__db_panic(file_dbp);
 577                 goto out;
 578         }
 579
 580         ret = 0;
 581         *lsnp = argp->prev_lsn;
 582
 583 out:    REC_CLOSE;
 584 }
 585
 586 /*
 587  * __bam_adj_recover --
 588  *      Recovery function for adj.
 589  *
 590  * PUBLIC: int __bam_adj_recover
 591  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
 592  */
 593 int
 594 __bam_adj_recover(logp, dbtp, lsnp, redo, info)
 595         DB_LOG *logp;
 596         DBT *dbtp;
 597         DB_LSN *lsnp;
 598         int redo;
 599         void *info;
 600 {
 601         __bam_adj_args *argp;
 602         DB *file_dbp, *mdbp;
 603         DB_MPOOLFILE *mpf;
 604         PAGE *pagep;
 605         int cmp_n, cmp_p, modified, ret;
 606
 607         REC_PRINT(__bam_adj_print);
 608         REC_INTRO(__bam_adj_read);
 609
 610         if ((ret = memp_fget(mpf, &argp->pgno, 0, &pagep)) != 0) {
 611                 (void)__db_pgerr(file_dbp, argp->pgno);
 612                 pagep = NULL;
 613                 goto out;
 614         }
 615
 616         modified = 0;
 617         cmp_n = log_compare(lsnp, &LSN(pagep));
 618         cmp_p = log_compare(&LSN(pagep), &argp->lsn);
 619         if (cmp_p == 0 && redo) {
 620                 /* Need to redo update described. */
 621                 if ((ret = __bam_adjindx(file_dbp,
 622                     pagep, argp->indx, argp->indx_copy, argp->is_insert)) != 0)
 623                         goto err;
 624
 625                 LSN(pagep) = *lsnp;
 626                 modified = 1;
 627         } else if (cmp_n == 0 && !redo) {
 628                 /* Need to undo update described. */
 629                 if ((ret = __bam_adjindx(file_dbp,
 630                     pagep, argp->indx, argp->indx_copy, !argp->is_insert)) != 0)
 631                         goto err;
 632
 633                 LSN(pagep) = argp->lsn;
 634                 modified = 1;
 635         }
 636         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) == 0)
 637                 *lsnp = argp->prev_lsn;
 638
 639         if (0) {
 640 err:            (void)memp_fput(mpf, pagep, 0);
 641         }
 642 out:    REC_CLOSE;
 643 }
 644
 645 /*
 646  * __bam_cadjust_recover --
 647  *      Recovery function for the adjust of a count change in an internal
 648  *      page.
 649  *
 650  * PUBLIC: int __bam_cadjust_recover
 651  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
 652  */
 653 int
 654 __bam_cadjust_recover(logp, dbtp, lsnp, redo, info)
 655         DB_LOG *logp;
 656         DBT *dbtp;
 657         DB_LSN *lsnp;
 658         int redo;
 659         void *info;
 660 {
 661         __bam_cadjust_args *argp;
 662         DB *file_dbp, *mdbp;
 663         DB_MPOOLFILE *mpf;
 664         PAGE *pagep;
 665         int cmp_n, cmp_p, modified, ret;
 666
 667         REC_PRINT(__bam_cadjust_print);
 668         REC_INTRO(__bam_cadjust_read);
 669
 670         if ((ret = memp_fget(mpf, &argp->pgno, 0, &pagep)) != 0) {
 671                 __set_errno(__db_pgerr(file_dbp, argp->pgno));
 672                 pagep = NULL;
 673                 goto out;
 674         }
 675
 676         modified = 0;
 677         cmp_n = log_compare(lsnp, &LSN(pagep));
 678         cmp_p = log_compare(&LSN(pagep), &argp->lsn);
 679         if (cmp_p == 0 && redo) {
 680                 /* Need to redo update described. */
 681                 if (file_dbp->type == DB_BTREE &&
 682                     F_ISSET(file_dbp, DB_BT_RECNUM)) {
 683                         GET_BINTERNAL(pagep, argp->indx)->nrecs += argp->adjust;
 684                         if (argp->total && PGNO(pagep) == PGNO_ROOT)
 685                                 RE_NREC_ADJ(pagep, argp->adjust);
 686                 }
 687                 if (file_dbp->type == DB_RECNO) {
 688                         GET_RINTERNAL(pagep, argp->indx)->nrecs += argp->adjust;
 689                         if (argp->total && PGNO(pagep) == PGNO_ROOT)
 690                                 RE_NREC_ADJ(pagep, argp->adjust);
 691                 }
 692
 693                 LSN(pagep) = *lsnp;
 694                 modified = 1;
 695         } else if (cmp_n == 0 && !redo) {
 696                 /* Need to undo update described. */
 697                 if (file_dbp->type == DB_BTREE &&
 698                     F_ISSET(file_dbp, DB_BT_RECNUM)) {
 699                         GET_BINTERNAL(pagep, argp->indx)->nrecs -= argp->adjust;
 700                         if (argp->total && PGNO(pagep) == PGNO_ROOT)
 701                                 RE_NREC_ADJ(pagep, argp->adjust);
 702                 }
 703                 if (file_dbp->type == DB_RECNO) {
 704                         GET_RINTERNAL(pagep, argp->indx)->nrecs -= argp->adjust;
 705                         if (argp->total && PGNO(pagep) == PGNO_ROOT)
 706                                 RE_NREC_ADJ(pagep, -(argp->adjust));
 707                 }
 708                 LSN(pagep) = argp->lsn;
 709                 modified = 1;
 710         }
 711         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) == 0)
 712                 *lsnp = argp->prev_lsn;
 713
 714 out:    REC_CLOSE;
 715 }
 716
 717 /*
 718  * __bam_cdel_recover --
 719  *      Recovery function for the intent-to-delete of a cursor record.
 720  *
 721  * PUBLIC: int __bam_cdel_recover
 722  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
 723  */
 724 int
 725 __bam_cdel_recover(logp, dbtp, lsnp, redo, info)
 726         DB_LOG *logp;
 727         DBT *dbtp;
 728         DB_LSN *lsnp;
 729         int redo;
 730         void *info;
 731 {
 732         __bam_cdel_args *argp;
 733         DB *file_dbp, *mdbp;
 734         DB_MPOOLFILE *mpf;
 735         PAGE *pagep;
 736         int cmp_n, cmp_p, modified, ret;
 737
 738         REC_PRINT(__bam_cdel_print);
 739         REC_INTRO(__bam_cdel_read);
 740
 741         if ((ret = memp_fget(mpf, &argp->pgno, 0, &pagep)) != 0) {
 742                 (void)__db_pgerr(file_dbp, argp->pgno);
 743                 pagep = NULL;
 744                 goto out;
 745         }
 746
 747         modified = 0;
 748         cmp_n = log_compare(lsnp, &LSN(pagep));
 749         cmp_p = log_compare(&LSN(pagep), &argp->lsn);
 750         if (cmp_p == 0 && redo) {
 751                 /* Need to redo update described. */
 752                 B_DSET(GET_BKEYDATA(pagep, argp->indx + O_INDX)->type);
 753
 754                 LSN(pagep) = *lsnp;
 755                 modified = 1;
 756         } else if (cmp_n == 0 && !redo) {
 757                 /* Need to undo update described. */
 758                 B_DCLR(GET_BKEYDATA(pagep, argp->indx + O_INDX)->type);
 759
 760                 LSN(pagep) = argp->lsn;
 761                 modified = 1;
 762         }
 763         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) == 0)
 764                 *lsnp = argp->prev_lsn;
 765
 766 out:    REC_CLOSE;
 767 }