blob: 79f30a71f2b57db3eebd69eb080269198feb3251 [file] [log] [blame]
Daniel Dunbarbb061292009-07-15 04:24:58 +00001//===--- TargetRegistry.cpp - Target registration -------------------------===//
2//
3// The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9
10#include "llvm/Target/TargetRegistry.h"
Daniel Dunbard6fd3772009-07-25 10:09:50 +000011#include "llvm/System/Host.h"
Daniel Dunbarbb061292009-07-15 04:24:58 +000012#include <cassert>
13using namespace llvm;
14
Daniel Dunbar73b3ec42009-07-15 07:09:29 +000015// Clients are responsible for avoid race conditions in registration.
Daniel Dunbarbb061292009-07-15 04:24:58 +000016static Target *FirstTarget = 0;
17
Daniel Dunbar603bea32009-07-16 02:06:09 +000018TargetRegistry::iterator TargetRegistry::begin() {
19 return iterator(FirstTarget);
20}
21
Daniel Dunbara5881e32009-07-26 02:12:58 +000022const Target *TargetRegistry::lookupTarget(const std::string &TT,
Daniel Dunbara5881e32009-07-26 02:12:58 +000023 std::string &Error) {
Daniel Dunbar7df0c072009-07-17 15:50:49 +000024 // Provide special warning when no targets are initialized.
25 if (begin() == end()) {
26 Error = "Unable to find target for this triple (no targets are registered)";
27 return 0;
28 }
Daniel Dunbar603bea32009-07-16 02:06:09 +000029 const Target *Best = 0, *EquallyBest = 0;
Daniel Dunbarbb061292009-07-15 04:24:58 +000030 unsigned BestQuality = 0;
Daniel Dunbar603bea32009-07-16 02:06:09 +000031 for (iterator it = begin(), ie = end(); it != ie; ++it) {
32 if (unsigned Qual = it->TripleMatchQualityFn(TT)) {
Daniel Dunbarbb061292009-07-15 04:24:58 +000033 if (!Best || Qual > BestQuality) {
Daniel Dunbar603bea32009-07-16 02:06:09 +000034 Best = &*it;
Daniel Dunbarbb061292009-07-15 04:24:58 +000035 EquallyBest = 0;
36 BestQuality = Qual;
37 } else if (Qual == BestQuality)
Daniel Dunbar603bea32009-07-16 02:06:09 +000038 EquallyBest = &*it;
Daniel Dunbarbb061292009-07-15 04:24:58 +000039 }
40 }
41
42 if (!Best) {
Daniel Dunbar7df0c072009-07-17 15:50:49 +000043 Error = "No available targets are compatible with this triple";
Daniel Dunbarbb061292009-07-15 04:24:58 +000044 return 0;
45 }
46
47 // Otherwise, take the best target, but make sure we don't have two equally
48 // good best targets.
49 if (EquallyBest) {
50 Error = std::string("Cannot choose between targets \"") +
51 Best->Name + "\" and \"" + EquallyBest->Name + "\"";
52 return 0;
53 }
54
55 return Best;
56}
57
Daniel Dunbarbb061292009-07-15 04:24:58 +000058void TargetRegistry::RegisterTarget(Target &T,
59 const char *Name,
60 const char *ShortDesc,
61 Target::TripleMatchQualityFnTy TQualityFn,
Daniel Dunbard6fd3772009-07-25 10:09:50 +000062 bool HasJIT) {
Daniel Dunbarfa27ff22009-07-26 02:22:58 +000063 assert(Name && ShortDesc && TQualityFn &&
Daniel Dunbarbb061292009-07-15 04:24:58 +000064 "Missing required target information!");
Daniel Dunbar51b198a2009-07-15 20:24:03 +000065
66 // Check if this target has already been initialized, we allow this as a
67 // convenience to some clients.
68 if (T.Name)
69 return;
Daniel Dunbarbb061292009-07-15 04:24:58 +000070
71 // Add to the list of targets.
72 T.Next = FirstTarget;
Daniel Dunbarf23d4932009-07-15 07:37:49 +000073 FirstTarget = &T;
Daniel Dunbarbb061292009-07-15 04:24:58 +000074
75 T.Name = Name;
76 T.ShortDesc = ShortDesc;
77 T.TripleMatchQualityFn = TQualityFn;
Daniel Dunbard6fd3772009-07-25 10:09:50 +000078 T.HasJIT = HasJIT;
Daniel Dunbarbb061292009-07-15 04:24:58 +000079}
80
Daniel Dunbar4bd03ab2009-08-03 04:20:57 +000081const Target *TargetRegistry::getClosestTargetForJIT(std::string &Error) {
82 const Target *TheTarget = lookupTarget(sys::getHostTriple(), Error);
83
84 if (TheTarget && !TheTarget->hasJIT()) {
85 Error = "No JIT compatible target available for this host";
86 return 0;
87 }
88
89 return TheTarget;
90}
91