1 /*
   2  * Copyright (c) 1997, 2011, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 
  25 #include "precompiled.hpp"
  26 #include "classfile/javaClasses.hpp"
  27 #include "classfile/symbolTable.hpp"
  28 #include "classfile/systemDictionary.hpp"
  29 #include "classfile/verifier.hpp"
  30 #include "classfile/vmSymbols.hpp"
  31 #include "interpreter/linkResolver.hpp"
  32 #include "memory/oopFactory.hpp"
  33 #include "memory/resourceArea.hpp"
  34 #include "memory/universe.inline.hpp"
  35 #include "oops/instanceKlass.hpp"
  36 #include "oops/objArrayKlass.hpp"
  37 #include "oops/objArrayOop.hpp"
  38 #include "prims/jvm.h"
  39 #include "prims/methodHandleWalk.hpp"
  40 #include "runtime/arguments.hpp"
  41 #include "runtime/handles.inline.hpp"
  42 #include "runtime/javaCalls.hpp"
  43 #include "runtime/reflection.hpp"
  44 #include "runtime/reflectionUtils.hpp"
  45 #include "runtime/signature.hpp"
  46 #include "runtime/vframe.hpp"
  47 
  48 #define JAVA_1_5_VERSION                  49
  49 
  50 static void trace_class_resolution(klassOop to_class) {
  51   ResourceMark rm;
  52   int line_number = -1;
  53   const char * source_file = NULL;
  54   klassOop caller = NULL;
  55   JavaThread* jthread = JavaThread::current();
  56   if (jthread->has_last_Java_frame()) {
  57     vframeStream vfst(jthread);
  58     // skip over any frames belonging to java.lang.Class
  59     while (!vfst.at_end() &&
  60            instanceKlass::cast(vfst.method()->method_holder())->name() == vmSymbols::java_lang_Class()) {
  61       vfst.next();
  62     }
  63     if (!vfst.at_end()) {
  64       // this frame is a likely suspect
  65       caller = vfst.method()->method_holder();
  66       line_number = vfst.method()->line_number_from_bci(vfst.bci());
  67       Symbol* s = instanceKlass::cast(vfst.method()->method_holder())->source_file_name();
  68       if (s != NULL) {
  69         source_file = s->as_C_string();
  70       }
  71     }
  72   }
  73   if (caller != NULL) {
  74     const char * from = Klass::cast(caller)->external_name();
  75     const char * to = Klass::cast(to_class)->external_name();
  76     // print in a single call to reduce interleaving between threads
  77     if (source_file != NULL) {
  78       tty->print("RESOLVE %s %s %s:%d (reflection)\n", from, to, source_file, line_number);
  79     } else {
  80       tty->print("RESOLVE %s %s (reflection)\n", from, to);
  81     }
  82   }
  83 }
  84 
  85 
  86 oop Reflection::box(jvalue* value, BasicType type, TRAPS) {
  87   if (type == T_VOID) {
  88     return NULL;
  89   }
  90   if (type == T_OBJECT || type == T_ARRAY) {
  91     // regular objects are not boxed
  92     return (oop) value->l;
  93   }
  94   oop result = java_lang_boxing_object::create(type, value, CHECK_NULL);
  95   if (result == NULL) {
  96     THROW_(vmSymbols::java_lang_IllegalArgumentException(), result);
  97   }
  98   return result;
  99 }
 100 
 101 
 102 BasicType Reflection::unbox_for_primitive(oop box, jvalue* value, TRAPS) {
 103   if (box == NULL) {
 104     THROW_(vmSymbols::java_lang_IllegalArgumentException(), T_ILLEGAL);
 105   }
 106   return java_lang_boxing_object::get_value(box, value);
 107 }
 108 
 109 BasicType Reflection::unbox_for_regular_object(oop box, jvalue* value) {
 110   // Note:  box is really the unboxed oop.  It might even be a Short, etc.!
 111   value->l = (jobject) box;
 112   return T_OBJECT;
 113 }
 114 
 115 
 116 void Reflection::widen(jvalue* value, BasicType current_type, BasicType wide_type, TRAPS) {
 117   assert(wide_type != current_type, "widen should not be called with identical types");
 118   switch (wide_type) {
 119     case T_BOOLEAN:
 120     case T_BYTE:
 121     case T_CHAR:
 122       break;  // fail
 123     case T_SHORT:
 124       switch (current_type) {
 125         case T_BYTE:
 126           value->s = (jshort) value->b;
 127           return;
 128       }
 129       break;  // fail
 130     case T_INT:
 131       switch (current_type) {
 132         case T_BYTE:
 133           value->i = (jint) value->b;
 134           return;
 135         case T_CHAR:
 136           value->i = (jint) value->c;
 137           return;
 138         case T_SHORT:
 139           value->i = (jint) value->s;
 140           return;
 141       }
 142       break;  // fail
 143     case T_LONG:
 144       switch (current_type) {
 145         case T_BYTE:
 146           value->j = (jlong) value->b;
 147           return;
 148         case T_CHAR:
 149           value->j = (jlong) value->c;
 150           return;
 151         case T_SHORT:
 152           value->j = (jlong) value->s;
 153           return;
 154         case T_INT:
 155           value->j = (jlong) value->i;
 156           return;
 157       }
 158       break;  // fail
 159     case T_FLOAT:
 160       switch (current_type) {
 161         case T_BYTE:
 162           value->f = (jfloat) value->b;
 163           return;
 164         case T_CHAR:
 165           value->f = (jfloat) value->c;
 166           return;
 167         case T_SHORT:
 168           value->f = (jfloat) value->s;
 169           return;
 170         case T_INT:
 171           value->f = (jfloat) value->i;
 172           return;
 173         case T_LONG:
 174           value->f = (jfloat) value->j;
 175           return;
 176       }
 177       break;  // fail
 178     case T_DOUBLE:
 179       switch (current_type) {
 180         case T_BYTE:
 181           value->d = (jdouble) value->b;
 182           return;
 183         case T_CHAR:
 184           value->d = (jdouble) value->c;
 185           return;
 186         case T_SHORT:
 187           value->d = (jdouble) value->s;
 188           return;
 189         case T_INT:
 190           value->d = (jdouble) value->i;
 191           return;
 192         case T_FLOAT:
 193           value->d = (jdouble) value->f;
 194           return;
 195         case T_LONG:
 196           value->d = (jdouble) value->j;
 197           return;
 198       }
 199       break;  // fail
 200     default:
 201       break;  // fail
 202   }
 203   THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
 204 }
 205 
 206 
 207 BasicType Reflection::array_get(jvalue* value, arrayOop a, int index, TRAPS) {
 208   if (!a->is_within_bounds(index)) {
 209     THROW_(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), T_ILLEGAL);
 210   }
 211   if (a->is_objArray()) {
 212     value->l = (jobject) objArrayOop(a)->obj_at(index);
 213     return T_OBJECT;
 214   } else {
 215     assert(a->is_typeArray(), "just checking");
 216     BasicType type = typeArrayKlass::cast(a->klass())->element_type();
 217     switch (type) {
 218       case T_BOOLEAN:
 219         value->z = typeArrayOop(a)->bool_at(index);
 220         break;
 221       case T_CHAR:
 222         value->c = typeArrayOop(a)->char_at(index);
 223         break;
 224       case T_FLOAT:
 225         value->f = typeArrayOop(a)->float_at(index);
 226         break;
 227       case T_DOUBLE:
 228         value->d = typeArrayOop(a)->double_at(index);
 229         break;
 230       case T_BYTE:
 231         value->b = typeArrayOop(a)->byte_at(index);
 232         break;
 233       case T_SHORT:
 234         value->s = typeArrayOop(a)->short_at(index);
 235         break;
 236       case T_INT:
 237         value->i = typeArrayOop(a)->int_at(index);
 238         break;
 239       case T_LONG:
 240         value->j = typeArrayOop(a)->long_at(index);
 241         break;
 242       default:
 243         return T_ILLEGAL;
 244     }
 245     return type;
 246   }
 247 }
 248 
 249 
 250 void Reflection::array_set(jvalue* value, arrayOop a, int index, BasicType value_type, TRAPS) {
 251   if (!a->is_within_bounds(index)) {
 252     THROW(vmSymbols::java_lang_ArrayIndexOutOfBoundsException());
 253   }
 254   if (a->is_objArray()) {
 255     if (value_type == T_OBJECT) {
 256       oop obj = (oop) value->l;
 257       if (obj != NULL) {
 258         klassOop element_klass = objArrayKlass::cast(a->klass())->element_klass();
 259         if (!obj->is_a(element_klass)) {
 260           THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "array element type mismatch");
 261         }
 262       }
 263       objArrayOop(a)->obj_at_put(index, obj);
 264     }
 265   } else {
 266     assert(a->is_typeArray(), "just checking");
 267     BasicType array_type = typeArrayKlass::cast(a->klass())->element_type();
 268     if (array_type != value_type) {
 269       // The widen operation can potentially throw an exception, but cannot block,
 270       // so typeArrayOop a is safe if the call succeeds.
 271       widen(value, value_type, array_type, CHECK);
 272     }
 273     switch (array_type) {
 274       case T_BOOLEAN:
 275         typeArrayOop(a)->bool_at_put(index, value->z);
 276         break;
 277       case T_CHAR:
 278         typeArrayOop(a)->char_at_put(index, value->c);
 279         break;
 280       case T_FLOAT:
 281         typeArrayOop(a)->float_at_put(index, value->f);
 282         break;
 283       case T_DOUBLE:
 284         typeArrayOop(a)->double_at_put(index, value->d);
 285         break;
 286       case T_BYTE:
 287         typeArrayOop(a)->byte_at_put(index, value->b);
 288         break;
 289       case T_SHORT:
 290         typeArrayOop(a)->short_at_put(index, value->s);
 291         break;
 292       case T_INT:
 293         typeArrayOop(a)->int_at_put(index, value->i);
 294         break;
 295       case T_LONG:
 296         typeArrayOop(a)->long_at_put(index, value->j);
 297         break;
 298       default:
 299         THROW(vmSymbols::java_lang_IllegalArgumentException());
 300     }
 301   }
 302 }
 303 
 304 
 305 klassOop Reflection::basic_type_mirror_to_arrayklass(oop basic_type_mirror, TRAPS) {
 306   assert(java_lang_Class::is_primitive(basic_type_mirror), "just checking");
 307   BasicType type = java_lang_Class::primitive_type(basic_type_mirror);
 308   if (type == T_VOID) {
 309     THROW_0(vmSymbols::java_lang_IllegalArgumentException());
 310   } else {
 311     return Universe::typeArrayKlassObj(type);
 312   }
 313 }
 314 
 315 
 316 oop Reflection:: basic_type_arrayklass_to_mirror(klassOop basic_type_arrayklass, TRAPS) {
 317   BasicType type = typeArrayKlass::cast(basic_type_arrayklass)->element_type();
 318   return Universe::java_mirror(type);
 319 }
 320 
 321 
 322 arrayOop Reflection::reflect_new_array(oop element_mirror, jint length, TRAPS) {
 323   if (element_mirror == NULL) {
 324     THROW_0(vmSymbols::java_lang_NullPointerException());
 325   }
 326   if (length < 0) {
 327     THROW_0(vmSymbols::java_lang_NegativeArraySizeException());
 328   }
 329   if (java_lang_Class::is_primitive(element_mirror)) {
 330     klassOop tak = basic_type_mirror_to_arrayklass(element_mirror, CHECK_NULL);
 331     return typeArrayKlass::cast(tak)->allocate(length, THREAD);
 332   } else {
 333     klassOop k = java_lang_Class::as_klassOop(element_mirror);
 334     if (Klass::cast(k)->oop_is_array() && arrayKlass::cast(k)->dimension() >= MAX_DIM) {
 335       THROW_0(vmSymbols::java_lang_IllegalArgumentException());
 336     }
 337     return oopFactory::new_objArray(k, length, THREAD);
 338   }
 339 }
 340 
 341 
 342 arrayOop Reflection::reflect_new_multi_array(oop element_mirror, typeArrayOop dim_array, TRAPS) {
 343   assert(dim_array->is_typeArray(), "just checking");
 344   assert(typeArrayKlass::cast(dim_array->klass())->element_type() == T_INT, "just checking");
 345 
 346   if (element_mirror == NULL) {
 347     THROW_0(vmSymbols::java_lang_NullPointerException());
 348   }
 349 
 350   int len = dim_array->length();
 351   if (len <= 0 || len > MAX_DIM) {
 352     THROW_0(vmSymbols::java_lang_IllegalArgumentException());
 353   }
 354 
 355   jint dimensions[MAX_DIM];   // C array copy of intArrayOop
 356   for (int i = 0; i < len; i++) {
 357     int d = dim_array->int_at(i);
 358     if (d < 0) {
 359       THROW_0(vmSymbols::java_lang_NegativeArraySizeException());
 360     }
 361     dimensions[i] = d;
 362   }
 363 
 364   klassOop klass;
 365   int dim = len;
 366   if (java_lang_Class::is_primitive(element_mirror)) {
 367     klass = basic_type_mirror_to_arrayklass(element_mirror, CHECK_NULL);
 368   } else {
 369     klass = java_lang_Class::as_klassOop(element_mirror);
 370     if (Klass::cast(klass)->oop_is_array()) {
 371       int k_dim = arrayKlass::cast(klass)->dimension();
 372       if (k_dim + len > MAX_DIM) {
 373         THROW_0(vmSymbols::java_lang_IllegalArgumentException());
 374       }
 375       dim += k_dim;
 376     }
 377   }
 378   klass = Klass::cast(klass)->array_klass(dim, CHECK_NULL);
 379   oop obj = arrayKlass::cast(klass)->multi_allocate(len, dimensions, THREAD);
 380   assert(obj->is_array(), "just checking");
 381   return arrayOop(obj);
 382 }
 383 
 384 
 385 oop Reflection::array_component_type(oop mirror, TRAPS) {
 386   if (java_lang_Class::is_primitive(mirror)) {
 387     return NULL;
 388   }
 389 
 390   klassOop klass = java_lang_Class::as_klassOop(mirror);
 391   if (!Klass::cast(klass)->oop_is_array()) {
 392     return NULL;
 393   }
 394 
 395   oop result = arrayKlass::cast(klass)->component_mirror();
 396 #ifdef ASSERT
 397   oop result2 = NULL;
 398   if (arrayKlass::cast(klass)->dimension() == 1) {
 399     if (Klass::cast(klass)->oop_is_typeArray()) {
 400       result2 = basic_type_arrayklass_to_mirror(klass, CHECK_NULL);
 401     } else {
 402       result2 = Klass::cast(objArrayKlass::cast(klass)->element_klass())->java_mirror();
 403     }
 404   } else {
 405     klassOop lower_dim = arrayKlass::cast(klass)->lower_dimension();
 406     assert(Klass::cast(lower_dim)->oop_is_array(), "just checking");
 407     result2 = Klass::cast(lower_dim)->java_mirror();
 408   }
 409   assert(result == result2, "results must be consistent");
 410 #endif //ASSERT
 411   return result;
 412 }
 413 
 414 
 415 bool Reflection::reflect_check_access(klassOop field_class, AccessFlags acc, klassOop target_class, bool is_method_invoke, TRAPS) {
 416   // field_class  : declaring class
 417   // acc          : declared field access
 418   // target_class : for protected
 419 
 420   // Check if field or method is accessible to client.  Throw an
 421   // IllegalAccessException and return false if not.
 422 
 423   // The "client" is the class associated with the nearest real frame
 424   // getCallerClass already skips Method.invoke frames, so pass 0 in
 425   // that case (same as classic).
 426   ResourceMark rm(THREAD);
 427   assert(THREAD->is_Java_thread(), "sanity check");
 428   klassOop client_class = ((JavaThread *)THREAD)->security_get_caller_class(is_method_invoke ? 0 : 1);
 429 
 430   if (client_class != field_class) {
 431     if (!verify_class_access(client_class, field_class, false)
 432         || !verify_field_access(client_class,
 433                                 field_class,
 434                                 field_class,
 435                                 acc,
 436                                 false)) {
 437       THROW_(vmSymbols::java_lang_IllegalAccessException(), false);
 438     }
 439   }
 440 
 441   // Additional test for protected members: JLS 6.6.2
 442 
 443   if (acc.is_protected()) {
 444     if (target_class != client_class) {
 445       if (!is_same_class_package(client_class, field_class)) {
 446         if (!Klass::cast(target_class)->is_subclass_of(client_class)) {
 447           THROW_(vmSymbols::java_lang_IllegalAccessException(), false);
 448         }
 449       }
 450     }
 451   }
 452 
 453   // Passed all tests
 454   return true;
 455 }
 456 
 457 
 458 bool Reflection::verify_class_access(klassOop current_class, klassOop new_class, bool classloader_only) {
 459   // Verify that current_class can access new_class.  If the classloader_only
 460   // flag is set, we automatically allow any accesses in which current_class
 461   // doesn't have a classloader.
 462   if ((current_class == NULL) ||
 463       (current_class == new_class) ||
 464       (instanceKlass::cast(new_class)->is_public()) ||
 465       is_same_class_package(current_class, new_class)) {
 466     return true;
 467   }
 468   // New (1.4) reflection implementation. Allow all accesses from
 469   // sun/reflect/MagicAccessorImpl subclasses to succeed trivially.
 470   if (   JDK_Version::is_gte_jdk14x_version()
 471       && UseNewReflection
 472       && Klass::cast(current_class)->is_subclass_of(SystemDictionary::reflect_MagicAccessorImpl_klass())) {
 473     return true;
 474   }
 475 
 476   return can_relax_access_check_for(current_class, new_class, classloader_only);
 477 }
 478 
 479 static bool under_host_klass(instanceKlass* ik, klassOop host_klass) {
 480   DEBUG_ONLY(int inf_loop_check = 1000 * 1000 * 1000);
 481   for (;;) {
 482     klassOop hc = (klassOop) ik->host_klass();
 483     if (hc == NULL)        return false;
 484     if (hc == host_klass)  return true;
 485     ik = instanceKlass::cast(hc);
 486 
 487     // There's no way to make a host class loop short of patching memory.
 488     // Therefore there cannot be a loop here unles there's another bug.
 489     // Still, let's check for it.
 490     assert(--inf_loop_check > 0, "no host_klass loop");
 491   }
 492 }
 493 
 494 bool Reflection::can_relax_access_check_for(
 495     klassOop accessor, klassOop accessee, bool classloader_only) {
 496   instanceKlass* accessor_ik = instanceKlass::cast(accessor);
 497   instanceKlass* accessee_ik  = instanceKlass::cast(accessee);
 498 
 499   // If either is on the other's host_klass chain, access is OK,
 500   // because one is inside the other.
 501   if (under_host_klass(accessor_ik, accessee) ||
 502       under_host_klass(accessee_ik, accessor))
 503     return true;
 504 
 505   // Adapter frames can access anything.
 506   if (MethodHandleCompiler::klass_is_method_handle_adapter_holder(accessor))
 507     // This is an internal adapter frame from the MethodHandleCompiler.
 508     return true;
 509 
 510   if (RelaxAccessControlCheck ||
 511       (accessor_ik->major_version() < JAVA_1_5_VERSION &&
 512        accessee_ik->major_version() < JAVA_1_5_VERSION)) {
 513     return classloader_only &&
 514       Verifier::relax_verify_for(accessor_ik->class_loader()) &&
 515       accessor_ik->protection_domain() == accessee_ik->protection_domain() &&
 516       accessor_ik->class_loader() == accessee_ik->class_loader();
 517   } else {
 518     return false;
 519   }
 520 }
 521 
 522 bool Reflection::verify_field_access(klassOop current_class,
 523                                      klassOop resolved_class,
 524                                      klassOop field_class,
 525                                      AccessFlags access,
 526                                      bool classloader_only,
 527                                      bool protected_restriction) {
 528   // Verify that current_class can access a field of field_class, where that
 529   // field's access bits are "access".  We assume that we've already verified
 530   // that current_class can access field_class.
 531   //
 532   // If the classloader_only flag is set, we automatically allow any accesses
 533   // in which current_class doesn't have a classloader.
 534   //
 535   // "resolved_class" is the runtime type of "field_class". Sometimes we don't
 536   // need this distinction (e.g. if all we have is the runtime type, or during
 537   // class file parsing when we only care about the static type); in that case
 538   // callers should ensure that resolved_class == field_class.
 539   //
 540   if ((current_class == NULL) ||
 541       (current_class == field_class) ||
 542       access.is_public()) {
 543     return true;
 544   }
 545 
 546   if (access.is_protected()) {
 547     if (!protected_restriction) {
 548       // See if current_class is a subclass of field_class
 549       if (Klass::cast(current_class)->is_subclass_of(field_class)) {
 550         if (access.is_static() || // static fields are ok, see 6622385
 551             current_class == resolved_class ||
 552             field_class == resolved_class ||
 553             Klass::cast(current_class)->is_subclass_of(resolved_class) ||
 554             Klass::cast(resolved_class)->is_subclass_of(current_class)) {
 555           return true;
 556         }
 557       }
 558     }
 559   }
 560 
 561   if (!access.is_private() && is_same_class_package(current_class, field_class)) {
 562     return true;
 563   }
 564 
 565   // New (1.4) reflection implementation. Allow all accesses from
 566   // sun/reflect/MagicAccessorImpl subclasses to succeed trivially.
 567   if (   JDK_Version::is_gte_jdk14x_version()
 568       && UseNewReflection
 569       && Klass::cast(current_class)->is_subclass_of(SystemDictionary::reflect_MagicAccessorImpl_klass())) {
 570     return true;
 571   }
 572 
 573   return can_relax_access_check_for(
 574     current_class, field_class, classloader_only);
 575 }
 576 
 577 
 578 bool Reflection::is_same_class_package(klassOop class1, klassOop class2) {
 579   return instanceKlass::cast(class1)->is_same_class_package(class2);
 580 }
 581 
 582 bool Reflection::is_same_package_member(klassOop class1, klassOop class2, TRAPS) {
 583   return instanceKlass::cast(class1)->is_same_package_member(class2, THREAD);
 584 }
 585 
 586 
 587 // Checks that the 'outer' klass has declared 'inner' as being an inner klass. If not,
 588 // throw an incompatible class change exception
 589 // If inner_is_member, require the inner to be a member of the outer.
 590 // If !inner_is_member, require the inner to be anonymous (a non-member).
 591 // Caller is responsible for figuring out in advance which case must be true.
 592 void Reflection::check_for_inner_class(instanceKlassHandle outer, instanceKlassHandle inner,
 593                                        bool inner_is_member, TRAPS) {
 594   InnerClassesIterator iter(outer);
 595   constantPoolHandle cp   (THREAD, outer->constants());
 596   for (; !iter.done(); iter.next()) {
 597      int ioff = iter.inner_class_info_index();
 598      int ooff = iter.outer_class_info_index();
 599 
 600      if (inner_is_member && ioff != 0 && ooff != 0) {
 601         klassOop o = cp->klass_at(ooff, CHECK);
 602         if (o == outer()) {
 603           klassOop i = cp->klass_at(ioff, CHECK);
 604           if (i == inner()) {
 605             return;
 606           }
 607         }
 608      }
 609      if (!inner_is_member && ioff != 0 && ooff == 0 &&
 610          cp->klass_name_at_matches(inner, ioff)) {
 611         klassOop i = cp->klass_at(ioff, CHECK);
 612         if (i == inner()) {
 613           return;
 614         }
 615      }
 616   }
 617 
 618   // 'inner' not declared as an inner klass in outer
 619   ResourceMark rm(THREAD);
 620   Exceptions::fthrow(
 621     THREAD_AND_LOCATION,
 622     vmSymbols::java_lang_IncompatibleClassChangeError(),
 623     "%s and %s disagree on InnerClasses attribute",
 624     outer->external_name(),
 625     inner->external_name()
 626   );
 627 }
 628 
 629 // Utility method converting a single SignatureStream element into java.lang.Class instance
 630 
 631 oop get_mirror_from_signature(methodHandle method, SignatureStream* ss, TRAPS) {
 632   switch (ss->type()) {
 633     default:
 634       assert(ss->type() != T_VOID || ss->at_return_type(), "T_VOID should only appear as return type");
 635       return java_lang_Class::primitive_mirror(ss->type());
 636     case T_OBJECT:
 637     case T_ARRAY:
 638       Symbol* name        = ss->as_symbol(CHECK_NULL);
 639       oop loader            = instanceKlass::cast(method->method_holder())->class_loader();
 640       oop protection_domain = instanceKlass::cast(method->method_holder())->protection_domain();
 641       klassOop k = SystemDictionary::resolve_or_fail(
 642                                        name,
 643                                        Handle(THREAD, loader),
 644                                        Handle(THREAD, protection_domain),
 645                                        true, CHECK_NULL);
 646       if (TraceClassResolution) {
 647         trace_class_resolution(k);
 648       }
 649       return k->java_mirror();
 650   };
 651 }
 652 
 653 
 654 objArrayHandle Reflection::get_parameter_types(methodHandle method, int parameter_count, oop* return_type, TRAPS) {
 655   // Allocate array holding parameter types (java.lang.Class instances)
 656   objArrayOop m = oopFactory::new_objArray(SystemDictionary::Class_klass(), parameter_count, CHECK_(objArrayHandle()));
 657   objArrayHandle mirrors (THREAD, m);
 658   int index = 0;
 659   // Collect parameter types
 660   ResourceMark rm(THREAD);
 661   Symbol*  signature  = method->signature();
 662   SignatureStream ss(signature);
 663   while (!ss.at_return_type()) {
 664     oop mirror = get_mirror_from_signature(method, &ss, CHECK_(objArrayHandle()));
 665     mirrors->obj_at_put(index++, mirror);
 666     ss.next();
 667   }
 668   assert(index == parameter_count, "invalid parameter count");
 669   if (return_type != NULL) {
 670     // Collect return type as well
 671     assert(ss.at_return_type(), "return type should be present");
 672     *return_type = get_mirror_from_signature(method, &ss, CHECK_(objArrayHandle()));
 673   }
 674   return mirrors;
 675 }
 676 
 677 objArrayHandle Reflection::get_exception_types(methodHandle method, TRAPS) {
 678   return method->resolved_checked_exceptions(CHECK_(objArrayHandle()));
 679 }
 680 
 681 
 682 Handle Reflection::new_type(Symbol* signature, KlassHandle k, TRAPS) {
 683   // Basic types
 684   BasicType type = vmSymbols::signature_type(signature);
 685   if (type != T_OBJECT) {
 686     return Handle(THREAD, Universe::java_mirror(type));
 687   }
 688 
 689   oop loader = instanceKlass::cast(k())->class_loader();
 690   oop protection_domain = Klass::cast(k())->protection_domain();
 691   klassOop result = SystemDictionary::resolve_or_fail(signature,
 692                                     Handle(THREAD, loader),
 693                                     Handle(THREAD, protection_domain),
 694                                     true, CHECK_(Handle()));
 695 
 696   if (TraceClassResolution) {
 697     trace_class_resolution(result);
 698   }
 699 
 700   oop nt = Klass::cast(result)->java_mirror();
 701   return Handle(THREAD, nt);
 702 }
 703 
 704 
 705 oop Reflection::new_method(methodHandle method, bool intern_name, bool for_constant_pool_access, TRAPS) {
 706   // In jdk1.2.x, getMethods on an interface erroneously includes <clinit>, thus the complicated assert.
 707   // Also allow sun.reflect.ConstantPool to refer to <clinit> methods as java.lang.reflect.Methods.
 708   assert(!method()->is_initializer() ||
 709          (for_constant_pool_access && method()->is_static()) ||
 710          (method()->name() == vmSymbols::class_initializer_name()
 711     && Klass::cast(method()->method_holder())->is_interface() && JDK_Version::is_jdk12x_version()), "should call new_constructor instead");
 712   instanceKlassHandle holder (THREAD, method->method_holder());
 713   int slot = method->method_idnum();
 714 
 715   Symbol*  signature  = method->signature();
 716   int parameter_count = ArgumentCount(signature).size();
 717   oop return_type_oop = NULL;
 718   objArrayHandle parameter_types = get_parameter_types(method, parameter_count, &return_type_oop, CHECK_NULL);
 719   if (parameter_types.is_null() || return_type_oop == NULL) return NULL;
 720 
 721   Handle return_type(THREAD, return_type_oop);
 722 
 723   objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
 724 
 725   if (exception_types.is_null()) return NULL;
 726 
 727   Symbol*  method_name = method->name();
 728   Handle name;
 729   if (intern_name) {
 730     // intern_name is only true with UseNewReflection
 731     oop name_oop = StringTable::intern(method_name, CHECK_NULL);
 732     name = Handle(THREAD, name_oop);
 733   } else {
 734     name = java_lang_String::create_from_symbol(method_name, CHECK_NULL);
 735   }
 736   if (name == NULL) return NULL;
 737 
 738   int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
 739 
 740   Handle mh = java_lang_reflect_Method::create(CHECK_NULL);
 741 
 742   java_lang_reflect_Method::set_clazz(mh(), holder->java_mirror());
 743   java_lang_reflect_Method::set_slot(mh(), slot);
 744   java_lang_reflect_Method::set_name(mh(), name());
 745   java_lang_reflect_Method::set_return_type(mh(), return_type());
 746   java_lang_reflect_Method::set_parameter_types(mh(), parameter_types());
 747   java_lang_reflect_Method::set_exception_types(mh(), exception_types());
 748   java_lang_reflect_Method::set_modifiers(mh(), modifiers);
 749   java_lang_reflect_Method::set_override(mh(), false);
 750   if (java_lang_reflect_Method::has_signature_field() &&
 751       method->generic_signature() != NULL) {
 752     Symbol*  gs = method->generic_signature();
 753     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
 754     java_lang_reflect_Method::set_signature(mh(), sig());
 755   }
 756   if (java_lang_reflect_Method::has_annotations_field()) {
 757     java_lang_reflect_Method::set_annotations(mh(), method->annotations());
 758   }
 759   if (java_lang_reflect_Method::has_parameter_annotations_field()) {
 760     java_lang_reflect_Method::set_parameter_annotations(mh(), method->parameter_annotations());
 761   }
 762   if (java_lang_reflect_Method::has_annotation_default_field()) {
 763     java_lang_reflect_Method::set_annotation_default(mh(), method->annotation_default());
 764   }
 765   return mh();
 766 }
 767 
 768 
 769 oop Reflection::new_constructor(methodHandle method, TRAPS) {
 770   assert(method()->is_initializer(), "should call new_method instead");
 771 
 772   instanceKlassHandle  holder (THREAD, method->method_holder());
 773   int slot = method->method_idnum();
 774 
 775   Symbol*  signature  = method->signature();
 776   int parameter_count = ArgumentCount(signature).size();
 777   objArrayHandle parameter_types = get_parameter_types(method, parameter_count, NULL, CHECK_NULL);
 778   if (parameter_types.is_null()) return NULL;
 779 
 780   objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
 781   if (exception_types.is_null()) return NULL;
 782 
 783   int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
 784 
 785   Handle ch = java_lang_reflect_Constructor::create(CHECK_NULL);
 786 
 787   java_lang_reflect_Constructor::set_clazz(ch(), holder->java_mirror());
 788   java_lang_reflect_Constructor::set_slot(ch(), slot);
 789   java_lang_reflect_Constructor::set_parameter_types(ch(), parameter_types());
 790   java_lang_reflect_Constructor::set_exception_types(ch(), exception_types());
 791   java_lang_reflect_Constructor::set_modifiers(ch(), modifiers);
 792   java_lang_reflect_Constructor::set_override(ch(), false);
 793   if (java_lang_reflect_Constructor::has_signature_field() &&
 794       method->generic_signature() != NULL) {
 795     Symbol*  gs = method->generic_signature();
 796     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
 797     java_lang_reflect_Constructor::set_signature(ch(), sig());
 798   }
 799   if (java_lang_reflect_Constructor::has_annotations_field()) {
 800     java_lang_reflect_Constructor::set_annotations(ch(), method->annotations());
 801   }
 802   if (java_lang_reflect_Constructor::has_parameter_annotations_field()) {
 803     java_lang_reflect_Constructor::set_parameter_annotations(ch(), method->parameter_annotations());
 804   }
 805   return ch();
 806 }
 807 
 808 
 809 oop Reflection::new_field(fieldDescriptor* fd, bool intern_name, TRAPS) {
 810   Symbol*  field_name = fd->name();
 811   Handle name;
 812   if (intern_name) {
 813     // intern_name is only true with UseNewReflection
 814     oop name_oop = StringTable::intern(field_name, CHECK_NULL);
 815     name = Handle(THREAD, name_oop);
 816   } else {
 817     name = java_lang_String::create_from_symbol(field_name, CHECK_NULL);
 818   }
 819   Symbol*  signature  = fd->signature();
 820   KlassHandle  holder    (THREAD, fd->field_holder());
 821   Handle type = new_type(signature, holder, CHECK_NULL);
 822   Handle rh  = java_lang_reflect_Field::create(CHECK_NULL);
 823 
 824   java_lang_reflect_Field::set_clazz(rh(), Klass::cast(fd->field_holder())->java_mirror());
 825   java_lang_reflect_Field::set_slot(rh(), fd->index());
 826   java_lang_reflect_Field::set_name(rh(), name());
 827   java_lang_reflect_Field::set_type(rh(), type());
 828   // Note the ACC_ANNOTATION bit, which is a per-class access flag, is never set here.
 829   java_lang_reflect_Field::set_modifiers(rh(), fd->access_flags().as_int() & JVM_RECOGNIZED_FIELD_MODIFIERS);
 830   java_lang_reflect_Field::set_override(rh(), false);
 831   if (java_lang_reflect_Field::has_signature_field() &&
 832       fd->has_generic_signature()) {
 833     Symbol*  gs = fd->generic_signature();
 834     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
 835     java_lang_reflect_Field::set_signature(rh(), sig());
 836   }
 837   if (java_lang_reflect_Field::has_annotations_field()) {
 838     java_lang_reflect_Field::set_annotations(rh(), fd->annotations());
 839   }
 840   return rh();
 841 }
 842 
 843 
 844 methodHandle Reflection::resolve_interface_call(instanceKlassHandle klass, methodHandle method,
 845                                                 KlassHandle recv_klass, Handle receiver, TRAPS) {
 846   assert(!method.is_null() , "method should not be null");
 847 
 848   CallInfo info;
 849   Symbol*  signature  = method->signature();
 850   Symbol*  name       = method->name();
 851   LinkResolver::resolve_interface_call(info, receiver, recv_klass, klass,
 852                                        name, signature,
 853                                        KlassHandle(), false, true,
 854                                        CHECK_(methodHandle()));
 855   return info.selected_method();
 856 }
 857 
 858 
 859 oop Reflection::invoke(instanceKlassHandle klass, methodHandle reflected_method,
 860                        Handle receiver, bool override, objArrayHandle ptypes,
 861                        BasicType rtype, objArrayHandle args, bool is_method_invoke, TRAPS) {
 862   ResourceMark rm(THREAD);
 863 
 864   methodHandle method;      // actual method to invoke
 865   KlassHandle target_klass; // target klass, receiver's klass for non-static
 866 
 867   // Ensure klass is initialized
 868   klass->initialize(CHECK_NULL);
 869 
 870   bool is_static = reflected_method->is_static();
 871   if (is_static) {
 872     // ignore receiver argument
 873     method = reflected_method;
 874     target_klass = klass;
 875   } else {
 876     // check for null receiver
 877     if (receiver.is_null()) {
 878       THROW_0(vmSymbols::java_lang_NullPointerException());
 879     }
 880     // Check class of receiver against class declaring method
 881     if (!receiver->is_a(klass())) {
 882       THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "object is not an instance of declaring class");
 883     }
 884     // target klass is receiver's klass
 885     target_klass = KlassHandle(THREAD, receiver->klass());
 886     // no need to resolve if method is private or <init>
 887     if (reflected_method->is_private() || reflected_method->name() == vmSymbols::object_initializer_name()) {
 888       method = reflected_method;
 889     } else {
 890       // resolve based on the receiver
 891       if (instanceKlass::cast(reflected_method->method_holder())->is_interface()) {
 892         // resolve interface call
 893         if (ReflectionWrapResolutionErrors) {
 894           // new default: 6531596
 895           // Match resolution errors with those thrown due to reflection inlining
 896           // Linktime resolution & IllegalAccessCheck already done by Class.getMethod()
 897           method = resolve_interface_call(klass, reflected_method, target_klass, receiver, THREAD);
 898           if (HAS_PENDING_EXCEPTION) {
 899           // Method resolution threw an exception; wrap it in an InvocationTargetException
 900             oop resolution_exception = PENDING_EXCEPTION;
 901             CLEAR_PENDING_EXCEPTION;
 902             JavaCallArguments args(Handle(THREAD, resolution_exception));
 903             THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
 904                 vmSymbols::throwable_void_signature(),
 905                 &args);
 906           }
 907         } else {
 908           method = resolve_interface_call(klass, reflected_method, target_klass, receiver, CHECK_(NULL));
 909         }
 910       }  else {
 911         // if the method can be overridden, we resolve using the vtable index.
 912         int index  = reflected_method->vtable_index();
 913         method = reflected_method;
 914         if (index != methodOopDesc::nonvirtual_vtable_index) {
 915           // target_klass might be an arrayKlassOop but all vtables start at
 916           // the same place. The cast is to avoid virtual call and assertion.
 917           instanceKlass* inst = (instanceKlass*)target_klass()->klass_part();
 918           method = methodHandle(THREAD, inst->method_at_vtable(index));
 919         }
 920         if (!method.is_null()) {
 921           // Check for abstract methods as well
 922           if (method->is_abstract()) {
 923             // new default: 6531596
 924             if (ReflectionWrapResolutionErrors) {
 925               ResourceMark rm(THREAD);
 926               Handle h_origexception = Exceptions::new_exception(THREAD,
 927                      vmSymbols::java_lang_AbstractMethodError(),
 928                      methodOopDesc::name_and_sig_as_C_string(Klass::cast(target_klass()),
 929                      method->name(),
 930                      method->signature()));
 931               JavaCallArguments args(h_origexception);
 932               THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
 933                 vmSymbols::throwable_void_signature(),
 934                 &args);
 935             } else {
 936               ResourceMark rm(THREAD);
 937               THROW_MSG_0(vmSymbols::java_lang_AbstractMethodError(),
 938                         methodOopDesc::name_and_sig_as_C_string(Klass::cast(target_klass()),
 939                                                                 method->name(),
 940                                                                 method->signature()));
 941             }
 942           }
 943         }
 944       }
 945     }
 946   }
 947 
 948   // I believe this is a ShouldNotGetHere case which requires
 949   // an internal vtable bug. If you ever get this please let Karen know.
 950   if (method.is_null()) {
 951     ResourceMark rm(THREAD);
 952     THROW_MSG_0(vmSymbols::java_lang_NoSuchMethodError(),
 953                 methodOopDesc::name_and_sig_as_C_string(Klass::cast(klass()),
 954                                                         reflected_method->name(),
 955                                                         reflected_method->signature()));
 956   }
 957 
 958   // In the JDK 1.4 reflection implementation, the security check is
 959   // done at the Java level
 960   if (!(JDK_Version::is_gte_jdk14x_version() && UseNewReflection)) {
 961 
 962   // Access checking (unless overridden by Method)
 963   if (!override) {
 964     if (!(klass->is_public() && reflected_method->is_public())) {
 965       bool access = Reflection::reflect_check_access(klass(), reflected_method->access_flags(), target_klass(), is_method_invoke, CHECK_NULL);
 966       if (!access) {
 967         return NULL; // exception
 968       }
 969     }
 970   }
 971 
 972   } // !(Universe::is_gte_jdk14x_version() && UseNewReflection)
 973 
 974   assert(ptypes->is_objArray(), "just checking");
 975   int args_len = args.is_null() ? 0 : args->length();
 976   // Check number of arguments
 977   if (ptypes->length() != args_len) {
 978     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "wrong number of arguments");
 979   }
 980 
 981   // Create object to contain parameters for the JavaCall
 982   JavaCallArguments java_args(method->size_of_parameters());
 983 
 984   if (!is_static) {
 985     java_args.push_oop(receiver);
 986   }
 987 
 988   for (int i = 0; i < args_len; i++) {
 989     oop type_mirror = ptypes->obj_at(i);
 990     oop arg = args->obj_at(i);
 991     if (java_lang_Class::is_primitive(type_mirror)) {
 992       jvalue value;
 993       BasicType ptype = basic_type_mirror_to_basic_type(type_mirror, CHECK_NULL);
 994       BasicType atype = unbox_for_primitive(arg, &value, CHECK_NULL);
 995       if (ptype != atype) {
 996         widen(&value, atype, ptype, CHECK_NULL);
 997       }
 998       switch (ptype) {
 999         case T_BOOLEAN:     java_args.push_int(value.z);    break;
1000         case T_CHAR:        java_args.push_int(value.c);    break;
1001         case T_BYTE:        java_args.push_int(value.b);    break;
1002         case T_SHORT:       java_args.push_int(value.s);    break;
1003         case T_INT:         java_args.push_int(value.i);    break;
1004         case T_LONG:        java_args.push_long(value.j);   break;
1005         case T_FLOAT:       java_args.push_float(value.f);  break;
1006         case T_DOUBLE:      java_args.push_double(value.d); break;
1007         default:
1008           THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
1009       }
1010     } else {
1011       if (arg != NULL) {
1012         klassOop k = java_lang_Class::as_klassOop(type_mirror);
1013         if (!arg->is_a(k)) {
1014           THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
1015         }
1016       }
1017       Handle arg_handle(THREAD, arg);         // Create handle for argument
1018       java_args.push_oop(arg_handle); // Push handle
1019     }
1020   }
1021 
1022   assert(java_args.size_of_parameters() == method->size_of_parameters(), "just checking");
1023 
1024   // All oops (including receiver) is passed in as Handles. An potential oop is returned as an
1025   // oop (i.e., NOT as an handle)
1026   JavaValue result(rtype);
1027   JavaCalls::call(&result, method, &java_args, THREAD);
1028 
1029   if (HAS_PENDING_EXCEPTION) {
1030     // Method threw an exception; wrap it in an InvocationTargetException
1031     oop target_exception = PENDING_EXCEPTION;
1032     CLEAR_PENDING_EXCEPTION;
1033     JavaCallArguments args(Handle(THREAD, target_exception));
1034     THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
1035                 vmSymbols::throwable_void_signature(),
1036                 &args);
1037   } else {
1038     if (rtype == T_BOOLEAN || rtype == T_BYTE || rtype == T_CHAR || rtype == T_SHORT)
1039       narrow((jvalue*) result.get_value_addr(), rtype, CHECK_NULL);
1040     return box((jvalue*) result.get_value_addr(), rtype, CHECK_NULL);
1041   }
1042 }
1043 
1044 
1045 void Reflection::narrow(jvalue* value, BasicType narrow_type, TRAPS) {
1046   switch (narrow_type) {
1047     case T_BOOLEAN:
1048      value->z = (jboolean) value->i;
1049      return;
1050     case T_BYTE:
1051      value->b = (jbyte) value->i;
1052      return;
1053     case T_CHAR:
1054      value->c = (jchar) value->i;
1055      return;
1056     case T_SHORT:
1057      value->s = (jshort) value->i;
1058      return;
1059     default:
1060       break; // fail
1061    }
1062   THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
1063 }
1064 
1065 
1066 BasicType Reflection::basic_type_mirror_to_basic_type(oop basic_type_mirror, TRAPS) {
1067   assert(java_lang_Class::is_primitive(basic_type_mirror), "just checking");
1068   return java_lang_Class::primitive_type(basic_type_mirror);
1069 }
1070 
1071 // This would be nicer if, say, java.lang.reflect.Method was a subclass
1072 // of java.lang.reflect.Constructor
1073 
1074 oop Reflection::invoke_method(oop method_mirror, Handle receiver, objArrayHandle args, TRAPS) {
1075   oop mirror             = java_lang_reflect_Method::clazz(method_mirror);
1076   int slot               = java_lang_reflect_Method::slot(method_mirror);
1077   bool override          = java_lang_reflect_Method::override(method_mirror) != 0;
1078   objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Method::parameter_types(method_mirror)));
1079 
1080   oop return_type_mirror = java_lang_reflect_Method::return_type(method_mirror);
1081   BasicType rtype;
1082   if (java_lang_Class::is_primitive(return_type_mirror)) {
1083     rtype = basic_type_mirror_to_basic_type(return_type_mirror, CHECK_NULL);
1084   } else {
1085     rtype = T_OBJECT;
1086   }
1087 
1088   instanceKlassHandle klass(THREAD, java_lang_Class::as_klassOop(mirror));
1089   methodOop m = klass->method_with_idnum(slot);
1090   if (m == NULL) {
1091     THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
1092   }
1093   methodHandle method(THREAD, m);
1094 
1095   return invoke(klass, method, receiver, override, ptypes, rtype, args, true, THREAD);
1096 }
1097 
1098 
1099 oop Reflection::invoke_constructor(oop constructor_mirror, objArrayHandle args, TRAPS) {
1100   oop mirror             = java_lang_reflect_Constructor::clazz(constructor_mirror);
1101   int slot               = java_lang_reflect_Constructor::slot(constructor_mirror);
1102   bool override          = java_lang_reflect_Constructor::override(constructor_mirror) != 0;
1103   objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Constructor::parameter_types(constructor_mirror)));
1104 
1105   instanceKlassHandle klass(THREAD, java_lang_Class::as_klassOop(mirror));
1106   methodOop m = klass->method_with_idnum(slot);
1107   if (m == NULL) {
1108     THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
1109   }
1110   methodHandle method(THREAD, m);
1111   assert(method->name() == vmSymbols::object_initializer_name(), "invalid constructor");
1112 
1113   // Make sure klass gets initialize
1114   klass->initialize(CHECK_NULL);
1115 
1116   // Create new instance (the receiver)
1117   klass->check_valid_for_instantiation(false, CHECK_NULL);
1118   Handle receiver = klass->allocate_instance_handle(CHECK_NULL);
1119 
1120   // Ignore result from call and return receiver
1121   invoke(klass, method, receiver, override, ptypes, T_VOID, args, false, CHECK_NULL);
1122   return receiver();
1123 }