compiler/posixc/umask.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <aros/symbolsets.h>
   7 #include <sys/types.h>
   8 #include <sys/stat.h>
   9
  10 #include LC_LIBDEFS_FILE
  11
  12 /*****************************************************************************
  13
  14     NAME */
  15
  16         mode_t umask(
  17
  18 /*  SYNOPSIS */
  19         mode_t numask)
  20
  21 /*  FUNCTION
  22
  23     INPUTS
  24
  25     RESULT
  26
  27     NOTES
  28         umask is currently remembered but not used in any function
  29
  30     EXAMPLE
  31
  32     BUGS
  33
  34     SEE ALSO
  35
  36     INTERNALS
  37
  38 ******************************************************************************/
  39 {
  40     struct PosixCIntBase *PosixCBase =
  41         (struct PosixCIntBase *)__aros_getbase_PosixCBase();
  42     mode_t oumask = PosixCBase->umask;
  43
  44     PosixCBase->umask = numask;
  45
  46     return oumask;
  47 }
  48
  49 static int __umask_init(struct PosixCIntBase *PosixCBase)
  50 {
  51     struct PosixCIntBase *pPosixCBase;
  52
  53     pPosixCBase = __GM_GetBaseParent(PosixCBase);
  54
  55     /* TODO: Implement umask() properly
  56        Currently information is not used in any of the related functions
  57     */
  58
  59      /* Child of exec*()/vfork() functions inherit umask of parent */
  60     if (pPosixCBase && (pPosixCBase->flags & (VFORK_PARENT | EXEC_PARENT)))
  61         PosixCBase->umask = pPosixCBase->umask;
  62     else
  63         PosixCBase->umask = S_IWGRP|S_IWOTH;
  64
  65     return 1;
  66 }
  67
  68 ADD2OPENLIB(__umask_init, 0);