summaryrefslogtreecommitdiffstats
path: root/usr.bin/ar/ar.c
diff options
context:
space:
mode:
Diffstat (limited to 'usr.bin/ar/ar.c')
-rw-r--r--usr.bin/ar/ar.c237
1 files changed, 237 insertions, 0 deletions
diff --git a/usr.bin/ar/ar.c b/usr.bin/ar/ar.c
new file mode 100644
index 0000000..38089e8
--- /dev/null
+++ b/usr.bin/ar/ar.c
@@ -0,0 +1,237 @@
+/*-
+ * Copyright (c) 1990, 1993, 1994
+ * The Regents of the University of California. All rights reserved.
+ *
+ * This code is derived from software contributed to Berkeley by
+ * Hugh Smith at The University of Guelph.
+ *
+ * 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. All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by the University of
+ * California, Berkeley and its contributors.
+ * 4. 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.
+ */
+
+#ifndef lint
+static char copyright[] =
+"@(#) Copyright (c) 1990, 1993, 1994\n\
+ The Regents of the University of California. All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)ar.c 8.3 (Berkeley) 4/2/94";
+#endif /* not lint */
+
+#include <sys/param.h>
+
+#include <ar.h>
+#include <dirent.h>
+#include <err.h>
+#include <paths.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "archive.h"
+#include "extern.h"
+
+CHDR chdr;
+u_int options;
+char *archive, *envtmp, *posarg, *posname;
+static void badoptions __P((char *));
+static void usage __P((void));
+
+/*
+ * main --
+ * main basically uses getopt to parse options and calls the appropriate
+ * functions. Some hacks that let us be backward compatible with 4.3 ar
+ * option parsing and sanity checking.
+ */
+int
+main(argc, argv)
+ int argc;
+ char **argv;
+{
+ int c;
+ char *p;
+ int (*fcall) __P((char **));
+
+ if (argc < 3)
+ usage();
+
+ /*
+ * Historic versions didn't require a '-' in front of the options.
+ * Fix it, if necessary.
+ */
+ if (*argv[1] != '-') {
+ if (!(p = malloc((u_int)(strlen(argv[1]) + 2))))
+ err(1, NULL);
+ *p = '-';
+ (void)strcpy(p + 1, argv[1]);
+ argv[1] = p;
+ }
+
+ while ((c = getopt(argc, argv, "abcdilmopqrTtuvx")) != EOF) {
+ switch(c) {
+ case 'a':
+ options |= AR_A;
+ break;
+ case 'b':
+ case 'i':
+ options |= AR_B;
+ break;
+ case 'c':
+ options |= AR_C;
+ break;
+ case 'd':
+ options |= AR_D;
+ fcall = delete;
+ break;
+ case 'l': /* not documented, compatibility only */
+ envtmp = ".";
+ break;
+ case 'm':
+ options |= AR_M;
+ fcall = move;
+ break;
+ case 'o':
+ options |= AR_O;
+ break;
+ case 'p':
+ options |= AR_P;
+ fcall = print;
+ break;
+ case 'q':
+ options |= AR_Q;
+ fcall = append;
+ break;
+ case 'r':
+ options |= AR_R;
+ fcall = replace;
+ break;
+ case 'T':
+ options |= AR_TR;
+ break;
+ case 't':
+ options |= AR_T;
+ fcall = contents;
+ break;
+ case 'u':
+ options |= AR_U;
+ break;
+ case 'v':
+ options |= AR_V;
+ break;
+ case 'x':
+ options |= AR_X;
+ fcall = extract;
+ break;
+ default:
+ usage();
+ }
+ }
+
+ argv += optind;
+ argc -= optind;
+
+ /* One of -dmpqrtx required. */
+ if (!(options & (AR_D|AR_M|AR_P|AR_Q|AR_R|AR_T|AR_X))) {
+ warnx("one of options -dmpqrtx is required");
+ usage();
+ }
+ /* Only one of -a and -bi allowed. */
+ if (options & AR_A && options & AR_B) {
+ warnx("only one of -a and -[bi] options allowed");
+ usage();
+ }
+ /* -ab require a position argument. */
+ if (options & (AR_A|AR_B)) {
+ if (!(posarg = *argv++)) {
+ warnx("no position operand specified");
+ usage();
+ }
+ posname = rname(posarg);
+ }
+ /* -d only valid with -Tv. */
+ if (options & AR_D && options & ~(AR_D|AR_TR|AR_V))
+ badoptions("-d");
+ /* -m only valid with -abiTv. */
+ if (options & AR_M && options & ~(AR_A|AR_B|AR_M|AR_TR|AR_V))
+ badoptions("-m");
+ /* -p only valid with -Tv. */
+ if (options & AR_P && options & ~(AR_P|AR_TR|AR_V))
+ badoptions("-p");
+ /* -q only valid with -cTv. */
+ if (options & AR_Q && options & ~(AR_C|AR_Q|AR_TR|AR_V))
+ badoptions("-q");
+ /* -r only valid with -abcuTv. */
+ if (options & AR_R && options & ~(AR_A|AR_B|AR_C|AR_R|AR_U|AR_TR|AR_V))
+ badoptions("-r");
+ /* -t only valid with -Tv. */
+ if (options & AR_T && options & ~(AR_T|AR_TR|AR_V))
+ badoptions("-t");
+ /* -x only valid with -ouTv. */
+ if (options & AR_X && options & ~(AR_O|AR_U|AR_TR|AR_V|AR_X))
+ badoptions("-x");
+
+ if (!(archive = *argv++)) {
+ warnx("no archive specified");
+ usage();
+ }
+
+ /* -dmqr require a list of archive elements. */
+ if (options & (AR_D|AR_M|AR_Q|AR_R) && !*argv) {
+ warnx("no archive members specified");
+ usage();
+ }
+
+ exit((*fcall)(argv));
+}
+
+static void
+badoptions(arg)
+ char *arg;
+{
+
+ warnx("illegal option combination for %s", arg);
+ usage();
+}
+
+static void
+usage()
+{
+
+ (void)fprintf(stderr, "usage: ar -d [-Tv] archive file ...\n");
+ (void)fprintf(stderr, "\tar -m [-Tv] archive file ...\n");
+ (void)fprintf(stderr, "\tar -m [-abiTv] position archive file ...\n");
+ (void)fprintf(stderr, "\tar -p [-Tv] archive [file ...]\n");
+ (void)fprintf(stderr, "\tar -q [-cTv] archive file ...\n");
+ (void)fprintf(stderr, "\tar -r [-cuTv] archive file ...\n");
+ (void)fprintf(stderr, "\tar -r [-abciuTv] position archive file ...\n");
+ (void)fprintf(stderr, "\tar -t [-Tv] archive [file ...]\n");
+ (void)fprintf(stderr, "\tar -x [-ouTv] archive [file ...]\n");
+ exit(1);
+}
OpenPOWER on IntegriCloud