rom/dos/unlockrecords.c

   1 /*
   2     Copyright © 1995-2013, 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         Release an array of record locks obtained with LockRecords().
  26
  27     INPUTS
  28         recArray - array of record locks (previously locked with LockRecords())
  29
  30     RESULT
  31         success - Boolean success indicator.
  32
  33     NOTES
  34         An array of records may not be modified when records are locked.
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41         LockRecords()
  42
  43     INTERNALS
  44
  45 *****************************************************************************/
  46 {
  47     AROS_LIBFUNC_INIT
  48
  49     while (NULL != BADDR(recArray->rec_FH))
  50     {
  51         LONG success = UnLockRecord(recArray->rec_FH, recArray->rec_Offset,
  52                                     recArray->rec_Length);
  53
  54         if (success != DOSTRUE)
  55         {
  56             return success;
  57         }
  58
  59         /* everything OK -> advance to the next entry */
  60         recArray++;
  61     }
  62
  63     return DOSTRUE;
  64
  65     AROS_LIBFUNC_EXIT
  66 } /* UnLockRecords */