path: root/src/pacman/query.c

/*
 *  query.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 <stdint.h>
#include <limits.h>
#include <string.h>
#include <sys/stat.h>
#include <unistd.h>
#include <errno.h>

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

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

static char *resolve_path(const char *file)
{
  char *str = NULL;

  str = calloc(PATH_MAX, sizeof(char));
  if(!str) {
    return NULL;
  }

  if(!realpath(file, str)) {
    free(str);
    return NULL;
  }

  return str;
}

/* check if filename exists in PATH */
static int search_path(char **filename, struct stat *bufptr)
{
  char *envpath, *envpathsplit, *path, *fullname;
  size_t flen;

  if((envpath = getenv("PATH")) == NULL) {
    return -1;
  }
  if((envpath = envpathsplit = strdup(envpath)) == NULL) {
    return -1;
  }

  flen = strlen(*filename);

  while((path = strsep(&envpathsplit, ":")) != NULL) {
    size_t plen = strlen(path);

    /* strip the trailing slash if one exists */
    while(path[plen - 1] == '/') {
        path[--plen] = '\0';
    }

    fullname = malloc(plen + flen + 2);
    if(!fullname) {
      free(envpath);
      return -1;
    }
    sprintf(fullname, "%s/%s", path, *filename);

    if(lstat(fullname, bufptr) == 0) {
      free(*filename);
      *filename = fullname;
      free(envpath);
      return 0;
    }
    free(fullname);
  }
  free(envpath);
  return -1;