hotspot/src/cpu/x86/vm/frame_x86.cpp
author twisti
Mon, 04 Jan 2010 18:38:08 +0100
changeset 4564 55dfb20908d0
parent 3261 c7d5aae8d3f7
child 4748 3fa8d8a7c0ea
permissions -rw-r--r--
6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164) Summary: During the work for 6829187 we have fixed a number of basic bugs which are logically grouped with 6815692 and 6858164 but which must be reviewed and pushed separately. Reviewed-by: kvn, never
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
     1
/*
3261
c7d5aae8d3f7 6862919: Update copyright year
xdono
parents: 2880
diff changeset
     2
 * Copyright 1997-2009 Sun Microsystems, Inc.  All Rights Reserved.
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
     3
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     4
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
     5
 * This code is free software; you can redistribute it and/or modify it
489c9b5090e2 Initial load
duke
parents:
diff changeset
     6
 * under the terms of the GNU General Public License version 2 only, as
489c9b5090e2 Initial load
duke
parents:
diff changeset
     7
 * published by the Free Software Foundation.
489c9b5090e2 Initial load
duke
parents:
diff changeset
     8
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
     9
 * This code is distributed in the hope that it will be useful, but WITHOUT
489c9b5090e2 Initial load
duke
parents:
diff changeset
    10
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
489c9b5090e2 Initial load
duke
parents:
diff changeset
    11
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
489c9b5090e2 Initial load
duke
parents:
diff changeset
    12
 * version 2 for more details (a copy is included in the LICENSE file that
489c9b5090e2 Initial load
duke
parents:
diff changeset
    13
 * accompanied this code).
489c9b5090e2 Initial load
duke
parents:
diff changeset
    14
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    15
 * You should have received a copy of the GNU General Public License version
489c9b5090e2 Initial load
duke
parents:
diff changeset
    16
 * 2 along with this work; if not, write to the Free Software Foundation,
489c9b5090e2 Initial load
duke
parents:
diff changeset
    17
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    18
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    19
 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
489c9b5090e2 Initial load
duke
parents:
diff changeset
    20
 * CA 95054 USA or visit www.sun.com if you need additional information or
489c9b5090e2 Initial load
duke
parents:
diff changeset
    21
 * have any questions.
489c9b5090e2 Initial load
duke
parents:
diff changeset
    22
 *
489c9b5090e2 Initial load
duke
parents:
diff changeset
    23
 */
489c9b5090e2 Initial load
duke
parents:
diff changeset
    24
489c9b5090e2 Initial load
duke
parents:
diff changeset
    25
# include "incls/_precompiled.incl"
489c9b5090e2 Initial load
duke
parents:
diff changeset
    26
# include "incls/_frame_x86.cpp.incl"
489c9b5090e2 Initial load
duke
parents:
diff changeset
    27
489c9b5090e2 Initial load
duke
parents:
diff changeset
    28
#ifdef ASSERT
489c9b5090e2 Initial load
duke
parents:
diff changeset
    29
void RegisterMap::check_location_valid() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    30
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
    31
#endif
489c9b5090e2 Initial load
duke
parents:
diff changeset
    32
489c9b5090e2 Initial load
duke
parents:
diff changeset
    33
489c9b5090e2 Initial load
duke
parents:
diff changeset
    34
// Profiling/safepoint support
489c9b5090e2 Initial load
duke
parents:
diff changeset
    35
489c9b5090e2 Initial load
duke
parents:
diff changeset
    36
bool frame::safe_for_sender(JavaThread *thread) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    37
  address   sp = (address)_sp;
489c9b5090e2 Initial load
duke
parents:
diff changeset
    38
  address   fp = (address)_fp;
489c9b5090e2 Initial load
duke
parents:
diff changeset
    39
  address   unextended_sp = (address)_unextended_sp;
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    40
  // sp must be within the stack
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    41
  bool sp_safe = (sp <= thread->stack_base()) &&
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    42
                 (sp >= thread->stack_base() - thread->stack_size());
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    43
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    44
  if (!sp_safe) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    45
    return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    46
  }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    47
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    48
  // unextended sp must be within the stack and above or equal sp
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    49
  bool unextended_sp_safe = (unextended_sp <= thread->stack_base()) &&
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    50
                            (unextended_sp >= sp);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    51
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    52
  if (!unextended_sp_safe) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    53
    return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    54
  }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    55
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    56
  // an fp must be within the stack and above (but not equal) sp
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    57
  bool fp_safe = (fp <= thread->stack_base()) && (fp > sp);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    58
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    59
  // We know sp/unextended_sp are safe only fp is questionable here
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    60
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    61
  // If the current frame is known to the code cache then we can attempt to
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    62
  // to construct the sender and do some validation of it. This goes a long way
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    63
  // toward eliminating issues when we get in frame construction code
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    64
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    65
  if (_cb != NULL ) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    66
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    67
    // First check if frame is complete and tester is reliable
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    68
    // Unfortunately we can only check frame complete for runtime stubs and nmethod
489c9b5090e2 Initial load
duke
parents:
diff changeset
    69
    // other generic buffer blobs are more problematic so we just assume they are
489c9b5090e2 Initial load
duke
parents:
diff changeset
    70
    // ok. adapter blobs never have a frame complete and are never ok.
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    71
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    72
    if (!_cb->is_frame_complete_at(_pc)) {
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
    73
      if (_cb->is_nmethod() || _cb->is_adapter_blob() || _cb->is_runtime_stub()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
    74
        return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
    75
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
    76
    }
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    77
    // Entry frame checks
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    78
    if (is_entry_frame()) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    79
      // an entry frame must have a valid fp.
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    80
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    81
      if (!fp_safe) return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    82
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    83
      // Validate the JavaCallWrapper an entry frame must have
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    84
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    85
      address jcw = (address)entry_frame_call_wrapper();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    86
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    87
      bool jcw_safe = (jcw <= thread->stack_base()) && ( jcw > fp);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    88
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    89
      return jcw_safe;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    90
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    91
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    92
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    93
    intptr_t* sender_sp = NULL;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    94
    address   sender_pc = NULL;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    95
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    96
    if (is_interpreted_frame()) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    97
      // fp must be safe
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    98
      if (!fp_safe) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
    99
        return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   100
      }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   101
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   102
      sender_pc = (address) this->fp()[return_addr_offset];
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   103
      sender_sp = (intptr_t*) addr_at(sender_sp_offset);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   104
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   105
    } else {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   106
      // must be some sort of compiled/runtime frame
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   107
      // fp does not have to be safe (although it could be check for c1?)
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   108
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   109
      sender_sp = _unextended_sp + _cb->frame_size();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   110
      // On Intel the return_address is always the word on the stack
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   111
      sender_pc = (address) *(sender_sp-1);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   112
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   113
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   114
    // We must always be able to find a recognizable pc
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   115
    CodeBlob* sender_blob = CodeCache::find_blob_unsafe(sender_pc);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   116
    if (sender_pc == NULL ||  sender_blob == NULL) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   117
      return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   118
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   119
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   120
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   121
    // If the potential sender is the interpreter then we can do some more checking
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   122
    if (Interpreter::contains(sender_pc)) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   123
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   124
      // ebp is always saved in a recognizable place in any code we generate. However
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   125
      // only if the sender is interpreted/call_stub (c1 too?) are we certain that the saved ebp
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   126
      // is really a frame pointer.
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   127
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   128
      intptr_t *saved_fp = (intptr_t*)*(sender_sp - frame::sender_sp_offset);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   129
      bool saved_fp_safe = ((address)saved_fp <= thread->stack_base()) && (saved_fp > sender_sp);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   130
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   131
      if (!saved_fp_safe) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   132
        return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   133
      }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   134
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   135
      // construct the potential sender
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   136
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   137
      frame sender(sender_sp, saved_fp, sender_pc);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   138
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   139
      return sender.is_interpreted_frame_valid(thread);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   140
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   141
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   142
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   143
    // Could just be some random pointer within the codeBlob
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   144
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   145
    if (!sender_blob->instructions_contains(sender_pc)) return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   146
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   147
    // We should never be able to see an adapter if the current frame is something from code cache
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   148
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   149
    if ( sender_blob->is_adapter_blob()) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   150
      return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   151
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   152
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   153
    // Could be the call_stub
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   154
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   155
    if (StubRoutines::returns_to_call_stub(sender_pc)) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   156
      intptr_t *saved_fp = (intptr_t*)*(sender_sp - frame::sender_sp_offset);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   157
      bool saved_fp_safe = ((address)saved_fp <= thread->stack_base()) && (saved_fp > sender_sp);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   158
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   159
      if (!saved_fp_safe) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   160
        return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   161
      }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   162
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   163
      // construct the potential sender
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   164
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   165
      frame sender(sender_sp, saved_fp, sender_pc);
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   166
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   167
      // Validate the JavaCallWrapper an entry frame must have
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   168
      address jcw = (address)sender.entry_frame_call_wrapper();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   169
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   170
      bool jcw_safe = (jcw <= thread->stack_base()) && ( jcw > (address)sender.fp());
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   171
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   172
      return jcw_safe;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   173
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   174
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   175
    // If the frame size is 0 something is bad because every nmethod has a non-zero frame size
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   176
    // because the return address counts against the callee's frame.
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   177
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   178
    if (sender_blob->frame_size() == 0) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   179
      assert(!sender_blob->is_nmethod(), "should count return address at least");
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   180
      return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   181
    }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   182
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   183
    // We should never be able to see anything here except an nmethod. If something in the
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   184
    // code cache (current frame) is called by an entity within the code cache that entity
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   185
    // should not be anything but the call stub (already covered), the interpreter (already covered)
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   186
    // or an nmethod.
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   187
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   188
    assert(sender_blob->is_nmethod(), "Impossible call chain");
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   189
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   190
    // Could put some more validation for the potential non-interpreted sender
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   191
    // frame we'd create by calling sender if I could think of any. Wait for next crash in forte...
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   192
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   193
    // One idea is seeing if the sender_pc we have is one that we'd expect to call to current cb
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   194
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   195
    // We've validated the potential sender that would be created
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   196
    return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   197
  }
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   198
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   199
  // Must be native-compiled frame. Since sender will try and use fp to find
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   200
  // linkages it must be safe
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   201
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   202
  if (!fp_safe) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   203
    return false;
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   204
  }
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   205
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   206
  // Will the pc we fetch be non-zero (which we'll find at the oldest frame)
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   207
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   208
  if ( (address) this->fp()[return_addr_offset] == NULL) return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   209
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   210
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   211
  // could try and do some more potential verification of native frame if we could think of some...
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   212
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   213
  return true;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   214
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   215
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   216
489c9b5090e2 Initial load
duke
parents:
diff changeset
   217
489c9b5090e2 Initial load
duke
parents:
diff changeset
   218
void frame::patch_pc(Thread* thread, address pc) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   219
  if (TracePcPatching) {
1066
717c3345024f 5108146: Merge i486 and amd64 cpu directories
never
parents: 670
diff changeset
   220
    tty->print_cr("patch_pc at address" INTPTR_FORMAT " [" INTPTR_FORMAT " -> " INTPTR_FORMAT "] ",
717c3345024f 5108146: Merge i486 and amd64 cpu directories
never
parents: 670
diff changeset
   221
                  &((address *)sp())[-1], ((address *)sp())[-1], pc);
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   222
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   223
  ((address *)sp())[-1] = pc;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   224
  _cb = CodeCache::find_blob(pc);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   225
  if (_cb != NULL && _cb->is_nmethod() && ((nmethod*)_cb)->is_deopt_pc(_pc)) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   226
    address orig = (((nmethod*)_cb)->get_original_pc(this));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   227
    assert(orig == _pc, "expected original to be stored before patching");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   228
    _deopt_state = is_deoptimized;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   229
    // leave _pc as is
489c9b5090e2 Initial load
duke
parents:
diff changeset
   230
  } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   231
    _deopt_state = not_deoptimized;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   232
    _pc = pc;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   233
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   234
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   235
489c9b5090e2 Initial load
duke
parents:
diff changeset
   236
bool frame::is_interpreted_frame() const  {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   237
  return Interpreter::contains(pc());
489c9b5090e2 Initial load
duke
parents:
diff changeset
   238
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   239
2880
c2974244a496 6848466: frame::frame_size() assertion failure with -XX:+DebugDeoptimization
cfang
parents: 1066
diff changeset
   240
int frame::frame_size(RegisterMap* map) const {
c2974244a496 6848466: frame::frame_size() assertion failure with -XX:+DebugDeoptimization
cfang
parents: 1066
diff changeset
   241
  frame sender = this->sender(map);
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   242
  return sender.sp() - sp();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   243
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   244
489c9b5090e2 Initial load
duke
parents:
diff changeset
   245
intptr_t* frame::entry_frame_argument_at(int offset) const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   246
  // convert offset to index to deal with tsi
489c9b5090e2 Initial load
duke
parents:
diff changeset
   247
  int index = (Interpreter::expr_offset_in_bytes(offset)/wordSize);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   248
  // Entry frame's arguments are always in relation to unextended_sp()
489c9b5090e2 Initial load
duke
parents:
diff changeset
   249
  return &unextended_sp()[index];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   250
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   251
489c9b5090e2 Initial load
duke
parents:
diff changeset
   252
// sender_sp
489c9b5090e2 Initial load
duke
parents:
diff changeset
   253
#ifdef CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   254
intptr_t* frame::interpreter_frame_sender_sp() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   255
  assert(is_interpreted_frame(), "interpreted frame expected");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   256
  // QQQ why does this specialize method exist if frame::sender_sp() does same thing?
489c9b5090e2 Initial load
duke
parents:
diff changeset
   257
  // seems odd and if we always know interpreted vs. non then sender_sp() is really
489c9b5090e2 Initial load
duke
parents:
diff changeset
   258
  // doing too much work.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   259
  return get_interpreterState()->sender_sp();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   260
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   261
489c9b5090e2 Initial load
duke
parents:
diff changeset
   262
// monitor elements
489c9b5090e2 Initial load
duke
parents:
diff changeset
   263
489c9b5090e2 Initial load
duke
parents:
diff changeset
   264
BasicObjectLock* frame::interpreter_frame_monitor_begin() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   265
  return get_interpreterState()->monitor_base();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   266
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   267
489c9b5090e2 Initial load
duke
parents:
diff changeset
   268
BasicObjectLock* frame::interpreter_frame_monitor_end() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   269
  return (BasicObjectLock*) get_interpreterState()->stack_base();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   270
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   271
489c9b5090e2 Initial load
duke
parents:
diff changeset
   272
#else // CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   273
489c9b5090e2 Initial load
duke
parents:
diff changeset
   274
intptr_t* frame::interpreter_frame_sender_sp() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   275
  assert(is_interpreted_frame(), "interpreted frame expected");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   276
  return (intptr_t*) at(interpreter_frame_sender_sp_offset);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   277
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   278
489c9b5090e2 Initial load
duke
parents:
diff changeset
   279
void frame::set_interpreter_frame_sender_sp(intptr_t* sender_sp) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   280
  assert(is_interpreted_frame(), "interpreted frame expected");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   281
  ptr_at_put(interpreter_frame_sender_sp_offset, (intptr_t) sender_sp);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   282
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   283
489c9b5090e2 Initial load
duke
parents:
diff changeset
   284
489c9b5090e2 Initial load
duke
parents:
diff changeset
   285
// monitor elements
489c9b5090e2 Initial load
duke
parents:
diff changeset
   286
489c9b5090e2 Initial load
duke
parents:
diff changeset
   287
BasicObjectLock* frame::interpreter_frame_monitor_begin() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   288
  return (BasicObjectLock*) addr_at(interpreter_frame_monitor_block_bottom_offset);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   289
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   290
489c9b5090e2 Initial load
duke
parents:
diff changeset
   291
BasicObjectLock* frame::interpreter_frame_monitor_end() const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   292
  BasicObjectLock* result = (BasicObjectLock*) *addr_at(interpreter_frame_monitor_block_top_offset);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   293
  // make sure the pointer points inside the frame
489c9b5090e2 Initial load
duke
parents:
diff changeset
   294
  assert((intptr_t) fp() >  (intptr_t) result, "result must <  than frame pointer");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   295
  assert((intptr_t) sp() <= (intptr_t) result, "result must >= than stack pointer");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   296
  return result;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   297
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   298
489c9b5090e2 Initial load
duke
parents:
diff changeset
   299
void frame::interpreter_frame_set_monitor_end(BasicObjectLock* value) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   300
  *((BasicObjectLock**)addr_at(interpreter_frame_monitor_block_top_offset)) = value;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   301
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   302
489c9b5090e2 Initial load
duke
parents:
diff changeset
   303
// Used by template based interpreter deoptimization
489c9b5090e2 Initial load
duke
parents:
diff changeset
   304
void frame::interpreter_frame_set_last_sp(intptr_t* sp) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   305
    *((intptr_t**)addr_at(interpreter_frame_last_sp_offset)) = sp;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   306
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   307
#endif // CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   308
489c9b5090e2 Initial load
duke
parents:
diff changeset
   309
frame frame::sender_for_entry_frame(RegisterMap* map) const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   310
  assert(map != NULL, "map must be set");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   311
  // Java frame called from C; skip all C frames and return top C
489c9b5090e2 Initial load
duke
parents:
diff changeset
   312
  // frame of that chunk as the sender
489c9b5090e2 Initial load
duke
parents:
diff changeset
   313
  JavaFrameAnchor* jfa = entry_frame_call_wrapper()->anchor();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   314
  assert(!entry_frame_is_first(), "next Java fp must be non zero");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   315
  assert(jfa->last_Java_sp() > sp(), "must be above this frame on stack");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   316
  map->clear();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   317
  assert(map->include_argument_oops(), "should be set by clear");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   318
  if (jfa->last_Java_pc() != NULL ) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   319
    frame fr(jfa->last_Java_sp(), jfa->last_Java_fp(), jfa->last_Java_pc());
489c9b5090e2 Initial load
duke
parents:
diff changeset
   320
    return fr;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   321
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   322
  frame fr(jfa->last_Java_sp(), jfa->last_Java_fp());
489c9b5090e2 Initial load
duke
parents:
diff changeset
   323
  return fr;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   324
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   325
489c9b5090e2 Initial load
duke
parents:
diff changeset
   326
frame frame::sender_for_interpreter_frame(RegisterMap* map) const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   327
  // sp is the raw sp from the sender after adapter or interpreter extension
489c9b5090e2 Initial load
duke
parents:
diff changeset
   328
  intptr_t* sp = (intptr_t*) addr_at(sender_sp_offset);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   329
489c9b5090e2 Initial load
duke
parents:
diff changeset
   330
  // This is the sp before any possible extension (adapter/locals).
489c9b5090e2 Initial load
duke
parents:
diff changeset
   331
  intptr_t* unextended_sp = interpreter_frame_sender_sp();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   332
4564
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   333
  address sender_pc = this->sender_pc();
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   334
  CodeBlob* sender_cb = CodeCache::find_blob_unsafe(sender_pc);
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   335
  assert(sender_cb, "sanity");
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   336
  nmethod* sender_nm = sender_cb->as_nmethod_or_null();
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   337
  if (sender_nm != NULL && sender_nm->is_method_handle_return(sender_pc)) {
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   338
    unextended_sp = (intptr_t*) at(link_offset);
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   339
  }
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   340
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   341
  // The interpreter and compiler(s) always save EBP/RBP in a known
489c9b5090e2 Initial load
duke
parents:
diff changeset
   342
  // location on entry. We must record where that location is
489c9b5090e2 Initial load
duke
parents:
diff changeset
   343
  // so this if EBP/RBP was live on callout from c2 we can find
489c9b5090e2 Initial load
duke
parents:
diff changeset
   344
  // the saved copy no matter what it called.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   345
489c9b5090e2 Initial load
duke
parents:
diff changeset
   346
  // Since the interpreter always saves EBP/RBP if we record where it is then
489c9b5090e2 Initial load
duke
parents:
diff changeset
   347
  // we don't have to always save EBP/RBP on entry and exit to c2 compiled
489c9b5090e2 Initial load
duke
parents:
diff changeset
   348
  // code, on entry will be enough.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   349
#ifdef COMPILER2
489c9b5090e2 Initial load
duke
parents:
diff changeset
   350
  if (map->update_map()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   351
    map->set_location(rbp->as_VMReg(), (address) addr_at(link_offset));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   352
#ifdef AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   353
    // this is weird "H" ought to be at a higher address however the
489c9b5090e2 Initial load
duke
parents:
diff changeset
   354
    // oopMaps seems to have the "H" regs at the same address and the
489c9b5090e2 Initial load
duke
parents:
diff changeset
   355
    // vanilla register.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   356
    // XXXX make this go away
489c9b5090e2 Initial load
duke
parents:
diff changeset
   357
    if (true) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   358
      map->set_location(rbp->as_VMReg()->next(), (address)addr_at(link_offset));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   359
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   360
#endif // AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   361
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   362
#endif /* COMPILER2 */
4564
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   363
  return frame(sp, unextended_sp, link(), sender_pc);
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   364
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   365
489c9b5090e2 Initial load
duke
parents:
diff changeset
   366
489c9b5090e2 Initial load
duke
parents:
diff changeset
   367
//------------------------------sender_for_compiled_frame-----------------------
489c9b5090e2 Initial load
duke
parents:
diff changeset
   368
frame frame::sender_for_compiled_frame(RegisterMap* map) const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   369
  assert(map != NULL, "map must be set");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   370
  const bool c1_compiled = _cb->is_compiled_by_c1();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   371
489c9b5090e2 Initial load
duke
parents:
diff changeset
   372
  // frame owned by optimizing compiler
489c9b5090e2 Initial load
duke
parents:
diff changeset
   373
  intptr_t* sender_sp = NULL;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   374
489c9b5090e2 Initial load
duke
parents:
diff changeset
   375
  assert(_cb->frame_size() >= 0, "must have non-zero frame size");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   376
  sender_sp = unextended_sp() + _cb->frame_size();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   377
489c9b5090e2 Initial load
duke
parents:
diff changeset
   378
  // On Intel the return_address is always the word on the stack
489c9b5090e2 Initial load
duke
parents:
diff changeset
   379
  address sender_pc = (address) *(sender_sp-1);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   380
489c9b5090e2 Initial load
duke
parents:
diff changeset
   381
  // This is the saved value of ebp which may or may not really be an fp.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   382
  // it is only an fp if the sender is an interpreter frame (or c1?)
489c9b5090e2 Initial load
duke
parents:
diff changeset
   383
489c9b5090e2 Initial load
duke
parents:
diff changeset
   384
  intptr_t *saved_fp = (intptr_t*)*(sender_sp - frame::sender_sp_offset);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   385
4564
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   386
  intptr_t* unextended_sp = sender_sp;
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   387
  // If we are returning to a compiled method handle call site,
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   388
  // the saved_fp will in fact be a saved value of the unextended SP.
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   389
  // The simplest way to tell whether we are returning to such a call
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   390
  // site is as follows:
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   391
  CodeBlob* sender_cb = CodeCache::find_blob_unsafe(sender_pc);
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   392
  assert(sender_cb, "sanity");
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   393
  nmethod* sender_nm = sender_cb->as_nmethod_or_null();
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   394
  if (sender_nm != NULL && sender_nm->is_method_handle_return(sender_pc)) {
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   395
    unextended_sp = saved_fp;
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   396
  }
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   397
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   398
  if (map->update_map()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   399
    // Tell GC to use argument oopmaps for some runtime stubs that need it.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   400
    // For C1, the runtime stub might not have oop maps, so set this flag
489c9b5090e2 Initial load
duke
parents:
diff changeset
   401
    // outside of update_register_map.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   402
    map->set_include_argument_oops(_cb->caller_must_gc_arguments(map->thread()));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   403
    if (_cb->oop_maps() != NULL) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   404
      OopMapSet::update_register_map(this, map);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   405
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   406
    // Since the prolog does the save and restore of epb there is no oopmap
489c9b5090e2 Initial load
duke
parents:
diff changeset
   407
    // for it so we must fill in its location as if there was an oopmap entry
489c9b5090e2 Initial load
duke
parents:
diff changeset
   408
    // since if our caller was compiled code there could be live jvm state in it.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   409
    map->set_location(rbp->as_VMReg(), (address) (sender_sp - frame::sender_sp_offset));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   410
#ifdef AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   411
    // this is weird "H" ought to be at a higher address however the
489c9b5090e2 Initial load
duke
parents:
diff changeset
   412
    // oopMaps seems to have the "H" regs at the same address and the
489c9b5090e2 Initial load
duke
parents:
diff changeset
   413
    // vanilla register.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   414
    // XXXX make this go away
489c9b5090e2 Initial load
duke
parents:
diff changeset
   415
    if (true) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   416
      map->set_location(rbp->as_VMReg()->next(), (address) (sender_sp - frame::sender_sp_offset));
489c9b5090e2 Initial load
duke
parents:
diff changeset
   417
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   418
#endif // AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   419
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   420
489c9b5090e2 Initial load
duke
parents:
diff changeset
   421
  assert(sender_sp != sp(), "must have changed");
4564
55dfb20908d0 6893081: method handle & invokedynamic code needs additional cleanup (post 6815692, 6858164)
twisti
parents: 3261
diff changeset
   422
  return frame(sender_sp, unextended_sp, saved_fp, sender_pc);
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   423
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   424
489c9b5090e2 Initial load
duke
parents:
diff changeset
   425
frame frame::sender(RegisterMap* map) const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   426
  // Default is we done have to follow them. The sender_for_xxx will
489c9b5090e2 Initial load
duke
parents:
diff changeset
   427
  // update it accordingly
489c9b5090e2 Initial load
duke
parents:
diff changeset
   428
  map->set_include_argument_oops(false);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   429
489c9b5090e2 Initial load
duke
parents:
diff changeset
   430
  if (is_entry_frame())       return sender_for_entry_frame(map);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   431
  if (is_interpreted_frame()) return sender_for_interpreter_frame(map);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   432
  assert(_cb == CodeCache::find_blob(pc()),"Must be the same");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   433
489c9b5090e2 Initial load
duke
parents:
diff changeset
   434
  if (_cb != NULL) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   435
    return sender_for_compiled_frame(map);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   436
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   437
  // Must be native-compiled frame, i.e. the marshaling code for native
489c9b5090e2 Initial load
duke
parents:
diff changeset
   438
  // methods that exists in the core system.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   439
  return frame(sender_sp(), link(), sender_pc());
489c9b5090e2 Initial load
duke
parents:
diff changeset
   440
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   441
489c9b5090e2 Initial load
duke
parents:
diff changeset
   442
489c9b5090e2 Initial load
duke
parents:
diff changeset
   443
bool frame::interpreter_frame_equals_unpacked_fp(intptr_t* fp) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   444
  assert(is_interpreted_frame(), "must be interpreter frame");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   445
  methodOop method = interpreter_frame_method();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   446
  // When unpacking an optimized frame the frame pointer is
489c9b5090e2 Initial load
duke
parents:
diff changeset
   447
  // adjusted with:
489c9b5090e2 Initial load
duke
parents:
diff changeset
   448
  int diff = (method->max_locals() - method->size_of_parameters()) *
489c9b5090e2 Initial load
duke
parents:
diff changeset
   449
             Interpreter::stackElementWords();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   450
  return _fp == (fp - diff);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   451
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   452
489c9b5090e2 Initial load
duke
parents:
diff changeset
   453
void frame::pd_gc_epilog() {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   454
  // nothing done here now
489c9b5090e2 Initial load
duke
parents:
diff changeset
   455
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   456
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   457
bool frame::is_interpreted_frame_valid(JavaThread* thread) const {
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   458
// QQQ
489c9b5090e2 Initial load
duke
parents:
diff changeset
   459
#ifdef CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   460
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   461
  assert(is_interpreted_frame(), "Not an interpreted frame");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   462
  // These are reasonable sanity checks
489c9b5090e2 Initial load
duke
parents:
diff changeset
   463
  if (fp() == 0 || (intptr_t(fp()) & (wordSize-1)) != 0) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   464
    return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   465
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   466
  if (sp() == 0 || (intptr_t(sp()) & (wordSize-1)) != 0) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   467
    return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   468
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   469
  if (fp() + interpreter_frame_initial_sp_offset < sp()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   470
    return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   471
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   472
  // These are hacks to keep us out of trouble.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   473
  // The problem with these is that they mask other problems
489c9b5090e2 Initial load
duke
parents:
diff changeset
   474
  if (fp() <= sp()) {        // this attempts to deal with unsigned comparison above
489c9b5090e2 Initial load
duke
parents:
diff changeset
   475
    return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   476
  }
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   477
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   478
  // do some validation of frame elements
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   479
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   480
  // first the method
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   481
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   482
  methodOop m = *interpreter_frame_method_addr();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   483
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   484
  // validate the method we'd find in this potential sender
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   485
  if (!Universe::heap()->is_valid_method(m)) return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   486
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   487
  // stack frames shouldn't be much larger than max_stack elements
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   488
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   489
  if (fp() - sp() > 1024 + m->max_stack()*Interpreter::stackElementSize()) {
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   490
    return false;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   491
  }
354
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   492
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   493
  // validate bci/bcx
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   494
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   495
  intptr_t  bcx    = interpreter_frame_bcx();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   496
  if (m->validate_bci_from_bcx(bcx) < 0) {
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   497
    return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   498
  }
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   499
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   500
  // validate constantPoolCacheOop
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   501
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   502
  constantPoolCacheOop cp = *interpreter_frame_cache_addr();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   503
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   504
  if (cp == NULL ||
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   505
      !Space::is_aligned(cp) ||
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   506
      !Universe::heap()->is_permanent((void*)cp)) return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   507
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   508
  // validate locals
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   509
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   510
  address locals =  (address) *interpreter_frame_locals_addr();
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   511
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   512
  if (locals > thread->stack_base() || locals < (address) fp()) return false;
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   513
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   514
  // We'd have to be pretty unlucky to be mislead at this point
3b42d6fdcb82 6603919: Stackwalking crash on x86 -server with Sun Studio's collect -j on
sgoldman
parents: 1
diff changeset
   515
1
489c9b5090e2 Initial load
duke
parents:
diff changeset
   516
#endif // CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   517
  return true;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   518
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   519
489c9b5090e2 Initial load
duke
parents:
diff changeset
   520
BasicType frame::interpreter_frame_result(oop* oop_result, jvalue* value_result) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   521
#ifdef CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   522
  // Needed for JVMTI. The result should always be in the interpreterState object
489c9b5090e2 Initial load
duke
parents:
diff changeset
   523
  assert(false, "NYI");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   524
  interpreterState istate = get_interpreterState();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   525
#endif // CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   526
  assert(is_interpreted_frame(), "interpreted frame expected");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   527
  methodOop method = interpreter_frame_method();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   528
  BasicType type = method->result_type();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   529
489c9b5090e2 Initial load
duke
parents:
diff changeset
   530
  intptr_t* tos_addr;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   531
  if (method->is_native()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   532
    // Prior to calling into the runtime to report the method_exit the possible
489c9b5090e2 Initial load
duke
parents:
diff changeset
   533
    // return value is pushed to the native stack. If the result is a jfloat/jdouble
489c9b5090e2 Initial load
duke
parents:
diff changeset
   534
    // then ST0 is saved before EAX/EDX. See the note in generate_native_result
489c9b5090e2 Initial load
duke
parents:
diff changeset
   535
    tos_addr = (intptr_t*)sp();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   536
    if (type == T_FLOAT || type == T_DOUBLE) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   537
    // QQQ seems like this code is equivalent on the two platforms
489c9b5090e2 Initial load
duke
parents:
diff changeset
   538
#ifdef AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   539
      // This is times two because we do a push(ltos) after pushing XMM0
489c9b5090e2 Initial load
duke
parents:
diff changeset
   540
      // and that takes two interpreter stack slots.
489c9b5090e2 Initial load
duke
parents:
diff changeset
   541
      tos_addr += 2 * Interpreter::stackElementWords();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   542
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   543
      tos_addr += 2;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   544
#endif // AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   545
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   546
  } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   547
    tos_addr = (intptr_t*)interpreter_frame_tos_address();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   548
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   549
489c9b5090e2 Initial load
duke
parents:
diff changeset
   550
  switch (type) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   551
    case T_OBJECT  :
489c9b5090e2 Initial load
duke
parents:
diff changeset
   552
    case T_ARRAY   : {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   553
      oop obj;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   554
      if (method->is_native()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   555
#ifdef CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   556
        obj = istate->_oop_temp;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   557
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   558
        obj = (oop) at(interpreter_frame_oop_temp_offset);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   559
#endif // CC_INTERP
489c9b5090e2 Initial load
duke
parents:
diff changeset
   560
      } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   561
        oop* obj_p = (oop*)tos_addr;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   562
        obj = (obj_p == NULL) ? (oop)NULL : *obj_p;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   563
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   564
      assert(obj == NULL || Universe::heap()->is_in(obj), "sanity check");
489c9b5090e2 Initial load
duke
parents:
diff changeset
   565
      *oop_result = obj;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   566
      break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   567
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   568
    case T_BOOLEAN : value_result->z = *(jboolean*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   569
    case T_BYTE    : value_result->b = *(jbyte*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   570
    case T_CHAR    : value_result->c = *(jchar*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   571
    case T_SHORT   : value_result->s = *(jshort*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   572
    case T_INT     : value_result->i = *(jint*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   573
    case T_LONG    : value_result->j = *(jlong*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   574
    case T_FLOAT   : {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   575
#ifdef AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   576
        value_result->f = *(jfloat*)tos_addr;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   577
#else
489c9b5090e2 Initial load
duke
parents:
diff changeset
   578
      if (method->is_native()) {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   579
        jdouble d = *(jdouble*)tos_addr;  // Result was in ST0 so need to convert to jfloat
489c9b5090e2 Initial load
duke
parents:
diff changeset
   580
        value_result->f = (jfloat)d;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   581
      } else {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   582
        value_result->f = *(jfloat*)tos_addr;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   583
      }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   584
#endif // AMD64
489c9b5090e2 Initial load
duke
parents:
diff changeset
   585
      break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   586
    }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   587
    case T_DOUBLE  : value_result->d = *(jdouble*)tos_addr; break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   588
    case T_VOID    : /* Nothing to do */ break;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   589
    default        : ShouldNotReachHere();
489c9b5090e2 Initial load
duke
parents:
diff changeset
   590
  }
489c9b5090e2 Initial load
duke
parents:
diff changeset
   591
489c9b5090e2 Initial load
duke
parents:
diff changeset
   592
  return type;
489c9b5090e2 Initial load
duke
parents:
diff changeset
   593
}
489c9b5090e2 Initial load
duke
parents:
diff changeset
   594
489c9b5090e2 Initial load
duke
parents:
diff changeset
   595
489c9b5090e2 Initial load
duke
parents:
diff changeset
   596
intptr_t* frame::interpreter_frame_tos_at(jint offset) const {
489c9b5090e2 Initial load
duke
parents:
diff changeset
   597
  int index = (Interpreter::expr_offset_in_bytes(offset)/wordSize);
489c9b5090e2 Initial load
duke
parents:
diff changeset
   598
  return &interpreter_frame_tos_address()[index];
489c9b5090e2 Initial load
duke
parents:
diff changeset
   599
}