1 /*
2 * Copyright (c) 2005-2012 Michael Niedermayer <michaelni@gmx.at>
3 *
4 * This file is part of FFmpeg.
5 *
6 * FFmpeg is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * FFmpeg is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with FFmpeg; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19 */
20
21 /**
22 * @file
23 * miscellaneous math routines and tables
24 */
25
26 #include <stdint.h>
28
34
35 /* Stein's binary GCD algorithm:
36 * https://en.wikipedia.org/wiki/Binary_GCD_algorithm */
38 int za, zb, k;
54 }
55 return (uint64_t)
u << k;
56 }
57
59 {
64
66 return INT64_MIN;
67
69 if (
a == INT64_MIN ||
a == INT64_MAX)
72 }
73
76
81
82 if (
b <= INT_MAX &&
c <= INT_MAX) {
84 return (
a *
b +
r) /
c;
85 else {
88 if (ad >= INT32_MAX &&
b && ad > (INT64_MAX -
a2) /
b)
89 return INT64_MIN;
91 }
92 } else {
93 #if 1
94 uint64_t
a0 =
a & 0xFFFFFFFF;
95 uint64_t
a1 =
a >> 32;
96 uint64_t
b0 =
b & 0xFFFFFFFF;
97 uint64_t
b1 =
b >> 32;
99 uint64_t t1a = t1 << 32;
101
103 a1 =
a1 *
b1 + (t1 >> 32) + (
a0 < t1a);
106
107 for (
i = 63;
i >= 0;
i--) {
109 t1 += t1;
112 t1++;
113 }
114 }
115 if (t1 > INT64_MAX)
116 return INT64_MIN;
117 return t1;
118 #else
119 /* reference code doing (a*b + r) / c, requires libavutil/integer.h */
123
125 #endif
126 }
127 }
128
130 {
132 }
133
136 {
140 }
141
143 {
145 }
146
148 {
152 return (ts_a*
a > ts_b*
b) - (ts_a*
a < ts_b*
b);
154 return -1;
156 return 1;
157 return 0;
158 }
159
161 {
166 }
167
170
173
175 simple_round:
178 }
179
182 if (*last < 2*a - b || *last > 2*
b -
a)
183 goto simple_round;
184
187
189 }
190
192 {
194
197
200
201 if (m % d == 0 && ts <= INT64_MAX - m / d)
202 return ts + m / d;
203 if (m < d)
204 return ts;
205
206 {
209
211 return ts;
212
214 }
215 }
216
220 for (
i =
size-2;
i >= 0; --
i) {
221 sum *= x;
223 }
224 return sum;
225 }
226
227 /**
228 * 0th order modified bessel function of the first kind.
229 * Algorithm taken from the Boost project, source:
230 * https://searchcode.com/codesearch/view/14918379/
231 * Use, modification and distribution are subject to the
232 * Boost Software License, Version 1.0 (see notice below).
233 * Boost Software License - Version 1.0 - August 17th, 2003
234 Permission is hereby granted, free of charge, to any person or organization
235 obtaining a copy of the software and accompanying documentation covered by
236 this license (the "Software") to use, reproduce, display, distribute,
237 execute, and transmit the Software, and to prepare derivative works of the
238 Software, and to permit third-parties to whom the Software is furnished to
239 do so, all subject to the following:
240
241 The copyright notices in the Software and this entire statement, including
242 the above license grant, this restriction and the following disclaimer,
243 must be included in all copies of the Software, in whole or in part, and
244 all derivative works of the Software, unless such copies or derivative
245 works are solely in the form of machine-executable object code generated by
246 a source language processor.
247
248 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
249 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
250 FITNESS FOR A PARTICULAR PURPOSE, TITLE AND NON-INFRINGEMENT. IN NO EVENT
251 SHALL THE COPYRIGHT HOLDERS OR ANYONE DISTRIBUTING THE SOFTWARE BE LIABLE
252 FOR ANY DAMAGES OR OTHER LIABILITY, WHETHER IN CONTRACT, TORT OR OTHERWISE,
253 ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
254 DEALINGS IN THE SOFTWARE.
255 */
256
258 // Modified Bessel function of the first kind of order zero
259 // minimax rational approximations on intervals, see
260 // Blair and Edwards, Chalk River Report AECL-4928, 1974
261 static const double p1[] = {
262 -2.2335582639474375249e+15,
263 -5.5050369673018427753e+14,
264 -3.2940087627407749166e+13,
265 -8.4925101247114157499e+11,
266 -1.1912746104985237192e+10,
267 -1.0313066708737980747e+08,
268 -5.9545626019847898221e+05,
269 -2.4125195876041896775e+03,
270 -7.0935347449210549190e+00,
271 -1.5453977791786851041e-02,
272 -2.5172644670688975051e-05,
273 -3.0517226450451067446e-08,
274 -2.6843448573468483278e-11,
275 -1.5982226675653184646e-14,
276 -5.2487866627945699800e-18,
277 };
278 static const double q1[] = {
279 -2.2335582639474375245e+15,
280 7.8858692566751002988e+12,
281 -1.2207067397808979846e+10,
282 1.0377081058062166144e+07,
283 -4.8527560179962773045e+03,
284 1.0,
285 };
286 static const double p2[] = {
287 -2.2210262233306573296e-04,
288 1.3067392038106924055e-02,
289 -4.4700805721174453923e-01,
290 5.5674518371240761397e+00,
291 -2.3517945679239481621e+01,
292 3.1611322818701131207e+01,
293 -9.6090021968656180000e+00,
294 };
295 static const double q2[] = {
296 -5.5194330231005480228e-04,
297 3.2547697594819615062e-02,
298 -1.1151759188741312645e+00,
299 1.3982595353892851542e+01,
300 -6.0228002066743340583e+01,
301 8.5539563258012929600e+01,
302 -3.1446690275135491500e+01,
303 1.0,
304 };
306 if (x == 0)
307 return 1.0;
309 if (x <= 15) {
310 y = x * x;
312 }
313 else {
314 y = 1 / x - 1.0 / 15;
318 }
319 }