rec_seq.c revision 1.2 1 /*-
2 * Copyright (c) 1991, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 */
33
34 #ifndef lint
35 /*static char sccsid[] = "from: @(#)rec_seq.c 8.1 (Berkeley) 6/4/93";*/
36 static char rcsid[] = "$Id: rec_seq.c,v 1.2 1993/08/01 18:43:11 mycroft Exp $";
37 #endif /* not lint */
38
39 #include <sys/types.h>
40
41 #include <errno.h>
42 #include <limits.h>
43 #include <stdio.h>
44 #include <string.h>
45
46 #include <db.h>
47 #include "recno.h"
48
49 /*
50 * __REC_SEQ -- Recno sequential scan interface.
51 *
52 * Parameters:
53 * dbp: pointer to access method
54 * key: key for positioning and return value
55 * data: data return value
56 * flags: R_CURSOR, R_FIRST, R_LAST, R_NEXT, R_PREV.
57 *
58 * Returns:
59 * RET_ERROR, RET_SUCCESS or RET_SPECIAL if there's no next key.
60 */
61 int
62 __rec_seq(dbp, key, data, flags)
63 const DB *dbp;
64 DBT *key, *data;
65 u_int flags;
66 {
67 BTREE *t;
68 EPG *e;
69 recno_t nrec;
70 int status;
71
72 t = dbp->internal;
73 switch(flags) {
74 case R_CURSOR:
75 if ((nrec = *(recno_t *)key->data) == 0)
76 goto einval;
77 break;
78 case R_NEXT:
79 if (ISSET(t, B_SEQINIT)) {
80 nrec = t->bt_rcursor + 1;
81 break;
82 }
83 /* FALLTHROUGH */
84 case R_FIRST:
85 nrec = 1;
86 break;
87 case R_PREV:
88 if (ISSET(t, B_SEQINIT)) {
89 if ((nrec = t->bt_rcursor - 1) == 0)
90 return (RET_SPECIAL);
91 break;
92 }
93 /* FALLTHROUGH */
94 case R_LAST:
95 if (!ISSET(t, R_EOF | R_INMEM) &&
96 t->bt_irec(t, MAX_REC_NUMBER) == RET_ERROR)
97 return (RET_ERROR);
98 nrec = t->bt_nrecs;
99 break;
100 default:
101 einval: errno = EINVAL;
102 return (RET_ERROR);
103 }
104
105 if (t->bt_nrecs == 0 || nrec > t->bt_nrecs) {
106 if (!ISSET(t, R_EOF | R_INMEM) &&
107 (status = t->bt_irec(t, nrec)) != RET_SUCCESS)
108 return (status);
109 if (t->bt_nrecs == 0 || nrec > t->bt_nrecs)
110 return (RET_SPECIAL);
111 }
112
113 if ((e = __rec_search(t, nrec - 1, SEARCH)) == NULL)
114 return (RET_ERROR);
115
116 SET(t, B_SEQINIT);
117 t->bt_rcursor = nrec;
118
119 status = __rec_ret(t, e, nrec, key, data);
120
121 mpool_put(t->bt_mp, e->page, 0);
122 return (status);
123 }
124