blob: 3a181295889502d301d9a6c6960d38b7e92702f8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
//===- PNaClABICheckTypes.h - Verify PNaCl ABI rules --------===//
//
// The LLVM Compiler Infrastructure
//
// This file is distributed under the University of Illinois Open Source
// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//
//
// Common type-checking code for module and function-level passes
//
//
//===----------------------------------------------------------------------===//
#include "PNaClABITypeChecker.h"
#include "llvm/IR/Constant.h"
#include "llvm/IR/DerivedTypes.h"
using namespace llvm;
bool PNaClABITypeChecker::isValidType(const Type *Ty) {
if (VisitedTypes.count(Ty))
return VisitedTypes[Ty];
unsigned Width;
bool Valid = false;
switch (Ty->getTypeID()) {
// Allowed primitive types
case Type::VoidTyID:
case Type::FloatTyID:
case Type::DoubleTyID:
case Type::LabelTyID:
case Type::MetadataTyID:
Valid = true;
break;
// Disallowed primitive types
case Type::HalfTyID:
case Type::X86_FP80TyID:
case Type::FP128TyID:
case Type::PPC_FP128TyID:
case Type::X86_MMXTyID:
Valid = false;
break;
// Derived types
case Type::VectorTyID:
Valid = false;
break;
case Type::IntegerTyID:
Width = cast<const IntegerType>(Ty)->getBitWidth();
Valid = (Width == 1 || Width == 8 || Width == 16 ||
Width == 32 || Width == 64);
break;
case Type::FunctionTyID:
case Type::StructTyID:
case Type::ArrayTyID:
case Type::PointerTyID:
// These types are valid if their contained or pointed-to types are
// valid. Since struct/pointer subtype relationships may be circular,
// mark the current type as valid to avoid infinite recursion
Valid = true;
VisitedTypes[Ty] = true;
for (Type::subtype_iterator I = Ty->subtype_begin(),
E = Ty->subtype_end(); I != E; ++I)
Valid &= isValidType(*I);
break;
// Handle NumTypeIDs, and no default case,
// so we get a warning if new types are added
case Type::NumTypeIDs:
Valid = false;
break;
}
VisitedTypes[Ty] = Valid;
return Valid;
}
Type *PNaClABITypeChecker::checkTypesInValue(const Value *V) {
// TODO: Checking types in values probably belongs in its
// own value checker which also handles the various types of
// constexpr (in particular, blockaddr constexprs cause this code
// to assert rather than go off and try to verify the BBs of a function)
// But this code is in a good consistent checkpoint-able state.
assert(isa<Constant>(V));
if (VisitedConstants.count(V))
return VisitedConstants[V];
if (!isValidType(V->getType())) {
VisitedConstants[V] = V->getType();
return V->getType();
}
// Operand values must also be valid. Values may be circular, so
// mark the current value as valid to avoid infinite recursion.
VisitedConstants[V] = NULL;
const User *U = cast<User>(V);
for (Constant::const_op_iterator I = U->op_begin(),
E = U->op_end(); I != E; ++I) {
Type *Invalid = checkTypesInValue(*I);
if (Invalid) {
VisitedConstants[V] = Invalid;
return Invalid;
}
}
VisitedConstants[V] = NULL;
return NULL;
}
|
