1 /*- 2 * SPDX-License-Identifier: BSD-3-Clause 3 * 4 * Copyright (c) 2007 Kai Wang 5 * Copyright (c) 2007 Tim Kientzle 6 * Copyright (c) 2007 Joseph Koshy 7 * All rights reserved. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 */ 30 31 /*- 32 * Copyright (c) 1990, 1993, 1994 33 * The Regents of the University of California. All rights reserved. 34 * 35 * This code is derived from software contributed to Berkeley by 36 * Hugh Smith at The University of Guelph. 37 * 38 * Redistribution and use in source and binary forms, with or without 39 * modification, are permitted provided that the following conditions 40 * are met: 41 * 1. Redistributions of source code must retain the above copyright 42 * notice, this list of conditions and the following disclaimer. 43 * 2. Redistributions in binary form must reproduce the above copyright 44 * notice, this list of conditions and the following disclaimer in the 45 * documentation and/or other materials provided with the distribution. 46 * 3. Neither the name of the University nor the names of its contributors 47 * may be used to endorse or promote products derived from this software 48 * without specific prior written permission. 49 * 50 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 51 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 52 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 53 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 54 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 55 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 56 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 57 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 58 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 59 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 60 * SUCH DAMAGE. 61 */ 62 63 #include <sys/cdefs.h> 64 __FBSDID("$FreeBSD$"); 65 66 #include <sys/queue.h> 67 #include <sys/types.h> 68 #include <archive.h> 69 #include <err.h> 70 #include <errno.h> 71 #include <getopt.h> 72 #include <libgen.h> 73 #include <stdio.h> 74 #include <stdlib.h> 75 #include <string.h> 76 77 #include "ar.h" 78 79 enum options 80 { 81 OPTION_HELP 82 }; 83 84 static struct option longopts[] = 85 { 86 {"help", no_argument, NULL, OPTION_HELP}, 87 {"version", no_argument, NULL, 'V'}, 88 {NULL, 0, NULL, 0} 89 }; 90 91 static void bsdar_usage(void); 92 static void ranlib_usage(void); 93 static void set_mode(struct bsdar *bsdar, char opt); 94 static void only_mode(struct bsdar *bsdar, const char *opt, 95 const char *valid_modes); 96 static void bsdar_version(void); 97 static void ranlib_version(void); 98 99 int 100 main(int argc, char **argv) 101 { 102 struct bsdar *bsdar, bsdar_storage; 103 char *p; 104 size_t len; 105 int exitcode, i, opt, Dflag, Uflag; 106 107 bsdar = &bsdar_storage; 108 memset(bsdar, 0, sizeof(*bsdar)); 109 exitcode = EXIT_SUCCESS; 110 Dflag = 0; 111 Uflag = 0; 112 113 if ((bsdar->progname = getprogname()) == NULL) 114 bsdar->progname = "ar"; 115 116 /* Act like ranlib if our name ends in "ranlib"; this 117 * accommodates arm-freebsd7.1-ranlib, bsdranlib, etc. */ 118 len = strlen(bsdar->progname); 119 if (len >= strlen("ranlib") && 120 strcmp(bsdar->progname + len - strlen("ranlib"), "ranlib") == 0) { 121 while ((opt = getopt_long(argc, argv, "tDUV", longopts, 122 NULL)) != -1) { 123 switch(opt) { 124 case 't': 125 /* Ignored. */ 126 break; 127 case 'D': 128 Dflag = 1; 129 Uflag = 0; 130 break; 131 case 'U': 132 Uflag = 1; 133 Dflag = 0; 134 break; 135 case 'V': 136 ranlib_version(); 137 break; 138 case OPTION_HELP: 139 ranlib_usage(); 140 default: 141 ranlib_usage(); 142 } 143 } 144 argv += optind; 145 argc -= optind; 146 147 if (*argv == NULL) 148 ranlib_usage(); 149 150 /* Enable determinstic mode unless -U is set. */ 151 if (Uflag == 0) 152 bsdar->options |= AR_D; 153 bsdar->options |= AR_S; 154 while ((bsdar->filename = *argv++) != NULL) 155 if (ar_write_archive(bsdar, 's')) 156 exitcode = EXIT_FAILURE; 157 158 exit(exitcode); 159 } else { 160 if (argc < 2) 161 bsdar_usage(); 162 163 if (*argv[1] != '-') { 164 len = strlen(argv[1]) + 2; 165 if ((p = malloc(len)) == NULL) 166 bsdar_errc(bsdar, errno, "malloc failed"); 167 *p = '-'; 168 (void)strlcpy(p + 1, argv[1], len - 1); 169 argv[1] = p; 170 } 171 } 172 173 while ((opt = getopt_long(argc, argv, "abCcdDfijlMmopqrSsTtUuVvxz", 174 longopts, NULL)) != -1) { 175 switch(opt) { 176 case 'a': 177 bsdar->options |= AR_A; 178 break; 179 case 'b': 180 case 'i': 181 bsdar->options |= AR_B; 182 break; 183 case 'C': 184 bsdar->options |= AR_CC; 185 break; 186 case 'c': 187 bsdar->options |= AR_C; 188 break; 189 case 'd': 190 set_mode(bsdar, opt); 191 break; 192 case 'D': 193 Dflag = 1; 194 Uflag = 0; 195 break; 196 case 'f': 197 bsdar->options |= AR_TR; 198 break; 199 case 'j': 200 /* ignored */ 201 break; 202 case 'l': 203 /* ignored, for GNU ar comptibility */ 204 break; 205 case 'M': 206 set_mode(bsdar, opt); 207 break; 208 case 'm': 209 set_mode(bsdar, opt); 210 break; 211 case 'o': 212 bsdar->options |= AR_O; 213 break; 214 case 'p': 215 set_mode(bsdar, opt); 216 break; 217 case 'q': 218 set_mode(bsdar, opt); 219 break; 220 case 'r': 221 set_mode(bsdar, opt); 222 break; 223 case 'S': 224 bsdar->options |= AR_SS; 225 break; 226 case 's': 227 bsdar->options |= AR_S; 228 break; 229 case 'T': 230 warnx("-T is deprecated"); 231 bsdar->options |= AR_TR; 232 break; 233 case 't': 234 set_mode(bsdar, opt); 235 break; 236 case 'U': 237 Uflag = 1; 238 Dflag = 0; 239 break; 240 case 'u': 241 bsdar->options |= AR_U; 242 break; 243 case 'V': 244 bsdar_version(); 245 break; 246 case 'v': 247 bsdar->options |= AR_V; 248 break; 249 case 'x': 250 set_mode(bsdar, opt); 251 break; 252 case 'z': 253 /* ignored */ 254 break; 255 case OPTION_HELP: 256 bsdar_usage(); 257 default: 258 bsdar_usage(); 259 } 260 } 261 262 argv += optind; 263 argc -= optind; 264 265 if (*argv == NULL && bsdar->mode != 'M') 266 bsdar_usage(); 267 268 if (bsdar->options & AR_A && bsdar->options & AR_B) 269 bsdar_errc(bsdar, 0, 270 "only one of -a and -[bi] options allowed"); 271 272 if (bsdar->options & AR_J && bsdar->options & AR_Z) 273 bsdar_errc(bsdar, 0, "only one of -j and -z options allowed"); 274 275 if (bsdar->options & AR_S && bsdar->options & AR_SS) 276 bsdar_errc(bsdar, 0, "only one of -s and -S options allowed"); 277 278 if (bsdar->options & (AR_A | AR_B)) { 279 if (*argv == NULL) 280 bsdar_errc(bsdar, 0, "no position operand specified"); 281 if ((bsdar->posarg = basename(*argv)) == NULL) 282 bsdar_errc(bsdar, errno, "basename failed"); 283 argc--; 284 argv++; 285 } 286 287 /* Set determinstic mode for -D, and by default without -U. */ 288 if (Dflag || (Uflag == 0 && (bsdar->mode == 'q' || bsdar->mode == 'r' || 289 (bsdar->mode == '\0' && bsdar->options & AR_S)))) 290 bsdar->options |= AR_D; 291 292 if (bsdar->options & AR_A) 293 only_mode(bsdar, "-a", "mqr"); 294 if (bsdar->options & AR_B) 295 only_mode(bsdar, "-b", "mqr"); 296 if (bsdar->options & AR_C) 297 only_mode(bsdar, "-c", "qr"); 298 if (bsdar->options & AR_CC) 299 only_mode(bsdar, "-C", "x"); 300 if (Dflag) 301 only_mode(bsdar, "-D", "qr"); 302 if (Uflag) 303 only_mode(bsdar, "-U", "qr"); 304 if (bsdar->options & AR_O) 305 only_mode(bsdar, "-o", "x"); 306 if (bsdar->options & AR_SS) 307 only_mode(bsdar, "-S", "mqr"); 308 if (bsdar->options & AR_U) 309 only_mode(bsdar, "-u", "qrx"); 310 311 if (bsdar->mode == 'M') { 312 ar_mode_script(bsdar); 313 exit(EXIT_SUCCESS); 314 } 315 316 if ((bsdar->filename = *argv) == NULL) 317 bsdar_usage(); 318 319 bsdar->argc = --argc; 320 bsdar->argv = ++argv; 321 322 if ((!bsdar->mode || strchr("ptx", bsdar->mode)) && 323 bsdar->options & AR_S) { 324 exitcode = ar_write_archive(bsdar, 's'); 325 if (!bsdar->mode) 326 exit(exitcode); 327 } 328 329 switch(bsdar->mode) { 330 case 'd': case 'm': case 'q': case 'r': 331 exitcode = ar_write_archive(bsdar, bsdar->mode); 332 break; 333 case 'p': case 't': case 'x': 334 exitcode = ar_read_archive(bsdar, bsdar->mode); 335 break; 336 default: 337 bsdar_usage(); 338 /* NOTREACHED */ 339 } 340 341 for (i = 0; i < bsdar->argc; i++) { 342 if (bsdar->argv[i] != NULL) { 343 bsdar_warnc(bsdar, 0, "%s: not found in archive", 344 bsdar->argv[i]); 345 exitcode = EXIT_FAILURE; 346 } 347 } 348 349 exit(exitcode); 350 } 351 352 static void 353 set_mode(struct bsdar *bsdar, char opt) 354 { 355 356 if (bsdar->mode != '\0' && bsdar->mode != opt) 357 bsdar_errc(bsdar, 0, "Can't specify both -%c and -%c", opt, 358 bsdar->mode); 359 bsdar->mode = opt; 360 } 361 362 static void 363 only_mode(struct bsdar *bsdar, const char *opt, const char *valid_modes) 364 { 365 366 if (strchr(valid_modes, bsdar->mode) == NULL) 367 bsdar_errc(bsdar, 0, "Option %s is not permitted in mode -%c", 368 opt, bsdar->mode); 369 } 370 371 static void 372 bsdar_usage(void) 373 { 374 375 (void)fprintf(stderr, "usage: ar -d [-Tjsvz] archive file ...\n"); 376 (void)fprintf(stderr, "\tar -m [-Tjsvz] archive file ...\n"); 377 (void)fprintf(stderr, "\tar -m [-Tabijsvz] position archive file ...\n"); 378 (void)fprintf(stderr, "\tar -p [-Tv] archive [file ...]\n"); 379 (void)fprintf(stderr, "\tar -q [-TcDjsUvz] archive file ...\n"); 380 (void)fprintf(stderr, "\tar -r [-TcDjsUuvz] archive file ...\n"); 381 (void)fprintf(stderr, "\tar -r [-TabcDijsUuvz] position archive file ...\n"); 382 (void)fprintf(stderr, "\tar -s [-jz] archive\n"); 383 (void)fprintf(stderr, "\tar -t [-Tv] archive [file ...]\n"); 384 (void)fprintf(stderr, "\tar -x [-CTouv] archive [file ...]\n"); 385 (void)fprintf(stderr, "\tar -V\n"); 386 exit(EXIT_FAILURE); 387 } 388 389 static void 390 ranlib_usage(void) 391 { 392 393 (void)fprintf(stderr, "usage: ranlib [-DtU] archive ...\n"); 394 (void)fprintf(stderr, "\tranlib -V\n"); 395 exit(EXIT_FAILURE); 396 } 397 398 static void 399 bsdar_version(void) 400 { 401 (void)printf("BSD ar %s - %s\n", BSDAR_VERSION, archive_version_string()); 402 exit(EXIT_SUCCESS); 403 } 404 405 static void 406 ranlib_version(void) 407 { 408 (void)printf("ranlib %s - %s\n", BSDAR_VERSION, archive_version_string()); 409 exit(EXIT_SUCCESS); 410 } 411