Imported Upstream version 0.6.15
[platform/upstream/libsolv.git] / src / poolarch.c
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   "i386",       "i386",
33   "s390x",      "s390x:s390",
34   "s390",       "s390",
35   "ppc64le",    "ppc64le",
36   "ppc64",      "ppc64:ppc",
37   "ppc",        "ppc",
38   "ppc64p7",    "ppc64p7:ppc64:ppc",
39   "ia64",       "ia64:i686:i586:i486:i386",
40   "aarch64",    "aarch64",
41   "armv6hl",    "armv6hl",
42   "armv7hnl",   "armv7hnl:armv7hl:armv6hl",
43   "armv7hl",    "armv7hl:armv6hl",
44   "armv7l",     "armv7l:armv6l:armv5tejl:armv5tel:armv5l:armv4tl:armv4l:armv3l",
45   "armv6l",     "armv6l:armv5tejl:armv5tel:armv5l:armv4tl:armv4l:armv3l",
46   "armv5tejl",  "armv5tejl:armv5tel:armv5l:armv4tl:armv4l:armv3l",
47   "armv5tel",   "armv5tel:armv5l:armv4tl:armv4l:armv3l",
48   "armv5tl",    "armv5l:armv4tl:armv4l:armv3l",
49   "armv5l",     "armv5l:armv4tl:armv4l:armv3l",
50   "armv4tl",    "armv4tl:armv4l:armv3l",
51   "armv4l",     "armv4l:armv3l",
52   "armv3l",     "armv3l",
53   "sh3",        "sh3",
54   "sh4",        "sh4",
55   "sh4a",       "sh4a:sh4",
56   "sparc64v",   "sparc64v:sparc64:sparcv9v:sparcv9:sparcv8:sparc",
57   "sparc64",    "sparc64:sparcv9:sparcv8:sparc",
58   "sparcv9v",   "sparcv9v:sparcv9:sparcv8:sparc",
59   "sparcv9",    "sparcv9:sparcv8:sparc",
60   "sparcv8",    "sparcv8:sparc",
61   "sparc",      "sparc",
62   "mips",       "mips",
63   "mipsel",     "mipsel",
64   "mips64",     "mips64",
65   "mips64el",   "mips64el",
66   "m68k",       "m68k",
67 #if defined(FEDORA) || defined(MAGEIA)
68   "ia32e",      "ia32e:x86_64:athlon:i686:i586:i486:i386",
69   "athlon",     "athlon:i686:i586:i486:i386",
70   "amd64",      "amd64:x86_64:athlon:i686:i586:i486:i386",
71   "geode",      "geode:i586:i486:i386",
72   "ppc64iseries", "ppc64iseries:ppc64:ppc",
73   "ppc64pseries", "ppc64pseries:ppc64:ppc",
74 #endif
75   0
76 };
77
78 void
79 pool_setarch(Pool *pool, const char *arch)
80 {
81   if (arch)
82     {
83       int i;
84
85       /* convert arch to known policy */
86       for (i = 0; archpolicies[i]; i += 2)
87         if (!strcmp(archpolicies[i], arch))
88           break;
89       if (archpolicies[i])
90         arch = archpolicies[i + 1];
91       else
92         arch = "";
93     }
94   pool_setarchpolicy(pool, arch);
95 }
96
97 /*
98  * we support three relations:
99  *
100  * a = b   both architectures a and b are treated as equivalent
101  * a > b   a is considered a "better" architecture, the solver
102  *         should change from a to b, but must not change from b to a
103  * a : b   a is considered a "better" architecture, the solver
104  *         must not change the architecture from a to b or b to a
105  */
106 void
107 pool_setarchpolicy(Pool *pool, const char *arch)
108 {
109   unsigned int score = 0x10001;
110   size_t l;
111   char d;
112   Id *id2arch;
113   Id id, lastarch;
114
115   pool->id2arch = solv_free(pool->id2arch);
116   pool->id2color = solv_free(pool->id2color);
117   if (!arch)
118     {
119       pool->lastarch = 0;
120       return;
121     }
122   id = pool->noarchid;
123   lastarch = id + 255;
124   id2arch = solv_calloc(lastarch + 1, sizeof(Id));
125   id2arch[id] = 1;      /* the "noarch" class */
126
127   d = 0;
128   while (*arch)
129     {
130       l = strcspn(arch, ":=>");
131       if (l)
132         {
133           id = pool_strn2id(pool, arch, l, 1);
134           if (id > lastarch)
135             {
136               id2arch = solv_realloc2(id2arch, (id + 255 + 1), sizeof(Id));
137               memset(id2arch + lastarch + 1, 0, (id + 255 - lastarch) * sizeof(Id));
138               lastarch = id + 255;
139             }
140           if (id2arch[id] == 0)
141             {
142               if (d == ':')
143                 score += 0x10000;
144               else if (d == '>')
145                 score += 0x00001;
146               id2arch[id] = score;
147             }
148         }
149       arch += l;
150       if ((d = *arch++) == 0)
151         break;
152     }
153   pool->id2arch = id2arch;
154   pool->lastarch = lastarch;
155 }
156
157 unsigned char
158 pool_arch2color_slow(Pool *pool, Id arch)
159 {
160   const char *s;
161   unsigned char color;
162
163   if (arch > pool->lastarch)
164     return ARCHCOLOR_ALL;
165   if (!pool->id2color)
166     pool->id2color = solv_calloc(pool->lastarch + 1, 1);
167   s = pool_id2str(pool, arch);
168   if (arch == ARCH_NOARCH || arch == ARCH_ALL || arch == ARCH_ANY)
169     color = ARCHCOLOR_ALL;
170   else if (!strcmp(s, "s390x") || strstr(s, "64"))
171     color = ARCHCOLOR_64;
172   else
173     color = ARCHCOLOR_32;
174   pool->id2color[arch] = color;
175   return color;
176 }
177