libDtSearch: Tidy up the LOCK and DBN macro madness
[oweals/cde.git] / cde / lib / DtSearch / raima / findpm.c
1 /*
2  * CDE - Common Desktop Environment
3  *
4  * Copyright (c) 1993-2012, The Open Group. All rights reserved.
5  *
6  * These libraries and programs are free software; you can
7  * redistribute them and/or modify them under the terms of the GNU
8  * Lesser General Public License as published by the Free Software
9  * Foundation; either version 2 of the License, or (at your option)
10  * any later version.
11  *
12  * These libraries and programs are distributed in the hope that
13  * they will be useful, but WITHOUT ANY WARRANTY; without even the
14  * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15  * PURPOSE. See the GNU Lesser General Public License for more
16  * details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with these libraries and programs; if not, write
20  * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
21  * Floor, Boston, MA 02110-1301 USA
22  */
23 /* $XConsortium: findpm.c /main/2 1996/05/09 04:06:57 drk $ */
24 /*
25  *   COMPONENT_NAME: austext
26  *
27  *   FUNCTIONS: d_findpm
28  *
29  *   ORIGINS: 157
30  *
31  *   OBJECT CODE ONLY SOURCE MATERIALS
32  */
33 /*-----------------------------------------------------------------------
34    findpm.c -- db_VISTA find previous member module
35
36    (C) Copyright 1987 by Raima Corp.
37 -----------------------------------------------------------------------*/
38
39 /* ********************** EDIT HISTORY *******************************
40
41  SCR    DATE    INI                   DESCRIPTION
42 ----- --------- --- -----------------------------------------------------
43       04-Aug-88 RTK MULTI_TASK changes
44 */
45
46 #include <stdio.h>
47 #include "vista.h"
48 #include "dbtype.h"
49
50 /* Find previous member of set
51 */
52 int
53 d_findpm(nset , dbn)
54 int nset;
55 int dbn;
56 {
57    int set;
58    char memp[MEMPSIZE];
59    DB_ADDR mem;
60    char *recp;
61    DB_ADDR *cm_ptr;
62    SET_ENTRY *set_ptr;
63
64    DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
65
66    if (nset_check(nset, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
67       RETURN( db_status );
68
69    /* make sure we have a current owner */
70    if ( ! curr_own[set] )
71       RETURN( dberr(S_NOCO) );
72
73    /* find last member if no current member */
74    if ( !*(cm_ptr = &curr_mem[set]) )
75       RETURN( d_findlm(nset , dbn) );
76
77    /* read current member of set and get member pointer from record */
78    if ((dio_read(*cm_ptr, (char * *)&recp, NOPGHOLD) != S_OKAY) ||
79        (r_gmem(set, recp, memp) != S_OKAY))
80       RETURN( db_status );
81
82    /* extract address of previous member */
83    bytecpy( &mem, memp+MP_PREV, DB_ADDR_SIZE);
84
85    /* set current record and member */
86    *cm_ptr = mem;
87
88    if ( ! mem ) /* end of set */
89       RETURN( db_status = S_EOS );
90
91    curr_rec = mem;
92    RETURN( db_status = S_OKAY );
93 }
94 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findpm.c */