pragma Ada_2005;
pragma Style_Checks (Off);

with Interfaces.C; use Interfaces.C;

with FFMpeg.Low_Level.ffmpeg_libavutil_rational_h;


package FFMpeg.Low_Level.ffmpeg_libavutil_mathematics_h is

   M_LOG2_10 : constant := 3.32192809488736234787;  --  /usr/include/ffmpeg/libavutil/mathematics.h:46

   M_PHI : constant := 1.61803398874989484820;  --  /usr/include/ffmpeg/libavutil/mathematics.h:49

  -- * copyright (c) 2005-2012 Michael Niedermayer <michaelni@gmx.at>
  -- *
  -- * This file is part of FFmpeg.
  -- *
  -- * FFmpeg is free software; you can redistribute it and/or
  -- * modify it under the terms of the GNU Lesser General Public
  -- * License as published by the Free Software Foundation; either
  -- * version 2.1 of the License, or (at your option) any later version.
  -- *
  -- * FFmpeg is distributed in the hope that it will be useful,
  -- * but WITHOUT ANY WARRANTY; without even the implied warranty of
  -- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  -- * Lesser General Public License for more details.
  -- *
  -- * You should have received a copy of the GNU Lesser General Public
  -- * License along with FFmpeg; if not, write to the Free Software
  -- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  --  

  --*
  -- * @file
  -- * @addtogroup lavu_math
  -- * Mathematical utilities for working with timestamp and time base.
  --  

  --*
  -- * @addtogroup lavu_math
  -- *
  -- * @{
  --  

  --*
  -- * Rounding methods.
  --  

   subtype AVRounding is unsigned;
   AV_ROUND_ZERO : constant AVRounding := 0;
   AV_ROUND_INF : constant AVRounding := 1;
   AV_ROUND_DOWN : constant AVRounding := 2;
   AV_ROUND_UP : constant AVRounding := 3;
   AV_ROUND_NEAR_INF : constant AVRounding := 5;
   AV_ROUND_PASS_MINMAX : constant AVRounding := 8192;  -- /usr/include/ffmpeg/libavutil/mathematics.h:79

  --/< Round toward zero.
  --/< Round away from zero.
  --/< Round toward -infinity.
  --/< Round toward +infinity.
  --/< Round to nearest and halfway cases away from zero.
  --*
  --     * Flag telling rescaling functions to pass `INT64_MIN`/`MAX` through
  --     * unchanged, avoiding special cases for #AV_NOPTS_VALUE.
  --     *
  --     * Unlike other values of the enumeration AVRounding, this value is a
  --     * bitmask that must be used in conjunction with another value of the
  --     * enumeration through a bitwise OR, in order to set behavior for normal
  --     * cases.
  --     *
  --     * @code{.c}
  --     * av_rescale_rnd(3, 1, 2, AV_ROUND_UP | AV_ROUND_PASS_MINMAX);
  --     * // Rescaling 3:
  --     * //     Calculating 3 * 1 / 2
  --     * //     3 / 2 is rounded up to 2
  --     * //     => 2
  --     *
  --     * av_rescale_rnd(AV_NOPTS_VALUE, 1, 2, AV_ROUND_UP | AV_ROUND_PASS_MINMAX);
  --     * // Rescaling AV_NOPTS_VALUE:
  --     * //     AV_NOPTS_VALUE == INT64_MIN
  --     * //     AV_NOPTS_VALUE is passed through
  --     * //     => AV_NOPTS_VALUE
  --     * @endcode
  --      

  --*
  -- * Compute the greatest common divisor of two integer operands.
  -- *
  -- * @param a,b Operands
  -- * @return GCD of a and b up to sign; if a >= 0 and b >= 0, return value is >= 0;
  -- * if a == 0 and b == 0, returns 0.
  --  

   function av_gcd (a : Interfaces.Integer_64; b : Interfaces.Integer_64) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:118
   pragma Import (C, av_gcd, "av_gcd");

  --*
  -- * Rescale a 64-bit integer with rounding to nearest.
  -- *
  -- * The operation is mathematically equivalent to `a * b / c`, but writing that
  -- * directly can overflow.
  -- *
  -- * This function is equivalent to av_rescale_rnd() with #AV_ROUND_NEAR_INF.
  -- *
  -- * @see av_rescale_rnd(), av_rescale_q(), av_rescale_q_rnd()
  --  

   function av_rescale
     (a : Interfaces.Integer_64;
      b : Interfaces.Integer_64;
      c : Interfaces.Integer_64) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:130
   pragma Import (C, av_rescale, "av_rescale");

  --*
  -- * Rescale a 64-bit integer with specified rounding.
  -- *
  -- * The operation is mathematically equivalent to `a * b / c`, but writing that
  -- * directly can overflow, and does not support different rounding methods.
  -- *
  -- * @see av_rescale(), av_rescale_q(), av_rescale_q_rnd()
  --  

   function av_rescale_rnd
     (a : Interfaces.Integer_64;
      b : Interfaces.Integer_64;
      c : Interfaces.Integer_64;
      rnd : AVRounding) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:140
   pragma Import (C, av_rescale_rnd, "av_rescale_rnd");

  --*
  -- * Rescale a 64-bit integer by 2 rational numbers.
  -- *
  -- * The operation is mathematically equivalent to `a * bq / cq`.
  -- *
  -- * This function is equivalent to av_rescale_q_rnd() with #AV_ROUND_NEAR_INF.
  -- *
  -- * @see av_rescale(), av_rescale_rnd(), av_rescale_q_rnd()
  --  

   function av_rescale_q
     (a : Interfaces.Integer_64;
      bq : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      cq : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:151
   pragma Import (C, av_rescale_q, "av_rescale_q");

  --*
  -- * Rescale a 64-bit integer by 2 rational numbers with specified rounding.
  -- *
  -- * The operation is mathematically equivalent to `a * bq / cq`.
  -- *
  -- * @see av_rescale(), av_rescale_rnd(), av_rescale_q()
  --  

   function av_rescale_q_rnd
     (a : Interfaces.Integer_64;
      bq : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      cq : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      rnd : AVRounding) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:160
   pragma Import (C, av_rescale_q_rnd, "av_rescale_q_rnd");

  --*
  -- * Compare two timestamps each in its own time base.
  -- *
  -- * @return One of the following values:
  -- *         - -1 if `ts_a` is before `ts_b`
  -- *         - 1 if `ts_a` is after `ts_b`
  -- *         - 0 if they represent the same position
  -- *
  -- * @warning
  -- * The result of the function is undefined if one of the timestamps is outside
  -- * the `int64_t` range when represented in the other's timebase.
  --  

   function av_compare_ts
     (ts_a : Interfaces.Integer_64;
      tb_a : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      ts_b : Interfaces.Integer_64;
      tb_b : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational) return int;  -- /usr/include/ffmpeg/libavutil/mathematics.h:175
   pragma Import (C, av_compare_ts, "av_compare_ts");

  --*
  -- * Compare the remainders of two integer operands divided by a common divisor.
  -- *
  -- * In other words, compare the least significant `log2(mod)` bits of integers
  -- * `a` and `b`.
  -- *
  -- * @code{.c}
  -- * av_compare_mod(0x11, 0x02, 0x10) < 0 // since 0x11 % 0x10  (0x1) < 0x02 % 0x10  (0x2)
  -- * av_compare_mod(0x11, 0x02, 0x20) > 0 // since 0x11 % 0x20 (0x11) > 0x02 % 0x20 (0x02)
  -- * @endcode
  -- *
  -- * @param a,b Operands
  -- * @param mod Divisor; must be a power of 2
  -- * @return
  -- *         - a negative value if `a % mod < b % mod`
  -- *         - a positive value if `a % mod > b % mod`
  -- *         - zero             if `a % mod == b % mod`
  --  

   function av_compare_mod
     (a : Interfaces.Unsigned_64;
      b : Interfaces.Unsigned_64;
      c_mod : Interfaces.Unsigned_64) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:195
   pragma Import (C, av_compare_mod, "av_compare_mod");

  --*
  -- * Rescale a timestamp while preserving known durations.
  -- *
  -- * This function is designed to be called per audio packet to scale the input
  -- * timestamp to a different time base. Compared to a simple av_rescale_q()
  -- * call, this function is robust against possible inconsistent frame durations.
  -- *
  -- * The `last` parameter is a state variable that must be preserved for all
  -- * subsequent calls for the same stream. For the first call, `*last` should be
  -- * initialized to #AV_NOPTS_VALUE.
  -- *
  -- * @param[in]     in_tb    Input time base
  -- * @param[in]     in_ts    Input timestamp
  -- * @param[in]     fs_tb    Duration time base; typically this is finer-grained
  -- *                         (greater) than `in_tb` and `out_tb`
  -- * @param[in]     duration Duration till the next call to this function (i.e.
  -- *                         duration of the current packet/frame)
  -- * @param[in,out] last     Pointer to a timestamp expressed in terms of
  -- *                         `fs_tb`, acting as a state variable
  -- * @param[in]     out_tb   Output timebase
  -- * @return        Timestamp expressed in terms of `out_tb`
  -- *
  -- * @note In the context of this function, "duration" is in term of samples, not
  -- *       seconds.
  --  

   function av_rescale_delta
     (in_tb : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      in_ts : Interfaces.Integer_64;
      fs_tb : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      duration : int;
      last : access Interfaces.Integer_64;
      out_tb : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:222
   pragma Import (C, av_rescale_delta, "av_rescale_delta");

  --*
  -- * Add a value to a timestamp.
  -- *
  -- * This function guarantees that when the same value is repeatly added that
  -- * no accumulation of rounding errors occurs.
  -- *
  -- * @param[in] ts     Input timestamp
  -- * @param[in] ts_tb  Input timestamp time base
  -- * @param[in] inc    Value to be added
  -- * @param[in] inc_tb Time base of `inc`
  --  

  -- * copyright (c) 2005-2012 Michael Niedermayer <michaelni@gmx.at>
  -- *
  -- * This file is part of FFmpeg.
  -- *
  -- * FFmpeg is free software; you can redistribute it and/or
  -- * modify it under the terms of the GNU Lesser General Public
  -- * License as published by the Free Software Foundation; either
  -- * version 2.1 of the License, or (at your option) any later version.
  -- *
  -- * FFmpeg is distributed in the hope that it will be useful,
  -- * but WITHOUT ANY WARRANTY; without even the implied warranty of
  -- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  -- * Lesser General Public License for more details.
  -- *
  -- * You should have received a copy of the GNU Lesser General Public
  -- * License along with FFmpeg; if not, write to the Free Software
  -- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  --  

   function av_add_stable
     (ts_tb : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      ts : Interfaces.Integer_64;
      inc_tb : FFMpeg.Low_Level.ffmpeg_libavutil_rational_h.AVRational;
      inc : Interfaces.Integer_64) return Interfaces.Integer_64;  -- /usr/include/ffmpeg/libavutil/mathematics.h:235
   pragma Import (C, av_add_stable, "av_add_stable");

end FFMpeg.Low_Level.ffmpeg_libavutil_mathematics_h;
