1 /*
2 * Copyright (c) 2007, Novell Inc.
3 *
4 * This program is licensed under the BSD license, read LICENSE.BSD
5 * for further information
6 */
7
8 /*
9 * poolarch.c
10 *
11 * create architecture policies
12 */
13
14 #include <stdio.h>
15 #include <stdlib.h>
16 #include <string.h>
17
18 #include "pool.h"
19 #include "poolid.h"
20 #include "poolarch.h"
21 #include "util.h"
22
23 static const char *archpolicies[] = {
24 #if defined(FEDORA) || defined(MAGEIA)
25 "x86_64", "x86_64:athlon:i686:i586:i486:i386",
26 #else
27 "x86_64", "x86_64:i686:i586:i486:i386",
28 #endif
29 "i686", "i686:i586:i486:i386",
30 "i586", "i586:i486:i386",
31 "i486", "i486:i386",
32 "s390x", "s390x:s390",
33 "ppc64", "ppc64:ppc",
34 "ppc64p7", "ppc64p7:ppc64:ppc",
35 "ia64", "ia64:i686:i586:i486:i386",
36 "armv8hcnl", "armv8hcnl:armv8hnl:armv8hl:armv7hnl:armv7hl:armv6hl",
37 "armv8hnl", "armv8hnl:armv8hl:armv7hnl:armv7hl:armv6hl",
38 "armv8hl", "armv8hl:armv7hl:armv6hl",
39 "armv8l", "armv8l:armv7l:armv6l:armv5tejl:armv5tel:armv5tl:armv5l:armv4tl:armv4l:armv3l",
40 "armv7hnl", "armv7hnl:armv7hl:armv6hl",
41 "armv7hl", "armv7hl:armv6hl",
42 "armv7l", "armv7l:armv6l:armv5tejl:armv5tel:armv5tl:armv5l:armv4tl:armv4l:armv3l",
43 "armv6l", "armv6l:armv5tejl:armv5tel:armv5tl:armv5l:armv4tl:armv4l:armv3l",
44 "armv5tejl", "armv5tejl:armv5tel:armv5tl:armv5l:armv4tl:armv4l:armv3l",
45 "armv5tel", "armv5tel:armv5tl:armv5l:armv4tl:armv4l:armv3l",
46 "armv5tl", "armv5tl:armv5l:armv4tl:armv4l:armv3l",
47 "armv5l", "armv5l:armv4tl:armv4l:armv3l",
48 "armv4tl", "armv4tl:armv4l:armv3l",
49 "armv4l", "armv4l:armv3l",
50 "sh4a", "sh4a:sh4",
51 "sparc64v", "sparc64v:sparc64:sparcv9v:sparcv9:sparcv8:sparc",
52 "sparc64", "sparc64:sparcv9:sparcv8:sparc",
53 "sparcv9v", "sparcv9v:sparcv9:sparcv8:sparc",
54 "sparcv9", "sparcv9:sparcv8:sparc",
55 "sparcv8", "sparcv8:sparc",
56 #if defined(FEDORA) || defined(MAGEIA)
57 "ia32e", "ia32e:x86_64:athlon:i686:i586:i486:i386",
58 "athlon", "athlon:i686:i586:i486:i386",
59 "amd64", "amd64:x86_64:athlon:i686:i586:i486:i386",
60 "geode", "geode:i586:i486:i386",
61 "ppc64iseries", "ppc64iseries:ppc64:ppc",
62 "ppc64pseries", "ppc64pseries:ppc64:ppc",
63 #endif
64 0
65 };
66
67 void
pool_setarch(Pool * pool,const char * arch)68 pool_setarch(Pool *pool, const char *arch)
69 {
70 if (arch)
71 {
72 int i;
73 /* convert arch to known policy */
74 for (i = 0; archpolicies[i]; i += 2)
75 if (!strcmp(archpolicies[i], arch))
76 {
77 arch = archpolicies[i + 1];
78 break;
79 }
80 }
81 pool_setarchpolicy(pool, arch);
82 }
83
84 /*
85 * we support three relations:
86 *
87 * a = b both architectures a and b are treated as equivalent
88 * a > b a is considered a "better" architecture, the solver
89 * should change from a to b, but must not change from b to a
90 * a : b a is considered a "better" architecture, the solver
91 * must not change the architecture from a to b or b to a
92 */
93 void
pool_setarchpolicy(Pool * pool,const char * arch)94 pool_setarchpolicy(Pool *pool, const char *arch)
95 {
96 unsigned int score = 0x10001;
97 size_t l;
98 char d;
99 Id *id2arch;
100 Id id, lastarch;
101
102 pool->id2arch = solv_free(pool->id2arch);
103 pool->id2color = solv_free(pool->id2color);
104 if (!arch)
105 {
106 pool->lastarch = 0;
107 return;
108 }
109 id = pool->noarchid;
110 lastarch = id + 255;
111 /* note that we overallocate one element to be compatible with
112 * old versions that accessed id2arch[lastarch].
113 * id2arch[lastarch] will always be zero */
114 id2arch = solv_calloc(lastarch + 1, sizeof(Id));
115 id2arch[id] = 1; /* the "noarch" class */
116
117 d = 0;
118 while (*arch)
119 {
120 l = strcspn(arch, ":=>");
121 if (l)
122 {
123 id = pool_strn2id(pool, arch, l, 1);
124 if (id >= lastarch)
125 {
126 id2arch = solv_realloc2(id2arch, (id + 255 + 1), sizeof(Id));
127 memset(id2arch + lastarch + 1, 0, (id + 255 - lastarch) * sizeof(Id));
128 lastarch = id + 255;
129 }
130 if (id2arch[id] == 0)
131 {
132 if (d == ':')
133 score += 0x10000;
134 else if (d == '>')
135 score += 0x00001;
136 id2arch[id] = score;
137 }
138 }
139 arch += l;
140 if ((d = *arch++) == 0)
141 break;
142 }
143 pool->id2arch = id2arch;
144 pool->lastarch = lastarch;
145 }
146
147 unsigned char
pool_arch2color_slow(Pool * pool,Id arch)148 pool_arch2color_slow(Pool *pool, Id arch)
149 {
150 const char *s;
151 unsigned char color;
152
153 if ((unsigned int)arch >= (unsigned int)pool->lastarch)
154 return ARCHCOLOR_ALL;
155 if (!pool->id2color)
156 pool->id2color = solv_calloc(pool->lastarch + 1, 1);
157 s = pool_id2str(pool, arch);
158 if (arch == ARCH_NOARCH || arch == ARCH_ALL || arch == ARCH_ANY)
159 color = ARCHCOLOR_ALL;
160 else if (!strcmp(s, "s390x") || strstr(s, "64"))
161 color = ARCHCOLOR_64;
162 else
163 color = ARCHCOLOR_32;
164 pool->id2color[arch] = color;
165 return color;
166 }
167
168