Changeset 368 for trunk/src/gmake/kmkbuiltin/install.c

Timestamp:

Dec 17, 2005, 6:31:29 AM (20 years ago)

Author:

bird

Message:

ln and install builtins (from BSD as usual).

File:

• trunk/src/gmake/kmkbuiltin/install.c (modified) (19 diffs)

trunk/src/gmake/kmkbuiltin/install.c

@@ -79 +79 @@
 #define BACKUP_SUFFIX   ".old"
 
-struct passwd *pp;
-struct group *gp;
-gid_t gid;
-uid_t uid;
-int dobackup, docompare, dodir, dopreserve, dostrip, nommap, safecopy, verbose;
-mode_t mode = S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH;
-const char *suffix = BACKUP_SUFFIX;
-
-void    copy(int, const char *, int, const char *, off_t);
-int     compare(int, const char *, size_t, int, const char *, size_t);
-int     create_newfile(const char *, int, struct stat *);
-int     create_tempfile(const char *, char *, size_t);
-void    install(const char *, const char *, u_long, u_int);
-void    install_dir(char *);
-u_long  numeric_id(const char *, const char *);
-void    strip(const char *);
-int     trymmap(int);
-void    usage(void);
+#ifndef O_BINARY
+# define O_BINARY 0
+#endif
+
+static struct passwd *pp;
+static struct group *gp;
+static gid_t gid;
+static uid_t uid;
+static int dobackup, docompare, dodir, dopreserve, dostrip, nommap, safecopy, verbose;
+static mode_t mode = S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH;
+static const char *suffix = BACKUP_SUFFIX;
+
+static void     copy(int, const char *, int, const char *, off_t);
+static int      compare(int, const char *, size_t, int, const char *, size_t);
+static int      create_newfile(const char *, int, struct stat *);
+static int      create_tempfile(const char *, char *, size_t);
+static void     install(const char *, const char *, u_long, u_int);
+static void     install_dir(char *);
+static u_long   numeric_id(const char *, const char *);
+static void     strip(const char *);
+static int      trymmap(int);
+static void     usage(void);
 
 int
-main(int argc, char *argv[])
+kmk_builtin_install(int argc, char *argv[])
 {
         struct stat from_sb, to_sb;
@@ -128 +132 @@
                         dodir = 1;
                         break;
-                case 'f':
+                    case 'f':
+#ifdef UF_IMMUTABLE
                         flags = optarg;
                         if (strtofflags(&flags, &fset, NULL))
                                 errx(EX_USAGE, "%s: invalid flag", flags);
                         iflags |= SETFLAGS;
+#endif
                         break;
                 case 'g':
@@ -140 +146 @@
                         nommap = 1;
                         break;
-                case 'm':
+                case 'm':
+#ifdef __EMX__
+                        if (!(set = bsd_setmode(optarg)))
+#else
                         if (!(set = setmode(optarg)))
+#endif
                                 errx(EX_USAGE, "invalid file mode: %s",
                                      optarg);
@@ -230 +240 @@
                 if (to_sb.st_dev == from_sb.st_dev &&
                     to_sb.st_ino == from_sb.st_ino)
-                        errx(EX_USAGE, 
+                        errx(EX_USAGE,
                             "%s and %s are the same file", *argv, to_name);
         }
@@ -306 +316 @@
         tempcopy = safecopy && target;
 
-        if (!devnull && (from_fd = open(from_name, O_RDONLY, 0)) < 0)
+        if (!devnull && (from_fd = open(from_name, O_RDONLY | O_BINARY, 0)) < 0)
                 err(EX_OSERR, "%s", from_name);
 
         /* If we don't strip, we can compare first. */
         if (docompare && !dostrip && target) {
-                if ((to_fd = open(to_name, O_RDONLY, 0)) < 0)
+                if ((to_fd = open(to_name, O_RDONLY | O_BINARY, 0)) < 0)
                         err(EX_OSERR, "%s", to_name);
                 if (devnull)
@@ -352 +362 @@
                  */
                 close(to_fd);
-                to_fd = open(tempcopy ? tempfile : to_name, O_RDONLY, 0);
+                to_fd = open(tempcopy ? tempfile : to_name, O_RDONLY | O_BINARY, 0);
                 if (to_fd < 0)
                         err(EX_OSERR, "stripping %s", to_name);
@@ -364 +374 @@
 
                 /* Re-open to_fd using the real target name. */
-                if ((to_fd = open(to_name, O_RDONLY, 0)) < 0)
+                if ((to_fd = open(to_name, O_RDONLY | O_BINARY, 0)) < 0)
                         err(EX_OSERR, "%s", to_name);
 
@@ -400 +410 @@
          */
         if (tempcopy && !files_match) {
+#ifdef UF_IMMUTABLE
                 /* Try to turn off the immutable bits. */
                 if (to_sb.st_flags & NOCHANGEBITS)
                         (void)chflags(to_name, to_sb.st_flags & ~NOCHANGEBITS);
+#endif
                 if (dobackup) {
                         if ((size_t)snprintf(backup, MAXPATHLEN, "%s%s", to_name,
@@ -432 +444 @@
                 /* Re-open to_fd so we aren't hosed by the rename(2). */
                 (void) close(to_fd);
-                if ((to_fd = open(to_name, O_RDONLY, 0)) < 0)
+                if ((to_fd = open(to_name, O_RDONLY | O_BINARY, 0)) < 0)
                         err(EX_OSERR, "%s", to_name);
         }
@@ -458 +470 @@
          * chown may lose the setuid bits.
          */
+#ifdef UF_IMMUTABLE
         if ((gid != (gid_t)-1 && gid != to_sb.st_gid) ||
             (uid != (uid_t)-1 && uid != to_sb.st_uid) ||
@@ -465 +478 @@
                         (void)fchflags(to_fd, to_sb.st_flags & ~NOCHANGEBITS);
         }
+#endif
 
         if ((gid != (gid_t)-1 && gid != to_sb.st_gid) ||
@@ -490 +504 @@
          * then warn if the the fs doesn't support it, otherwise fail.
          */
+#ifdef UF_IMMUTABLE
         if (!devnull && (flags & SETFLAGS ||
             (from_sb.st_flags & ~UF_NODUMP) != to_sb.st_flags) &&
@@ -505 +520 @@
                 }
         }
+#endif
 
         (void)close(to_fd);
@@ -528 +544 @@
 
         if (from_len <= MAX_CMP_SIZE) {
+#if !defined(__EMX__) && !defined(_MSC_VER)
                 done_compare = 0;
                 if (trymmap(from_fd) && trymmap(to_fd)) {
@@ -544 +561 @@
                         done_compare = 1;
                 }
+#endif
         out:
                 if (!done_compare) {
@@ -612 +630 @@
                  * it might work.
                  */
+#ifdef UF_IMMUTABLE
                 if (sbp->st_flags & NOCHANGEBITS)
                         (void)chflags(path, sbp->st_flags & ~NOCHANGEBITS);
+#endif
 
                 if (dobackup) {
@@ -632 +652 @@
         }
 
-        newfd = open(path, O_CREAT | O_RDWR | O_TRUNC, S_IRUSR | S_IWUSR);
+        newfd = open(path, O_CREAT | O_RDWR | O_TRUNC | O_BINARY, S_IRUSR | S_IWUSR);
         if (newfd < 0 && saved_errno != 0)
                 errno = saved_errno;
@@ -663 +683 @@
          */
         done_copy = 0;
+#if !defined(__EMX__) && !defined(_MSC_VER)
         if (size <= 8 * 1048576 && trymmap(from_fd) &&
             (p = mmap(NULL, (size_t)size, PROT_READ, MAP_SHARED,
@@ -674 +695 @@
                 done_copy = 1;
         }
+#endif
         if (!done_copy) {
                 while ((nr = read(from_fd, buf, sizeof(buf))) > 0)