]> git.zerfleddert.de Git - proxmark3-svn/blob - client/tinycbor/cborinternal_p.h
fix 'hf 14b sriwrite' (#880)
[proxmark3-svn] / client / tinycbor / cborinternal_p.h
1 /****************************************************************************
2 **
3 ** Copyright (C) 2017 Intel Corporation
4 **
5 ** Permission is hereby granted, free of charge, to any person obtaining a copy
6 ** of this software and associated documentation files (the "Software"), to deal
7 ** in the Software without restriction, including without limitation the rights
8 ** to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
9 ** copies of the Software, and to permit persons to whom the Software is
10 ** furnished to do so, subject to the following conditions:
11 **
12 ** The above copyright notice and this permission notice shall be included in
13 ** all copies or substantial portions of the Software.
14 **
15 ** THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 ** IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 ** FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 ** AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 ** LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 ** OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
21 ** THE SOFTWARE.
22 **
23 ****************************************************************************/
24
25 #ifndef CBORINTERNAL_P_H
26 #define CBORINTERNAL_P_H
27
28 #include "compilersupport_p.h"
29
30 #ifndef CBOR_NO_FLOATING_POINT
31 # include <float.h>
32 # include <math.h>
33 #else
34 # ifndef CBOR_NO_HALF_FLOAT_TYPE
35 # define CBOR_NO_HALF_FLOAT_TYPE 1
36 # endif
37 #endif
38
39 #ifndef CBOR_NO_HALF_FLOAT_TYPE
40 # ifdef __F16C__
41 # include <immintrin.h>
42 static inline unsigned short encode_half(double val)
43 {
44 return _cvtss_sh((float)val, 3);
45 }
46 static inline double decode_half(unsigned short half)
47 {
48 return _cvtsh_ss(half);
49 }
50 # else
51 /* software implementation of float-to-fp16 conversions */
52 static inline unsigned short encode_half(double val)
53 {
54 uint64_t v;
55 int sign, exp, mant;
56 memcpy(&v, &val, sizeof(v));
57 sign = v >> 63 << 15;
58 exp = (v >> 52) & 0x7ff;
59 mant = v << 12 >> 12 >> (53-11); /* keep only the 11 most significant bits of the mantissa */
60 exp -= 1023;
61 if (exp == 1024) {
62 /* infinity or NaN */
63 exp = 16;
64 mant >>= 1;
65 } else if (exp >= 16) {
66 /* overflow, as largest number */
67 exp = 15;
68 mant = 1023;
69 } else if (exp >= -14) {
70 /* regular normal */
71 } else if (exp >= -24) {
72 /* subnormal */
73 mant |= 1024;
74 mant >>= -(exp + 14);
75 exp = -15;
76 } else {
77 /* underflow, make zero */
78 return 0;
79 }
80
81 /* safe cast here as bit operations above guarantee not to overflow */
82 return (unsigned short)(sign | ((exp + 15) << 10) | mant);
83 }
84
85 /* this function was copied & adapted from RFC 7049 Appendix D */
86 static inline double decode_half(unsigned short half)
87 {
88 int exp = (half >> 10) & 0x1f;
89 int mant = half & 0x3ff;
90 double val;
91 if (exp == 0) val = ldexp(mant, -24);
92 else if (exp != 31) val = ldexp(mant + 1024, exp - 25);
93 else val = mant == 0 ? INFINITY : NAN;
94 return half & 0x8000 ? -val : val;
95 }
96 # endif
97 #endif /* CBOR_NO_HALF_FLOAT_TYPE */
98
99 #ifndef CBOR_INTERNAL_API
100 # define CBOR_INTERNAL_API
101 #endif
102
103 #ifndef CBOR_PARSER_MAX_RECURSIONS
104 # define CBOR_PARSER_MAX_RECURSIONS 1024
105 #endif
106
107 /*
108 * CBOR Major types
109 * Encoded in the high 3 bits of the descriptor byte
110 * See http://tools.ietf.org/html/rfc7049#section-2.1
111 */
112 typedef enum CborMajorTypes {
113 UnsignedIntegerType = 0U,
114 NegativeIntegerType = 1U,
115 ByteStringType = 2U,
116 TextStringType = 3U,
117 ArrayType = 4U,
118 MapType = 5U, /* a.k.a. object */
119 TagType = 6U,
120 SimpleTypesType = 7U
121 } CborMajorTypes;
122
123 /*
124 * CBOR simple and floating point types
125 * Encoded in the low 8 bits of the descriptor byte when the
126 * Major Type is 7.
127 */
128 typedef enum CborSimpleTypes {
129 FalseValue = 20,
130 TrueValue = 21,
131 NullValue = 22,
132 UndefinedValue = 23,
133 SimpleTypeInNextByte = 24, /* not really a simple type */
134 HalfPrecisionFloat = 25, /* ditto */
135 SinglePrecisionFloat = 26, /* ditto */
136 DoublePrecisionFloat = 27, /* ditto */
137 Break = 31
138 } CborSimpleTypes;
139
140 enum {
141 SmallValueBitLength = 5U,
142 SmallValueMask = (1U << SmallValueBitLength) - 1, /* 31 */
143 Value8Bit = 24U,
144 Value16Bit = 25U,
145 Value32Bit = 26U,
146 Value64Bit = 27U,
147 IndefiniteLength = 31U,
148
149 MajorTypeShift = SmallValueBitLength,
150 MajorTypeMask = (int) (~0U << MajorTypeShift),
151
152 BreakByte = (unsigned)Break | (SimpleTypesType << MajorTypeShift)
153 };
154
155 CBOR_INTERNAL_API CborError CBOR_INTERNAL_API_CC _cbor_value_extract_number(const uint8_t **ptr, const uint8_t *end, uint64_t *len);
156 CBOR_INTERNAL_API CborError CBOR_INTERNAL_API_CC _cbor_value_prepare_string_iteration(CborValue *it);
157 CBOR_INTERNAL_API CborError CBOR_INTERNAL_API_CC _cbor_value_get_string_chunk(const CborValue *value, const void **bufferptr,
158 size_t *len, CborValue *next);
159
160
161 #endif /* CBORINTERNAL_P_H */
Impressum, Datenschutz