rom/dos/relabel.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8 #include <proto/exec.h>
   9
  10 #include "dos_intern.h"
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15 #include <proto/dos.h>
  16
  17         AROS_LH2(LONG, Relabel,
  18
  19 /*  SYNOPSIS */
  20         AROS_LHA(CONST_STRPTR, drive, D1),
  21         AROS_LHA(CONST_STRPTR, newname, D2),
  22
  23 /*  LOCATION */
  24         struct DosLibrary *, DOSBase, 120, Dos)
  25
  26 /*  FUNCTION
  27
  28     Change names of a volume.
  29
  30     INPUTS
  31
  32     drive    --  The name of the device to rename (including the ':').
  33     newname  --  The new name for the device (without the ':').
  34
  35     RESULT
  36
  37     A boolean telling whether the name change was successful or not.
  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 IOFileSys iofs;
  54
  55     /* Prepare I/O request. */
  56     InitIOFS(&iofs, FSA_RELABEL, DOSBase);
  57
  58     iofs.IOFS.io_Device = GetDevice(drive, &iofs.IOFS.io_Unit, DOSBase);
  59
  60     if(iofs.IOFS.io_Device == NULL)
  61     {
  62         return DOSFALSE;
  63     }
  64
  65     iofs.io_Union.io_RELABEL.io_NewName = newname;
  66     iofs.io_Union.io_RELABEL.io_Result  = FALSE;
  67
  68     DosDoIO(&iofs.IOFS);
  69
  70     SetIoErr(iofs.io_DosError);
  71
  72     if(iofs.io_DosError != 0)
  73     {
  74         return DOSFALSE;
  75     }
  76
  77     return iofs.io_Union.io_RELABEL.io_Result ? DOSTRUE : DOSFALSE;
  78
  79     AROS_LIBFUNC_EXIT
  80 } /* Relabel */