source/architecture.cpp

   1 #include <limits>
   2 #ifndef WIN32
   3 #include <sys/utsname.h>
   4 #endif
   5 #include <msp/strings/format.h>
   6 #include <msp/strings/utils.h>
   7 #include "architecture.h"
   8 #include "builder.h"
   9
  10 using namespace std;
  11 using namespace Msp;
  12
  13 namespace {
  14
  15 const char *types[] =
  16 {
  17         "x86",
  18         "arm",
  19         "ppc",
  20         0
  21 };
  22
  23 const char *cpus[] =
  24 {
  25         "i386",       "x86",
  26         "i486",       "x86",
  27         "pentium",    "x86",
  28         "pentiumpro", "x86",
  29         "pentium2",   "x86",
  30         "pentium3",   "x86",
  31         "pentium4",   "x86",
  32         "core2",      "x86",
  33         "nehalem",    "x86",
  34         "k6",         "x86",
  35         "athlon",     "x86",
  36         "athlonxp",   "x86",
  37         "athlon64",   "x86",
  38         "armv5",      "arm",
  39         "armv6",      "arm",
  40         "armv7",      "arm",
  41         "armv7a",     "arm",
  42         0
  43 };
  44
  45 const char *systems[] =
  46 {
  47         "linux",
  48         "freebsd",
  49         "darwin",
  50         "windows",
  51         "android",
  52         0
  53 };
  54
  55 const char *aliases[] =
  56 {
  57         "pc",              "x86",
  58         "x86_64",          "x86-64",
  59         "amd64",           "x86-64",
  60         "i586",            "pentium",
  61         "i686",            "pentiumpro",
  62         "corei7",          "nehalem",
  63         "win32",           "windows-32",
  64         "win64",           "windows-64",
  65         "power macintosh", "ppc",
  66         "armeabi",         "arm",
  67         "v7a",             "armv7a",
  68         0
  69 };
  70
  71 }
  72
  73 Architecture::Architecture(Builder &b, const string &spec):
  74         builder(b),
  75         bits(0),
  76         native(false)
  77 {
  78         if(spec.empty())
  79         {
  80 #ifdef WIN32
  81                 system = "windows";
  82 #else
  83                 utsname un;
  84                 if(uname(&un)==0)
  85                 {
  86                         system = tolower(un.sysname);
  87                         parse_specification(tolower(un.machine));
  88                         // We really only want to set type for the default arch
  89                         cpu.clear();
  90                 }
  91 #endif
  92                 bits = sizeof(void *)*numeric_limits<unsigned char>::digits;
  93                 native = true;
  94         }
  95         else
  96         {
  97                 parse_specification(spec);
  98                 const Architecture &native_arch = builder.get_native_arch();
  99                 if(type.empty())
 100                         type = native_arch.type;
 101                 if(system.empty())
 102                         system = native_arch.system;
 103                 if(!bits)
 104                 {
 105                         if(type==native_arch.type)
 106                                 bits = native_arch.bits;
 107                         else
 108                                 bits = 32;
 109                 }
 110
 111                 if(type!=native_arch.type || system!=native_arch.system)
 112                         cross_prefix = format("%s-%s", type, system);
 113                 else if(bits==native_arch.bits)
 114                         native = true;
 115         }
 116         name = type;
 117         if(!cpu.empty())
 118                 name += format("-%s", cpu);
 119         name += format("-%d-%s", bits, system);
 120
 121         if(system=="windows")
 122         {
 123                 sharedlib_patterns.push_back(Pattern("%.dll"));
 124                 sharedlib_patterns.push_back(Pattern("lib%.dll"));
 125                 /* XXX Hack: Consider import libraries (*.dll.a) as dynamic libraries,
 126                 even though technically they are linked statically. */
 127                 sharedlib_patterns.push_back(Pattern("lib%.dll.a"));
 128                 staticlib_patterns.push_back(Pattern("lib%.a"));
 129                 executable_patterns.push_back(Pattern("%.exe"));
 130         }
 131         else
 132         {
 133                 if(system=="darwin")
 134                         sharedlib_patterns.push_back(Pattern("lib%.dylib"));
 135                 else
 136                         sharedlib_patterns.push_back(Pattern("lib%.so"));
 137                 staticlib_patterns.push_back(Pattern("lib%.a"));
 138                 executable_patterns.push_back(Pattern("%"));
 139         }
 140 }
 141
 142 bool Architecture::match_name(const string &pattern) const
 143 {
 144         bool negate = (pattern[0]=='!');
 145         vector<string> parts = split(pattern.substr(negate), "-");
 146         resolve_aliases(parts);
 147         for(vector<string>::const_iterator i=parts.begin(); i!=parts.end(); ++i)
 148         {
 149                 if((*i=="32" && bits==32) || (*i=="64" && bits==64))
 150                         ;
 151                 else if(*i!=type && *i!=cpu && *i!=system)
 152                         return negate;
 153         }
 154         return !negate;
 155 }
 156
 157 string Architecture::best_match(const list<string> &names) const
 158 {
 159         string best;
 160         unsigned best_size = 0;
 161         for(list<string>::const_iterator i=names.begin(); i!=names.end(); ++i)
 162                 if(match_name(*i))
 163                 {
 164                         /* TODO Do full parse and alias resolution here?  Otherwise x86 and
 165                         x86_64 are treated as equally good, even though the latter is more
 166                         specific. */
 167                         unsigned size = 1;
 168                         for(string::const_iterator j=i->begin(); j!=i->end(); ++j)
 169                                 size += (*j=='-');
 170
 171                         if(size>best_size)
 172                         {
 173                                 best = *i;
 174                                 best_size = size;
 175                         }
 176                 }
 177
 178         return best;
 179 }
 180
 181 void Architecture::resolve_aliases(vector<string> &parts)
 182 {
 183         for(unsigned i=0; i<parts.size(); ++i)
 184         {
 185                 const string &part = parts[i];
 186                 const char *replace = 0;
 187                 for(unsigned j=0; (!replace && aliases[j]); j+=2)
 188                         if(part==aliases[j])
 189                                 replace = aliases[j+1];
 190
 191                 if(replace)
 192                 {
 193                         bool has_dash = false;
 194                         for(const char *c=replace; (!has_dash && *c); ++c)
 195                                 has_dash = (*c=='-');
 196
 197                         if(has_dash)
 198                         {
 199                                 vector<string> rparts = split(replace, "-");
 200                                 parts[i] = rparts[0];
 201                                 parts.insert(parts.begin()+i+1, rparts.begin()+1, rparts.end());
 202                                 i += rparts.size()-1;
 203                         }
 204                         else
 205                                 parts[i] = replace;
 206                 }
 207         }
 208 }
 209
 210 void Architecture::parse_specification(const string &spec)
 211 {
 212         vector<string> parts = split(spec, "-");
 213         resolve_aliases(parts);
 214         for(vector<string>::const_iterator i=parts.begin(); i!=parts.end(); ++i)
 215         {
 216                 bool ok = false;
 217
 218                 for(unsigned j=0; (!ok && types[j]); ++j)
 219                         if(*i==types[j])
 220                         {
 221                                 if(!type.empty() && *i!=type)
 222                                         throw invalid_argument("Conflicting type specification");
 223                                 type = *i;
 224                                 ok = true;
 225                         }
 226
 227                 for(unsigned j=0; (!ok && cpus[j]); j+=2)
 228                         if(*i==cpus[j])
 229                         {
 230                                 if(type.empty())
 231                                         type = cpus[j+1];
 232                                 else if(cpus[j+1]!=type)
 233                                         throw invalid_argument("Conflicting CPU specification");
 234                                 cpu = *i;
 235                                 ok = true;
 236                         }
 237
 238                 for(unsigned j=0; (!ok && systems[j]); ++j)
 239                         if(*i==systems[j])
 240                         {
 241                                 system = *i;
 242                                 ok = true;
 243                         }
 244
 245                 if(!ok && (*i=="32" || *i=="64"))
 246                 {
 247                         bits = lexical_cast<unsigned>(*i);
 248                         ok = true;
 249                 }
 250
 251                 if(!ok)
 252                         throw invalid_argument("Unrecognized part in arch specification: "+*i);
 253         }
 254 }
 255
 256
 257 Architecture::Loader::Loader(Architecture &a):
 258         DataFile::ObjectLoader<Architecture>(a)
 259 {
 260         add("prefix", &Architecture::cross_prefix);
 261 }