blob: 71428f0ae7cc9ee6c45471efa9a7ed64304de863 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
/*-
* See the file LICENSE for redistribution information.
*
* Copyright (c) 1996, 2012 Oracle and/or its affiliates. All rights reserved.
*
* $Id$
*/
#include "db_config.h"
#include "db_int.h"
/*
* __db_isbigendian --
* Return 1 if big-endian (Motorola and Sparc), not little-endian
* (Intel and Vax). We do this work at run-time, rather than at
* configuration time so cross-compilation and general embedded
* system support is simpler.
*
* PUBLIC: int __db_isbigendian __P((void));
*/
int
__db_isbigendian()
{
union { /* From Harbison & Steele. */
long l;
char c[sizeof(long)];
} u;
u.l = 1;
return (u.c[sizeof(long) - 1] == 1);
}
/*
* __db_byteorder --
* Return if we need to do byte swapping, checking for illegal
* values.
*
* PUBLIC: int __db_byteorder __P((ENV *, int));
*/
int
__db_byteorder(env, lorder)
ENV *env;
int lorder;
{
switch (lorder) {
case 0:
break;
case 1234:
if (!F_ISSET(env, ENV_LITTLEENDIAN))
return (DB_SWAPBYTES);
break;
case 4321:
if (F_ISSET(env, ENV_LITTLEENDIAN))
return (DB_SWAPBYTES);
break;
default:
__db_errx(env, DB_STR("0041",
"unsupported byte order, only big and little-endian supported"));
return (EINVAL);
}
return (0);
}
|