2 * Copyright (c) 2007 Kai Wang
3 * Copyright (c) 2007 Tim Kientzle
4 * Copyright (c) 2007 Joseph Koshy
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer
12 * in this position and unchanged.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 * Copyright (c) 1990, 1993, 1994
31 * The Regents of the University of California. All rights reserved.
33 * This code is derived from software contributed to Berkeley by
34 * Hugh Smith at The University of Guelph.
36 * Redistribution and use in source and binary forms, with or without
37 * modification, are permitted provided that the following conditions
39 * 1. Redistributions of source code must retain the above copyright
40 * notice, this list of conditions and the following disclaimer.
41 * 2. Redistributions in binary form must reproduce the above copyright
42 * notice, this list of conditions and the following disclaimer in the
43 * documentation and/or other materials provided with the distribution.
44 * 3. Neither the name of the University nor the names of its contributors
45 * may be used to endorse or promote products derived from this software
46 * without specific prior written permission.
48 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
49 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
50 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
51 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
52 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
53 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
54 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
55 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
56 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
57 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
61 #include <sys/queue.h>
62 #include <sys/types.h>
75 ELFTC_VCSID("$Id: ar.c 3319 2016-01-13 21:37:53Z jkoshy $");
82 static struct option longopts[] =
84 {"flavor", required_argument, NULL, 'F'},
85 {"help", no_argument, NULL, OPTION_HELP},
86 {"version", no_argument, NULL, 'V'},
90 static void bsdar_usage(void);
91 static void ranlib_usage(void);
92 static void set_mode(struct bsdar *bsdar, char opt);
93 static void only_mode(struct bsdar *bsdar, const char *opt,
94 const char *valid_modes);
95 static void bsdar_version(void);
98 main(int argc, char **argv)
100 struct bsdar *bsdar, bsdar_storage;
101 char *arcmd, *argv1_saved;
105 bsdar = &bsdar_storage;
106 memset(bsdar, 0, sizeof(*bsdar));
108 arcmd = argv1_saved = NULL;
109 bsdar->output = stdout;
111 if ((bsdar->progname = ELFTC_GETPROGNAME()) == NULL)
112 bsdar->progname = "ar";
114 if (elf_version(EV_CURRENT) == EV_NONE)
115 bsdar_errc(bsdar, 0, "ELF library initialization failed: %s",
119 * Act like ranlib if our name ends in "ranlib"; this
120 * accommodates names like "arm-freebsd7.1-ranlib",
123 len = strlen(bsdar->progname);
124 if (len >= strlen("ranlib") &&
125 strcmp(bsdar->progname + len - strlen("ranlib"), "ranlib") == 0) {
126 while ((opt = getopt_long(argc, argv, "tDUV", longopts,
133 bsdar->options |= AR_D;
136 bsdar->options &= ~AR_D;
153 bsdar->options |= AR_S;
154 while ((bsdar->filename = *argv++) != NULL)
155 ar_write_archive(bsdar, 's');
163 * Tack on a leading '-', for old-style usage.
165 if (*argv[1] != '-') {
166 argv1_saved = argv[1];
167 len = strlen(argv[1]) + 2;
168 if ((arcmd = malloc(len)) == NULL)
169 bsdar_errc(bsdar, errno, "malloc failed");
170 (void) snprintf(arcmd, len, "-%s", argv[1]);
175 while ((opt = getopt_long(argc, argv, "abCcdDfF:ijlMmopqrSsTtUuVvxz",
176 longopts, NULL)) != -1) {
179 bsdar->options |= AR_A;
183 bsdar->options |= AR_B;
186 bsdar->options |= AR_CC;
189 bsdar->options |= AR_C;
192 set_mode(bsdar, opt);
195 bsdar->options |= AR_D;
198 if (!strcasecmp(optarg, "svr4") ||
199 !strcasecmp(optarg, "gnu"))
200 bsdar->options &= ~AR_BSD;
201 else if (!strcasecmp(optarg, "bsd"))
202 bsdar->options |= AR_BSD;
208 bsdar->options |= AR_TR;
214 /* ignored, for GNU ar comptibility */
217 set_mode(bsdar, opt);
220 set_mode(bsdar, opt);
223 bsdar->options |= AR_O;
226 set_mode(bsdar, opt);
229 set_mode(bsdar, opt);
232 set_mode(bsdar, opt);
235 bsdar->options |= AR_SS;
238 bsdar->options |= AR_S;
241 set_mode(bsdar, opt);
244 bsdar->options &= ~AR_D;
247 bsdar->options |= AR_U;
253 bsdar->options |= AR_V;
256 set_mode(bsdar, opt);
268 /* Restore argv[1] if we had modified it. */
270 argv[1] = argv1_saved;
272 arcmd = argv1_saved = NULL;
278 if (*argv == NULL && bsdar->mode != 'M')
281 if (bsdar->options & AR_A && bsdar->options & AR_B)
283 "only one of -a and -[bi] options allowed");
285 if (bsdar->options & AR_J && bsdar->options & AR_Z)
287 "only one of -j and -z options allowed");
289 if (bsdar->options & AR_S && bsdar->options & AR_SS)
291 "only one of -s and -S options allowed");
293 if (bsdar->options & (AR_A | AR_B)) {
296 "no position operand specified");
297 if ((bsdar->posarg = basename(*argv)) == NULL)
298 bsdar_errc(bsdar, errno,
304 if (bsdar->options & AR_A)
305 only_mode(bsdar, "-a", "mqr");
306 if (bsdar->options & AR_B)
307 only_mode(bsdar, "-b", "mqr");
308 if (bsdar->options & AR_C)
309 only_mode(bsdar, "-c", "qr");
310 if (bsdar->options & AR_CC)
311 only_mode(bsdar, "-C", "x");
312 if (bsdar->options & AR_D)
313 only_mode(bsdar, "-D", "qr");
314 if (bsdar->options & AR_O)
315 only_mode(bsdar, "-o", "x");
316 if (bsdar->options & AR_SS)
317 only_mode(bsdar, "-S", "mqr");
318 if (bsdar->options & AR_U)
319 only_mode(bsdar, "-u", "qrx");
321 if (bsdar->mode == 'M') {
322 ar_mode_script(bsdar);
326 if ((bsdar->filename = *argv) == NULL)
329 bsdar->argc = --argc;
330 bsdar->argv = ++argv;
332 if ((!bsdar->mode || strchr("ptx", bsdar->mode)) &&
333 bsdar->options & AR_S) {
334 ar_write_archive(bsdar, 's');
339 switch(bsdar->mode) {
340 case 'd': case 'm': case 'q': case 'r':
341 ar_write_archive(bsdar, bsdar->mode);
344 case 'p': case 't': case 'x':
345 ar_read_archive(bsdar, bsdar->mode);
352 for (i = 0; i < bsdar->argc; i++)
353 if (bsdar->argv[i] != NULL)
354 bsdar_warnc(bsdar, 0, "%s: not found in archive",
361 set_mode(struct bsdar *bsdar, char opt)
364 if (bsdar->mode != '\0' && bsdar->mode != opt)
365 bsdar_errc(bsdar, 0, "Can't specify both -%c and -%c",
371 only_mode(struct bsdar *bsdar, const char *opt, const char *valid_modes)
374 if (strchr(valid_modes, bsdar->mode) == NULL)
375 bsdar_errc(bsdar, 0, "Option %s is not permitted in mode -%c",
379 #define AR_USAGE_MESSAGE "\
380 Usage: %s <command> [options] archive file...\n\
381 Manage archives.\n\n\
382 Where <command> is one of:\n\
383 -d Delete members from the archive.\n\
384 -m Move archive members within the archive.\n\
385 -p Write the contents of members to standard output.\n\
386 -q Append files to an archive.\n\
387 -r Replace (add) files to an archive.\n\
388 -s Add an archive symbol to an archive.\n\
389 -t List files in an archive.\n\
390 -x Extract members from an archive.\n\
391 -M Execute MRI librarian commands.\n\
392 -V Print a version identifier and exit.\n\n\
394 -a MEMBER Add members after the specified member.\n\
395 -b MEMBER | -i MEMBER\n\
396 Add members before the specified member.\n\
397 -c Do not print a message when creating a new archive.\n\
398 -f | -T Only use the first fifteen characters of the member name.\n\
399 -j (This option is accepted, but is ignored).\n\
400 -l (This option is accepted, but is ignored).\n\
401 -o Preserve modification times when extracting members.\n\
402 -u Conditionally update or extract members.\n\
404 -z (This option is accepted, but is ignored).\n\
405 -C Do not overwrite existing files in the file system.\n\
406 -D Use fixed metadata, for consistent archive checksums.\n\
407 -F FORMAT | --flavor=FORMAT\n\
408 Create archives with the specified format.\n\
409 -S Do not generate an archive symbol table.\n\
410 -U Use original metadata for archive members.\n"
415 (void) fprintf(stderr, AR_USAGE_MESSAGE, ELFTC_GETPROGNAME());
419 #define RANLIB_USAGE_MESSAGE "\
420 Usage: %s [options] archive...\n\
421 Update or create archive symbol tables.\n\n\
423 -t (This option is accepted, but ignored).\n\
424 -D Use fixed metadata, for consistent archive checksums.\n\
425 -U Use original metadata, for unique archive checksums.\n\
426 -V Print a version identifier and exit.\n"
431 (void)fprintf(stderr, RANLIB_USAGE_MESSAGE, ELFTC_GETPROGNAME());
438 (void)printf("%s (%s, %s)\n", ELFTC_GETPROGNAME(), archive_version_string(),