1 /* $NetBSD: options.c,v 1.106 2009/12/14 05:04:48 dholland Exp $ */ 2 3 /*- 4 * Copyright (c) 1992 Keith Muller. 5 * Copyright (c) 1992, 1993 6 * The Regents of the University of California. All rights reserved. 7 * 8 * This code is derived from software contributed to Berkeley by 9 * Keith Muller of the University of California, San Diego. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 */ 35 36 #if HAVE_NBTOOL_CONFIG_H 37 #include "nbtool_config.h" 38 #endif 39 40 #include <sys/cdefs.h> 41 #if !defined(lint) 42 #if 0 43 static char sccsid[] = "@(#)options.c 8.2 (Berkeley) 4/18/94"; 44 #else 45 __RCSID("$NetBSD: options.c,v 1.106 2009/12/14 05:04:48 dholland Exp $"); 46 #endif 47 #endif /* not lint */ 48 49 #include <sys/types.h> 50 #include <sys/time.h> 51 #include <sys/stat.h> 52 #include <sys/param.h> 53 #include <ctype.h> 54 #include <errno.h> 55 #if HAVE_NBTOOL_CONFIG_H 56 #include "compat_getopt.h" 57 #else 58 #include <getopt.h> 59 #endif 60 #include <limits.h> 61 #include <stdio.h> 62 #include <stdlib.h> 63 #include <string.h> 64 #include <unistd.h> 65 #include <paths.h> 66 #include "pax.h" 67 #include "options.h" 68 #include "cpio.h" 69 #include "tar.h" 70 #include "extern.h" 71 #ifndef SMALL 72 #include "mtree.h" 73 #endif /* SMALL */ 74 75 /* 76 * Routines which handle command line options 77 */ 78 79 static int nopids; /* tar mode: suppress "pids" for -p option */ 80 static char flgch[] = FLGCH; /* list of all possible flags (pax) */ 81 static OPLIST *ophead = NULL; /* head for format specific options -x */ 82 static OPLIST *optail = NULL; /* option tail */ 83 84 static int no_op(void); 85 static void printflg(unsigned int); 86 static int c_frmt(const void *, const void *); 87 static off_t str_offt(char *); 88 static char *get_line(FILE *fp); 89 static void pax_options(int, char **); 90 static void pax_usage(void); 91 static void tar_options(int, char **); 92 static void tar_usage(void); 93 #ifndef NO_CPIO 94 static void cpio_options(int, char **); 95 static void cpio_usage(void); 96 #endif 97 98 /* errors from get_line */ 99 #define GETLINE_FILE_CORRUPT 1 100 #define GETLINE_OUT_OF_MEM 2 101 static int get_line_error; 102 103 #define BZIP2_CMD "bzip2" /* command to run as bzip2 */ 104 #define GZIP_CMD "gzip" /* command to run as gzip */ 105 #define COMPRESS_CMD "compress" /* command to run as compress */ 106 107 /* 108 * Long options. 109 */ 110 #define OPT_USE_COMPRESS_PROGRAM 0 111 #define OPT_CHECKPOINT 1 112 #define OPT_UNLINK 2 113 #define OPT_HELP 3 114 #define OPT_ATIME_PRESERVE 4 115 #define OPT_IGNORE_FAILED_READ 5 116 #define OPT_REMOVE_FILES 6 117 #define OPT_NULL 7 118 #define OPT_TOTALS 8 119 #define OPT_VERSION 9 120 #define OPT_EXCLUDE 10 121 #define OPT_BLOCK_COMPRESS 11 122 #define OPT_NORECURSE 12 123 #define OPT_FORCE_LOCAL 13 124 #define OPT_INSECURE 14 125 #define OPT_STRICT 15 126 #define OPT_SPARSE 16 127 #if !HAVE_NBTOOL_CONFIG_H 128 #define OPT_CHROOT 17 129 #endif 130 131 /* 132 * Format specific routine table - MUST BE IN SORTED ORDER BY NAME 133 * (see pax.h for description of each function) 134 * 135 * name, blksz, hdsz, udev, hlk, blkagn, inhead, id, st_read, 136 * read, end_read, st_write, write, end_write, trail, 137 * subtrail, rd_data, wr_data, options 138 */ 139 140 FSUB fsub[] = { 141 #ifndef NO_CPIO 142 /* 0: OLD BINARY CPIO */ 143 { "bcpio", 5120, sizeof(HD_BCPIO), 1, 0, 0, 1, bcpio_id, cpio_strd, 144 bcpio_rd, bcpio_endrd, cpio_stwr, bcpio_wr, cpio_endwr, NULL, 145 cpio_subtrail, rd_wrfile, wr_rdfile, bad_opt }, 146 147 /* 1: OLD OCTAL CHARACTER CPIO */ 148 { "cpio", 5120, sizeof(HD_CPIO), 1, 0, 0, 1, cpio_id, cpio_strd, 149 cpio_rd, cpio_endrd, cpio_stwr, cpio_wr, cpio_endwr, NULL, 150 cpio_subtrail, rd_wrfile, wr_rdfile, bad_opt }, 151 152 /* 2: SVR4 HEX CPIO */ 153 { "sv4cpio", 5120, sizeof(HD_VCPIO), 1, 0, 0, 1, vcpio_id, cpio_strd, 154 vcpio_rd, vcpio_endrd, cpio_stwr, vcpio_wr, cpio_endwr, NULL, 155 cpio_subtrail, rd_wrfile, wr_rdfile, bad_opt }, 156 157 /* 3: SVR4 HEX CPIO WITH CRC */ 158 { "sv4crc", 5120, sizeof(HD_VCPIO), 1, 0, 0, 1, crc_id, crc_strd, 159 vcpio_rd, vcpio_endrd, crc_stwr, vcpio_wr, cpio_endwr, NULL, 160 cpio_subtrail, rd_wrfile, wr_rdfile, bad_opt }, 161 #endif 162 /* 4: OLD TAR */ 163 { "tar", 10240, BLKMULT, 0, 1, BLKMULT, 0, tar_id, no_op, 164 tar_rd, tar_endrd, no_op, tar_wr, tar_endwr, tar_trail, 165 NULL, rd_wrfile, wr_rdfile, tar_opt }, 166 167 /* 5: POSIX USTAR */ 168 { "ustar", 10240, BLKMULT, 0, 1, BLKMULT, 0, ustar_id, ustar_strd, 169 ustar_rd, tar_endrd, ustar_stwr, ustar_wr, tar_endwr, tar_trail, 170 NULL, rd_wrfile, wr_rdfile, bad_opt } 171 }; 172 #ifndef NO_CPIO 173 #define F_BCPIO 0 /* old binary cpio format */ 174 #define F_CPIO 1 /* old octal character cpio format */ 175 #define F_SV4CPIO 2 /* SVR4 hex cpio format */ 176 #define F_SV4CRC 3 /* SVR4 hex with crc cpio format */ 177 #define F_TAR 4 /* old V7 UNIX tar format */ 178 #define F_USTAR 5 /* ustar format */ 179 #else 180 #define F_TAR 0 /* old V7 UNIX tar format */ 181 #define F_USTAR 1 /* ustar format */ 182 #endif 183 #define DEFLT F_USTAR /* default write format from list above */ 184 185 /* 186 * ford is the archive search order used by get_arc() to determine what kind 187 * of archive we are dealing with. This helps to properly id archive formats 188 * some formats may be subsets of others.... 189 */ 190 int ford[] = {F_USTAR, F_TAR, 191 #ifndef NO_CPIO 192 F_SV4CRC, F_SV4CPIO, F_CPIO, F_BCPIO, 193 #endif 194 -1}; 195 196 /* 197 * filename record separator 198 */ 199 int sep = '\n'; 200 201 /* 202 * Do we have -C anywhere? 203 */ 204 int havechd = 0; 205 206 /* 207 * options() 208 * figure out if we are pax, tar or cpio. Call the appropriate options 209 * parser 210 */ 211 212 void 213 options(int argc, char **argv) 214 { 215 216 /* 217 * Are we acting like pax, tar or cpio (based on argv[0]) 218 */ 219 if ((argv0 = strrchr(argv[0], '/')) != NULL) 220 argv0++; 221 else 222 argv0 = argv[0]; 223 224 if (strstr(argv0, NM_TAR)) { 225 argv0 = NM_TAR; 226 tar_options(argc, argv); 227 #ifndef NO_CPIO 228 } else if (strstr(argv0, NM_CPIO)) { 229 argv0 = NM_CPIO; 230 cpio_options(argc, argv); 231 #endif 232 } else { 233 argv0 = NM_PAX; 234 pax_options(argc, argv); 235 } 236 } 237 238 struct option pax_longopts[] = { 239 { "insecure", no_argument, 0, 240 OPT_INSECURE }, 241 { "force-local", no_argument, 0, 242 OPT_FORCE_LOCAL }, 243 { 0, 0, 0, 244 0 }, 245 }; 246 247 /* 248 * pax_options() 249 * look at the user specified flags. set globals as required and check if 250 * the user specified a legal set of flags. If not, complain and exit 251 */ 252 253 static void 254 pax_options(int argc, char **argv) 255 { 256 int c; 257 size_t i; 258 u_int64_t flg = 0; 259 u_int64_t bflg = 0; 260 char *pt; 261 FSUB tmp; 262 263 /* 264 * process option flags 265 */ 266 while ((c = getopt_long(argc, argv, 267 "0ab:cdf:ijklno:p:rs:tuvwx:zAB:DE:G:HLMN:OPT:U:VXYZ", 268 pax_longopts, NULL)) != -1) { 269 switch (c) { 270 case '0': 271 sep = '\0'; 272 break; 273 case 'a': 274 /* 275 * append 276 */ 277 flg |= AF; 278 break; 279 case 'b': 280 /* 281 * specify blocksize 282 */ 283 flg |= BF; 284 if ((wrblksz = (int)str_offt(optarg)) <= 0) { 285 tty_warn(1, "Invalid block size %s", optarg); 286 pax_usage(); 287 } 288 break; 289 case 'c': 290 /* 291 * inverse match on patterns 292 */ 293 cflag = 1; 294 flg |= CF; 295 break; 296 case 'd': 297 /* 298 * match only dir on extract, not the subtree at dir 299 */ 300 dflag = 1; 301 flg |= DF; 302 break; 303 case 'f': 304 /* 305 * filename where the archive is stored 306 */ 307 arcname = optarg; 308 flg |= FF; 309 break; 310 case 'i': 311 /* 312 * interactive file rename 313 */ 314 iflag = 1; 315 flg |= IF; 316 break; 317 case 'j': 318 /* 319 * pass through bzip2 320 */ 321 jflag = 1; 322 gzip_program = BZIP2_CMD; 323 break; 324 case 'k': 325 /* 326 * do not clobber files that exist 327 */ 328 kflag = 1; 329 flg |= KF; 330 break; 331 case 'l': 332 /* 333 * try to link src to dest with copy (-rw) 334 */ 335 lflag = 1; 336 flg |= LF; 337 break; 338 case 'n': 339 /* 340 * select first match for a pattern only 341 */ 342 nflag = 1; 343 flg |= NF; 344 break; 345 case 'o': 346 /* 347 * pass format specific options 348 */ 349 flg |= OF; 350 if (opt_add(optarg) < 0) 351 pax_usage(); 352 break; 353 case 'p': 354 /* 355 * specify file characteristic options 356 */ 357 for (pt = optarg; *pt != '\0'; ++pt) { 358 switch(*pt) { 359 case 'a': 360 /* 361 * do not preserve access time 362 */ 363 patime = 0; 364 break; 365 case 'e': 366 /* 367 * preserve user id, group id, file 368 * mode, access/modification times 369 * and file flags. 370 */ 371 pids = 1; 372 pmode = 1; 373 patime = 1; 374 pmtime = 1; 375 pfflags = 1; 376 break; 377 #if 0 378 case 'f': 379 /* 380 * do not preserve file flags 381 */ 382 pfflags = 0; 383 break; 384 #endif 385 case 'm': 386 /* 387 * do not preserve modification time 388 */ 389 pmtime = 0; 390 break; 391 case 'o': 392 /* 393 * preserve uid/gid 394 */ 395 pids = 1; 396 break; 397 case 'p': 398 /* 399 * preserve file mode bits 400 */ 401 pmode = 1; 402 break; 403 default: 404 tty_warn(1, "Invalid -p string: %c", 405 *pt); 406 pax_usage(); 407 break; 408 } 409 } 410 flg |= PF; 411 break; 412 case 'r': 413 /* 414 * read the archive 415 */ 416 flg |= RF; 417 break; 418 case 's': 419 /* 420 * file name substitution name pattern 421 */ 422 if (rep_add(optarg) < 0) { 423 pax_usage(); 424 break; 425 } 426 flg |= SF; 427 break; 428 case 't': 429 /* 430 * preserve access time on filesystem nodes we read 431 */ 432 tflag = 1; 433 flg |= TF; 434 break; 435 case 'u': 436 /* 437 * ignore those older files 438 */ 439 uflag = 1; 440 flg |= UF; 441 break; 442 case 'v': 443 /* 444 * verbose operation mode 445 */ 446 vflag = 1; 447 flg |= VF; 448 break; 449 case 'w': 450 /* 451 * write an archive 452 */ 453 flg |= WF; 454 break; 455 case 'x': 456 /* 457 * specify an archive format on write 458 */ 459 tmp.name = optarg; 460 frmt = (FSUB *)bsearch((void *)&tmp, (void *)fsub, 461 sizeof(fsub)/sizeof(FSUB), sizeof(FSUB), c_frmt); 462 if (frmt != NULL) { 463 flg |= XF; 464 break; 465 } 466 tty_warn(1, "Unknown -x format: %s", optarg); 467 (void)fputs("pax: Known -x formats are:", stderr); 468 for (i = 0; i < (sizeof(fsub)/sizeof(FSUB)); ++i) 469 (void)fprintf(stderr, " %s", fsub[i].name); 470 (void)fputs("\n\n", stderr); 471 pax_usage(); 472 break; 473 case 'z': 474 /* 475 * use gzip. Non standard option. 476 */ 477 gzip_program = GZIP_CMD; 478 break; 479 case 'A': 480 Aflag = 1; 481 flg |= CAF; 482 break; 483 case 'B': 484 /* 485 * non-standard option on number of bytes written on a 486 * single archive volume. 487 */ 488 if ((wrlimit = str_offt(optarg)) <= 0) { 489 tty_warn(1, "Invalid write limit %s", optarg); 490 pax_usage(); 491 } 492 if (wrlimit % BLKMULT) { 493 tty_warn(1, 494 "Write limit is not a %d byte multiple", 495 BLKMULT); 496 pax_usage(); 497 } 498 flg |= CBF; 499 break; 500 case 'D': 501 /* 502 * On extraction check file inode change time before the 503 * modification of the file name. Non standard option. 504 */ 505 Dflag = 1; 506 flg |= CDF; 507 break; 508 case 'E': 509 /* 510 * non-standard limit on read faults 511 * 0 indicates stop after first error, values 512 * indicate a limit, "none" try forever 513 */ 514 flg |= CEF; 515 if (strcmp(none, optarg) == 0) 516 maxflt = -1; 517 else if ((maxflt = atoi(optarg)) < 0) { 518 tty_warn(1, 519 "Error count value must be positive"); 520 pax_usage(); 521 } 522 break; 523 case 'G': 524 /* 525 * non-standard option for selecting files within an 526 * archive by group (gid or name) 527 */ 528 if (grp_add(optarg) < 0) { 529 pax_usage(); 530 break; 531 } 532 flg |= CGF; 533 break; 534 case 'H': 535 /* 536 * follow command line symlinks only 537 */ 538 Hflag = 1; 539 flg |= CHF; 540 break; 541 case 'L': 542 /* 543 * follow symlinks 544 */ 545 Lflag = 1; 546 flg |= CLF; 547 break; 548 #ifdef SMALL 549 case 'M': 550 case 'N': 551 tty_warn(1, "Support for -%c is not compiled in", c); 552 exit(1); 553 #else /* !SMALL */ 554 case 'M': 555 /* 556 * Treat list of filenames on stdin as an 557 * mtree(8) specfile. Non standard option. 558 */ 559 Mflag = 1; 560 flg |= CMF; 561 break; 562 case 'N': 563 /* 564 * Use alternative directory for user db lookups. 565 */ 566 if (!setup_getid(optarg)) { 567 tty_warn(1, 568 "Unable to use user and group databases in `%s'", 569 optarg); 570 pax_usage(); 571 } 572 break; 573 #endif /* !SMALL */ 574 case 'O': 575 /* 576 * Force one volume. Non standard option. 577 */ 578 force_one_volume = 1; 579 break; 580 case 'P': 581 /* 582 * do NOT follow symlinks (default) 583 */ 584 Lflag = 0; 585 flg |= CPF; 586 break; 587 case 'T': 588 /* 589 * non-standard option for selecting files within an 590 * archive by modification time range (lower,upper) 591 */ 592 if (trng_add(optarg) < 0) { 593 pax_usage(); 594 break; 595 } 596 flg |= CTF; 597 break; 598 case 'U': 599 /* 600 * non-standard option for selecting files within an 601 * archive by user (uid or name) 602 */ 603 if (usr_add(optarg) < 0) { 604 pax_usage(); 605 break; 606 } 607 flg |= CUF; 608 break; 609 case 'V': 610 /* 611 * somewhat verbose operation mode (no listing) 612 */ 613 Vflag = 1; 614 flg |= VSF; 615 break; 616 case 'X': 617 /* 618 * do not pass over mount points in the file system 619 */ 620 Xflag = 1; 621 flg |= CXF; 622 break; 623 case 'Y': 624 /* 625 * On extraction check file inode change time after the 626 * modification of the file name. Non standard option. 627 */ 628 Yflag = 1; 629 flg |= CYF; 630 break; 631 case 'Z': 632 /* 633 * On extraction check modification time after the 634 * modification of the file name. Non standard option. 635 */ 636 Zflag = 1; 637 flg |= CZF; 638 break; 639 case OPT_INSECURE: 640 secure = 0; 641 break; 642 case OPT_FORCE_LOCAL: 643 forcelocal = 0; 644 break; 645 case '?': 646 default: 647 pax_usage(); 648 break; 649 } 650 } 651 652 /* 653 * figure out the operation mode of pax read,write,extract,copy,append 654 * or list. check that we have not been given a bogus set of flags 655 * for the operation mode. 656 */ 657 if (ISLIST(flg)) { 658 act = LIST; 659 listf = stdout; 660 bflg = flg & BDLIST; 661 } else if (ISEXTRACT(flg)) { 662 act = EXTRACT; 663 bflg = flg & BDEXTR; 664 } else if (ISARCHIVE(flg)) { 665 act = ARCHIVE; 666 bflg = flg & BDARCH; 667 } else if (ISAPPND(flg)) { 668 act = APPND; 669 bflg = flg & BDARCH; 670 } else if (ISCOPY(flg)) { 671 act = COPY; 672 bflg = flg & BDCOPY; 673 } else 674 pax_usage(); 675 if (bflg) { 676 printflg(flg); 677 pax_usage(); 678 } 679 680 /* 681 * if we are writing (ARCHIVE) we use the default format if the user 682 * did not specify a format. when we write during an APPEND, we will 683 * adopt the format of the existing archive if none was supplied. 684 */ 685 if (!(flg & XF) && (act == ARCHIVE)) 686 frmt = &(fsub[DEFLT]); 687 688 /* 689 * process the args as they are interpreted by the operation mode 690 */ 691 switch (act) { 692 case LIST: 693 case EXTRACT: 694 for (; optind < argc; optind++) 695 if (pat_add(argv[optind], NULL, 0) < 0) 696 pax_usage(); 697 break; 698 case COPY: 699 if (optind >= argc) { 700 tty_warn(0, "Destination directory was not supplied"); 701 pax_usage(); 702 } 703 --argc; 704 dirptr = argv[argc]; 705 if (mkpath(dirptr) < 0) 706 exit(1); 707 /* FALLTHROUGH */ 708 case ARCHIVE: 709 case APPND: 710 for (; optind < argc; optind++) 711 if (ftree_add(argv[optind], 0) < 0) 712 pax_usage(); 713 /* 714 * no read errors allowed on updates/append operation! 715 */ 716 maxflt = 0; 717 break; 718 } 719 } 720 721 722 /* 723 * tar_options() 724 * look at the user specified flags. set globals as required and check if 725 * the user specified a legal set of flags. If not, complain and exit 726 */ 727 728 struct option tar_longopts[] = { 729 { "block-size", required_argument, 0, 'b' }, 730 { "bunzip2", no_argument, 0, 'j' }, 731 { "bzip2", no_argument, 0, 'j' }, 732 { "create", no_argument, 0, 'c' }, /* F */ 733 /* -e -- no corresponding long option */ 734 { "file", required_argument, 0, 'f' }, 735 { "dereference", no_argument, 0, 'h' }, 736 { "keep-old-files", no_argument, 0, 'k' }, 737 { "one-file-system", no_argument, 0, 'l' }, 738 { "modification-time", no_argument, 0, 'm' }, 739 { "old-archive", no_argument, 0, 'o' }, 740 { "portability", no_argument, 0, 'o' }, 741 { "same-permissions", no_argument, 0, 'p' }, 742 { "preserve-permissions", no_argument, 0, 'p' }, 743 { "preserve", no_argument, 0, 'p' }, 744 { "fast-read", no_argument, 0, 'q' }, 745 { "append", no_argument, 0, 'r' }, /* F */ 746 { "update", no_argument, 0, 'u' }, /* F */ 747 { "list", no_argument, 0, 't' }, /* F */ 748 { "verbose", no_argument, 0, 'v' }, 749 { "interactive", no_argument, 0, 'w' }, 750 { "confirmation", no_argument, 0, 'w' }, 751 { "extract", no_argument, 0, 'x' }, /* F */ 752 { "get", no_argument, 0, 'x' }, /* F */ 753 { "gzip", no_argument, 0, 'z' }, 754 { "gunzip", no_argument, 0, 'z' }, 755 { "read-full-blocks", no_argument, 0, 'B' }, 756 { "directory", required_argument, 0, 'C' }, 757 { "to-stdout", no_argument, 0, 'O' }, 758 { "absolute-paths", no_argument, 0, 'P' }, 759 { "sparse", no_argument, 0, 'S' }, 760 { "files-from", required_argument, 0, 'T' }, 761 { "summary", no_argument, 0, 'V' }, 762 { "stats", no_argument, 0, 'V' }, 763 { "exclude-from", required_argument, 0, 'X' }, 764 { "compress", no_argument, 0, 'Z' }, 765 { "uncompress", no_argument, 0, 'Z' }, 766 { "strict", no_argument, 0, 767 OPT_STRICT }, 768 { "atime-preserve", no_argument, 0, 769 OPT_ATIME_PRESERVE }, 770 { "unlink", no_argument, 0, 771 OPT_UNLINK }, 772 { "use-compress-program", required_argument, 0, 773 OPT_USE_COMPRESS_PROGRAM }, 774 { "force-local", no_argument, 0, 775 OPT_FORCE_LOCAL }, 776 { "insecure", no_argument, 0, 777 OPT_INSECURE }, 778 { "exclude", required_argument, 0, 779 OPT_EXCLUDE }, 780 { "no-recursion", no_argument, 0, 781 OPT_NORECURSE }, 782 #if !HAVE_NBTOOL_CONFIG_H 783 { "chroot", no_argument, 0, 784 OPT_CHROOT }, 785 #endif 786 #if 0 /* Not implemented */ 787 { "catenate", no_argument, 0, 'A' }, /* F */ 788 { "concatenate", no_argument, 0, 'A' }, /* F */ 789 { "diff", no_argument, 0, 'd' }, /* F */ 790 { "compare", no_argument, 0, 'd' }, /* F */ 791 { "checkpoint", no_argument, 0, 792 OPT_CHECKPOINT }, 793 { "help", no_argument, 0, 794 OPT_HELP }, 795 { "info-script", required_argument, 0, 'F' }, 796 { "new-volume-script", required_argument, 0, 'F' }, 797 { "incremental", no_argument, 0, 'G' }, 798 { "listed-incremental", required_argument, 0, 'g' }, 799 { "ignore-zeros", no_argument, 0, 'i' }, 800 { "ignore-failed-read", no_argument, 0, 801 OPT_IGNORE_FAILED_READ }, 802 { "starting-file", no_argument, 0, 'K' }, 803 { "tape-length", required_argument, 0, 'L' }, 804 { "multi-volume", no_argument, 0, 'M' }, 805 { "after-date", required_argument, 0, 'N' }, 806 { "newer", required_argument, 0, 'N' }, 807 { "record-number", no_argument, 0, 'R' }, 808 { "remove-files", no_argument, 0, 809 OPT_REMOVE_FILES }, 810 { "same-order", no_argument, 0, 's' }, 811 { "preserve-order", no_argument, 0, 's' }, 812 { "null", no_argument, 0, 813 OPT_NULL }, 814 { "totals", no_argument, 0, 815 OPT_TOTALS }, 816 { "volume-name", required_argument, 0, 'V' }, /* XXX */ 817 { "label", required_argument, 0, 'V' }, /* XXX */ 818 { "version", no_argument, 0, 819 OPT_VERSION }, 820 { "verify", no_argument, 0, 'W' }, 821 { "block-compress", no_argument, 0, 822 OPT_BLOCK_COMPRESS }, 823 #endif 824 { 0, 0, 0, 0 }, 825 }; 826 827 static void 828 tar_set_action(int op) 829 { 830 if (act != ERROR && act != op) 831 tar_usage(); 832 act = op; 833 } 834 835 static void 836 tar_options(int argc, char **argv) 837 { 838 int c; 839 int fstdin = 0; 840 int Oflag = 0; 841 int nincfiles = 0; 842 int incfiles_max = 0; 843 struct incfile { 844 char *file; 845 char *dir; 846 }; 847 struct incfile *incfiles = NULL; 848 849 /* 850 * Set default values. 851 */ 852 rmleadslash = 1; 853 is_gnutar = 1; 854 855 /* 856 * process option flags 857 */ 858 while ((c = getoldopt(argc, argv, 859 "+b:cef:hjklmopqrs:tuvwxzBC:HI:OPST:X:Z014578", 860 tar_longopts, NULL)) 861 != -1) { 862 switch(c) { 863 case 'b': 864 /* 865 * specify blocksize in 512-byte blocks 866 */ 867 if ((wrblksz = (int)str_offt(optarg)) <= 0) { 868 tty_warn(1, "Invalid block size %s", optarg); 869 tar_usage(); 870 } 871 wrblksz *= 512; /* XXX - check for int oflow */ 872 break; 873 case 'c': 874 /* 875 * create an archive 876 */ 877 tar_set_action(ARCHIVE); 878 break; 879 case 'e': 880 /* 881 * stop after first error 882 */ 883 maxflt = 0; 884 break; 885 case 'f': 886 /* 887 * filename where the archive is stored 888 */ 889 if ((optarg[0] == '-') && (optarg[1]== '\0')) { 890 /* 891 * treat a - as stdin 892 */ 893 fstdin = 1; 894 arcname = NULL; 895 break; 896 } 897 fstdin = 0; 898 arcname = optarg; 899 break; 900 case 'h': 901 /* 902 * follow symlinks 903 */ 904 Lflag = 1; 905 break; 906 case 'j': 907 /* 908 * pass through bzip2. not a standard option 909 */ 910 jflag = 1; 911 gzip_program = BZIP2_CMD; 912 break; 913 case 'k': 914 /* 915 * do not clobber files that exist 916 */ 917 kflag = 1; 918 break; 919 case 'l': 920 /* 921 * do not pass over mount points in the file system 922 */ 923 Xflag = 1; 924 break; 925 case 'm': 926 /* 927 * do not preserve modification time 928 */ 929 pmtime = 0; 930 break; 931 case 'o': 932 /* 933 * This option does several things based on whether 934 * this is a create or extract operation. 935 */ 936 if (act == ARCHIVE) { 937 /* GNU tar: write V7 format archives. */ 938 Oflag = 1; 939 /* 4.2BSD: don't add directory entries. */ 940 if (opt_add("write_opt=nodir") < 0) 941 tar_usage(); 942 943 } else { 944 /* SUS: don't preserve owner/group. */ 945 pids = 0; 946 nopids = 1; 947 } 948 break; 949 case 'O': 950 Oflag = 1; 951 break; 952 case 'p': 953 /* 954 * preserve user id, group id, file 955 * mode, access/modification times 956 */ 957 if (!nopids) 958 pids = 1; 959 pmode = 1; 960 patime = 1; 961 pmtime = 1; 962 break; 963 case 'q': 964 /* 965 * select first match for a pattern only 966 */ 967 nflag = 1; 968 break; 969 case 'r': 970 case 'u': 971 /* 972 * append to the archive 973 */ 974 tar_set_action(APPND); 975 break; 976 case 's': 977 /* 978 * file name substitution name pattern 979 */ 980 if (rep_add(optarg) < 0) { 981 tar_usage(); 982 break; 983 } 984 break; 985 case 't': 986 /* 987 * list contents of the tape 988 */ 989 tar_set_action(LIST); 990 break; 991 case 'v': 992 /* 993 * verbose operation mode 994 */ 995 vflag = 1; 996 break; 997 case 'w': 998 /* 999 * interactive file rename 1000 */ 1001 iflag = 1; 1002 break; 1003 case 'x': 1004 /* 1005 * extract an archive, preserving mode, 1006 * and mtime if possible. 1007 */ 1008 tar_set_action(EXTRACT); 1009 pmtime = 1; 1010 break; 1011 case 'z': 1012 /* 1013 * use gzip. Non standard option. 1014 */ 1015 zflag = 1; 1016 gzip_program = GZIP_CMD; 1017 break; 1018 case 'B': 1019 /* 1020 * Nothing to do here, this is pax default 1021 */ 1022 break; 1023 case 'C': 1024 havechd++; 1025 chdname = optarg; 1026 break; 1027 case 'H': 1028 /* 1029 * follow command line symlinks only 1030 */ 1031 Hflag = 1; 1032 break; 1033 case 'I': 1034 case 'T': 1035 if (++nincfiles > incfiles_max) { 1036 incfiles_max = nincfiles + 3; 1037 incfiles = realloc(incfiles, 1038 sizeof(*incfiles) * incfiles_max); 1039 if (incfiles == NULL) { 1040 tty_warn(0, "Unable to allocate space " 1041 "for option list"); 1042 exit(1); 1043 } 1044 } 1045 incfiles[nincfiles - 1].file = optarg; 1046 incfiles[nincfiles - 1].dir = chdname; 1047 break; 1048 case 'P': 1049 /* 1050 * do not remove leading '/' from pathnames 1051 */ 1052 rmleadslash = 0; 1053 Aflag = 1; 1054 break; 1055 case 'S': 1056 /* do nothing; we already generate sparse files */ 1057 break; 1058 case 'V': 1059 /* 1060 * semi-verbose operation mode (no listing) 1061 */ 1062 Vflag = 1; 1063 break; 1064 case 'X': 1065 /* 1066 * GNU tar compat: exclude the files listed in optarg 1067 */ 1068 if (tar_gnutar_X_compat(optarg) != 0) 1069 tar_usage(); 1070 break; 1071 case 'Z': 1072 /* 1073 * use compress. 1074 */ 1075 zflag = 1; 1076 gzip_program = COMPRESS_CMD; 1077 break; 1078 case '0': 1079 arcname = DEV_0; 1080 break; 1081 case '1': 1082 arcname = DEV_1; 1083 break; 1084 case '4': 1085 arcname = DEV_4; 1086 break; 1087 case '5': 1088 arcname = DEV_5; 1089 break; 1090 case '7': 1091 arcname = DEV_7; 1092 break; 1093 case '8': 1094 arcname = DEV_8; 1095 break; 1096 case OPT_ATIME_PRESERVE: 1097 patime = 1; 1098 break; 1099 case OPT_UNLINK: 1100 /* Just ignore -- we always unlink first. */ 1101 break; 1102 case OPT_USE_COMPRESS_PROGRAM: 1103 zflag = 1; 1104 gzip_program = optarg; 1105 break; 1106 case OPT_FORCE_LOCAL: 1107 forcelocal = 1; 1108 break; 1109 case OPT_INSECURE: 1110 secure = 0; 1111 break; 1112 case OPT_STRICT: 1113 /* disable gnu extensions */ 1114 is_gnutar = 0; 1115 break; 1116 case OPT_EXCLUDE: 1117 if (tar_gnutar_minus_minus_exclude(optarg) != 0) 1118 tar_usage(); 1119 break; 1120 case OPT_NORECURSE: 1121 dflag = 1; 1122 break; 1123 #if !HAVE_NBTOOL_CONFIG_H 1124 case OPT_CHROOT: 1125 do_chroot = 1; 1126 break; 1127 #endif 1128 default: 1129 tar_usage(); 1130 break; 1131 } 1132 } 1133 argc -= optind; 1134 argv += optind; 1135 1136 /* Tar requires an action. */ 1137 if (act == ERROR) 1138 tar_usage(); 1139 1140 /* Traditional tar behaviour (pax uses stderr unless in list mode) */ 1141 if (fstdin == 1 && act == ARCHIVE) 1142 listf = stderr; 1143 else 1144 listf = stdout; 1145 1146 /* Traditional tar behaviour (pax wants to read file list from stdin) */ 1147 if ((act == ARCHIVE || act == APPND) && argc == 0 && nincfiles == 0) 1148 exit(0); 1149 /* 1150 * if we are writing (ARCHIVE) specify tar, otherwise run like pax 1151 * (unless -o specified) 1152 */ 1153 if (act == ARCHIVE || act == APPND) 1154 frmt = &(fsub[Oflag ? F_TAR : F_USTAR]); 1155 else if (Oflag) { 1156 if (act == EXTRACT) 1157 to_stdout = 1; 1158 else { 1159 tty_warn(1, "The -O/-o options are only valid when " 1160 "writing or extracting an archive"); 1161 tar_usage(); 1162 } 1163 } 1164 1165 /* 1166 * process the args as they are interpreted by the operation mode 1167 */ 1168 switch (act) { 1169 case LIST: 1170 case EXTRACT: 1171 default: 1172 { 1173 int sawpat = 0; 1174 int dirisnext = 0; 1175 char *file, *dir = NULL; 1176 int mustfreedir = 0; 1177 1178 while (nincfiles || *argv != NULL) { 1179 /* 1180 * If we queued up any include files, 1181 * pull them in now. Otherwise, check 1182 * for -I and -C positional flags. 1183 * Anything else must be a file to 1184 * extract. 1185 */ 1186 if (nincfiles) { 1187 file = incfiles->file; 1188 dir = incfiles->dir; 1189 mustfreedir = 0; 1190 incfiles++; 1191 nincfiles--; 1192 } else if (strcmp(*argv, "-I") == 0) { 1193 if (*++argv == NULL) 1194 break; 1195 file = *argv++; 1196 dir = chdname; 1197 mustfreedir = 0; 1198 } else { 1199 file = NULL; 1200 dir = NULL; 1201 mustfreedir = 0; 1202 } 1203 if (file != NULL) { 1204 FILE *fp; 1205 char *str; 1206 1207 if (strcmp(file, "-") == 0) 1208 fp = stdin; 1209 else if ((fp = fopen(file, "r")) == NULL) { 1210 tty_warn(1, "Unable to open file '%s' for read", file); 1211 tar_usage(); 1212 } 1213 while ((str = get_line(fp)) != NULL) { 1214 if (dirisnext) { 1215 if (dir && mustfreedir) 1216 free(dir); 1217 dir = str; 1218 mustfreedir = 1; 1219 dirisnext = 0; 1220 continue; 1221 } 1222 if (strcmp(str, "-C") == 0) { 1223 havechd++; 1224 dirisnext = 1; 1225 free(str); 1226 continue; 1227 } 1228 if (strncmp(str, "-C ", 3) == 0) { 1229 havechd++; 1230 if (dir && mustfreedir) 1231 free(dir); 1232 dir = strdup(str + 3); 1233 mustfreedir = 1; 1234 free(str); 1235 continue; 1236 } 1237 if (pat_add(str, dir, NOGLOB_MTCH) < 0) 1238 tar_usage(); 1239 sawpat = 1; 1240 } 1241 /* Bomb if given -C w/out a dir. */ 1242 if (dirisnext) 1243 tar_usage(); 1244 if (dir && mustfreedir) 1245 free(dir); 1246 if (strcmp(file, "-") != 0) 1247 fclose(fp); 1248 if (get_line_error) { 1249 tty_warn(1, "Problem with file '%s'", file); 1250 tar_usage(); 1251 } 1252 } else if (strcmp(*argv, "-C") == 0) { 1253 if (*++argv == NULL) 1254 break; 1255 chdname = *argv++; 1256 havechd++; 1257 } else if (pat_add(*argv++, chdname, 0) < 0) 1258 tar_usage(); 1259 else 1260 sawpat = 1; 1261 } 1262 /* 1263 * if patterns were added, we are doing chdir() 1264 * on a file-by-file basis, else, just one 1265 * global chdir (if any) after opening input. 1266 */ 1267 if (sawpat > 0) 1268 chdname = NULL; 1269 } 1270 break; 1271 case ARCHIVE: 1272 case APPND: 1273 if (chdname != NULL) { /* initial chdir() */ 1274 if (ftree_add(chdname, 1) < 0) 1275 tar_usage(); 1276 } 1277 1278 while (nincfiles || *argv != NULL) { 1279 char *file, *dir; 1280 1281 /* 1282 * If we queued up any include files, pull them in 1283 * now. Otherwise, check for -I and -C positional 1284 * flags. Anything else must be a file to include 1285 * in the archive. 1286 */ 1287 if (nincfiles) { 1288 file = incfiles->file; 1289 dir = incfiles->dir; 1290 incfiles++; 1291 nincfiles--; 1292 } else if (strcmp(*argv, "-I") == 0) { 1293 if (*++argv == NULL) 1294 break; 1295 file = *argv++; 1296 dir = NULL; 1297 } else { 1298 file = NULL; 1299 dir = NULL; 1300 } 1301 if (file != NULL) { 1302 FILE *fp; 1303 char *str; 1304 int dirisnext = 0; 1305 1306 /* Set directory if needed */ 1307 if (dir) { 1308 if (ftree_add(dir, 1) < 0) 1309 tar_usage(); 1310 } 1311 1312 if (strcmp(file, "-") == 0) 1313 fp = stdin; 1314 else if ((fp = fopen(file, "r")) == NULL) { 1315 tty_warn(1, "Unable to open file '%s' for read", file); 1316 tar_usage(); 1317 } 1318 while ((str = get_line(fp)) != NULL) { 1319 if (dirisnext) { 1320 if (ftree_add(str, 1) < 0) 1321 tar_usage(); 1322 dirisnext = 0; 1323 continue; 1324 } 1325 if (strcmp(str, "-C") == 0) { 1326 dirisnext = 1; 1327 continue; 1328 } 1329 if (strncmp(str, "-C ", 3) == 0) { 1330 if (ftree_add(str + 3, 1) < 0) 1331 tar_usage(); 1332 continue; 1333 } 1334 if (ftree_add(str, 0) < 0) 1335 tar_usage(); 1336 } 1337 /* Bomb if given -C w/out a dir. */ 1338 if (dirisnext) 1339 tar_usage(); 1340 if (strcmp(file, "-") != 0) 1341 fclose(fp); 1342 if (get_line_error) { 1343 tty_warn(1, "Problem with file '%s'", 1344 file); 1345 tar_usage(); 1346 } 1347 } else if (strcmp(*argv, "-C") == 0) { 1348 if (*++argv == NULL) 1349 break; 1350 if (ftree_add(*argv++, 1) < 0) 1351 tar_usage(); 1352 } else if (ftree_add(*argv++, 0) < 0) 1353 tar_usage(); 1354 } 1355 /* 1356 * no read errors allowed on updates/append operation! 1357 */ 1358 maxflt = 0; 1359 break; 1360 } 1361 if (!fstdin && ((arcname == (char *)NULL) || (*arcname == '\0'))) { 1362 arcname = getenv("TAPE"); 1363 if ((arcname == NULL) || (*arcname == '\0')) 1364 arcname = _PATH_DEFTAPE; 1365 } 1366 } 1367 1368 int 1369 mkpath(path) 1370 char *path; 1371 { 1372 char *slash; 1373 int done = 0; 1374 1375 slash = path; 1376 1377 while (!done) { 1378 slash += strspn(slash, "/"); 1379 slash += strcspn(slash, "/"); 1380 1381 done = (*slash == '\0'); 1382 *slash = '\0'; 1383 1384 if (domkdir(path, 0777) == -1) 1385 goto out; 1386 1387 if (!done) 1388 *slash = '/'; 1389 } 1390 1391 return 0; 1392 out: 1393 /* Can't create or or not a directory */ 1394 syswarn(1, errno, "Cannot create directory `%s'", path); 1395 return -1; 1396 } 1397 1398 1399 #ifndef NO_CPIO 1400 struct option cpio_longopts[] = { 1401 { "reset-access-time", no_argument, 0, 'a' }, 1402 { "make-directories", no_argument, 0, 'd' }, 1403 { "nonmatching", no_argument, 0, 'f' }, 1404 { "extract", no_argument, 0, 'i' }, 1405 { "link", no_argument, 0, 'l' }, 1406 { "preserve-modification-time", no_argument, 0, 'm' }, 1407 { "create", no_argument, 0, 'o' }, 1408 { "pass-through", no_argument, 0, 'p' }, 1409 { "rename", no_argument, 0, 'r' }, 1410 { "list", no_argument, 0, 't' }, 1411 { "unconditional", no_argument, 0, 'u' }, 1412 { "verbose", no_argument, 0, 'v' }, 1413 { "append", no_argument, 0, 'A' }, 1414 { "pattern-file", required_argument, 0, 'E' }, 1415 { "file", required_argument, 0, 'F' }, 1416 { "force-local", no_argument, 0, 1417 OPT_FORCE_LOCAL }, 1418 { "format", required_argument, 0, 'H' }, 1419 { "dereference", no_argument, 0, 'L' }, 1420 { "swap-halfwords", no_argument, 0, 'S' }, 1421 { "summary", no_argument, 0, 'V' }, 1422 { "stats", no_argument, 0, 'V' }, 1423 { "insecure", no_argument, 0, 1424 OPT_INSECURE }, 1425 { "sparse", no_argument, 0, 1426 OPT_SPARSE }, 1427 1428 #ifdef notyet 1429 /* Not implemented */ 1430 { "null", no_argument, 0, '0' }, 1431 { "swap", no_argument, 0, 'b' }, 1432 { "numeric-uid-gid", no_argument, 0, 'n' }, 1433 { "swap-bytes", no_argument, 0, 's' }, 1434 { "message", required_argument, 0, 'M' }, 1435 { "owner", required_argument, 0 'R' }, 1436 { "dot", no_argument, 0, 'V' }, /* xxx */ 1437 { "block-size", required_argument, 0, 1438 OPT_BLOCK_SIZE }, 1439 { "no-absolute-pathnames", no_argument, 0, 1440 OPT_NO_ABSOLUTE_PATHNAMES }, 1441 { "no-preserve-owner", no_argument, 0, 1442 OPT_NO_PRESERVE_OWNER }, 1443 { "only-verify-crc", no_argument, 0, 1444 OPT_ONLY_VERIFY_CRC }, 1445 { "rsh-command", required_argument, 0, 1446 OPT_RSH_COMMAND }, 1447 { "version", no_argument, 0, 1448 OPT_VERSION }, 1449 #endif 1450 { 0, 0, 0, 0 }, 1451 }; 1452 1453 static void 1454 cpio_set_action(int op) 1455 { 1456 if ((act == APPND && op == ARCHIVE) || (act == ARCHIVE && op == APPND)) 1457 act = APPND; 1458 else if (act != ERROR && act != op) 1459 cpio_usage(); 1460 else 1461 act = op; 1462 } 1463 1464 /* 1465 * cpio_options() 1466 * look at the user specified flags. set globals as required and check if 1467 * the user specified a legal set of flags. If not, complain and exit 1468 */ 1469 1470 static void 1471 cpio_options(int argc, char **argv) 1472 { 1473 FSUB tmp; 1474 u_int64_t flg = 0; 1475 u_int64_t bflg = 0; 1476 int c; 1477 size_t i; 1478 FILE *fp; 1479 char *str; 1480 1481 uflag = 1; 1482 kflag = 1; 1483 pids = 1; 1484 pmode = 1; 1485 pmtime = 0; 1486 arcname = NULL; 1487 dflag = 1; 1488 nodirs = 1; 1489 /* 1490 * process option flags 1491 */ 1492 while ((c = getoldopt(argc, argv, 1493 "+abcdfiklmoprstuvzABC:E:F:H:I:LM:O:R:SVZ6", 1494 cpio_longopts, NULL)) != -1) { 1495 switch(c) { 1496 case 'a': 1497 /* 1498 * preserve access time on filesystem nodes we read 1499 */ 1500 tflag = 1; 1501 flg |= TF; 1502 break; 1503 #ifdef notyet 1504 case 'b': 1505 /* 1506 * swap bytes and half-words when reading data 1507 */ 1508 break; 1509 #endif 1510 case 'c': 1511 /* 1512 * ASCII cpio header 1513 */ 1514 frmt = &fsub[F_SV4CPIO]; 1515 break; 1516 case 'd': 1517 /* 1518 * create directories as needed 1519 * pax does this by default .. 1520 */ 1521 nodirs = 0; 1522 break; 1523 case 'f': 1524 /* 1525 * inverse match on patterns 1526 */ 1527 cflag = 1; 1528 flg |= CF; 1529 break; 1530 case 'i': 1531 /* 1532 * read the archive 1533 */ 1534 cpio_set_action(EXTRACT); 1535 flg |= RF; 1536 break; 1537 #ifdef notyet 1538 case 'k': 1539 break; 1540 #endif 1541 case 'l': 1542 /* 1543 * try to link src to dest with copy (-rw) 1544 */ 1545 lflag = 1; 1546 flg |= LF; 1547 break; 1548 case 'm': 1549 /* 1550 * preserve mtime 1551 */ 1552 flg |= PF; 1553 pmtime = 1; 1554 break; 1555 case 'o': 1556 /* 1557 * write an archive 1558 */ 1559 cpio_set_action(ARCHIVE); 1560 frmt = &(fsub[F_SV4CRC]); 1561 flg |= WF; 1562 break; 1563 case 'p': 1564 /* 1565 * cpio -p is like pax -rw 1566 */ 1567 cpio_set_action(COPY); 1568 flg |= RF | WF; 1569 break; 1570 case 'r': 1571 /* 1572 * interactive file rename 1573 */ 1574 iflag = 1; 1575 flg |= IF; 1576 break; 1577 #ifdef notyet 1578 case 's': 1579 /* 1580 * swap bytes after reading data 1581 */ 1582 break; 1583 #endif 1584 case 't': 1585 /* 1586 * list contents of archive 1587 */ 1588 cpio_set_action(LIST); 1589 listf = stdout; 1590 flg &= ~RF; 1591 break; 1592 case 'u': 1593 /* 1594 * don't ignore those older files 1595 */ 1596 uflag = 0; 1597 kflag = 0; 1598 flg |= UF; 1599 break; 1600 case 'v': 1601 /* 1602 * verbose operation mode 1603 */ 1604 vflag = 1; 1605 flg |= VF; 1606 break; 1607 case 'z': 1608 /* 1609 * use gzip. Non standard option. 1610 */ 1611 gzip_program = GZIP_CMD; 1612 break; 1613 case 'A': 1614 /* 1615 * append to an archive 1616 */ 1617 cpio_set_action(APPND); 1618 flg |= AF; 1619 break; 1620 case 'B': 1621 /* 1622 * set blocksize to 5120 1623 */ 1624 blksz = 5120; 1625 break; 1626 case 'C': 1627 /* 1628 * specify blocksize 1629 */ 1630 if ((blksz = (int)str_offt(optarg)) <= 0) { 1631 tty_warn(1, "Invalid block size %s", optarg); 1632 cpio_usage(); 1633 } 1634 break; 1635 case 'E': 1636 /* 1637 * file with patterns to extract or list 1638 */ 1639 if ((fp = fopen(optarg, "r")) == NULL) { 1640 tty_warn(1, "Unable to open file '%s' for read", 1641 optarg); 1642 cpio_usage(); 1643 } 1644 while ((str = get_line(fp)) != NULL) { 1645 pat_add(str, NULL, 0); 1646 } 1647 fclose(fp); 1648 if (get_line_error) { 1649 tty_warn(1, "Problem with file '%s'", optarg); 1650 cpio_usage(); 1651 } 1652 break; 1653 case 'H': 1654 /* 1655 * specify an archive format on write 1656 */ 1657 tmp.name = optarg; 1658 frmt = (FSUB *)bsearch((void *)&tmp, (void *)fsub, 1659 sizeof(fsub)/sizeof(FSUB), sizeof(FSUB), c_frmt); 1660 if (frmt != NULL) { 1661 flg |= XF; 1662 break; 1663 } 1664 tty_warn(1, "Unknown -H format: %s", optarg); 1665 (void)fputs("cpio: Known -H formats are:", stderr); 1666 for (i = 0; i < (sizeof(fsub)/sizeof(FSUB)); ++i) 1667 (void)fprintf(stderr, " %s", fsub[i].name); 1668 (void)fputs("\n\n", stderr); 1669 cpio_usage(); 1670 break; 1671 case 'I': 1672 case 'O': 1673 /* 1674 * filename where the archive is stored 1675 */ 1676 if ((optarg[0] == '-') && (optarg[1]== '\0')) { 1677 /* 1678 * treat a - as stdin 1679 */ 1680 arcname = NULL; 1681 break; 1682 } 1683 arcname = optarg; 1684 break; 1685 case 'L': 1686 /* 1687 * follow symlinks 1688 */ 1689 Lflag = 1; 1690 flg |= CLF; 1691 break; 1692 #ifdef notyet 1693 case 'M': 1694 arg = optarg; 1695 break; 1696 case 'R': 1697 arg = optarg; 1698 break; 1699 #endif 1700 case 'S': 1701 /* 1702 * swap halfwords after reading data 1703 */ 1704 cpio_swp_head = 1; 1705 break; 1706 #ifdef notyet 1707 case 'V': /* print a '.' for each file processed */ 1708 break; 1709 #endif 1710 case 'V': 1711 /* 1712 * semi-verbose operation mode (no listing) 1713 */ 1714 Vflag = 1; 1715 flg |= VF; 1716 break; 1717 case 'Z': 1718 /* 1719 * use compress. Non standard option. 1720 */ 1721 gzip_program = COMPRESS_CMD; 1722 break; 1723 case '6': 1724 /* 1725 * process Version 6 cpio format 1726 */ 1727 frmt = &(fsub[F_BCPIO]); 1728 case OPT_FORCE_LOCAL: 1729 forcelocal = 1; 1730 break; 1731 case OPT_INSECURE: 1732 secure = 0; 1733 break; 1734 1735 case OPT_SPARSE: 1736 /* do nothing; we already generate sparse files */ 1737 break; 1738 default: 1739 cpio_usage(); 1740 break; 1741 } 1742 } 1743 1744 /* 1745 * figure out the operation mode of cpio. check that we have not been 1746 * given a bogus set of flags for the operation mode. 1747 */ 1748 if (ISLIST(flg)) { 1749 act = LIST; 1750 bflg = flg & BDLIST; 1751 } else if (ISEXTRACT(flg)) { 1752 act = EXTRACT; 1753 bflg = flg & BDEXTR; 1754 } else if (ISARCHIVE(flg)) { 1755 act = ARCHIVE; 1756 bflg = flg & BDARCH; 1757 } else if (ISAPPND(flg)) { 1758 act = APPND; 1759 bflg = flg & BDARCH; 1760 } else if (ISCOPY(flg)) { 1761 act = COPY; 1762 bflg = flg & BDCOPY; 1763 } else 1764 cpio_usage(); 1765 if (bflg) { 1766 cpio_usage(); 1767 } 1768 1769 /* 1770 * if we are writing (ARCHIVE) we use the default format if the user 1771 * did not specify a format. when we write during an APPEND, we will 1772 * adopt the format of the existing archive if none was supplied. 1773 */ 1774 if (!(flg & XF) && (act == ARCHIVE)) 1775 frmt = &(fsub[F_BCPIO]); 1776 1777 /* 1778 * process the args as they are interpreted by the operation mode 1779 */ 1780 switch (act) { 1781 case LIST: 1782 case EXTRACT: 1783 for (; optind < argc; optind++) 1784 if (pat_add(argv[optind], NULL, 0) < 0) 1785 cpio_usage(); 1786 break; 1787 case COPY: 1788 if (optind >= argc) { 1789 tty_warn(0, "Destination directory was not supplied"); 1790 cpio_usage(); 1791 } 1792 --argc; 1793 dirptr = argv[argc]; 1794 /* FALLTHROUGH */ 1795 case ARCHIVE: 1796 case APPND: 1797 if (argc != optind) { 1798 for (; optind < argc; optind++) 1799 if (ftree_add(argv[optind], 0) < 0) 1800 cpio_usage(); 1801 break; 1802 } 1803 /* 1804 * no read errors allowed on updates/append operation! 1805 */ 1806 maxflt = 0; 1807 while ((str = get_line(stdin)) != NULL) { 1808 ftree_add(str, 0); 1809 } 1810 if (get_line_error) { 1811 tty_warn(1, "Problem while reading stdin"); 1812 cpio_usage(); 1813 } 1814 break; 1815 default: 1816 cpio_usage(); 1817 break; 1818 } 1819 } 1820 #endif 1821 1822 /* 1823 * printflg() 1824 * print out those invalid flag sets found to the user 1825 */ 1826 1827 static void 1828 printflg(unsigned int flg) 1829 { 1830 int nxt; 1831 1832 (void)fprintf(stderr,"%s: Invalid combination of options:", argv0); 1833 while ((nxt = ffs(flg)) != 0) { 1834 flg &= ~(1 << (nxt - 1)); 1835 (void)fprintf(stderr, " -%c", flgch[nxt - 1]); 1836 } 1837 (void)putc('\n', stderr); 1838 } 1839 1840 /* 1841 * c_frmt() 1842 * comparison routine used by bsearch to find the format specified 1843 * by the user 1844 */ 1845 1846 static int 1847 c_frmt(const void *a, const void *b) 1848 { 1849 return strcmp(((const FSUB *)a)->name, ((const FSUB *)b)->name); 1850 } 1851 1852 /* 1853 * opt_next() 1854 * called by format specific options routines to get each format specific 1855 * flag and value specified with -o 1856 * Return: 1857 * pointer to next OPLIST entry or NULL (end of list). 1858 */ 1859 1860 OPLIST * 1861 opt_next(void) 1862 { 1863 OPLIST *opt; 1864 1865 if ((opt = ophead) != NULL) 1866 ophead = ophead->fow; 1867 return opt; 1868 } 1869 1870 /* 1871 * bad_opt() 1872 * generic routine used to complain about a format specific options 1873 * when the format does not support options. 1874 */ 1875 1876 int 1877 bad_opt(void) 1878 { 1879 OPLIST *opt; 1880 1881 if (ophead == NULL) 1882 return 0; 1883 /* 1884 * print all we were given 1885 */ 1886 tty_warn(1," These format options are not supported for %s", 1887 frmt->name); 1888 while ((opt = opt_next()) != NULL) 1889 (void)fprintf(stderr, "\t%s = %s\n", opt->name, opt->value); 1890 if (strcmp(NM_TAR, argv0) == 0) 1891 tar_usage(); 1892 #ifndef NO_CPIO 1893 else if (strcmp(NM_CPIO, argv0) == 0) 1894 cpio_usage(); 1895 #endif 1896 else 1897 pax_usage(); 1898 return 0; 1899 } 1900 1901 /* 1902 * opt_add() 1903 * breaks the value supplied to -o into a option name and value. options 1904 * are given to -o in the form -o name-value,name=value 1905 * multiple -o may be specified. 1906 * Return: 1907 * 0 if format in name=value format, -1 if -o is passed junk 1908 */ 1909 1910 int 1911 opt_add(const char *str) 1912 { 1913 OPLIST *opt; 1914 char *frpt; 1915 char *pt; 1916 char *endpt; 1917 char *dstr; 1918 1919 if ((str == NULL) || (*str == '\0')) { 1920 tty_warn(0, "Invalid option name"); 1921 return -1; 1922 } 1923 if ((dstr = strdup(str)) == NULL) { 1924 tty_warn(0, "Unable to allocate space for option list"); 1925 return -1; 1926 } 1927 frpt = endpt = dstr; 1928 1929 /* 1930 * break into name and values pieces and stuff each one into a 1931 * OPLIST structure. When we know the format, the format specific 1932 * option function will go through this list 1933 */ 1934 while ((frpt != NULL) && (*frpt != '\0')) { 1935 if ((endpt = strchr(frpt, ',')) != NULL) 1936 *endpt = '\0'; 1937 if ((pt = strchr(frpt, '=')) == NULL) { 1938 tty_warn(0, "Invalid options format"); 1939 free(dstr); 1940 return -1; 1941 } 1942 if ((opt = (OPLIST *)malloc(sizeof(OPLIST))) == NULL) { 1943 tty_warn(0, "Unable to allocate space for option list"); 1944 free(dstr); 1945 return -1; 1946 } 1947 *pt++ = '\0'; 1948 opt->name = frpt; 1949 opt->value = pt; 1950 opt->fow = NULL; 1951 if (endpt != NULL) 1952 frpt = endpt + 1; 1953 else 1954 frpt = NULL; 1955 if (ophead == NULL) { 1956 optail = ophead = opt; 1957 continue; 1958 } 1959 optail->fow = opt; 1960 optail = opt; 1961 } 1962 return 0; 1963 } 1964 1965 /* 1966 * str_offt() 1967 * Convert an expression of the following forms to an off_t > 0. 1968 * 1) A positive decimal number. 1969 * 2) A positive decimal number followed by a b (mult by 512). 1970 * 3) A positive decimal number followed by a k (mult by 1024). 1971 * 4) A positive decimal number followed by a m (mult by 512). 1972 * 5) A positive decimal number followed by a w (mult by sizeof int) 1973 * 6) Two or more positive decimal numbers (with/without k,b or w). 1974 * separated by x (also * for backwards compatibility), specifying 1975 * the product of the indicated values. 1976 * Return: 1977 * 0 for an error, a positive value o.w. 1978 */ 1979 1980 static off_t 1981 str_offt(char *val) 1982 { 1983 char *expr; 1984 off_t num, t; 1985 1986 num = STRTOOFFT(val, &expr, 0); 1987 if ((num == OFFT_MAX) || (num <= 0) || (expr == val)) 1988 return 0; 1989 1990 switch(*expr) { 1991 case 'b': 1992 t = num; 1993 num *= 512; 1994 if (t > num) 1995 return 0; 1996 ++expr; 1997 break; 1998 case 'k': 1999 t = num; 2000 num *= 1024; 2001 if (t > num) 2002 return 0; 2003 ++expr; 2004 break; 2005 case 'm': 2006 t = num; 2007 num *= 1048576; 2008 if (t > num) 2009 return 0; 2010 ++expr; 2011 break; 2012 case 'w': 2013 t = num; 2014 num *= sizeof(int); 2015 if (t > num) 2016 return 0; 2017 ++expr; 2018 break; 2019 } 2020 2021 switch(*expr) { 2022 case '\0': 2023 break; 2024 case '*': 2025 case 'x': 2026 t = num; 2027 num *= str_offt(expr + 1); 2028 if (t > num) 2029 return 0; 2030 break; 2031 default: 2032 return 0; 2033 } 2034 return num; 2035 } 2036 2037 char * 2038 get_line(FILE *f) 2039 { 2040 char *name, *temp; 2041 size_t len; 2042 2043 name = fgetln(f, &len); 2044 if (!name) { 2045 get_line_error = ferror(f) ? GETLINE_FILE_CORRUPT : 0; 2046 return 0; 2047 } 2048 if (name[len-1] != '\n') 2049 len++; 2050 temp = malloc(len); 2051 if (!temp) { 2052 get_line_error = GETLINE_OUT_OF_MEM; 2053 return 0; 2054 } 2055 memcpy(temp, name, len-1); 2056 temp[len-1] = 0; 2057 return temp; 2058 } 2059 2060 /* 2061 * no_op() 2062 * for those option functions where the archive format has nothing to do. 2063 * Return: 2064 * 0 2065 */ 2066 2067 static int 2068 no_op(void) 2069 { 2070 return 0; 2071 } 2072 2073 /* 2074 * pax_usage() 2075 * print the usage summary to the user 2076 */ 2077 2078 void 2079 pax_usage(void) 2080 { 2081 fprintf(stderr, 2082 "usage: pax [-0cdjnvzVO] [-E limit] [-f archive] [-N dbdir] [-s replstr] ...\n" 2083 " [-U user] ... [-G group] ... [-T [from_date][,to_date]] ...\n" 2084 " [pattern ...]\n"); 2085 fprintf(stderr, 2086 " pax -r [-cdijknuvzADOVYZ] [-E limit] [-f archive] [-N dbdir]\n" 2087 " [-o options] ... [-p string] ... [-s replstr] ... [-U user] ...\n" 2088 " [-G group] ... [-T [from_date][,to_date]] ... [pattern ...]\n"); 2089 fprintf(stderr, 2090 " pax -w [-dijtuvzAHLMOPVX] [-b blocksize] [[-a] [-f archive]] [-x format]\n" 2091 " [-B bytes] [-N dbdir] [-o options] ... [-s replstr] ...\n" 2092 " [-U user] ... [-G group] ...\n" 2093 " [-T [from_date][,to_date][/[c][m]]] ... [file ...]\n"); 2094 fprintf(stderr, 2095 " pax -r -w [-dijklntuvzADHLMOPVXYZ] [-N dbdir] [-p string] ...\n" 2096 " [-s replstr] ... [-U user] ... [-G group] ...\n" 2097 " [-T [from_date][,to_date][/[c][m]]] ... [file ...] directory\n"); 2098 exit(1); 2099 /* NOTREACHED */ 2100 } 2101 2102 /* 2103 * tar_usage() 2104 * print the usage summary to the user 2105 */ 2106 2107 void 2108 tar_usage(void) 2109 { 2110 (void)fputs("usage: tar [-]{crtux}[-befhjklmopqvwzHOPSXZ014578] [archive] " 2111 "[blocksize]\n" 2112 " [-C directory] [-T file] [-s replstr] " 2113 "[file ...]\n", stderr); 2114 exit(1); 2115 /* NOTREACHED */ 2116 } 2117 2118 #ifndef NO_CPIO 2119 /* 2120 * cpio_usage() 2121 * print the usage summary to the user 2122 */ 2123 2124 void 2125 cpio_usage(void) 2126 { 2127 2128 (void)fputs("usage: cpio -o [-aABcLvzZ] [-C bytes] [-F archive] " 2129 "[-H format] [-O archive]\n" 2130 " < name-list [> archive]\n" 2131 " cpio -i [-bBcdfmrsStuvzZ6] [-C bytes] [-E file] " 2132 "[-F archive] [-H format] \n" 2133 " [-I archive] " 2134 "[pattern ...] [< archive]\n" 2135 " cpio -p [-adlLmuv] destination-directory " 2136 "< name-list\n", stderr); 2137 exit(1); 2138 /* NOTREACHED */ 2139 } 2140 #endif 2141