1 /* opkg_remove.c - the opkg package management system
5 Copyright (C) 2001 University of Southern California
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.
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.
19 #include "opkg_message.h"
23 #include "opkg_remove.h"
26 #include "file_util.h"
27 #include "sprintf_alloc.h"
28 #include "libbb/libbb.h"
31 * Returns number of the number of packages depending on the packages provided by this package.
32 * Every package implicitly provides itself.
35 pkg_has_installed_dependents(pkg_t *pkg, abstract_pkg_t *** pdependents)
37 int nprovides = pkg->provides_count;
38 abstract_pkg_t **provides = pkg->provides;
39 unsigned int n_installed_dependents = 0;
41 for (i = 0; i < nprovides; i++) {
42 abstract_pkg_t *providee = provides[i];
43 abstract_pkg_t **dependers = providee->depended_upon_by;
44 abstract_pkg_t *dep_ab_pkg;
45 if (dependers == NULL)
47 while ((dep_ab_pkg = *dependers++) != NULL) {
48 if (dep_ab_pkg->state_status == SS_INSTALLED){
49 n_installed_dependents++;
54 /* if caller requested the set of installed dependents */
57 abstract_pkg_t **dependents = xcalloc((n_installed_dependents+1), sizeof(abstract_pkg_t *));
59 *pdependents = dependents;
60 for (i = 0; i < nprovides; i++) {
61 abstract_pkg_t *providee = provides[i];
62 abstract_pkg_t **dependers = providee->depended_upon_by;
63 abstract_pkg_t *dep_ab_pkg;
64 if (dependers == NULL)
66 while ((dep_ab_pkg = *dependers++) != NULL) {
67 if (dep_ab_pkg->state_status == SS_INSTALLED && !(dep_ab_pkg->state_flag & SF_MARKED)) {
68 dependents[p++] = dep_ab_pkg;
69 dep_ab_pkg->state_flag |= SF_MARKED;
74 /* now clear the marks */
75 for (i = 0; i < p; i++) {
76 abstract_pkg_t *dep_ab_pkg = dependents[i];
77 dep_ab_pkg->state_flag &= ~SF_MARKED;
80 return n_installed_dependents;
84 opkg_remove_dependent_pkgs(pkg_t *pkg, abstract_pkg_t **dependents)
89 pkg_vec_t *dependent_pkgs;
90 abstract_pkg_t * ab_pkg;
92 if((ab_pkg = pkg->parent) == NULL){
93 opkg_msg(ERROR, "Internal error: pkg %s isn't in hash table\n",
98 if (dependents == NULL)
101 // here i am using the dependencies_checked
102 if (ab_pkg->dependencies_checked == 2) // variable to make out whether this package
103 return 0; // has already been encountered in the process
104 // of marking packages for removal - Karthik
105 ab_pkg->dependencies_checked = 2;
109 dependent_pkgs = pkg_vec_alloc();
111 while (dependents [i] != NULL) {
112 abstract_pkg_t *dep_ab_pkg = dependents[i];
114 if (dep_ab_pkg->dependencies_checked == 2){
118 if (dep_ab_pkg->state_status == SS_INSTALLED) {
119 for (a = 0; a < dep_ab_pkg->pkgs->len; a++) {
120 pkg_t *dep_pkg = dep_ab_pkg->pkgs->pkgs[a];
121 if (dep_pkg->state_status == SS_INSTALLED) {
122 pkg_vec_insert(dependent_pkgs, dep_pkg);
128 /* 1 - to keep track of visited ab_pkgs when checking for possiblility of a broken removal of pkgs.
129 * 2 - to keep track of pkgs whose deps have been checked alrdy - Karthik */
133 pkg_vec_free(dependent_pkgs);
139 for (i = 0; i < dependent_pkgs->len; i++) {
140 err = opkg_remove_pkg(dependent_pkgs->pkgs[i],0);
142 pkg_vec_free(dependent_pkgs);
146 pkg_vec_free(dependent_pkgs);
151 print_dependents_warning(pkg_t *pkg, abstract_pkg_t **dependents)
153 abstract_pkg_t *dep_ab_pkg;
154 opkg_msg(ERROR, "Package %s is depended upon by packages:\n", pkg->name);
155 while ((dep_ab_pkg = *dependents++) != NULL) {
156 if (dep_ab_pkg->state_status == SS_INSTALLED)
157 opkg_msg(ERROR, "\t%s\n", dep_ab_pkg->name);
159 opkg_msg(ERROR, "These might cease to work if package %s is removed.\n\n",
161 opkg_msg(ERROR, "Force removal of this package with --force-depends.\n");
162 opkg_msg(ERROR, "Force removal of this package and its dependents\n");
163 opkg_msg(ERROR, "with --force-removal-of-dependent-packages.\n");
167 * Find and remove packages that were autoinstalled and are orphaned
168 * by the removal of pkg.
171 remove_autoinstalled(pkg_t *pkg)
176 struct compound_depend *cdep;
177 abstract_pkg_t **dependents;
179 int count = pkg->pre_depends_count +
181 pkg->recommends_count +
184 for (i=0; i<count; i++) {
185 cdep = &pkg->depends[i];
186 if (cdep->type != DEPEND)
188 for (j=0; j<cdep->possibility_count; j++) {
189 p = pkg_hash_fetch_installed_by_name(
190 cdep->possibilities[j]->pkg->name);
192 /* If the package is not installed, this could have
193 * been a circular dependency and the package has
194 * already been removed.
199 if (!p->auto_installed)
202 n_deps = pkg_has_installed_dependents(p, &dependents);
204 opkg_msg(NOTICE, "%s was autoinstalled and is "
205 "now orphaned, removing.\n",
207 opkg_remove_pkg(p, 0);
209 opkg_msg(INFO, "%s was autoinstalled and is "
210 "still required by %d "
211 "installed packages.\n",
223 opkg_remove_pkg(pkg_t *pkg, int from_upgrade)
226 abstract_pkg_t *parent_pkg = NULL;
229 * If called from an upgrade and not from a normal remove,
230 * ignore the essential flag.
232 if (pkg->essential && !from_upgrade) {
233 if (conf->force_removal_of_essential_packages) {
235 "Removing essential package %s under your coercion.\n"
236 "\tIf your system breaks, you get to keep both pieces\n",
239 opkg_msg(NOTICE, "Refusing to remove essential package %s.\n"
240 "\tRemoving an essential package may lead to an unusable system, but if\n"
241 "\tyou enjoy that kind of pain, you can force opkg to proceed against\n"
242 "\tits will with the option: --force-removal-of-essential-packages\n",
248 if ((parent_pkg = pkg->parent) == NULL)
251 /* only attempt to remove dependent installed packages if
252 * force_depends is not specified or the package is being
255 if (!conf->force_depends
256 && !(pkg->state_flag & SF_REPLACE)) {
257 abstract_pkg_t **dependents;
258 int has_installed_dependents =
259 pkg_has_installed_dependents(pkg, &dependents);
261 if (has_installed_dependents) {
263 * if this package is depended upon by others, then either we should
264 * not remove it or we should remove it and all of its dependents
267 if (!conf->force_removal_of_dependent_packages) {
268 print_dependents_warning(pkg, dependents);
273 /* remove packages depending on this package - Karthik */
274 err = opkg_remove_dependent_pkgs(pkg, dependents);
284 if (from_upgrade == 0) {
285 opkg_msg(NOTICE, "Removing package %s from %s...\n",
286 pkg->name, pkg->dest->name);
288 pkg->state_flag |= SF_FILELIST_CHANGED;
290 pkg->state_want = SW_DEINSTALL;
291 opkg_state_changed++;
293 pkg_run_script(pkg, "prerm", "remove");
295 /* DPKG_INCOMPATIBILITY: dpkg is slightly different here. It
296 maintains an empty filelist rather than deleting it. That seems
297 like a big pain, and I don't see that that should make a big
298 difference, but for anyone who wants tighter compatibility,
299 feel free to fix this. */
300 remove_data_files_and_list(pkg);
302 pkg_run_script(pkg, "postrm", "remove");
304 remove_maintainer_scripts(pkg);
305 pkg->state_status = SS_NOT_INSTALLED;
308 parent_pkg->state_status = SS_NOT_INSTALLED;
310 /* remove autoinstalled packages that are orphaned by the removal of this one */
311 if (conf->autoremove)
312 remove_autoinstalled(pkg);
318 remove_data_files_and_list(pkg_t *pkg)
320 str_list_t installed_dirs;
321 str_list_t *installed_files;
322 str_list_elt_t *iter;
324 conffile_t *conffile;
329 installed_files = pkg_get_installed_files(pkg);
330 if (installed_files == NULL) {
331 opkg_msg(ERROR, "Failed to determine installed "
332 "files for %s. None removed.\n", pkg->name);
336 str_list_init(&installed_dirs);
338 /* don't include trailing slash */
339 if (conf->offline_root)
340 rootdirlen = strlen(conf->offline_root);
342 for (iter = str_list_first(installed_files); iter; iter = str_list_next(installed_files, iter)) {
343 file_name = (char *)iter->data;
345 if (file_is_dir(file_name)) {
346 str_list_append(&installed_dirs, file_name);
350 conffile = pkg_get_conffile(pkg, file_name+rootdirlen);
352 if (conffile_has_been_modified(conffile)) {
353 opkg_msg(NOTICE, "Not deleting modified conffile %s.\n",
359 if (!conf->noaction) {
360 opkg_msg(INFO, "Deleting %s.\n", file_name, conf->noaction);
363 opkg_msg(INFO, "Not deleting %s. (noaction)\n",
368 /* Remove empty directories */
369 if (!conf->noaction) {
372 for (iter = str_list_first(&installed_dirs); iter; iter = str_list_next(&installed_dirs, iter)) {
373 file_name = (char *)iter->data;
375 if (rmdir(file_name) == 0) {
376 opkg_msg(INFO, "Deleting %s.\n", file_name);
378 str_list_remove(&installed_dirs, &iter);
381 } while (removed_a_dir);
384 pkg_free_installed_files(pkg);
385 pkg_remove_installed_files_list(pkg);
387 /* Don't print warning for dirs that are provided by other packages */
388 for (iter = str_list_first(&installed_dirs); iter; iter = str_list_next(&installed_dirs, iter)) {
389 file_name = (char *)iter->data;
391 owner = file_hash_get_file_owner(file_name);
395 str_list_remove(&installed_dirs, &iter);
400 while (!void_list_empty(&installed_dirs)) {
401 iter = str_list_pop(&installed_dirs);
405 str_list_deinit(&installed_dirs);
409 remove_maintainer_scripts(pkg_t *pkg)
418 sprintf_alloc(&globpattern, "%s/%s.*",
419 pkg->dest->info_dir, pkg->name);
421 err = glob(globpattern, 0, NULL, &globbuf);
426 for (i = 0; i < globbuf.gl_pathc; i++) {
427 opkg_msg(INFO, "Deleting %s.\n", globbuf.gl_pathv[i]);
428 unlink(globbuf.gl_pathv[i]);