home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / prgramer / rcs / sources / gdbmfetc.c < prev    next >
C/C++ Source or Header  |  1991-03-22  |  3KB  |  74 lines
  1. /* gdbmfetch.c - Find a key and return the associated data.  */
  2.  
  3. /*  This file is part of GDBM, the GNU data base manager, by Philip A. Nelson.
  4.     Copyright (C) 1990, 1991  Free Software Foundation, Inc.
  5.  
  6.     GDBM is free software; you can redistribute it and/or modify
  7.     it under the terms of the GNU General Public License as published by
  8.     the Free Software Foundation; either version 1, or (at your option)
  9.     any later version.
  10.  
  11.     GDBM is distributed in the hope that it will be useful,
  12.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.     GNU General Public License for more details.
  15.  
  16.     You should have received a copy of the GNU General Public License
  17.     along with GDBM; see the file COPYING.  If not, write to
  18.     the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  
  20.     You may contact the author by:
  21.        e-mail:  phil@cs.wwu.edu
  22.       us-mail:  Philip A. Nelson
  23.                 Computer Science Department
  24.                 Western Washington University
  25.                 Bellingham, WA 98226
  26.         phone:  (206) 676-3035
  27.  
  28. *************************************************************************/
  29.  
  30.  
  31. #include "gdbmdefs.h"
  32. #include "gdbmerrno.h"
  33. extern gdbm_error gdbm_errno;
  34.  
  35. /* Look up a given KEY and return the information associated with that KEY.
  36.    The pointer in the structure that is  returned is a pointer to dynamically
  37.    allocated memory block.  */
  38.  
  39. datum
  40. gdbm_fetch (dbf, key)
  41.      gdbm_file_info *dbf;
  42.      datum key;
  43. {
  44.   datum  return_val;        /* The return value. */
  45.   int    elem_loc;        /* The location in the bucket. */
  46.   char  *find_data;        /* Returned from find_key. */
  47.   long   hash_val;        /* Returned from find_key. */
  48.  
  49.   /* Set the default return value. */
  50.   return_val.dptr = NULL;
  51.  
  52.   /* Find the key and return a pointer to the data. */
  53.   elem_loc = _gdbm_findkey (dbf, key, &find_data, &hash_val);
  54.  
  55.   /* Copy the data if the key was found.  */
  56.   if (elem_loc >= 0)
  57.     {
  58.       /* This is the item.  Return the associated data. */
  59.       return_val.dsize = dbf->bucket->h_table[elem_loc].data_size;
  60.       if (return_val.dsize == 0)
  61.     return_val.dptr = (char *) malloc (1);
  62.       else
  63.     return_val.dptr = (char *) malloc (return_val.dsize);
  64.       if (return_val.dptr == NULL) _gdbm_fatal (dbf, "malloc error");
  65.       bcopy (find_data, return_val.dptr, return_val.dsize);
  66.     }
  67.  
  68.   /* Check for an error and return. */
  69.   if (return_val.dptr == NULL) gdbm_errno = GDBM_ITEM_NOT_FOUND;
  70.   return return_val;
  71. }
  72.  
  73.  
  74.