Merge branch 'cde-next' of ssh://git.code.sf.net/p/cdesktopenv/code into cde-next
[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(int nset, int dbn)
54 {
55    int set;
56    char memp[MEMPSIZE];
57    DB_ADDR mem;
58    char *recp;
59    DB_ADDR *cm_ptr;
60    SET_ENTRY *set_ptr;
61
62    DB_ENTER(DB_ID TASK_ID LOCK_SET(SET_IO));
63
64    if (nset_check(nset, &set, (SET_ENTRY * *)&set_ptr) != S_OKAY)
65       RETURN( db_status );
66
67    /* make sure we have a current owner */
68    if ( ! curr_own[set] )
69       RETURN( dberr(S_NOCO) );
70
71    /* find last member if no current member */
72    if ( !*(cm_ptr = &curr_mem[set]) )
73       RETURN( d_findlm(nset , dbn) );
74
75    /* read current member of set and get member pointer from record */
76    if ((dio_read(*cm_ptr, (char * *)&recp, NOPGHOLD) != S_OKAY) ||
77        (r_gmem(set, recp, memp) != S_OKAY))
78       RETURN( db_status );
79
80    /* extract address of previous member */
81    bytecpy( &mem, memp+MP_PREV, DB_ADDR_SIZE);
82
83    /* set current record and member */
84    *cm_ptr = mem;
85
86    if ( ! mem ) /* end of set */
87       RETURN( db_status = S_EOS );
88
89    curr_rec = mem;
90    RETURN( db_status = S_OKAY );
91 }
92 /* vpp -nOS2 -dUNIX -nBSD -nVANILLA_BSD -nVMS -nMEMLOCK -nWINDOWS -nFAR_ALLOC -f/usr/users/master/config/nonwin findpm.c */