rom/dos/currentdir.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <proto/exec.h>
   9 #include "dos_intern.h"
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <proto/dos.h>
  15
  16         AROS_LH1(BPTR, CurrentDir,
  17
  18 /*  SYNOPSIS */
  19         AROS_LHA(BPTR, lock, D1),
  20
  21 /*  LOCATION */
  22         struct DosLibrary *, DOSBase, 21, Dos)
  23
  24 /*  FUNCTION
  25         Sets a new directory as the current directory. Returns the old one.
  26         0 is valid in both cases and represents the boot filesystem.
  27
  28     INPUTS
  29         lock - Lock for the new current directory.
  30
  31     RESULT
  32         Old current directory.
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41
  42     INTERNALS
  43
  44 *****************************************************************************/
  45 {
  46     AROS_LIBFUNC_INIT
  47     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  48
  49     /* Get pointer to process structure */
  50     struct Process *me=(struct Process *)FindTask(NULL);
  51     BPTR old;
  52
  53     /* Nothing spectacular */
  54     old=me->pr_CurrentDir;
  55     me->pr_CurrentDir=lock;
  56     return old;
  57     AROS_LIBFUNC_EXIT
  58 } /* CurrentDir */