zonr | 6315f76 | 2010-10-05 15:35:14 +0800 | [diff] [blame] | 1 | #include "slang_rs_export_var.h" |
Shih-wei Liao | 462aefd | 2010-06-04 15:32:04 -0700 | [diff] [blame] | 2 | |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 3 | #include "llvm/ADT/APSInt.h" |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 4 | |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 5 | #include "clang/AST/Type.h" |
Shih-wei Liao | 462aefd | 2010-06-04 15:32:04 -0700 | [diff] [blame] | 6 | |
zonr | 6315f76 | 2010-10-05 15:35:14 +0800 | [diff] [blame] | 7 | #include "slang_rs_context.h" |
| 8 | #include "slang_rs_export_type.h" |
| 9 | |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 10 | using namespace slang; |
Shih-wei Liao | 462aefd | 2010-06-04 15:32:04 -0700 | [diff] [blame] | 11 | |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 12 | RSExportVar::RSExportVar(RSContext *Context, |
| 13 | const clang::VarDecl *VD, |
zonr | 6315f76 | 2010-10-05 15:35:14 +0800 | [diff] [blame] | 14 | const RSExportType *ET) |
Zonr Chang | a41ce1d | 2010-10-06 02:23:12 +0800 | [diff] [blame] | 15 | : RSExportable(Context, RSExportable::EX_VAR), |
| 16 | mContext(Context), |
zonr | 6315f76 | 2010-10-05 15:35:14 +0800 | [diff] [blame] | 17 | mName(VD->getName().data(), VD->getName().size()), |
| 18 | mET(ET), |
| 19 | mIsConst(false) { |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 20 | // mInit - Evaluate initializer expression |
| 21 | const clang::Expr *Initializer = VD->getAnyInitializer(); |
| 22 | if (Initializer != NULL) { |
| 23 | switch (ET->getClass()) { |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 24 | case RSExportType::ExportClassPrimitive: |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 25 | case RSExportType::ExportClassVector: { |
Shih-wei Liao | f52a620 | 2010-09-10 17:40:53 -0700 | [diff] [blame] | 26 | Initializer->Evaluate(mInit, *Context->getASTContext()); |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 27 | break; |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 28 | } |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 29 | case RSExportType::ExportClassPointer: { |
| 30 | if (Initializer->isNullPointerConstant |
| 31 | (*Context->getASTContext(), |
| 32 | clang::Expr::NPC_ValueDependentIsNotNull) |
| 33 | ) |
| 34 | mInit.Val = clang::APValue(llvm::APSInt(1)); |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 35 | else |
Shih-wei Liao | f52a620 | 2010-09-10 17:40:53 -0700 | [diff] [blame] | 36 | Initializer->Evaluate(mInit, *Context->getASTContext()); |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 37 | break; |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 38 | } |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 39 | case RSExportType::ExportClassRecord: { |
| 40 | // No action |
| 41 | fprintf(stderr, "RSExportVar::RSExportVar : Reflection of initializer " |
| 42 | "to variable '%s' (of type '%s') is unsupported " |
| 43 | "currently.\n", |
| 44 | mName.c_str(), |
| 45 | ET->getName().c_str()); |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 46 | break; |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 47 | } |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 48 | default: { |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 49 | assert(false && "Unknown class of type"); |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 50 | } |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 51 | } |
Shih-wei Liao | 81c1b48 | 2010-07-19 15:17:14 -0700 | [diff] [blame] | 52 | } |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 53 | |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 54 | // mIsConst - Is it a constant? |
| 55 | clang::QualType QT = VD->getTypeSourceInfo()->getType(); |
Shih-wei Liao | 81c1b48 | 2010-07-19 15:17:14 -0700 | [diff] [blame] | 56 | if (!QT.isNull()) { |
| 57 | mIsConst = QT.isConstQualified(); |
| 58 | } |
Shih-wei Liao | 9ef2f78 | 2010-10-01 12:31:37 -0700 | [diff] [blame] | 59 | |
Shih-wei Liao | 324c047 | 2010-06-21 13:15:11 -0700 | [diff] [blame] | 60 | return; |
Shih-wei Liao | 462aefd | 2010-06-04 15:32:04 -0700 | [diff] [blame] | 61 | } |