| 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 | } |