1
|
1 |
//
|
|
2 |
// Copyright 2003-2007 Sun Microsystems, Inc. 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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
|
|
20 |
// CA 95054 USA or visit www.sun.com if you need additional information or
|
|
21 |
// have any questions.
|
|
22 |
//
|
|
23 |
//
|
|
24 |
|
|
25 |
|
|
26 |
// Support for u8 os::setup_fpu()
|
|
27 |
.inline _solaris_raw_setup_fpu,1
|
|
28 |
movl 0(%esp), %eax
|
|
29 |
fldcw (%eax)
|
|
30 |
.end
|
|
31 |
|
|
32 |
// The argument size of each inline directive is ignored by the compiler
|
|
33 |
// and is set to 0 for compatibility reason.
|
|
34 |
|
|
35 |
// Get the raw thread ID from %gs:0
|
|
36 |
.inline _raw_thread_id,0
|
|
37 |
movl %gs:0, %eax
|
|
38 |
.end
|
|
39 |
|
|
40 |
// Get callers fp
|
|
41 |
.inline _get_previous_fp,0
|
|
42 |
movl %ebp, %eax
|
|
43 |
movl %eax, %eax
|
|
44 |
.end
|
|
45 |
|
|
46 |
// Support for jint Atomic::add(jint inc, volatile jint* dest)
|
|
47 |
// An additional bool (os::is_MP()) is passed as the last argument.
|
|
48 |
.inline _Atomic_add,3
|
|
49 |
movl 0(%esp), %eax // inc
|
|
50 |
movl 4(%esp), %edx // dest
|
|
51 |
movl %eax, %ecx
|
|
52 |
cmpl $0, 8(%esp) // MP test
|
|
53 |
je 1f
|
|
54 |
lock
|
|
55 |
1: xaddl %eax, (%edx)
|
|
56 |
addl %ecx, %eax
|
|
57 |
.end
|
|
58 |
|
|
59 |
// Support for jint Atomic::xchg(jint exchange_value, volatile jint* dest).
|
|
60 |
.inline _Atomic_xchg,2
|
|
61 |
movl 0(%esp), %eax // exchange_value
|
|
62 |
movl 4(%esp), %ecx // dest
|
|
63 |
xchgl (%ecx), %eax
|
|
64 |
.end
|
|
65 |
|
|
66 |
// Support for jint Atomic::cmpxchg(jint exchange_value,
|
|
67 |
// volatile jint *dest,
|
|
68 |
// jint compare_value)
|
|
69 |
// An additional bool (os::is_MP()) is passed as the last argument.
|
|
70 |
.inline _Atomic_cmpxchg,4
|
|
71 |
movl 8(%esp), %eax // compare_value
|
|
72 |
movl 0(%esp), %ecx // exchange_value
|
|
73 |
movl 4(%esp), %edx // dest
|
|
74 |
cmp $0, 12(%esp) // MP test
|
|
75 |
je 1f
|
|
76 |
lock
|
|
77 |
1: cmpxchgl %ecx, (%edx)
|
|
78 |
.end
|
|
79 |
|
|
80 |
// Support for jlong Atomic::cmpxchg(jlong exchange_value,
|
|
81 |
// volatile jlong* dest,
|
|
82 |
// jlong compare_value)
|
|
83 |
// An additional bool (os::is_MP()) is passed as the last argument.
|
|
84 |
.inline _Atomic_cmpxchg_long,6
|
|
85 |
pushl %ebx
|
|
86 |
pushl %edi
|
|
87 |
movl 20(%esp), %eax // compare_value (low)
|
|
88 |
movl 24(%esp), %edx // compare_value (high)
|
|
89 |
movl 16(%esp), %edi // dest
|
|
90 |
movl 8(%esp), %ebx // exchange_value (low)
|
|
91 |
movl 12(%esp), %ecx // exchange_high (high)
|
|
92 |
cmp $0, 28(%esp) // MP test
|
|
93 |
je 1f
|
|
94 |
lock
|
|
95 |
1: cmpxchg8b (%edi)
|
|
96 |
popl %edi
|
|
97 |
popl %ebx
|
|
98 |
.end
|
|
99 |
|
|
100 |
// Support for OrderAccess::acquire()
|
|
101 |
.inline _OrderAccess_acquire,0
|
|
102 |
movl 0(%esp), %eax
|
|
103 |
.end
|
|
104 |
|
|
105 |
// Support for OrderAccess::fence()
|
|
106 |
.inline _OrderAccess_fence,0
|
|
107 |
lock
|
|
108 |
addl $0, (%esp)
|
|
109 |
.end
|
|
110 |
|
|
111 |
// Support for u2 Bytes::swap_u2(u2 x)
|
|
112 |
.inline _raw_swap_u2,1
|
|
113 |
movl 0(%esp), %eax
|
|
114 |
xchgb %al, %ah
|
|
115 |
.end
|
|
116 |
|
|
117 |
// Support for u4 Bytes::swap_u4(u4 x)
|
|
118 |
.inline _raw_swap_u4,1
|
|
119 |
movl 0(%esp), %eax
|
|
120 |
bswap %eax
|
|
121 |
.end
|
|
122 |
|
|
123 |
// Support for u8 Bytes::swap_u8_base(u4 x, u4 y)
|
|
124 |
.inline _raw_swap_u8,2
|
|
125 |
movl 4(%esp), %eax // y
|
|
126 |
movl 0(%esp), %edx // x
|
|
127 |
bswap %eax
|
|
128 |
bswap %edx
|
|
129 |
.end
|