1 /*

     2  * Copyright (c) 1999, 2010, Oracle and/or its affiliates. All rights reserved.

     3  * Copyright 2008, 2009 Red Hat, Inc.

     4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

     5  *

     6  * This code is free software; you can redistribute it and/or modify it

     7  * under the terms of the GNU General Public License version 2 only, as

     8  * published by the Free Software Foundation.

     9  *

    10  * This code is distributed in the hope that it will be useful, but WITHOUT

    11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

    12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

    13  * version 2 for more details (a copy is included in the LICENSE file that

    14  * accompanied this code).

    15  *

    16  * You should have received a copy of the GNU General Public License version

    17  * 2 along with this work; if not, write to the Free Software Foundation,

    18  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

    19  *

    20  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

    21  * or visit www.oracle.com if you need additional information or have any

    22  * questions.

    23  *

    24  */

    25 

    26 #include "precompiled.hpp"

    27 #include "ci/ciType.hpp"

    28 #include "shark/llvmHeaders.hpp"

    29 #include "shark/llvmValue.hpp"

    30 #include "shark/sharkBuilder.hpp"

    31 #include "shark/sharkValue.hpp"

    32 

    33 using namespace llvm;

    34 

    35 // Cloning

    36 

    37 SharkValue* SharkNormalValue::clone() const {

    38   return SharkValue::create_generic(type(), generic_value(), zero_checked());

    39 }

    40 SharkValue* SharkPHIValue::clone() const {

    41   return SharkValue::create_phi(type(), (PHINode *) generic_value(), this);

    42 }

    43 SharkValue* SharkAddressValue::clone() const {

    44   return SharkValue::address_constant(address_value());

    45 }

    46 

    47 // Casting

    48 

    49 bool SharkValue::is_phi() const {

    50   return false;

    51 }

    52 bool SharkPHIValue::is_phi() const {

    53   return true;

    54 }

    55 SharkPHIValue* SharkValue::as_phi() {

    56   ShouldNotCallThis();

    57 }

    58 SharkPHIValue* SharkPHIValue::as_phi() {

    59   return this;

    60 }

    61 

    62 // Comparison

    63 

    64 bool SharkNormalValue::equal_to(SharkValue *other) const {

    65   return (this->type()          == other->type() &&

    66           this->generic_value() == other->generic_value() &&

    67           this->zero_checked()  == other->zero_checked());

    68 }

    69 bool SharkAddressValue::equal_to(SharkValue *other) const {

    70   return (this->address_value() == other->address_value());

    71 }

    72 

    73 // Type access

    74 

    75 ciType* SharkValue::type() const {

    76   ShouldNotCallThis();

    77 }

    78 ciType* SharkNormalValue::type() const {

    79   return _type;

    80 }

    81 

    82 BasicType SharkNormalValue::basic_type() const {

    83   return type()->basic_type();

    84 }

    85 BasicType SharkAddressValue::basic_type() const {

    86   return T_ADDRESS;

    87 }

    88 

    89 int SharkNormalValue::size() const {

    90   return type()->size();

    91 }

    92 int SharkAddressValue::size() const {

    93   return 1;

    94 }

    95 

    96 bool SharkValue::is_jint() const {

    97   return false;

    98 }

    99 bool SharkValue::is_jlong() const {

   100   return false;

   101 }

   102 bool SharkValue::is_jfloat() const {

   103   return false;

   104 }

   105 bool SharkValue::is_jdouble() const {

   106   return false;

   107 }

   108 bool SharkValue::is_jobject() const {

   109   return false;

   110 }

   111 bool SharkValue::is_jarray() const {

   112   return false;

   113 }

   114 bool SharkValue::is_address() const {

   115   return false;

   116 }

   117 

   118 bool SharkNormalValue::is_jint() const {

   119   return llvm_value()->getType() == SharkType::jint_type();

   120 }

   121 bool SharkNormalValue::is_jlong() const {

   122   return llvm_value()->getType() == SharkType::jlong_type();

   123 }

   124 bool SharkNormalValue::is_jfloat() const {

   125   return llvm_value()->getType() == SharkType::jfloat_type();

   126 }

   127 bool SharkNormalValue::is_jdouble() const {

   128   return llvm_value()->getType() == SharkType::jdouble_type();

   129 }

   130 bool SharkNormalValue::is_jobject() const {

   131   return llvm_value()->getType() == SharkType::oop_type();

   132 }

   133 bool SharkNormalValue::is_jarray() const {

   134   return basic_type() == T_ARRAY;

   135 }

   136 bool SharkAddressValue::is_address() const {

   137   return true;

   138 }

   139 

   140 // Typed conversions from SharkValues

   141 

   142 Value* SharkValue::jint_value() const {

   143   ShouldNotCallThis();

   144 }

   145 Value* SharkValue::jlong_value() const {

   146   ShouldNotCallThis();

   147 }

   148 Value* SharkValue::jfloat_value() const {

   149   ShouldNotCallThis();

   150 }

   151 Value* SharkValue::jdouble_value() const {

   152   ShouldNotCallThis();

   153 }

   154 Value* SharkValue::jobject_value() const {

   155   ShouldNotCallThis();

   156 }

   157 Value* SharkValue::jarray_value() const {

   158   ShouldNotCallThis();

   159 }

   160 int SharkValue::address_value() const {

   161   ShouldNotCallThis();

   162 }

   163 

   164 Value* SharkNormalValue::jint_value() const {

   165   assert(is_jint(), "should be");

   166   return llvm_value();

   167 }

   168 Value* SharkNormalValue::jlong_value() const {

   169   assert(is_jlong(), "should be");

   170   return llvm_value();

   171 }

   172 Value* SharkNormalValue::jfloat_value() const {

   173   assert(is_jfloat(), "should be");

   174   return llvm_value();

   175 }

   176 Value* SharkNormalValue::jdouble_value() const {

   177   assert(is_jdouble(), "should be");

   178   return llvm_value();

   179 }

   180 Value* SharkNormalValue::jobject_value() const {

   181   assert(is_jobject(), "should be");

   182   return llvm_value();

   183 }

   184 Value* SharkNormalValue::jarray_value() const {

   185   // XXX assert(is_jarray(), "should be");

   186   // XXX http://icedtea.classpath.org/bugzilla/show_bug.cgi?id=324

   187   assert(is_jobject(), "should be");

   188   return llvm_value();

   189 }

   190 int SharkAddressValue::address_value() const {

   191   return _bci;

   192 }

   193 

   194 // Type-losing conversions -- use with care!

   195 

   196 Value* SharkNormalValue::generic_value() const {

   197   return llvm_value();

   198 }

   199 Value* SharkAddressValue::generic_value() const {

   200   return LLVMValue::intptr_constant(address_value());

   201 }

   202 

   203 Value* SharkValue::intptr_value(SharkBuilder* builder) const {

   204   ShouldNotCallThis();

   205 }

   206 Value* SharkNormalValue::intptr_value(SharkBuilder* builder) const {

   207   return builder->CreatePtrToInt(jobject_value(), SharkType::intptr_type());

   208 }

   209 

   210 // Phi-style stuff for SharkPHIState::add_incoming

   211 

   212 void SharkValue::addIncoming(SharkValue *value, BasicBlock* block) {

   213   ShouldNotCallThis();

   214 }

   215 void SharkPHIValue::addIncoming(SharkValue *value, BasicBlock* block) {

   216   assert(!is_clone(), "shouldn't be");

   217   ((llvm::PHINode *) generic_value())->addIncoming(

   218       value->generic_value(), block);

   219   if (!value->zero_checked())

   220     _all_incomers_zero_checked = false;

   221 }

   222 void SharkAddressValue::addIncoming(SharkValue *value, BasicBlock* block) {

   223   assert(this->equal_to(value), "should be");

   224 }

   225 

   226 // Phi-style stuff for SharkState::merge

   227 

   228 SharkValue* SharkNormalValue::merge(SharkBuilder* builder,

   229                                     SharkValue*   other,

   230                                     BasicBlock*   other_block,

   231                                     BasicBlock*   this_block,

   232                                     const char*   name) {

   233   assert(type() == other->type(), "should be");

   234   assert(zero_checked() == other->zero_checked(), "should be");

   235 

   236   PHINode *phi = builder->CreatePHI(SharkType::to_stackType(type()), 0, name);

   237   phi->addIncoming(this->generic_value(), this_block);

   238   phi->addIncoming(other->generic_value(), other_block);

   239   return SharkValue::create_generic(type(), phi, zero_checked());

   240 }

   241 SharkValue* SharkAddressValue::merge(SharkBuilder* builder,

   242                                      SharkValue*   other,

   243                                      BasicBlock*   other_block,

   244                                      BasicBlock*   this_block,

   245                                      const char*   name) {

   246   assert(this->equal_to(other), "should be");

   247   return this;

   248 }

   249 

   250 // Repeated null and divide-by-zero check removal

   251 

   252 bool SharkValue::zero_checked() const {

   253   ShouldNotCallThis();

   254 }

   255 void SharkValue::set_zero_checked(bool zero_checked) {

   256   ShouldNotCallThis();

   257 }

   258 

   259 bool SharkNormalValue::zero_checked() const {

   260   return _zero_checked;

   261 }

   262 void SharkNormalValue::set_zero_checked(bool zero_checked) {

   263   _zero_checked = zero_checked;

   264 }