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
|
/*
Copyright (C) 2015-2020, Dirk Krause
SPDX-License-Identifier: BSD-3-Clause
*/
/*
WARNING: This file was generated by the dkct program (see
http://dktools.sourceforge.net/ for details).
Changes you make here will be lost if dkct is run again!
You should modify the original source and run dkct on it.
Original source: dk4numl.ctr
*/
/** @file dk4numl.c The dk4numl module.
*/
#line 55 "dk4numl.ctr"
#include "dk4conf.h"
#include "dk4error.h"
#include "dk4numl.h"
#include "dk4maadu.h"
size_t
dk4numlength(size_t isz, int sgn)
{
dk4_er_t er;
dk4_um_t co;
size_t back = 0;
if (1 < isz) {
if (2 < isz) {
if (4 < isz) {
if (8 < isz) {
if (16 < isz) {
#if VERSION_BEFORE_20141122
if (0 != (isz % 2)) { isz++; }
back = 5 * (isz / 2);
if (0 != sgn) { back++; }
#else
dk4error_init(&er);
if (0 != sgn) {
co = dk4ma_um_mul(
(dk4_um_t)30104UL,
dk4ma_um_sub(
dk4ma_um_mul((dk4_um_t)8UL, (dk4_um_t)isz, &er),
(dk4_um_t)1UL,
&er
),
&er
);
if ((dk4_um_t)0UL != (co % (dk4_um_t)100000UL)) {
co = co / (dk4_um_t)100000UL;
co++;
} else {
co = co / (dk4_um_t)100000UL;
}
co++;
if ((dk4_um_t)(SIZE_MAX) >= co) {
back = (size_t)co;
} else {
back = (size_t)co;
er.ec = DK4_E_MATH_OVERFLOW;
}
} else {
co = dk4ma_um_mul(
(dk4_um_t)30104UL,
dk4ma_um_mul((dk4_um_t)8UL, (dk4_um_t)isz, &er),
&er
);
if ((dk4_um_t)0UL != (co % (dk4_um_t)100000UL)) {
co = co / (dk4_um_t)100000UL;
co++;
} else {
co = co / (dk4_um_t)100000UL;
}
if ((dk4_um_t)(SIZE_MAX) >= co) {
back = (size_t)co;
} else {
back = (size_t)co;
er.ec = DK4_E_MATH_OVERFLOW;
}
}
if (DK4_E_NONE != er.ec) {
if (0 != (isz % 2)) { isz++; }
back = 5 * (isz / 2);
if (0 != sgn) { back++; }
}
#endif
} else {
back = ((0 != sgn) ? 41 : 40);
}
} else {
back = ((0 != sgn) ? 21 : 20);
}
} else {
back = ((0 != sgn) ? 11 : 10);
}
} else {
back = ((0 != sgn) ? 6 : 5);
}
} else {
back = ((0 != sgn) ? 4 : 3);
}
return back;
}
|