archival/libarchive/open_transformer.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
   4  */
   5
   6 #include "libbb.h"
   7 #include "bb_archive.h"
   8
   9 void FAST_FUNC init_transformer_aux_data(transformer_aux_data_t *aux)
  10 {
  11         memset(aux, 0, sizeof(*aux));
  12 }
  13
  14 int FAST_FUNC check_signature16(transformer_aux_data_t *aux, int src_fd, unsigned magic16)
  15 {
  16         if (aux && aux->check_signature) {
  17                 uint16_t magic2;
  18                 if (full_read(src_fd, &magic2, 2) != 2 || magic2 != magic16) {
  19                         bb_error_msg("invalid magic");
  20 #if 0 /* possible future extension */
  21                         if (aux->check_signature > 1)
  22                                 xfunc_die();
  23 #endif
  24                         return -1;
  25                 }
  26         }
  27         return 0;
  28 }
  29
  30 void check_errors_in_children(int signo)
  31 {
  32         int status;
  33
  34         if (!signo) {
  35                 /* block waiting for any child */
  36                 if (wait(&status) < 0)
  37 //FIXME: check EINTR?
  38                         return; /* probably there are no children */
  39                 goto check_status;
  40         }
  41
  42         /* Wait for any child without blocking */
  43         for (;;) {
  44                 if (wait_any_nohang(&status) < 0)
  45 //FIXME: check EINTR?
  46                         /* wait failed?! I'm confused... */
  47                         return;
  48  check_status:
  49                 /*if (WIFEXITED(status) && WEXITSTATUS(status) == 0)*/
  50                 /* On Linux, the above can be checked simply as: */
  51                 if (status == 0)
  52                         /* this child exited with 0 */
  53                         continue;
  54                 /* Cannot happen:
  55                 if (!WIFSIGNALED(status) && !WIFEXITED(status)) ???;
  56                  */
  57                 bb_got_signal = 1;
  58         }
  59 }
  60
  61 /* transformer(), more than meets the eye */
  62 #if BB_MMU
  63 void FAST_FUNC open_transformer(int fd,
  64         int check_signature,
  65         IF_DESKTOP(long long) int FAST_FUNC (*transformer)(transformer_aux_data_t *aux, int src_fd, int dst_fd)
  66 )
  67 #else
  68 void FAST_FUNC open_transformer(int fd, const char *transform_prog)
  69 #endif
  70 {
  71         struct fd_pair fd_pipe;
  72         int pid;
  73
  74         xpiped_pair(fd_pipe);
  75         pid = BB_MMU ? xfork() : xvfork();
  76         if (pid == 0) {
  77                 /* Child */
  78                 close(fd_pipe.rd); /* we don't want to read from the parent */
  79                 // FIXME: error check?
  80 #if BB_MMU
  81                 {
  82                         transformer_aux_data_t aux;
  83                         init_transformer_aux_data(&aux);
  84                         aux.check_signature = check_signature;
  85                         transformer(&aux, fd, fd_pipe.wr);
  86                         if (ENABLE_FEATURE_CLEAN_UP) {
  87                                 close(fd_pipe.wr); /* send EOF */
  88                                 close(fd);
  89                         }
  90                         /* must be _exit! bug was actually seen here */
  91                         _exit(EXIT_SUCCESS);
  92                 }
  93 #else
  94                 {
  95                         char *argv[4];
  96                         xmove_fd(fd, 0);
  97                         xmove_fd(fd_pipe.wr, 1);
  98                         argv[0] = (char*)transform_prog;
  99                         argv[1] = (char*)"-cf";
 100                         argv[2] = (char*)"-";
 101                         argv[3] = NULL;
 102                         BB_EXECVP(transform_prog, argv);
 103                         bb_perror_msg_and_die("can't execute '%s'", transform_prog);
 104                 }
 105 #endif
 106                 /* notreached */
 107         }
 108
 109         /* parent process */
 110         close(fd_pipe.wr); /* don't want to write to the child */
 111         xmove_fd(fd_pipe.rd, fd);
 112 }
 113
 114
 115 #if SEAMLESS_COMPRESSION
 116
 117 /* Used by e.g. rpm which gives us a fd without filename,
 118  * thus we can't guess the format from filename's extension.
 119  */
 120 int FAST_FUNC setup_unzip_on_fd(int fd, int fail_if_not_detected)
 121 {
 122         union {
 123                 uint8_t b[4];
 124                 uint16_t b16[2];
 125                 uint32_t b32[1];
 126         } magic;
 127         int offset = -2;
 128         USE_FOR_MMU(IF_DESKTOP(long long) int FAST_FUNC (*xformer)(transformer_aux_data_t *aux, int src_fd, int dst_fd);)
 129         USE_FOR_NOMMU(const char *xformer_prog;)
 130
 131         /* .gz and .bz2 both have 2-byte signature, and their
 132          * unpack_XXX_stream wants this header skipped. */
 133         xread(fd, magic.b16, sizeof(magic.b16[0]));
 134         if (ENABLE_FEATURE_SEAMLESS_GZ
 135          && magic.b16[0] == GZIP_MAGIC
 136         ) {
 137                 USE_FOR_MMU(xformer = unpack_gz_stream;)
 138                 USE_FOR_NOMMU(xformer_prog = "gunzip";)
 139                 goto found_magic;
 140         }
 141         if (ENABLE_FEATURE_SEAMLESS_BZ2
 142          && magic.b16[0] == BZIP2_MAGIC
 143         ) {
 144                 USE_FOR_MMU(xformer = unpack_bz2_stream;)
 145                 USE_FOR_NOMMU(xformer_prog = "bunzip2";)
 146                 goto found_magic;
 147         }
 148         if (ENABLE_FEATURE_SEAMLESS_XZ
 149          && magic.b16[0] == XZ_MAGIC1
 150         ) {
 151                 offset = -6;
 152                 xread(fd, magic.b32, sizeof(magic.b32[0]));
 153                 if (magic.b32[0] == XZ_MAGIC2) {
 154                         USE_FOR_MMU(xformer = unpack_xz_stream;)
 155                         USE_FOR_NOMMU(xformer_prog = "unxz";)
 156                         goto found_magic;
 157                 }
 158         }
 159
 160         /* No known magic seen */
 161         if (fail_if_not_detected)
 162                 bb_error_msg_and_die("no gzip"
 163                         IF_FEATURE_SEAMLESS_BZ2("/bzip2")
 164                         IF_FEATURE_SEAMLESS_XZ("/xz")
 165                         " magic");
 166         xlseek(fd, offset, SEEK_CUR);
 167         return 1;
 168
 169  found_magic:
 170 # if BB_MMU
 171         open_transformer_with_no_sig(fd, xformer);
 172 # else
 173         /* NOMMU version of open_transformer execs
 174          * an external unzipper that wants
 175          * file position at the start of the file */
 176         xlseek(fd, offset, SEEK_CUR);
 177         open_transformer_with_sig(fd, xformer, xformer_prog);
 178 # endif
 179         return 0;
 180 }
 181
 182 int FAST_FUNC open_zipped(const char *fname)
 183 {
 184         char *sfx;
 185         int fd;
 186
 187         fd = open(fname, O_RDONLY);
 188         if (fd < 0)
 189                 return fd;
 190
 191         sfx = strrchr(fname, '.');
 192         if (sfx) {
 193                 sfx++;
 194                 if (ENABLE_FEATURE_SEAMLESS_LZMA && strcmp(sfx, "lzma") == 0)
 195                         /* .lzma has no header/signature, just trust it */
 196                         open_transformer_with_sig(fd, unpack_lzma_stream, "unlzma");
 197                 else
 198                 if ((ENABLE_FEATURE_SEAMLESS_GZ && strcmp(sfx, "gz") == 0)
 199                  || (ENABLE_FEATURE_SEAMLESS_BZ2 && strcmp(sfx, "bz2") == 0)
 200                  || (ENABLE_FEATURE_SEAMLESS_XZ && strcmp(sfx, "xz") == 0)
 201                 ) {
 202                         setup_unzip_on_fd(fd, /*fail_if_not_detected:*/ 1);
 203                 }
 204         }
 205
 206         return fd;
 207 }
 208
 209 #endif /* SEAMLESS_COMPRESSION */
 210
 211 void* FAST_FUNC xmalloc_open_zipped_read_close(const char *fname, size_t *maxsz_p)
 212 {
 213         int fd;
 214         char *image;
 215
 216         fd = open_zipped(fname);
 217         if (fd < 0)
 218                 return NULL;
 219
 220         image = xmalloc_read(fd, maxsz_p);
 221         if (!image)
 222                 bb_perror_msg("read error from '%s'", fname);
 223         close(fd);
 224
 225         return image;
 226 }