l4/pkg/l4re-core/uclibc/lib/contrib/uclibc/libc/unistd/daemon.c

   1 /* vi: set sw=4 ts=4: */
   2 /* daemon implementation for uClibc
   3  *
   4  * Copyright (c) 1990, 1993
   5  *      The Regents of the University of California.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * 3. <BSD Advertising Clause omitted per the July 22, 1999 licensing change
  17  *              ftp://ftp.cs.berkeley.edu/pub/4bsd/README.Impt.License.Change>
  18  *
  19  * 4. Neither the name of the University nor the names of its contributors
  20  *    may be used to endorse or promote products derived from this software
  21  *    without specific prior written permission.
  22  *
  23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  33  * SUCH DAMAGE.
  34  */
  35
  36 /*
  37  * Copyright (C) 2000-2006 Erik Andersen <andersen@uclibc.org>
  38  *
  39  * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
  40  * Modified for uClibc by Erik Andersen <andersen@uclibc.org>
  41  */
  42
  43 #include <stdio.h>
  44 #include <features.h>
  45 #include <fcntl.h>
  46 #include <paths.h>
  47 #include <signal.h>
  48 #include <unistd.h>
  49 #include <not-cancel.h>
  50 #include <errno.h>
  51
  52 #ifdef __UCLIBC_HAS_THREADS_NATIVE__
  53 #include <sys/stat.h>
  54 #endif
  55
  56 #ifdef __UCLIBC_HAS_LFS__
  57 #define STAT stat64
  58 #define FSTAT fstat64
  59 #else
  60 #define STAT stat
  61 #define FSTAT fstat
  62 #endif
  63
  64 #if defined __USE_BSD || (defined __USE_XOPEN && !defined __USE_UNIX98)
  65
  66 #ifndef __ARCH_USE_MMU__
  67 #include <sys/syscall.h>
  68 #include <sched.h>
  69 /* use clone() to get fork() like behavior here -- we just want to disassociate
  70  * from the controlling terminal
  71  */
  72 static inline attribute_optimize("O3")
  73 pid_t _fork_parent(void)
  74 {
  75         INTERNAL_SYSCALL_DECL(err);
  76         register long ret = INTERNAL_SYSCALL(clone, err, 2, CLONE_VM, 0);
  77         if (ret > 0)
  78                 /* parent needs to die now w/out touching stack */
  79                 INTERNAL_SYSCALL(exit, err, 1, 0);
  80         return ret;
  81 }
  82 static inline pid_t fork_parent(void)
  83 {
  84         /* Block all signals to keep the parent from using the stack */
  85         pid_t ret;
  86         sigset_t new_set, old_set;
  87         sigfillset(&new_set);
  88         sigprocmask(SIG_BLOCK, &new_set, &old_set);
  89         ret = _fork_parent();
  90         sigprocmask(SIG_SETMASK, &old_set, NULL);
  91         return ret;
  92 }
  93 #else
  94 static inline pid_t fork_parent(void)
  95 {
  96         switch (fork()) {
  97                 case -1: return -1;
  98                 case 0:  return 0;
  99                 default: _exit(0);
 100         }
 101 }
 102 #endif
 103
 104 int daemon(int nochdir, int noclose)
 105 {
 106         int fd;
 107
 108         if (fork_parent() == -1)
 109                 return -1;
 110
 111         if (setsid() == -1)
 112                 return -1;
 113
 114         if (!nochdir)
 115                 chdir("/");
 116
 117         if (!noclose)
 118         {
 119                 struct STAT st;
 120
 121                 if ((fd = open_not_cancel_2(_PATH_DEVNULL, O_RDWR)) != -1
 122                         && (__builtin_expect (FSTAT (fd, &st), 0) == 0))
 123                 {
 124                         if (__builtin_expect (S_ISCHR (st.st_mode), 1) != 0) {
 125                                 dup2(fd, STDIN_FILENO);
 126                                 dup2(fd, STDOUT_FILENO);
 127                                 dup2(fd, STDERR_FILENO);
 128                                 if (fd > 2)
 129                                         close(fd);
 130                         } else {
 131                                 /* We must set an errno value since no
 132                                    function call actually failed.  */
 133                                 close_not_cancel_no_status (fd);
 134                                 __set_errno (ENODEV);
 135                                 return -1;
 136                         }
 137                 } else {
 138                         close_not_cancel_no_status (fd);
 139                         return -1;
 140                 }
 141         }
 142         return 0;
 143 }
 144 #endif