Merge "Ported "cp" from NetBSD to toolbox." (d2108a57) · Commits · e / os / android_system_core

toolbox/Android.mk

+11 −6

Original line number	Diff line number	Diff line
		@@ -78,10 +78,15 @@ ifneq (,$(filter userdebug eng,$(TARGET_BUILD_VARIANT)))
		TOOLS += r
		endif

		ALL_TOOLS = $(TOOLS)
		ALL_TOOLS += \
		cp

		LOCAL_SRC_FILES := \
		dynarray.c \
		toolbox.c \
		$(patsubst %,%.c,$(TOOLS))
		$(patsubst %,%.c,$(TOOLS)) \
		cp/cp.c cp/utils.c

		LOCAL_SHARED_LIBRARIES := libcutils libc libusbhost

		@@ -104,7 +109,7 @@ include $(BUILD_EXECUTABLE)
		$(LOCAL_PATH)/toolbox.c: $(intermediates)/tools.h

		TOOLS_H := $(intermediates)/tools.h
		$(TOOLS_H): PRIVATE_TOOLS := $(TOOLS)
		$(TOOLS_H): PRIVATE_TOOLS := $(ALL_TOOLS)
		$(TOOLS_H): PRIVATE_CUSTOM_TOOL = echo "/* file generated automatically */" > $@ ; for t in $(PRIVATE_TOOLS) ; do echo "TOOL($$t)" >> $@ ; done
		$(TOOLS_H): $(LOCAL_PATH)/Android.mk
		$(TOOLS_H):
		@@ -112,7 +117,7 @@ $(TOOLS_H):

		# Make #!/system/bin/toolbox launchers for each tool.
		#
		SYMLINKS := $(addprefix $(TARGET_OUT)/bin/,$(TOOLS))
		SYMLINKS := $(addprefix $(TARGET_OUT)/bin/,$(ALL_TOOLS))
		$(SYMLINKS): TOOLBOX_BINARY := $(LOCAL_MODULE)
		$(SYMLINKS): $(LOCAL_INSTALLED_MODULE) $(LOCAL_PATH)/Android.mk
		@echo "Symlink: $@ -> $(TOOLBOX_BINARY)"

toolbox/cp/cp.c

0 → 100644

+552 −0

Original line number	Diff line number	Diff line
		/* $NetBSD: cp.c,v 1.58 2012/01/04 15:58:37 christos Exp $ */

		/*
		* Copyright (c) 1988, 1993, 1994
		* The Regents of the University of California. All rights reserved.
		*
		* This code is derived from software contributed to Berkeley by
		* David Hitz of Auspex Systems Inc.
		*
		* Redistribution and use in source and binary forms, with or without
		* modification, are permitted provided that the following conditions
		* are met:
		* 1. Redistributions of source code must retain the above copyright
		* notice, this list of conditions and the following disclaimer.
		* 2. Redistributions in binary form must reproduce the above copyright
		* notice, this list of conditions and the following disclaimer in the
		* documentation and/or other materials provided with the distribution.
		* 3. Neither the name of the University nor the names of its contributors
		* may be used to endorse or promote products derived from this software
		* without specific prior written permission.
		*
		* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
		* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
		* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
		* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
		* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
		* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
		* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
		* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
		* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
		* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
		* SUCH DAMAGE.
		*/

		#include <sys/cdefs.h>
		#ifndef lint
		__COPYRIGHT(
		"@(#) Copyright (c) 1988, 1993, 1994\
		The Regents of the University of California. All rights reserved.");
		#endif /* not lint */

		#ifndef lint
		#if 0
		static char sccsid[] = "@(#)cp.c 8.5 (Berkeley) 4/29/95";
		#else
		__RCSID("$NetBSD: cp.c,v 1.58 2012/01/04 15:58:37 christos Exp $");
		#endif
		#endif /* not lint */

		/*
		* Cp copies source files to target files.
		*
		* The global PATH_T structure "to" always contains the path to the
		* current target file. Since fts(3) does not change directories,
		* this path can be either absolute or dot-relative.
		*
		* The basic algorithm is to initialize "to" and use fts(3) to traverse
		* the file hierarchy rooted in the argument list. A trivial case is the
		* case of 'cp file1 file2'. The more interesting case is the case of
		* 'cp file1 file2 ... fileN dir' where the hierarchy is traversed and the
		* path (relative to the root of the traversal) is appended to dir (stored
		* in "to") to form the final target path.
		*/

		#include <sys/param.h>
		#include <sys/stat.h>

		#include <assert.h>
		#include <err.h>
		#include <errno.h>
		#include <fts.h>
		#include <locale.h>
		#include <signal.h>
		#include <stdlib.h>
		#include <stdio.h>
		#include <string.h>
		#include <unistd.h>

		#include "extern.h"

		#define STRIP_TRAILING_SLASH(p) { \
		while ((p).p_end > (p).p_path + 1 && (p).p_end[-1] == '/') \
		*--(p).p_end = '\0'; \
		}

		static char empty[] = "";
		PATH_T to = { .p_end = to.p_path, .target_end = empty };

		uid_t myuid;
		int Hflag, Lflag, Rflag, Pflag, fflag, iflag, lflag, pflag, rflag, vflag, Nflag;
		mode_t myumask;
		sig_atomic_t pinfo;

		enum op { FILE_TO_FILE, FILE_TO_DIR, DIR_TO_DNE };

		static int copy(char *[], enum op, int);

		static void
		progress(int sig __unused)
		{

		pinfo++;
		}

		int
		cp_main(int argc, char *argv[])
		{
		struct stat to_stat, tmp_stat;
		enum op type;
		int ch, fts_options, r, have_trailing_slash;
		char target, *src;

		#ifndef ANDROID
		setprogname(argv[0]);
		#endif
		(void)setlocale(LC_ALL, "");

		Hflag = Lflag = Pflag = Rflag = 0;
		while ((ch = getopt(argc, argv, "HLNPRfailprv")) != -1)
		switch (ch) {
		case 'H':
		Hflag = 1;
		Lflag = Pflag = 0;
		break;
		case 'L':
		Lflag = 1;
		Hflag = Pflag = 0;
		break;
		case 'N':
		Nflag = 1;
		break;
		case 'P':
		Pflag = 1;
		Hflag = Lflag = 0;
		break;
		case 'R':
		Rflag = 1;
		break;
		case 'a':
		Pflag = 1;
		pflag = 1;
		Rflag = 1;
		Hflag = Lflag = 0;
		break;
		case 'f':
		fflag = 1;
		iflag = 0;
		break;
		case 'i':
		iflag = isatty(fileno(stdin));
		fflag = 0;
		break;
		case 'l':
		lflag = 1;
		break;
		case 'p':
		pflag = 1;
		break;
		case 'r':
		rflag = 1;
		break;
		case 'v':
		vflag = 1;
		break;
		case '?':
		default:
		cp_usage();
		/* NOTREACHED */
		}
		argc -= optind;
		argv += optind;

		if (argc < 2)
		cp_usage();

		fts_options = FTS_NOCHDIR \| FTS_PHYSICAL;
		if (rflag) {
		if (Rflag) {
		errx(EXIT_FAILURE,
		"the -R and -r options may not be specified together.");
		/* NOTREACHED */
		}
		if (Hflag \|\| Lflag \|\| Pflag) {
		errx(EXIT_FAILURE,
		"the -H, -L, and -P options may not be specified with the -r option.");
		/* NOTREACHED */
		}
		fts_options &= ~FTS_PHYSICAL;
		fts_options \|= FTS_LOGICAL;
		}

		if (Rflag) {
		if (Hflag)
		fts_options \|= FTS_COMFOLLOW;
		if (Lflag) {
		fts_options &= ~FTS_PHYSICAL;
		fts_options \|= FTS_LOGICAL;
		}
		} else if (!Pflag) {
		fts_options &= ~FTS_PHYSICAL;
		fts_options \|= FTS_LOGICAL \| FTS_COMFOLLOW;
		}

		myuid = getuid();

		/* Copy the umask for explicit mode setting. */
		myumask = umask(0);
		(void)umask(myumask);

		/* Save the target base in "to". */
		target = argv[--argc];
		if (strlcpy(to.p_path, target, sizeof(to.p_path)) >= sizeof(to.p_path))
		errx(EXIT_FAILURE, "%s: name too long", target);
		to.p_end = to.p_path + strlen(to.p_path);
		have_trailing_slash = (to.p_end[-1] == '/');
		if (have_trailing_slash)
		STRIP_TRAILING_SLASH(to);
		to.target_end = to.p_end;

		/* Set end of argument list for fts(3). */
		argv[argc] = NULL;

		#ifndef ANDROID
		(void)signal(SIGINFO, progress);
		#endif

		/*
		* Cp has two distinct cases:
		*
		* cp [-R] source target
		* cp [-R] source1 ... sourceN directory
		*
		* In both cases, source can be either a file or a directory.
		*
		* In (1), the target becomes a copy of the source. That is, if the
		* source is a file, the target will be a file, and likewise for
		* directories.
		*
		* In (2), the real target is not directory, but "directory/source".
		*/
		if (Pflag)
		r = lstat(to.p_path, &to_stat);
		else
		r = stat(to.p_path, &to_stat);
		if (r == -1 && errno != ENOENT) {
		err(EXIT_FAILURE, "%s", to.p_path);
		/* NOTREACHED */
		}
		if (r == -1 \|\| !S_ISDIR(to_stat.st_mode)) {
		/*
		* Case (1). Target is not a directory.
		*/
		if (argc > 1)
		cp_usage();
		/*
		* Need to detect the case:
		* cp -R dir foo
		* Where dir is a directory and foo does not exist, where
		* we want pathname concatenations turned on but not for
		* the initial mkdir().
		*/
		if (r == -1) {
		if (rflag \|\| (Rflag && (Lflag \|\| Hflag)))
		r = stat(*argv, &tmp_stat);
		else
		r = lstat(*argv, &tmp_stat);
		if (r == -1) {
		err(EXIT_FAILURE, "%s", *argv);
		/* NOTREACHED */
		}

		if (S_ISDIR(tmp_stat.st_mode) && (Rflag \|\| rflag))
		type = DIR_TO_DNE;
		else
		type = FILE_TO_FILE;
		} else
		type = FILE_TO_FILE;

		if (have_trailing_slash && type == FILE_TO_FILE) {
		if (r == -1)
		errx(1, "directory %s does not exist",
		to.p_path);
		else
		errx(1, "%s is not a directory", to.p_path);
		}
		} else {
		/*
		* Case (2). Target is a directory.
		*/
		type = FILE_TO_DIR;
		}

		/*
		* make "cp -rp src/ dst" behave like "cp -rp src dst" not
		* like "cp -rp src/. dst"
		*/
		for (src = argv; *src; src++) {
		size_t len = strlen(*src);
		while (len-- > 1 && (*src)[len] == '/')
		(*src)[len] = '\0';
		}

		exit(copy(argv, type, fts_options));
		/* NOTREACHED */
		}

		static int dnestack[MAXPATHLEN]; /* unlikely we'll have more nested dirs */
		static ssize_t dnesp;
		static void
		pushdne(int dne)
		{

		dnestack[dnesp++] = dne;
		assert(dnesp < MAXPATHLEN);
		}

		static int
		popdne(void)
		{
		int rv;

		rv = dnestack[--dnesp];
		assert(dnesp >= 0);
		return rv;
		}

		static int
		copy(char *argv[], enum op type, int fts_options)
		{
		struct stat to_stat;
		FTS *ftsp;
		FTSENT *curr;
		int base, dne, sval;
		int this_failed, any_failed;
		size_t nlen;
		char p, target_mid;

		base = 0; /* XXX gcc -Wuninitialized (see comment below) */

		if ((ftsp = fts_open(argv, fts_options, NULL)) == NULL)
		err(EXIT_FAILURE, "%s", argv[0]);
		/* NOTREACHED */
		for (any_failed = 0; (curr = fts_read(ftsp)) != NULL;) {
		this_failed = 0;
		switch (curr->fts_info) {
		case FTS_NS:
		case FTS_DNR:
		case FTS_ERR:
		warnx("%s: %s", curr->fts_path,
		strerror(curr->fts_errno));
		this_failed = any_failed = 1;
		continue;
		case FTS_DC: /* Warn, continue. */
		warnx("%s: directory causes a cycle", curr->fts_path);
		this_failed = any_failed = 1;
		continue;
		}

		/*
		* If we are in case (2) or (3) above, we need to append the
		* source name to the target name.
		*/
		if (type != FILE_TO_FILE) {
		if ((curr->fts_namelen +
		to.target_end - to.p_path + 1) > MAXPATHLEN) {
		warnx("%s/%s: name too long (not copied)",
		to.p_path, curr->fts_name);
		this_failed = any_failed = 1;
		continue;
		}

		/*
		* Need to remember the roots of traversals to create
		* correct pathnames. If there's a directory being
		* copied to a non-existent directory, e.g.
		* cp -R a/dir noexist
		* the resulting path name should be noexist/foo, not
		* noexist/dir/foo (where foo is a file in dir), which
		* is the case where the target exists.
		*
		* Also, check for "..". This is for correct path
		* concatentation for paths ending in "..", e.g.
		* cp -R .. /tmp
		* Paths ending in ".." are changed to ".". This is
		* tricky, but seems the easiest way to fix the problem.
		*
		* XXX
		* Since the first level MUST be FTS_ROOTLEVEL, base
		* is always initialized.
		*/
		if (curr->fts_level == FTS_ROOTLEVEL) {
		if (type != DIR_TO_DNE) {
		p = strrchr(curr->fts_path, '/');
		base = (p == NULL) ? 0 :
		(int)(p - curr->fts_path + 1);

		if (!strcmp(&curr->fts_path[base],
		".."))
		base += 1;
		} else
		base = curr->fts_pathlen;
		}

		p = &curr->fts_path[base];
		nlen = curr->fts_pathlen - base;
		target_mid = to.target_end;
		if (*p != '/' && target_mid[-1] != '/')
		*target_mid++ = '/';
		*target_mid = 0;

		if (target_mid - to.p_path + nlen >= PATH_MAX) {
		warnx("%s%s: name too long (not copied)",
		to.p_path, p);
		this_failed = any_failed = 1;
		continue;
		}
		(void)strncat(target_mid, p, nlen);
		to.p_end = target_mid + nlen;
		*to.p_end = 0;
		STRIP_TRAILING_SLASH(to);
		}

		sval = Pflag ? lstat(to.p_path, &to_stat) : stat(to.p_path, &to_stat);
		/* Not an error but need to remember it happened */
		if (sval == -1)
		dne = 1;
		else {
		if (to_stat.st_dev == curr->fts_statp->st_dev &&
		to_stat.st_ino == curr->fts_statp->st_ino) {
		warnx("%s and %s are identical (not copied).",
		to.p_path, curr->fts_path);
		this_failed = any_failed = 1;
		if (S_ISDIR(curr->fts_statp->st_mode))
		(void)fts_set(ftsp, curr, FTS_SKIP);
		continue;
		}
		if (!S_ISDIR(curr->fts_statp->st_mode) &&
		S_ISDIR(to_stat.st_mode)) {
		warnx("cannot overwrite directory %s with non-directory %s",
		to.p_path, curr->fts_path);
		this_failed = any_failed = 1;
		continue;
		}
		dne = 0;
		}

		switch (curr->fts_statp->st_mode & S_IFMT) {
		case S_IFLNK:
		/* Catch special case of a non dangling symlink */
		if((fts_options & FTS_LOGICAL) \|\|
		((fts_options & FTS_COMFOLLOW) && curr->fts_level == 0)) {
		if (copy_file(curr, dne))
		this_failed = any_failed = 1;
		} else {
		if (copy_link(curr, !dne))
		this_failed = any_failed = 1;
		}
		break;
		case S_IFDIR:
		if (!Rflag && !rflag) {
		if (curr->fts_info == FTS_D)
		warnx("%s is a directory (not copied).",
		curr->fts_path);
		(void)fts_set(ftsp, curr, FTS_SKIP);
		this_failed = any_failed = 1;
		break;
		}

		/*
		* Directories get noticed twice:
		* In the first pass, create it if needed.
		* In the second pass, after the children have been copied, set the permissions.
		*/
		if (curr->fts_info == FTS_D) /* First pass */
		{
		/*
		* If the directory doesn't exist, create the new
		* one with the from file mode plus owner RWX bits,
		* modified by the umask. Trade-off between being
		* able to write the directory (if from directory is
		* 555) and not causing a permissions race. If the
		* umask blocks owner writes, we fail..
		*/
		pushdne(dne);
		if (dne) {
		if (mkdir(to.p_path,
		curr->fts_statp->st_mode \| S_IRWXU) < 0)
		err(EXIT_FAILURE, "%s",
		to.p_path);
		/* NOTREACHED */
		} else if (!S_ISDIR(to_stat.st_mode)) {
		errno = ENOTDIR;
		err(EXIT_FAILURE, "%s",
		to.p_path);
		/* NOTREACHED */
		}
		}
		else if (curr->fts_info == FTS_DP) /* Second pass */
		{
		/*
		* If not -p and directory didn't exist, set it to be
		* the same as the from directory, umodified by the
		* umask; arguably wrong, but it's been that way
		* forever.
		*/
		if (pflag && setfile(curr->fts_statp, 0))
		this_failed = any_failed = 1;
		else if ((dne = popdne()))
		(void)chmod(to.p_path,
		curr->fts_statp->st_mode);
		}
		else
		{
		warnx("directory %s encountered when not expected.",
		curr->fts_path);
		this_failed = any_failed = 1;
		break;
		}

		break;
		case S_IFBLK:
		case S_IFCHR:
		if (Rflag) {
		if (copy_special(curr->fts_statp, !dne))
		this_failed = any_failed = 1;
		} else
		if (copy_file(curr, dne))
		this_failed = any_failed = 1;
		break;
		case S_IFIFO:
		if (Rflag) {
		if (copy_fifo(curr->fts_statp, !dne))
		this_failed = any_failed = 1;
		} else
		if (copy_file(curr, dne))
		this_failed = any_failed = 1;
		break;
		default:
		if (copy_file(curr, dne))
		this_failed = any_failed = 1;
		break;
		}
		if (vflag && !this_failed)
		(void)printf("%s -> %s\n", curr->fts_path, to.p_path);
		}
		if (errno) {
		err(EXIT_FAILURE, "fts_read");
		/* NOTREACHED */
		}
		(void)fts_close(ftsp);
		return (any_failed);
		}

toolbox/cp/extern.h

0 → 100644

+61 −0

Original line number	Diff line number	Diff line
		/* $NetBSD: extern.h,v 1.17 2012/01/04 15:58:37 christos Exp $ */

		/*-
		* Copyright (c) 1991, 1993, 1994
		* The Regents of the University of California. All rights reserved.
		*
		* Redistribution and use in source and binary forms, with or without
		* modification, are permitted provided that the following conditions
		* are met:
		* 1. Redistributions of source code must retain the above copyright
		* notice, this list of conditions and the following disclaimer.
		* 2. Redistributions in binary form must reproduce the above copyright
		* notice, this list of conditions and the following disclaimer in the
		* documentation and/or other materials provided with the distribution.
		* 3. Neither the name of the University nor the names of its contributors
		* may be used to endorse or promote products derived from this software
		* without specific prior written permission.
		*
		* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
		* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
		* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
		* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
		* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
		* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
		* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
		* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
		* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
		* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
		* SUCH DAMAGE.
		*
		* @(#)extern.h 8.2 (Berkeley) 4/1/94
		*/

		#ifndef _EXTERN_H_
		#define _EXTERN_H_

		typedef struct {
		char p_end; / pointer to NULL at end of path */
		char target_end; / pointer to end of target base */
		char p_path[MAXPATHLEN + 1]; /* pointer to the start of a path */
		} PATH_T;

		extern PATH_T to;
		extern uid_t myuid;
		extern int Rflag, rflag, Hflag, Lflag, Pflag, fflag, iflag, lflag, pflag, Nflag;
		extern mode_t myumask;
		extern sig_atomic_t pinfo;

		#include <sys/cdefs.h>

		__BEGIN_DECLS
		int copy_fifo(struct stat *, int);
		int copy_file(FTSENT *, int);
		int copy_link(FTSENT *, int);
		int copy_special(struct stat *, int);
		int set_utimes(const char , struct stat );
		int setfile(struct stat *, int);
		void cp_usage(void) __attribute__((__noreturn__));
		__END_DECLS

		#endif /* !_EXTERN_H_ */

toolbox/cp/utils.c

0 → 100644

+446 −0

File added.

Preview size limit exceeded, changes collapsed.