libopkg/pkg_extract.c

   1 /* pkg_extract.c - the opkg package management system
   2
   3    Carl D. Worth
   4
   5    Copyright (C) 2001 University of Southern California
   6
   7    This program is free software; you can redistribute it and/or
   8    modify it under the terms of the GNU General Public License as
   9    published by the Free Software Foundation; either version 2, or (at
  10    your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful, but
  13    WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15    General Public License for more details.
  16 */
  17
  18 #include "includes.h"
  19 #include <errno.h>
  20
  21 #include "pkg_extract.h"
  22
  23 #include "libbb/libbb.h"
  24 #include "file_util.h"
  25 #include "sprintf_alloc.h"
  26
  27 /* assuage libb functions */
  28 const char *applet_name = "opkg";
  29
  30 int pkg_extract_control_file_to_stream(pkg_t *pkg, FILE *stream)
  31 {
  32     char *buffer = deb_extract(pkg->local_filename, stderr,
  33                                extract_control_tar_gz
  34                                | extract_one_to_buffer,
  35                                NULL, "./control");
  36     if (buffer == NULL) {
  37         return EINVAL;
  38     }
  39
  40     fputs(buffer, stream);
  41     free(buffer);
  42
  43     return 0;
  44 }
  45
  46 int pkg_extract_control_files_to_dir(pkg_t *pkg, const char *dir)
  47 {
  48     return pkg_extract_control_files_to_dir_with_prefix(pkg, dir, "");
  49 }
  50
  51 int pkg_extract_control_files_to_dir_with_prefix(pkg_t *pkg,
  52                                                  const char *dir,
  53                                                  const char *prefix)
  54 {
  55     char *dir_with_prefix;
  56     char *buffer = NULL;
  57
  58     sprintf_alloc(&dir_with_prefix, "%s/%s", dir, prefix);
  59
  60     buffer = deb_extract(pkg->local_filename, stderr,
  61                 extract_control_tar_gz
  62                 | extract_all_to_fs| extract_preserve_date
  63                 | extract_unconditional,
  64                 dir_with_prefix, NULL);
  65
  66     free(dir_with_prefix);
  67
  68     /* BUG: How do we know if deb_extract worked or not? This is a
  69        defect in the current deb_extract from what I can tell. */
  70
  71     if (buffer) {
  72         free(buffer);
  73     }
  74     return 0;
  75 }
  76
  77 int pkg_extract_data_files_to_dir(pkg_t *pkg, const char *dir)
  78 {
  79     char *buffer = NULL;
  80     buffer = deb_extract(pkg->local_filename, stderr,
  81                 extract_data_tar_gz
  82                 | extract_all_to_fs| extract_preserve_date
  83                 | extract_unconditional,
  84                 dir, NULL);
  85
  86     /* BUG: How do we know if deb_extract worked or not? This is a
  87        defect in the current deb_extract from what I can tell. */
  88
  89     if (buffer) {
  90         free(buffer);
  91     }
  92     return 0;
  93 }
  94
  95 int pkg_extract_data_file_names_to_file(pkg_t *pkg, const char *file_name)
  96 {
  97      int err=0;
  98      char *line, *data_file;
  99      FILE *file;
 100      FILE *tmp;
 101
 102      file = fopen(file_name, "w");
 103      if (file == NULL) {
 104           fprintf(stderr, "%s: ERROR: Failed to open %s for writing.\n",
 105                   __FUNCTION__, file_name);
 106           return EINVAL;
 107      }
 108
 109      tmp = tmpfile();
 110      if (pkg->installed_files) {
 111           str_list_elt_t *elt;
 112           for (elt = str_list_first(pkg->installed_files); elt; elt = str_list_next(pkg->installed_files, elt)) {
 113                fprintf(file, "%s\n", (char *)elt->data);
 114           }
 115      } else {
 116           err = pkg_extract_data_file_names_to_stream(pkg, tmp);
 117           if (err) {
 118                fclose(file);
 119                fclose(tmp);
 120                return err;
 121           }
 122
 123           /* Fixup data file names by removing the initial '.' */
 124           rewind(tmp);
 125           while (1) {
 126                line = file_read_line_alloc(tmp);
 127                if (line == NULL) {
 128                     break;
 129                }
 130
 131                data_file = line;
 132                if (*data_file == '.') {
 133                     data_file++;
 134                }
 135
 136                if (*data_file != '/') {
 137                     fputs("/", file);
 138                }
 139
 140                /* I have no idea why, but this is what dpkg does */
 141                if (strcmp(data_file, "/\n") == 0) {
 142                     fputs("/.\n", file);
 143                } else {
 144                     fputs(data_file, file);
 145                }
 146                free(line);
 147                line=NULL;
 148           }
 149      }
 150      fclose(tmp);
 151      fclose(file);
 152
 153      return err;
 154 }
 155
 156 int pkg_extract_data_file_names_to_stream(pkg_t *pkg, FILE *file)
 157 {
 158     char *buffer = NULL;
 159     /* XXX: DPKG_INCOMPATIBILITY: deb_extract will extract all of the
 160        data file names with a '.' as the first character. I've taught
 161        opkg how to cope with the presence or absence of the '.', but
 162        this may trip up dpkg.
 163
 164        For all I know, this could actually be a bug in opkg-build. So,
 165        I'll have to try installing some .debs and comparing the *.list
 166        files.
 167
 168        If we wanted to, we could workaround the deb_extract behavior
 169        right here, by writing to a tmpfile, then munging things as we
 170        wrote to the actual stream. */
 171     buffer = deb_extract(pkg->local_filename, file,
 172                  extract_quiet | extract_data_tar_gz | extract_list,
 173                  NULL, NULL);
 174
 175     /* BUG: How do we know if deb_extract worked or not? This is a
 176        defect in the current deb_extract from what I can tell. */
 177     if (buffer) {
 178         free(buffer);
 179     }
 180     return 0;
 181 }