Update from db-2.3.12.
[kopensolaris-gnu/glibc.git] / 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.17 (Sleepycat) 11/2/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 *)__db_malloc(file_dbp->pgsize)) == NULL ||
302                     (_rp = (PAGE *)__db_malloc(file_dbp->pgsize)) == NULL) {
303                         ret = ENOMEM;
304                         __db_err(file_dbp->dbenv, "%s", strerror(ret));
305                         goto out;
306                 }
307                 if (rootsplit) {
308                         P_INIT(_lp, file_dbp->pgsize, argp->left,
309                             PGNO_INVALID,
310                             ISINTERNAL(sp) ? PGNO_INVALID : argp->right,
311                             LEVEL(sp), TYPE(sp));
312                         P_INIT(_rp, file_dbp->pgsize, argp->right,
313                             ISINTERNAL(sp) ?  PGNO_INVALID : argp->left,
314                             PGNO_INVALID, LEVEL(sp), TYPE(sp));
315                 } else {
316                         P_INIT(_lp, file_dbp->pgsize, PGNO(sp),
317                             ISINTERNAL(sp) ? PGNO_INVALID : PREV_PGNO(sp),
318                             ISINTERNAL(sp) ? PGNO_INVALID : argp->right,
319                             LEVEL(sp), TYPE(sp));
320                         P_INIT(_rp, file_dbp->pgsize, argp->right,
321                             ISINTERNAL(sp) ? PGNO_INVALID : sp->pgno,
322                             ISINTERNAL(sp) ? PGNO_INVALID : NEXT_PGNO(sp),
323                             LEVEL(sp), TYPE(sp));
324                 }
325
326                 /* Split the page. */
327                 if ((ret = __bam_copy(file_dbp, sp, _lp, 0, argp->indx)) != 0 ||
328                     (ret = __bam_copy(file_dbp, sp, _rp, argp->indx,
329                     NUM_ENT(sp))) != 0)
330                         goto out;
331
332                 /* If the left child is wrong, update it. */
333                 if (lp == NULL && (ret =
334                     memp_fget(mpf, &argp->left, DB_MPOOL_CREATE, &lp)) != 0) {
335                         (void)__db_pgerr(file_dbp, argp->left);
336                         lp = NULL;
337                         goto out;
338                 }
339                 if (l_update) {
340                         memcpy(lp, _lp, file_dbp->pgsize);
341                         lp->lsn = *lsnp;
342                         if ((ret = memp_fput(mpf, lp, DB_MPOOL_DIRTY)) != 0)
343                                 goto fatal;
344                         lp = NULL;
345                 }
346
347                 /* If the right child is wrong, update it. */
348                 if (rp == NULL && (ret = memp_fget(mpf,
349                     &argp->right, DB_MPOOL_CREATE, &rp)) != 0) {
350                         (void)__db_pgerr(file_dbp, argp->right);
351                         rp = NULL;
352                         goto out;
353                 }
354                 if (r_update) {
355                         memcpy(rp, _rp, file_dbp->pgsize);
356                         rp->lsn = *lsnp;
357                         if ((ret = memp_fput(mpf, rp, DB_MPOOL_DIRTY)) != 0)
358                                 goto fatal;
359                         rp = NULL;
360                 }
361
362                 /*
363                  * If the parent page is wrong, update it.  This is of interest
364                  * only if it was a root split, since root splits create parent
365                  * pages.  All other splits modify a parent page, but those are
366                  * separately logged and recovered.
367                  */
368                 if (rootsplit && p_update) {
369                         if (file_dbp->type == DB_BTREE)
370                                 P_INIT(pp, file_dbp->pgsize,
371                                     PGNO_ROOT, PGNO_INVALID, PGNO_INVALID,
372                                     _lp->level + 1, P_IBTREE);
373                         else
374                                 P_INIT(pp, file_dbp->pgsize,
375                                     PGNO_ROOT, PGNO_INVALID, PGNO_INVALID,
376                                     _lp->level + 1, P_IRECNO);
377                         RE_NREC_SET(pp,
378                             file_dbp->type == DB_RECNO ||
379                             F_ISSET(file_dbp, DB_BT_RECNUM) ?
380                             __bam_total(_lp) + __bam_total(_rp) : 0);
381                         pp->lsn = *lsnp;
382                         if ((ret = memp_fput(mpf, pp, DB_MPOOL_DIRTY)) != 0)
383                                 goto fatal;
384                         pp = NULL;
385                 }
386
387                 /*
388                  * Finally, redo the next-page link if necessary.  This is of
389                  * interest only if it wasn't a root split -- inserting a new
390                  * page in the tree requires that any following page have its
391                  * previous-page pointer updated to our new page.  The next
392                  * page had better exist.
393                  */
394                 if (!rootsplit && !IS_ZERO_LSN(argp->nlsn)) {
395                         if ((ret = memp_fget(mpf, &argp->npgno, 0, &np)) != 0) {
396                                 (void)__db_pgerr(file_dbp, argp->npgno);
397                                 np = NULL;
398                                 goto out;
399                         }
400                         if (log_compare(&LSN(np), &argp->nlsn) == 0) {
401                                 PREV_PGNO(np) = argp->right;
402                                 np->lsn = *lsnp;
403                                 if ((ret = memp_fput(mpf,
404                                     np, DB_MPOOL_DIRTY)) != 0)
405                                         goto fatal;
406                                 np = NULL;
407                         }
408                 }
409         } else {
410                 /*
411                  * If the split page is wrong, replace its contents with the
412                  * logged page contents.  The split page had better exist.
413                  */
414                 if ((ret = memp_fget(mpf, &pgno, 0, &pp)) != 0) {
415                         (void)__db_pgerr(file_dbp, pgno);
416                         pp = NULL;
417                         goto out;
418                 }
419                 if (log_compare(lsnp, &LSN(pp)) == 0) {
420                         memcpy(pp, argp->pg.data, argp->pg.size);
421                         if ((ret = memp_fput(mpf, pp, DB_MPOOL_DIRTY)) != 0)
422                                 goto fatal;
423                         pp = NULL;
424                 }
425
426                 /*
427                  * If it's a root split and the left child ever existed, put
428                  * it on the free list.  (If it's not a root split, we just
429                  * updated the left page -- it's the same as the split page.)
430                  * If the right child ever existed, root split or not, put it
431                  * on the free list.
432                  */
433                 if ((rootsplit && lp != NULL) || rp != NULL) {
434                         if (rootsplit && lp != NULL &&
435                             log_compare(lsnp, &LSN(lp)) == 0) {
436                                 lp->lsn = argp->llsn;
437                                 if ((ret =
438                                     memp_fput(mpf, lp, DB_MPOOL_DIRTY)) != 0)
439                                         goto fatal;
440                                 lp = NULL;
441                         }
442                         if (rp != NULL &&
443                             log_compare(lsnp, &LSN(rp)) == 0) {
444                                 rp->lsn = argp->rlsn;
445                                 if ((ret =
446                                     memp_fput(mpf, rp, DB_MPOOL_DIRTY)) != 0)
447                                         goto fatal;
448                                 rp = NULL;
449                         }
450                 }
451
452                 /*
453                  * Finally, undo the next-page link if necessary.  This is of
454                  * interest only if it wasn't a root split -- inserting a new
455                  * page in the tree requires that any following page have its
456                  * previous-page pointer updated to our new page.  The next
457                  * page had better exist.
458                  */
459                 if (!rootsplit && !IS_ZERO_LSN(argp->nlsn)) {
460                         if ((ret = memp_fget(mpf, &argp->npgno, 0, &np)) != 0) {
461                                 (void)__db_pgerr(file_dbp, argp->npgno);
462                                 np = NULL;
463                                 goto out;
464                         }
465                         if (log_compare(lsnp, &LSN(np)) == 0) {
466                                 PREV_PGNO(np) = argp->left;
467                                 np->lsn = argp->nlsn;
468                                 if (memp_fput(mpf, np, DB_MPOOL_DIRTY))
469                                         goto fatal;
470                                 np = NULL;
471                         }
472                 }
473         }
474
475 done:   ret = 0;
476         *lsnp = argp->prev_lsn;
477
478         if (0) {
479 fatal:          (void)__db_panic(file_dbp);
480         }
481 out:    /* Free any pages that weren't dirtied. */
482         if (pp != NULL && (t_ret = memp_fput(mpf, pp, 0)) != 0 && ret == 0)
483                 ret = t_ret;
484         if (lp != NULL && (t_ret = memp_fput(mpf, lp, 0)) != 0 && ret == 0)
485                 ret = t_ret;
486         if (np != NULL && (t_ret = memp_fput(mpf, np, 0)) != 0 && ret == 0)
487                 ret = t_ret;
488         if (rp != NULL && (t_ret = memp_fput(mpf, rp, 0)) != 0 && ret == 0)
489                 ret = t_ret;
490
491         /* Free any allocated space. */
492         if (_lp != NULL)
493                 __db_free(_lp);
494         if (_rp != NULL)
495                 __db_free(_rp);
496
497         REC_CLOSE;
498 }
499
500 /*
501  * __bam_rsplit_recover --
502  *      Recovery function for a reverse split.
503  *
504  * PUBLIC: int __bam_rsplit_recover
505  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
506  */
507 int
508 __bam_rsplit_recover(logp, dbtp, lsnp, redo, info)
509         DB_LOG *logp;
510         DBT *dbtp;
511         DB_LSN *lsnp;
512         int redo;
513         void *info;
514 {
515         __bam_rsplit_args *argp;
516         DB *file_dbp, *mdbp;
517         DB_MPOOLFILE *mpf;
518         PAGE *pagep;
519         db_pgno_t pgno;
520         int cmp_n, cmp_p, modified, ret;
521
522         REC_PRINT(__bam_rsplit_print);
523         REC_INTRO(__bam_rsplit_read);
524
525         /* Fix the root page. */
526         pgno = PGNO_ROOT;
527         if ((ret = memp_fget(mpf, &pgno, 0, &pagep)) != 0) {
528                 __db_pgerr(file_dbp, pgno);
529                 pagep = NULL;
530                 goto out;
531         }
532         modified = 0;
533         cmp_n = log_compare(lsnp, &LSN(pagep));
534         cmp_p = log_compare(&LSN(pagep), &argp->rootlsn);
535         if (cmp_p == 0 && redo) {
536                 /* Need to redo update described. */
537                 memcpy(pagep, argp->pgdbt.data, argp->pgdbt.size);
538                 pagep->pgno = PGNO_ROOT;
539                 pagep->lsn = *lsnp;
540                 modified = 1;
541         } else if (cmp_n == 0 && !redo) {
542                 /* Need to undo update described. */
543                 P_INIT(pagep, file_dbp->pgsize, PGNO_ROOT,
544                     argp->nrec, PGNO_INVALID, pagep->level + 1,
545                     file_dbp->type == DB_BTREE ? P_IBTREE : P_IRECNO);
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                 (void)__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 }
768
769 /*
770  * __bam_repl_recover --
771  *      Recovery function for page item replacement.
772  *
773  * PUBLIC: int __bam_repl_recover
774  * PUBLIC:   __P((DB_LOG *, DBT *, DB_LSN *, int, void *));
775  */
776 int
777 __bam_repl_recover(logp, dbtp, lsnp, redo, info)
778         DB_LOG *logp;
779         DBT *dbtp;
780         DB_LSN *lsnp;
781         int redo;
782         void *info;
783 {
784         __bam_repl_args *argp;
785         BKEYDATA *bk;
786         DB *file_dbp, *mdbp;
787         DBT dbt;
788         DB_MPOOLFILE *mpf;
789         PAGE *pagep;
790         int cmp_n, cmp_p, modified, ret;
791         u_int8_t *p;
792
793         REC_PRINT(__bam_repl_print);
794         REC_INTRO(__bam_repl_read);
795
796         if ((ret = memp_fget(mpf, &argp->pgno, 0, &pagep)) != 0) {
797                 (void)__db_pgerr(file_dbp, argp->pgno);
798                 pagep = NULL;
799                 goto out;
800         }
801         bk = GET_BKEYDATA(pagep, argp->indx);
802
803         modified = 0;
804         cmp_n = log_compare(lsnp, &LSN(pagep));
805         cmp_p = log_compare(&LSN(pagep), &argp->lsn);
806         if (cmp_p == 0 && redo) {
807                 /*
808                  * Need to redo update described.
809                  *
810                  * Re-build the replacement item.
811                  */
812                 memset(&dbt, 0, sizeof(dbt));
813                 dbt.size = argp->prefix + argp->suffix + argp->repl.size;
814                 if ((dbt.data = __db_malloc(dbt.size)) == NULL) {
815                         ret = ENOMEM;
816                         goto err;
817                 }
818                 p = dbt.data;
819                 memcpy(p, bk->data, argp->prefix);
820                 p += argp->prefix;
821                 memcpy(p, argp->repl.data, argp->repl.size);
822                 p += argp->repl.size;
823                 memcpy(p, bk->data + (bk->len - argp->suffix), argp->suffix);
824
825                 ret = __bam_ritem(file_dbp, pagep, argp->indx, &dbt);
826                 __db_free(dbt.data);
827                 if (ret != 0)
828                         goto err;
829
830                 LSN(pagep) = *lsnp;
831                 modified = 1;
832         } else if (cmp_n == 0 && !redo) {
833                 /*
834                  * Need to undo update described.
835                  *
836                  * Re-build the original item.
837                  */
838                 memset(&dbt, 0, sizeof(dbt));
839                 dbt.size = argp->prefix + argp->suffix + argp->orig.size;
840                 if ((dbt.data = __db_malloc(dbt.size)) == NULL) {
841                         ret = ENOMEM;
842                         goto err;
843                 }
844                 p = dbt.data;
845                 memcpy(p, bk->data, argp->prefix);
846                 p += argp->prefix;
847                 memcpy(p, argp->orig.data, argp->orig.size);
848                 p += argp->orig.size;
849                 memcpy(p, bk->data + (bk->len - argp->suffix), argp->suffix);
850
851                 ret = __bam_ritem(file_dbp, pagep, argp->indx, &dbt);
852                 __db_free(dbt.data);
853                 if (ret != 0)
854                         goto err;
855
856                 /* Reset the deleted flag, if necessary. */
857                 if (argp->isdeleted)
858                         B_DSET(GET_BKEYDATA(pagep, argp->indx)->type);
859
860                 LSN(pagep) = argp->lsn;
861                 modified = 1;
862         }
863         if ((ret = memp_fput(mpf, pagep, modified ? DB_MPOOL_DIRTY : 0)) == 0)
864                 *lsnp = argp->prev_lsn;
865
866         if (0) {
867 err:            (void)memp_fput(mpf, pagep, 0);
868         }
869 out:    REC_CLOSE;
870 }