From a2d558151a6308870a30a83bcd1975a80168a515 Mon Sep 17 00:00:00 2001 From: Rob Landley Date: Tue, 25 Mar 2014 07:35:56 -0500 Subject: Promote cpio out of pending. After some waffling I put it in "posix", even though it was last specified in susv2 (where it was the obsolete 6 byte header entries predating susv4). LSB specifies it, including the 8 byte header fields, but for the actual command it just references SUSv2. (LSB isn't so much a standard as Red Hat's "notes to self".) --- toys/pending/cpio.c | 213 ---------------------------------------------------- 1 file changed, 213 deletions(-) delete mode 100644 toys/pending/cpio.c (limited to 'toys/pending') diff --git a/toys/pending/cpio.c b/toys/pending/cpio.c deleted file mode 100644 index 18877c1f..00000000 --- a/toys/pending/cpio.c +++ /dev/null @@ -1,213 +0,0 @@ -/* cpio.c - a basic cpio - * - * Written 2013 AD by Isaac Dunham; this code is placed under the - * same license as toybox or as CC0, at your option. - * - * http://refspecs.linuxfoundation.org/LSB_4.1.0/LSB-Core-generic/LSB-Core-generic/cpio.html - * and http://pubs.opengroup.org/onlinepubs/7908799/xcu/cpio.html - * - * Yes, that's SUSv2, the newer standards removed it around the time RPM - * and initramfs started heavily using this archive format. - * - * Modern cpio expanded header to 110 bytes (first field 6 bytes, rest are 8). - * In order: magic ino mode uid gid nlink mtime filesize devmajor devminor - * rdevmajor rdevminor namesize check - -USE_CPIO(NEWTOY(cpio, "duH:i|t|F:o|v(verbose)[!io][!ot]", TOYFLAG_BIN)) - -config CPIO - bool "cpio" - default n - help - usage: cpio -{o|t|i} [-v] [--verbose] [-F FILE] [ignored: -du -H newc] - - copy files into and out of a "newc" format cpio archive - - -F FILE use archive FILE instead of stdin/stdout - -i extract from archive into file system (stdin=archive) - -o create archive (stdin=list of files, stdout=archive) - -t test files (list only, stdin=archive, stdout=list of files) - -v verbose (list files during create/extract) -*/ - -#define FOR_cpio -#include "toys.h" - -GLOBALS( - char *archive; - char *fmt; -) - -// Read strings, tail padded to 4 byte alignment. Argument "align" is amount -// by which start of string isn't aligned (usually 0). -static char *strpad(int fd, unsigned len, unsigned align) -{ - char *str; - - align = (align + len) & 3; - if (align) len += (4-align); - - xreadall(fd, str = xmalloc(len+1), len); - str[len]=0; // redundant, in case archive is bad - - return str; -} - -//convert hex to uint; mostly to allow using bits of non-terminated strings -unsigned x8u(char *hex) -{ - unsigned val, inpos = 8, outpos; - char pattern[6]; - - while (*hex == '0') { - hex++; - if (!--inpos) return 0; - } - // Because scanf gratuitously treats %*X differently than printf does. - sprintf(pattern, "%%%dX%%n", inpos); - sscanf(hex, pattern, &val, &outpos); - if (inpos != outpos) error_exit("bad header"); - - return val; -} - -void cpio_main(void) -{ - int afd; - - // Subtle bit: FLAG_o is 1 so we can just use it to select stdin/stdout. - - afd = toys.optflags & FLAG_o; - if (TT.archive) { - int perm = (toys.optflags & FLAG_o) ? O_CREAT|O_WRONLY|O_TRUNC : O_RDONLY; - - afd = xcreate(TT.archive, perm, 0644); - } - - // read cpio archive - - if (toys.optflags & (FLAG_i|FLAG_t)) for (;;) { - char *name, *tofree, *data; - unsigned size, mode; - int test = toys.optflags & FLAG_t, err = 0; - - // Read header and name. - xreadall(afd, toybuf, 110); - tofree = name = strpad(afd, x8u(toybuf+94), 110); - if (!strcmp("TRAILER!!!", name)) break; - - // If you want to extract absolute paths, "cd /" and run cpio. - while (*name == '/') name++; - - // Align to 4 bytes. Note header is 110 bytes which is 2 bytes over. - - size = x8u(toybuf+54); - mode = x8u(toybuf+14); - - if (toys.optflags & (FLAG_t|FLAG_v)) puts(name); - - if (!test && strrchr(name, '/') && mkpathat(AT_FDCWD, name, 0, 2)) { - perror_msg("mkpath '%s'", name); - test++; - } - - // Consume entire record even if it couldn't create file, so we're - // properly aligned with next file. - - if (S_ISDIR(mode)) { - if (!test) err = mkdir(name, mode); - } else if (S_ISLNK(mode)) { - data = strpad(afd, size, 0); - if (!test) err = symlink(data, name); - } else if (S_ISREG(mode)) { - int fd; - - // If write fails, we still need to read/discard data to continue with - // archive. Since doing so overwrites errno, report error now - fd = test ? 0 : open(name, O_CREAT|O_WRONLY|O_TRUNC|O_NOFOLLOW, mode); - if (fd < 0) { - perror_msg("create %s", name); - test++; - } - - data = toybuf; - while (size) { - if (size < sizeof(toybuf)) data = strpad(afd, size, 0); - else xreadall(afd, toybuf, sizeof(toybuf)); - if (!test) xwrite(fd, data, data == toybuf ? sizeof(toybuf) : size); - if (data != toybuf) { - free(data); - break; - } - size -= sizeof(toybuf); - } - close(fd); - } else if (!test) - err = mknod(name, mode, makedev(x8u(toybuf+62), x8u(toybuf+70))); - - if (err<0) perror_msg("create '%s'", name); - free(tofree); - - // Output cpio archive - - } else { - char *name = 0; - size_t size = 0; - - for (;;) { - struct stat st; - unsigned nlen = strlen(name)+1, error = 0, zero = 0; - int len, fd = -1; - ssize_t llen; - - len = getline(&name, &size, stdin); - if (len<1) break; - if (name[len-1] == '\n') name[--len] = 0; - if (lstat(name, &st) - || (S_ISREG(st.st_mode) && (fd = open(name, O_RDONLY))<0)) - { - perror_msg("%s", name); - continue; - } - - if (!S_ISREG(st.st_mode) && !S_ISLNK(st.st_mode)) st.st_size = 0; - if (st.st_size >> 32) perror_msg("skipping >2G file '%s'", name); - else { - llen = sprintf(toybuf, - "070701%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X", - (int)st.st_ino, st.st_mode, st.st_uid, st.st_gid, (int)st.st_nlink, - (int)st.st_mtime, (int)st.st_size, major(st.st_dev), - minor(st.st_dev), major(st.st_rdev), minor(st.st_rdev), nlen, 0); - xwrite(afd, toybuf, llen); - xwrite(afd, name, nlen); - - // NUL Pad header up to 4 multiple bytes. - llen = (llen + nlen) & 3; - if (llen) xwrite(afd, &zero, 4-llen); - - // Write out body for symlink or regular file - llen = st.st_size; - if (S_ISLNK(st.st_mode)) { - if (readlink(name, toybuf, sizeof(toybuf)-1) == llen) - xwrite(afd, toybuf, llen); - else perror_msg("readlink '%s'", name); - } else while (llen) { - nlen = llen > sizeof(toybuf) ? sizeof(toybuf) : llen; - llen -= nlen; - // If read fails, write anyway (already wrote size in header) - if (nlen != readall(fd, toybuf, nlen)) - if (!error++) perror_msg("bad read from file '%s'", name); - xwrite(afd, toybuf, nlen); - } - llen = st.st_size & 3; - if (llen) write(afd, &zero, 4-llen); - } - close(fd); - } - free(name); - - xwrite(afd, toybuf, - sprintf(toybuf, "070701%040X%056X%08XTRAILER!!!%c%c%c", - 1, 0x0b, 0, 0, 0, 0)); - } -} -- cgit v1.2.3