--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/hotspot/src/share/vm/opto/regalloc.cpp	Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,127 @@
+/*
+ * Copyright 2000-2006 Sun Microsystems, Inc.  All Rights Reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ */
+
+#include "incls/_precompiled.incl"
+#include "incls/_regalloc.cpp.incl"
+
+static const int NodeRegsOverflowSize = 200;
+
+void (*PhaseRegAlloc::_alloc_statistics[MAX_REG_ALLOCATORS])();
+int PhaseRegAlloc::_num_allocators = 0;
+#ifndef PRODUCT
+int PhaseRegAlloc::_total_framesize = 0;
+int PhaseRegAlloc::_max_framesize = 0;
+#endif
+
+PhaseRegAlloc::PhaseRegAlloc( uint unique, PhaseCFG &cfg,
+                              Matcher &matcher,
+                              void (*pr_stats)() ):
+               Phase(Register_Allocation), _cfg(cfg), _matcher(matcher),
+               _node_oops(Thread::current()->resource_area()),
+               _node_regs(0),
+               _framesize(0xdeadbeef)
+{
+    int i;
+
+    for (i=0; i < _num_allocators; i++) {
+        if (_alloc_statistics[i] == pr_stats)
+            return;
+    }
+    assert((_num_allocators + 1) < MAX_REG_ALLOCATORS, "too many register allocators");
+    _alloc_statistics[_num_allocators++] = pr_stats;
+}
+
+
+//------------------------------reg2offset-------------------------------------
+int PhaseRegAlloc::reg2offset_unchecked( OptoReg::Name reg ) const {
+  // Slots below _max_in_arg_stack_reg are offset by the entire frame.
+  // Slots above _max_in_arg_stack_reg are frame_slots and are not offset.
+  int slot = (reg < _matcher._new_SP)
+    ? reg - OptoReg::stack0() + _framesize
+    : reg - _matcher._new_SP;
+  // Note:  We use the direct formula (reg - SharedInfo::stack0) instead of
+  // OptoReg::reg2stack(reg), in order to avoid asserts in the latter
+  // function.  This routine must remain unchecked, so that dump_frame()
+  // can do its work undisturbed.
+  // %%% not really clear why reg2stack would assert here
+
+  return slot*VMRegImpl::stack_slot_size;
+}
+
+int PhaseRegAlloc::reg2offset( OptoReg::Name reg ) const {
+
+  // Not allowed in the out-preserve area.
+  // In-preserve area is allowed so Intel can fetch the return pc out.
+  assert( reg <  _matcher._old_SP ||
+          (reg >= OptoReg::add(_matcher._old_SP,C->out_preserve_stack_slots()) &&
+           reg <  _matcher._in_arg_limit) ||
+          reg >=  OptoReg::add(_matcher._new_SP,C->out_preserve_stack_slots()),
+          "register allocated in a preserve area" );
+  return reg2offset_unchecked( reg );
+}
+
+//------------------------------offset2reg-------------------------------------
+OptoReg::Name PhaseRegAlloc::offset2reg(int stk_offset) const {
+  int slot = stk_offset / jintSize;
+  int reg = (slot < (int) _framesize)
+    ? slot + _matcher._new_SP
+    : OptoReg::stack2reg(slot) - _framesize;
+  assert(stk_offset == reg2offset((OptoReg::Name) reg),
+         "offset2reg does not invert properly");
+  return (OptoReg::Name) reg;
+}
+
+//------------------------------set_oop----------------------------------------
+void PhaseRegAlloc::set_oop( const Node *n, bool is_an_oop ) {
+  if( is_an_oop ) {
+    _node_oops.set(n->_idx);
+  }
+}
+
+//------------------------------is_oop-----------------------------------------
+bool PhaseRegAlloc::is_oop( const Node *n ) const {
+  return _node_oops.test(n->_idx) != 0;
+}
+
+// Allocate _node_regs table with at least "size" elements
+void PhaseRegAlloc::alloc_node_regs(int size) {
+  _node_regs_max_index = size + (size >> 1) + NodeRegsOverflowSize;
+  _node_regs = NEW_RESOURCE_ARRAY( OptoRegPair, _node_regs_max_index );
+  // We assume our caller will fill in all elements up to size-1, so
+  // only the extra space we allocate is initialized here.
+  for( uint i = size; i < _node_regs_max_index; ++i )
+    _node_regs[i].set_bad();
+}
+
+#ifndef PRODUCT
+void
+PhaseRegAlloc::print_statistics() {
+  tty->print_cr("Total frameslots = %d, Max frameslots = %d", _total_framesize, _max_framesize);
+  int i;
+
+  for (i=0; i < _num_allocators; i++) {
+    _alloc_statistics[i]();
+  }
+}
+#endif