rom/dos/parentdir.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10 #include "dos_intern.h"
  11 #include <dos/dos.h>
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16 #include <exec/types.h>
  17 #include <proto/dos.h>
  18
  19         AROS_LH1(BPTR, ParentDir,
  20
  21 /*  SYNOPSIS */
  22         AROS_LHA(BPTR, lock, D1),
  23
  24 /*  LOCATION */
  25         struct DosLibrary *, DOSBase, 35, Dos)
  26
  27 /*  FUNCTION
  28         Returns a lock to the parent directory of the supplied lock.
  29
  30     INPUTS
  31         lock - Lock to get parent directory of.
  32
  33     RESULT
  34         Returns a lock to the parent directory or NULL, in which case the
  35         supplied lock has no parent directory (because it is the root
  36         directory) or an error occured. IoErr() returns 0 in the former case
  37         and a different value on error.
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46
  47     INTERNALS
  48
  49 *****************************************************************************/
  50 {
  51     AROS_LIBFUNC_INIT
  52
  53     struct FileLock *fl = BADDR(lock);
  54     D(bug("[ParentDir] lock=%x\n", lock));
  55     return (BPTR)dopacket1(DOSBase, NULL, fl->fl_Task, ACTION_PARENT, lock);
  56
  57     AROS_LIBFUNC_EXIT
  58 } /* ParentDir */