compiler/clib/fchmod.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     POSIX.1-2008 function fchmod().
   6 */
   7
   8 #include <errno.h>
   9
  10 #include <aros/debug.h>
  11 #include <proto/exec.h>
  12 #include <proto/dos.h>
  13 #include <sys/types.h>
  14 #include <stdlib.h>
  15
  16 #include "__fdesc.h"
  17 #include "__upath.h"
  18
  19 ULONG prot_u2a(mode_t protect);
  20
  21 /*****************************************************************************
  22
  23     NAME */
  24 #include <sys/types.h>
  25 #include <sys/stat.h>
  26
  27         int fchmod (
  28
  29 /*  SYNOPSIS */
  30         int filedes,
  31         mode_t mode)
  32
  33 /*  FUNCTION
  34         Change permission bits of a file specified by an open file descriptor.
  35
  36     INPUTS
  37         filedes - File descriptor of the file
  38         mode - Permission bits to set
  39
  40     RESULT
  41         0 on success and -1 on error. If an error occurred, the global
  42         variable errno is set.
  43
  44     NOTES
  45         See chmod() documentation for more details about the mode parameter.
  46
  47     EXAMPLE
  48
  49     BUGS
  50
  51     SEE ALSO
  52         chmod()
  53
  54     INTERNALS
  55
  56 ******************************************************************************/
  57 {
  58     fdesc *fdesc;
  59     UBYTE *buffer;
  60     int buffersize = 256;
  61
  62     if (!(fdesc = __getfdesc(filedes)))
  63     {
  64         errno = EBADF;
  65         return -1;
  66     }
  67
  68     /* Get the full path of the stated filesystem object and use it to
  69        compute hash value */
  70     do
  71     {
  72         if(!(buffer = AllocVec(buffersize, MEMF_ANY)))
  73         {
  74             errno = __arosc_ioerr2errno(IoErr());
  75             return -1;
  76         }
  77
  78         if(NameFromFH(fdesc->fcb->fh, buffer, buffersize))
  79             break;
  80         else if(IoErr() != ERROR_LINE_TOO_LONG)
  81         {
  82             errno = __arosc_ioerr2errno(IoErr());
  83             FreeVec(buffer);
  84             return -1;
  85         }
  86         FreeVec(buffer);
  87         buffersize *= 2;
  88     }
  89     while(TRUE);
  90
  91     if (!SetProtection(buffer, prot_u2a(mode)))
  92     {
  93         FreeVec(buffer);
  94         errno = __arosc_ioerr2errno(IoErr());
  95         return -1;
  96     }
  97
  98     FreeVec(buffer);
  99     return 0;
 100 } /* fchmod */
 101