src/util/testdb.c

   1 /*
   2  *  testdb.c : Test a pacman local database for validity
   3  *
   4  *  Copyright (c) 2007 by Aaron Griffin <aaronmgriffin@gmail.com>
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include "config.h"
  21
  22 #include <unistd.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <errno.h>
  26 #include <string.h>
  27 #include <dirent.h>
  28
  29 #include <alpm.h>
  30 #include <alpm_list.h>
  31
  32 #define BASENAME "testdb"
  33
  34 alpm_handle_t *handle = NULL;
  35
  36 static void cleanup(int signum) {
  37         if(handle && alpm_release(handle) == -1) {
  38                 fprintf(stderr, "error releasing alpm\n");
  39         }
  40
  41         exit(signum);
  42 }
  43
  44 static void output_cb(pmloglevel_t level, const char *fmt, va_list args)
  45 {
  46         if(strlen(fmt)) {
  47                 switch(level) {
  48                         case PM_LOG_ERROR: printf("error: "); break;
  49                         case PM_LOG_WARNING: printf("warning: "); break;
  50                         default: return;
  51                 }
  52                 vprintf(fmt, args);
  53         }
  54 }
  55
  56 static int check_localdb_files(void)
  57 {
  58         struct dirent *ent;
  59         const char *dbpath;
  60         char path[4096];
  61         int ret = 0;
  62         DIR *dir;
  63
  64         dbpath = alpm_option_get_dbpath(handle);
  65         snprintf(path, sizeof(path), "%slocal", dbpath);
  66         if(!(dir = opendir(path))) {
  67                 fprintf(stderr, "error : %s : %s\n", path, strerror(errno));
  68                 return 1;
  69         }
  70
  71         while((ent = readdir(dir)) != NULL) {
  72                 if(strcmp(ent->d_name, ".") == 0 || strcmp(ent->d_name, "..") == 0
  73                                 || ent->d_name[0] == '.') {
  74                         continue;
  75                 }
  76                 /* check for known db files in local database */
  77                 snprintf(path, sizeof(path), "%slocal/%s/desc", dbpath, ent->d_name);
  78                 if(access(path, F_OK)) {
  79                         printf("%s: description file is missing\n", ent->d_name);
  80                         ret++;
  81                 }
  82                 snprintf(path, sizeof(path), "%slocal/%s/files", dbpath, ent->d_name);
  83                 if(access(path, F_OK)) {
  84                         printf("%s: file list is missing\n", ent->d_name);
  85                         ret++;
  86                 }
  87         }
  88         if(closedir(dir)) {
  89                 fprintf(stderr, "error closing dbpath : %s\n", strerror(errno));
  90                 return 1;
  91         }
  92
  93         return ret;
  94 }
  95
  96 static int checkdeps(alpm_list_t *pkglist)
  97 {
  98         alpm_list_t *data, *i;
  99         int ret = 0;
 100         /* check dependencies */
 101         data = alpm_checkdeps(handle, pkglist, NULL, pkglist, 0);
 102         for(i = data; i; i = alpm_list_next(i)) {
 103                 pmdepmissing_t *miss = alpm_list_getdata(i);
 104                 char *depstring = alpm_dep_compute_string(miss->depend);
 105                 printf("missing dependency for %s : %s\n", miss->target,
 106                                 depstring);
 107                 free(depstring);
 108                 ret++;
 109         }
 110         FREELIST(data);
 111         return ret;
 112 }
 113
 114 static int checkconflicts(alpm_list_t *pkglist)
 115 {
 116         alpm_list_t *data, *i;
 117         int ret = 0;
 118         /* check conflicts */
 119         data = alpm_checkconflicts(handle, pkglist);
 120         for(i = data; i; i = i->next) {
 121                 pmconflict_t *conflict = alpm_list_getdata(i);
 122                 printf("%s conflicts with %s\n",
 123                                 conflict->package1, conflict->package2);
 124                 ret++;
 125         }
 126         FREELIST(data);
 127         return ret;
 128 }
 129
 130 static int check_localdb(void) {
 131         int ret = 0;
 132         alpm_db_t *db = NULL;
 133         alpm_list_t *pkglist;
 134
 135         ret = check_localdb_files();
 136         if(ret) {
 137                 return ret;
 138         }
 139
 140         db = alpm_option_get_localdb(handle);
 141         pkglist = alpm_db_get_pkgcache(db);
 142         ret += checkdeps(pkglist);
 143         ret += checkconflicts(pkglist);
 144         return ret;
 145 }
 146
 147 static int check_syncdbs(alpm_list_t *dbnames) {
 148         int ret = 0;
 149         alpm_db_t *db = NULL;
 150         alpm_list_t *i, *pkglist, *syncpkglist = NULL;
 151
 152         for(i = dbnames; i; i = alpm_list_next(i)) {
 153                 char *dbname = alpm_list_getdata(i);
 154                 db = alpm_db_register_sync(handle, dbname, PM_PGP_VERIFY_OPTIONAL);
 155                 if(db == NULL) {
 156                         fprintf(stderr, "error: could not register sync database (%s)\n",
 157                                         alpm_strerror(alpm_errno(handle)));
 158                         ret = 1;
 159                         goto cleanup;
 160                 }
 161                 pkglist = alpm_db_get_pkgcache(db);
 162                 syncpkglist = alpm_list_join(syncpkglist, alpm_list_copy(pkglist));
 163         }
 164         ret += checkdeps(syncpkglist);
 165
 166 cleanup:
 167         alpm_list_free(syncpkglist);
 168         return ret;
 169 }
 170
 171 static void usage(void) {
 172         fprintf(stderr, "usage:\n");
 173         fprintf(stderr,
 174                         "\t%s [-b <pacman db>]                : check the local database\n", BASENAME);
 175         fprintf(stderr,
 176                         "\t%s [-b <pacman db>] core extra ... : check the listed sync databases\n", BASENAME);
 177         exit(1);
 178 }
 179
 180 int main(int argc, char *argv[])
 181 {
 182         int ret = 0;
 183         enum _pmerrno_t err;
 184         const char *dbpath = DBPATH;
 185         int a = 1;
 186         alpm_list_t *dbnames = NULL;
 187
 188         while(a < argc) {
 189                 if(strcmp(argv[a], "-b") == 0) {
 190                         if(++a < argc) {
 191                                 dbpath = argv[a];
 192                         } else {
 193                                 usage();
 194                         }
 195                 }       else if(strcmp(argv[a], "-h") == 0 ||
 196                                 strcmp(argv[a], "--help") == 0 ) {
 197                         usage();
 198                 } else {
 199                         dbnames = alpm_list_add(dbnames, argv[a]);
 200                 }
 201                 a++;
 202         }
 203
 204         handle = alpm_initialize(ROOTDIR, dbpath, &err);
 205         if(!handle) {
 206                 fprintf(stderr, "cannot initialize alpm: %s\n", alpm_strerror(err));
 207                 return EXIT_FAILURE;
 208         }
 209
 210         /* let us get log messages from libalpm */
 211         alpm_option_set_logcb(handle, output_cb);
 212
 213         if(!dbnames) {
 214                 ret = check_localdb();
 215         } else {
 216                 ret = check_syncdbs(dbnames);
 217                 alpm_list_free(dbnames);
 218         }
 219
 220         cleanup(ret);
 221 }
 222
 223 /* vim: set ts=2 sw=2 noet: */