blob: 5896447f5ea5f2b6c8949337248971d880dd780b [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 Dunbar02476562009-09-08 23:32:35 +000043 Error = "No available targets are compatible with this triple, "
44 "see -version for the available targets.";
Daniel Dunbarbb061292009-07-15 04:24:58 +000045 return 0;
46 }
47
48 // Otherwise, take the best target, but make sure we don't have two equally
49 // good best targets.
50 if (EquallyBest) {
51 Error = std::string("Cannot choose between targets \"") +
52 Best->Name + "\" and \"" + EquallyBest->Name + "\"";
53 return 0;
54 }
55
56 return Best;
57}
58
Daniel Dunbarbb061292009-07-15 04:24:58 +000059void TargetRegistry::RegisterTarget(Target &T,
60 const char *Name,
61 const char *ShortDesc,
62 Target::TripleMatchQualityFnTy TQualityFn,
Daniel Dunbard6fd3772009-07-25 10:09:50 +000063 bool HasJIT) {
Daniel Dunbarfa27ff22009-07-26 02:22:58 +000064 assert(Name && ShortDesc && TQualityFn &&
Daniel Dunbarbb061292009-07-15 04:24:58 +000065 "Missing required target information!");
Daniel Dunbar51b198a2009-07-15 20:24:03 +000066
67 // Check if this target has already been initialized, we allow this as a
68 // convenience to some clients.
69 if (T.Name)
70 return;
Daniel Dunbarbb061292009-07-15 04:24:58 +000071
72 // Add to the list of targets.
73 T.Next = FirstTarget;
Daniel Dunbarf23d4932009-07-15 07:37:49 +000074 FirstTarget = &T;
Daniel Dunbarbb061292009-07-15 04:24:58 +000075
76 T.Name = Name;
77 T.ShortDesc = ShortDesc;
78 T.TripleMatchQualityFn = TQualityFn;
Daniel Dunbard6fd3772009-07-25 10:09:50 +000079 T.HasJIT = HasJIT;
Daniel Dunbarbb061292009-07-15 04:24:58 +000080}
81
Daniel Dunbar4bd03ab2009-08-03 04:20:57 +000082const Target *TargetRegistry::getClosestTargetForJIT(std::string &Error) {
83 const Target *TheTarget = lookupTarget(sys::getHostTriple(), Error);
84
85 if (TheTarget && !TheTarget->hasJIT()) {
86 Error = "No JIT compatible target available for this host";
87 return 0;
88 }
89
90 return TheTarget;
91}
92