rom/dos/createdir.c

   1 /*
   2     Copyright © 1995-2008, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Create a new directory.
   6     Lang: English
   7 */
   8
   9 #include <aros/debug.h>
  10 #include <exec/memory.h>
  11 #include <proto/exec.h>
  12 #include <utility/tagitem.h>
  13 #include <dos/dos.h>
  14 #include <proto/dos.h>
  15 #include <proto/utility.h>
  16 #include "dos_intern.h"
  17
  18 /*****************************************************************************
  19
  20     NAME */
  21 #include <proto/dos.h>
  22
  23         AROS_LH1(BPTR, CreateDir,
  24
  25 /*  SYNOPSIS */
  26         AROS_LHA(CONST_STRPTR, name, D1),
  27
  28 /*  LOCATION */
  29         struct DosLibrary *, DOSBase, 20, Dos)
  30
  31 /*  FUNCTION
  32         Creates a new directory under the given name. If all went well, an
  33         exclusive lock on the new diretory is returned.
  34
  35     INPUTS
  36         name  -- NUL terminated name.
  37
  38     RESULT
  39         Exclusive lock to the new directory or 0 if it couldn't be created.
  40         IoErr() gives additional information in that case.
  41
  42     NOTES
  43
  44     EXAMPLE
  45
  46     BUGS
  47
  48     SEE ALSO
  49
  50     INTERNALS
  51
  52 *****************************************************************************/
  53 {
  54     AROS_LIBFUNC_INIT
  55
  56     BPTR lock = BNULL;
  57     struct PacketHelperStruct phs;
  58
  59     D(bug("[CreateDir] '%s'\n", name));
  60
  61     if (getpacketinfo(DOSBase, name, &phs)) {
  62         lock = (BPTR)dopacket2(DOSBase, NULL, phs.port, ACTION_CREATE_DIR, phs.lock, phs.name);
  63         freepacketinfo(DOSBase, &phs);
  64     }
  65
  66     return lock;
  67
  68     AROS_LIBFUNC_EXIT
  69 } /* CreateDir */
  70