test/dos/openfromlock.c

   1 /*
   2     Copyright © 2008, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Test for OpenFromLock(), NameFromLock(), NameFromFH() and DupLockFromFH().
   6  */
   7
   8 #include <exec/types.h>
   9 #include <dos/dosextens.h>
  10 #include <dos/bptr.h>
  11 #include <proto/exec.h>
  12 #include <proto/dos.h>
  13 #include <stdio.h>
  14 #include <string.h>
  15 #include <stdlib.h>
  16
  17 int main(int argc, char **argv) {
  18     LONG error = 0;
  19     BPTR fh, lock;
  20     TEXT buffer[100];
  21
  22     if (argc != 2) {
  23         printf("usage: %s filename\n", argv[0]);
  24         return 1;
  25     }
  26
  27     lock = Lock(argv[1], SHARED_LOCK);
  28     if (lock == BNULL) {
  29         PrintFault(IoErr(), "openfromlock");
  30         return 0;
  31     }
  32
  33     fh = OpenFromLock(lock);
  34     if (fh == BNULL) {
  35         PrintFault(IoErr(), "openfromlock");
  36         UnLock(lock);
  37         return 0;
  38     }
  39
  40     if (NameFromFH(fh, buffer, 100))
  41         Printf("Name from filehandle: %s\n", buffer);
  42     else
  43     {
  44         PutStr("Couldn't get name from file handle.\n");
  45         error = IoErr();
  46     }
  47
  48     if (error == 0)
  49     {
  50         lock = DupLockFromFH(fh);
  51         if (lock == BNULL)
  52         {
  53             PutStr("Couldn't duplicate lock from file handle.\n");
  54             error = IoErr();
  55         }
  56     }
  57
  58     if (error == 0)
  59     {
  60         if (NameFromLock(lock, buffer, 100))
  61             Printf("Name from lock: %s\n", buffer);
  62         else
  63             PutStr("Couldn't get name from lock.\n");
  64         UnLock(lock);
  65     }
  66
  67     Close(fh);
  68
  69     return 0;
  70 }