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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
|
/* Copyright JS Foundation and other contributors, http://js.foundation
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#ifndef ECMA_BIG_UINT_H
#define ECMA_BIG_UINT_H
#include "ecma-globals.h"
#if JERRY_BUILTIN_BIGINT
/**
* Limit of BigUInt memory allocation in JerryScript.
*/
#define ECMA_BIGINT_MAX_SIZE 0x10000
/**
* Unsigned type which can hold two digits.
*/
typedef uint64_t ecma_bigint_two_digits_t;
/**
* Shift used by left/right shifting of a value.
*/
#define ECMA_BIGINT_DIGIT_SHIFT 5
/**
* Return with the digits of a BigInt value.
*/
#define ECMA_BIGINT_GET_DIGITS(value_p, offset) \
((ecma_bigint_digit_t *) (((uint8_t *) (value_p)) + sizeof (ecma_extended_primitive_t) + (offset)))
/**
* Return with the digits of a BigInt value.
*/
#define ECMA_BIGINT_GET_LAST_DIGIT(value_p, size) \
*ECMA_BIGINT_GET_DIGITS (value_p, size - sizeof (ecma_bigint_digit_t))
/**
* Returns true if size is an odd number.
*/
#define ECMA_BIGINT_SIZE_IS_ODD(size) \
(((size) & sizeof (ecma_bigint_digit_t)) != 0)
/**
* Returns a two digit value where the high digit is set to the passed digit.
*/
#define ECMA_BIGINT_HIGH_DIGIT(digit) \
(((ecma_bigint_two_digits_t) digit) << (8 * sizeof (ecma_bigint_digit_t)))
/**
* Tells whether a number (usually a digit or uint32_t value) is an odd number.
*/
#define ECMA_BIGINT_NUMBER_IS_ODD(number) ((number & 0x1) != 0)
/**
* Bitwise operation types.
*/
typedef enum
{
ECMA_BIG_UINT_BITWISE_AND, /**< bitwise 'and' operation */
ECMA_BIG_UINT_BITWISE_OR, /**< bitwise 'or' operation */
ECMA_BIG_UINT_BITWISE_XOR, /**< bitwise 'xor' operation */
ECMA_BIG_UINT_BITWISE_AND_NOT, /**< bitwise 'and not' operation */
} ecma_big_uint_bitwise_operation_types_t;
/**
* Returns with the type of the operation.
*/
#define ECMA_BIGINT_BITWISE_GET_OPERATION_TYPE(operation_and_options) \
((operation_and_options) & 0xf)
/**
* Options for bitwise operations.
*/
typedef enum
{
ECMA_BIG_UINT_BITWISE_DECREASE_LEFT = (1 << 4), /**< subtract 1 from left value */
ECMA_BIG_UINT_BITWISE_DECREASE_RIGHT = (1 << 5), /**< subtract 1 from right value */
ECMA_BIG_UINT_BITWISE_INCREASE_RESULT = (1 << 6), /**< add 1 to the result */
} ecma_big_uint_bitwise_options_t;
/**
* Subtract 1 from both left and right values.
*/
#define ECMA_BIG_UINT_BITWISE_DECREASE_BOTH \
(ECMA_BIG_UINT_BITWISE_DECREASE_LEFT | ECMA_BIG_UINT_BITWISE_DECREASE_RIGHT)
ecma_extended_primitive_t *ecma_bigint_create (uint32_t size);
ecma_extended_primitive_t *ecma_big_uint_extend (ecma_extended_primitive_t *value_p, ecma_bigint_digit_t digit);
ecma_bigint_digit_t ecma_big_uint_count_leading_zero (ecma_bigint_digit_t digit);
int ecma_big_uint_compare (ecma_extended_primitive_t *left_value_p, ecma_extended_primitive_t *right_value_p);
ecma_extended_primitive_t *ecma_big_uint_mul_digit (ecma_extended_primitive_t *value_p,
ecma_bigint_digit_t mul, ecma_bigint_digit_t add);
uint8_t *ecma_big_uint_to_string (ecma_extended_primitive_t *value_p, uint32_t radix,
uint32_t *char_start_p, uint32_t *char_size_p);
ecma_extended_primitive_t *ecma_big_uint_increase (ecma_extended_primitive_t *value_p);
ecma_extended_primitive_t *ecma_big_uint_decrease (ecma_extended_primitive_t *value_p);
ecma_extended_primitive_t *ecma_big_uint_add (ecma_extended_primitive_t *left_value_p,
ecma_extended_primitive_t *right_value_p);
ecma_extended_primitive_t *ecma_big_uint_sub (ecma_extended_primitive_t *left_value_p,
ecma_extended_primitive_t *right_value_p);
ecma_extended_primitive_t *ecma_big_uint_mul (ecma_extended_primitive_t *left_value_p,
ecma_extended_primitive_t *right_value_p);
ecma_extended_primitive_t *ecma_big_uint_div_mod (ecma_extended_primitive_t *dividend_value_p,
ecma_extended_primitive_t *divisor_value_p,
bool is_mod);
ecma_extended_primitive_t *ecma_big_uint_shift_left (ecma_extended_primitive_t *left_value_p, uint32_t right_value);
ecma_extended_primitive_t *ecma_big_uint_shift_right (ecma_extended_primitive_t *left_value_p, uint32_t right_value,
bool increase_result);
#if JERRY_ESNEXT
ecma_extended_primitive_t *ecma_big_uint_pow (ecma_extended_primitive_t *left_value_p, uint32_t right_value);
#endif /* JERRY_ESNEXT */
ecma_extended_primitive_t *ecma_big_uint_bitwise_op (uint32_t operation_and_options,
ecma_extended_primitive_t *left_value_p,
ecma_extended_primitive_t *right_value_p);
#endif /* JERRY_BUILTIN_BIGINT */
#endif /* ECMA_BIG_UINT_H */
|
