opkg: adding the hash_table_remove API, not using yet.
[project/opkg-lede.git] / libopkg / pkg_depends.c
1 /* pkg_depends.c - the opkg package management system
2
3 Steven M. Ayer
4
5 Copyright (C) 2002 Compaq Computer Corporation
6
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.
11
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.
16 */
17
18 #include "includes.h"
19 #include <errno.h>
20 #include <ctype.h>
21
22 #include "pkg.h"
23 #include "opkg_utils.h"
24 #include "pkg_hash.h"
25 #include "opkg_message.h"
26 #include "pkg_parse.h"
27 #include "hash_table.h"
28
29 static int parseDepends(compound_depend_t *compound_depend, hash_table_t * hash, char * depend_str);
30 static depend_t * depend_init(void);
31 static void depend_deinit(depend_t *d);
32 static char ** add_unresolved_dep(pkg_t * pkg, char ** the_lost, int ref_ndx);
33 static char ** merge_unresolved(char ** oldstuff, char ** newstuff);
34 static int is_pkg_in_pkg_vec(pkg_vec_t * vec, pkg_t * pkg);
35
36 static int pkg_installed_and_constraint_satisfied(pkg_t *pkg, void *cdata)
37 {
38 depend_t *depend = (depend_t *)cdata;
39 if ((pkg->state_status == SS_INSTALLED || pkg->state_status == SS_UNPACKED) && version_constraints_satisfied(depend, pkg))
40 return 1;
41 else
42 return 0;
43 }
44
45 static int pkg_constraint_satisfied(pkg_t *pkg, void *cdata)
46 {
47 depend_t *depend = (depend_t *)cdata;
48 if (version_constraints_satisfied(depend, pkg))
49 return 1;
50 else
51 return 0;
52 }
53
54 /* returns ndependences or negative error value */
55 int pkg_hash_fetch_unsatisfied_dependencies(opkg_conf_t *conf, pkg_t * pkg,
56 pkg_vec_t *unsatisfied, char *** unresolved)
57 {
58 pkg_t * satisfier_entry_pkg;
59 register int i, j, k;
60 int count, found;
61 char ** the_lost;
62 abstract_pkg_t * ab_pkg;
63
64 /*
65 * this is a setup to check for redundant/cyclic dependency checks,
66 * which are marked at the abstract_pkg level
67 */
68 if (!(ab_pkg = pkg->parent)) {
69 fprintf(stderr, "%s:%d: something terribly wrong with pkg %s\n", __FUNCTION__, __LINE__, pkg->name);
70 *unresolved = NULL;
71 return 0;
72 }
73 if (ab_pkg->dependencies_checked) { /* avoid duplicate or cyclic checks */
74 *unresolved = NULL;
75 return 0;
76 } else {
77 ab_pkg->dependencies_checked = 1; /* mark it for subsequent visits */
78 }
79 /**/
80
81 count = pkg->pre_depends_count + pkg->depends_count + pkg->recommends_count + pkg->suggests_count;
82 if (!count){
83 *unresolved = NULL;
84 return 0;
85 }
86
87 the_lost = NULL;
88
89 /* foreach dependency */
90 for (i = 0; i < count; i++) {
91 compound_depend_t * compound_depend = &pkg->depends[i];
92 depend_t ** possible_satisfiers = compound_depend->possibilities;;
93 found = 0;
94 satisfier_entry_pkg = NULL;
95
96 if (compound_depend->type == GREEDY_DEPEND) {
97 /* foreach possible satisfier */
98 for (j = 0; j < compound_depend->possibility_count; j++) {
99 /* foreach provided_by, which includes the abstract_pkg itself */
100 abstract_pkg_t *abpkg = possible_satisfiers[j]->pkg;
101 abstract_pkg_vec_t *ab_provider_vec = abpkg->provided_by;
102 int nposs = ab_provider_vec->len;
103 abstract_pkg_t **ab_providers = ab_provider_vec->pkgs;
104 int l;
105 for (l = 0; l < nposs; l++) {
106 pkg_vec_t *test_vec = ab_providers[l]->pkgs;
107 /* if no depends on this one, try the first package that Provides this one */
108 if (!test_vec){ /* no pkg_vec hooked up to the abstract_pkg! (need another feed?) */
109 continue;
110 }
111
112 /* cruise this possiblity's pkg_vec looking for an installed version */
113 for (k = 0; k < test_vec->len; k++) {
114 pkg_t *pkg_scout = test_vec->pkgs[k];
115 /* not installed, and not already known about? */
116 if ((pkg_scout->state_want != SW_INSTALL)
117 && !pkg_scout->parent->dependencies_checked
118 && !is_pkg_in_pkg_vec(unsatisfied, pkg_scout)) {
119 char ** newstuff = NULL;
120 int rc;
121 pkg_vec_t *tmp_vec = pkg_vec_alloc ();
122 /* check for not-already-installed dependencies */
123 rc = pkg_hash_fetch_unsatisfied_dependencies(conf,
124 pkg_scout,
125 tmp_vec,
126 &newstuff);
127 if (newstuff == NULL) {
128 int i;
129 int ok = 1;
130 for (i = 0; i < rc; i++) {
131 pkg_t *p = tmp_vec->pkgs[i];
132 if (p->state_want == SW_INSTALL)
133 continue;
134 opkg_message(conf, OPKG_DEBUG, "not installing %s due to requirement for %s\n", pkg_scout->name, p->name);
135 ok = 0;
136 break;
137 }
138 pkg_vec_free (tmp_vec);
139 if (ok) {
140 /* mark this one for installation */
141 opkg_message(conf, OPKG_NOTICE, "Adding satisfier for greedy dependence: %s\n", pkg_scout->name);
142 pkg_vec_insert(unsatisfied, pkg_scout);
143 }
144 } else {
145 opkg_message(conf, OPKG_DEBUG, "not installing %s due to broken depends \n", pkg_scout->name);
146 free (newstuff);
147 }
148 }
149 }
150 }
151 }
152
153 continue;
154 }
155
156 /* foreach possible satisfier, look for installed package */
157 for (j = 0; j < compound_depend->possibility_count; j++) {
158 /* foreach provided_by, which includes the abstract_pkg itself */
159 depend_t *dependence_to_satisfy = possible_satisfiers[j];
160 abstract_pkg_t *satisfying_apkg = possible_satisfiers[j]->pkg;
161 pkg_t *satisfying_pkg =
162 pkg_hash_fetch_best_installation_candidate(conf, satisfying_apkg,
163 pkg_installed_and_constraint_satisfied,
164 dependence_to_satisfy, 1, NULL);
165 /* Being that I can't test constraing in pkg_hash, I will test it here */
166 if (satisfying_pkg != NULL) {
167 if (!pkg_installed_and_constraint_satisfied ( satisfying_pkg,dependence_to_satisfy)) {
168 satisfying_pkg = NULL;
169 }
170 }
171 opkg_message(conf, OPKG_DEBUG, "%s:%d: satisfying_pkg=%p \n", __FILE__, __LINE__, satisfying_pkg);
172 if (satisfying_pkg != NULL) {
173 found = 1;
174 break;
175 }
176
177 }
178 /* if nothing installed matches, then look for uninstalled satisfier */
179 if (!found) {
180 /* foreach possible satisfier, look for installed package */
181 for (j = 0; j < compound_depend->possibility_count; j++) {
182 /* foreach provided_by, which includes the abstract_pkg itself */
183 depend_t *dependence_to_satisfy = possible_satisfiers[j];
184 abstract_pkg_t *satisfying_apkg = possible_satisfiers[j]->pkg;
185 pkg_t *satisfying_pkg =
186 pkg_hash_fetch_best_installation_candidate(conf, satisfying_apkg,
187 pkg_constraint_satisfied,
188 dependence_to_satisfy, 1, NULL);
189 /* Being that I can't test constraing in pkg_hash, I will test it here too */
190 if (satisfying_pkg != NULL) {
191 if (!pkg_constraint_satisfied ( satisfying_pkg,dependence_to_satisfy)) {
192 satisfying_pkg = NULL;
193 }
194 }
195
196 /* user request overrides package recommendation */
197 if (satisfying_pkg != NULL
198 && (compound_depend->type == RECOMMEND || compound_depend->type == SUGGEST)
199 && (satisfying_pkg->state_want == SW_DEINSTALL || satisfying_pkg->state_want == SW_PURGE)) {
200 opkg_message (conf, OPKG_NOTICE, "%s: ignoring recommendation for %s at user request\n",
201 pkg->name, satisfying_pkg->name);
202 continue;
203 }
204
205 opkg_message(conf, OPKG_DEBUG, "%s:%d: satisfying_pkg=%p\n", __FILE__, __LINE__, satisfying_pkg);
206 if (satisfying_pkg != NULL) {
207 satisfier_entry_pkg = satisfying_pkg;
208 break;
209 }
210 }
211 }
212
213 /* we didn't find one, add something to the unsatisfied vector */
214 if (!found) {
215 if (!satisfier_entry_pkg) {
216 /* failure to meet recommendations is not an error */
217 if (compound_depend->type != RECOMMEND && compound_depend->type != SUGGEST)
218 the_lost = add_unresolved_dep(pkg, the_lost, i);
219 else
220 opkg_message (conf, OPKG_NOTICE, "%s: unsatisfied recommendation for %s\n",
221 pkg->name, compound_depend->possibilities[0]->pkg->name);
222 }
223 else {
224 if (compound_depend->type == SUGGEST) {
225 /* just mention it politely */
226 opkg_message (conf, OPKG_NOTICE, "package %s suggests installing %s\n",
227 pkg->name, satisfier_entry_pkg->name);
228 } else {
229 char ** newstuff = NULL;
230
231 if (satisfier_entry_pkg != pkg &&
232 !is_pkg_in_pkg_vec(unsatisfied, satisfier_entry_pkg)) {
233 pkg_vec_insert(unsatisfied, satisfier_entry_pkg);
234 pkg_hash_fetch_unsatisfied_dependencies(conf,
235 satisfier_entry_pkg,
236 unsatisfied,
237 &newstuff);
238 the_lost = merge_unresolved(the_lost, newstuff);
239 }
240 }
241 }
242 }
243 }
244 *unresolved = the_lost;
245
246 return unsatisfied->len;
247 }
248
249 /*checking for conflicts !in replaces
250 If a packages conflicts with another but is also replacing it, I should not consider it a
251 really conflicts
252 returns 0 if conflicts <> replaces or 1 if conflicts == replaces
253 */
254 int is_pkg_a_replaces(pkg_t *pkg_scout,pkg_t *pkg)
255 {
256 int i ;
257 int replaces_count = pkg->replaces_count;
258 abstract_pkg_t **replaces;
259
260 if (pkg->replaces_count==0) // No replaces, it's surely a conflict
261 return 0;
262
263 replaces = pkg->replaces;
264
265 for (i = 0; i < replaces_count; i++) {
266 if (strcmp(pkg_scout->name,pkg->replaces[i]->name)==0) { // Found
267 opkg_message(NULL, OPKG_DEBUG2, "Seems I've found a replace %s %s \n",pkg_scout->name,pkg->replaces[i]->name);
268 return 1;
269 }
270 }
271 return 0;
272
273 }
274
275
276 /* Abhaya: added support for conflicts */
277 pkg_vec_t * pkg_hash_fetch_conflicts(hash_table_t * hash, pkg_t * pkg)
278 {
279 pkg_vec_t * installed_conflicts, * test_vec;
280 compound_depend_t * conflicts;
281 depend_t ** possible_satisfiers;
282 depend_t * possible_satisfier;
283 register int i, j, k;
284 int count;
285 abstract_pkg_t * ab_pkg;
286 pkg_t **pkg_scouts;
287 pkg_t *pkg_scout;
288
289 /*
290 * this is a setup to check for redundant/cyclic dependency checks,
291 * which are marked at the abstract_pkg level
292 */
293 if(!(ab_pkg = pkg->parent)){
294 fprintf(stderr, "dependency check error. pkg %s isn't in hash table\n", pkg->name);
295 return (pkg_vec_t *)NULL;
296 }
297
298 conflicts = pkg->conflicts;
299 if(!conflicts){
300 return (pkg_vec_t *)NULL;
301 }
302 installed_conflicts = pkg_vec_alloc();
303
304 count = pkg->conflicts_count;
305
306
307
308 /* foreach conflict */
309 for(i = 0; i < pkg->conflicts_count; i++){
310
311 possible_satisfiers = conflicts->possibilities;
312
313 /* foreach possible satisfier */
314 for(j = 0; j < conflicts->possibility_count; j++){
315 possible_satisfier = possible_satisfiers[j];
316 if (!possible_satisfier)
317 fprintf(stderr, "%s:%d: possible_satisfier is null\n", __FUNCTION__, __LINE__);
318 if (!possible_satisfier->pkg)
319 fprintf(stderr, "%s:%d: possible_satisfier->pkg is null\n", __FUNCTION__, __LINE__);
320 test_vec = possible_satisfier->pkg->pkgs;
321 if (test_vec) {
322 /* pkg_vec found, it is an actual package conflict
323 * cruise this possiblity's pkg_vec looking for an installed version */
324 pkg_scouts = test_vec->pkgs;
325 for(k = 0; k < test_vec->len; k++){
326 pkg_scout = pkg_scouts[k];
327 if (!pkg_scout) {
328 fprintf(stderr, "%s: null pkg scout\n", __FUNCTION__);
329 continue;
330 }
331 if ((pkg_scout->state_status == SS_INSTALLED || pkg_scout->state_want == SW_INSTALL) &&
332 version_constraints_satisfied(possible_satisfier, pkg_scout) && !is_pkg_a_replaces(pkg_scout,pkg)){
333 if (!is_pkg_in_pkg_vec(installed_conflicts, pkg_scout)){
334 pkg_vec_insert(installed_conflicts, pkg_scout);
335 }
336 }
337 }
338 }
339 }
340 conflicts++;
341 }
342
343 if (installed_conflicts->len)
344 return installed_conflicts;
345 pkg_vec_free(installed_conflicts);
346 return (pkg_vec_t *)NULL;
347 }
348
349 int version_constraints_satisfied(depend_t * depends, pkg_t * pkg)
350 {
351 pkg_t * temp;
352 int comparison;
353
354 if(depends->constraint == NONE)
355 return 1;
356
357 temp = pkg_new();
358
359 parseVersion(temp, depends->version);
360
361 comparison = pkg_compare_versions(pkg, temp);
362
363 free (temp->version);
364 free(temp);
365
366 if((depends->constraint == EARLIER) &&
367 (comparison < 0))
368 return 1;
369 else if((depends->constraint == LATER) &&
370 (comparison > 0))
371 return 1;
372 else if(comparison == 0)
373 return 1;
374 else if((depends->constraint == LATER_EQUAL) &&
375 (comparison >= 0))
376 return 1;
377 else if((depends->constraint == EARLIER_EQUAL) &&
378 (comparison <= 0))
379 return 1;
380
381 return 0;
382 }
383
384 int pkg_dependence_satisfiable(opkg_conf_t *conf, depend_t *depend)
385 {
386 abstract_pkg_t *apkg = depend->pkg;
387 abstract_pkg_vec_t *provider_apkgs = apkg->provided_by;
388 int n_providers = provider_apkgs->len;
389 abstract_pkg_t **apkgs = provider_apkgs->pkgs;
390 pkg_vec_t *pkg_vec;
391 int n_pkgs ;
392 int i;
393 int j;
394
395 for (i = 0; i < n_providers; i++) {
396 abstract_pkg_t *papkg = apkgs[i];
397 pkg_vec = papkg->pkgs;
398 if (pkg_vec) {
399 n_pkgs = pkg_vec->len;
400 for (j = 0; j < n_pkgs; j++) {
401 pkg_t *pkg = pkg_vec->pkgs[j];
402 if (version_constraints_satisfied(depend, pkg)) {
403 return 1;
404 }
405 }
406 }
407 }
408 return 0;
409 }
410
411 int pkg_dependence_satisfied(opkg_conf_t *conf, depend_t *depend)
412 {
413 abstract_pkg_t *apkg = depend->pkg;
414 abstract_pkg_vec_t *provider_apkgs = apkg->provided_by;
415 int n_providers = provider_apkgs->len;
416 abstract_pkg_t **apkgs = provider_apkgs->pkgs;
417 int i;
418 int n_pkgs;
419 int j;
420
421 for (i = 0; i < n_providers; i++) {
422 abstract_pkg_t *papkg = apkgs[i];
423 pkg_vec_t *pkg_vec = papkg->pkgs;
424 if (pkg_vec) {
425 n_pkgs = pkg_vec->len;
426 for (j = 0; j < n_pkgs; j++) {
427 pkg_t *pkg = pkg_vec->pkgs[j];
428 if (version_constraints_satisfied(depend, pkg)) {
429 if (pkg->state_status == SS_INSTALLED || pkg->state_status == SS_UNPACKED)
430 return 1;
431 }
432 }
433 }
434 }
435 return 0;
436 }
437
438 static int is_pkg_in_pkg_vec(pkg_vec_t * vec, pkg_t * pkg)
439 {
440 register int i;
441 pkg_t ** pkgs = vec->pkgs;
442
443 for(i = 0; i < vec->len; i++)
444 if((strcmp(pkg->name, (*(pkgs + i))->name) == 0)
445 && (pkg_compare_versions(pkg, *(pkgs + i)) == 0)
446 && (strcmp(pkg->architecture, (*(pkgs + i))->architecture) == 0))
447 return 1;
448 return 0;
449 }
450
451
452 #ifdef DeadCode
453 /**
454 * pkg_has_common_provides returns 1 if pkg and replacee both provide
455 * the same abstract package and 0 otherwise.
456 */
457 int pkg_has_common_provides(pkg_t *pkg, pkg_t *replacee)
458 {
459 abstract_pkg_t **provides = pkg->provides;
460 int provides_count = pkg->provides_count;
461 abstract_pkg_t **replacee_provides = replacee->provides;
462 int replacee_provides_count = replacee->provides_count;
463 int i, j;
464 for (i = 0; i < provides_count; i++) {
465 abstract_pkg_t *apkg = provides[i];
466 for (j = 0; j < replacee_provides_count; j++) {
467 abstract_pkg_t *replacee_apkg = replacee_provides[i];
468 if (apkg == replacee_apkg)
469 return 1;
470 }
471 }
472 return 0;
473 }
474 #endif
475
476 /**
477 * pkg_provides_abstract returns 1 if pkg->provides contains providee
478 * and 0 otherwise.
479 */
480 int pkg_provides_abstract(pkg_t *pkg, abstract_pkg_t *providee)
481 {
482 abstract_pkg_t **provides = pkg->provides;
483 int provides_count = pkg->provides_count;
484 int i;
485 for (i = 0; i < provides_count; i++) {
486 if (provides[i] == providee)
487 return 1;
488 }
489 return 0;
490 }
491
492 /**
493 * pkg_replaces returns 1 if pkg->replaces contains one of replacee's provides and 0
494 * otherwise.
495 */
496 int pkg_replaces(pkg_t *pkg, pkg_t *replacee)
497 {
498 abstract_pkg_t **replaces = pkg->replaces;
499 int replaces_count = pkg->replaces_count;
500 /* abstract_pkg_t **replacee_provides = pkg->provides;
501 int replacee_provides_count = pkg->provides_count; */
502 int i, j;
503 for (i = 0; i < replaces_count; i++) {
504 abstract_pkg_t *abstract_replacee = replaces[i];
505 for (j = 0; j < replaces_count; j++) {
506 /* opkg_message(NULL, OPKG_DEBUG2, "Searching pkg-name %s repprovname %s absrepname %s \n",
507 pkg->name,replacee->provides[j]->name, abstract_replacee->name); */
508 if (replacee->provides[j] == abstract_replacee)
509 return 1;
510 }
511 }
512 return 0;
513 }
514
515
516 /**
517 * pkg_conflicts_abstract returns 1 if pkg->conflicts contains conflictee and 0
518 * otherwise.
519 */
520 int pkg_conflicts_abstract(pkg_t *pkg, abstract_pkg_t *conflictee)
521 {
522 compound_depend_t *conflicts = pkg->conflicts;
523 int conflicts_count = pkg->conflicts_count;
524 int i, j;
525 for (i = 0; i < conflicts_count; i++) {
526 int possibility_count = conflicts[i].possibility_count;
527 struct depend **possibilities = conflicts[i].possibilities;
528 for (j = 0; j < possibility_count; j++) {
529 if (possibilities[j]->pkg == conflictee) {
530 return 1;
531 }
532 }
533 }
534 return 0;
535 }
536
537 /**
538 * pkg_conflicts returns 1 if pkg->conflicts contains one of
539 * conflictee's provides and 0 otherwise.
540 */
541 int pkg_conflicts(pkg_t *pkg, pkg_t *conflictee)
542 {
543 compound_depend_t *conflicts = pkg->conflicts;
544 int conflicts_count = pkg->conflicts_count;
545 abstract_pkg_t **conflictee_provides = conflictee->provides;
546 int conflictee_provides_count = conflictee->provides_count;
547 int i, j, k;
548 int possibility_count;
549 struct depend **possibilities;
550 abstract_pkg_t *possibility ;
551
552 for (i = 0; i < conflicts_count; i++) {
553 possibility_count = conflicts[i].possibility_count;
554 possibilities = conflicts[i].possibilities;
555 for (j = 0; j < possibility_count; j++) {
556 possibility = possibilities[j]->pkg;
557 for (k = 0; k < conflictee_provides_count; k++) {
558 if (possibility == conflictee_provides[k]) {
559 return 1;
560 }
561 }
562 }
563 }
564 return 0;
565 }
566
567 static char ** merge_unresolved(char ** oldstuff, char ** newstuff)
568 {
569 int oldlen = 0, newlen = 0;
570 char ** result;
571 register int i, j;
572
573 if(!newstuff)
574 return oldstuff;
575
576 while(oldstuff && oldstuff[oldlen]) oldlen++;
577 while(newstuff && newstuff[newlen]) newlen++;
578
579 result = (char **)realloc(oldstuff, sizeof(char *) * (oldlen + newlen + 1));
580 if (result == NULL) {
581 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
582 return NULL;
583 }
584
585 for(i = oldlen, j = 0; i < (oldlen + newlen); i++, j++)
586 *(result + i) = *(newstuff + j);
587
588 *(result + i) = NULL;
589
590 return result;
591 }
592
593 /*
594 * a kinda kludgy way to back out depends str from two different arrays (reg'l'r 'n pre)
595 * this is null terminated, no count is carried around
596 */
597 char ** add_unresolved_dep(pkg_t * pkg, char ** the_lost, int ref_ndx)
598 {
599 int count;
600 char ** resized;
601 char *depend_str = pkg_depend_str(pkg, ref_ndx);
602
603 count = 0;
604 while(the_lost && the_lost[count]) count++;
605
606 count++; /* need one to hold the null */
607 resized = (char **)realloc(the_lost, sizeof(char *) * (count + 1));
608 if (resized == NULL) {
609 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
610 return NULL;
611 }
612 resized[count - 1] = strdup(depend_str);
613 resized[count] = NULL;
614
615 return resized;
616 }
617
618 void printDepends(pkg_t * pkg)
619 {
620 register int i, j;
621 compound_depend_t * depend;
622 int count;
623
624 count = pkg->pre_depends_count + pkg->depends_count;
625
626 depend = pkg->depends;
627 if(!depend){
628 fprintf(stderr, "Depends pointer is NULL\n");
629 return;
630 }
631 for(i = 0; i < count; i++){
632 fprintf(stderr, "%s has %d possibilities:\n",
633 (depend->type == GREEDY_DEPEND) ? "Greedy-Depend" : ((depend->type == DEPEND) ? "Depend" : "Pre-Depend"),
634 depend->possibility_count);
635 for(j = 0; j < depend->possibility_count; j++)
636 fprintf(stderr, "\t%s version %s (%d)\n",
637 depend->possibilities[j]->pkg->name,
638 depend->possibilities[j]->version,
639 depend->possibilities[j]->constraint);
640 depend++;
641 }
642 }
643
644 int buildProvides(hash_table_t * hash, abstract_pkg_t * ab_pkg, pkg_t * pkg)
645 {
646 register int i, j;
647
648 /* every pkg provides itself */
649 abstract_pkg_vec_insert(ab_pkg->provided_by, ab_pkg);
650
651 if (!pkg->provides_count)
652 return 0;
653 if (pkg->provides)
654 return 0;
655
656 pkg->provides = (abstract_pkg_t **)calloc((pkg->provides_count + 1), sizeof(abstract_pkg_t *));
657 if (pkg->provides == NULL) {
658 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
659 return -1 ;
660 }
661 pkg->provides[0] = ab_pkg;
662
663 // if (strcmp(ab_pkg->name, pkg->name))
664 // fprintf(stderr, __FUNCTION__ ": ab_pkg=%s pkg=%s\n", ab_pkg->name, pkg->name);
665
666 for(i = 0; i < pkg->provides_count; i++){
667 abstract_pkg_t *provided_abpkg = ensure_abstract_pkg_by_name(hash, pkg->provides_str[i]);
668
669 pkg->provides[i+1] = provided_abpkg;
670
671 j = 0;
672 abstract_pkg_vec_insert(provided_abpkg->provided_by, ab_pkg);
673 }
674 return 0;
675 }
676
677 /* Abhaya: added conflicts support */
678 int buildConflicts(hash_table_t * hash, abstract_pkg_t * ab_pkg, pkg_t * pkg)
679 {
680 register int i;
681 compound_depend_t * conflicts;
682
683 if (!pkg->conflicts_count)
684 return 0;
685
686 conflicts = pkg->conflicts = calloc(pkg->conflicts_count, sizeof(compound_depend_t));
687 if (conflicts == NULL) {
688 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
689 return -1;
690 }
691 for (i = 0; i < pkg->conflicts_count; i++) {
692 conflicts->type = CONFLICTS;
693 parseDepends(conflicts, hash,
694 pkg->conflicts_str[i]);
695 conflicts++;
696 }
697 return 0;
698 }
699
700 int buildReplaces(hash_table_t * hash, abstract_pkg_t * ab_pkg, pkg_t * pkg)
701 {
702 register int i, j;
703
704 if (!pkg->replaces_count)
705 return 0;
706
707 pkg->replaces = (abstract_pkg_t **)calloc(pkg->replaces_count, sizeof(abstract_pkg_t *));
708 if (pkg->replaces == NULL) {
709 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
710 return -1;
711 }
712
713 for(i = 0; i < pkg->replaces_count; i++){
714 abstract_pkg_t *old_abpkg = ensure_abstract_pkg_by_name(hash, pkg->replaces_str[i]);
715
716 pkg->replaces[i] = old_abpkg;
717
718 j = 0;
719 if (!old_abpkg->replaced_by)
720 old_abpkg->replaced_by = abstract_pkg_vec_alloc();
721 if ( old_abpkg->replaced_by == NULL ){
722 return -1;
723 }
724 /* if a package pkg both replaces and conflicts old_abpkg,
725 * then add it to the replaced_by vector so that old_abpkg
726 * will be upgraded to ab_pkg automatically */
727 if (pkg_conflicts_abstract(pkg, old_abpkg))
728 abstract_pkg_vec_insert(old_abpkg->replaced_by, ab_pkg);
729 }
730 return 0;
731 }
732
733 int buildDepends(hash_table_t * hash, pkg_t * pkg)
734 {
735 int count;
736 register int i;
737 compound_depend_t * depends;
738
739 if(!(count = pkg->pre_depends_count + pkg->depends_count + pkg->recommends_count + pkg->suggests_count))
740 return 0;
741
742 if (0 && pkg->pre_depends_count)
743 fprintf(stderr, "pkg=%s pre_depends_count=%d depends_count=%d\n",
744 pkg->name, pkg->pre_depends_count, pkg->depends_count);
745 depends = pkg->depends = calloc(count, sizeof(compound_depend_t));
746 if (depends == NULL) {
747 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
748 return -1;
749 }
750
751
752 for(i = 0; i < pkg->pre_depends_count; i++){
753 parseDepends(depends, hash, pkg->pre_depends_str[i]);
754 if (0 && pkg->pre_depends_count)
755 fprintf(stderr, " pre_depends_str=%s depends=%p possibility_count=%x\n",
756 pkg->pre_depends_str[i], depends, depends->possibility_count);
757 depends->type = PREDEPEND;
758 depends++;
759 }
760
761 for(i = 0; i < pkg->recommends_count; i++){
762 parseDepends(depends, hash, pkg->recommends_str[i]);
763 if (0 && pkg->recommends_count)
764 fprintf(stderr, " recommends_str=%s depends=%p possibility_count=%x\n",
765 pkg->recommends_str[i], depends, depends->possibility_count);
766 depends->type = RECOMMEND;
767 depends++;
768 }
769
770 for(i = 0; i < pkg->suggests_count; i++){
771 parseDepends(depends, hash, pkg->suggests_str[i]);
772 if (0 && pkg->suggests_count)
773 fprintf(stderr, " suggests_str=%s depends=%p possibility_count=%x\n",
774 pkg->suggests_str[i], depends, depends->possibility_count);
775 depends->type = SUGGEST;
776 depends++;
777 }
778
779 for(i = 0; i < pkg->depends_count; i++){
780 parseDepends(depends, hash, pkg->depends_str[i]);
781 if (0 && pkg->depends_count)
782 fprintf(stderr, " depends_str=%s depends=%p possibility_count=%x\n",
783 pkg->depends_str[i], depends, depends->possibility_count);
784 depends++;
785 }
786 return 0;
787 }
788
789 /*
790 * pkg_depend_string: returns the depends string specified by index.
791 * All 4 kinds of dependences: dependence, pre-dependence, recommend, and suggest are number starting from 0.
792 * [0,npredepends) -> returns pre_depends_str[index]
793 * [npredepends,npredepends+nrecommends) -> returns recommends_str[index]
794 * [npredepends+nrecommends,npredepends+nrecommends+nsuggests) -> returns recommends_str[index]
795 * [npredepends+nrecommends+nsuggests,npredepends+nrecommends+nsuggests+ndepends) -> returns depends_str[index]
796 */
797 char *pkg_depend_str(pkg_t *pkg, int index)
798 {
799 if (index < pkg->pre_depends_count) {
800 return pkg->pre_depends_str[index];
801 }
802 index -= pkg->pre_depends_count;
803
804 if (index < pkg->recommends_count) {
805 return pkg->recommends_str[index];
806 }
807 index -= pkg->recommends_count;
808
809 if (index < pkg->suggests_count) {
810 return pkg->suggests_str[index];
811 }
812 index -= pkg->suggests_count;
813
814 if (index < pkg->depends_count) {
815 return pkg->depends_str[index];
816 }
817 fprintf(stderr, "pkg_depend_str: index %d out of range for pkg=%s\n", index, pkg->name);
818 return NULL;
819 }
820
821 void freeDepends(pkg_t *pkg)
822 {
823 int i;
824
825 if (pkg == NULL || pkg->depends == NULL) {
826 return;
827 }
828
829 fprintf(stderr, "Freeing depends=%p\n", pkg->depends);
830 for (i=0; i < pkg->depends->possibility_count; i++) {
831 depend_deinit(pkg->depends->possibilities[i]);
832 }
833 free(pkg->depends->possibilities);
834 free(pkg->depends);
835 pkg->depends = NULL;
836 }
837
838 void buildDependedUponBy(pkg_t * pkg, abstract_pkg_t * ab_pkg)
839 {
840 compound_depend_t * depends;
841 int count, othercount;
842 register int i, j;
843 abstract_pkg_t * ab_depend;
844 abstract_pkg_t ** temp;
845
846 count = pkg->pre_depends_count + pkg->depends_count;
847 depends = pkg->depends;
848
849 if (0 && pkg->pre_depends_count)
850 fprintf(stderr, "pkg=%s pre_depends_count=%d depends_count=%d\n",
851 pkg->name, pkg->pre_depends_count, pkg->depends_count);
852 for (i = 0; i < count; i++) {
853 if (0 && pkg->pre_depends_count)
854 fprintf(stderr, " i=%d possibility_count=%x depends=%p\n", i, depends->possibility_count, depends);
855 for (j = 0; j < depends->possibility_count; j++){
856 ab_depend = depends->possibilities[j]->pkg;
857 if(!ab_depend->depended_upon_by)
858 ab_depend->depended_upon_by = (abstract_pkg_t **)calloc(1, sizeof(abstract_pkg_t *));
859
860 temp = ab_depend->depended_upon_by;
861 othercount = 1;
862 while(*temp){
863 temp++;
864 othercount++;
865 }
866 *temp = ab_pkg;
867
868 ab_depend->depended_upon_by = (abstract_pkg_t **)realloc(ab_depend->depended_upon_by,
869 (othercount + 1) * sizeof(abstract_pkg_t *));
870 /* the array may have moved */
871 temp = ab_depend->depended_upon_by + othercount;
872 *temp = NULL;
873 }
874 depends++;
875 }
876 }
877
878 static depend_t * depend_init(void)
879 {
880 depend_t * d = (depend_t *)calloc(1, sizeof(depend_t));
881 if ( d==NULL ){
882 fprintf(stderr, "%s: out of memory\n", __FUNCTION__);
883 return NULL;
884 }
885 d->constraint = NONE;
886 d->version = NULL;
887 d->pkg = NULL;
888
889 return d;
890 }
891
892 static void depend_deinit(depend_t *d)
893 {
894 free(d);
895 }
896
897 static int parseDepends(compound_depend_t *compound_depend,
898 hash_table_t * hash, char * depend_str)
899 {
900 char * pkg_name, buffer[2048];
901 int num_of_ors = 0;
902 register int i;
903 register char * src, * dest;
904 depend_t ** possibilities;
905
906 /* first count the number of ored possibilities for satisfying dependency */
907 src = depend_str;
908 while(*src)
909 if(*src++ == '|')
910 num_of_ors++;
911
912 compound_depend->type = DEPEND;
913
914 compound_depend->possibility_count = num_of_ors + 1;
915 possibilities = (depend_t **)calloc((num_of_ors + 1), sizeof(depend_t *) );
916 if (!possibilities)
917 return -ENOMEM;
918 compound_depend->possibilities = possibilities;
919
920 src = depend_str;
921 for(i = 0; i < num_of_ors + 1; i++){
922 possibilities[i] = depend_init();
923 if (!possibilities[i])
924 return -ENOMEM;
925 /* gobble up just the name first */
926 dest = buffer;
927 while(*src &&
928 !isspace(*src) &&
929 (*src != '(') &&
930 (*src != '*') &&
931 (*src != '|'))
932 *dest++ = *src++;
933 *dest = '\0';
934 pkg_name = trim_alloc(buffer);
935 if (pkg_name == NULL )
936 return -ENOMEM;
937
938 /* now look at possible version info */
939
940 /* skip to next chars */
941 if(isspace(*src))
942 while(*src && isspace(*src)) src++;
943
944 /* extract constraint and version */
945 if(*src == '('){
946 src++;
947 if(!strncmp(src, "<<", 2)){
948 possibilities[i]->constraint = EARLIER;
949 src += 2;
950 }
951 else if(!strncmp(src, "<=", 2)){
952 possibilities[i]->constraint = EARLIER_EQUAL;
953 src += 2;
954 }
955 else if(!strncmp(src, ">=", 2)){
956 possibilities[i]->constraint = LATER_EQUAL;
957 src += 2;
958 }
959 else if(!strncmp(src, ">>", 2)){
960 possibilities[i]->constraint = LATER;
961 src += 2;
962 }
963 else if(!strncmp(src, "=", 1)){
964 possibilities[i]->constraint = EQUAL;
965 src++;
966 }
967 /* should these be here to support deprecated designations; dpkg does */
968 else if(!strncmp(src, "<", 1)){
969 possibilities[i]->constraint = EARLIER_EQUAL;
970 src++;
971 }
972 else if(!strncmp(src, ">", 1)){
973 possibilities[i]->constraint = LATER_EQUAL;
974 src++;
975 }
976
977 /* now we have any constraint, pass space to version string */
978 while(isspace(*src)) src++;
979
980 /* this would be the version string */
981 dest = buffer;
982 while(*src && *src != ')')
983 *dest++ = *src++;
984 *dest = '\0';
985
986 possibilities[i]->version = trim_alloc(buffer);
987 /* fprintf(stderr, "let's print the depends version string:");
988 fprintf(stderr, "version %s\n", possibilities[i]->version);*/
989 if (possibilities[i]->version == NULL )
990 return -ENOMEM;
991
992
993 }
994 /* hook up the dependency to its abstract pkg */
995 possibilities[i]->pkg = ensure_abstract_pkg_by_name(hash, pkg_name);
996
997 free(pkg_name);
998
999 /* now get past the ) and any possible | chars */
1000 while(*src &&
1001 (isspace(*src) ||
1002 (*src == ')') ||
1003 (*src == '|')))
1004 src++;
1005 if (*src == '*')
1006 {
1007 compound_depend->type = GREEDY_DEPEND;
1008 src++;
1009 }
1010 }
1011
1012 return 0;
1013 }