home *** CD-ROM | disk | FTP | other *** search
/ Frostbyte's 1980s DOS Shareware Collection / floppyshareware.zip / floppyshareware / DOOG / CBASE09.ZIP / BTREE.ZIP / BTPREV.C < prev    next >
Text File  |  1989-08-31  |  2KB  |  102 lines
  1. /*    Copyright (c) 1989 Citadel    */
  2. /*       All Rights Reserved        */
  3.  
  4. /* #ident    "btprev.c    1.1 - 89/07/03" */
  5.  
  6. #include <blkio.h>
  7. #include <errno.h>
  8. #include "btree_.h"
  9.  
  10. /*man---------------------------------------------------------------------------
  11. NAME
  12.      btprev - previous btree key
  13.  
  14. SYNOPSIS
  15.      #include <btree.h>
  16.  
  17.      int btprev(btp)
  18.      btree_t *btp;
  19.  
  20. DESCRIPTION
  21.      The btprev function retreats the cursor of btree btp to the previous
  22.      lower key.  If cursor is currently null, it will be moved to the last
  23.      key.  If the cursor is currently on the last key, it will move to null.
  24.      If the tree is empty, the cursor will remain on null.
  25.  
  26.      btprev will fail if one or more of the following is true:
  27.  
  28.      [EINVAL]       btp is not a valid btree pointer.
  29.      [BTELOCK]      btp is not locked.
  30.      [BTENOPEN]     btp is not open.
  31.  
  32. SEE ALSO
  33.      btcursor, btfirst, btlast, btnext.
  34.  
  35. DIAGNOSTICS
  36.      Upon successful completion, 0 is returned.  Otherwise, a value of -1
  37.      is returned and errno is set to indicate the error.
  38.  
  39. ------------------------------------------------------------------------------*/
  40. int btprev(btp)
  41. btree_t *btp;
  42. {
  43.     int rs = 0;
  44.  
  45.     errno = 0;
  46.  
  47.     /* validate arguments */
  48.     if (!bt_valid(btp)) {
  49.         errno = EINVAL;
  50.         return -1;
  51.     }
  52.  
  53.     /* check if not open */
  54.     if (!(btp->flags & BTOPEN)) {
  55.         errno = BTENOPEN;
  56.         return -1;
  57.     }
  58.  
  59.     /* check locks */
  60.     if (!(btp->flags & BTLOCKS)) {
  61.         errno = BTELOCK;
  62.         return -1;
  63.     }
  64.  
  65.     /* move cursor to previous key in current node */
  66.     if (btp->cbtpos.node != 0) {
  67.         btp->cbtpos.key--;
  68.         if (btp->cbtpos.key > 0) {
  69.             errno = 0;
  70.             return 0;
  71.         }
  72.     }
  73.  
  74.     /* move cursor to null */
  75.     if (btp->cbtpos.node == btp->bthdr.first) {
  76.         btp->cbtpos.node = 0;
  77.         btp->cbtpos.key = 0;
  78.         bt_ndinit(btp, btp->cbtnp);
  79.         errno = 0;
  80.         return 0;
  81.     }
  82.  
  83.     /* move cursor to last key in prev node */
  84.     if (btp->cbtpos.node == 0) {
  85.         btp->cbtpos.node = btp->bthdr.last;
  86.     } else {
  87.         btp->cbtpos.node = btp->cbtnp->lsib;
  88.     }
  89.     rs = bt_ndget(btp, btp->cbtpos.node, btp->cbtnp);
  90.     if (rs == -1) {
  91.         BTEPRINT;
  92.         btp->cbtpos.node = 0;
  93.         btp->cbtpos.key = 0;
  94.         bt_ndinit(btp, btp->cbtnp);
  95.         return -1;
  96.     }
  97.     btp->cbtpos.key = btp->cbtnp->n;
  98.  
  99.     errno = 0;
  100.     return 0;
  101. }
  102.