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   "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
  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
  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
 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