path: root/src/pacman/upgrade.c

/*
 *  upgrade.c
 *
 *  Copyright (c) 2006-2011 Pacman Development Team <pacman-dev@archlinux.org>
 *  Copyright (c) 2002-2006 by Judd Vinet <jvinet@zeroflux.org>
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "config.h"

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include <alpm.h>
#include <alpm_list.h>

/* pacman */
#include "pacman.h"
#include "conf.h"
#include "util.h"

/**
 * @brief Upgrade a specified list of packages.
 *
 * @param targets a list of packages (as strings) to upgrade
 *
 * @return 0 on success, 1 on failure
 */
int pacman_upgrade(alpm_list_t *targets)
{
  alpm_list_t *i, *data = NULL;
  alpm_siglevel_t level = alpm_option_get_default_siglevel(config->handle);
  int retval = 0;

  if(targets == NULL) {
    pm_printf(ALPM_LOG_ERROR, _("no targets specified (use -h for help)\n"));
    return 1;
  }

  /* Check for URL targets and process them
   */
  for(i = targets; i; i = alpm_list_next(i)) {
    if(strstr(i->data, "://")) {
      char *str = alpm_fetch_pkgurl(config->handle, i->data);
      if(str == NULL) {
        pm_fprintf(stderr, ALPM_LOG_ERROR, "'%s': %s\n",
            (char *)i->data, alpm_strerror(alpm_errno(config->handle)));
        return 1;
      } else {
        free(i->data);
        i->data = str;
      }
    }
  }

  /* Step 1: create a new transaction */
  if(trans_init(config->flags, 1) == -1) {
    return 1;
  }

  /* add targets to the created transaction */
  for(i = targets; i; i = alpm_list_next(i)) {
    char *targ = alpm_list_getdata(i);
    alpm_pkg_t *pkg;

    if(alpm_pkg_load(config->handle, targ, 1, level, &pkg) != 0) {
      pm_fprintf(stderr, ALPM_LOG_ERROR, "'%s': %s\n",
          targ, alpm_strerror(alpm_errno(config->handle)));
      trans_release();
      return 1;
    }
    if(alpm_add_pkg(config->handle, pkg) == -1) {
      pm_fprintf(stderr, ALPM_LOG_ERROR, "'%s': %s\n",
          targ, alpm_strerror(alpm_errno(config->handle)));
      alpm_pkg_free(pkg);
      trans_release();
      return 1;
    }
  }

  /* Step 2: "compute" the transaction based on targets and flags */
  /* TODO: No, compute nothing. This is stupid. */
  if(alpm_trans_prepare(config->handle, &data) == -1) {
    enum _alpm_errno_t err = alpm_errno(config->handle);
    pm_fprintf(stderr, ALPM_LOG_ERROR, _("failed to prepare transaction (%s)\n"),
            alpm_strerror(err));
    switch(err) {
      case ALPM_ERR_PKG_INVALID_ARCH:
        for(i = data; i; i = alpm_list_next(i)) {
          char *pkg = alpm_list_getdata(i);
          printf(_(":: package %s does not have a valid architecture\n"), pkg);
        }
        break;
      case ALPM_ERR_UNSATISFIED_DEPS:
        for(i = data; i; i = alpm_list_next(i)) {
          alpm_depmissing_t *miss = alpm_list_getdata(i);
          char *depstring = alpm_dep_compute_string(miss->depend);

          /* TODO indicate if the error was a virtual package or not:
           *    :: %s: requires %s, provided by %s
           */
          printf(_(":: %s: requires %s\n"), miss->target, depstring);
          free(depstring);
        }
        break;
      case ALPM_ERR_CONFLICTING_DEPS:
        for(i = data; i; i = alpm_list_next(i)) {
          alpm_conflict_t *conflict = alpm_list_getdata(i);
          if(strcmp(conflict->package1, conflict->reason) == 0 ||
              strcmp(conflict->package2, conflict->reason) == 0) {
            printf(_(":: %s and %s are in conflict\n"),
                conflict->package1, conflict->package2);
          } else {
            printf(_(":: %s and %s are in conflict (%s)\n"),
                conflict->package1, conflict->package2, conflict->reason);
          }
        }
        break;
      default:
        break;
    }
    trans_release();
    FREELIST(data);
    return 1;
  }

  /* Step 3: perform the installation */
  alpm_list_t *packages = alpm_trans_get_add(config->handle);

  if(config->print) {
    print_packages(packages);
    trans_release();
    return 0;
  }

  /* print targets and ask user confirmation */
  if(packages == NULL) { /* we are done */
    printf(_(" there is nothing to do\n"));
    trans_release();
    return retval;
  }
  display_targets(alpm_trans_get_remove(config->handle), 0);
  display_targets(alpm_trans_get_add(config->handle), 1);
  printf("\n");
  int confirm = yesno(_("Proceed with installation?"));
  if(!confirm) {
    trans_release();
    return retval;
  }

  if(alpm_trans_commit(config->handle, &data) == -1) {
    enum _alpm_errno_t err = alpm_errno(config->handle);
    pm_fprintf(stderr, ALPM_LOG_ERROR, _("failed to commit transaction (%s)\n"),
        alpm_strerror(err));
    switch(err) {
      case ALPM_ERR_FILE_CONFLICTS:
        for(i = data; i; i = alpm_list_next(i)) {
          alpm_fileconflict_t *conflict = alpm_list_getdata(i);
          switch(conflict->type) {
            case ALPM_FILECONFLICT_TARGET:
              printf(_("%s exists in both '%s' and '%s'\n"),
                  conflict->file, conflict->target, conflict->ctarget);
              break;
            case ALPM_FILECONFLICT_FILESYSTEM:
              printf(_("%s: %s exists in filesystem\n"),
                  conflict->target, conflict->file);
              break;
          }
        }
        break;
      case ALPM_ERR_PKG_INVALID:
      case ALPM_ERR_DLT_INVALID:
        for(i = data; i; i = alpm_list_next(i)) {
          char *filename = alpm_list_getdata(i);
          printf(_("%s is invalid or corrupted\n"), filename);
        }
        break;
      default:
        break;
    }
    FREELIST(data);
    trans_release();
    return 1;
  }

  if(trans_release() == -1) {
    retval = 1;
  }
  return retval;
}

/* vim: set ts=2 sw=2 noet: */