Merge branch 'master' of gitorious.org:opensuse/sat-solver
[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 const char *archpolicies[] = {
24   "x86_64",     "x86_64:i686:i586:i486:i386",
25   "i686",       "i686:i586:i486:i386",
26   "i586",       "i586:i486:i386",
27   "i486",       "i486:i386",
28   "i386",       "i386",
29   "s390x",      "s390x:s390",
30   "s390",       "s390",
31   "ia64",       "ia64:i686:i586:i486:i386",
32   "ppc64",      "ppc64:ppc",
33   "ppc",        "ppc",
34   "armv7nhl",   "armv7nhl:armv7hl",
35   "armv7hl",    "armv7hl",
36   "armv7l",     "armv7l:armv6l:armv5tejl:armv5tel:armv5l:armv4tl:armv4l:armv3l",
37   "armv6l",     "armv6l:armv5tejl:armv5tel:armv5l:armv4tl:armv4l:armv3l",
38   "armv5tejl",  "armv5tejl:armv5tel:armv5l:armv4tl:armv4l:armv3l",
39   "armv5tel",   "armv5tel:armv5l:armv4tl:armv4l:armv3l",
40   "armv5l",     "armv5l:armv4tl:armv4l:armv3l",
41   "armv4tl",    "armv4tl:armv4l:armv3l",
42   "armv4l",     "armv4l:armv3l",
43   "armv3l",     "armv3l",
44   "sh3",        "sh3",
45   "sh4",        "sh4",
46   "sh4a",       "sh4a:sh4",
47   "sparc64v",   "sparc64v:sparc64:sparcv9v:sparcv9:sparcv8:sparc",
48   "sparc64",    "sparc64:sparcv9:sparcv8:sparc",
49   "sparcv9v",   "sparcv9v:sparcv9:sparcv8:sparc",
50   "sparcv9",    "sparcv9:sparcv8:sparc",
51   "sparcv8",    "sparcv8:sparc",
52   "sparc",      "sparc",
53   0
54 };
55
56 void
57 pool_setarch(Pool *pool, const char *arch)
58 {
59   const char *a;
60   unsigned int score = 0x10001;
61   size_t l;
62   char d;
63   int i;
64   Id *id2arch;
65   Id id, lastarch;
66
67   pool->id2arch = sat_free(pool->id2arch);
68   pool->id2color = sat_free(pool->id2color);
69   if (!arch)
70     {
71       pool->lastarch = 0;
72       return;
73     }
74 #ifndef DEBIAN_SEMANTICS
75   id = ARCH_NOARCH;
76 #else
77   id = ARCH_ALL;
78 #endif
79   lastarch = id + 255;
80   id2arch = sat_calloc(lastarch + 1, sizeof(Id));
81   id2arch[id] = 1;
82
83   a = "";
84   for (i = 0; archpolicies[i]; i += 2)
85     if (!strcmp(archpolicies[i], arch))
86       break;
87   if (archpolicies[i])
88     a = archpolicies[i + 1];
89   d = 0;
90   while (*a)
91     {
92       l = strcspn(a, ":=>");
93       if (l)
94         {
95           id = strn2id(pool, a, l, 1);
96           if (id > lastarch)
97             {
98               id2arch = sat_realloc(id2arch, (id + 255 + 1) * sizeof(Id));
99               memset(id2arch + lastarch + 1, 0, (id + 255 - lastarch) * sizeof(Id));
100               lastarch = id + 255;
101             }
102           if (id2arch[id] == 0)
103             {
104               if (d == ':')
105                 score += 0x10000;
106               else if (d == '>')
107                 score += 0x00001;
108               id2arch[id] = score;
109             }
110         }
111       a += l;
112       if ((d = *a++) == 0)
113         break;
114     }
115   pool->id2arch = id2arch;
116   pool->lastarch = lastarch;
117 }
118
119 unsigned char
120 pool_arch2color_slow(Pool *pool, Id arch)
121 {
122   const char *s;
123   unsigned char color;
124
125   if (arch > pool->lastarch)
126     return ARCHCOLOR_ALL;
127   if (!pool->id2color)
128     pool->id2color = sat_calloc(pool->lastarch + 1, 1);
129   s = id2str(pool, arch);
130   if (arch == ARCH_NOARCH || arch == ARCH_ALL)
131     color = ARCHCOLOR_ALL;
132   else if (!strcmp(s, "s390x") || strstr(s, "64"))
133     color = ARCHCOLOR_64;
134   else
135     color = ARCHCOLOR_32;
136   return color;
137 }
138