Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 1 | //===--- CGExprConstant.cpp - Emit LLVM Code from Constant Expressions ----===// |
| 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 | // This contains code to emit Constant Expr nodes as LLVM code. |
| 11 | // |
| 12 | //===----------------------------------------------------------------------===// |
| 13 | |
| 14 | #include "CodeGenFunction.h" |
| 15 | #include "CodeGenModule.h" |
Daniel Dunbar | af2f62c | 2008-08-13 00:59:25 +0000 | [diff] [blame] | 16 | #include "CGObjCRuntime.h" |
Chris Lattner | f6b24ea | 2008-10-06 05:59:01 +0000 | [diff] [blame] | 17 | #include "clang/AST/APValue.h" |
Daniel Dunbar | de7fb84 | 2008-08-11 05:00:27 +0000 | [diff] [blame] | 18 | #include "clang/AST/ASTContext.h" |
| 19 | #include "clang/AST/StmtVisitor.h" |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 20 | #include "llvm/Constants.h" |
| 21 | #include "llvm/Function.h" |
| 22 | #include "llvm/GlobalVariable.h" |
| 23 | #include "llvm/Support/Compiler.h" |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 24 | #include "llvm/Target/TargetData.h" |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 25 | using namespace clang; |
| 26 | using namespace CodeGen; |
| 27 | |
| 28 | namespace { |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 29 | class VISIBILITY_HIDDEN ConstExprEmitter : |
| 30 | public StmtVisitor<ConstExprEmitter, llvm::Constant*> { |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 31 | CodeGenModule &CGM; |
Lauro Ramos Venancio | 8137335 | 2008-02-26 21:41:45 +0000 | [diff] [blame] | 32 | CodeGenFunction *CGF; |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 33 | public: |
Lauro Ramos Venancio | 8137335 | 2008-02-26 21:41:45 +0000 | [diff] [blame] | 34 | ConstExprEmitter(CodeGenModule &cgm, CodeGenFunction *cgf) |
| 35 | : CGM(cgm), CGF(cgf) { |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 36 | } |
| 37 | |
| 38 | //===--------------------------------------------------------------------===// |
| 39 | // Visitor Methods |
| 40 | //===--------------------------------------------------------------------===// |
| 41 | |
| 42 | llvm::Constant *VisitStmt(Stmt *S) { |
Daniel Dunbar | 488e993 | 2008-08-16 00:56:44 +0000 | [diff] [blame] | 43 | CGM.ErrorUnsupported(S, "constant expression"); |
Chris Lattner | 98be494 | 2008-03-05 18:54:05 +0000 | [diff] [blame] | 44 | QualType T = cast<Expr>(S)->getType(); |
| 45 | return llvm::UndefValue::get(CGM.getTypes().ConvertType(T)); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 46 | } |
| 47 | |
| 48 | llvm::Constant *VisitParenExpr(ParenExpr *PE) { |
| 49 | return Visit(PE->getSubExpr()); |
| 50 | } |
Anders Carlsson | bcf6225 | 2008-11-22 02:34:39 +0000 | [diff] [blame] | 51 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 52 | llvm::Constant *VisitCompoundLiteralExpr(CompoundLiteralExpr *E) { |
| 53 | return Visit(E->getInitializer()); |
| 54 | } |
| 55 | |
Argyrios Kyrtzidis | 0835a3c | 2008-08-18 23:01:59 +0000 | [diff] [blame] | 56 | llvm::Constant *VisitCastExpr(CastExpr* E) { |
Nuno Lopes | 81e51e2 | 2009-01-17 00:48:48 +0000 | [diff] [blame] | 57 | // GCC cast to union extension |
| 58 | if (E->getType()->isUnionType()) { |
| 59 | const llvm::Type *Ty = ConvertType(E->getType()); |
| 60 | return EmitUnion(CGM.EmitConstantExpr(E->getSubExpr(), CGF), Ty); |
| 61 | } |
| 62 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 63 | llvm::Constant *C = Visit(E->getSubExpr()); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 64 | return EmitConversion(C, E->getSubExpr()->getType(), E->getType()); |
| 65 | } |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 66 | |
Chris Lattner | 0442108 | 2008-04-08 04:40:51 +0000 | [diff] [blame] | 67 | llvm::Constant *VisitCXXDefaultArgExpr(CXXDefaultArgExpr *DAE) { |
| 68 | return Visit(DAE->getExpr()); |
| 69 | } |
| 70 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 71 | llvm::Constant *EmitArrayInitialization(InitListExpr *ILE) { |
Eli Friedman | 4d1c018 | 2008-02-21 17:45:41 +0000 | [diff] [blame] | 72 | std::vector<llvm::Constant*> Elts; |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 73 | const llvm::ArrayType *AType = |
| 74 | cast<llvm::ArrayType>(ConvertType(ILE->getType())); |
Eli Friedman | 4d1c018 | 2008-02-21 17:45:41 +0000 | [diff] [blame] | 75 | unsigned NumInitElements = ILE->getNumInits(); |
| 76 | // FIXME: Check for wide strings |
| 77 | if (NumInitElements > 0 && isa<StringLiteral>(ILE->getInit(0)) && |
Chris Lattner | c63a1f2 | 2008-08-04 07:31:14 +0000 | [diff] [blame] | 78 | ILE->getType()->getArrayElementTypeNoTypeQual()->isCharType()) |
Eli Friedman | 4d1c018 | 2008-02-21 17:45:41 +0000 | [diff] [blame] | 79 | return Visit(ILE->getInit(0)); |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 80 | const llvm::Type *ElemTy = AType->getElementType(); |
| 81 | unsigned NumElements = AType->getNumElements(); |
| 82 | |
| 83 | // Initialising an array requires us to automatically |
| 84 | // initialise any elements that have not been initialised explicitly |
| 85 | unsigned NumInitableElts = std::min(NumInitElements, NumElements); |
| 86 | |
| 87 | // Copy initializer elements. |
| 88 | unsigned i = 0; |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 89 | bool RewriteType = false; |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 90 | for (; i < NumInitableElts; ++i) { |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 91 | llvm::Constant *C = CGM.EmitConstantExpr(ILE->getInit(i), CGF); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 92 | if (!C) |
| 93 | return 0; |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 94 | RewriteType |= (C->getType() != ElemTy); |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 95 | Elts.push_back(C); |
| 96 | } |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 97 | |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 98 | // Initialize remaining array elements. |
| 99 | for (; i < NumElements; ++i) |
| 100 | Elts.push_back(llvm::Constant::getNullValue(ElemTy)); |
| 101 | |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 102 | if (RewriteType) { |
| 103 | // FIXME: Try to avoid packing the array |
| 104 | std::vector<const llvm::Type*> Types; |
| 105 | for (unsigned i = 0; i < Elts.size(); ++i) |
| 106 | Types.push_back(Elts[i]->getType()); |
| 107 | const llvm::StructType *SType = llvm::StructType::get(Types, true); |
| 108 | return llvm::ConstantStruct::get(SType, Elts); |
| 109 | } |
| 110 | |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 111 | return llvm::ConstantArray::get(AType, Elts); |
| 112 | } |
| 113 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 114 | void InsertBitfieldIntoStruct(std::vector<llvm::Constant*>& Elts, |
| 115 | FieldDecl* Field, Expr* E) { |
| 116 | // Calculate the value to insert |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 117 | llvm::Constant *C = CGM.EmitConstantExpr(E, CGF); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 118 | if (!C) |
| 119 | return; |
| 120 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 121 | llvm::ConstantInt *CI = dyn_cast<llvm::ConstantInt>(C); |
| 122 | if (!CI) { |
Daniel Dunbar | 488e993 | 2008-08-16 00:56:44 +0000 | [diff] [blame] | 123 | CGM.ErrorUnsupported(E, "bitfield initialization"); |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 124 | return; |
| 125 | } |
| 126 | llvm::APInt V = CI->getValue(); |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 127 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 128 | // Calculate information about the relevant field |
| 129 | const llvm::Type* Ty = CI->getType(); |
Daniel Dunbar | 9ca8bb0 | 2008-08-10 07:00:24 +0000 | [diff] [blame] | 130 | const llvm::TargetData &TD = CGM.getTypes().getTargetData(); |
Eli Friedman | 7f5221b | 2009-02-01 08:12:19 +0000 | [diff] [blame] | 131 | unsigned size = TD.getTypePaddedSizeInBits(Ty); |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 132 | unsigned fieldOffset = CGM.getTypes().getLLVMFieldNo(Field) * size; |
| 133 | CodeGenTypes::BitFieldInfo bitFieldInfo = |
| 134 | CGM.getTypes().getBitFieldInfo(Field); |
| 135 | fieldOffset += bitFieldInfo.Begin; |
| 136 | |
| 137 | // Find where to start the insertion |
| 138 | // FIXME: This is O(n^2) in the number of bit-fields! |
| 139 | // FIXME: This won't work if the struct isn't completely packed! |
| 140 | unsigned offset = 0, i = 0; |
| 141 | while (offset < (fieldOffset & -8)) |
Eli Friedman | 7f5221b | 2009-02-01 08:12:19 +0000 | [diff] [blame] | 142 | offset += TD.getTypePaddedSizeInBits(Elts[i++]->getType()); |
Daniel Dunbar | 9ca8bb0 | 2008-08-10 07:00:24 +0000 | [diff] [blame] | 143 | |
| 144 | // Advance over 0 sized elements (must terminate in bounds since |
| 145 | // the bitfield must have a size). |
Eli Friedman | 7f5221b | 2009-02-01 08:12:19 +0000 | [diff] [blame] | 146 | while (TD.getTypePaddedSizeInBits(Elts[i]->getType()) == 0) |
Daniel Dunbar | 9ca8bb0 | 2008-08-10 07:00:24 +0000 | [diff] [blame] | 147 | ++i; |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 148 | |
Daniel Dunbar | 1f3846e | 2008-07-17 21:07:48 +0000 | [diff] [blame] | 149 | // Promote the size of V if necessary |
| 150 | // FIXME: This should never occur, but currently it can because |
| 151 | // initializer constants are cast to bool, and because clang is |
| 152 | // not enforcing bitfield width limits. |
| 153 | if (bitFieldInfo.Size > V.getBitWidth()) |
| 154 | V.zext(bitFieldInfo.Size); |
| 155 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 156 | // Insert the bits into the struct |
| 157 | // FIXME: This algorthm is only correct on X86! |
| 158 | // FIXME: THis algorthm assumes bit-fields only have byte-size elements! |
| 159 | unsigned bitsToInsert = bitFieldInfo.Size; |
| 160 | unsigned curBits = std::min(8 - (fieldOffset & 7), bitsToInsert); |
| 161 | unsigned byte = V.getLoBits(curBits).getZExtValue() << (fieldOffset & 7); |
| 162 | do { |
| 163 | llvm::Constant* byteC = llvm::ConstantInt::get(llvm::Type::Int8Ty, byte); |
| 164 | Elts[i] = llvm::ConstantExpr::getOr(Elts[i], byteC); |
| 165 | ++i; |
| 166 | V = V.lshr(curBits); |
| 167 | bitsToInsert -= curBits; |
| 168 | |
| 169 | if (!bitsToInsert) |
| 170 | break; |
| 171 | |
| 172 | curBits = bitsToInsert > 8 ? 8 : bitsToInsert; |
| 173 | byte = V.getLoBits(curBits).getZExtValue(); |
| 174 | } while (true); |
| 175 | } |
| 176 | |
| 177 | llvm::Constant *EmitStructInitialization(InitListExpr *ILE) { |
| 178 | const llvm::StructType *SType = |
| 179 | cast<llvm::StructType>(ConvertType(ILE->getType())); |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 180 | RecordDecl *RD = ILE->getType()->getAsRecordType()->getDecl(); |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 181 | std::vector<llvm::Constant*> Elts; |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 182 | |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 183 | // Initialize the whole structure to zero. |
| 184 | for (unsigned i = 0; i < SType->getNumElements(); ++i) { |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 185 | const llvm::Type *FieldTy = SType->getElementType(i); |
| 186 | Elts.push_back(llvm::Constant::getNullValue(FieldTy)); |
| 187 | } |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 188 | |
| 189 | // Copy initializer elements. Skip padding fields. |
| 190 | unsigned EltNo = 0; // Element no in ILE |
| 191 | int FieldNo = 0; // Field no in RecordDecl |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 192 | bool RewriteType = false; |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 193 | for (RecordDecl::field_iterator Field = RD->field_begin(), |
| 194 | FieldEnd = RD->field_end(); |
| 195 | EltNo < ILE->getNumInits() && Field != FieldEnd; ++Field) { |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 196 | FieldNo++; |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 197 | if (!Field->getIdentifier()) |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 198 | continue; |
| 199 | |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 200 | if (Field->isBitField()) { |
| 201 | InsertBitfieldIntoStruct(Elts, *Field, ILE->getInit(EltNo)); |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 202 | } else { |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 203 | unsigned FieldNo = CGM.getTypes().getLLVMFieldNo(*Field); |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 204 | llvm::Constant *C = CGM.EmitConstantExpr(ILE->getInit(EltNo), CGF); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 205 | if (!C) return 0; |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 206 | RewriteType |= (C->getType() != Elts[FieldNo]->getType()); |
| 207 | Elts[FieldNo] = C; |
Eli Friedman | 017cbdf | 2008-05-20 00:11:07 +0000 | [diff] [blame] | 208 | } |
| 209 | EltNo++; |
| 210 | } |
| 211 | |
Eli Friedman | a04a153 | 2008-05-30 19:58:50 +0000 | [diff] [blame] | 212 | if (RewriteType) { |
| 213 | // FIXME: Make this work for non-packed structs |
| 214 | assert(SType->isPacked() && "Cannot recreate unpacked structs"); |
| 215 | std::vector<const llvm::Type*> Types; |
| 216 | for (unsigned i = 0; i < Elts.size(); ++i) |
| 217 | Types.push_back(Elts[i]->getType()); |
| 218 | SType = llvm::StructType::get(Types, true); |
| 219 | } |
| 220 | |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 221 | return llvm::ConstantStruct::get(SType, Elts); |
| 222 | } |
| 223 | |
Nuno Lopes | 81e51e2 | 2009-01-17 00:48:48 +0000 | [diff] [blame] | 224 | llvm::Constant *EmitUnion(llvm::Constant *C, const llvm::Type *Ty) { |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 225 | if (!C) |
| 226 | return 0; |
| 227 | |
Nuno Lopes | 81e51e2 | 2009-01-17 00:48:48 +0000 | [diff] [blame] | 228 | // Build a struct with the union sub-element as the first member, |
| 229 | // and padded to the appropriate size |
| 230 | std::vector<llvm::Constant*> Elts; |
| 231 | std::vector<const llvm::Type*> Types; |
| 232 | Elts.push_back(C); |
| 233 | Types.push_back(C->getType()); |
Eli Friedman | 7f5221b | 2009-02-01 08:12:19 +0000 | [diff] [blame] | 234 | unsigned CurSize = CGM.getTargetData().getTypePaddedSize(C->getType()); |
| 235 | unsigned TotalSize = CGM.getTargetData().getTypePaddedSize(Ty); |
Nuno Lopes | 81e51e2 | 2009-01-17 00:48:48 +0000 | [diff] [blame] | 236 | while (CurSize < TotalSize) { |
| 237 | Elts.push_back(llvm::Constant::getNullValue(llvm::Type::Int8Ty)); |
| 238 | Types.push_back(llvm::Type::Int8Ty); |
| 239 | CurSize++; |
| 240 | } |
| 241 | |
| 242 | // This always generates a packed struct |
| 243 | // FIXME: Try to generate an unpacked struct when we can |
| 244 | llvm::StructType* STy = llvm::StructType::get(Types, true); |
| 245 | return llvm::ConstantStruct::get(STy, Elts); |
| 246 | } |
| 247 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 248 | llvm::Constant *EmitUnionInitialization(InitListExpr *ILE) { |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 249 | const llvm::Type *Ty = ConvertType(ILE->getType()); |
| 250 | |
Douglas Gregor | 0bb7689 | 2009-01-29 16:53:55 +0000 | [diff] [blame] | 251 | // If this is an empty initializer list, we value-initialize the |
| 252 | // union. |
| 253 | if (ILE->getNumInits() == 0) |
| 254 | return llvm::Constant::getNullValue(Ty); |
Douglas Gregor | 34e7946 | 2009-01-28 23:36:17 +0000 | [diff] [blame] | 255 | |
Douglas Gregor | 0bb7689 | 2009-01-29 16:53:55 +0000 | [diff] [blame] | 256 | FieldDecl* curField = ILE->getInitializedFieldInUnion(); |
| 257 | if (!curField) { |
Douglas Gregor | 0bb7689 | 2009-01-29 16:53:55 +0000 | [diff] [blame] | 258 | // There's no field to initialize, so value-initialize the union. |
| 259 | #ifndef NDEBUG |
| 260 | // Make sure that it's really an empty and not a failure of |
| 261 | // semantic analysis. |
Douglas Gregor | 71d8174 | 2009-02-11 16:17:49 +0000 | [diff] [blame] | 262 | RecordDecl *RD = ILE->getType()->getAsRecordType()->getDecl(); |
Douglas Gregor | 0bb7689 | 2009-01-29 16:53:55 +0000 | [diff] [blame] | 263 | for (RecordDecl::field_iterator Field = RD->field_begin(), |
| 264 | FieldEnd = RD->field_end(); |
| 265 | Field != FieldEnd; ++Field) |
| 266 | assert(Field->isUnnamedBitfield() && "Only unnamed bitfields allowed"); |
| 267 | #endif |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 268 | return llvm::Constant::getNullValue(Ty); |
Douglas Gregor | 0bb7689 | 2009-01-29 16:53:55 +0000 | [diff] [blame] | 269 | } |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 270 | |
| 271 | if (curField->isBitField()) { |
| 272 | // Create a dummy struct for bit-field insertion |
Daniel Dunbar | 491c7b7 | 2009-01-12 21:08:18 +0000 | [diff] [blame] | 273 | unsigned NumElts = CGM.getTargetData().getTypePaddedSize(Ty) / 8; |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 274 | llvm::Constant* NV = llvm::Constant::getNullValue(llvm::Type::Int8Ty); |
| 275 | std::vector<llvm::Constant*> Elts(NumElts, NV); |
| 276 | |
| 277 | InsertBitfieldIntoStruct(Elts, curField, ILE->getInit(0)); |
| 278 | const llvm::ArrayType *RetTy = |
| 279 | llvm::ArrayType::get(NV->getType(), NumElts); |
| 280 | return llvm::ConstantArray::get(RetTy, Elts); |
| 281 | } |
| 282 | |
Nuno Lopes | 81e51e2 | 2009-01-17 00:48:48 +0000 | [diff] [blame] | 283 | return EmitUnion(CGM.EmitConstantExpr(ILE->getInit(0), CGF), Ty); |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 284 | } |
| 285 | |
| 286 | llvm::Constant *EmitVectorInitialization(InitListExpr *ILE) { |
| 287 | const llvm::VectorType *VType = |
| 288 | cast<llvm::VectorType>(ConvertType(ILE->getType())); |
Eli Friedman | cfb313b | 2008-05-30 12:02:14 +0000 | [diff] [blame] | 289 | const llvm::Type *ElemTy = VType->getElementType(); |
| 290 | std::vector<llvm::Constant*> Elts; |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 291 | unsigned NumElements = VType->getNumElements(); |
Eli Friedman | cfb313b | 2008-05-30 12:02:14 +0000 | [diff] [blame] | 292 | unsigned NumInitElements = ILE->getNumInits(); |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 293 | |
Eli Friedman | cfb313b | 2008-05-30 12:02:14 +0000 | [diff] [blame] | 294 | unsigned NumInitableElts = std::min(NumInitElements, NumElements); |
| 295 | |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 296 | // Copy initializer elements. |
| 297 | unsigned i = 0; |
Eli Friedman | cfb313b | 2008-05-30 12:02:14 +0000 | [diff] [blame] | 298 | for (; i < NumInitableElts; ++i) { |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 299 | llvm::Constant *C = CGM.EmitConstantExpr(ILE->getInit(i), CGF); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 300 | if (!C) |
| 301 | return 0; |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 302 | Elts.push_back(C); |
| 303 | } |
| 304 | |
Eli Friedman | cfb313b | 2008-05-30 12:02:14 +0000 | [diff] [blame] | 305 | for (; i < NumElements; ++i) |
| 306 | Elts.push_back(llvm::Constant::getNullValue(ElemTy)); |
| 307 | |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 308 | return llvm::ConstantVector::get(VType, Elts); |
| 309 | } |
Anders Carlsson | 7d801ea | 2009-01-30 06:13:25 +0000 | [diff] [blame] | 310 | |
| 311 | llvm::Constant *VisitImplicitValueInitExpr(ImplicitValueInitExpr* E) { |
| 312 | const llvm::Type* RetTy = CGM.getTypes().ConvertType(E->getType()); |
| 313 | return llvm::Constant::getNullValue(RetTy); |
| 314 | } |
| 315 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 316 | llvm::Constant *VisitInitListExpr(InitListExpr *ILE) { |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 317 | if (ILE->getType()->isScalarType()) { |
| 318 | // We have a scalar in braces. Just use the first element. |
| 319 | if (ILE->getNumInits() > 0) |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 320 | return CGM.EmitConstantExpr(ILE->getInit(0), CGF); |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 321 | |
| 322 | const llvm::Type* RetTy = CGM.getTypes().ConvertType(ILE->getType()); |
| 323 | return llvm::Constant::getNullValue(RetTy); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 324 | } |
Chris Lattner | be20bb5 | 2008-10-26 23:53:12 +0000 | [diff] [blame] | 325 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 326 | if (ILE->getType()->isArrayType()) |
| 327 | return EmitArrayInitialization(ILE); |
Devang Patel | 47fb697 | 2008-01-29 23:23:18 +0000 | [diff] [blame] | 328 | |
Eli Friedman | a823400 | 2008-05-30 10:24:46 +0000 | [diff] [blame] | 329 | if (ILE->getType()->isStructureType()) |
| 330 | return EmitStructInitialization(ILE); |
| 331 | |
| 332 | if (ILE->getType()->isUnionType()) |
| 333 | return EmitUnionInitialization(ILE); |
| 334 | |
| 335 | if (ILE->getType()->isVectorType()) |
| 336 | return EmitVectorInitialization(ILE); |
| 337 | |
Devang Patel | eae1560 | 2008-02-05 02:39:50 +0000 | [diff] [blame] | 338 | assert(0 && "Unable to handle InitListExpr"); |
Chris Lattner | 2b94fe3 | 2008-03-01 08:45:05 +0000 | [diff] [blame] | 339 | // Get rid of control reaches end of void function warning. |
| 340 | // Not reached. |
| 341 | return 0; |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 342 | } |
Eli Friedman | 3b707e7 | 2008-02-21 17:57:49 +0000 | [diff] [blame] | 343 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 344 | llvm::Constant *VisitImplicitCastExpr(ImplicitCastExpr *ICExpr) { |
Eli Friedman | 3b707e7 | 2008-02-21 17:57:49 +0000 | [diff] [blame] | 345 | Expr* SExpr = ICExpr->getSubExpr(); |
| 346 | QualType SType = SExpr->getType(); |
| 347 | llvm::Constant *C; // the intermediate expression |
| 348 | QualType T; // the type of the intermediate expression |
| 349 | if (SType->isArrayType()) { |
| 350 | // Arrays decay to a pointer to the first element |
| 351 | // VLAs would require special handling, but they can't occur here |
| 352 | C = EmitLValue(SExpr); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 353 | llvm::Constant *Idx0 = llvm::ConstantInt::get(llvm::Type::Int32Ty, 0); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 354 | llvm::Constant *Ops[] = {Idx0, Idx0}; |
| 355 | C = llvm::ConstantExpr::getGetElementPtr(C, Ops, 2); |
Chris Lattner | c63a1f2 | 2008-08-04 07:31:14 +0000 | [diff] [blame] | 356 | T = CGM.getContext().getArrayDecayedType(SType); |
Eli Friedman | 3b707e7 | 2008-02-21 17:57:49 +0000 | [diff] [blame] | 357 | } else if (SType->isFunctionType()) { |
| 358 | // Function types decay to a pointer to the function |
| 359 | C = EmitLValue(SExpr); |
| 360 | T = CGM.getContext().getPointerType(SType); |
| 361 | } else { |
| 362 | C = Visit(SExpr); |
| 363 | T = SType; |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 364 | } |
Eli Friedman | 3b707e7 | 2008-02-21 17:57:49 +0000 | [diff] [blame] | 365 | |
| 366 | // Perform the conversion; note that an implicit cast can both promote |
| 367 | // and convert an array/function |
| 368 | return EmitConversion(C, T, ICExpr->getType()); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 369 | } |
Eli Friedman | 3b707e7 | 2008-02-21 17:57:49 +0000 | [diff] [blame] | 370 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 371 | llvm::Constant *VisitStringLiteral(StringLiteral *E) { |
Chris Lattner | a7ad98f | 2008-02-11 00:02:17 +0000 | [diff] [blame] | 372 | assert(!E->getType()->isPointerType() && "Strings are always arrays"); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 373 | |
| 374 | // Otherwise this must be a string initializing an array in a static |
| 375 | // initializer. Don't emit it as the address of the string, emit the string |
| 376 | // data itself as an inline array. |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 377 | return llvm::ConstantArray::get(CGM.GetStringForStringLiteral(E), false); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 378 | } |
| 379 | |
Eli Friedman | bc5ed6e | 2008-05-29 11:22:45 +0000 | [diff] [blame] | 380 | llvm::Constant *VisitUnaryExtension(const UnaryOperator *E) { |
| 381 | return Visit(E->getSubExpr()); |
| 382 | } |
Anders Carlsson | 7be3d01 | 2008-02-05 20:54:21 +0000 | [diff] [blame] | 383 | |
Anders Carlsson | d5cab54 | 2009-02-12 17:55:02 +0000 | [diff] [blame] | 384 | llvm::Constant *VisitBlockExpr(const BlockExpr *E) { |
Mike Stump | b83d287 | 2009-02-19 22:01:56 +0000 | [diff] [blame^] | 385 | assert (!E->hasBlockDeclRefExprs() && "global block with BlockDeclRefs"); |
| 386 | |
Mike Stump | 67a6448 | 2009-02-14 22:16:35 +0000 | [diff] [blame] | 387 | const char *Name = ""; |
| 388 | if (const NamedDecl *ND = dyn_cast<NamedDecl>(CGF->CurFuncDecl)) |
| 389 | Name = ND->getNameAsString().c_str(); |
| 390 | return CGM.GetAddrOfGlobalBlock(E, Name); |
Anders Carlsson | d5cab54 | 2009-02-12 17:55:02 +0000 | [diff] [blame] | 391 | } |
| 392 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 393 | // Utility methods |
| 394 | const llvm::Type *ConvertType(QualType T) { |
| 395 | return CGM.getTypes().ConvertType(T); |
| 396 | } |
| 397 | |
| 398 | llvm::Constant *EmitConversionToBool(llvm::Constant *Src, QualType SrcType) { |
| 399 | assert(SrcType->isCanonical() && "EmitConversion strips typedefs"); |
| 400 | |
| 401 | if (SrcType->isRealFloatingType()) { |
| 402 | // Compare against 0.0 for fp scalars. |
| 403 | llvm::Constant *Zero = llvm::Constant::getNullValue(Src->getType()); |
| 404 | return llvm::ConstantExpr::getFCmp(llvm::FCmpInst::FCMP_UNE, Src, Zero); |
| 405 | } |
| 406 | |
| 407 | assert((SrcType->isIntegerType() || SrcType->isPointerType()) && |
| 408 | "Unknown scalar type to convert"); |
| 409 | |
| 410 | // Compare against an integer or pointer null. |
| 411 | llvm::Constant *Zero = llvm::Constant::getNullValue(Src->getType()); |
| 412 | return llvm::ConstantExpr::getICmp(llvm::ICmpInst::ICMP_NE, Src, Zero); |
| 413 | } |
| 414 | |
| 415 | llvm::Constant *EmitConversion(llvm::Constant *Src, QualType SrcType, |
| 416 | QualType DstType) { |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 417 | if (!Src) |
| 418 | return 0; |
| 419 | |
Chris Lattner | d394cc6 | 2008-07-26 22:39:33 +0000 | [diff] [blame] | 420 | SrcType = CGM.getContext().getCanonicalType(SrcType); |
| 421 | DstType = CGM.getContext().getCanonicalType(DstType); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 422 | if (SrcType == DstType) return Src; |
| 423 | |
| 424 | // Handle conversions to bool first, they are special: comparisons against 0. |
| 425 | if (DstType->isBooleanType()) |
| 426 | return EmitConversionToBool(Src, SrcType); |
| 427 | |
| 428 | const llvm::Type *DstTy = ConvertType(DstType); |
| 429 | |
| 430 | // Ignore conversions like int -> uint. |
| 431 | if (Src->getType() == DstTy) |
| 432 | return Src; |
| 433 | |
| 434 | // Handle pointer conversions next: pointers can only be converted to/from |
| 435 | // other pointers and integers. |
Eli Friedman | c53296e | 2008-06-07 17:27:51 +0000 | [diff] [blame] | 436 | if (isa<llvm::PointerType>(DstTy)) { |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 437 | // The source value may be an integer, or a pointer. |
| 438 | if (isa<llvm::PointerType>(Src->getType())) |
| 439 | return llvm::ConstantExpr::getBitCast(Src, DstTy); |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 440 | assert(SrcType->isIntegerType() &&"Not ptr->ptr or int->ptr conversion?"); |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 441 | return llvm::ConstantExpr::getIntToPtr(Src, DstTy); |
| 442 | } |
| 443 | |
Eli Friedman | c53296e | 2008-06-07 17:27:51 +0000 | [diff] [blame] | 444 | if (isa<llvm::PointerType>(Src->getType())) { |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 445 | // Must be an ptr to int cast. |
| 446 | assert(isa<llvm::IntegerType>(DstTy) && "not ptr->int?"); |
| 447 | return llvm::ConstantExpr::getPtrToInt(Src, DstTy); |
| 448 | } |
| 449 | |
| 450 | // A scalar source can be splatted to a vector of the same element type |
| 451 | if (isa<llvm::VectorType>(DstTy) && !isa<VectorType>(SrcType)) { |
Chris Lattner | 3304e55 | 2008-10-12 00:31:50 +0000 | [diff] [blame] | 452 | assert((cast<llvm::VectorType>(DstTy)->getElementType() |
| 453 | == Src->getType()) && |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 454 | "Vector element type must match scalar type to splat."); |
| 455 | unsigned NumElements = DstType->getAsVectorType()->getNumElements(); |
| 456 | llvm::SmallVector<llvm::Constant*, 16> Elements; |
| 457 | for (unsigned i = 0; i < NumElements; i++) |
| 458 | Elements.push_back(Src); |
| 459 | |
| 460 | return llvm::ConstantVector::get(&Elements[0], NumElements); |
| 461 | } |
| 462 | |
| 463 | if (isa<llvm::VectorType>(Src->getType()) || |
| 464 | isa<llvm::VectorType>(DstTy)) { |
| 465 | return llvm::ConstantExpr::getBitCast(Src, DstTy); |
| 466 | } |
| 467 | |
| 468 | // Finally, we have the arithmetic types: real int/float. |
| 469 | if (isa<llvm::IntegerType>(Src->getType())) { |
| 470 | bool InputSigned = SrcType->isSignedIntegerType(); |
| 471 | if (isa<llvm::IntegerType>(DstTy)) |
| 472 | return llvm::ConstantExpr::getIntegerCast(Src, DstTy, InputSigned); |
| 473 | else if (InputSigned) |
| 474 | return llvm::ConstantExpr::getSIToFP(Src, DstTy); |
| 475 | else |
| 476 | return llvm::ConstantExpr::getUIToFP(Src, DstTy); |
| 477 | } |
| 478 | |
| 479 | assert(Src->getType()->isFloatingPoint() && "Unknown real conversion"); |
| 480 | if (isa<llvm::IntegerType>(DstTy)) { |
| 481 | if (DstType->isSignedIntegerType()) |
| 482 | return llvm::ConstantExpr::getFPToSI(Src, DstTy); |
| 483 | else |
| 484 | return llvm::ConstantExpr::getFPToUI(Src, DstTy); |
| 485 | } |
| 486 | |
| 487 | assert(DstTy->isFloatingPoint() && "Unknown real conversion"); |
| 488 | if (DstTy->getTypeID() < Src->getType()->getTypeID()) |
| 489 | return llvm::ConstantExpr::getFPTrunc(Src, DstTy); |
| 490 | else |
| 491 | return llvm::ConstantExpr::getFPExtend(Src, DstTy); |
| 492 | } |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 493 | |
Anders Carlsson | 5ea7d07 | 2008-11-16 06:23:45 +0000 | [diff] [blame] | 494 | public: |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 495 | llvm::Constant *EmitLValue(Expr *E) { |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 496 | switch (E->getStmtClass()) { |
Eli Friedman | 546d94c | 2008-02-11 00:23:10 +0000 | [diff] [blame] | 497 | default: break; |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 498 | case Expr::ParenExprClass: |
| 499 | // Elide parenthesis |
| 500 | return EmitLValue(cast<ParenExpr>(E)->getSubExpr()); |
| 501 | case Expr::CompoundLiteralExprClass: { |
| 502 | // Note that due to the nature of compound literals, this is guaranteed |
| 503 | // to be the only use of the variable, so we just generate it here. |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 504 | CompoundLiteralExpr *CLE = cast<CompoundLiteralExpr>(E); |
| 505 | llvm::Constant* C = Visit(CLE->getInitializer()); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 506 | // FIXME: "Leaked" on failure. |
| 507 | if (C) |
| 508 | C = new llvm::GlobalVariable(C->getType(), |
| 509 | E->getType().isConstQualified(), |
| 510 | llvm::GlobalValue::InternalLinkage, |
| 511 | C, ".compoundliteral", &CGM.getModule()); |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 512 | return C; |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 513 | } |
Douglas Gregor | 1a49af9 | 2009-01-06 05:10:23 +0000 | [diff] [blame] | 514 | case Expr::DeclRefExprClass: |
| 515 | case Expr::QualifiedDeclRefExprClass: { |
Douglas Gregor | 8e9bebd | 2008-10-21 16:13:35 +0000 | [diff] [blame] | 516 | NamedDecl *Decl = cast<DeclRefExpr>(E)->getDecl(); |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 517 | if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(Decl)) |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 518 | return CGM.GetAddrOfFunction(FD); |
Steve Naroff | 248a753 | 2008-04-15 22:42:06 +0000 | [diff] [blame] | 519 | if (const VarDecl* VD = dyn_cast<VarDecl>(Decl)) { |
| 520 | if (VD->isFileVarDecl()) |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 521 | return CGM.GetAddrOfGlobalVar(VD); |
Steve Naroff | 248a753 | 2008-04-15 22:42:06 +0000 | [diff] [blame] | 522 | else if (VD->isBlockVarDecl()) { |
| 523 | assert(CGF && "Can't access static local vars without CGF"); |
| 524 | return CGF->GetAddrOfStaticLocalVar(VD); |
| 525 | } |
Lauro Ramos Venancio | 8137335 | 2008-02-26 21:41:45 +0000 | [diff] [blame] | 526 | } |
Eli Friedman | 546d94c | 2008-02-11 00:23:10 +0000 | [diff] [blame] | 527 | break; |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 528 | } |
| 529 | case Expr::MemberExprClass: { |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 530 | MemberExpr* ME = cast<MemberExpr>(E); |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 531 | llvm::Constant *Base; |
| 532 | if (ME->isArrow()) |
| 533 | Base = Visit(ME->getBase()); |
| 534 | else |
| 535 | Base = EmitLValue(ME->getBase()); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 536 | if (!Base) |
| 537 | return 0; |
Lauro Ramos Venancio | 5bfe18c | 2008-01-30 21:23:20 +0000 | [diff] [blame] | 538 | |
Douglas Gregor | 86f1940 | 2008-12-20 23:49:58 +0000 | [diff] [blame] | 539 | FieldDecl *Field = dyn_cast<FieldDecl>(ME->getMemberDecl()); |
| 540 | // FIXME: Handle other kinds of member expressions. |
| 541 | assert(Field && "No code generation for non-field member expressions"); |
| 542 | unsigned FieldNumber = CGM.getTypes().getLLVMFieldNo(Field); |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 543 | llvm::Constant *Zero = llvm::ConstantInt::get(llvm::Type::Int32Ty, 0); |
| 544 | llvm::Constant *Idx = llvm::ConstantInt::get(llvm::Type::Int32Ty, |
| 545 | FieldNumber); |
| 546 | llvm::Value *Ops[] = {Zero, Idx}; |
| 547 | return llvm::ConstantExpr::getGetElementPtr(Base, Ops, 2); |
| 548 | } |
| 549 | case Expr::ArraySubscriptExprClass: { |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 550 | ArraySubscriptExpr* ASExpr = cast<ArraySubscriptExpr>(E); |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 551 | assert(!ASExpr->getBase()->getType()->isVectorType() && |
| 552 | "Taking the address of a vector component is illegal!"); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 553 | |
| 554 | llvm::Constant *Base = Visit(ASExpr->getBase()); |
| 555 | llvm::Constant *Index = Visit(ASExpr->getIdx()); |
| 556 | if (!Base || !Index) |
| 557 | return 0; |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 558 | return llvm::ConstantExpr::getGetElementPtr(Base, &Index, 1); |
| 559 | } |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 560 | case Expr::StringLiteralClass: |
| 561 | return CGM.GetAddrOfConstantStringFromLiteral(cast<StringLiteral>(E)); |
Anders Carlsson | 5ea7d07 | 2008-11-16 06:23:45 +0000 | [diff] [blame] | 562 | case Expr::ObjCStringLiteralClass: { |
| 563 | ObjCStringLiteral* SL = cast<ObjCStringLiteral>(E); |
| 564 | std::string S(SL->getString()->getStrData(), |
| 565 | SL->getString()->getByteLength()); |
| 566 | llvm::Constant *C = CGM.getObjCRuntime().GenerateConstantString(S); |
| 567 | return llvm::ConstantExpr::getBitCast(C, ConvertType(E->getType())); |
| 568 | } |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 569 | case Expr::UnaryOperatorClass: { |
| 570 | UnaryOperator *Exp = cast<UnaryOperator>(E); |
| 571 | switch (Exp->getOpcode()) { |
Eli Friedman | 546d94c | 2008-02-11 00:23:10 +0000 | [diff] [blame] | 572 | default: break; |
| 573 | case UnaryOperator::Extension: |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 574 | // Extension is just a wrapper for expressions |
| 575 | return EmitLValue(Exp->getSubExpr()); |
| 576 | case UnaryOperator::Real: |
| 577 | case UnaryOperator::Imag: { |
| 578 | // The address of __real or __imag is just a GEP off the address |
| 579 | // of the internal expression |
| 580 | llvm::Constant* C = EmitLValue(Exp->getSubExpr()); |
| 581 | llvm::Constant *Zero = llvm::ConstantInt::get(llvm::Type::Int32Ty, 0); |
| 582 | llvm::Constant *Idx = llvm::ConstantInt::get(llvm::Type::Int32Ty, |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 583 | Exp->getOpcode() == UnaryOperator::Imag); |
Anders Carlsson | 84005b4 | 2008-01-26 04:30:23 +0000 | [diff] [blame] | 584 | llvm::Value *Ops[] = {Zero, Idx}; |
| 585 | return llvm::ConstantExpr::getGetElementPtr(C, Ops, 2); |
| 586 | } |
| 587 | case UnaryOperator::Deref: |
| 588 | // The address of a deref is just the value of the expression |
| 589 | return Visit(Exp->getSubExpr()); |
| 590 | } |
Eli Friedman | 546d94c | 2008-02-11 00:23:10 +0000 | [diff] [blame] | 591 | break; |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 592 | } |
Chris Lattner | 3534564 | 2008-12-12 05:18:02 +0000 | [diff] [blame] | 593 | |
| 594 | case Expr::PredefinedExprClass: { |
| 595 | // __func__/__FUNCTION__ -> "". __PRETTY_FUNCTION__ -> "top level". |
| 596 | std::string Str; |
| 597 | if (cast<PredefinedExpr>(E)->getIdentType() == |
| 598 | PredefinedExpr::PrettyFunction) |
| 599 | Str = "top level"; |
| 600 | |
| 601 | return CGM.GetAddrOfConstantCString(Str, ".tmp"); |
| 602 | } |
Eli Friedman | f011589 | 2009-01-25 01:21:06 +0000 | [diff] [blame] | 603 | case Expr::AddrLabelExprClass: { |
| 604 | assert(CGF && "Invalid address of label expression outside function."); |
| 605 | unsigned id = CGF->GetIDForAddrOfLabel(cast<AddrLabelExpr>(E)->getLabel()); |
| 606 | llvm::Constant *C = llvm::ConstantInt::get(llvm::Type::Int32Ty, id); |
| 607 | return llvm::ConstantExpr::getIntToPtr(C, ConvertType(E->getType())); |
| 608 | } |
Eli Friedman | 3941b18 | 2009-01-25 01:54:01 +0000 | [diff] [blame] | 609 | case Expr::CallExprClass: { |
| 610 | CallExpr* CE = cast<CallExpr>(E); |
Douglas Gregor | 3c385e5 | 2009-02-14 18:57:46 +0000 | [diff] [blame] | 611 | if (CE->isBuiltinCall(CGM.getContext()) != |
| 612 | Builtin::BI__builtin___CFStringMakeConstantString) |
Eli Friedman | 3941b18 | 2009-01-25 01:54:01 +0000 | [diff] [blame] | 613 | break; |
| 614 | const Expr *Arg = CE->getArg(0)->IgnoreParenCasts(); |
| 615 | const StringLiteral *Literal = cast<StringLiteral>(Arg); |
| 616 | std::string S(Literal->getStrData(), Literal->getByteLength()); |
| 617 | return CGM.GetAddrOfConstantCFString(S); |
| 618 | } |
Mike Stump | bd65cac | 2009-02-19 01:01:04 +0000 | [diff] [blame] | 619 | case Expr::BlockExprClass: { |
Mike Stump | b83d287 | 2009-02-19 22:01:56 +0000 | [diff] [blame^] | 620 | BlockExpr *B = cast<BlockExpr>(E); |
| 621 | if (!B->hasBlockDeclRefExprs()) |
| 622 | return CGF->BuildBlockLiteralTmp(B); |
Mike Stump | bd65cac | 2009-02-19 01:01:04 +0000 | [diff] [blame] | 623 | } |
Eli Friedman | 546d94c | 2008-02-11 00:23:10 +0000 | [diff] [blame] | 624 | } |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 625 | |
| 626 | return 0; |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 627 | } |
Anders Carlsson | e3d3b7d | 2008-01-26 02:08:50 +0000 | [diff] [blame] | 628 | }; |
| 629 | |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 630 | } // end anonymous namespace. |
| 631 | |
Lauro Ramos Venancio | 8137335 | 2008-02-26 21:41:45 +0000 | [diff] [blame] | 632 | llvm::Constant *CodeGenModule::EmitConstantExpr(const Expr *E, |
Chris Lattner | 9619662 | 2008-07-26 22:37:01 +0000 | [diff] [blame] | 633 | CodeGenFunction *CGF) { |
Anders Carlsson | 4b3f9c0 | 2008-12-01 02:42:14 +0000 | [diff] [blame] | 634 | Expr::EvalResult Result; |
| 635 | |
| 636 | if (E->Evaluate(Result, Context)) { |
| 637 | assert(!Result.HasSideEffects && |
| 638 | "Constant expr should not have any side effects!"); |
| 639 | switch (Result.Val.getKind()) { |
Daniel Dunbar | a5fd07b | 2009-01-28 22:24:07 +0000 | [diff] [blame] | 640 | case APValue::Uninitialized: |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 641 | assert(0 && "Constant expressions should be initialized."); |
| 642 | return 0; |
Anders Carlsson | 5a9a457 | 2008-11-15 20:45:50 +0000 | [diff] [blame] | 643 | case APValue::LValue: { |
Daniel Dunbar | e20de51 | 2009-02-19 21:44:24 +0000 | [diff] [blame] | 644 | const llvm::Type *DestType = getTypes().ConvertTypeForMem(E->getType()); |
Anders Carlsson | 4b3f9c0 | 2008-12-01 02:42:14 +0000 | [diff] [blame] | 645 | llvm::Constant *Offset = |
| 646 | llvm::ConstantInt::get(llvm::Type::Int64Ty, |
| 647 | Result.Val.getLValueOffset()); |
Anders Carlsson | 5a9a457 | 2008-11-15 20:45:50 +0000 | [diff] [blame] | 648 | |
Daniel Dunbar | e20de51 | 2009-02-19 21:44:24 +0000 | [diff] [blame] | 649 | llvm::Constant *C; |
Anders Carlsson | 4b3f9c0 | 2008-12-01 02:42:14 +0000 | [diff] [blame] | 650 | if (const Expr *LVBase = Result.Val.getLValueBase()) { |
Daniel Dunbar | e20de51 | 2009-02-19 21:44:24 +0000 | [diff] [blame] | 651 | C = ConstExprEmitter(*this, CGF).EmitLValue(const_cast<Expr*>(LVBase)); |
Anders Carlsson | 5ea7d07 | 2008-11-16 06:23:45 +0000 | [diff] [blame] | 652 | |
Daniel Dunbar | e20de51 | 2009-02-19 21:44:24 +0000 | [diff] [blame] | 653 | // Apply offset if necessary. |
| 654 | if (!Offset->isNullValue()) { |
| 655 | const llvm::Type *Type = |
| 656 | llvm::PointerType::getUnqual(llvm::Type::Int8Ty); |
| 657 | llvm::Constant *Casted = llvm::ConstantExpr::getBitCast(C, Type); |
| 658 | Casted = llvm::ConstantExpr::getGetElementPtr(Casted, &Offset, 1); |
| 659 | C = llvm::ConstantExpr::getBitCast(Casted, C->getType()); |
| 660 | } |
| 661 | |
| 662 | // Convert to the appropriate type; this could be an lvalue for |
| 663 | // an integer. |
| 664 | if (isa<llvm::PointerType>(DestType)) |
| 665 | return llvm::ConstantExpr::getBitCast(C, DestType); |
| 666 | |
| 667 | return llvm::ConstantExpr::getPtrToInt(C, DestType); |
| 668 | } else { |
| 669 | C = Offset; |
| 670 | |
| 671 | // Convert to the appropriate type; this could be an lvalue for |
| 672 | // an integer. |
| 673 | if (isa<llvm::PointerType>(DestType)) |
| 674 | return llvm::ConstantExpr::getIntToPtr(C, DestType); |
| 675 | |
| 676 | // If the types don't match this should only be a truncate. |
| 677 | if (C->getType() != DestType) |
| 678 | return llvm::ConstantExpr::getTrunc(C, DestType); |
| 679 | |
| 680 | return C; |
Anders Carlsson | 5ea7d07 | 2008-11-16 06:23:45 +0000 | [diff] [blame] | 681 | } |
Anders Carlsson | 5a9a457 | 2008-11-15 20:45:50 +0000 | [diff] [blame] | 682 | } |
Eli Friedman | 7b30b1c | 2008-11-17 03:57:28 +0000 | [diff] [blame] | 683 | case APValue::Int: { |
Anders Carlsson | 4b3f9c0 | 2008-12-01 02:42:14 +0000 | [diff] [blame] | 684 | llvm::Constant *C = llvm::ConstantInt::get(Result.Val.getInt()); |
Anders Carlsson | 5a9a457 | 2008-11-15 20:45:50 +0000 | [diff] [blame] | 685 | |
| 686 | if (C->getType() == llvm::Type::Int1Ty) { |
| 687 | const llvm::Type *BoolTy = getTypes().ConvertTypeForMem(E->getType()); |
| 688 | C = llvm::ConstantExpr::getZExt(C, BoolTy); |
| 689 | } |
| 690 | return C; |
Eli Friedman | 7b30b1c | 2008-11-17 03:57:28 +0000 | [diff] [blame] | 691 | } |
Daniel Dunbar | a5fd07b | 2009-01-28 22:24:07 +0000 | [diff] [blame] | 692 | case APValue::ComplexInt: { |
| 693 | llvm::Constant *Complex[2]; |
| 694 | |
| 695 | Complex[0] = llvm::ConstantInt::get(Result.Val.getComplexIntReal()); |
| 696 | Complex[1] = llvm::ConstantInt::get(Result.Val.getComplexIntImag()); |
| 697 | |
| 698 | return llvm::ConstantStruct::get(Complex, 2); |
| 699 | } |
Anders Carlsson | 5a9a457 | 2008-11-15 20:45:50 +0000 | [diff] [blame] | 700 | case APValue::Float: |
Anders Carlsson | 4b3f9c0 | 2008-12-01 02:42:14 +0000 | [diff] [blame] | 701 | return llvm::ConstantFP::get(Result.Val.getFloat()); |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 702 | case APValue::ComplexFloat: { |
| 703 | llvm::Constant *Complex[2]; |
| 704 | |
Anders Carlsson | 4b3f9c0 | 2008-12-01 02:42:14 +0000 | [diff] [blame] | 705 | Complex[0] = llvm::ConstantFP::get(Result.Val.getComplexFloatReal()); |
| 706 | Complex[1] = llvm::ConstantFP::get(Result.Val.getComplexFloatImag()); |
Anders Carlsson | aa43256 | 2008-11-17 01:58:55 +0000 | [diff] [blame] | 707 | |
| 708 | return llvm::ConstantStruct::get(Complex, 2); |
| 709 | } |
Nate Begeman | 3d309f9 | 2009-01-18 01:01:34 +0000 | [diff] [blame] | 710 | case APValue::Vector: { |
| 711 | llvm::SmallVector<llvm::Constant *, 4> Inits; |
| 712 | unsigned NumElts = Result.Val.getVectorLength(); |
| 713 | |
| 714 | for (unsigned i = 0; i != NumElts; ++i) { |
| 715 | APValue &Elt = Result.Val.getVectorElt(i); |
| 716 | if (Elt.isInt()) |
| 717 | Inits.push_back(llvm::ConstantInt::get(Elt.getInt())); |
| 718 | else |
| 719 | Inits.push_back(llvm::ConstantFP::get(Elt.getFloat())); |
| 720 | } |
| 721 | return llvm::ConstantVector::get(&Inits[0], Inits.size()); |
| 722 | } |
Anders Carlsson | 5a9a457 | 2008-11-15 20:45:50 +0000 | [diff] [blame] | 723 | } |
| 724 | } |
Eli Friedman | 7dfa639 | 2008-06-01 15:31:44 +0000 | [diff] [blame] | 725 | |
| 726 | llvm::Constant* C = ConstExprEmitter(*this, CGF).Visit(const_cast<Expr*>(E)); |
Daniel Dunbar | d60f2fb | 2009-02-17 18:43:32 +0000 | [diff] [blame] | 727 | if (C && C->getType() == llvm::Type::Int1Ty) { |
Eli Friedman | 7dfa639 | 2008-06-01 15:31:44 +0000 | [diff] [blame] | 728 | const llvm::Type *BoolTy = getTypes().ConvertTypeForMem(E->getType()); |
| 729 | C = llvm::ConstantExpr::getZExt(C, BoolTy); |
| 730 | } |
| 731 | return C; |
Anders Carlsson | 3b1d57b | 2008-01-26 01:36:00 +0000 | [diff] [blame] | 732 | } |