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