rom/dos/samelock.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 <proto/dos.h>
  14
  15         AROS_LH2(LONG, SameLock,
  16
  17 /*  SYNOPSIS */
  18         AROS_LHA(BPTR, lock1, D1),
  19         AROS_LHA(BPTR, lock2, D2),
  20
  21 /*  LOCATION */
  22         struct DosLibrary *, DOSBase, 70, Dos)
  23
  24 /*  FUNCTION
  25         Compares two locks.
  26
  27     INPUTS
  28         lock1, lock2 - locks
  29
  30     RESULT
  31         LOCK_SAME        - locks points to the same object
  32         LOCK_SAME_VOLUME - locks are on the same volume
  33         LOCK_DIFFERENT   - locks are different
  34
  35     NOTES
  36
  37     EXAMPLE
  38
  39     BUGS
  40
  41     SEE ALSO
  42
  43     INTERNALS
  44
  45 *****************************************************************************/
  46 {
  47     AROS_LIBFUNC_INIT
  48
  49     struct FileLock *fl1;
  50     struct FileLock *fl2;
  51     LONG status;
  52     SIPTR res;
  53
  54     if(!SameDevice(lock1, lock2))
  55         return LOCK_DIFFERENT;
  56
  57     fl1 = (struct FileLock *)BADDR(lock1);
  58     fl2 = (struct FileLock *)BADDR(lock2);
  59
  60     status = dopacket2(DOSBase, &res, fl1->fl_Task, ACTION_SAME_LOCK, lock1, lock2);
  61     if (status)
  62         return LOCK_SAME;
  63     if (res == ERROR_ACTION_NOT_KNOWN) {
  64         SetIoErr(0);
  65         if (fl1->fl_Volume == fl2->fl_Volume && fl1->fl_Key == fl2->fl_Key)
  66             return LOCK_SAME;
  67         if (fl1->fl_Volume == fl2->fl_Volume)
  68             return LOCK_SAME_VOLUME;
  69     }
  70     return LOCK_DIFFERENT;
  71
  72     AROS_LIBFUNC_EXIT
  73 } /* SameLock */