Merge from coreutils.
[gnulib.git] / lib / rmdir.c
1 /* BSD compatible remove directory function for System V
2
3    Copyright (C) 1988, 1990, 1999, 2003, 2004 Free Software Foundation, Inc.
4
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 2, or (at your option)
8    any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program; if not, write to the Free Software Foundation,
17    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
18
19 #if HAVE_CONFIG_H
20 # include <config.h>
21 #endif
22
23 #include <sys/types.h>
24 #include <sys/stat.h>
25 #include <errno.h>
26
27 #include "stat-macros.h"
28
29 /* rmdir adapted from GNU tar.  */
30
31 /* Remove directory DPATH.
32    Return 0 if successful, -1 if not.  */
33
34 int
35 rmdir (char const *dpath)
36 {
37   pid_t cpid;
38   int status;
39   struct stat statbuf;
40
41   if (stat (dpath, &statbuf) != 0)
42     return -1;                  /* errno already set */
43
44   if (!S_ISDIR (statbuf.st_mode))
45     {
46       errno = ENOTDIR;
47       return -1;
48     }
49
50   cpid = fork ();
51   switch (cpid)
52     {
53     case -1:                    /* cannot fork */
54       return -1;                /* errno already set */
55
56     case 0:                     /* child process */
57       execl ("/bin/rmdir", "rmdir", dpath, (char *) 0);
58       _exit (1);
59
60     default:                    /* parent process */
61
62       /* Wait for kid to finish.  */
63
64       while (wait (&status) != cpid)
65         /* Do nothing.  */ ;
66
67       if (status)
68         {
69
70           /* /bin/rmdir failed.  */
71
72           errno = EIO;
73           return -1;
74         }
75       return 0;
76     }
77 }