rom/dos/unlockrecords.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8 #include "dos_intern.h"
   9
  10 /*****************************************************************************
  11
  12     NAME */
  13 #include <dos/record.h>
  14 #include <proto/dos.h>
  15
  16         AROS_LH1(BOOL, UnLockRecords,
  17
  18 /*  SYNOPSIS */
  19         AROS_LHA(struct RecordLock *, recArray, D1),
  20
  21 /*  LOCATION */
  22         struct DosLibrary *, DOSBase, 48, Dos)
  23
  24 /*  FUNCTION
  25
  26     Release an array of record locks obtained with LockRecords().
  27
  28     INPUTS
  29
  30     recArray  --  array of record locks (previously locked with LockRecords())
  31
  32     RESULT
  33
  34     NOTES
  35
  36     A array of records may not be modified when records are locked.
  37
  38     EXAMPLE
  39
  40     BUGS
  41
  42     SEE ALSO
  43
  44     LockRecords()
  45
  46     INTERNALS
  47
  48 *****************************************************************************/
  49 {
  50     AROS_LIBFUNC_INIT
  51
  52     while (NULL != BADDR(recArray->rec_FH))
  53     {
  54         LONG success = UnLockRecord(recArray->rec_FH, recArray->rec_Offset,
  55                                     recArray->rec_Length);
  56
  57         if (success != DOSTRUE)
  58         {
  59             return success;
  60         }
  61
  62         /* everything OK -> advance to the next entry */
  63         recArray++;
  64     }
  65
  66     return DOSTRUE;
  67
  68     AROS_LIBFUNC_EXIT
  69 } /* UnLockRecords */