byteorder.c revision 1.2.4.2 1 1.2.4.2 nathanw /* $NetBSD: byteorder.c,v 1.2.4.2 2001/11/14 19:16:51 nathanw Exp $ */
2 1.2.4.2 nathanw
3 1.2.4.2 nathanw /*
4 1.2.4.2 nathanw * Copyright 2001 Wasabi Systems, Inc.
5 1.2.4.2 nathanw * All rights reserved.
6 1.2.4.2 nathanw *
7 1.2.4.2 nathanw * Written by Jason R. Thorpe for Wasabi Systems, Inc.
8 1.2.4.2 nathanw *
9 1.2.4.2 nathanw * Redistribution and use in source and binary forms, with or without
10 1.2.4.2 nathanw * modification, are permitted provided that the following conditions
11 1.2.4.2 nathanw * are met:
12 1.2.4.2 nathanw * 1. Redistributions of source code must retain the above copyright
13 1.2.4.2 nathanw * notice, this list of conditions and the following disclaimer.
14 1.2.4.2 nathanw * 2. Redistributions in binary form must reproduce the above copyright
15 1.2.4.2 nathanw * notice, this list of conditions and the following disclaimer in the
16 1.2.4.2 nathanw * documentation and/or other materials provided with the distribution.
17 1.2.4.2 nathanw * 3. All advertising materials mentioning features or use of this software
18 1.2.4.2 nathanw * must display the following acknowledgement:
19 1.2.4.2 nathanw * This product includes software developed for the NetBSD Project by
20 1.2.4.2 nathanw * Wasabi Systems, Inc.
21 1.2.4.2 nathanw * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22 1.2.4.2 nathanw * or promote products derived from this software without specific prior
23 1.2.4.2 nathanw * written permission.
24 1.2.4.2 nathanw *
25 1.2.4.2 nathanw * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26 1.2.4.2 nathanw * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 1.2.4.2 nathanw * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 1.2.4.2 nathanw * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
29 1.2.4.2 nathanw * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 1.2.4.2 nathanw * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 1.2.4.2 nathanw * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 1.2.4.2 nathanw * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 1.2.4.2 nathanw * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 1.2.4.2 nathanw * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 1.2.4.2 nathanw * POSSIBILITY OF SUCH DAMAGE.
36 1.2.4.2 nathanw */
37 1.2.4.2 nathanw
38 1.2.4.2 nathanw #include "byteorder.h"
39 1.2.4.2 nathanw
40 1.2.4.2 nathanw typedef union {
41 1.2.4.2 nathanw uint16_t val;
42 1.2.4.2 nathanw uint8_t bytes[2];
43 1.2.4.2 nathanw } un16;
44 1.2.4.2 nathanw
45 1.2.4.2 nathanw typedef union {
46 1.2.4.2 nathanw uint32_t val;
47 1.2.4.2 nathanw uint8_t bytes[4];
48 1.2.4.2 nathanw } un32;
49 1.2.4.2 nathanw
50 1.2.4.2 nathanw typedef union {
51 1.2.4.2 nathanw uint64_t val;
52 1.2.4.2 nathanw uint32_t words[2];
53 1.2.4.2 nathanw } un64;
54 1.2.4.2 nathanw
55 1.2.4.2 nathanw /* 16-bit */
56 1.2.4.2 nathanw
57 1.2.4.2 nathanw uint16_t
58 1.2.4.2 nathanw sa_htobe16(uint16_t val)
59 1.2.4.2 nathanw {
60 1.2.4.2 nathanw un16 un;
61 1.2.4.2 nathanw
62 1.2.4.2 nathanw un.bytes[1] = val & 0xff;
63 1.2.4.2 nathanw un.bytes[0] = (val >> 8) & 0xff;
64 1.2.4.2 nathanw
65 1.2.4.2 nathanw return (un.val);
66 1.2.4.2 nathanw }
67 1.2.4.2 nathanw
68 1.2.4.2 nathanw uint16_t
69 1.2.4.2 nathanw sa_htole16(uint16_t val)
70 1.2.4.2 nathanw {
71 1.2.4.2 nathanw un16 un;
72 1.2.4.2 nathanw
73 1.2.4.2 nathanw un.bytes[0] = val & 0xff;
74 1.2.4.2 nathanw un.bytes[1] = (val >> 8) & 0xff;
75 1.2.4.2 nathanw
76 1.2.4.2 nathanw return (un.val);
77 1.2.4.2 nathanw }
78 1.2.4.2 nathanw
79 1.2.4.2 nathanw uint16_t
80 1.2.4.2 nathanw sa_be16toh(uint16_t val)
81 1.2.4.2 nathanw {
82 1.2.4.2 nathanw un16 un;
83 1.2.4.2 nathanw
84 1.2.4.2 nathanw un.val = val;
85 1.2.4.2 nathanw
86 1.2.4.2 nathanw return ((un.bytes[0] << 8) |
87 1.2.4.2 nathanw un.bytes[1]);
88 1.2.4.2 nathanw }
89 1.2.4.2 nathanw
90 1.2.4.2 nathanw uint16_t
91 1.2.4.2 nathanw sa_le16toh(uint16_t val)
92 1.2.4.2 nathanw {
93 1.2.4.2 nathanw un16 un;
94 1.2.4.2 nathanw
95 1.2.4.2 nathanw un.val = val;
96 1.2.4.2 nathanw
97 1.2.4.2 nathanw return ((un.bytes[1] << 8) |
98 1.2.4.2 nathanw un.bytes[0]);
99 1.2.4.2 nathanw }
100 1.2.4.2 nathanw
101 1.2.4.2 nathanw /* 32-bit */
102 1.2.4.2 nathanw
103 1.2.4.2 nathanw uint32_t
104 1.2.4.2 nathanw sa_htobe32(uint32_t val)
105 1.2.4.2 nathanw {
106 1.2.4.2 nathanw un32 un;
107 1.2.4.2 nathanw
108 1.2.4.2 nathanw un.bytes[3] = val & 0xff;
109 1.2.4.2 nathanw un.bytes[2] = (val >> 8) & 0xff;
110 1.2.4.2 nathanw un.bytes[1] = (val >> 16) & 0xff;
111 1.2.4.2 nathanw un.bytes[0] = (val >> 24) & 0xff;
112 1.2.4.2 nathanw
113 1.2.4.2 nathanw return (un.val);
114 1.2.4.2 nathanw }
115 1.2.4.2 nathanw
116 1.2.4.2 nathanw uint32_t
117 1.2.4.2 nathanw sa_htole32(uint32_t val)
118 1.2.4.2 nathanw {
119 1.2.4.2 nathanw un32 un;
120 1.2.4.2 nathanw
121 1.2.4.2 nathanw un.bytes[0] = val & 0xff;
122 1.2.4.2 nathanw un.bytes[1] = (val >> 8) & 0xff;
123 1.2.4.2 nathanw un.bytes[2] = (val >> 16) & 0xff;
124 1.2.4.2 nathanw un.bytes[3] = (val >> 24) & 0xff;
125 1.2.4.2 nathanw
126 1.2.4.2 nathanw return (un.val);
127 1.2.4.2 nathanw }
128 1.2.4.2 nathanw
129 1.2.4.2 nathanw uint32_t
130 1.2.4.2 nathanw sa_be32toh(uint32_t val)
131 1.2.4.2 nathanw {
132 1.2.4.2 nathanw un32 un;
133 1.2.4.2 nathanw
134 1.2.4.2 nathanw un.val = val;
135 1.2.4.2 nathanw
136 1.2.4.2 nathanw return ((un.bytes[0] << 24) |
137 1.2.4.2 nathanw (un.bytes[1] << 16) |
138 1.2.4.2 nathanw (un.bytes[2] << 8) |
139 1.2.4.2 nathanw un.bytes[3]);
140 1.2.4.2 nathanw }
141 1.2.4.2 nathanw
142 1.2.4.2 nathanw uint32_t
143 1.2.4.2 nathanw sa_le32toh(uint32_t val)
144 1.2.4.2 nathanw {
145 1.2.4.2 nathanw un32 un;
146 1.2.4.2 nathanw
147 1.2.4.2 nathanw un.val = val;
148 1.2.4.2 nathanw
149 1.2.4.2 nathanw return ((un.bytes[3] << 24) |
150 1.2.4.2 nathanw (un.bytes[2] << 16) |
151 1.2.4.2 nathanw (un.bytes[1] << 8) |
152 1.2.4.2 nathanw un.bytes[0]);
153 1.2.4.2 nathanw }
154 1.2.4.2 nathanw
155 1.2.4.2 nathanw /* 64-bit */
156 1.2.4.2 nathanw
157 1.2.4.2 nathanw uint64_t
158 1.2.4.2 nathanw sa_htobe64(uint64_t val)
159 1.2.4.2 nathanw {
160 1.2.4.2 nathanw un64 un;
161 1.2.4.2 nathanw
162 1.2.4.2 nathanw un.words[BE64_HI] = sa_htobe32(val >> 32);
163 1.2.4.2 nathanw un.words[BE64_LO] = sa_htobe32(val & 0xffffffffU);
164 1.2.4.2 nathanw
165 1.2.4.2 nathanw return (un.val);
166 1.2.4.2 nathanw }
167 1.2.4.2 nathanw
168 1.2.4.2 nathanw uint64_t
169 1.2.4.2 nathanw sa_htole64(uint64_t val)
170 1.2.4.2 nathanw {
171 1.2.4.2 nathanw un64 un;
172 1.2.4.2 nathanw
173 1.2.4.2 nathanw un.words[LE64_HI] = sa_htole32(val >> 32);
174 1.2.4.2 nathanw un.words[LE64_LO] = sa_htole32(val & 0xffffffffU);
175 1.2.4.2 nathanw
176 1.2.4.2 nathanw return (un.val);
177 1.2.4.2 nathanw }
178 1.2.4.2 nathanw
179 1.2.4.2 nathanw uint64_t
180 1.2.4.2 nathanw sa_be64toh(uint64_t val)
181 1.2.4.2 nathanw {
182 1.2.4.2 nathanw un64 un;
183 1.2.4.2 nathanw uint64_t rv;
184 1.2.4.2 nathanw
185 1.2.4.2 nathanw un.val = val;
186 1.2.4.2 nathanw un.words[BE64_HI] = sa_be32toh(un.words[BE64_HI]);
187 1.2.4.2 nathanw un.words[BE64_LO] = sa_be32toh(un.words[BE64_LO]);
188 1.2.4.2 nathanw
189 1.2.4.2 nathanw rv = (((uint64_t)un.words[BE64_HI]) << 32) |
190 1.2.4.2 nathanw un.words[BE64_LO];
191 1.2.4.2 nathanw
192 1.2.4.2 nathanw return (rv);
193 1.2.4.2 nathanw }
194 1.2.4.2 nathanw
195 1.2.4.2 nathanw uint64_t
196 1.2.4.2 nathanw sa_le64toh(uint64_t val)
197 1.2.4.2 nathanw {
198 1.2.4.2 nathanw un64 un;
199 1.2.4.2 nathanw uint64_t rv;
200 1.2.4.2 nathanw
201 1.2.4.2 nathanw un.val = val;
202 1.2.4.2 nathanw un.words[LE64_HI] = sa_le32toh(un.words[LE64_HI]);
203 1.2.4.2 nathanw un.words[LE64_LO] = sa_le32toh(un.words[LE64_LO]);
204 1.2.4.2 nathanw
205 1.2.4.2 nathanw rv = (((uint64_t)un.words[LE64_HI]) << 32) |
206 1.2.4.2 nathanw un.words[LE64_LO];
207 1.2.4.2 nathanw
208 1.2.4.2 nathanw return (rv);
209 1.2.4.2 nathanw }
210