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 <errno.h> 70 #include <getopt.h> 71 #include <libgen.h> 72 #include <stdio.h> 73 #include <stdlib.h> 74 #include <string.h> 75 76 #include "ar.h" 77 78 enum options 79 { 80 OPTION_HELP 81 }; 82 83 static struct option longopts[] = 84 { 85 {"help", no_argument, NULL, OPTION_HELP}, 86 {"version", no_argument, NULL, 'V'}, 87 {NULL, 0, NULL, 0} 88 }; 89 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); 96 static void ranlib_version(void); 97 98 int 99 main(int argc, char **argv) 100 { 101 struct bsdar *bsdar, bsdar_storage; 102 char *p; 103 size_t len; 104 int exitcode, i, opt, Dflag, Uflag; 105 106 bsdar = &bsdar_storage; 107 memset(bsdar, 0, sizeof(*bsdar)); 108 exitcode = EXIT_SUCCESS; 109 Dflag = 0; 110 Uflag = 0; 111 112 if ((bsdar->progname = getprogname()) == NULL) 113 bsdar->progname = "ar"; 114 115 /* Act like ranlib if our name ends in "ranlib"; this 116 * accommodates arm-freebsd7.1-ranlib, bsdranlib, etc. */ 117 len = strlen(bsdar->progname); 118 if (len >= strlen("ranlib") && 119 strcmp(bsdar->progname + len - strlen("ranlib"), "ranlib") == 0) { 120 while ((opt = getopt_long(argc, argv, "tDUV", longopts, 121 NULL)) != -1) { 122 switch(opt) { 123 case 't': 124 /* Ignored. */ 125 break; 126 case 'D': 127 Dflag = 1; 128 Uflag = 0; 129 break; 130 case 'U': 131 Uflag = 1; 132 Dflag = 0; 133 break; 134 case 'V': 135 ranlib_version(); 136 break; 137 case OPTION_HELP: 138 ranlib_usage(); 139 default: 140 ranlib_usage(); 141 } 142 } 143 argv += optind; 144 argc -= optind; 145 146 if (*argv == NULL) 147 ranlib_usage(); 148 149 /* Enable determinstic mode unless -U is set. */ 150 if (Uflag == 0) 151 bsdar->options |= AR_D; 152 bsdar->options |= AR_S; 153 while ((bsdar->filename = *argv++) != NULL) 154 if (ar_write_archive(bsdar, 's')) 155 exitcode = EXIT_FAILURE; 156 157 exit(exitcode); 158 } else { 159 if (argc < 2) 160 bsdar_usage(); 161 162 if (*argv[1] != '-') { 163 len = strlen(argv[1]) + 2; 164 if ((p = malloc(len)) == NULL) 165 bsdar_errc(bsdar, errno, "malloc failed"); 166 *p = '-'; 167 (void)strlcpy(p + 1, argv[1], len - 1); 168 argv[1] = p; 169 } 170 } 171 172 while ((opt = getopt_long(argc, argv, "abCcdDfijlMmopqrSsTtUuVvxz", 173 longopts, NULL)) != -1) { 174 switch(opt) { 175 case 'a': 176 bsdar->options |= AR_A; 177 break; 178 case 'b': 179 case 'i': 180 bsdar->options |= AR_B; 181 break; 182 case 'C': 183 bsdar->options |= AR_CC; 184 break; 185 case 'c': 186 bsdar->options |= AR_C; 187 break; 188 case 'd': 189 set_mode(bsdar, opt); 190 break; 191 case 'D': 192 Dflag = 1; 193 Uflag = 0; 194 break; 195 case 'f': 196 case 'T': 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 set_mode(bsdar, opt); 231 break; 232 case 'U': 233 Uflag = 1; 234 Dflag = 0; 235 break; 236 case 'u': 237 bsdar->options |= AR_U; 238 break; 239 case 'V': 240 bsdar_version(); 241 break; 242 case 'v': 243 bsdar->options |= AR_V; 244 break; 245 case 'x': 246 set_mode(bsdar, opt); 247 break; 248 case 'z': 249 /* ignored */ 250 break; 251 case OPTION_HELP: 252 bsdar_usage(); 253 default: 254 bsdar_usage(); 255 } 256 } 257 258 argv += optind; 259 argc -= optind; 260 261 if (*argv == NULL && bsdar->mode != 'M') 262 bsdar_usage(); 263 264 if (bsdar->options & AR_A && bsdar->options & AR_B) 265 bsdar_errc(bsdar, 0, 266 "only one of -a and -[bi] options allowed"); 267 268 if (bsdar->options & AR_J && bsdar->options & AR_Z) 269 bsdar_errc(bsdar, 0, "only one of -j and -z options allowed"); 270 271 if (bsdar->options & AR_S && bsdar->options & AR_SS) 272 bsdar_errc(bsdar, 0, "only one of -s and -S options allowed"); 273 274 if (bsdar->options & (AR_A | AR_B)) { 275 if (*argv == NULL) 276 bsdar_errc(bsdar, 0, "no position operand specified"); 277 if ((bsdar->posarg = basename(*argv)) == NULL) 278 bsdar_errc(bsdar, errno, "basename failed"); 279 argc--; 280 argv++; 281 } 282 283 /* Set determinstic mode for -D, and by default without -U. */ 284 if (Dflag || (Uflag == 0 && (bsdar->mode == 'q' || bsdar->mode == 'r' || 285 (bsdar->mode == '\0' && bsdar->options & AR_S)))) 286 bsdar->options |= AR_D; 287 288 if (bsdar->options & AR_A) 289 only_mode(bsdar, "-a", "mqr"); 290 if (bsdar->options & AR_B) 291 only_mode(bsdar, "-b", "mqr"); 292 if (bsdar->options & AR_C) 293 only_mode(bsdar, "-c", "qr"); 294 if (bsdar->options & AR_CC) 295 only_mode(bsdar, "-C", "x"); 296 if (Dflag) 297 only_mode(bsdar, "-D", "qr"); 298 if (Uflag) 299 only_mode(bsdar, "-U", "qr"); 300 if (bsdar->options & AR_O) 301 only_mode(bsdar, "-o", "x"); 302 if (bsdar->options & AR_SS) 303 only_mode(bsdar, "-S", "mqr"); 304 if (bsdar->options & AR_U) 305 only_mode(bsdar, "-u", "qrx"); 306 307 if (bsdar->mode == 'M') { 308 ar_mode_script(bsdar); 309 exit(EXIT_SUCCESS); 310 } 311 312 if ((bsdar->filename = *argv) == NULL) 313 bsdar_usage(); 314 315 bsdar->argc = --argc; 316 bsdar->argv = ++argv; 317 318 if ((!bsdar->mode || strchr("ptx", bsdar->mode)) && 319 bsdar->options & AR_S) { 320 exitcode = ar_write_archive(bsdar, 's'); 321 if (!bsdar->mode) 322 exit(exitcode); 323 } 324 325 switch(bsdar->mode) { 326 case 'd': case 'm': case 'q': case 'r': 327 exitcode = ar_write_archive(bsdar, bsdar->mode); 328 break; 329 case 'p': case 't': case 'x': 330 exitcode = ar_read_archive(bsdar, bsdar->mode); 331 break; 332 default: 333 bsdar_usage(); 334 /* NOTREACHED */ 335 } 336 337 for (i = 0; i < bsdar->argc; i++) { 338 if (bsdar->argv[i] != NULL) { 339 bsdar_warnc(bsdar, 0, "%s: not found in archive", 340 bsdar->argv[i]); 341 exitcode = EXIT_FAILURE; 342 } 343 } 344 345 exit(exitcode); 346 } 347 348 static void 349 set_mode(struct bsdar *bsdar, char opt) 350 { 351 352 if (bsdar->mode != '\0' && bsdar->mode != opt) 353 bsdar_errc(bsdar, 0, "Can't specify both -%c and -%c", opt, 354 bsdar->mode); 355 bsdar->mode = opt; 356 } 357 358 static void 359 only_mode(struct bsdar *bsdar, const char *opt, const char *valid_modes) 360 { 361 362 if (strchr(valid_modes, bsdar->mode) == NULL) 363 bsdar_errc(bsdar, 0, "Option %s is not permitted in mode -%c", 364 opt, bsdar->mode); 365 } 366 367 static void 368 bsdar_usage(void) 369 { 370 371 (void)fprintf(stderr, "usage: ar -d [-Tjsvz] archive file ...\n"); 372 (void)fprintf(stderr, "\tar -m [-Tjsvz] archive file ...\n"); 373 (void)fprintf(stderr, "\tar -m [-Tabijsvz] position archive file ...\n"); 374 (void)fprintf(stderr, "\tar -p [-Tv] archive [file ...]\n"); 375 (void)fprintf(stderr, "\tar -q [-TcDjsUvz] archive file ...\n"); 376 (void)fprintf(stderr, "\tar -r [-TcDjsUuvz] archive file ...\n"); 377 (void)fprintf(stderr, "\tar -r [-TabcDijsUuvz] position archive file ...\n"); 378 (void)fprintf(stderr, "\tar -s [-jz] archive\n"); 379 (void)fprintf(stderr, "\tar -t [-Tv] archive [file ...]\n"); 380 (void)fprintf(stderr, "\tar -x [-CTouv] archive [file ...]\n"); 381 (void)fprintf(stderr, "\tar -V\n"); 382 exit(EXIT_FAILURE); 383 } 384 385 static void 386 ranlib_usage(void) 387 { 388 389 (void)fprintf(stderr, "usage: ranlib [-DtU] archive ...\n"); 390 (void)fprintf(stderr, "\tranlib -V\n"); 391 exit(EXIT_FAILURE); 392 } 393 394 static void 395 bsdar_version(void) 396 { 397 (void)printf("BSD ar %s - %s\n", BSDAR_VERSION, archive_version_string()); 398 exit(EXIT_SUCCESS); 399 } 400 401 static void 402 ranlib_version(void) 403 { 404 (void)printf("ranlib %s - %s\n", BSDAR_VERSION, archive_version_string()); 405 exit(EXIT_SUCCESS); 406 } 407