![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to xinstall.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / pgrm / xinstall|
Return to xinstall.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / pgrm / xinstall |
1.1 ! root 1: /* ! 2: * Copyright (c) 1987 Regents of the University of California. ! 3: * All rights reserved. ! 4: * ! 5: * Redistribution and use in source and binary forms are permitted provided ! 6: * that: (1) source distributions retain this entire copyright notice and ! 7: * comment, and (2) distributions including binaries display the following ! 8: * acknowledgement: ``This product includes software developed by the ! 9: * University of California, Berkeley and its contributors'' in the ! 10: * documentation or other materials provided with the distribution and in ! 11: * all advertising materials mentioning features or use of this software. ! 12: * Neither the name of the University nor the names of its contributors may ! 13: * be used to endorse or promote products derived from this software without ! 14: * specific prior written permission. ! 15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED ! 16: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF ! 17: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. ! 18: */ ! 19: ! 20: #ifndef lint ! 21: char copyright[] = ! 22: "@(#) Copyright (c) 1987 Regents of the University of California.\n\ ! 23: All rights reserved.\n"; ! 24: #endif /* not lint */ ! 25: ! 26: #ifndef lint ! 27: static char sccsid[] = "@(#)xinstall.c 5.24 (Berkeley) 7/1/90"; ! 28: #endif /* not lint */ ! 29: ! 30: #include <sys/param.h> ! 31: #include <sys/stat.h> ! 32: #include <sys/file.h> ! 33: #include <grp.h> ! 34: #include <pwd.h> ! 35: #include <stdio.h> ! 36: #include <ctype.h> ! 37: #include <paths.h> ! 38: #include "pathnames.h" ! 39: ! 40: static struct passwd *pp; ! 41: static struct group *gp; ! 42: static int docopy, dostrip, mode = 0755; ! 43: static char *group, *owner, pathbuf[MAXPATHLEN]; ! 44: ! 45: main(argc, argv) ! 46: int argc; ! 47: char **argv; ! 48: { ! 49: extern char *optarg; ! 50: extern int optind; ! 51: struct stat from_sb, to_sb; ! 52: mode_t *set, *setmode(); ! 53: int ch, no_target; ! 54: char *to_name; ! 55: ! 56: while ((ch = getopt(argc, argv, "cg:m:o:s")) != EOF) ! 57: switch((char)ch) { ! 58: case 'c': ! 59: docopy = 1; ! 60: break; ! 61: case 'g': ! 62: group = optarg; ! 63: break; ! 64: case 'm': ! 65: if (!(set = setmode(optarg))) { ! 66: (void)fprintf(stderr, ! 67: "install: invalid file mode.\n"); ! 68: exit(1); ! 69: } ! 70: mode = getmode(set, 0); ! 71: break; ! 72: case 'o': ! 73: owner = optarg; ! 74: break; ! 75: case 's': ! 76: dostrip = 1; ! 77: break; ! 78: case '?': ! 79: default: ! 80: usage(); ! 81: } ! 82: argc -= optind; ! 83: argv += optind; ! 84: if (argc < 2) ! 85: usage(); ! 86: ! 87: /* get group and owner id's */ ! 88: if (group && !(gp = getgrnam(group))) { ! 89: fprintf(stderr, "install: unknown group %s.\n", group); ! 90: exit(1); ! 91: } ! 92: if (owner && !(pp = getpwnam(owner))) { ! 93: fprintf(stderr, "install: unknown user %s.\n", owner); ! 94: exit(1); ! 95: } ! 96: ! 97: no_target = stat(to_name = argv[argc - 1], &to_sb); ! 98: if (!no_target && (to_sb.st_mode & S_IFMT) == S_IFDIR) { ! 99: for (; *argv != to_name; ++argv) ! 100: install(*argv, to_name, 1); ! 101: exit(0); ! 102: } ! 103: ! 104: /* can't do file1 file2 directory/file */ ! 105: if (argc != 2) ! 106: usage(); ! 107: ! 108: if (!no_target) { ! 109: if (stat(*argv, &from_sb)) { ! 110: fprintf(stderr, "install: can't find %s.\n", *argv); ! 111: exit(1); ! 112: } ! 113: if ((to_sb.st_mode & S_IFMT) != S_IFREG) { ! 114: fprintf(stderr, "install: %s isn't a regular file.\n", to_name); ! 115: exit(1); ! 116: } ! 117: if (to_sb.st_dev == from_sb.st_dev && to_sb.st_ino == from_sb.st_ino) { ! 118: fprintf(stderr, "install: %s and %s are the same file.\n", *argv, to_name); ! 119: exit(1); ! 120: } ! 121: /* unlink now... avoid ETXTBSY errors later */ ! 122: (void)unlink(to_name); ! 123: } ! 124: install(*argv, to_name, 0); ! 125: exit(0); ! 126: } ! 127: ! 128: /* ! 129: * install -- ! 130: * build a path name and install the file ! 131: */ ! 132: install(from_name, to_name, isdir) ! 133: char *from_name, *to_name; ! 134: int isdir; ! 135: { ! 136: struct stat from_sb; ! 137: int devnull, from_fd, to_fd; ! 138: char *C, *rindex(); ! 139: ! 140: /* if try to install NULL file to a directory, fails */ ! 141: if (isdir || strcmp(from_name, _PATH_DEVNULL)) { ! 142: if (stat(from_name, &from_sb)) { ! 143: fprintf(stderr, "install: can't find %s.\n", from_name); ! 144: exit(1); ! 145: } ! 146: if ((from_sb.st_mode & S_IFMT) != S_IFREG) { ! 147: fprintf(stderr, "install: %s isn't a regular file.\n", from_name); ! 148: exit(1); ! 149: } ! 150: /* build the target path */ ! 151: if (isdir) { ! 152: (void)sprintf(pathbuf, "%s/%s", to_name, (C = rindex(from_name, '/')) ? ++C : from_name); ! 153: to_name = pathbuf; ! 154: } ! 155: devnull = 0; ! 156: } else ! 157: devnull = 1; ! 158: ! 159: /* unlink now... avoid ETXTBSY errors later */ ! 160: (void)unlink(to_name); ! 161: ! 162: /* create target */ ! 163: if ((to_fd = open(to_name, O_CREAT|O_WRONLY|O_TRUNC, 0600)) < 0) { ! 164: error(to_name); ! 165: exit(1); ! 166: } ! 167: if (!devnull) { ! 168: if ((from_fd = open(from_name, O_RDONLY, 0)) < 0) { ! 169: (void)unlink(to_name); ! 170: error(from_name); ! 171: exit(1); ! 172: } ! 173: copy(from_fd, from_name, to_fd, to_name); ! 174: (void)close(from_fd); ! 175: } ! 176: if (dostrip) ! 177: strip(to_name); ! 178: /* ! 179: * set owner, group, mode for target; do the chown first, ! 180: * chown may lose the setuid bits. ! 181: */ ! 182: if ((group || owner) && ! 183: fchown(to_fd, owner ? pp->pw_uid : -1, group ? gp->gr_gid : -1) || ! 184: fchmod(to_fd, mode)) { ! 185: error(to_name); ! 186: bad(to_name); ! 187: } ! 188: (void)close(to_fd); ! 189: if (!docopy && !devnull && unlink(from_name)) { ! 190: error(from_name); ! 191: exit(1); ! 192: } ! 193: } ! 194: ! 195: /* ! 196: * copy -- ! 197: * copy from one file to another ! 198: */ ! 199: copy(from_fd, from_name, to_fd, to_name) ! 200: register int from_fd, to_fd; ! 201: char *from_name, *to_name; ! 202: { ! 203: register int n; ! 204: char buf[MAXBSIZE]; ! 205: ! 206: while ((n = read(from_fd, buf, sizeof(buf))) > 0) ! 207: if (write(to_fd, buf, n) != n) { ! 208: error(to_name); ! 209: bad(to_name); ! 210: } ! 211: if (n == -1) { ! 212: error(from_name); ! 213: bad(to_name); ! 214: } ! 215: } ! 216: ! 217: /* ! 218: * strip -- ! 219: * use strip(1) to strip the target file ! 220: */ ! 221: strip(to_name) ! 222: char *to_name; ! 223: { ! 224: int status; ! 225: ! 226: switch (vfork()) { ! 227: case -1: ! 228: error("fork"); ! 229: bad(to_name); ! 230: case 0: ! 231: execl(_PATH_STRIP, "strip", to_name, (char *)NULL); ! 232: error(_PATH_STRIP); ! 233: _exit(1); ! 234: default: ! 235: if (wait(&status) == -1 || status) ! 236: bad(to_name); ! 237: } ! 238: } ! 239: ! 240: /* ! 241: * error -- ! 242: * print out an error message ! 243: */ ! 244: error(s) ! 245: char *s; ! 246: { ! 247: extern int errno; ! 248: char *strerror(); ! 249: ! 250: (void)fprintf(stderr, "install: %s: %s\n", s, strerror(errno)); ! 251: } ! 252: ! 253: /* ! 254: * bad -- ! 255: * remove created target and die ! 256: */ ! 257: bad(fname) ! 258: char *fname; ! 259: { ! 260: (void)unlink(fname); ! 261: exit(1); ! 262: } ! 263: ! 264: /* ! 265: * usage -- ! 266: * print a usage message and die ! 267: */ ! 268: usage() ! 269: { ! 270: (void)fprintf(stderr, ! 271: "usage: install [-cs] [-g group] [-m mode] [-o owner] file1 file2;\n\tor file1 ... fileN directory\n"); ! 272: exit(1); ! 273: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.