![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to mv.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 3BSD / cmd|
Return to mv.c CVS log | Up to [CSRG BSD Unix] / 3BSD / cmd |
1.1 ! root 1: /* ! 2: * mv file1 file2 ! 3: */ ! 4: ! 5: #include <stdio.h> ! 6: #include <sys/types.h> ! 7: #include <sys/stat.h> ! 8: #include <sys/dir.h> ! 9: #include <signal.h> ! 10: ! 11: #define DOT "." ! 12: #define DOTDOT ".." ! 13: #define DELIM '/' ! 14: #define SDELIM "/" ! 15: #define MAXN 100 ! 16: #define MODEBITS 07777 ! 17: #define ROOTINO 2 ! 18: ! 19: char *pname(); ! 20: char *sprintf(); ! 21: char *dname(); ! 22: struct stat s1, s2; ! 23: ! 24: main(argc, argv) ! 25: register char *argv[]; ! 26: { ! 27: register i, r; ! 28: ! 29: if (argc < 3) ! 30: goto usage; ! 31: if (stat(argv[1], &s1) < 0) { ! 32: fprintf(stderr, "mv: cannot access %s\n", argv[1]); ! 33: return(1); ! 34: } ! 35: if ((s1.st_mode & S_IFMT) == S_IFDIR) { ! 36: if (argc != 3) ! 37: goto usage; ! 38: return mvdir(argv[1], argv[2]); ! 39: } ! 40: setuid(getuid()); ! 41: if (argc > 3) ! 42: if (stat(argv[argc-1], &s2) < 0 || (s2.st_mode & S_IFMT) != S_IFDIR) ! 43: goto usage; ! 44: r = 0; ! 45: for (i=1; i<argc-1; i++) ! 46: r |= move(argv[i], argv[argc-1]); ! 47: return(r); ! 48: usage: ! 49: fprintf(stderr, "usage: mv f1 f2; or mv d1 d2; or mv f1 ... fn d1\n"); ! 50: return(1); ! 51: } ! 52: ! 53: move(source, target) ! 54: char *source, *target; ! 55: { ! 56: register c, i; ! 57: int status; ! 58: char buf[MAXN]; ! 59: ! 60: if (stat(source, &s1) < 0) { ! 61: fprintf(stderr, "mv: cannot access %s\n", source); ! 62: return(1); ! 63: } ! 64: if ((s1.st_mode & S_IFMT) == S_IFDIR) { ! 65: fprintf(stderr, "mv: directory rename only\n"); ! 66: return(1); ! 67: } ! 68: if (stat(target, &s2) >= 0) { ! 69: if ((s2.st_mode & S_IFMT) == S_IFDIR) { ! 70: sprintf(buf, "%s/%s", target, dname(source)); ! 71: target = buf; ! 72: } ! 73: if (stat(target, &s2) >= 0) { ! 74: if ((s2.st_mode & S_IFMT) == S_IFDIR) { ! 75: fprintf(stderr, "mv: %s is a directory\n", target); ! 76: return(1); ! 77: } ! 78: if (s1.st_dev==s2.st_dev && s1.st_ino==s2.st_ino) { ! 79: fprintf(stderr, "mv: %s and %s are identical\n", ! 80: source, target); ! 81: return(1); ! 82: } ! 83: if (access(target, 2) < 0 && isatty(fileno(stdin))) { ! 84: fprintf(stderr, "mv: %s: %o mode ", target, ! 85: s2.st_mode & MODEBITS); ! 86: i = c = getchar(); ! 87: while (c != '\n' && c != EOF) ! 88: c = getchar(); ! 89: if (i != 'y') ! 90: return(1); ! 91: } ! 92: if (unlink(target) < 0) { ! 93: fprintf(stderr, "mv: cannot unlink %s\n", target); ! 94: return(1); ! 95: } ! 96: } ! 97: } ! 98: if (link(source, target) < 0) { ! 99: i = fork(); ! 100: if (i == -1) { ! 101: fprintf(stderr, "mv: try again\n"); ! 102: return(1); ! 103: } ! 104: if (i == 0) { ! 105: execl("/bin/cp", "cp", source, target, 0); ! 106: fprintf(stderr, "mv: cannot exec cp\n"); ! 107: exit(1); ! 108: } ! 109: while ((c = wait(&status)) != i && c != -1) ! 110: ; ! 111: if (status != 0) ! 112: return(1); ! 113: utime(target, &s1.st_atime); ! 114: } ! 115: if (unlink(source) < 0) { ! 116: fprintf(stderr, "mv: cannot unlink %s\n", source); ! 117: return(1); ! 118: } ! 119: return(0); ! 120: } ! 121: ! 122: mvdir(source, target) ! 123: char *source, *target; ! 124: { ! 125: register char *p; ! 126: register i; ! 127: char buf[MAXN]; ! 128: ! 129: if (stat(target, &s2) >= 0) { ! 130: if ((s2.st_mode&S_IFMT) != S_IFDIR) { ! 131: fprintf(stderr, "mv: %s exists\n", target); ! 132: return(1); ! 133: } ! 134: if (strlen(target) > MAXN-DIRSIZ-2) { ! 135: fprintf(stderr, "mv :target name too long\n"); ! 136: return(1); ! 137: } ! 138: strcpy(buf, target); ! 139: target = buf; ! 140: strcat(buf, SDELIM); ! 141: strcat(buf, dname(source)); ! 142: if (stat(target, &s2) >= 0) { ! 143: fprintf(stderr, "mv: %s exists\n", buf); ! 144: return(1); ! 145: } ! 146: } ! 147: if (strcmp(source, target) == 0) { ! 148: fprintf(stderr, "mv: ?? source == target, source exists and target doesnt\n"); ! 149: return(1); ! 150: } ! 151: p = dname(source); ! 152: if (!strcmp(p, DOT) || !strcmp(p, DOTDOT) || !strcmp(p, "") || p[strlen(p)-1]=='/') { ! 153: fprintf(stderr, "mv: cannot rename %s\n", p); ! 154: return(1); ! 155: } ! 156: if (stat(pname(source), &s1) < 0 || stat(pname(target), &s2) < 0) { ! 157: fprintf(stderr, "mv: cannot locate parent\n"); ! 158: return(1); ! 159: } ! 160: if (access(pname(target), 2) < 0) { ! 161: fprintf(stderr, "mv: no write access to %s\n", pname(target)); ! 162: return(1); ! 163: } ! 164: if (access(pname(source), 2) < 0) { ! 165: fprintf(stderr, "mv: no write access to %s\n", pname(source)); ! 166: return(1); ! 167: } ! 168: if (access(source, 2) < 0) { ! 169: fprintf(stderr, "mv: no write access to %s\n", source); ! 170: return(1); ! 171: } ! 172: if (s1.st_dev != s2.st_dev) { ! 173: fprintf(stderr, "mv: cannot move directories across devices\n"); ! 174: return(1); ! 175: } ! 176: if (s1.st_ino != s2.st_ino) { ! 177: char dst[MAXN+5]; ! 178: ! 179: if (chkdot(source) || chkdot(target)) { ! 180: fprintf(stderr, "mv: Sorry, path names including %s aren't allowed\n", DOTDOT); ! 181: return(1); ! 182: } ! 183: stat(source, &s1); ! 184: if (check(pname(target), s1.st_ino)) ! 185: return(1); ! 186: for (i = 1; i <= NSIG; i++) ! 187: signal(i, SIG_IGN); ! 188: if (link(source, target) < 0) { ! 189: fprintf(stderr, "mv: cannot link %s to %s\n", target, source); ! 190: return(1); ! 191: } ! 192: if (unlink(source) < 0) { ! 193: fprintf(stderr, "mv: %s: cannot unlink\n", source); ! 194: unlink(target); ! 195: return(1); ! 196: } ! 197: strcat(dst, target); ! 198: strcat(dst, "/"); ! 199: strcat(dst, DOTDOT); ! 200: if (unlink(dst) < 0) { ! 201: fprintf(stderr, "mv: %s: cannot unlink\n", dst); ! 202: if (link(target, source) >= 0) ! 203: unlink(target); ! 204: return(1); ! 205: } ! 206: if (link(pname(target), dst) < 0) { ! 207: fprintf(stderr, "mv: cannot link %s to %s\n", ! 208: dst, pname(target)); ! 209: if (link(pname(source), dst) >= 0) ! 210: if (link(target, source) >= 0) ! 211: unlink(target); ! 212: return(1); ! 213: } ! 214: return(0); ! 215: } ! 216: if (link(source, target) < 0) { ! 217: fprintf(stderr, "mv: cannot link %s and %s\n", ! 218: source, target); ! 219: return(1); ! 220: } ! 221: if (unlink(source) < 0) { ! 222: fprintf(stderr, "mv: ?? cannot unlink %s\n", source); ! 223: return(1); ! 224: } ! 225: return(0); ! 226: } ! 227: ! 228: char * ! 229: pname(name) ! 230: register char *name; ! 231: { ! 232: register c; ! 233: register char *p, *q; ! 234: static char buf[MAXN]; ! 235: ! 236: p = q = buf; ! 237: while (c = *p++ = *name++) ! 238: if (c == DELIM) ! 239: q = p-1; ! 240: if (q == buf && *q == DELIM) ! 241: q++; ! 242: *q = 0; ! 243: return buf[0]? buf : DOT; ! 244: } ! 245: ! 246: char * ! 247: dname(name) ! 248: register char *name; ! 249: { ! 250: register char *p; ! 251: ! 252: p = name; ! 253: while (*p) ! 254: if (*p++ == DELIM && *p) ! 255: name = p; ! 256: return name; ! 257: } ! 258: ! 259: check(spth, dinode) ! 260: char *spth; ! 261: ino_t dinode; ! 262: { ! 263: char nspth[MAXN]; ! 264: struct stat sbuf; ! 265: ! 266: sbuf.st_ino = 0; ! 267: ! 268: strcpy(nspth, spth); ! 269: while (sbuf.st_ino != ROOTINO) { ! 270: if (stat(nspth, &sbuf) < 0) { ! 271: fprintf(stderr, "mv: cannot access %s\n", nspth); ! 272: return(1); ! 273: } ! 274: if (sbuf.st_ino == dinode) { ! 275: fprintf(stderr, "mv: cannot move a directory into itself\n"); ! 276: return(1); ! 277: } ! 278: if (strlen(nspth) > MAXN-2-sizeof(DOTDOT)) { ! 279: fprintf(stderr, "mv: name too long\n"); ! 280: return(1); ! 281: } ! 282: strcat(nspth, SDELIM); ! 283: strcat(nspth, DOTDOT); ! 284: } ! 285: return(0); ! 286: } ! 287: ! 288: chkdot(s) ! 289: register char *s; ! 290: { ! 291: do { ! 292: if (strcmp(dname(s), DOTDOT) == 0) ! 293: return(1); ! 294: s = pname(s); ! 295: } while (strcmp(s, DOT) != 0 && strcmp(s, SDELIM) != 0); ! 296: return(0); ! 297: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.