1 /* Work around rmdir bugs.
3 Copyright (C) 1988, 1990, 1999, 2003-2006, 2009 Free Software Foundation,
6 This program is free software: you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>. */
26 #include <sys/types.h>
30 /* Remove directory DIR.
31 Return 0 if successful, -1 if not. */
34 rpl_rmdir (char const *dir)
37 /* Work around cygwin 1.5.x bug where rmdir("dir/./") succeeds. */
38 size_t len = strlen (dir);
40 while (len && ISSLASH (dir[len - 1]))
42 if (len && dir[len - 1] == '.' && (1 == len || ISSLASH (dir[len - 2])))
48 /* Work around mingw bug, where rmdir("file/") fails with EINVAL
49 instead of ENOTDIR. We've already filtered out trailing ., the
50 only reason allowed by POSIX for EINVAL. */
51 if (result == -1 && errno == EINVAL)
55 #else /* !HAVE_RMDIR */
56 /* rmdir adapted from GNU tar. FIXME: Delete this implementation in
57 2010 if no one reports a system with missing rmdir. */
62 if (stat (dir, &statbuf) != 0)
63 return -1; /* errno already set */
65 if (!S_ISDIR (statbuf.st_mode))
74 case -1: /* cannot fork */
75 return -1; /* errno already set */
77 case 0: /* child process */
78 execl ("/bin/rmdir", "rmdir", dir, (char *) 0);
81 default: /* parent process */
83 /* Wait for kid to finish. */
85 while (wait (&status) != cpid)
91 /* /bin/rmdir failed. */
98 #endif /* !HAVE_RMDIR */