1 /* opkg_remove.c - the itsy 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"
25 #include "file_util.h"
26 #include "sprintf_alloc.h"
32 * Returns number of the number of packages depending on the packages provided by this package.
33 * Every package implicitly provides itself.
35 int pkg_has_installed_dependents(opkg_conf_t
*conf
, abstract_pkg_t
*parent_apkg
, pkg_t
*pkg
, abstract_pkg_t
*** pdependents
)
37 int nprovides
= pkg
->provides_count
;
38 abstract_pkg_t
**provides
= pkg
->provides
;
39 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
= (abstract_pkg_t
**)malloc((n_installed_dependents
+1)*sizeof(abstract_pkg_t
*));
59 if ( dependents
== NULL
){
60 fprintf(stderr
,"%s Unable to allocate memory. REPORT THIS BUG IN BUGZILLA PLEASE\n", __FUNCTION__
);
64 *pdependents
= dependents
;
65 for (i
= 0; i
<= nprovides
; i
++) {
66 abstract_pkg_t
*providee
= provides
[i
];
67 abstract_pkg_t
**dependers
= providee
->depended_upon_by
;
68 abstract_pkg_t
*dep_ab_pkg
;
69 if (dependers
== NULL
)
71 while ((dep_ab_pkg
= *dependers
++) != NULL
) {
72 if (dep_ab_pkg
->state_status
== SS_INSTALLED
&& !(dep_ab_pkg
->state_flag
& SF_MARKED
)) {
73 dependents
[p
++] = dep_ab_pkg
;
74 dep_ab_pkg
->state_flag
|= SF_MARKED
;
79 /* now clear the marks */
80 for (i
= 0; i
< p
; i
++) {
81 abstract_pkg_t
*dep_ab_pkg
= dependents
[i
];
82 dep_ab_pkg
->state_flag
&= ~SF_MARKED
;
85 return n_installed_dependents
;
88 int opkg_remove_dependent_pkgs (opkg_conf_t
*conf
, pkg_t
*pkg
, abstract_pkg_t
**dependents
)
93 pkg_vec_t
*dependent_pkgs
= pkg_vec_alloc();
94 abstract_pkg_t
* ab_pkg
;
96 if((ab_pkg
= pkg
->parent
) == NULL
){
97 fprintf(stderr
, "%s: unable to get dependent pkgs. pkg %s isn't in hash table\n",
98 __FUNCTION__
, pkg
->name
);
102 if (dependents
== NULL
)
105 // here i am using the dependencies_checked
106 if (ab_pkg
->dependencies_checked
== 2) // variable to make out whether this package
107 return 0; // has already been encountered in the process
108 // of marking packages for removal - Karthik
109 ab_pkg
->dependencies_checked
= 2;
113 while (dependents
[i
] != NULL
) {
114 abstract_pkg_t
*dep_ab_pkg
= dependents
[i
];
116 if (dep_ab_pkg
->dependencies_checked
== 2){
120 if (dep_ab_pkg
->state_status
== SS_INSTALLED
) {
121 for (a
= 0; a
< dep_ab_pkg
->pkgs
->len
; a
++) {
122 pkg_t
*dep_pkg
= dep_ab_pkg
->pkgs
->pkgs
[a
];
123 if (dep_pkg
->state_status
== SS_INSTALLED
) {
124 pkg_vec_insert(dependent_pkgs
, dep_pkg
);
130 /* 1 - to keep track of visited ab_pkgs when checking for possiblility of a broken removal of pkgs.
131 * 2 - to keep track of pkgs whose deps have been checked alrdy - Karthik */
138 for (i
= 0; i
< dependent_pkgs
->len
; i
++) {
139 int err
= opkg_remove_pkg(conf
, dependent_pkgs
->pkgs
[i
],0);
146 static int user_prefers_removing_dependents(opkg_conf_t
*conf
, abstract_pkg_t
*abpkg
, pkg_t
*pkg
, abstract_pkg_t
**dependents
)
148 abstract_pkg_t
*dep_ab_pkg
;
149 opkg_message(conf
, OPKG_ERROR
, "Package %s is depended upon by packages:\n", pkg
->name
);
150 while ((dep_ab_pkg
= *dependents
++) != NULL
) {
151 if (dep_ab_pkg
->state_status
== SS_INSTALLED
)
152 opkg_message(conf
, OPKG_ERROR
, "\t%s\n", dep_ab_pkg
->name
);
154 opkg_message(conf
, OPKG_ERROR
, "These might cease to work if package %s is removed.\n\n", pkg
->name
);
155 opkg_message(conf
, OPKG_ERROR
, "");
156 opkg_message(conf
, OPKG_ERROR
, "You can force removal of this package with -force-depends.\n");
157 opkg_message(conf
, OPKG_ERROR
, "You can force removal of this package and its dependents\n");
158 opkg_message(conf
, OPKG_ERROR
, "with -force-removal-of-dependent-packages or -recursive\n");
159 opkg_message(conf
, OPKG_ERROR
, "or by setting option force_removal_of_dependent_packages\n");
160 opkg_message(conf
, OPKG_ERROR
, "in opkg.conf.\n");
164 int opkg_remove_pkg(opkg_conf_t
*conf
, pkg_t
*pkg
,int message
)
166 /* Actually, when "message == 1" I have been called from an upgrade, and not from a normal remove
167 thus I wan't check for essential, as I'm upgrading.
168 I hope it won't break anything :)
171 abstract_pkg_t
*parent_pkg
= NULL
;
173 if (pkg
->essential
&& !message
) {
174 if (conf
->force_removal_of_essential_packages
) {
175 fprintf(stderr
, "WARNING: Removing essential package %s under your coercion.\n"
176 "\tIf your system breaks, you get to keep both pieces\n",
179 fprintf(stderr
, "ERROR: Refusing to remove essential package %s.\n"
180 "\tRemoving an essential package may lead to an unusable system, but if\n"
181 "\tyou enjoy that kind of pain, you can force opkg to proceed against\n"
182 "\tits will with the option: -force-removal-of-essential-packages\n",
184 return OPKG_PKG_IS_ESSENTIAL
;
188 if ((parent_pkg
= pkg
->parent
) == NULL
)
191 /* only attempt to remove dependent installed packages if
192 * force_depends is not specified or the package is being
195 if (!conf
->force_depends
196 && !(pkg
->state_flag
& SF_REPLACE
)) {
197 abstract_pkg_t
**dependents
;
198 int has_installed_dependents
=
199 pkg_has_installed_dependents(conf
, parent_pkg
, pkg
, &dependents
);
201 if (has_installed_dependents
) {
203 * if this package is depended up by others, then either we should
204 * not remove it or we should remove it and all of its dependents
207 if (!conf
->force_removal_of_dependent_packages
208 && !user_prefers_removing_dependents(conf
, parent_pkg
, pkg
, dependents
)) {
209 return OPKG_PKG_HAS_DEPENDENTS
;
212 /* remove packages depending on this package - Karthik */
213 err
= opkg_remove_dependent_pkgs (conf
, pkg
, dependents
);
220 printf("Removing package %s from %s...\n", pkg
->name
, pkg
->dest
->name
);
223 pkg
->state_flag
|= SF_FILELIST_CHANGED
;
225 pkg
->state_want
= SW_DEINSTALL
;
226 opkg_state_changed
++;
228 pkg_run_script(conf
, pkg
, "prerm", "remove");
230 /* DPKG_INCOMPATIBILITY: dpkg is slightly different here. It
231 maintains an empty filelist rather than deleting it. That seems
232 like a big pain, and I don't see that that should make a big
233 difference, but for anyone who wants tighter compatibility,
234 feel free to fix this. */
235 remove_data_files_and_list(conf
, pkg
);
237 pkg_run_script(conf
, pkg
, "postrm", "remove");
239 remove_maintainer_scripts_except_postrm(conf
, pkg
);
241 /* Aman Gupta - Since opkg is made for handheld devices with limited
242 * space, it doesn't make sense to leave extra configurations, files,
243 * and maintainer scripts left around. So, we make remove like purge,
244 * and take out all the crap :) */
246 remove_postrm(conf
, pkg
);
247 pkg
->state_status
= SS_NOT_INSTALLED
;
250 parent_pkg
->state_status
= SS_NOT_INSTALLED
;
255 int opkg_purge_pkg(opkg_conf_t
*conf
, pkg_t
*pkg
)
257 opkg_remove_pkg(conf
, pkg
,0);
261 int remove_data_files_and_list(opkg_conf_t
*conf
, pkg_t
*pkg
)
263 str_list_t installed_dirs
;
264 str_list_t
*installed_files
;
265 str_list_elt_t
*iter
;
267 conffile_t
*conffile
;
271 str_list_init(&installed_dirs
);
272 installed_files
= pkg_get_installed_files(pkg
);
274 for (iter
= installed_files
->head
; iter
; iter
= iter
->next
) {
275 file_name
= iter
->data
;
277 if (file_is_dir(file_name
)) {
278 str_list_append(&installed_dirs
, strdup(file_name
));
282 conffile
= pkg_get_conffile(pkg
, file_name
);
284 /* XXX: QUESTION: Is this right? I figure we only need to
285 save the conffile if it has been modified. Is that what
286 dpkg does? Or does dpkg preserve all conffiles? If so,
287 this seems like a better thing to do to conserve
289 if (conffile_has_been_modified(conf
, conffile
)) {
290 printf(" not deleting modified conffile %s\n", file_name
);
296 opkg_message(conf
, OPKG_INFO
, " deleting %s (noaction=%d)\n", file_name
, conf
->noaction
);
301 if (!conf
->noaction
) {
304 for (iter
= installed_dirs
.head
; iter
; iter
= iter
->next
) {
305 file_name
= iter
->data
;
307 if (rmdir(file_name
) == 0) {
308 opkg_message(conf
, OPKG_INFO
, " deleting %s\n", file_name
);
310 str_list_remove(&installed_dirs
, &iter
);
313 } while (removed_a_dir
);
316 pkg_free_installed_files(pkg
);
317 /* We have to remove the file list now, so that
318 find_pkg_owning_file does not always just report this package */
319 pkg_remove_installed_files_list(conf
, pkg
);
321 /* Don't print warning for dirs that are provided by other packages */
322 for (iter
= installed_dirs
.head
; iter
; iter
= iter
->next
) {
323 file_name
= iter
->data
;
325 owner
= file_hash_get_file_owner(conf
, file_name
);
329 str_list_remove(&installed_dirs
, &iter
);
334 for (iter
= installed_dirs
.head
; iter
; iter
= iter
->next
) {
338 str_list_deinit(&installed_dirs
);
343 int remove_maintainer_scripts_except_postrm(opkg_conf_t
*conf
, pkg_t
*pkg
)
349 if (conf
->noaction
) return 0;
351 sprintf_alloc(&globpattern
, "%s/%s.*",
352 pkg
->dest
->info_dir
, pkg
->name
);
353 err
= glob(globpattern
, 0, NULL
, &globbuf
);
359 for (i
= 0; i
< globbuf
.gl_pathc
; i
++) {
360 if (str_ends_with(globbuf
.gl_pathv
[i
], ".postrm")) {
363 opkg_message(conf
, OPKG_INFO
, " deleting %s\n", globbuf
.gl_pathv
[i
]);
364 unlink(globbuf
.gl_pathv
[i
]);
371 int remove_postrm(opkg_conf_t
*conf
, pkg_t
*pkg
)
373 char *postrm_file_name
;
375 if (conf
->noaction
) return 0;
377 sprintf_alloc(&postrm_file_name
, "%s/%s.postrm",
378 pkg
->dest
->info_dir
, pkg
->name
);
379 unlink(postrm_file_name
);
380 free(postrm_file_name
);