compiler/clib/umask.c

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