CoCalc -- bytes

GitHub Repository: PojavLauncherTeam/mobile
Path: blob/master/src/hotspot/cpu/ppc/bytes_ppc.hpp
⁴⁰⁹³⁰ views
1
/*
2
 * Copyright (c) 1997, 2019, Oracle and/or its affiliates. All rights reserved.
3
 * Copyright (c) 2012, 2016 SAP SE. All rights reserved.
4
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5
 *
6
 * This code is free software; you can redistribute it and/or modify it
7
 * under the terms of the GNU General Public License version 2 only, as
8
 * published by the Free Software Foundation.
9
 *
10
 * This code is distributed in the hope that it will be useful, but WITHOUT
11
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
13
 * version 2 for more details (a copy is included in the LICENSE file that
14
 * accompanied this code).
15
 *
16
 * You should have received a copy of the GNU General Public License version
17
 * 2 along with this work; if not, write to the Free Software Foundation,
18
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
19
 *
20
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
21
 * or visit www.oracle.com if you need additional information or have any
22
 * questions.
23
 *
24
 */
25

26
#ifndef CPU_PPC_BYTES_PPC_HPP
27
#define CPU_PPC_BYTES_PPC_HPP
28

29
#include "memory/allocation.hpp"
30

31
class Bytes: AllStatic {
32
 public:
33
  // Efficient reading and writing of unaligned unsigned data in platform-specific byte ordering
34
  // PowerPC needs to check for alignment.
35

36
  // Can I count on address always being a pointer to an unsigned char? Yes.
37

38
#if defined(VM_LITTLE_ENDIAN)
39

40
  // Forward declarations of the compiler-dependent implementation
41
  static inline u2 swap_u2(u2 x);
42
  static inline u4 swap_u4(u4 x);
43
  static inline u8 swap_u8(u8 x);
44

45
  static inline u2   get_native_u2(address p) {
46
    return (intptr_t(p) & 1) == 0
47
             ?   *(u2*)p
48
             :   ( u2(p[1]) << 8 )
49
               | ( u2(p[0])      );
50
  }
51

52
  static inline u4   get_native_u4(address p) {
53
    switch (intptr_t(p) & 3) {
54
     case 0:  return *(u4*)p;
55

56
     case 2:  return (  u4( ((u2*)p)[1] ) << 16  )
57
                   | (  u4( ((u2*)p)[0] )        );
58

59
    default:  return ( u4(p[3]) << 24 )
60
                   | ( u4(p[2]) << 16 )
61
                   | ( u4(p[1]) <<  8 )
62
                   |   u4(p[0]);
63
    }
64
  }
65

66
  static inline u8   get_native_u8(address p) {
67
    switch (intptr_t(p) & 7) {
68
      case 0:  return *(u8*)p;
69

70
      case 4:  return (  u8( ((u4*)p)[1] ) << 32  )
71
                    | (  u8( ((u4*)p)[0] )        );
72

73
      case 2:  return (  u8( ((u2*)p)[3] ) << 48  )
74
                    | (  u8( ((u2*)p)[2] ) << 32  )
75
                    | (  u8( ((u2*)p)[1] ) << 16  )
76
                    | (  u8( ((u2*)p)[0] )        );
77

78
     default:  return ( u8(p[7]) << 56 )
79
                    | ( u8(p[6]) << 48 )
80
                    | ( u8(p[5]) << 40 )
81
                    | ( u8(p[4]) << 32 )
82
                    | ( u8(p[3]) << 24 )
83
                    | ( u8(p[2]) << 16 )
84
                    | ( u8(p[1]) <<  8 )
85
                    |   u8(p[0]);
86
    }
87
  }
88

89

90

91
  static inline void put_native_u2(address p, u2 x) {
92
    if ( (intptr_t(p) & 1) == 0 )  *(u2*)p = x;
93
    else {
94
      p[1] = x >> 8;
95
      p[0] = x;
96
    }
97
  }
98

99
  static inline void put_native_u4(address p, u4 x) {
100
    switch ( intptr_t(p) & 3 ) {
101
    case 0:  *(u4*)p = x;
102
              break;
103

104
    case 2:  ((u2*)p)[1] = x >> 16;
105
             ((u2*)p)[0] = x;
106
             break;
107

108
    default: ((u1*)p)[3] = x >> 24;
109
             ((u1*)p)[2] = x >> 16;
110
             ((u1*)p)[1] = x >>  8;
111
             ((u1*)p)[0] = x;
112
             break;
113
    }
114
  }
115

116
  static inline void put_native_u8(address p, u8 x) {
117
    switch ( intptr_t(p) & 7 ) {
118
    case 0:  *(u8*)p = x;
119
             break;
120

121
    case 4:  ((u4*)p)[1] = x >> 32;
122
             ((u4*)p)[0] = x;
123
             break;
124

125
    case 2:  ((u2*)p)[3] = x >> 48;
126
             ((u2*)p)[2] = x >> 32;
127
             ((u2*)p)[1] = x >> 16;
128
             ((u2*)p)[0] = x;
129
             break;
130

131
    default: ((u1*)p)[7] = x >> 56;
132
             ((u1*)p)[6] = x >> 48;
133
             ((u1*)p)[5] = x >> 40;
134
             ((u1*)p)[4] = x >> 32;
135
             ((u1*)p)[3] = x >> 24;
136
             ((u1*)p)[2] = x >> 16;
137
             ((u1*)p)[1] = x >>  8;
138
             ((u1*)p)[0] = x;
139
    }
140
  }
141

142
  // Efficient reading and writing of unaligned unsigned data in Java byte ordering (i.e. big-endian ordering)
143
  // (no byte-order reversal is needed since Power CPUs are big-endian oriented).
144
  static inline u2   get_Java_u2(address p) { return swap_u2(get_native_u2(p)); }
145
  static inline u4   get_Java_u4(address p) { return swap_u4(get_native_u4(p)); }
146
  static inline u8   get_Java_u8(address p) { return swap_u8(get_native_u8(p)); }
147

148
  static inline void put_Java_u2(address p, u2 x)     { put_native_u2(p, swap_u2(x)); }
149
  static inline void put_Java_u4(address p, u4 x)     { put_native_u4(p, swap_u4(x)); }
150
  static inline void put_Java_u8(address p, u8 x)     { put_native_u8(p, swap_u8(x)); }
151

152
#else // !defined(VM_LITTLE_ENDIAN)
153

154
  // Thus, a swap between native and Java ordering is always a no-op:
155
  static inline u2   swap_u2(u2 x)  { return x; }
156
  static inline u4   swap_u4(u4 x)  { return x; }
157
  static inline u8   swap_u8(u8 x)  { return x; }
158

159
  static inline u2   get_native_u2(address p) {
160
    return (intptr_t(p) & 1) == 0
161
             ?   *(u2*)p
162
             :   ( u2(p[0]) << 8 )
163
               | ( u2(p[1])      );
164
  }
165

166
  static inline u4   get_native_u4(address p) {
167
    switch (intptr_t(p) & 3) {
168
     case 0:  return *(u4*)p;
169

170
     case 2:  return (  u4( ((u2*)p)[0] ) << 16  )
171
                   | (  u4( ((u2*)p)[1] )        );
172

173
    default:  return ( u4(p[0]) << 24 )
174
                   | ( u4(p[1]) << 16 )
175
                   | ( u4(p[2]) <<  8 )
176
                   |   u4(p[3]);
177
    }
178
  }
179

180
  static inline u8   get_native_u8(address p) {
181
    switch (intptr_t(p) & 7) {
182
      case 0:  return *(u8*)p;
183

184
      case 4:  return (  u8( ((u4*)p)[0] ) << 32  )
185
                    | (  u8( ((u4*)p)[1] )        );
186

187
      case 2:  return (  u8( ((u2*)p)[0] ) << 48  )
188
                    | (  u8( ((u2*)p)[1] ) << 32  )
189
                    | (  u8( ((u2*)p)[2] ) << 16  )
190
                    | (  u8( ((u2*)p)[3] )        );
191

192
     default:  return ( u8(p[0]) << 56 )
193
                    | ( u8(p[1]) << 48 )
194
                    | ( u8(p[2]) << 40 )
195
                    | ( u8(p[3]) << 32 )
196
                    | ( u8(p[4]) << 24 )
197
                    | ( u8(p[5]) << 16 )
198
                    | ( u8(p[6]) <<  8 )
199
                    |   u8(p[7]);
200
    }
201
  }
202

203

204

205
  static inline void put_native_u2(address p, u2 x) {
206
    if ( (intptr_t(p) & 1) == 0 ) { *(u2*)p = x; }
207
    else {
208
      p[0] = x >> 8;
209
      p[1] = x;
210
    }
211
  }
212

213
  static inline void put_native_u4(address p, u4 x) {
214
    switch ( intptr_t(p) & 3 ) {
215
    case 0:  *(u4*)p = x;
216
              break;
217

218
    case 2:  ((u2*)p)[0] = x >> 16;
219
             ((u2*)p)[1] = x;
220
             break;
221

222
    default: ((u1*)p)[0] = x >> 24;
223
             ((u1*)p)[1] = x >> 16;
224
             ((u1*)p)[2] = x >>  8;
225
             ((u1*)p)[3] = x;
226
             break;
227
    }
228
  }
229

230
  static inline void put_native_u8(address p, u8 x) {
231
    switch ( intptr_t(p) & 7 ) {
232
    case 0:  *(u8*)p = x;
233
             break;
234

235
    case 4:  ((u4*)p)[0] = x >> 32;
236
             ((u4*)p)[1] = x;
237
             break;
238

239
    case 2:  ((u2*)p)[0] = x >> 48;
240
             ((u2*)p)[1] = x >> 32;
241
             ((u2*)p)[2] = x >> 16;
242
             ((u2*)p)[3] = x;
243
             break;
244

245
    default: ((u1*)p)[0] = x >> 56;
246
             ((u1*)p)[1] = x >> 48;
247
             ((u1*)p)[2] = x >> 40;
248
             ((u1*)p)[3] = x >> 32;
249
             ((u1*)p)[4] = x >> 24;
250
             ((u1*)p)[5] = x >> 16;
251
             ((u1*)p)[6] = x >>  8;
252
             ((u1*)p)[7] = x;
253
    }
254
  }
255

256
  // Efficient reading and writing of unaligned unsigned data in Java byte ordering (i.e. big-endian ordering)
257
  // (no byte-order reversal is needed since Power CPUs are big-endian oriented).
258
  static inline u2   get_Java_u2(address p) { return get_native_u2(p); }
259
  static inline u4   get_Java_u4(address p) { return get_native_u4(p); }
260
  static inline u8   get_Java_u8(address p) { return get_native_u8(p); }
261

262
  static inline void put_Java_u2(address p, u2 x)     { put_native_u2(p, x); }
263
  static inline void put_Java_u4(address p, u4 x)     { put_native_u4(p, x); }
264
  static inline void put_Java_u8(address p, u8 x)     { put_native_u8(p, x); }
265

266
#endif // VM_LITTLE_ENDIAN
267
};
268

269
#include OS_CPU_HEADER(bytes)
270

271
#endif // CPU_PPC_BYTES_PPC_HPP
272

273
Product

Resources

Company
