Commit | Line | Data |
---|---|---|
9c79dca0 BJ |
1 | /* |
2 | * Remove directory | |
3 | */ | |
4 | ||
5 | #include <sys/types.h> | |
6 | #include <sys/dir.h> | |
7 | #include <sys/stat.h> | |
8 | #include <stdio.h> | |
9 | ||
10 | int Errors = 0; | |
11 | char *rindex(); | |
12 | char *strcat(); | |
13 | char *strcpy(); | |
14 | ||
15 | main(argc,argv) | |
16 | int argc; | |
17 | char **argv; | |
18 | { | |
19 | ||
20 | if(argc < 2) { | |
21 | fprintf(stderr, "rmdir: arg count\n"); | |
22 | exit(1); | |
23 | } | |
24 | while(--argc) | |
25 | rmdir(*++argv); | |
26 | exit(Errors!=0); | |
27 | } | |
28 | ||
29 | rmdir(d) | |
30 | char *d; | |
31 | { | |
32 | int fd; | |
33 | char *np, name[500]; | |
34 | struct stat st, cst; | |
35 | struct direct dir; | |
36 | ||
37 | strcpy(name, d); | |
38 | if((np = rindex(name, '/')) == NULL) | |
39 | np = name; | |
40 | if(stat(name,&st) < 0) { | |
41 | fprintf(stderr, "rmdir: %s non-existent\n", name); | |
42 | ++Errors; | |
43 | return; | |
44 | } | |
45 | if (stat("", &cst) < 0) { | |
46 | fprintf(stderr, "rmdir: cannot stat \"\""); | |
47 | ++Errors; | |
48 | exit(1); | |
49 | } | |
50 | if((st.st_mode & S_IFMT) != S_IFDIR) { | |
51 | fprintf(stderr, "rmdir: %s not a directory\n", name); | |
52 | ++Errors; | |
53 | return; | |
54 | } | |
55 | if(st.st_ino==cst.st_ino &&st.st_dev==cst.st_dev) { | |
56 | fprintf(stderr, "rmdir: cannot remove current directory\n"); | |
57 | ++Errors; | |
58 | return; | |
59 | } | |
60 | if((fd = open(name,0)) < 0) { | |
61 | fprintf(stderr, "rmdir: %s unreadable\n", name); | |
62 | ++Errors; | |
63 | return; | |
64 | } | |
65 | while(read(fd, (char *)&dir, sizeof dir) == sizeof dir) { | |
66 | if(dir.d_ino == 0) continue; | |
67 | if(!strcmp(dir.d_name, ".") || !strcmp(dir.d_name, "..")) | |
68 | continue; | |
69 | fprintf(stderr, "rmdir: %s not empty\n", name); | |
70 | ++Errors; | |
71 | close(fd); | |
72 | return; | |
73 | } | |
74 | close(fd); | |
75 | if(!strcmp(np, ".") || !strcmp(np, "..")) { | |
76 | fprintf(stderr, "rmdir: cannot remove . or ..\n"); | |
77 | ++Errors; | |
78 | return; | |
79 | } | |
80 | strcat(name, "/."); | |
81 | if((access(name, 0)) < 0) { /* name/. non-existent */ | |
82 | strcat(name, "."); | |
83 | goto unl; | |
84 | } | |
85 | strcat(name, "."); | |
86 | if((access(name, 0)) < 0) /* name/.. non-existent */ | |
87 | goto unl2; | |
88 | if(access(name, 02)) { | |
89 | name[strlen(name)-3] = '\0'; | |
90 | fprintf(stderr, "rmdir: %s: no permission\n", name); | |
91 | ++Errors; | |
92 | return; | |
93 | } | |
94 | unl: | |
95 | unlink(name); /* unlink name/.. */ | |
96 | unl2: | |
97 | name[strlen(name)-1] = '\0'; | |
98 | unlink(name); /* unlink name/. */ | |
99 | name[strlen(name)-2] = '\0'; | |
100 | if (unlink(name) < 0) { | |
101 | fprintf(stderr, "rmdir: %s not removed\n", name); | |
102 | ++Errors; | |
103 | } | |
104 | } |