Mercurial > hg > truffle

comparison src/cpu/sparc/vm/bytes_sparc.hpp @ 0:a61af66fc99e jdk7-b24

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial load
author duke
date Sat, 01 Dec 2007 00:00:00 +0000
parents
children c18cbe5936b8
comparison
equal deleted inserted replaced
-1:000000000000 0:a61af66fc99e
1 /*
2 * Copyright 1997-2002 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 class Bytes: AllStatic {
26 public:
27 // Efficient reading and writing of unaligned unsigned data in platform-specific byte ordering
28 // Sparc needs to check for alignment.
29
30 // can I count on address always being a pointer to an unsigned char? Yes
31
32 // Returns true, if the byte ordering used by Java is different from the nativ byte ordering
33 // of the underlying machine. For example, true for Intel x86, False, for Solaris on Sparc.
34 static inline bool is_Java_byte_ordering_different() { return false; }
35
36 // Thus, a swap between native and Java ordering is always a no-op:
37 static inline u2 swap_u2(u2 x) { return x; }
38 static inline u4 swap_u4(u4 x) { return x; }
39 static inline u8 swap_u8(u8 x) { return x; }
40
41 static inline u2 get_native_u2(address p){
42 return (intptr_t(p) & 1) == 0
43 ? *(u2*)p
44 : ( u2(p[0]) << 8 )
45 | ( u2(p[1]) );
46 }
47
48 static inline u4 get_native_u4(address p) {
49 switch (intptr_t(p) & 3) {
50 case 0: return *(u4*)p;
51
52 case 2: return ( u4( ((u2*)p)[0] ) << 16 )
53 | ( u4( ((u2*)p)[1] ) );
54
55 default: return ( u4(p[0]) << 24 )
56 | ( u4(p[1]) << 16 )
57 | ( u4(p[2]) << 8 )
58 | u4(p[3]);
59 }
60 }
61
62 static inline u8 get_native_u8(address p) {
63 switch (intptr_t(p) & 7) {
64 case 0: return *(u8*)p;
65
66 case 4: return ( u8( ((u4*)p)[0] ) << 32 )
67 | ( u8( ((u4*)p)[1] ) );
68
69 case 2: return ( u8( ((u2*)p)[0] ) << 48 )
70 | ( u8( ((u2*)p)[1] ) << 32 )
71 | ( u8( ((u2*)p)[2] ) << 16 )
72 | ( u8( ((u2*)p)[3] ) );
73
74 default: return ( u8(p[0]) << 56 )
75 | ( u8(p[1]) << 48 )
76 | ( u8(p[2]) << 40 )
77 | ( u8(p[3]) << 32 )
78 | ( u8(p[4]) << 24 )
79 | ( u8(p[5]) << 16 )
80 | ( u8(p[6]) << 8 )
81 | u8(p[7]);
82 }
83 }
84
85
86
87 static inline void put_native_u2(address p, u2 x) {
88 if ( (intptr_t(p) & 1) == 0 ) *(u2*)p = x;
89 else {
90 p[0] = x >> 8;
91 p[1] = x;
92 }
93 }
94
95 static inline void put_native_u4(address p, u4 x) {
96 switch ( intptr_t(p) & 3 ) {
97 case 0: *(u4*)p = x;
98 break;
99
100 case 2: ((u2*)p)[0] = x >> 16;
101 ((u2*)p)[1] = x;
102 break;
103
104 default: ((u1*)p)[0] = x >> 24;
105 ((u1*)p)[1] = x >> 16;
106 ((u1*)p)[2] = x >> 8;
107 ((u1*)p)[3] = x;
108 break;
109 }
110 }
111
112 static inline void put_native_u8(address p, u8 x) {
113 switch ( intptr_t(p) & 7 ) {
114 case 0: *(u8*)p = x;
115 break;
116
117 case 4: ((u4*)p)[0] = x >> 32;
118 ((u4*)p)[1] = x;
119 break;
120
121 case 2: ((u2*)p)[0] = x >> 48;
122 ((u2*)p)[1] = x >> 32;
123 ((u2*)p)[2] = x >> 16;
124 ((u2*)p)[3] = x;
125 break;
126
127 default: ((u1*)p)[0] = x >> 56;
128 ((u1*)p)[1] = x >> 48;
129 ((u1*)p)[2] = x >> 40;
130 ((u1*)p)[3] = x >> 32;
131 ((u1*)p)[4] = x >> 24;
132 ((u1*)p)[5] = x >> 16;
133 ((u1*)p)[6] = x >> 8;
134 ((u1*)p)[7] = x;
135 }
136 }
137
138
139 // Efficient reading and writing of unaligned unsigned data in Java byte ordering (i.e. big-endian ordering)
140 // (no byte-order reversal is needed since SPARC CPUs are big-endian oriented)
141 static inline u2 get_Java_u2(address p) { return get_native_u2(p); }
142 static inline u4 get_Java_u4(address p) { return get_native_u4(p); }
143 static inline u8 get_Java_u8(address p) { return get_native_u8(p); }
144
145 static inline void put_Java_u2(address p, u2 x) { put_native_u2(p, x); }
146 static inline void put_Java_u4(address p, u4 x) { put_native_u4(p, x); }
147 static inline void put_Java_u8(address p, u8 x) { put_native_u8(p, x); }
148 };
149
150 //Reconciliation History
151 // 1.7 98/02/24 10:18:41 bytes_i486.hpp
152 // 1.10 98/04/08 18:47:57 bytes_i486.hpp
153 // 1.13 98/07/15 17:10:03 bytes_i486.hpp
154 // 1.14 98/08/13 10:38:23 bytes_i486.hpp
155 // 1.15 98/10/05 16:30:21 bytes_i486.hpp
156 // 1.17 99/06/22 16:37:35 bytes_i486.hpp
157 //End