blob: 1a3293775ed615f8d53e9458764ba4ce9a28923f [file] [log] [blame]
Reid Spencer5f016e22007-07-11 17:01:13 +00001//===--- Builtins.cpp - Builtin function implementation -------------------===//
2//
3// The LLVM Compiler Infrastructure
4//
Chris Lattner0bc735f2007-12-29 19:59:25 +00005// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
Reid Spencer5f016e22007-07-11 17:01:13 +00007//
8//===----------------------------------------------------------------------===//
9//
10// This file implements various things for builtin functions.
11//
12//===----------------------------------------------------------------------===//
13
Chris Lattner6b15cdc2009-06-14 01:05:48 +000014#include "clang/Basic/Builtins.h"
Chris Lattnerc7229c32007-10-07 08:58:51 +000015#include "clang/Basic/IdentifierTable.h"
Reid Spencer5f016e22007-07-11 17:01:13 +000016#include "clang/Basic/TargetInfo.h"
17using namespace clang;
18
19static const Builtin::Info BuiltinInfo[] = {
Douglas Gregorb1152d82009-02-16 21:58:21 +000020 { "not a builtin function", 0, 0, 0, false },
21#define BUILTIN(ID, TYPE, ATTRS) { #ID, TYPE, ATTRS, 0, false },
22#define LIBBUILTIN(ID, TYPE, ATTRS, HEADER) { #ID, TYPE, ATTRS, HEADER, false },
Chris Lattner6b15cdc2009-06-14 01:05:48 +000023#include "clang/Basic/Builtins.def"
Reid Spencer5f016e22007-07-11 17:01:13 +000024};
25
26const Builtin::Info &Builtin::Context::GetRecord(unsigned ID) const {
27 if (ID < Builtin::FirstTSBuiltin)
28 return BuiltinInfo[ID];
29 assert(ID - Builtin::FirstTSBuiltin < NumTSRecords && "Invalid builtin ID!");
30 return TSRecords[ID - Builtin::FirstTSBuiltin];
31}
32
Chris Lattner030e8fe2009-06-16 16:18:48 +000033Builtin::Context::Context(const TargetInfo &Target) {
34 // Get the target specific builtins from the target.
Chris Lattnerff1d4d92009-06-16 17:27:50 +000035 TSRecords = 0;
36 NumTSRecords = 0;
Mike Stump1eb44332009-09-09 15:08:12 +000037 Target.getTargetBuiltins(TSRecords, NumTSRecords);
Chris Lattner030e8fe2009-06-16 16:18:48 +000038}
39
Reid Spencer5f016e22007-07-11 17:01:13 +000040/// InitializeBuiltins - Mark the identifiers for all the builtins with their
41/// appropriate builtin ID # and mark any non-portable builtin identifiers as
42/// such.
43void Builtin::Context::InitializeBuiltins(IdentifierTable &Table,
Chris Lattner7644f072009-03-13 22:38:49 +000044 bool NoBuiltins) {
Reid Spencer5f016e22007-07-11 17:01:13 +000045 // Step #1: mark all target-independent builtins with their ID's.
46 for (unsigned i = Builtin::NotBuiltin+1; i != Builtin::FirstTSBuiltin; ++i)
Douglas Gregor3573c0c2009-02-14 20:49:29 +000047 if (!BuiltinInfo[i].Suppressed &&
Chris Lattner7644f072009-03-13 22:38:49 +000048 (!NoBuiltins || !strchr(BuiltinInfo[i].Attributes, 'f')))
Douglas Gregor3573c0c2009-02-14 20:49:29 +000049 Table.get(BuiltinInfo[i].Name).setBuiltinID(i);
Chris Lattner1b63e4f2009-06-14 01:54:56 +000050
Douglas Gregor71dfdb92009-04-22 04:56:28 +000051 // Step #2: Register target-specific builtins.
Reid Spencer5f016e22007-07-11 17:01:13 +000052 for (unsigned i = 0, e = NumTSRecords; i != e; ++i)
Douglas Gregor3573c0c2009-02-14 20:49:29 +000053 if (!TSRecords[i].Suppressed &&
Mike Stump1eb44332009-09-09 15:08:12 +000054 (!NoBuiltins ||
55 (TSRecords[i].Attributes &&
Daniel Dunbare8699902009-02-15 18:23:07 +000056 !strchr(TSRecords[i].Attributes, 'f'))))
Douglas Gregor3573c0c2009-02-14 20:49:29 +000057 Table.get(TSRecords[i].Name).setBuiltinID(i+Builtin::FirstTSBuiltin);
Reid Spencer5f016e22007-07-11 17:01:13 +000058}
59
Mike Stump1eb44332009-09-09 15:08:12 +000060void
Douglas Gregor2deaea32009-04-22 18:49:13 +000061Builtin::Context::GetBuiltinNames(llvm::SmallVectorImpl<const char *> &Names,
62 bool NoBuiltins) {
63 // Final all target-independent names
64 for (unsigned i = Builtin::NotBuiltin+1; i != Builtin::FirstTSBuiltin; ++i)
65 if (!BuiltinInfo[i].Suppressed &&
66 (!NoBuiltins || !strchr(BuiltinInfo[i].Attributes, 'f')))
67 Names.push_back(BuiltinInfo[i].Name);
Mike Stump1eb44332009-09-09 15:08:12 +000068
Douglas Gregor2deaea32009-04-22 18:49:13 +000069 // Find target-specific names.
70 for (unsigned i = 0, e = NumTSRecords; i != e; ++i)
71 if (!TSRecords[i].Suppressed &&
Mike Stump1eb44332009-09-09 15:08:12 +000072 (!NoBuiltins ||
73 (TSRecords[i].Attributes &&
Douglas Gregor2deaea32009-04-22 18:49:13 +000074 !strchr(TSRecords[i].Attributes, 'f'))))
75 Names.push_back(TSRecords[i].Name);
76}
77
Mike Stump1eb44332009-09-09 15:08:12 +000078bool
79Builtin::Context::isPrintfLike(unsigned ID, unsigned &FormatIdx,
Douglas Gregora316e7b2009-02-14 00:32:47 +000080 bool &HasVAListArg) {
Cedric Venetea684e62009-02-14 16:15:20 +000081 const char *Printf = strpbrk(GetRecord(ID).Attributes, "pP");
Douglas Gregora316e7b2009-02-14 00:32:47 +000082 if (!Printf)
83 return false;
84
85 HasVAListArg = (*Printf == 'P');
86
87 ++Printf;
88 assert(*Printf == ':' && "p or P specifier must have be followed by a ':'");
89 ++Printf;
90
Chris Lattner8a778d62009-02-19 06:41:13 +000091 assert(strchr(Printf, ':') && "printf specifier must end with a ':'");
Douglas Gregora316e7b2009-02-14 00:32:47 +000092 FormatIdx = strtol(Printf, 0, 10);
93 return true;
94}
95