annotate OrthancFramework/Sources/Endianness.h @ 5440:99fa307438e1 debug-telemis

DicomStoreUserConnection: improved logs
author Alain Mazy <am@osimis.io>
date Wed, 22 Nov 2023 21:18:16 +0100
parents 59e3b6f8c5be
children 48b8dae6dc77
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
1 /**
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
2 * Orthanc - A Lightweight, RESTful DICOM Store
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
3 * Copyright (C) 2012-2016 Sebastien Jodogne, Medical Physics
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
4 * Department, University Hospital of Liege, Belgium
5185
0ea402b4d901 upgrade to year 2023
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4870
diff changeset
5 * Copyright (C) 2017-2023 Osimis S.A., Belgium
0ea402b4d901 upgrade to year 2023
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4870
diff changeset
6 * Copyright (C) 2021-2023 Sebastien Jodogne, ICTEAM UCLouvain, Belgium
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
7 *
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
8 * This program is free software: you can redistribute it and/or
4119
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
9 * modify it under the terms of the GNU Lesser General Public License
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
10 * as published by the Free Software Foundation, either version 3 of
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
11 * the License, or (at your option) any later version.
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
12 *
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
13 * This program is distributed in the hope that it will be useful, but
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
4119
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
16 * Lesser General Public License for more details.
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
17 *
4119
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
18 * You should have received a copy of the GNU Lesser General Public
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
19 * License along with this program. If not, see
bf7b9edf6b81 re-licensing the OrthancFramework to LGPL, in order to license Stone of Orthanc under LGPL
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 4044
diff changeset
20 * <http://www.gnu.org/licenses/>.
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
21 **/
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
22
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
23
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
24 #pragma once
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
25
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
26
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
27 /********************************************************************
2407
5edec967055e fix sandboxed builds
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2244
diff changeset
28 ** LINUX-LIKE ARCHITECTURES
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
29 ********************************************************************/
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
30
2448
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
31 #if defined(__LSB_VERSION__)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
32 // Linux Standard Base (LSB) does not come with be16toh, be32toh, and
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
33 // be64toh
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
34 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 0
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
35 # include <endian.h>
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
36 #elif defined(__linux__) || defined(__EMSCRIPTEN__)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
37 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 1
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
38 # include <endian.h>
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
39 #endif
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
40
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
41
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
42 /********************************************************************
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
43 ** WINDOWS ARCHITECTURES
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
44 **
1950
533ff46e944b return a single raw frame from DICOM videos
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1939
diff changeset
45 ** On Windows x86, "host" will always be little-endian ("le").
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
46 ********************************************************************/
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
47
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
48 #if defined(_WIN32)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
49 # if defined(_MSC_VER)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
50 // Visual Studio - http://msdn.microsoft.com/en-us/library/a3140177.aspx
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
51 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 1
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
52 # define be16toh(x) _byteswap_ushort(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
53 # define be32toh(x) _byteswap_ulong(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
54 # define be64toh(x) _byteswap_uint64(x)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
55 # elif (__GNUC__ > 4 || (__GNUC__ == 4 && __GNUC_MINOR__ >= 3))
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
56 // MinGW >= 4.3 - Use builtin intrinsic for byte swapping
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
57 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 1
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
58 # define be16toh(x) __builtin_bswap16(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
59 # define be32toh(x) __builtin_bswap32(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
60 # define be64toh(x) __builtin_bswap64(x)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
61 # else
2546
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2459
diff changeset
62 // MinGW <= 4.2, we must manually implement the byte swapping (*)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
63 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 0
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
64 # define be16toh(x) __orthanc_bswap16(x)
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
65 # define be32toh(x) __orthanc_bswap32(x)
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
66 # define be64toh(x) __orthanc_bswap64(x)
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
67 # endif
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
68
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
69 # define htobe16(x) be16toh(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
70 # define htobe32(x) be32toh(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
71 # define htobe64(x) be64toh(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
72
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
73 # define htole16(x) x
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
74 # define htole32(x) x
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
75 # define htole64(x) x
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
76
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
77 # define le16toh(x) x
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
78 # define le32toh(x) x
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
79 # define le64toh(x) x
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
80 #endif
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
81
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
82
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
83 /********************************************************************
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
84 ** FREEBSD ARCHITECTURES
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
85 ********************************************************************/
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
86
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
87 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
88 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 1
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
89 # include <arpa/inet.h>
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
90 #endif
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
91
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
92
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
93 /********************************************************************
2459
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
94 ** OPENBSD ARCHITECTURES
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
95 ********************************************************************/
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
96
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
97 #if defined(__OpenBSD__)
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
98 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 1
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
99 # include <endian.h>
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
100 #endif
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
101
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
102
98a04e75f15e endianness in openbsd
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2448
diff changeset
103 /********************************************************************
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
104 ** APPLE ARCHITECTURES (including OS X)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
105 ********************************************************************/
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
106
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
107 #if defined(__APPLE__)
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
108 # define ORTHANC_HAS_BUILTIN_BYTE_SWAP 1
1938
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
109 # include <libkern/OSByteOrder.h>
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
110 # define be16toh(x) OSSwapBigToHostInt16(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
111 # define be32toh(x) OSSwapBigToHostInt32(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
112 # define be64toh(x) OSSwapBigToHostInt64(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
113
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
114 # define htobe16(x) OSSwapHostToBigInt16(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
115 # define htobe32(x) OSSwapHostToBigInt32(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
116 # define htobe64(x) OSSwapHostToBigInt64(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
117
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
118 # define htole16(x) OSSwapHostToLittleInt16(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
119 # define htole32(x) OSSwapHostToLittleInt32(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
120 # define htole64(x) OSSwapHostToLittleInt64(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
121
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
122 # define le16toh(x) OSSwapLittleToHostInt16(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
123 # define le32toh(x) OSSwapLittleToHostInt32(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
124 # define le64toh(x) OSSwapLittleToHostInt64(x)
48ad54f7b21f endianness
Sebastien Jodogne <s.jodogne@gmail.com>
parents:
diff changeset
125 #endif
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
126
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
127
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
128 /********************************************************************
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
129 ** PORTABLE (BUT SLOW) IMPLEMENTATION OF BYTE-SWAPPING
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
130 ********************************************************************/
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
131
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
132 #if ORTHANC_HAS_BUILTIN_BYTE_SWAP != 1
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
133
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
134 #include <stdint.h>
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
135
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
136 static inline uint16_t __orthanc_bswap16(uint16_t a)
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
137 {
2807
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
138 /**
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
139 * Note that an alternative implementation was included in Orthanc
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
140 * 1.4.0 and 1.4.1:
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
141 *
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
142 * # hg log -p -r 2706
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
143 *
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
144 * This alternative implementation only hid an underlying problem
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
145 * with pointer alignment on some architectures, and was thus
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
146 * reverted. Check out issue #99:
5432
59e3b6f8c5be migration to UCLouvain servers
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 5185
diff changeset
147 * https://orthanc.uclouvain.be/bugs/show_bug.cgi?id=99
2807
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
148 **/
6356e2ceb493 Fix issue #99 (PamWriter test segfaults on alpine linux with gcc 6.4.0)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2707
diff changeset
149 return (a << 8) | (a >> 8);
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
150 }
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
151
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
152 static inline uint32_t __orthanc_bswap32(uint32_t a)
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
153 {
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
154 const uint8_t* p = reinterpret_cast<const uint8_t*>(&a);
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
155 return (static_cast<uint32_t>(p[0]) << 24 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
156 static_cast<uint32_t>(p[1]) << 16 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
157 static_cast<uint32_t>(p[2]) << 8 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
158 static_cast<uint32_t>(p[3]));
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
159 }
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
160
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
161 static inline uint64_t __orthanc_bswap64(uint64_t a)
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
162 {
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
163 const uint8_t* p = reinterpret_cast<const uint8_t*>(&a);
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
164 return (static_cast<uint64_t>(p[0]) << 56 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
165 static_cast<uint64_t>(p[1]) << 48 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
166 static_cast<uint64_t>(p[2]) << 40 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
167 static_cast<uint64_t>(p[3]) << 32 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
168 static_cast<uint64_t>(p[4]) << 24 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
169 static_cast<uint64_t>(p[5]) << 16 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
170 static_cast<uint64_t>(p[6]) << 8 |
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
171 static_cast<uint64_t>(p[7]));
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
172 }
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
173
2546
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2459
diff changeset
174 #if defined(_WIN32)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2459
diff changeset
175 // Implemented above (*)
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2459
diff changeset
176 #elif defined(__BYTE_ORDER) && defined(__LITTLE_ENDIAN) && defined(__BIG_ENDIAN)
2448
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
177 # if __BYTE_ORDER == __LITTLE_ENDIAN
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
178 # define be16toh(x) __orthanc_bswap16(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
179 # define be32toh(x) __orthanc_bswap32(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
180 # define be64toh(x) __orthanc_bswap64(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
181 # define htobe16(x) __orthanc_bswap16(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
182 # define htobe32(x) __orthanc_bswap32(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
183 # define htobe64(x) __orthanc_bswap64(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
184 # define htole16(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
185 # define htole32(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
186 # define htole64(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
187 # define le16toh(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
188 # define le32toh(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
189 # define le64toh(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
190 # elif __BYTE_ORDER == __BIG_ENDIAN
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
191 # define be16toh(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
192 # define be32toh(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
193 # define be64toh(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
194 # define htobe16(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
195 # define htobe32(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
196 # define htobe64(x) x
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
197 # define htole16(x) __orthanc_bswap16(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
198 # define htole32(x) __orthanc_bswap32(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
199 # define htole64(x) __orthanc_bswap64(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
200 # define le16toh(x) __orthanc_bswap16(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
201 # define le32toh(x) __orthanc_bswap32(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
202 # define le64toh(x) __orthanc_bswap64(x)
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
203 # else
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
204 # error Please support your platform here
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
205 # endif
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
206 #else
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
207 # error Please support your platform here
1971
869a87c08673 fix for mingw <= 4.2
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 1950
diff changeset
208 #endif
2448
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
209
862d943115f9 working on linux standard base
Sebastien Jodogne <s.jodogne@gmail.com>
parents: 2447
diff changeset
210 #endif