1*b30d1939SAndy Fiddaman /***********************************************************************
2*b30d1939SAndy Fiddaman * *
3*b30d1939SAndy Fiddaman * This software is part of the ast package *
4*b30d1939SAndy Fiddaman * Copyright (c) 1992-2012 AT&T Intellectual Property *
5*b30d1939SAndy Fiddaman * and is licensed under the *
6*b30d1939SAndy Fiddaman * Eclipse Public License, Version 1.0 *
7*b30d1939SAndy Fiddaman * by AT&T Intellectual Property *
8*b30d1939SAndy Fiddaman * *
9*b30d1939SAndy Fiddaman * A copy of the License is available at *
10*b30d1939SAndy Fiddaman * http://www.eclipse.org/org/documents/epl-v10.html *
11*b30d1939SAndy Fiddaman * (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12*b30d1939SAndy Fiddaman * *
13*b30d1939SAndy Fiddaman * Information and Software Systems Research *
14*b30d1939SAndy Fiddaman * AT&T Research *
15*b30d1939SAndy Fiddaman * Florham Park NJ *
16*b30d1939SAndy Fiddaman * *
17*b30d1939SAndy Fiddaman * Glenn Fowler <gsf@research.att.com> *
18*b30d1939SAndy Fiddaman * David Korn <dgk@research.att.com> *
19*b30d1939SAndy Fiddaman * *
20*b30d1939SAndy Fiddaman ***********************************************************************/
21*b30d1939SAndy Fiddaman #pragma prototyped
22*b30d1939SAndy Fiddaman /*
23*b30d1939SAndy Fiddaman * Glenn Fowler
24*b30d1939SAndy Fiddaman * AT&T Research
25*b30d1939SAndy Fiddaman *
26*b30d1939SAndy Fiddaman * rmdir
27*b30d1939SAndy Fiddaman */
28*b30d1939SAndy Fiddaman
29*b30d1939SAndy Fiddaman static const char usage[] =
30*b30d1939SAndy Fiddaman "[-?\n@(#)$Id: rmdir (AT&T Research) 2006-08-24 $\n]"
31*b30d1939SAndy Fiddaman USAGE_LICENSE
32*b30d1939SAndy Fiddaman "[+NAME?rmdir - remove empty directories]"
33*b30d1939SAndy Fiddaman "[+DESCRIPTION?\brmdir\b deletes each given directory. The directory "
34*b30d1939SAndy Fiddaman "must be empty; containing no entries other than \b.\b or \b..\b. "
35*b30d1939SAndy Fiddaman "If a directory and a subdirectory of that directory are specified "
36*b30d1939SAndy Fiddaman "as operands, the subdirectory must be specified before the parent "
37*b30d1939SAndy Fiddaman "so that the parent directory will be empty when \brmdir\b attempts "
38*b30d1939SAndy Fiddaman "to remove it.]"
39*b30d1939SAndy Fiddaman "[e:ignore-fail-on-non-empty?Ignore each non-empty directory failure.]"
40*b30d1939SAndy Fiddaman "[p:parents?Remove each explicit \adirectory\a argument directory that "
41*b30d1939SAndy Fiddaman "becomes empty after its child directories are removed.]"
42*b30d1939SAndy Fiddaman "[s:suppress?Suppress the message printed on the standard error when "
43*b30d1939SAndy Fiddaman "\b-p\b is in effect.]"
44*b30d1939SAndy Fiddaman "\n"
45*b30d1939SAndy Fiddaman "\ndirectory ...\n"
46*b30d1939SAndy Fiddaman "\n"
47*b30d1939SAndy Fiddaman "[+EXIT STATUS?]{"
48*b30d1939SAndy Fiddaman "[+0?All directories deleted successfully.]"
49*b30d1939SAndy Fiddaman "[+>0?One or more directories could not be deleted.]"
50*b30d1939SAndy Fiddaman "}"
51*b30d1939SAndy Fiddaman "[+SEE ALSO?\bmkdir\b(1), \brm\b(1), \brmdir\b(2), \bunlink\b(2)]"
52*b30d1939SAndy Fiddaman ;
53*b30d1939SAndy Fiddaman
54*b30d1939SAndy Fiddaman #include <cmd.h>
55*b30d1939SAndy Fiddaman
56*b30d1939SAndy Fiddaman int
b_rmdir(int argc,char ** argv,Shbltin_t * context)57*b30d1939SAndy Fiddaman b_rmdir(int argc, char** argv, Shbltin_t* context)
58*b30d1939SAndy Fiddaman {
59*b30d1939SAndy Fiddaman register char* dir;
60*b30d1939SAndy Fiddaman register char* end;
61*b30d1939SAndy Fiddaman register int n;
62*b30d1939SAndy Fiddaman int eflag = 0;
63*b30d1939SAndy Fiddaman int pflag = 0;
64*b30d1939SAndy Fiddaman int sflag = 0;
65*b30d1939SAndy Fiddaman
66*b30d1939SAndy Fiddaman cmdinit(argc, argv, context, ERROR_CATALOG, 0);
67*b30d1939SAndy Fiddaman for (;;)
68*b30d1939SAndy Fiddaman {
69*b30d1939SAndy Fiddaman switch (optget(argv, usage))
70*b30d1939SAndy Fiddaman {
71*b30d1939SAndy Fiddaman case 'e':
72*b30d1939SAndy Fiddaman eflag = 1;
73*b30d1939SAndy Fiddaman continue;
74*b30d1939SAndy Fiddaman case 'p':
75*b30d1939SAndy Fiddaman pflag = 1;
76*b30d1939SAndy Fiddaman continue;
77*b30d1939SAndy Fiddaman case 's':
78*b30d1939SAndy Fiddaman sflag = 1;
79*b30d1939SAndy Fiddaman continue;
80*b30d1939SAndy Fiddaman case ':':
81*b30d1939SAndy Fiddaman error(2, "%s", opt_info.arg);
82*b30d1939SAndy Fiddaman break;
83*b30d1939SAndy Fiddaman case '?':
84*b30d1939SAndy Fiddaman error(ERROR_usage(2), "%s", opt_info.arg);
85*b30d1939SAndy Fiddaman break;
86*b30d1939SAndy Fiddaman }
87*b30d1939SAndy Fiddaman break;
88*b30d1939SAndy Fiddaman }
89*b30d1939SAndy Fiddaman argv += opt_info.index;
90*b30d1939SAndy Fiddaman if (error_info.errors || !*argv)
91*b30d1939SAndy Fiddaman error(ERROR_usage(2), "%s", optusage(NiL));
92*b30d1939SAndy Fiddaman if (!pflag)
93*b30d1939SAndy Fiddaman sflag = 0;
94*b30d1939SAndy Fiddaman while (dir = *argv++)
95*b30d1939SAndy Fiddaman {
96*b30d1939SAndy Fiddaman end = dir;
97*b30d1939SAndy Fiddaman if (pflag) end += strlen(dir);
98*b30d1939SAndy Fiddaman n = 0;
99*b30d1939SAndy Fiddaman for (;;)
100*b30d1939SAndy Fiddaman {
101*b30d1939SAndy Fiddaman if (rmdir(dir) < 0)
102*b30d1939SAndy Fiddaman {
103*b30d1939SAndy Fiddaman if (!eflag || errno != EEXIST
104*b30d1939SAndy Fiddaman #ifdef ENOTEMPTY
105*b30d1939SAndy Fiddaman && errno != ENOTEMPTY
106*b30d1939SAndy Fiddaman #endif
107*b30d1939SAndy Fiddaman )
108*b30d1939SAndy Fiddaman {
109*b30d1939SAndy Fiddaman if (sflag)
110*b30d1939SAndy Fiddaman error_info.errors++;
111*b30d1939SAndy Fiddaman else
112*b30d1939SAndy Fiddaman error(ERROR_system(0), "%s: cannot remove", dir);
113*b30d1939SAndy Fiddaman }
114*b30d1939SAndy Fiddaman break;
115*b30d1939SAndy Fiddaman }
116*b30d1939SAndy Fiddaman if (n) *end = '/';
117*b30d1939SAndy Fiddaman else n = 1;
118*b30d1939SAndy Fiddaman do if (end <= dir) goto next; while (*--end != '/');
119*b30d1939SAndy Fiddaman do if (end <= dir) goto next; while (*(end - 1) == '/' && end--);
120*b30d1939SAndy Fiddaman *end = 0;
121*b30d1939SAndy Fiddaman }
122*b30d1939SAndy Fiddaman next: ;
123*b30d1939SAndy Fiddaman }
124*b30d1939SAndy Fiddaman return(error_info.errors != 0);
125*b30d1939SAndy Fiddaman }
126*b30d1939SAndy Fiddaman
127