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