Reordering of the directories[1]: moving Game/Code to src

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1302 b956fd51-792f-4845-bead-9b4dfca2ff2c

11 files changed, 0 insertions, 6266 deletions

diff --git a/Game/Code/lib/ffmpeg/avcodec.pas b/Game/Code/lib/ffmpeg/avcodec.pas
deleted file mode 100644
index e319ccb9..00000000
--- a/Game/Code/lib/ffmpeg/avcodec.pas
+++ /dev/null
@@ -1,3350 +0,0 @@
-(*
- * copyright (c) 2001 Fabrice Bellard
- *
- * This library 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 of the License, or (at your option) any later version.
- *
- * This library 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 this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
- *)
-
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libavcodec/avcodec.h
- * Min. version: 51.16.0, revision 6577, Sat Oct 7 15:30:46 2006 UTC 
- * Max. version: 51.63.0, revision 14666, Fri Aug 8 18:34:27 2008 UTC 
- *)
-
-unit avcodec;
-
-{$IFDEF FPC}
-  {$MODE DELPHI }
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-{$IFDEF DARWIN}
-  {$linklib libavcodec}
-{$ENDIF}
-
-interface
-
-uses
-  ctypes,
-  avutil,
-  rational,
-  opt,
-  {$IFDEF UNIX}
-  BaseUnix,
-  {$ENDIF}
-  UConfig;
-
-const
-  (* Max. supported version by this header *)
-  LIBAVCODEC_MAX_VERSION_MAJOR   = 51;
-  LIBAVCODEC_MAX_VERSION_MINOR   = 63;
-  LIBAVCODEC_MAX_VERSION_RELEASE = 0;
-  LIBAVCODEC_MAX_VERSION = (LIBAVCODEC_MAX_VERSION_MAJOR * VERSION_MAJOR) +
-                           (LIBAVCODEC_MAX_VERSION_MINOR * VERSION_MINOR) +
-                           (LIBAVCODEC_MAX_VERSION_RELEASE * VERSION_RELEASE);
-
-  (* Min. supported version by this header *)
-  LIBAVCODEC_MIN_VERSION_MAJOR   = 51;
-  LIBAVCODEC_MIN_VERSION_MINOR   = 16;
-  LIBAVCODEC_MIN_VERSION_RELEASE = 0;
-  LIBAVCODEC_MIN_VERSION = (LIBAVCODEC_MIN_VERSION_MAJOR * VERSION_MAJOR) +
-                            (LIBAVCODEC_MIN_VERSION_MINOR * VERSION_MINOR) +
-                            (LIBAVCODEC_MIN_VERSION_RELEASE * VERSION_RELEASE);
-
-(* Check if linked versions are supported *)
-{$IF (LIBAVCODEC_VERSION < LIBAVCODEC_MIN_VERSION)}
-  {$MESSAGE Error 'Linked version of libavcodec is too old!'}
-{$IFEND}
-
-(* Check if linked version is supported *)
-{$IF (LIBAVCODEC_VERSION > LIBAVCODEC_MAX_VERSION)}
-  {$MESSAGE Warn 'Linked version of libavcodec may be unsupported!'}
-{$IFEND}
-
-const
-  AV_NOPTS_VALUE: cint64   = $8000000000000000;
-  AV_TIME_BASE            = 1000000;
-  AV_TIME_BASE_Q          : TAVRational = (num: 1; den: AV_TIME_BASE);
-
-(**
- * Identifies the syntax and semantics of the bitstream.
- * The principle is roughly:
- * Two decoders with the same ID can decode the same streams.
- * Two encoders with the same ID can encode compatible streams.
- * There may be slight deviations from the principle due to implementation
- * details.
- *
- * If you add a codec ID to this list, add it so that
- * 1. no value of a existing codec ID changes (that would break ABI),
- * 2. it is as close as possible to similar codecs.
- *)
-type
-  TCodecID = (
-    CODEC_ID_NONE,
-    
-    (* video codecs *)
-    CODEC_ID_MPEG1VIDEO,
-    CODEC_ID_MPEG2VIDEO, //* prefered ID for MPEG Video 1/2 decoding */
-    CODEC_ID_MPEG2VIDEO_XVMC,
-    CODEC_ID_H261,
-    CODEC_ID_H263,
-    CODEC_ID_RV10,
-    CODEC_ID_RV20,
-    CODEC_ID_MJPEG,
-    CODEC_ID_MJPEGB,
-    CODEC_ID_LJPEG,
-    CODEC_ID_SP5X,
-    CODEC_ID_JPEGLS,
-    CODEC_ID_MPEG4,
-    CODEC_ID_RAWVIDEO,
-    CODEC_ID_MSMPEG4V1,
-    CODEC_ID_MSMPEG4V2,
-    CODEC_ID_MSMPEG4V3,
-    CODEC_ID_WMV1,
-    CODEC_ID_WMV2,
-    CODEC_ID_H263P,
-    CODEC_ID_H263I,
-    CODEC_ID_FLV1,
-    CODEC_ID_SVQ1,
-    CODEC_ID_SVQ3,
-    CODEC_ID_DVVIDEO,
-    CODEC_ID_HUFFYUV,
-    CODEC_ID_CYUV,
-    CODEC_ID_H264,
-    CODEC_ID_INDEO3,
-    CODEC_ID_VP3,
-    CODEC_ID_THEORA,
-    CODEC_ID_ASV1,
-    CODEC_ID_ASV2,
-    CODEC_ID_FFV1,
-    CODEC_ID_4XM,
-    CODEC_ID_VCR1,
-    CODEC_ID_CLJR,
-    CODEC_ID_MDEC,
-    CODEC_ID_ROQ,
-    CODEC_ID_INTERPLAY_VIDEO,
-    CODEC_ID_XAN_WC3,
-    CODEC_ID_XAN_WC4,
-    CODEC_ID_RPZA,
-    CODEC_ID_CINEPAK,
-    CODEC_ID_WS_VQA,
-    CODEC_ID_MSRLE,
-    CODEC_ID_MSVIDEO1,
-    CODEC_ID_IDCIN,
-    CODEC_ID_8BPS,
-    CODEC_ID_SMC,
-    CODEC_ID_FLIC,
-    CODEC_ID_TRUEMOTION1,
-    CODEC_ID_VMDVIDEO,
-    CODEC_ID_MSZH,
-    CODEC_ID_ZLIB,
-    CODEC_ID_QTRLE,
-    CODEC_ID_SNOW,
-    CODEC_ID_TSCC,
-    CODEC_ID_ULTI,
-    CODEC_ID_QDRAW,
-    CODEC_ID_VIXL,
-    CODEC_ID_QPEG,
-    CODEC_ID_XVID,
-    CODEC_ID_PNG,
-    CODEC_ID_PPM,
-    CODEC_ID_PBM,
-    CODEC_ID_PGM,
-    CODEC_ID_PGMYUV,
-    CODEC_ID_PAM,
-    CODEC_ID_FFVHUFF,
-    CODEC_ID_RV30,
-    CODEC_ID_RV40,
-    CODEC_ID_VC1,
-    CODEC_ID_WMV3,
-    CODEC_ID_LOCO,
-    CODEC_ID_WNV1,
-    CODEC_ID_AASC,
-    CODEC_ID_INDEO2,
-    CODEC_ID_FRAPS,
-    CODEC_ID_TRUEMOTION2,
-    CODEC_ID_BMP,
-    CODEC_ID_CSCD,
-    CODEC_ID_MMVIDEO,
-    CODEC_ID_ZMBV,
-    CODEC_ID_AVS,
-    CODEC_ID_SMACKVIDEO,
-    CODEC_ID_NUV,
-    CODEC_ID_KMVC,
-    CODEC_ID_FLASHSV,
-    CODEC_ID_CAVS,
-    CODEC_ID_JPEG2000,
-    CODEC_ID_VMNC,
-    CODEC_ID_VP5,
-    CODEC_ID_VP6,
-    CODEC_ID_VP6F,
-    CODEC_ID_TARGA,
-    CODEC_ID_DSICINVIDEO,
-    CODEC_ID_TIERTEXSEQVIDEO,
-    CODEC_ID_TIFF,
-    CODEC_ID_GIF,
-    CODEC_ID_FFH264,
-    CODEC_ID_DXA,
-    CODEC_ID_DNXHD,
-    CODEC_ID_THP,
-    CODEC_ID_SGI,
-    CODEC_ID_C93,
-    CODEC_ID_BETHSOFTVID,
-    CODEC_ID_PTX,
-    CODEC_ID_TXD,
-    CODEC_ID_VP6A,
-    CODEC_ID_AMV,
-    CODEC_ID_VB,
-    CODEC_ID_PCX,
-    CODEC_ID_SUNRAST,
-    CODEC_ID_INDEO4,
-    CODEC_ID_INDEO5,
-    CODEC_ID_MIMIC,
-    CODEC_ID_RL2,
-    CODEC_ID_8SVX_EXP,
-    CODEC_ID_8SVX_FIB,
-    CODEC_ID_ESCAPE124,
-    CODEC_ID_DIRAC,
-    CODEC_ID_BFI,
-    CODEC_ID_CMV,
-    CODEC_ID_MOTIONPIXELS,
-    CODEC_ID_TGV,
-
-    //* various PCM "codecs" */
-    CODEC_ID_PCM_S16LE= $10000,
-    CODEC_ID_PCM_S16BE,
-    CODEC_ID_PCM_U16LE,
-    CODEC_ID_PCM_U16BE,
-    CODEC_ID_PCM_S8,
-    CODEC_ID_PCM_U8,
-    CODEC_ID_PCM_MULAW,
-    CODEC_ID_PCM_ALAW,
-    CODEC_ID_PCM_S32LE,
-    CODEC_ID_PCM_S32BE,
-    CODEC_ID_PCM_U32LE,
-    CODEC_ID_PCM_U32BE,
-    CODEC_ID_PCM_S24LE,
-    CODEC_ID_PCM_S24BE,
-    CODEC_ID_PCM_U24LE,
-    CODEC_ID_PCM_U24BE,
-    CODEC_ID_PCM_S24DAUD,
-    CODEC_ID_PCM_ZORK,
-    CODEC_ID_PCM_S16LE_PLANAR,
-    CODEC_ID_PCM_DVD,
-    CODEC_ID_PCM_F32BE,
-
-    //* various ADPCM codecs */
-    CODEC_ID_ADPCM_IMA_QT= $11000,
-    CODEC_ID_ADPCM_IMA_WAV,
-    CODEC_ID_ADPCM_IMA_DK3,
-    CODEC_ID_ADPCM_IMA_DK4,
-    CODEC_ID_ADPCM_IMA_WS,
-    CODEC_ID_ADPCM_IMA_SMJPEG,
-    CODEC_ID_ADPCM_MS,
-    CODEC_ID_ADPCM_4XM,
-    CODEC_ID_ADPCM_XA,
-    CODEC_ID_ADPCM_ADX,
-    CODEC_ID_ADPCM_EA,
-    CODEC_ID_ADPCM_G726,
-    CODEC_ID_ADPCM_CT,
-    CODEC_ID_ADPCM_SWF,
-    CODEC_ID_ADPCM_YAMAHA,
-    CODEC_ID_ADPCM_SBPRO_4,
-    CODEC_ID_ADPCM_SBPRO_3,
-    CODEC_ID_ADPCM_SBPRO_2,
-    CODEC_ID_ADPCM_THP,
-    CODEC_ID_ADPCM_IMA_AMV,
-    CODEC_ID_ADPCM_EA_R1,
-    CODEC_ID_ADPCM_EA_R3,
-    CODEC_ID_ADPCM_EA_R2,
-    CODEC_ID_ADPCM_IMA_EA_SEAD,
-    CODEC_ID_ADPCM_IMA_EA_EACS,
-    CODEC_ID_ADPCM_EA_XAS,
-    CODEC_ID_ADPCM_EA_MAXIS_XA,
-
-    //* AMR */
-    CODEC_ID_AMR_NB= $12000,
-    CODEC_ID_AMR_WB,
-
-    //* RealAudio codecs*/
-    CODEC_ID_RA_144= $13000,
-    CODEC_ID_RA_288,
-
-    //* various DPCM codecs */
-    CODEC_ID_ROQ_DPCM= $14000,
-    CODEC_ID_INTERPLAY_DPCM,
-    CODEC_ID_XAN_DPCM,
-    CODEC_ID_SOL_DPCM,
-
-    (* audio codecs *)
-    CODEC_ID_MP2= $15000,
-    CODEC_ID_MP3, ///< preferred ID for decoding MPEG audio layer 1, 2 or 3
-    CODEC_ID_AAC,
-    {$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-    _CODEC_ID_MPEG4AAC, // will be redefined to CODEC_ID_AAC below
-    {$IFEND}
-    CODEC_ID_AC3,
-    CODEC_ID_DTS,
-    CODEC_ID_VORBIS,
-    CODEC_ID_DVAUDIO,
-    CODEC_ID_WMAV1,
-    CODEC_ID_WMAV2,
-    CODEC_ID_MACE3,
-    CODEC_ID_MACE6,
-    CODEC_ID_VMDAUDIO,
-    CODEC_ID_SONIC,
-    CODEC_ID_SONIC_LS,
-    CODEC_ID_FLAC,
-    CODEC_ID_MP3ADU,
-    CODEC_ID_MP3ON4,
-    CODEC_ID_SHORTEN,
-    CODEC_ID_ALAC,
-    CODEC_ID_WESTWOOD_SND1,
-    CODEC_ID_GSM, ///< as in Berlin toast format
-    CODEC_ID_QDM2,
-    CODEC_ID_COOK,
-    CODEC_ID_TRUESPEECH,
-    CODEC_ID_TTA,
-    CODEC_ID_SMACKAUDIO,
-    CODEC_ID_QCELP,
-    CODEC_ID_WAVPACK,
-    CODEC_ID_DSICINAUDIO,
-    CODEC_ID_IMC,
-    CODEC_ID_MUSEPACK7,
-    CODEC_ID_MLP,
-    CODEC_ID_GSM_MS, { as found in WAV }
-    CODEC_ID_ATRAC3,
-    CODEC_ID_VOXWARE,
-    CODEC_ID_APE,
-    CODEC_ID_NELLYMOSER,
-    CODEC_ID_MUSEPACK8,
-    CODEC_ID_SPEEX,
-    CODEC_ID_WMAVOICE,
-    CODEC_ID_WMAPRO,
-    CODEC_ID_WMALOSSLESS,
-    CODEC_ID_ATRAC3P,
-
-    //* subtitle codecs */
-    CODEC_ID_DVD_SUBTITLE= $17000,
-    CODEC_ID_DVB_SUBTITLE,
-    CODEC_ID_TEXT,  ///< raw UTF-8 text
-    CODEC_ID_XSUB,
-    CODEC_ID_SSA,
-    CODEC_ID_MOV_TEXT,
-
-    (* other specific kind of codecs (generally used for attachments) *)
-    CODEC_ID_TTF= $18000,
-
-    CODEC_ID_PROBE= $19000, ///< codec_id is not known (like CODEC_ID_NONE) but lavf should attempt to identify it
-
-    CODEC_ID_MPEG2TS= $20000, {*< _FAKE_ codec to indicate a raw MPEG-2 TS
-                              * stream (only used by libavformat) *}
-    __CODEC_ID_4BYTE = $FFFFF  // ensure 4-byte enum
-  );
-
-{$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-{* CODEC_ID_MP3LAME is obsolete *}
-const
-  CODEC_ID_MP3LAME = CODEC_ID_MP3;
-  CODEC_ID_MPEG4AAC = CODEC_ID_AAC;
-{$IFEND}
-
-type
-  TCodecType = (
-    CODEC_TYPE_UNKNOWN = -1,
-    CODEC_TYPE_VIDEO,
-    CODEC_TYPE_AUDIO,
-    CODEC_TYPE_DATA,
-    CODEC_TYPE_SUBTITLE,
-    CODEC_TYPE_ATTACHMENT,
-    CODEC_TYPE_NB
-  );
-
-{**
- * currently unused, may be used if 24/32 bits samples ever supported */
- * all in native endian
- *}
-type
-  TSampleFormat = (
-    SAMPLE_FMT_NONE = -1,
-    SAMPLE_FMT_U8,              ///< unsigned 8 bits
-    SAMPLE_FMT_S16,             ///< signed 16 bits
-    SAMPLE_FMT_S24,             ///< signed 24 bits
-    SAMPLE_FMT_S32,             ///< signed 32 bits
-    SAMPLE_FMT_FLT,             ///< float
-    SAMPLE_FMT_NB               ///< Number of sample formats. DO NOT USE if dynamically linking to libavcodec
-  );
-  _TSampleFormatArray = array [0 .. MaxInt div SizeOf(TSampleFormat)-1] of TSampleFormat;
-  PSampleFormatArray = ^_TSampleFormatArray;
-
-const
-  {* in bytes *}
-  AVCODEC_MAX_AUDIO_FRAME_SIZE = 192000; // 1 second of 48khz 32bit audio
-
-{**
- * Required number of additionally allocated bytes at the end of the input bitstream for decoding.
- * This is mainly needed because some optimized bitstream readers read
- * 32 or 64 bit at once and could read over the end.<br>
- * Note: If the first 23 bits of the additional bytes are not 0, then damaged
- * MPEG bitstreams could cause overread and segfault.
- *}
-  FF_INPUT_BUFFER_PADDING_SIZE = 8;
-
-{**
- * minimum encoding buffer size.
- * Used to avoid some checks during header writing.
- *}
-  FF_MIN_BUFFER_SIZE = 16384;
-
-type
-{*
- * motion estimation type.
- *}
-  TMotion_Est_ID = (
-    ME_ZERO = 1,  ///< no search, that is use 0,0 vector whenever one is needed
-    ME_FULL,
-    ME_LOG,
-    ME_PHODS,
-    ME_EPZS,      ///< enhanced predictive zonal search
-    ME_X1,        ///< reserved for experiments
-    ME_HEX,       ///< hexagon based search
-    ME_UMH,       ///< uneven multi-hexagon search
-    ME_ITER,      ///< iterative search
-    ME_TESA       ///< transformed exhaustive search algorithm
-  );
-
-  TAVDiscard = (
-    {* We leave some space between them for extensions (drop some
-     * keyframes for intra-only or drop just some bidir frames). *}
-    AVDISCARD_NONE   =-16, ///< discard nothing
-    AVDISCARD_DEFAULT=  0, ///< discard useless packets like 0 size packets in avi
-    AVDISCARD_NONREF =  8, ///< discard all non reference
-    AVDISCARD_BIDIR  = 16, ///< discard all bidirectional frames
-    AVDISCARD_NONKEY = 32, ///< discard all frames except keyframes
-    AVDISCARD_ALL    = 48  ///< discard all
-  );
-
-  PRcOverride = ^TRcOverride;
-  TRcOverride = record {16}
-    start_frame: cint;
-    end_frame: cint;
-    qscale: cint; // if this is 0 then quality_factor will be used instead
-    quality_factor: cfloat;
-  end;
-
-const
-  FF_MAX_B_FRAMES = 16;
-
-{* encoding support
-   These flags can be passed in AVCodecContext.flags before initialization.
-   Note: Not everything is supported yet.
-*}
-
-  CODEC_FLAG_QSCALE = $0002;  ///< Use fixed qscale.
-  CODEC_FLAG_4MV    = $0004;  ///< 4 MV per MB allowed / advanced prediction for H263.
-  CODEC_FLAG_QPEL   = $0010;  ///< use qpel MC.
-  CODEC_FLAG_GMC    = $0020;  ///< use GMC.
-  CODEC_FLAG_MV0    = $0040;  ///< always try a MB with MV=<0,0>.
-  CODEC_FLAG_PART   = $0080;  ///< Use data partitioning.
-  {**
-   * The parent program guarantees that the input for B-frames containing
-   * streams is not written to for at least s->max_b_frames+1 frames, if
-   * this is not set the input will be copied.
-   *}
-  CODEC_FLAG_INPUT_PRESERVED    = $0100;
-  CODEC_FLAG_PASS1              = $0200; ///< use internal 2pass ratecontrol in first  pass mode
-  CODEC_FLAG_PASS2              = $0400; ///< use internal 2pass ratecontrol in second pass mode
-  CODEC_FLAG_EXTERN_HUFF        = $1000; ///< use external huffman table (for mjpeg)
-  CODEC_FLAG_GRAY               = $2000; ///< only decode/encode grayscale
-  CODEC_FLAG_EMU_EDGE           = $4000; ///< don't draw edges
-  CODEC_FLAG_PSNR               = $8000; ///< error[?] variables will be set during encoding
-  CODEC_FLAG_TRUNCATED      = $00010000; //** input bitstream might be truncated at a random location instead
-                                   //         of only at frame boundaries */
-  CODEC_FLAG_NORMALIZE_AQP  = $00020000; ///< normalize adaptive quantization
-  CODEC_FLAG_INTERLACED_DCT = $00040000; ///< use interlaced dct
-  CODEC_FLAG_LOW_DELAY      = $00080000; ///< force low delay
-  CODEC_FLAG_ALT_SCAN       = $00100000; ///< use alternate scan
-  {$IF LIBAVCODEC_VERSION < 52000000} // < 52.0.0
-  CODEC_FLAG_TRELLIS_QUANT  = $00200000; ///< use trellis quantization
-  {$IFEND}
-  CODEC_FLAG_GLOBAL_HEADER  = $00400000; ///< place global headers in extradata instead of every keyframe
-  CODEC_FLAG_BITEXACT       = $00800000; ///< use only bitexact stuff (except (i)dct)
-  {* Fx : Flag for h263+ extra options *}
-  {$IF LIBAVCODEC_VERSION < 52000000} // < 52.0.0
-  CODEC_FLAG_H263P_AIC      = $01000000; ///< H263 Advanced intra coding / MPEG4 AC prediction (remove this)
-  {$IFEND}
-  CODEC_FLAG_AC_PRED        = $01000000; ///< H263 Advanced intra coding / MPEG4 AC prediction
-  CODEC_FLAG_H263P_UMV      = $02000000; ///< Unlimited motion vector
-  CODEC_FLAG_CBP_RD         = $04000000; ///< use rate distortion optimization for cbp
-  CODEC_FLAG_QP_RD          = $08000000; ///< use rate distortion optimization for qp selectioon
-  CODEC_FLAG_H263P_AIV      = $00000008; ///< H263 Alternative inter vlc
-  CODEC_FLAG_OBMC           = $00000001; ///< OBMC
-  CODEC_FLAG_LOOP_FILTER    = $00000800; ///< loop filter
-  CODEC_FLAG_H263P_SLICE_STRUCT = $10000000;
-  CODEC_FLAG_INTERLACED_ME  = $20000000; ///< interlaced motion estimation
-  CODEC_FLAG_SVCD_SCAN_OFFSET = $40000000; ///< will reserve space for SVCD scan offset user data
-  CODEC_FLAG_CLOSED_GOP     = $80000000;
-  CODEC_FLAG2_FAST          = $00000001; ///< allow non spec compliant speedup tricks
-  CODEC_FLAG2_STRICT_GOP    = $00000002; ///< strictly enforce GOP size
-  CODEC_FLAG2_NO_OUTPUT     = $00000004; ///< skip bitstream encoding
-  CODEC_FLAG2_LOCAL_HEADER  = $00000008; ///< place global headers at every keyframe instead of in extradata
-  CODEC_FLAG2_BPYRAMID      = $00000010; ///< H.264 allow b-frames to be used as references
-  CODEC_FLAG2_WPRED         = $00000020; ///< H.264 weighted biprediction for b-frames
-  CODEC_FLAG2_MIXED_REFS    = $00000040; ///< H.264 multiple references per partition
-  CODEC_FLAG2_8X8DCT        = $00000080; ///< H.264 high profile 8x8 transform
-  CODEC_FLAG2_FASTPSKIP     = $00000100; ///< H.264 fast pskip
-  CODEC_FLAG2_AUD           = $00000200; ///< H.264 access unit delimiters
-  CODEC_FLAG2_BRDO          = $00000400; ///< b-frame rate-distortion optimization
-  CODEC_FLAG2_INTRA_VLC     = $00000800; ///< use MPEG-2 intra VLC table
-  CODEC_FLAG2_MEMC_ONLY     = $00001000; ///< only do ME/MC (I frames -> ref, P frame -> ME+MC)
-  CODEC_FLAG2_DROP_FRAME_TIMECODE = $00002000; ///< timecode is in drop frame format.
-  CODEC_FLAG2_SKIP_RD       = $00004000; ///< RD optimal MB level residual skipping
-  CODEC_FLAG2_CHUNKS        = $00008000; ///< Input bitstream might be truncated at a packet boundaries instead of only at frame boundaries.
-  CODEC_FLAG2_NON_LINEAR_QUANT = $00010000; ///< Use MPEG-2 nonlinear quantizer.
-  CODEC_FLAG2_BIT_RESERVOIR = $00020000; ///< Use a bit reservoir when encoding if possible
-
-(* Unsupported options :
- *              Syntax Arithmetic coding (SAC)
- *              Reference Picture Selection
- *              Independant Segment Decoding *)
-(* /Fx *)
-(* codec capabilities *)
-
-const
-  CODEC_CAP_DRAW_HORIZ_BAND = $0001; ///< decoder can use draw_horiz_band callback
-  (**
-   * Codec uses get_buffer() for allocating buffers.
-   * direct rendering method 1
-   *)
-  CODEC_CAP_DR1             = $0002;
-  (* if 'parse_only' field is true, then avcodec_parse_frame() can be used *)
-  CODEC_CAP_PARSE_ONLY      = $0004;
-  CODEC_CAP_TRUNCATED       = $0008;
-  (* codec can export data for HW decoding (XvMC) *)
-  CODEC_CAP_HWACCEL         = $0010;
-  (**
-   * codec has a non zero delay and needs to be feeded with NULL at the end to get the delayed data.
-   * if this is not set, the codec is guranteed to never be feeded with NULL data
-   *)
-  CODEC_CAP_DELAY           = $0020;
-  (**
-   * Codec can be fed a final frame with a smaller size.
-   * This can be used to prevent truncation of the last audio samples.
-   *)
-  CODEC_CAP_SMALL_LAST_FRAME = $0040;
-
-   //the following defines may change, don't expect compatibility if you use them
-   MB_TYPE_INTRA4x4   = $001;
-   MB_TYPE_INTRA16x16 = $002; //FIXME h264 specific
-   MB_TYPE_INTRA_PCM  = $004; //FIXME h264 specific
-   MB_TYPE_16x16      = $008;
-   MB_TYPE_16x8       = $010;
-   MB_TYPE_8x16       = $020;
-   MB_TYPE_8x8        = $040;
-   MB_TYPE_INTERLACED = $080;
-   MB_TYPE_DIRECT2     = $100; //FIXME
-   MB_TYPE_ACPRED     = $200;
-   MB_TYPE_GMC        = $400;
-   MB_TYPE_SKIP       = $800;
-   MB_TYPE_P0L0       = $1000;
-   MB_TYPE_P1L0       = $2000;
-   MB_TYPE_P0L1       = $4000;
-   MB_TYPE_P1L1       = $8000;
-   MB_TYPE_L0         = (MB_TYPE_P0L0 or MB_TYPE_P1L0);
-   MB_TYPE_L1         = (MB_TYPE_P0L1 or MB_TYPE_P1L1);
-   MB_TYPE_L0L1       = (MB_TYPE_L0   or MB_TYPE_L1);
-   MB_TYPE_QUANT      = $0010000;
-   MB_TYPE_CBP        = $0020000;
-   //Note bits 24-31 are reserved for codec specific use (h264 ref0, mpeg1 0mv, ...)
-
-type
-(**
- * Pan Scan area.
- * This specifies the area which should be displayed.
- * Note there may be multiple such areas for one frame.
- *)
-  PAVPanScan = ^TAVPanScan;
-  TAVPanScan = record {24}
-    (*** id.
-     * - encoding: set by user.
-     * - decoding: set by libavcodec. *)
-    id: cint;
-
-    (*** width and height in 1/16 pel
-     * - encoding: set by user.
-     * - decoding: set by libavcodec. *)
-    width: cint;
-    height: cint;
-
-    (*** position of the top left corner in 1/16 pel for up to 3 fields/frames.
-     * - encoding: set by user.
-     * - decoding: set by libavcodec. *)
-    position: array [0..2] of array [0..1] of smallint;
-  end;
-
-const
-  FF_QSCALE_TYPE_MPEG1	= 0;
-  FF_QSCALE_TYPE_MPEG2	= 1;
-  FF_QSCALE_TYPE_H264   = 2;
-
-  FF_BUFFER_TYPE_INTERNAL = 1;
-  FF_BUFFER_TYPE_USER     = 2; ///< Direct rendering buffers (image is (de)allocated by user)
-  FF_BUFFER_TYPE_SHARED   = 4; ///< buffer from somewhere else, don't dealloc image (data/base), all other tables are not shared
-  FF_BUFFER_TYPE_COPY     = 8; ///< just a (modified) copy of some other buffer, don't dealloc anything.
-
-
-  FF_I_TYPE  = 1; ///< Intra
-  FF_P_TYPE  = 2; ///< Predicted
-  FF_B_TYPE  = 3; ///< Bi-dir predicted
-  FF_S_TYPE  = 4; ///< S(GMC)-VOP MPEG4
-  FF_SI_TYPE = 5; ///< Switching Intra
-  FF_SP_TYPE = 6; ///< Switching Predicted
-  FF_BI_TYPE = 7;
-
-  FF_BUFFER_HINTS_VALID    = $01; // Buffer hints value is meaningful (if 0 ignore)
-  FF_BUFFER_HINTS_READABLE = $02; // Codec will read from buffer
-  FF_BUFFER_HINTS_PRESERVE = $04; // User must not alter buffer content
-  FF_BUFFER_HINTS_REUSABLE = $08; // Codec will reuse the buffer (update)
-
-type
-  {**
-   * Audio Video Frame.
-   * New fields can be added to the end of FF_COMMON_FRAME with minor version
-   * bumps.
-   * Removal, reordering and changes to existing fields require a major
-   * version bump. No fields should be added into AVFrame before or after
-   * FF_COMMON_FRAME!
-   * sizeof(AVFrame) must not be used outside libav*.
-   *}
-  PAVFrame = ^TAVFrame;
-  TAVFrame = record {200}
-    (**
-     * pointer to the picture planes.
-     * This might be different from the first allocated byte
-     * - encoding:
-     * - decoding:
-     *)
-    data: array [0..3] of pbyte;
-    linesize: array [0..3] of cint;
-    (**
-     * pointer to the first allocated byte of the picture. Can be used in get_buffer/release_buffer.
-     * This isn't used by libavcodec unless the default get/release_buffer() is used.
-     * - encoding:
-     * - decoding:
-     *)
-    base: array [0..3] of pbyte;
-    (**
-     * 1 -> keyframe, 0-> not
-     * - encoding: Set by libavcodec.
-     * - decoding: Set by libavcodec.
-     *)
-    key_frame: cint;
-    (**
-     * Picture type of the frame, see ?_TYPE below.
-     * - encoding: Set by libavcodec. for coded_picture (and set by user for input).
-     * - decoding: Set by libavcodec.
-     *)
-    pict_type: cint;
-    (**
-     * presentation timestamp in time_base units (time when frame should be shown to user)
-     * If AV_NOPTS_VALUE then frame_rate = 1/time_base will be assumed.
-     * - encoding: MUST be set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    pts: cint64;
-    (**\
-     * picture number in bitstream order
-     * - encoding: set by
-     * - decoding: Set by libavcodec.
-     *)
-    coded_picture_number: cint;
-    (**
-     * picture number in display order
-     * - encoding: set by
-     * - decoding: Set by libavcodec.
-     *)
-    display_picture_number: cint;
-    (**
-     * quality (between 1 (good) and FF_LAMBDA_MAX (bad))
-     * - encoding: Set by libavcodec. for coded_picture (and set by user for input).
-     * - decoding: Set by libavcodec.
-     *)
-    quality: cint;
-    (**
-     * buffer age (1->was last buffer and dint change, 2->..., ...).
-     * Set to INT_MAX if the buffer has not been used yet.
-     * - encoding: unused
-     * - decoding: MUST be set by get_buffer().
-     *)
-    age: cint;
-    (**
-     * is this picture used as reference
-     * The values for this are the same as the MpegEncContext.picture_structure
-     * variable, that is 1->top field, 2->bottom field, 3->frame/both fields.
-     * - encoding: unused
-     * - decoding: Set by libavcodec. (before get_buffer() call)).
-     *)
-    reference: cint;
-    (**
-     * QP table
-     * - encoding: unused
-     * - decoding: Set by libavcodec.
-     *)
-    qscale_table: PShortint;
-    (**
-     * QP store stride
-     * - encoding: unused
-     * - decoding: Set by libavcodec.
-     *)
-    qstride: cint;
-    (**
-     * mbskip_table[mb]>=1 if MB didn't change
-     * stride= mb_width = (width+15)>>4
-     * - encoding: unused
-     * - decoding: Set by libavcodec.
-     *)
-    mbskip_table: pbyte;
-    (**
-     * motion vector table
-     * @code
-     * example:
-     * int mv_sample_log2= 4 - motion_subsample_log2;
-     * int mb_width= (width+15)>>4;
-     * int mv_stride= (mb_width << mv_sample_log2) + 1;
-     * motion_val[direction][x + y*mv_stride][0->mv_x, 1->mv_y];
-     * @endcode
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    //int16_t (*motion_val[2])[2];
-    motion_val: array [0..1] of pointer;
-    (**
-     * macroblock type table
-     * mb_type_base + mb_width + 2
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    mb_type: PCuint;
-    (**
-     * log2 of the size of the block which a single vector in motion_val represents:
-     * (4->16x16, 3->8x8, 2-> 4x4, 1-> 2x2)
-     * - encoding: unused
-     * - decoding: Set by libavcodec.
-     *)
-    motion_subsample_log2: byte;
-    (**
-     * for some private data of the user
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    opaque: pointer;
-    (**
-     * error
-     * - encoding: Set by libavcodec. if flags&CODEC_FLAG_PSNR.
-     * - decoding: unused
-     *)
-    error: array [0..3] of cuint64;
-    (**
-     * type of the buffer (to keep track of who has to deallocate data[*])
-     * - encoding: Set by the one who allocates it.
-     * - decoding: Set by the one who allocates it.
-     * Note: User allocated (direct rendering) & internal buffers cannot coexist currently.
-     *)
-    type_: cint;
-    (**
-     * When decoding, this signals how much the picture must be delayed.
-     * extra_delay = repeat_pict / (2*fps)
-     * - encoding: unused
-     * - decoding: Set by libavcodec.
-     *)
-    repeat_pict: cint;
-    (**
-     *
-     *)
-    qscale_type: cint;
-    (**
-     * The content of the picture is interlaced.
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec. (default 0)
-     *)
-    interlaced_frame: cint;
-    (**
-     * If the content is interlaced, is top field displayed first.
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    top_field_first: cint;
-    (**
-     * Pan scan.
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    pan_scan: PAVPanScan;
-    (**
-     * Tell user application that palette has changed from previous frame.
-     * - encoding: ??? (no palette-enabled encoder yet)
-     * - decoding: Set by libavcodec. (default 0).
-     *)
-    palette_has_changed: cint;
-    (**
-     * codec suggestion on buffer type if != 0
-     * - encoding: unused
-     * - decoding: Set by libavcodec. (before get_buffer() call)).
-     *)
-    buffer_hints: cint;
-    (**
-     * DCT coefficients
-     * - encoding: unused
-     * - decoding: Set by libavcodec.
-     *)
-    dct_coeff: PsmallInt;
-    (**
-     * motion referece frame index
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    ref_index: array [0..1] of PShortint;
-  end;
-
-const
-  DEFAULT_FRAME_RATE_BASE = 1001000;
-
-  FF_ASPECT_EXTENDED = 15;
-
-  FF_RC_STRATEGY_XVID = 1;
-
-  FF_BUG_AUTODETECT       = 1;  ///< autodetection
-  FF_BUG_OLD_MSMPEG4      = 2;
-  FF_BUG_XVID_ILACE       = 4;
-  FF_BUG_UMP4             = 8;
-  FF_BUG_NO_PADDING       = 16;
-  FF_BUG_AMV              = 32;
-  FF_BUG_AC_VLC           = 0;  ///< will be removed, libavcodec can now handle these non compliant files by default
-  FF_BUG_QPEL_CHROMA      = 64;
-  FF_BUG_STD_QPEL         = 128;
-  FF_BUG_QPEL_CHROMA2     = 256;
-  FF_BUG_DIRECT_BLOCKSIZE = 512;
-  FF_BUG_EDGE             = 1024;
-  FF_BUG_HPEL_CHROMA      = 2048;
-  FF_BUG_DC_CLIP          = 4096;
-  FF_BUG_MS               = 8192; ///< workaround various bugs in microsofts broken decoders
-  //FF_BUG_FAKE_SCALABILITY = 16 //Autodetection should work 100%.
-
-  FF_COMPLIANCE_VERY_STRICT   =  2; ///< strictly conform to a older more strict version of the spec or reference software
-  FF_COMPLIANCE_STRICT        =  1; ///< strictly conform to all the things in the spec no matter what consequences
-  FF_COMPLIANCE_NORMAL        =  0;
-  FF_COMPLIANCE_INOFFICIAL    = -1; ///< allow inofficial extensions
-  FF_COMPLIANCE_EXPERIMENTAL  = -2; ///< allow non standarized experimental things
-
-  FF_ER_CAREFUL         = 1;
-  FF_ER_COMPLIANT       = 2;
-  FF_ER_AGGRESSIVE      = 3;
-  FF_ER_VERY_AGGRESSIVE = 4;
-
-  FF_DCT_AUTO    = 0;
-  FF_DCT_FASTINT = 1;
-  FF_DCT_INT     = 2;
-  FF_DCT_MMX     = 3;
-  FF_DCT_MLIB    = 4;
-  FF_DCT_ALTIVEC = 5;
-  FF_DCT_FAAN    = 6;
-
-  FF_IDCT_AUTO         = 0;
-  FF_IDCT_INT          = 1;
-  FF_IDCT_SIMPLE       = 2;
-  FF_IDCT_SIMPLEMMX    = 3;
-  FF_IDCT_LIBMPEG2MMX  = 4;
-  FF_IDCT_PS2          = 5;
-  FF_IDCT_MLIB         = 6;
-  FF_IDCT_ARM          = 7;
-  FF_IDCT_ALTIVEC      = 8;
-  FF_IDCT_SH4          = 9;
-  FF_IDCT_SIMPLEARM    = 10;
-  FF_IDCT_H264         = 11;
-  FF_IDCT_VP3          = 12;
-  FF_IDCT_IPP          = 13;
-  FF_IDCT_XVIDMMX      = 14;
-  FF_IDCT_CAVS         = 15;
-  FF_IDCT_SIMPLEARMV5TE= 16;
-  FF_IDCT_SIMPLEARMV6  = 17;
-  FF_IDCT_SIMPLEVIS    = 18;
-  FF_IDCT_WMV2         = 19;
-  FF_IDCT_FAAN         = 20;
-
-  FF_EC_GUESS_MVS   = 1;
-  FF_EC_DEBLOCK     = 2;
-
-  FF_MM_FORCE	      = $80000000; (* force usage of selected flags (OR) *)
-  (* lower 16 bits - CPU features *)
-  FF_MM_MMX	        = $0001; ///< standard MMX
-  FF_MM_3DNOW	      = $0004; ///< AMD 3DNOW
-  FF_MM_MMXEXT	    = $0002; ///< SSE integer functions or AMD MMX ext
-  FF_MM_SSE	        = $0008; ///< SSE functions
-  FF_MM_SSE2	      = $0010; ///< PIV SSE2 functions
-  FF_MM_3DNOWEXT	  = $0020; ///< AMD 3DNowExt
-  FF_MM_SSE3        = $0040; ///< Prescott SSE3 functions
-  FF_MM_SSSE3       = $0080; ///< Conroe SSSE3 functions
-  FF_MM_IWMMXT	    = $0100; ///< XScale IWMMXT
-
-  FF_PRED_LEFT   = 0;
-  FF_PRED_PLANE  = 1;
-  FF_PRED_MEDIAN = 2;
-
-  FF_DEBUG_PICT_INFO    = 1;
-  FF_DEBUG_RC           = 2;
-  FF_DEBUG_BITSTREAM    = 4;
-  FF_DEBUG_MB_TYPE      = 8;
-  FF_DEBUG_QP           = 16;
-  FF_DEBUG_MV           = 32;
-  FF_DEBUG_DCT_COEFF    = $00000040;
-  FF_DEBUG_SKIP         = $00000080;
-  FF_DEBUG_STARTCODE    = $00000100;
-  FF_DEBUG_PTS          = $00000200;
-  FF_DEBUG_ER           = $00000400;
-  FF_DEBUG_MMCO         = $00000800;
-  FF_DEBUG_BUGS         = $00001000;
-  FF_DEBUG_VIS_QP       = $00002000;
-  FF_DEBUG_VIS_MB_TYPE  = $00004000;
-  FF_DEBUG_BUFFERS      = $00008000;
-
-  FF_DEBUG_VIS_MV_P_FOR  = $00000001; //visualize forward predicted MVs of P frames
-  FF_DEBUG_VIS_MV_B_FOR  = $00000002; //visualize forward predicted MVs of B frames
-  FF_DEBUG_VIS_MV_B_BACK = $00000004; //visualize backward predicted MVs of B frames
-
-  FF_CMP_SAD    = 0;
-  FF_CMP_SSE    = 1;
-  FF_CMP_SATD   = 2;
-  FF_CMP_DCT    = 3;
-  FF_CMP_PSNR   = 4;
-  FF_CMP_BIT    = 5;
-  FF_CMP_RD     = 6;
-  FF_CMP_ZERO   = 7;
-  FF_CMP_VSAD   = 8;
-  FF_CMP_VSSE   = 9;
-  FF_CMP_NSSE   = 10;
-  FF_CMP_W53    = 11;
-  FF_CMP_W97    = 12;
-  FF_CMP_DCTMAX = 13;
-  FF_CMP_DCT264 = 14;
-  FF_CMP_CHROMA = 256;
-
-  FF_DTG_AFD_SAME         = 8;
-  FF_DTG_AFD_4_3          = 9;
-  FF_DTG_AFD_16_9         = 10;
-  FF_DTG_AFD_14_9         = 11;
-  FF_DTG_AFD_4_3_SP_14_9  = 13;
-  FF_DTG_AFD_16_9_SP_14_9 = 14;
-  FF_DTG_AFD_SP_4_3       = 15;
-
-  FF_DEFAULT_QUANT_BIAS   = 999999;
-
-  FF_LAMBDA_SHIFT   = 7;
-  FF_LAMBDA_SCALE   = (1 shl FF_LAMBDA_SHIFT);
-  FF_QP2LAMBDA      = 118; ///< factor to convert from H.263 QP to lambda
-  FF_LAMBDA_MAX     = (256 * 128 - 1);
-
-  FF_QUALITY_SCALE  = FF_LAMBDA_SCALE; //FIXME maybe remove
-
-  FF_CODER_TYPE_VLC     = 0;
-  FF_CODER_TYPE_AC      = 1;
-  FF_CODER_TYPE_RAW     = 2;
-  FF_CODER_TYPE_RLE     = 3;
-  FF_CODER_TYPE_DEFLATE = 4;
-
-  SLICE_FLAG_CODED_ORDER    = $0001; ///< draw_horiz_band() is called in coded order instead of display
-  SLICE_FLAG_ALLOW_FIELD    = $0002; ///< allow draw_horiz_band() with field slices (MPEG2 field pics)
-  SLICE_FLAG_ALLOW_PLANE    = $0004; ///< allow draw_horiz_band() with 1 component at a time (SVQ1)
-
-  FF_MB_DECISION_SIMPLE = 0;        ///< uses mb_cmp
-  FF_MB_DECISION_BITS   = 1;        ///< chooses the one which needs the fewest bits
-  FF_MB_DECISION_RD     = 2;        ///< rate distortion
-
-  FF_AA_AUTO    = 0;
-  FF_AA_FASTINT = 1; //not implemented yet
-  FF_AA_INT     = 2;
-  FF_AA_FLOAT   = 3;
-
-  FF_PROFILE_UNKNOWN  = -99;
-  FF_PROFILE_AAC_MAIN = 0;
-  FF_PROFILE_AAC_LOW  = 1;
-  FF_PROFILE_AAC_SSR  = 2;
-  FF_PROFILE_AAC_LTP  = 3;
-
-  FF_LEVEL_UNKNOWN    = -99;
-
-  X264_PART_I4X4 = $001;  (* Analyse i4x4 *)
-  X264_PART_I8X8 = $002;  (* Analyse i8x8 (requires 8x8 transform) *)
-  X264_PART_P8X8 = $010;  (* Analyse p16x8, p8x16 and p8x8 *)
-  X264_PART_P4X4 = $020;  (* Analyse p8x4, p4x8, p4x4 *)
-  X264_PART_B8X8 = $100;  (* Analyse b16x8, b8x16 and b8x8 *)
-
-  FF_COMPRESSION_DEFAULT = -1;
-
-const
-  AVPALETTE_SIZE = 1024;
-  AVPALETTE_COUNT = 256;
-
-type
-(**
- * AVPaletteControl
- * This structure defines a method for communicating palette changes
- * between and demuxer and a decoder.
- *
- * @deprecated Use AVPacket to send palette changes instead.
- * This is totally broken.
- *)
-  PAVPaletteControl = ^TAVPaletteControl;
-  TAVPaletteControl = record
-    (* demuxer sets this to 1 to indicate the palette has changed;
-     * decoder resets to 0 *)
-    palette_changed: cint;
-
-    (* 4-byte ARGB palette entries, stored in native byte order; note that
-     * the individual palette components should be on a 8-bit scale; if
-     * the palette data comes from a IBM VGA native format, the component
-     * data is probably 6 bits in size and needs to be scaled *)
-    palette: array [0..AVPALETTE_COUNT - 1] of cuint;
-  end; {deprecated;}
-
-type
-  PAVClass = ^TAVClass; {const}
-  PAVCodecContext = ^TAVCodecContext;
-
-  PAVCodec = ^TAVCodec;
-
-  // int[4]
-  PQuadIntArray = ^TQuadIntArray;
-  TQuadIntArray = array[0..3] of cint;
-  // int (*func)(struct AVCodecContext *c2, void *arg)
-  TExecuteFunc = function(c2: PAVCodecContext; arg: Pointer): cint; cdecl;
-
-  TAVClass = record {12}
-    class_name: pchar;
-    (* actually passing a pointer to an AVCodecContext
-					or AVFormatContext, which begin with an AVClass.
-					Needed because av_log is in libavcodec and has no visibility
-					of AVIn/OutputFormat *)
-    item_name: function (): pchar; cdecl;
-    option: PAVOption;
-  end;
-
-  (**
-   * main external API structure.
-   * New fields can be added to the end with minor version bumps.
-   * Removal, reordering and changes to existing fields require a major
-   * version bump.
-   * sizeof(AVCodecContext) must not be used outside libav*.
-   *)
-  TAVCodecContext = record {720}
-    (**
-     * information on struct for av_log
-     * - set by avcodec_alloc_context
-     *)
-    av_class: PAVClass;
-    (**
-     * the average bitrate
-     * - encoding: Set by user; unused for constant quantizer encoding.
-     * - decoding: Set by libavcodec. 0 or some bitrate if this info is available in the stream.
-     *)
-    bit_rate: cint;
-
-    (**
-     * number of bits the bitstream is allowed to diverge from the reference.
-     *           the reference can be CBR (for CBR pass1) or VBR (for pass2)
-     * - encoding: Set by user; unused for constant quantizer encoding.
-     * - decoding: unused
-     *)
-    bit_rate_tolerance: cint;
-
-    (**
-     * CODEC_FLAG_*.
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    flags: cint;
-
-    (**
-     * Some codecs need additional format info. It is stored here.
-     * If any muxer uses this then ALL demuxers/parsers AND encoders for the
-     * specific codec MUST set it correctly otherwise stream copy breaks.
-     * In general use of this field by muxers is not recommanded.
-     * - encoding: Set by libavcodec.
-     * - decoding: Set by libavcodec. (FIXME: Is this OK?)
-     *)
-    sub_id: cint;
-
-    (**
-     * Motion estimation algorithm used for video coding.
-     * 1 (zero), 2 (full), 3 (log), 4 (phods), 5 (epzs), 6 (x1), 7 (hex),
-     * 8 (umh), 9 (iter), 10 (tesa) [7, 8, 10 are x264 specific, 9 is snow specific]
-     * - encoding: MUST be set by user.
-     * - decoding: unused
-     *)
-    me_method: cint;
-
-    (**
-     * some codecs need / can use extradata like Huffman tables.
-     * mjpeg: Huffman tables
-     * rv10: additional flags
-     * mpeg4: global headers (they can be in the bitstream or here)
-     * The allocated memory should be FF_INPUT_BUFFER_PADDING_SIZE bytes larger
-     * than extradata_size to avoid prolems if it is read with the bitstream reader.
-     * The bytewise contents of extradata must not depend on the architecture or CPU endianness.
-     * - encoding: Set/allocated/freed by libavcodec.
-     * - decoding: Set/allocated/freed by user.
-     *)
-    extradata: pbyte;
-    extradata_size: cint;
-
-    (**
-     * This is the fundamental unit of time (in seconds) in terms
-     * of which frame timestamps are represented. For fixed-fps content,
-     * timebase should be 1/framerate and timestamp increments should be
-     * identically 1.
-     * - encoding: MUST be set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    time_base: TAVRational;
-
-    (* video only *)
-    (**
-     * picture width / height.
-     * - encoding: MUST be set by user.
-     * - decoding: Set by libavcodec.
-     * Note: For compatibility it is possible to set this instead of
-     * coded_width/height before decoding.
-     *)
-    width, height: cint;
-
-    (**
-     * the number of pictures in a group of pictures, or 0 for intra_only
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    gop_size: cint;
-
-    (**
-     * Pixel format, see PIX_FMT_xxx.
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    pix_fmt: TAVPixelFormat;
-
-    (**
-     * Frame rate emulation. If not zero, the lower layer (i.e. format handler)
-     * has to read frames at native frame rate.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rate_emu: cint;
-
-    (**
-     * If non NULL, 'draw_horiz_band' is called by the libavcodec
-     * decoder to draw a horizontal band. It improves cache usage. Not
-     * all codecs can do that. You must check the codec capabilities
-     * beforehand.
-     * - encoding: unused
-     * - decoding: Set by user.
-     * @param height the height of the slice
-     * @param y the y position of the slice
-     * @param type 1->top field, 2->bottom field, 3->frame
-     * @param offset offset into the AVFrame.data from which the slice should be read
-     *)
-    draw_horiz_band: procedure (s: PAVCodecContext;
-                                src: {const} PAVFrame; offset: PQuadIntArray;
-                                y: cint; type_: cint; height: cint); cdecl;
-
-    (* audio only *)
-    sample_rate: cint; ///< samples per second
-    channels: cint;    ///< number of audio channels
-    
-    (**
-     * audio sample format
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    sample_fmt: TSampleFormat;  ///< sample format, currenly unused
-
-    (* The following data should not be initialized. *)
-    (**
-     * Samples per packet, initialized when calling 'init'.
-     *)
-    frame_size: cint;
-    frame_number: cint;   ///< audio or video frame number
-    real_pict_num: cint;  ///< returns the real picture number of previous encoded frame
-
-    (**
-     * Number of frames the decoded output will be delayed relative to
-     * the encoded input.
-     * - encoding: Set by libavcodec.
-     * - decoding: unused
-     *)
-    delay: cint;
-
-    (* - encoding parameters *)
-    qcompress: cfloat;  ///< amount of qscale change between easy & hard scenes (0.0-1.0)
-    qblur: cfloat;      ///< amount of qscale smoothing over time (0.0-1.0)
-
-    (**
-     * minimum quantizer
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    qmin: cint;
-
-   (**
-     * maximum quantizer
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-   qmax: cint;
-
-    (**
-     * maximum quantizer difference between frames
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    max_qdiff: cint;
-
-    (**
-     * maximum number of B-frames between non-B-frames
-     * Note: The output will be delayed by max_b_frames+1 relative to the input.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    max_b_frames: cint;
-
-    (**
-     * qscale factor between IP and B-frames
-     * If > 0 then the last P-frame quantizer will be used (q= lastp_q*factor+offset).
-     * If < 0 then normal ratecontrol will be done (q= -normal_q*factor+offset).
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    b_quant_factor: cfloat;
-
-    (** obsolete FIXME remove *)
-    rc_strategy: cint;
-
-    b_frame_strategy: cint;
-
-    (**
-     * hurry up amount
-     * - encoding: unused
-     * - decoding: Set by user. 1-> Skip B-frames, 2-> Skip IDCT/dequant too, 5-> Skip everything except header
-     * @deprecated Deprecated in favor of skip_idct and skip_frame.
-     *)
-    hurry_up: cint;
-
-    codec: PAVCodec;
-
-    priv_data: pointer;
-
-    {$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-    (* unused, FIXME remove*)
-    rtp_mode: cint;
-    {$IFEND}
-
-    rtp_payload_size: cint;  (* The size of the RTP payload: the coder will  *)
-                                (* do it's best to deliver a chunk with size    *)
-                                (* below rtp_payload_size, the chunk will start *)
-                                (* with a start code on some codecs like H.263  *)
-                                (* This doesn't take account of any particular  *)
-                                (* headers inside the transmited RTP payload    *)
-
-
-    (* The RTP callback: This function is called   *)
-    (* every time the encoder has a packet to send *)
-    (* Depends on the encoder if the data starts   *)
-    (* with a Start Code (it should) H.263 does.   *)
-    (* mb_nb contains the number of macroblocks    *)
-    (* encoded in the RTP payload                  *)
-    rtp_callback: procedure (avctx: PAVCodecContext; data: pointer;
-                             size: cint; mb_nb: cint); cdecl;
-
-    (* statistics, used for 2-pass encoding *)
-    mv_bits: cint;
-    header_bits: cint;
-    i_tex_bits: cint;
-    p_tex_bits: cint;
-    i_count: cint;
-    p_count: cint;
-    skip_count: cint;
-    misc_bits: cint;
-
-    (**
-     * number of bits used for the previously encoded frame
-     * - encoding: Set by libavcodec.
-     * - decoding: unused
-     *)
-    frame_bits: cint;
-
-    (**
-     * Private data of the user, can be used to carry app specific stuff.
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    opaque: pointer;
-
-    codec_name: array [0..31] of char;
-    codec_type: TCodecType; (* see CODEC_TYPE_xxx *)
-    codec_id: TCodecID; (* see CODEC_ID_xxx *)
-
-    (**
-     * fourcc (LSB first, so "ABCD" -> ('D'<<24) + ('C'<<16) + ('B'<<8) + 'A').
-     * This is used to work around some encoder bugs.
-     * A demuxer should set this to what is stored in the field used to identify the codec.
-     * If there are multiple such fields in a container then the demuxer should choose the one
-     * which maximizes the information about the used codec.
-     * If the codec tag field in a container is larger then 32 bits then the demuxer should
-     * remap the longer ID to 32 bits with a table or other structure. Alternatively a new
-     * extra_codec_tag + size could be added but for this a clear advantage must be demonstrated
-     * first.
-     * - encoding: Set by user, if not then the default based on codec_id will be used.
-     * - decoding: Set by user, will be converted to uppercase by libavcodec during init.
-     *)
-    codec_tag: cuint;
-
-    (**
-     * Work around bugs in encoders which sometimes cannot be detected automatically.
-     * - encoding: Set by user
-     * - decoding: Set by user
-     *)
-    workaround_bugs: cint;
-
-    (**
-     * luma single coefficient elimination threshold
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    luma_elim_threshold: cint;
-
-    (**
-     * chroma single coeff elimination threshold
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    chroma_elim_threshold: cint;
-
-    (**
-     * strictly follow the standard (MPEG4, ...).
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     * Setting this to STRICT or higher means the encoder and decoder will
-     * generally do stupid things. While setting it to inofficial or lower
-     * will mean the encoder might use things that are not supported by all
-     * spec compliant decoders. Decoders make no difference between normal,
-     * inofficial and experimental, that is they always try to decode things
-     * when they can unless they are explicitly asked to behave stupid
-     * (=strictly conform to the specs)
-     *)
-    strict_std_compliance: cint;
-
-    (**
-     * qscale offset between IP and B-frames
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    b_quant_offset: cfloat;
-
-    (**
-     * Error resilience; higher values will detect more errors but may
-     * misdetect some more or less valid parts as errors.
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    error_resilience: cint;
-
-    (**
-     * Called at the beginning of each frame to get a buffer for it.
-     * If pic.reference is set then the frame will be read later by libavcodec.
-     * avcodec_align_dimensions() should be used to find the required width and
-     * height, as they normally need to be rounded up to the next multiple of 16.
-     * - encoding: unused
-     * - decoding: Set by libavcodec., user can override.
-     *)
-    get_buffer: function (c: PAVCodecContext; pic: PAVFrame): cint; cdecl;
-
-    (**
-     * Called to release buffers which were allocated with get_buffer.
-     * A released buffer can be reused in get_buffer().
-     * pic.data[*] must be set to NULL.
-     * - encoding: unused
-     * - decoding: Set by libavcodec., user can override.
-     *)
-    release_buffer: procedure (c: PAVCodecContext; pic: PAVFrame); cdecl;
-
-    (**
-     * If 1 the stream has a 1 frame delay during decoding.
-     * - encoding: Set by libavcodec.
-     * - decoding: Set by libavcodec.
-     *)
-    has_b_frames: cint;
-
-    (**
-     * number of bytes per packet if constant and known or 0
-     * Used by some WAV based audio codecs.
-     *)
-    block_align: cint;
-
-    parse_only: cint; (* - decoding only: if true, only parsing is done
-                       (function avcodec_parse_frame()). The frame
-                       data is returned. Only MPEG codecs support this now. *)
-
-    (**
-     * 0-> h263 quant 1-> mpeg quant
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    mpeg_quant: cint;
-
-    (**
-     * pass1 encoding statistics output buffer
-     * - encoding: Set by libavcodec.
-     * - decoding: unused
-     *)
-    stats_out: pchar;
-
-    (**
-     * pass2 encoding statistics input buffer
-     * Concatenated stuff from stats_out of pass1 should be placed here.
-     * - encoding: Allocated/set/freed by user.
-     * - decoding: unused
-     *)
-    stats_in: pchar;
-
-    (**
-     * ratecontrol qmin qmax limiting method
-     * 0-> clipping, 1-> use a nice continous function to limit qscale wthin qmin/qmax.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rc_qsquish: cfloat;
-
-    rc_qmod_amp: cfloat;
-    rc_qmod_freq: cint;
-
-    (**
-     * ratecontrol override, see RcOverride
-     * - encoding: Allocated/set/freed by user.
-     * - decoding: unused
-     *)
-    rc_override: PRcOverride;
-    rc_override_count: cint;
-
-    (**
-     * rate control equation
-     * - encoding: Set by user
-     * - decoding: unused
-     *)
-    rc_eq: {const} pchar; 
-
-    (**
-     * maximum bitrate
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rc_max_rate: cint;
-
-    (**
-     * minimum bitrate
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rc_min_rate: cint;
-
-    (**
-     * decoder bitstream buffer size
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rc_buffer_size: cint;
-    rc_buffer_aggressivity: cfloat;
-
-    (**
-     * qscale factor between P and I-frames
-     * If > 0 then the last p frame quantizer will be used (q= lastp_q*factor+offset).
-     * If < 0 then normal ratecontrol will be done (q= -normal_q*factor+offset).
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    i_quant_factor: cfloat;
-
-    (**
-     * qscale offset between P and I-frames
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    i_quant_offset: cfloat;
-
-    (**
-     * initial complexity for pass1 ratecontrol
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rc_initial_cplx: cfloat;
-
-    (**
-     * DCT algorithm, see FF_DCT_* below
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    dct_algo: cint;
-
-    (**
-     * luminance masking (0-> disabled)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    lumi_masking: cfloat;
-
-    (**
-     * temporary complexity masking (0-> disabled)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    temporal_cplx_masking: cfloat;
-
-    (**
-     * spatial complexity masking (0-> disabled)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    spatial_cplx_masking: cfloat;
-
-    (**
-     * p block masking (0-> disabled)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    p_masking: cfloat;
-
-    (**
-     * darkness masking (0-> disabled)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    dark_masking: cfloat;
-
-    {$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-    (* for binary compatibility *)
-    unused: cint;
-    {$IFEND}
-
-    (**
-     * IDCT algorithm, see FF_IDCT_* below.
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    idct_algo: cint;
-
-    (**
-     * slice count
-     * - encoding: Set by libavcodec.
-     * - decoding: Set by user (or 0).
-     *)
-    slice_count: cint;
-
-    (**
-     * slice offsets in the frame in bytes
-     * - encoding: Set/allocated by libavcodec.
-     * - decoding: Set/allocated by user (or NULL).
-     *)
-    slice_offset: PCint;
-
-    (**
-     * error concealment flags
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    error_concealment: cint;
-
-    (**
-     * dsp_mask could be add used to disable unwanted CPU features
-     * CPU features (i.e. MMX, SSE. ...)
-     *
-     * With the FORCE flag you may instead enable given CPU features.
-     * (Dangerous: Usable in case of misdetection, improper usage however will
-     * result into program crash.)
-     *)
-    dsp_mask: cuint;
-
-    (**
-     * bits per sample/pixel from the demuxer (needed for huffyuv).
-     * - encoding: Set by libavcodec.
-     * - decoding: Set by user.
-     *)
-     bits_per_sample: cint;
-
-    (**
-     * prediction method (needed for huffyuv)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-     prediction_method: cint;
-
-    (**
-     * sample aspect ratio (0 if unknown)
-     * Numerator and denominator must be relatively prime and smaller than 256 for some video standards.
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-    sample_aspect_ratio: TAVRational;
-
-    (**
-     * the picture in the bitstream
-     * - encoding: Set by libavcodec.
-     * - decoding: Set by libavcodec.
-     *)
-    coded_frame: PAVFrame;
-
-    (**
-     * debug
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    debug: cint;
-
-    (**
-     * debug
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    debug_mv: cint;
-
-    (**
-     * error
-     * - encoding: Set by libavcodec if flags&CODEC_FLAG_PSNR.
-     * - decoding: unused
-     *)
-    error: array [0..3] of cuint64;
-
-    (**
-     * minimum MB quantizer
-     * - encoding: unused
-     * - decoding: unused
-     *)
-    mb_qmin: cint;
-
-    (**
-     * maximum MB quantizer
-     * - encoding: unused
-     * - decoding: unused
-     *)
-    mb_qmax: cint;
-
-    (**
-     * motion estimation comparison function
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    me_cmp: cint;
-
-    (**
-     * subpixel motion estimation comparison function
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    me_sub_cmp: cint;
-    (**
-     * macroblock comparison function (not supported yet)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    mb_cmp: cint;
-    (**
-     * interlaced DCT comparison function
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    ildct_cmp: cint;
-
-    (**
-     * ME diamond size & shape
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    dia_size: cint;
-
-    (**
-     * amount of previous MV predictors (2a+1 x 2a+1 square)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    last_predictor_count: cint;
-
-    (**
-     * prepass for motion estimation
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    pre_me: cint;
-
-    (**
-     * motion estimation prepass comparison function
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    me_pre_cmp: cint;
-
-    (**
-     * ME prepass diamond size & shape
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    pre_dia_size: cint;
-
-    (**
-     * subpel ME quality
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    me_subpel_quality: cint;
-
-    (**
-     * callback to negotiate the pixelFormat
-     * @param fmt is the list of formats which are supported by the codec,
-     * it is terminated by -1 as 0 is a valid format, the formats are ordered by quality.
-     * The first is always the native one.
-     * @return the chosen format
-     * - encoding: unused
-     * - decoding: Set by user, if not set the native format will be chosen.
-     *)
-    get_format: function (s: PAVCodecContext; fmt: {const} PAVPixelFormat): TAVPixelFormat; cdecl;
-
-    (**
-     * DTG active format information (additional aspect ratio
-     * information only used in DVB MPEG-2 transport streams)
-     * 0 if not set.
-     *
-     * - encoding: unused
-     * - decoding: Set by decoder.
-     *)
-    dtg_active_format: cint;
-
-    (**
-     * maximum motion estimation search range in subpel units
-     * If 0 then no limit.
-     *
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    me_range: cint;
-
-    (**
-     * intra quantizer bias
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    intra_quant_bias: cint;
-
-    (**
-     * inter quantizer bias
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    inter_quant_bias: cint;
-
-    (**
-     * color table ID
-     * - encoding: unused
-     * - decoding: Which clrtable should be used for 8bit RGB images.
-     *             Tables have to be stored somewhere. FIXME
-     *)
-    color_table_id: cint;
-
-    (**
-     * internal_buffer count
-     * Don't touch, used by libavcodec default_get_buffer().
-     *)
-    internal_buffer_count: cint;
-
-    (**
-     * internal_buffers
-     * Don't touch, used by libavcodec default_get_buffer().
-     *)
-    internal_buffer: pointer;
-
-    (**
-     * Global quality for codecs which cannot change it per frame.
-     * This should be proportional to MPEG-1/2/4 qscale.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    global_quality: cint;
-
-    (**
-     * coder type
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    coder_type: cint;
-
-    (**
-     * context model
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    context_model: cint;
-
-    {
-    (**
-     *
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    realloc: function (s: PAVCodecContext; buf: Pbyte; buf_size: cint): Pbyte; cdecl;
-    }
-
-    (**
-     * slice flags
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    slice_flags: cint;
-
-    (**
-     * XVideo Motion Acceleration
-     * - encoding: forbidden
-     * - decoding: set by decoder
-     *)
-    xvmc_acceleration: cint;
-
-    (**
-     * macroblock decision mode
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    mb_decision: cint;
-
-    (**
-     * custom intra quantization matrix
-     * - encoding: Set by user, can be NULL.
-     * - decoding: Set by libavcodec.
-     *)
-    intra_matrix: PWord;
-
-    (**
-     * custom inter quantization matrix
-     * - encoding: Set by user, can be NULL.
-     * - decoding: Set by libavcodec.
-     *)
-    inter_matrix: PWord;
-
-    (**
-     * fourcc from the AVI stream header (LSB first, so "ABCD" -> ('D'<<24) + ('C'<<16) + ('B'<<8) + 'A').
-     * This is used to work around some encoder bugs.
-     * - encoding: unused
-     * - decoding: Set by user, will be converted to uppercase by libavcodec during init.
-     *)
-    stream_codec_tag: array [0..3] of char; //cuint;
-
-    (**
-     * scene change detection threshold
-     * 0 is default, larger means fewer detected scene changes.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    scenechange_threshold: cint;
-
-    (**
-     * minimum Lagrange multipler
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    lmin: cint;
-
-    (**
-     * maximum Lagrange multipler
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    lmax: cint;
-
-    (**
-     * palette control structure
-     * - encoding: ??? (no palette-enabled encoder yet)
-     * - decoding: Set by user.
-     *)
-    palctrl: PAVPaletteControl;
-
-    (**
-     * noise reduction strength
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    noise_reduction: cint;
-
-    (**
-     * Called at the beginning of a frame to get cr buffer for it.
-     * Buffer type (size, hints) must be the same. libavcodec won't check it.
-     * libavcodec will pass previous buffer in pic, function should return
-     * same buffer or new buffer with old frame "painted" into it.
-     * If pic.data[0] == NULL must behave like get_buffer().
-     * - encoding: unused
-     * - decoding: Set by libavcodec., user can override
-     *)
-    reget_buffer: function (c: PAVCodecContext; pic: PAVFrame): cint; cdecl;
-
-    (**
-     * Number of bits which should be loaded into the rc buffer before decoding starts.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    rc_initial_buffer_occupancy: cint;
-
-    (**
-     *
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    inter_threshold: cint;
-
-    (**
-     * CODEC_FLAG2_*
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    flags2: cint;
-
-    (**
-     * Simulates errors in the bitstream to test error concealment.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    error_rate: cint;
-
-    (**
-     * MP3 antialias algorithm, see FF_AA_* below.
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    antialias_algo: cint;
-
-    (**
-     * quantizer noise shaping
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    quantizer_noise_shaping: cint;
-
-    (**
-     * thread count
-     * is used to decide how many independent tasks should be passed to execute()
-     * - encoding: Set by user.
-     * - decoding: Set by user.
-     *)
-    thread_count: cint;
-
-    (**
-     * The codec may call this to execute several independent things.
-     * It will return only after finishing all tasks.
-     * The user may replace this with some multithreaded implementation,
-     * the default implementation will execute the parts serially.
-     * @param count the number of things to execute
-     * - encoding: Set by libavcodec, user can override.
-     * - decoding: Set by libavcodec, user can override.
-     *)
-    execute: function (c: PAVCodecContext; func: TExecuteFunc; arg: PPointer; ret: PCint; count: cint): cint; cdecl;
-
-    (**
-     * thread opaque
-     * Can be used by execute() to store some per AVCodecContext stuff.
-     * - encoding: set by execute()
-     * - decoding: set by execute()
-     *)
-    thread_opaque: pointer;
-
-    (**
-     * Motion estimation threshold below which no motion estimation is
-     * performed, but instead the user specified motion vectors are used.
-     *
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-     me_threshold: cint;
-
-    (**
-     * Macroblock threshold below which the user specified macroblock types will be used.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-     mb_threshold: cint;
-
-    (**
-     * precision of the intra DC coefficient - 8
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-     intra_dc_precision: cint;
-
-    (**
-     * noise vs. sse weight for the nsse comparsion function
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-     nsse_weight: cint;
-
-    (**
-     * Number of macroblock rows at the top which are skipped.
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-     skip_top: cint;
-
-    (**
-     * Number of macroblock rows at the bottom which are skipped.
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-     skip_bottom: cint;
-
-    (**
-     * profile
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-     profile: cint;
-
-    (**
-     * level
-     * - encoding: Set by user.
-     * - decoding: Set by libavcodec.
-     *)
-     level: cint;
-
-    (**
-     * low resolution decoding, 1-> 1/2 size, 2->1/4 size
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-     lowres: cint;
-
-    (**
-     * Bitstream width / height, may be different from width/height if lowres
-     * or other things are used.
-     * - encoding: unused
-     * - decoding: Set by user before init if known. Codec should override / dynamically change if needed.
-     *)
-    coded_width, coded_height: cint;
-
-    (**
-     * frame skip threshold
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    frame_skip_threshold: cint;
-
-    (**
-     * frame skip factor
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    frame_skip_factor: cint;
-
-    (**
-     * frame skip exponent
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    frame_skip_exp: cint;
-
-    (**
-     * frame skip comparison function
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    frame_skip_cmp: cint;
-
-    (**
-     * Border processing masking, raises the quantizer for mbs on the borders
-     * of the picture.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    border_masking: cfloat;
-
-    (**
-     * minimum MB lagrange multipler
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    mb_lmin: cint;
-
-    (**
-     * maximum MB lagrange multipler
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    mb_lmax: cint;
-
-    (**
-     *
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    me_penalty_compensation: cint;
-
-    (**
-     *
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    skip_loop_filter: TAVDiscard;
-
-    (**
-     *
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    skip_idct: TAVDiscard;
-
-    (**
-     *
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    skip_frame: TAVDiscard;
-
-    (**
-     *
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    bidir_refine: cint;
-
-    (**
-     *
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    brd_scale: cint;
-
-    (**
-     * constant rate factor - quality-based VBR - values ~correspond to qps
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    {$IF LIBAVCODEC_VERSION >= 51021000} // 51.21.0
-    crf: cfloat;
-    {$ELSE}
-    crf: cint;
-    {$IFEND}
-
-    (**
-     * constant quantization parameter rate control method
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    cqp: cint;
-
-    (**
-     * minimum GOP size
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    keyint_min: cint;
-
-    (**
-     * number of reference frames
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    refs: cint;
-
-    (**
-     * chroma qp offset from luma
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    chromaoffset: cint;
-
-    (**
-     * Influences how often B-frames are used.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    bframebias: cint;
-
-    (**
-     * trellis RD quantization
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    trellis: cint;
-
-    (**
-     * Reduce fluctuations in qp (before curve compression).
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    complexityblur: cfloat;
-
-    (**
-     * in-loop deblocking filter alphac0 parameter
-     * alpha is in the range -6...6
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    deblockalpha: cint;
-
-    (**
-     * in-loop deblocking filter beta parameter
-     * beta is in the range -6...6
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    deblockbeta: cint;
-
-    (**
-     * macroblock subpartition sizes to consider - p8x8, p4x4, b8x8, i8x8, i4x4
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    partitions: cint;
-
-    (**
-     * direct MV prediction mode - 0 (none), 1 (spatial), 2 (temporal)
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    directpred: cint;
-
-    (**
-     * Audio cutoff bandwidth (0 means "automatic")
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    cutoff: cint;
-
-    (**
-     * Multiplied by qscale for each frame and added to scene_change_score.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    scenechange_factor: cint;
-
-    (**
-     *
-     * Note: Value depends upon the compare function used for fullpel ME.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    mv0_threshold: cint;
-
-    (**
-     * Adjusts sensitivity of b_frame_strategy 1.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    b_sensitivity: cint;
-
-    (**
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    compression_level: cint;
-
-    (**
-     * Sets whether to use LPC mode - used by FLAC encoder.
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    use_lpc: cint;
-
-    (**
-     * LPC coefficient precision - used by FLAC encoder
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    lpc_coeff_precision: cint;
-
-    (**
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    min_prediction_order: cint;
-
-    (**
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    max_prediction_order: cint;
-
-    (**
-     * search method for selecting prediction order
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    prediction_order_method: cint;
-
-    (**
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    min_partition_order: cint;
-
-    (**
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    max_partition_order: cint;
-
-    {$IF LIBAVCODEC_VERSION >= 51026000} // 51.26.0
-    (**
-     * GOP timecode frame start number, in non drop frame format
-     * - encoding: Set by user.
-     * - decoding: unused
-     *)
-    timecode_frame_start: cint64;
-    {$IFEND}
-
-    {$IF LIBAVCODEC_VERSION >= 51042000} // 51.42.0
-    (**
-     * Decoder should decode to this many channels if it can (0 for default)
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    request_channels: cint;
-    {$IFEND}
-
-    {$IF LIBAVCODEC_VERSION > 51049000} // > 51.49.0
-    (**
-     * Percentage of dynamic range compression to be applied by the decoder.
-     * The default value is 1.0, corresponding to full compression.
-     * - encoding: unused
-     * - decoding: Set by user.
-     *)
-    drc_scale: cfloat;
-    {$IFEND}
-  end;
-
-(**
- * AVCodec.
- *)
-  TAVCodec = record
-    name: pchar;
-    type_: TCodecType;
-    id: TCodecID;
-    priv_data_size: cint;
-    init: function (avctx: PAVCodecContext): cint; cdecl; (* typo corretion by the Creative CAT *)
-    encode: function (avctx: PAVCodecContext; buf: pchar; buf_size: cint; data: pointer): cint; cdecl;
-    close: function (avctx: PAVCodecContext): cint; cdecl;
-    decode: function (avctx: PAVCodecContext; outdata: pointer; var outdata_size: cint;
-                      buf: {const} pchar; buf_size: cint): cint; cdecl;
-    (**
-     * Codec capabilities.
-     * see CODEC_CAP_*
-     *)
-    capabilities: cint;
-    next: PAVCodec;
-    (**
-     * Flush buffers.
-     * Will be called when seeking
-     *)
-    flush: procedure (avctx: PAVCodecContext); cdecl;
-    supported_framerates: {const} PAVRational; ///< array of supported framerates, or NULL if any, array is terminated by {0,0}
-    pix_fmts: {const} PAVPixelFormat;       ///< array of supported pixel formats, or NULL if unknown, array is terminated by -1
-    {$IF LIBAVCODEC_VERSION >= 51055000} // 51.55.0
-    (**
-     * Descriptive name for the codec, meant to be more human readable than \p name.
-     * You \e should use the NULL_IF_CONFIG_SMALL() macro to define it.
-     *)
-    long_name: {const} PChar;
-    {$IFEND}
-    {$IF LIBAVCODEC_VERSION >= 51056000} // 51.56.0
-    supported_samplerates: {const} PCint;       ///< array of supported audio samplerates, or NULL if unknown, array is terminated by 0
-    {$IFEND}
-    {$IF LIBAVCODEC_VERSION >= 51062000} // 51.62.0
-    sample_fmts: {const} PSampleFormatArray;   ///< array of supported sample formats, or NULL if unknown, array is terminated by -1
-    {$IFEND}
-  end;
-
-(**
- * four components are given, that's all.
- * the last component is alpha
- *)
-  PAVPicture = ^TAVPicture;
-  TAVPicture = record
-    data: array [0..3] of pchar;
-    linesize: array [0..3] of cint;       ///< number of bytes per line
-  end;
-
-type
-  PAVSubtitleRect = ^TAVSubtitleRect;
-  TAVSubtitleRect = record
-    x: word;
-    y: word;
-    w: word;
-    h: word;
-    nb_colors: word;
-    linesize: cint;
-    rgba_palette: PCuint;
-    bitmap: pchar;
-  end;
-
-  PAVSubtitle = ^TAVSubtitle;
-  TAVSubtitle = record {20}
-    format: word; (* 0 = graphics *)
-    start_display_time: cuint; (* relative to packet pts, in ms *)
-    end_display_time: cuint; (* relative to packet pts, in ms *)
-    num_rects: cuint;
-    rects: PAVSubtitleRect;
-  end;
-
-
-(* resample.c *)
-
-  PReSampleContext = pointer;
-  PAVResampleContext = pointer;
-  PImgReSampleContext = pointer;
-
-function audio_resample_init (output_channels: cint; input_channels: cint;
-                              output_rate: cint; input_rate: cint): PReSampleContext;
-  cdecl; external av__codec;
-
-function audio_resample (s: PReSampleContext; output: PSmallint; input: PSmallint; nb_samples: cint): cint;
-  cdecl; external av__codec;
-
-procedure audio_resample_close (s: PReSampleContext);
-  cdecl; external av__codec;
-
-
-function av_resample_init (out_rate: cint; in_rate: cint; filter_length: cint;
-                           log2_phase_count: cint; linear: cint; cutoff: cdouble): PAVResampleContext;
-  cdecl; external av__codec;
-
-function av_resample (c: PAVResampleContext; dst: PSmallint; src: PSmallint; var consumed: cint;
-                      src_size: cint; dst_size: cint; update_ctx: cint): cint;
-  cdecl; external av__codec;
-
-procedure av_resample_compensate (c: PAVResampleContext; sample_delta: cint;
-                                  compensation_distance: cint);
-  cdecl; external av__codec;
-
-procedure av_resample_close (c: PAVResampleContext);
-  cdecl; external av__codec;
-
-
-{$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-(* YUV420 format is assumed ! *)
-
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-function img_resample_init (output_width: cint; output_height: cint;
-                           input_width: cint; input_height: cint): PImgReSampleContext;
-  cdecl; external av__codec; deprecated;
-
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-function img_resample_full_init (owidth: cint; oheight: cint;
-                                    iwidth: cint; iheight: cint;
-                                    topBand: cint; bottomBand: cint;
-                                    leftBand: cint; rightBand: cint;
-                                    padtop: cint; padbottom: cint;
-                                    padleft: cint; padright: cint): PImgReSampleContext;
-  cdecl; external av__codec; deprecated;
-
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-procedure img_resample (s: PImgReSampleContext; output: PAVPicture; input: {const} PAVPicture);
-  cdecl; external av__codec; deprecated;
-
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-procedure img_resample_close (s: PImgReSampleContext);
-  cdecl; external av__codec; deprecated;
-
-{$IFEND}
-
-(**
- * Allocate memory for a picture.  Call avpicture_free to free it.
- *
- * @param picture the picture to be filled in.
- * @param pix_fmt the format of the picture.
- * @param width the width of the picture.
- * @param height the height of the picture.
- * @return Zero if successful, a negative value if not.
- *)
-function avpicture_alloc (picture: PAVPicture; pix_fmt: TAVPixelFormat;
-                          width: cint; height: cint): cint;
-  cdecl; external av__codec;
-
-(**
- * Free a picture previously allocated by avpicture_alloc().
- *
- * @param picture the AVPicture to be freed
- *)
-procedure avpicture_free (picture: PAVPicture);
-  cdecl; external av__codec;
-
-(**
- * Fill in the AVPicture fields.
- * The fields of the given AVPicture are filled in by using the 'ptr' address
- * which points to the image data buffer. Depending on the specified picture
- * format, one or multiple image data pointers and line sizes will be set.
- * If a planar format is specified, several pointers will be set pointing to
- * the different picture planes and the line sizes of the different planes
- * will be stored in the lines_sizes array.
- *
- * @param picture AVPicture whose fields are to be filled in
- * @param ptr Buffer which will contain or contains the actual image data
- * @param pix_fmt The format in which the picture data is stored.
- * @param width the width of the image in pixels
- * @param height the height of the image in pixels
- * @return size of the image data in bytes
- *)
-function avpicture_fill (picture: PAVPicture; ptr: pointer;
-                 pix_fmt: TAVPixelFormat; width: cint; height: cint): cint;
-  cdecl; external av__codec;
-
-function avpicture_layout (src: {const} PAVPicture; pix_fmt: TAVPixelFormat;
-                   width: cint; height: cint;
-                   dest: pchar; dest_size: cint): cint;
-  cdecl; external av__codec;
-
-(**
- * Calculate the size in bytes that a picture of the given width and height
- * would occupy if stored in the given picture format.
- *
- * @param pix_fmt the given picture format
- * @param width the width of the image
- * @param height the height of the image
- * @return Image data size in bytes
- *)
-function avpicture_get_size (pix_fmt: TAVPixelFormat; width: cint; height: cint): cint;
-  cdecl; external av__codec;
-
-procedure avcodec_get_chroma_sub_sample (pix_fmt: TAVPixelFormat; var h_shift: cint; var v_shift: cint);
-  cdecl; external av__codec;
-
-function avcodec_get_pix_fmt_name(pix_fmt: TAVPixelFormat): pchar;
-  cdecl; external av__codec;
-
-procedure avcodec_set_dimensions(s: PAVCodecContext; width: cint; height: cint);
-  cdecl; external av__codec;
-
-function avcodec_get_pix_fmt(name: {const} pchar): TAVPixelFormat;
-  cdecl; external av__codec;
-
-function avcodec_pix_fmt_to_codec_tag(p: TAVPixelFormat): cuint;
-  cdecl; external av__codec;
-
-const
-  FF_LOSS_RESOLUTION  = $0001; {**< loss due to resolution change *}
-  FF_LOSS_DEPTH       = $0002; {**< loss due to color depth change *}
-  FF_LOSS_COLORSPACE  = $0004; {**< loss due to color space conversion *}
-  FF_LOSS_ALPHA       = $0008; {**< loss of alpha bits *}
-  FF_LOSS_COLORQUANT  = $0010; {**< loss due to color quantization *}
-  FF_LOSS_CHROMA      = $0020; {**< loss of chroma (e.g. RGB to gray conversion) *}
-
-(**
- * Computes what kind of losses will occur when converting from one specific
- * pixel format to another.
- * When converting from one pixel format to another, information loss may occur.
- * For example, when converting from RGB24 to GRAY, the color information will
- * be lost. Similarly, other losses occur when converting from some formats to
- * other formats. These losses can involve loss of chroma, but also loss of
- * resolution, loss of color depth, loss due to the color space conversion, loss
- * of the alpha bits or loss due to color quantization.
- * avcodec_get_fix_fmt_loss() informs you about the various types of losses
- * which will occur when converting from one pixel format to another.
- *
- * @param[in] dst_pix_fmt destination pixel format
- * @param[in] src_pix_fmt source pixel format
- * @param[in] has_alpha Whether the source pixel format alpha channel is used.
- * @return Combination of flags informing you what kind of losses will occur.
- *)
-function avcodec_get_pix_fmt_loss (dst_pix_fmt: TAVPixelFormat; src_pix_fmt: TAVPixelFormat;
-                           has_alpha: cint): cint;
-  cdecl; external av__codec;
-
-(**
- * Finds the best pixel format to convert to given a certain source pixel
- * format.  When converting from one pixel format to another, information loss
- * may occur.  For example, when converting from RGB24 to GRAY, the color
- * information will be lost. Similarly, other losses occur when converting from
- * some formats to other formats. avcodec_find_best_pix_fmt() searches which of
- * the given pixel formats should be used to suffer the least amount of loss.
- * The pixel formats from which it chooses one, are determined by the
- * \p pix_fmt_mask parameter.
- *
- * @code
- * src_pix_fmt = PIX_FMT_YUV420P;
- * pix_fmt_mask = (1 << PIX_FMT_YUV422P) || (1 << PIX_FMT_RGB24);
- * dst_pix_fmt = avcodec_find_best_pix_fmt(pix_fmt_mask, src_pix_fmt, alpha, &loss);
- * @endcode
- *
- * @param[in] pix_fmt_mask bitmask determining which pixel format to choose from
- * @param[in] src_pix_fmt source pixel format
- * @param[in] has_alpha Whether the source pixel format alpha channel is used.
- * @param[out] loss_ptr Combination of flags informing you what kind of losses will occur.
- * @return The best pixel format to convert to or -1 if none was found.
- *)
-function avcodec_find_best_pix_fmt (pix_fmt_mask: cint; src_pix_fmt: TAVPixelFormat;
-                            has_alpha: cint; loss_ptr: PCint): cint;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51041000} // 51.41.0
-(**
- * Print in buf the string corresponding to the pixel format with
- * number pix_fmt, or an header if pix_fmt is negative.
- *
- * @param[in] buf the buffer where to write the string
- * @param[in] buf_size the size of buf
- * @param[in] pix_fmt the number of the pixel format to print the corresponding info string, or
- * a negative value to print the corresponding header.
- * Meaningful values for obtaining a pixel format info vary from 0 to PIX_FMT_NB -1.
- *)
-procedure avcodec_pix_fmt_string (buf: PChar; buf_size: cint; pix_fmt: cint);
-  cdecl; external av__codec;
-{$IFEND}
-
-const
-  FF_ALPHA_TRANSP      = $0001; {* image has some totally transparent pixels *}
-  FF_ALPHA_SEMI_TRANSP = $0002; {* image has some transparent pixels *}
-
-(**
- * Tell if an image really has transparent alpha values.
- * @return ored mask of FF_ALPHA_xxx constants
- *)
-function img_get_alpha_info (src: {const} PAVPicture;
-                             pix_fmt: TAVPixelFormat;
-                             width: cint; height: cint): cint;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-(**
- * convert among pixel formats
- * @deprecated Use the software scaler (swscale) instead.
- *)
-function img_convert (dst: PAVPicture; dst_pix_fmt: TAVPixelFormat;
-              src: {const} PAVPicture; pix_fmt: TAVPixelFormat;
-              width: cint; height: cint): cint;
-  cdecl; external av__codec; deprecated;
-{$IFEND}
-
-(* deinterlace a picture *)
-(* deinterlace - if not supported return -1 *)
-function avpicture_deinterlace (dst: PAVPicture; src: {const} PAVPicture;
-                        pix_fmt: TAVPixelFormat; width: cint; height: cint): cint;
-  cdecl; external av__codec;
-
-{* external high level API *}
-
-{$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-{
-var
-  first_avcodec: PAVCodec; external av__codec;
-}
-{$IFEND}
-
-{$IF LIBAVCODEC_VERSION >= 51049000} // 51.49.0
-function av_codec_next(c: PAVCodec): PAVCodec;
-  cdecl; external av__codec;
-{$IFEND}
-
-(**
- * Returns the LIBAVCODEC_VERSION_INT constant.
- *)
-function avcodec_version(): cuint;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION < 52008000} // 52.8.0
-(* returns LIBAVCODEC_BUILD constant *)
-function avcodec_build(): cuint;
-  cdecl; external av__codec; deprecated;
-{$IFEND}
-
-(**
- * Initializes libavcodec.
- *
- * @warning This function \e must be called before any other libavcodec
- * function.
- *)
-procedure avcodec_init();
-  cdecl; external av__codec;
-
-procedure register_avcodec(format: PAVCodec);
-  cdecl; external av__codec;
-
-(**
- * Finds a registered encoder with a matching codec ID.
- *
- * @param id CodecID of the requested encoder
- * @return An encoder if one was found, NULL otherwise.
- *)
-function avcodec_find_encoder(id: TCodecID): PAVCodec;
-  cdecl; external av__codec;
-
-(**
- * Finds a registered encoder with the specified name.
- *
- * @param name name of the requested encoder
- * @return An encoder if one was found, NULL otherwise.
- *)
-function avcodec_find_encoder_by_name(name: pchar): PAVCodec;
-  cdecl; external av__codec;
-
-(**
- * Finds a registered decoder with a matching codec ID.
- *
- * @param id CodecID of the requested decoder
- * @return A decoder if one was found, NULL otherwise.
- *)
-function avcodec_find_decoder(id: TCodecID): PAVCodec;
-  cdecl; external av__codec;
-
-(**
- * Finds a registered decoder with the specified name.
- *
- * @param name name of the requested decoder
- * @return A decoder if one was found, NULL otherwise.
- *)
-function avcodec_find_decoder_by_name(name: pchar): PAVCodec;
-  cdecl; external av__codec;
-procedure avcodec_string(buf: pchar; buf_size: cint; enc: PAVCodecContext; encode: cint);
-  cdecl; external av__codec;
-
-(**
- * Sets the fields of the given AVCodecContext to default values.
- *
- * @param s The AVCodecContext of which the fields should be set to default values.
- *)
-procedure avcodec_get_context_defaults(s: PAVCodecContext);
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51039000} // 51.39.0
-(** THIS FUNCTION IS NOT YET PART OF THE PUBLIC API!
- *  we WILL change its arguments and name a few times! *)
-procedure avcodec_get_context_defaults2(s: PAVCodecContext; ctype: TCodecType);
-  cdecl; external av__codec;
-{$IFEND}
-
-(**
- * Allocates an AVCodecContext and sets its fields to default values.  The
- * resulting struct can be deallocated by simply calling av_free().
- *
- * @return An AVCodecContext filled with default values or NULL on failure.
- * @see avcodec_get_context_defaults
- *)
-function avcodec_alloc_context(): PAVCodecContext;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51039000} // 51.39.0
-(** THIS FUNCTION IS NOT YET PART OF THE PUBLIC API!
- *  we WILL change its arguments and name a few times! *)
-function avcodec_alloc_context2(ctype: TCodecType): PAVCodecContext;
-  cdecl; external av__codec;
-{$IFEND}
-
-(**
- * Sets the fields of the given AVFrame to default values.
- *
- * @param pic The AVFrame of which the fields should be set to default values.
- *)
-procedure avcodec_get_frame_defaults (pic: PAVFrame);
-  cdecl; external av__codec;
-
-(**
- * Allocates an AVFrame and sets its fields to default values.  The resulting
- * struct can be deallocated by simply calling av_free().
- *
- * @return An AVFrame filled with default values or NULL on failure.
- * @see avcodec_get_frame_defaults
- *)
-function avcodec_alloc_frame(): PAVFrame;
-  cdecl; external av__codec;
-
-function avcodec_default_get_buffer (s: PAVCodecContext; pic: PAVFrame): cint;
-  cdecl; external av__codec;
-procedure avcodec_default_release_buffer (s: PAVCodecContext; pic: PAVFrame);
-  cdecl; external av__codec;
-function avcodec_default_reget_buffer (s: PAVCodecContext; pic: PAVFrame): cint;
-  cdecl; external av__codec;
-procedure avcodec_align_dimensions(s: PAVCodecContext; width: PCint; height: PCint);
-  cdecl; external av__codec;
-
-(**
- * Checks if the given dimension of a picture is valid, meaning that all
- * bytes of the picture can be addressed with a signed int.
- *
- * @param[in] w Width of the picture.
- * @param[in] h Height of the picture.
- * @return Zero if valid, a negative value if invalid.
- *)
-function avcodec_check_dimensions (av_log_ctx: pointer; w: cuint; h: cuint): cint;
-  cdecl; external av__codec;
-function avcodec_default_get_format(s: PAVCodecContext; fmt: {const} PAVPixelFormat): TAVPixelFormat;
-  cdecl; external av__codec;
-
-function avcodec_thread_init (s: PAVCodecContext; thread_count: cint): cint;
-  cdecl; external av__codec;
-procedure avcodec_thread_free (s: PAVCodecContext);
-  cdecl; external av__codec;
-function avcodec_thread_execute (s: PAVCodecContext; func: TExecuteFunc; arg: PPointer; var ret: cint; count: cint): cint;
-  cdecl; external av__codec;
-function avcodec_default_execute (s: PAVCodecContext; func: TExecuteFunc; arg: PPointer; var ret: cint; count: cint): cint;
-  cdecl; external av__codec;
-//FIXME func typedef
-
-(**
- * Initializes the AVCodecContext to use the given AVCodec. Prior to using this
- * function the context has to be allocated.
- *
- * The functions avcodec_find_decoder_by_name(), avcodec_find_encoder_by_name(),
- * avcodec_find_decoder() and avcodec_find_encoder() provide an easy way for
- * retrieving a codec.
- *
- * @warning This function is not thread safe!
- *
- * @code
- * avcodec_register_all();
- * codec = avcodec_find_decoder(CODEC_ID_H264);
- * if (!codec)
- *     exit(1);
- *
- * context = avcodec_alloc_context();
- *
- * if (avcodec_open(context, codec) < 0)
- *     exit(1);
- * @endcode
- *
- * @param avctx The context which will be set up to use the given codec.
- * @param codec The codec to use within the context.
- * @return zero on success, a negative value on error
- * @see avcodec_alloc_context, avcodec_find_decoder, avcodec_find_encoder
- *)
-function avcodec_open (avctx: PAVCodecContext; codec: PAVCodec): cint;
-  cdecl; external av__codec;
-
-(**
- * @deprecated Use avcodec_decode_audio2() instead.
- *)
-function avcodec_decode_audio (avctx: PAVCodecContext; samples: PSmallint;
-                           var frame_size_ptr: cint;
-                           buf: {const} pchar; buf_size: cint): cint;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51030000} // 51.30.0
-(**
- * Decodes an audio frame from \p buf into \p samples.
- * The avcodec_decode_audio2() function decodes an audio frame from the input
- * buffer \p buf of size \p buf_size. To decode it, it makes use of the
- * audio codec which was coupled with \p avctx using avcodec_open(). The
- * resulting decoded frame is stored in output buffer \p samples.  If no frame
- * could be decompressed, \p frame_size_ptr is zero. Otherwise, it is the
- * decompressed frame size in \e bytes.
- *
- * @warning You \e must set \p frame_size_ptr to the allocated size of the
- * output buffer before calling avcodec_decode_audio2().
- *
- * @warning The input buffer must be \c FF_INPUT_BUFFER_PADDING_SIZE larger than
- * the actual read bytes because some optimized bitstream readers read 32 or 64
- * bits at once and could read over the end.
- *
- * @warning The end of the input buffer \p buf should be set to 0 to ensure that
- * no overreading happens for damaged MPEG streams.
- *
- * @note You might have to align the input buffer \p buf and output buffer \p
- * samples. The alignment requirements depend on the CPU: On some CPUs it isn't
- * necessary at all, on others it won't work at all if not aligned and on others
- * it will work but it will have an impact on performance. In practice, the
- * bitstream should have 4 byte alignment at minimum and all sample data should
- * be 16 byte aligned unless the CPU doesn't need it (AltiVec and SSE do). If
- * the linesize is not a multiple of 16 then there's no sense in aligning the
- * start of the buffer to 16.
- *
- * @param avctx the codec context
- * @param[out] samples the output buffer
- * @param[in,out] frame_size_ptr the output buffer size in bytes
- * @param[in] buf the input buffer
- * @param[in] buf_size the input buffer size in bytes
- * @return On error a negative value is returned, otherwise the number of bytes
- * used or zero if no frame could be decompressed.
- *)
-function avcodec_decode_audio2(avctx : PAVCodecContext; samples : PSmallint;
-               var frame_size_ptr : cint;
-               buf: {const} pchar; buf_size: cint): cint;
-  cdecl; external av__codec;
-{$IFEND}
-
-(**
- * Decodes a video frame from \p buf into \p picture.
- * The avcodec_decode_video() function decodes a video frame from the input
- * buffer \p buf of size \p buf_size. To decode it, it makes use of the
- * video codec which was coupled with \p avctx using avcodec_open(). The
- * resulting decoded frame is stored in \p picture.
- *
- * @warning The input buffer must be \c FF_INPUT_BUFFER_PADDING_SIZE larger than
- * the actual read bytes because some optimized bitstream readers read 32 or 64
- * bits at once and could read over the end.
- *
- * @warning The end of the input buffer \p buf should be set to 0 to ensure that
- * no overreading happens for damaged MPEG streams.
- *
- * @note You might have to align the input buffer \p buf and output buffer \p
- * samples. The alignment requirements depend on the CPU: on some CPUs it isn't
- * necessary at all, on others it won't work at all if not aligned and on others
- * it will work but it will have an impact on performance. In practice, the
- * bitstream should have 4 byte alignment at minimum and all sample data should
- * be 16 byte aligned unless the CPU doesn't need it (AltiVec and SSE do). If
- * the linesize is not a multiple of 16 then there's no sense in aligning the
- * start of the buffer to 16.
- *
- * @param avctx the codec context
- * @param[out] picture The AVFrame in which the decoded video frame will be stored.
- * @param[in] buf the input buffer
- * @param[in] buf_size the size of the input buffer in bytes
- * @param[in,out] got_picture_ptr Zero if no frame could be decompressed, otherwise, it is nonzero.
- * @return On error a negative value is returned, otherwise the number of bytes
- * used or zero if no frame could be decompressed.
- *)
-function avcodec_decode_video (avctx: PAVCodecContext; picture: PAVFrame;
-                       var got_picture_ptr: cint;
-                       buf: {const} PChar; buf_size: cint): cint;
-  cdecl; external av__codec;
-
-(* Decode a subtitle message. Return -1 if error, otherwise return the
- * number of bytes used. If no subtitle could be decompressed,
- * got_sub_ptr is zero. Otherwise, the subtitle is stored in *sub. *)
-function avcodec_decode_subtitle (avctx: PAVCodecContext; sub: PAVSubtitle;
-                          var got_sub_ptr: cint;
-                          buf: {const} pchar; buf_size: cint): cint;
-  cdecl; external av__codec;
-function avcodec_parse_frame (avctx: PAVCodecContext; pdata: PPointer;
-                      data_size_ptr: PCint;
-                      buf: pchar; buf_size: cint): cint;
-  cdecl; external av__codec;
-
-(**
- * Encodes an audio frame from \p samples into \p buf.
- * The avcodec_encode_audio() function encodes an audio frame from the input
- * buffer \p samples. To encode it, it makes use of the audio codec which was
- * coupled with \p avctx using avcodec_open(). The resulting encoded frame is
- * stored in output buffer \p buf.
- *
- * @note The output buffer should be at least \c FF_MIN_BUFFER_SIZE bytes large.
- *
- * @param avctx the codec context
- * @param[out] buf the output buffer
- * @param[in] buf_size the output buffer size
- * @param[in] samples the input buffer containing the samples
- * The number of samples read from this buffer is frame_size*channels,
- * both of which are defined in \p avctx.
- * For PCM audio the number of samples read from \p samples is equal to
- * \p buf_size * input_sample_size / output_sample_size.
- * @return On error a negative value is returned, on success zero or the number
- * of bytes used to encode the data read from the input buffer.
- *)
-function avcodec_encode_audio (avctx: PAVCodecContext; buf: PByte;
-                      buf_size: cint; samples: {const} PSmallint): cint;
-  cdecl; external av__codec;
-
-(**
- * Encodes a video frame from \p pict into \p buf.
- * The avcodec_encode_video() function encodes a video frame from the input
- * \p pict. To encode it, it makes use of the video codec which was coupled with
- * \p avctx using avcodec_open(). The resulting encoded bytes representing the
- * frame are stored in the output buffer \p buf. The input picture should be
- * stored using a specific format, namely \c avctx.pix_fmt.
- *
- * @param avctx the codec context
- * @param[out] buf the output buffer for the bitstream of encoded frame
- * @param[in] buf_size the size of the output buffer in bytes
- * @param[in] pict the input picture to encode
- * @return On error a negative value is returned, on success zero or the number
- * of bytes used from the input buffer.
- *)
-function avcodec_encode_video (avctx: PAVCodecContext; buf: PByte;
-                      buf_size: cint; pict: PAVFrame): cint;
-  cdecl; external av__codec;
-function avcodec_encode_subtitle (avctx: PAVCodecContext; buf: pchar;
-                      buf_size: cint; sub: {const} PAVSubtitle): cint;
-  cdecl; external av__codec;
-
-function avcodec_close (avctx: PAVCodecContext): cint;
-  cdecl; external av__codec;
-
-procedure avcodec_register_all ();
-  cdecl; external av__codec;
-
-(**
- * Flush buffers, should be called when seeking or when switching to a different stream.
- *)
-procedure avcodec_flush_buffers (avctx: PAVCodecContext);
-  cdecl; external av__codec;
-  
-procedure avcodec_default_free_buffers (s: PAVCodecContext);
-  cdecl; external av__codec;
-
-(* misc useful functions *)
-
-(**
- * Returns a single letter to describe the given picture type \p pict_type.
- *
- * @param[in] pict_type the picture type
- * @return A single character representing the picture type.
- *)
-function av_get_pict_type_char (pict_type: cint): char;
-  cdecl; external av__codec;
-
-(**
- * Returns codec bits per sample.
- *
- * @param[in] codec_id the codec
- * @return Number of bits per sample or zero if unknown for the given codec.
- *)
-function av_get_bits_per_sample (codec_id: TCodecID): cint;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51041000} // 51.41.0
-(**
- * Returns sample format bits per sample.
- *
- * @param[in] sample_fmt the sample format
- * @return Number of bits per sample or zero if unknown for the given sample format.
- *)
-function av_get_bits_per_sample_format(sample_fmt: TSampleFormat): cint;
-  cdecl; external av__codec;
-{$IFEND}
-
-const
-  AV_PARSER_PTS_NB      = 4;
-  PARSER_FLAG_COMPLETE_FRAMES = $0001;
-
-type
-  {* frame parsing *}
-  PAVCodecParserContext = ^TAVCodecParserContext;
-  PAVCodecParser = ^TAVCodecParser;
-
-  TAVCodecParserContext = record
-    priv_data: pointer;
-    parser: PAVCodecParser;
-    frame_offset: cint64; (* offset of the current frame *)
-    cur_offset: cint64; (* current offset (incremented by each av_parser_parse()) *)
-    next_frame_offset: cint64; (* offset of the next frame *)
-    (* video info *)
-    pict_type: cint; (* XXX: put it back in AVCodecContext *)
-    repeat_pict: cint; (* XXX: put it back in AVCodecContext *)
-    pts: cint64;     (* pts of the current frame *)
-    dts: cint64;     (* dts of the current frame *)
-
-    (* private data *)
-    last_pts: cint64;
-    last_dts: cint64;
-    fetch_timestamp: cint;
-
-    cur_frame_start_index: cint;
-    cur_frame_offset: array [0..AV_PARSER_PTS_NB - 1] of cint64;
-    cur_frame_pts: array [0..AV_PARSER_PTS_NB - 1] of cint64;
-    cur_frame_dts: array [0..AV_PARSER_PTS_NB - 1] of cint64;
-
-    flags: cint;
-
-    {$IF LIBAVCODEC_VERSION >= 51040003} // 51.40.3
-    offset: cint64;      ///< byte offset from starting packet start
-    {$IFEND}
-    {$IF LIBAVCODEC_VERSION >= 51057001} // 51.57.1
-    cur_frame_end: array [0..AV_PARSER_PTS_NB - 1] of cint64;
-    {$IFEND}
-  end;
-
-  TAVCodecParser = record
-    codec_ids: array [0..4] of cint; (* several codec IDs are permitted *)
-    priv_data_size: cint;
-    parser_init: function (s: PAVCodecParserContext): cint; cdecl;
-    parser_parse: function (s: PAVCodecParserContext; avctx: PAVCodecContext;
-                            poutbuf: {const} PPointer; poutbuf_size: PCint;
-                            buf: {const} pchar; buf_size: cint): cint; cdecl;
-    parser_close: procedure (s: PAVCodecParserContext); cdecl;
-    split: function (avctx: PAVCodecContext; buf: {const} pchar;
-                     buf_size: cint): cint; cdecl;
-    next: PAVCodecParser;
-  end;
-
-
-{$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-{
-var
-  av_first_parser: PAVCodecParser; external av__codec;
-}
-{$IFEND}
-
-{$IF LIBAVCODEC_VERSION >= 51049000} // 51.49.0
-function av_parser_next(c: PAVCodecParser): PAVCodecParser;
-  cdecl; external av__codec;
-{$IFEND}
-
-procedure av_register_codec_parser (parser: PAVCodecParser);
-  cdecl; external av__codec;
-
-function av_parser_init (codec_id: cint): PAVCodecParserContext;
-  cdecl; external av__codec;
-
-function av_parser_parse (s: PAVCodecParserContext;
-                  avctx: PAVCodecContext;
-                  poutbuf: PPointer; poutbuf_size: PCint;
-                  buf: {const} pchar; buf_size: cint;
-                  pts: cint64; dts: cint64): cint;
-  cdecl; external av__codec;
-function av_parser_change (s: PAVCodecParserContext;
-                   avctx: PAVCodecContext;
-                   poutbuf: PPointer; poutbuf_size: PCint;
-                   buf: {const} pchar; buf_size: cint; keyframe: cint): cint;
-  cdecl; external av__codec;
-procedure av_parser_close (s: PAVCodecParserContext);
-  cdecl; external av__codec;
-
-type
-  PAVBitStreamFilterContext = ^TAVBitStreamFilterContext;
-  PAVBitStreamFilter = ^TAVBitStreamFilter;
-
-  TAVBitStreamFilterContext = record
-    priv_data: pointer;
-    filter: PAVBitStreamFilter;
-    parser: PAVCodecParserContext;
-    next: PAVBitStreamFilterContext;
-  end;
-
-  TAVBitStreamFilter = record
-    name: pchar;
-    priv_data_size: cint;
-    filter: function (bsfc: PAVBitStreamFilterContext;
-                  avctx: PAVCodecContext; args: pchar;
-                  poutbuf: PPointer; poutbuf_size: PCint;
-                  buf: PByte; buf_size: cint; keyframe: cint): cint; cdecl;
-    {$IF LIBAVCODEC_VERSION >= 51043000} // 51.43.0
-    close: procedure (bsfc: PAVBitStreamFilterContext);
-    {$IFEND}
-    next: PAVBitStreamFilter;
-  end;
-
-procedure av_register_bitstream_filter (bsf: PAVBitStreamFilter);
-  cdecl; external av__codec;
-
-function av_bitstream_filter_init (name: pchar): PAVBitStreamFilterContext;
-  cdecl; external av__codec;
-
-function av_bitstream_filter_filter (bsfc: PAVBitStreamFilterContext;
-                               avctx: PAVCodecContext; args: pchar;
-                               poutbuf: PPointer; poutbuf_size: PCint;
-                               buf: PByte; buf_size: cint; keyframe: cint): cint;
-  cdecl; external av__codec;
-procedure av_bitstream_filter_close (bsf: PAVBitStreamFilterContext);
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51049000} // 51.49.0
-function av_bitstream_filter_next(f: PAVBitStreamFilter): PAVBitStreamFilter;
-  cdecl; external av__codec;
-{$IFEND}
-
-(* memory *)
-
-(**
- * Reallocates the given block if it is not large enough, otherwise it
- * does nothing.
- *
- * @see av_realloc
- *)
-procedure av_fast_realloc (ptr: pointer; size: PCuint; min_size: cuint);
-  cdecl; external av__codec;
-
-
-{$IF LIBAVCODEC_VERSION < 51057000} // 51.57.0
-(* for static data only *)
-
-(**
- * Frees all static arrays and resets their pointers to 0.
- * Call this function to release all statically allocated tables.
- *
- * @deprecated. Code which uses av_free_static is broken/misdesigned
- * and should correctly use static arrays
- *
- *)
-procedure  av_free_static ();
-  cdecl; external av__codec; deprecated;
-
-(**
- * Allocation of static arrays.
- *
- * @warning Do not use for normal allocation.
- *
- * @param[in] size The amount of memory you need in bytes.
- * @return block of memory of the requested size
- * @deprecated. Code which uses av_mallocz_static is broken/misdesigned
- * and should correctly use static arrays
- *)
-procedure av_mallocz_static(size: cuint);
-  cdecl; external av__codec; deprecated; {av_malloc_attrib av_alloc_size(1)}
-{$IFEND}
-
-{$IF LIBAVCODEC_VERSION < 51035000} // 51.35.0
-procedure av_realloc_static(ptr: pointer; size: cuint);
-  cdecl; external av__codec;
-{$IFEND}
-
-{$IF LIBAVCODEC_VERSION >= 51039000} // 51.39.0
-(**
- * Copy image 'src' to 'dst'.
- *)
-procedure av_picture_copy(dst: PAVPicture; src: {const} PAVPicture;
-              pix_fmt: cint; width: cint; height: cint);
-  cdecl; external av__codec;
-
-(**
- * Crop image top and left side.
- *)
-function av_picture_crop(dst: PAVPicture; src: {const} PAVPicture;
-             pix_fmt: cint; top_band: cint; left_band: cint): cint;
-  cdecl; external av__codec;
-
-(**
- * Pad image.
- *)
-function av_picture_pad(dst: PAVPicture; src: {const} PAVPicture; height: cint; width: cint; pix_fmt: cint;
-            padtop: cint; padbottom: cint; padleft: cint; padright: cint; color: PCint): cint;
-  cdecl; external av__codec;
-{$IFEND}
-
-{$IF LIBAVCODEC_VERSION < 52000000} // 52.0.0
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-procedure img_copy (dst: PAVPicture; src: {const} PAVPicture;
-                    pix_fmt: TAVPixelFormat; width: cint; height: cint);
-  cdecl; external av__codec; deprecated;
-
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-function img_crop (dst: PAVPicture; src: {const} PAVPicture;
-           pix_fmt: TAVPixelFormat; top_band, left_band: cint): cint;
-  cdecl; external av__codec; deprecated;
-
-(**
- * @deprecated Use the software scaler (swscale) instead.
- *)
-function img_pad (dst: PAVPicture; src: {const} PAVPicture; height, width: cint;
-                  pix_fmt: TAVPixelFormat; padtop, padbottom, padleft, padright: cint;
-                  color: PCint): cint;
-  cdecl; external av__codec; deprecated;
-{$IFEND}
-
-function av_xiphlacing(s: PByte; v: cuint): cuint;
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51041000} // 51.41.0
-(**
- * Parses \p str and put in \p width_ptr and \p height_ptr the detected values.
- *
- * @return 0 in case of a successful parsing, a negative value otherwise
- * @param[in] str the string to parse: it has to be a string in the format
- * <width>x<height> or a valid video frame size abbreviation.
- * @param[in,out] width_ptr pointer to the variable which will contain the detected
- * frame width value
- * @param[in,out] height_ptr pointer to the variable which will contain the detected
- * frame height value
- *)
-function av_parse_video_frame_size(width_ptr: PCint; height_ptr: PCint; str: {const} PChar): cint;
-  cdecl; external av__codec;
-
-(**
- * Parses \p str and put in \p frame_rate the detected values.
- *
- * @return 0 in case of a successful parsing, a negative value otherwise
- * @param[in] str the string to parse: it has to be a string in the format
- * <frame_rate_nom>/<frame_rate_den>, a float number or a valid video rate abbreviation
- * @param[in,out] frame_rate pointer to the AVRational which will contain the detected
- * frame rate
- *)
-function av_parse_video_frame_rate(frame_rate: PAVRational; str: {const} PChar): cint;
-  cdecl; external av__codec;
-{$IFEND}
-
-{* error handling *}
-
-const
-{$IFDEF UNIX}
-  ENOENT = ESysENOENT;
-  EIO    = ESysEIO;
-  ENOMEM = ESysENOMEM;
-  EINVAL = ESysEINVAL;
-  EDOM   = ESysEDOM;
-  ENOSYS = ESysENOSYS;
-  EILSEQ = ESysEILSEQ;
-{$ELSE}
-  ENOENT = 2;
-  EIO    = 5;
-  ENOMEM = 12;
-  EINVAL = 22;
-  EDOM   = 33;
-  {$IFDEF MSWINDOWS}
-  // Note: we assume that ffmpeg was compiled with MinGW.
-  // This must be changed if DLLs were compiled with cygwin.
-  ENOSYS = 40;  // MSVC/MINGW: 40, CYGWIN: 88,  LINUX/FPC: 38
-  EILSEQ = 42;  // MSVC/MINGW: 42, CYGWIN: 138, LINUX/FPC: 84
-  {$ENDIF}
-{$ENDIF}
-
-const
-{$IF EINVAL > 0}
-  AVERROR_SIGN = -1;
-{$ELSE}
-  {* Some platforms have E* and errno already negated. *}
-  AVERROR_SIGN =  1;
-{$IFEND}
-
-(*
-#if EINVAL > 0
-#define AVERROR(e) (-(e)) {**< Returns a negative error code from a POSIX error code, to return from library functions. *}
-#define AVUNERROR(e) (-(e)) {**< Returns a POSIX error code from a library function error return value. *}
-#else
-{* Some platforms have E* and errno already negated. *}
-#define AVERROR(e) (e)
-#define AVUNERROR(e) (e)
-#endif
-*)
-
-const
-  AVERROR_UNKNOWN     = AVERROR_SIGN * EINVAL;  (**< unknown error *)
-  AVERROR_IO          = AVERROR_SIGN * EIO;     (**< I/O error *)
-  AVERROR_NUMEXPECTED = AVERROR_SIGN * EDOM;    (**< Number syntax expected in filename. *)
-  AVERROR_INVALIDDATA = AVERROR_SIGN * EINVAL;  (**< invalid data found *)
-  AVERROR_NOMEM       = AVERROR_SIGN * ENOMEM;  (**< not enough memory *)
-  AVERROR_NOFMT       = AVERROR_SIGN * EILSEQ;  (**< unknown format *)
-  AVERROR_NOTSUPP     = AVERROR_SIGN * ENOSYS;  (**< Operation not supported. *)
-  AVERROR_NOENT       = AVERROR_SIGN * ENOENT;  {**< No such file or directory. *}
-  // Note: function calls as constant-initializers are invalid
-  //AVERROR_PATCHWELCOME = -MKTAG('P','A','W','E'); {**< Not yet implemented in FFmpeg. Patches welcome. *}
-  AVERROR_PATCHWELCOME = -(ord('P') or (ord('A') shl 8) or (ord('W') shl 16) or (ord('E') shl 24));
-
-implementation
-
-end.
diff --git a/Game/Code/lib/ffmpeg/avformat.pas b/Game/Code/lib/ffmpeg/avformat.pas
deleted file mode 100644
index 93ce60e5..00000000
--- a/Game/Code/lib/ffmpeg/avformat.pas
+++ /dev/null
@@ -1,1372 +0,0 @@
-(*
- * copyright (c) 2001 Fabrice Bellard
- *
- * 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
- *)
-
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libavformat/avformat.h
- * Min. version: 50.5.0 , revision 6577,  Sat Oct 7 15:30:46 2006 UTC
- * Max. version: 52.20.0, revision 14667, Fri Aug 8 18:40:50 2008 UTC
- *)
-
-unit avformat;
-
-{$IFDEF FPC}
-  {$MODE DELPHI }
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-{$I switches.inc}  (* for the HasInline define *)
-
-{$IFDEF DARWIN}
-  {$linklib libavformat}
-{$ENDIF}
-
-interface
-
-uses
-  ctypes,
-  avcodec,
-  avutil,
-  avio,
-  rational,
-  UConfig;
-
-const
-  (* Max. supported version by this header *)
-  LIBAVFORMAT_MAX_VERSION_MAJOR   = 52;
-  LIBAVFORMAT_MAX_VERSION_MINOR   = 20;
-  LIBAVFORMAT_MAX_VERSION_RELEASE = 0;
-  LIBAVFORMAT_MAX_VERSION = (LIBAVFORMAT_MAX_VERSION_MAJOR * VERSION_MAJOR) +
-                            (LIBAVFORMAT_MAX_VERSION_MINOR * VERSION_MINOR) +
-                            (LIBAVFORMAT_MAX_VERSION_RELEASE * VERSION_RELEASE);
-
-  (* Min. supported version by this header *)
-  LIBAVFORMAT_MIN_VERSION_MAJOR   = 50;
-  LIBAVFORMAT_MIN_VERSION_MINOR   = 5;
-  LIBAVFORMAT_MIN_VERSION_RELEASE = 0;
-  LIBAVFORMAT_MIN_VERSION = (LIBAVFORMAT_MIN_VERSION_MAJOR * VERSION_MAJOR) +
-                            (LIBAVFORMAT_MIN_VERSION_MINOR * VERSION_MINOR) +
-                            (LIBAVFORMAT_MIN_VERSION_RELEASE * VERSION_RELEASE);
-
-(* Check if linked versions are supported *)
-{$IF (LIBAVFORMAT_VERSION < LIBAVFORMAT_MIN_VERSION)}
-  {$MESSAGE Error 'Linked version of libavformat is too old!'}
-{$IFEND}
-
-(* Check if linked versions are supported *)
-{$IF (LIBAVFORMAT_VERSION > LIBAVFORMAT_MAX_VERSION)}
-  {$MESSAGE Warn 'Linked version of libavformat may be unsupported!'}
-{$IFEND}
-
-{$IF LIBAVFORMAT_VERSION >= 52020000} // 52.20.0
-(**
- * Returns the LIBAVFORMAT_VERSION_INT constant.
- *)
-function avformat_version(): cuint;
-  cdecl; external av__format;
-{$IFEND}
-
-
-type
-  PAVFile = Pointer;
-
-(* packet functions *)
-
-type
-  PAVPacket = ^TAVPacket;
-  TAVPacket = record
-    (**
-     * Presentation time stamp in time_base units.
-     * This is the time at which the decompressed packet will be presented
-     * to the user.
-     * Can be AV_NOPTS_VALUE if it is not stored in the file.
-     * pts MUST be larger or equal to dts as presentation can not happen before
-     * decompression, unless one wants to view hex dumps. Some formats misuse
-     * the terms dts and pts/cts to mean something different, these timestamps
-     * must be converted to true pts/dts before they are stored in AVPacket.
-     *)
-    pts: cint64;
-    (**
-     * Decompression time stamp in time_base units.
-     * This is the time at which the packet is decompressed.
-     * Can be AV_NOPTS_VALUE if it is not stored in the file.
-     *)
-    dts: cint64;
-    data: PChar;
-    size: cint;
-    stream_index: cint;
-    flags: cint;
-    duration: cint;                     ///< presentation duration in time_base units (0 if not available)
-    destruct: procedure (p: PAVPacket); cdecl; 
-    priv: pointer;
-    pos: cint64;                            ///< byte position in stream, -1 if unknown
-  end;
-const
-  PKT_FLAG_KEY = $0001;
-
-procedure av_destruct_packet_nofree(var pkt: TAVPacket);
-  cdecl; external av__format;
-
-(**
- * Default packet destructor.
- *)
-procedure av_destruct_packet(var pkt: TAVPacket);
-  cdecl; external av__format;
-
-(**
- * Initialize optional fields of a packet to default values.
- *
- * @param pkt packet
- *)
-procedure av_init_packet(var pkt: TAVPacket);
-{$IF LIBAVFORMAT_VERSION >= 51012002} // 51.12.2
-  cdecl; external av__format;
-{$IFEND}
-
-(**
- * Allocate the payload of a packet and initialize its fields to default values.
- *
- * @param pkt packet
- * @param size wanted payload size
- * @return 0 if OK. AVERROR_xxx otherwise.
- *)
-function av_new_packet(var pkt: TAVPacket; size: cint): cint;
-  cdecl; external av__format;
-
-(**
- * Allocate and read the payload of a packet and initialize its fields to default values.
- *
- * @param pkt packet
- * @param size wanted payload size
- * @return >0 (read size) if OK. AVERROR_xxx otherwise.
- *)
-function av_get_packet(s: PByteIOContext; var pkt: TAVPacket; size: cint): cint;
-  cdecl; external av__format;
-
-(**
- * @warning This is a hack - the packet memory allocation stuff is broken. The
- * packet is allocated if it was not really allocated
- *)
-function av_dup_packet(pkt: PAVPacket): cint;
-  cdecl; external av__format;
-
-(**
- * Free a packet
- *
- * @param pkt packet to free
- *)
-procedure av_free_packet(pkt: PAVPacket); {$IFDEF HasInline}inline;{$ENDIF}
-
-(*************************************************)
-(* fractional numbers for exact pts handling *)
-
-type
- (**
-  * the exact value of the fractional number is: 'val + num / den'.
-  * num is assumed to be such as 0 <= num < den
-  * @deprecated Use AVRational instead
-  *)
-  PAVFrac = ^TAVFrac;
-  TAVFrac = record
-    val, num, den: cint64;
-  end; {deprecated}
-
-(*************************************************)
-(* input/output formats *)
-
-type
-  (* this structure contains the data a format has to probe a file *)
-  TAVProbeData = record
-    filename: pchar;
-    buf: pchar;
-    buf_size: cint;
-  end;
-
-const
-  AVPROBE_SCORE_MAX   = 100;   ///< max score, half of that is used for file extension based detection
-  AVPROBE_PADDING_SIZE = 32;   ///< extra allocated bytes at the end of the probe buffer
-
-  //! demuxer will use url_fopen, no opened file should be provided by the caller
-  AVFMT_NOFILE        = $0001;
-  AVFMT_NEEDNUMBER    = $0002; (**< needs '%d' in filename *)
-  AVFMT_SHOW_IDS      = $0008; (**< show format stream IDs numbers *)
-  AVFMT_RAWPICTURE    = $0020; (**< format wants AVPicture structure for
-                                      raw picture data *)
-  AVFMT_GLOBALHEADER  = $0040; (**< format wants global header *)
-  AVFMT_NOTIMESTAMPS  = $0080; (**< format does not need / have any timestamps *)
-  AVFMT_GENERIC_INDEX = $0100; (**< use generic index building code *)
-
-  // used by AVIndexEntry
-  AVINDEX_KEYFRAME = $0001;
-
-  AVFMTCTX_NOHEADER = $0001; (**< signal that no header is present
-                                         (streams are added dynamically) *)
-  MAX_STREAMS = 20;
-
-  AVFMT_NOOUTPUTLOOP = -1;
-  AVFMT_INFINITEOUTPUTLOOP = 0;
-  AVFMT_FLAG_GENPTS = $0001; ///< generate pts if missing even if it requires parsing future frames
-  AVFMT_FLAG_IGNIDX = $0002; ///< ignore index
-  AVFMT_FLAG_NONBLOCK = $0004; ///< do not block when reading packets from input
-
-  // used by AVStream
-  MAX_REORDER_DELAY = 4;
-
-  // used by TAVProgram
-  AV_PROGRAM_RUNNING = 1;
-
-
-  AV_DISPOSITION_DEFAULT   = $0001;
-  AV_DISPOSITION_DUB       = $0002;
-  AV_DISPOSITION_ORIGINAL  = $0004;
-  AV_DISPOSITION_COMMENT   = $0008;
-  AV_DISPOSITION_LYRICS    = $0010;
-  AV_DISPOSITION_KARAOKE   = $0020;
-
-  // used by TAVFormatContext.debug
-  FF_FDEBUG_TS       = 0001;
-
-type
-  PPAVCodecTag = ^PAVCodecTag;
-  PAVCodecTag = Pointer;
-
-  PPAVFormatContext = ^PAVFormatContext;
-  PAVFormatContext = ^TAVFormatContext;
-
-  PAVFormatParameters = ^TAVFormatParameters;
-
-  PAVOutputFormat = ^TAVOutputFormat;
-  PAVProbeData = ^TAVProbeData;
-
-  PAVInputFormat = ^TAVInputFormat;
-  PAVIndexEntry = ^TAVIndexEntry;
-
-  PAVStream = ^TAVStream;
-  PAVPacketList = ^TAVPacketList;
-
-  PPAVProgram = ^PAVProgram;
-  PAVProgram = ^TAVProgram;
-
-  {$IF LIBAVFORMAT_VERSION < 51006000} // 51.6.0
-  PAVImageFormat = ^TAVImageFormat;
-  PAVImageInfo = ^TAVImageInfo;
-  {$IFEND}
-
-  PAVChapter = ^TAVChapter;
-  TAVChapter = record
-    id: cint;              ///< Unique id to identify the chapter
-    time_base: TAVRational;   ///< Timebase in which the start/end timestamps are specified
-    start, end_: cint64;       ///< chapter start/end time in time_base units
-    title: PChar;             ///< chapter title
-  end;
-  TAVChapterArray = array[0..(MaxInt div SizeOf(TAVChapter))-1] of TAVChapter;
-  PAVChapterArray = ^TAVChapterArray;
-
-  TAVFormatParameters = record
-    time_base: TAVRational;
-    sample_rate: cint;
-    channels: cint;
-    width: cint;
-    height: cint;
-    pix_fmt: TAVPixelFormat;
-    {$IF LIBAVFORMAT_VERSION < 51006000} // 51.6.0
-    image_format: PAVImageFormat;
-    {$IFEND}
-    channel: cint; (* used to select dv channel *)
-    {$IF LIBAVFORMAT_VERSION_MAJOR < 52}
-    device: pchar; (* video, audio or DV device, if LIBAVFORMAT_VERSION_INT < (52<<16) *)
-    {$IFEND}
-    standard: pchar; (* tv standard, NTSC, PAL, SECAM *)
-    { Delphi does not support bit fields -> use bf_flags instead
-    unsigned int mpeg2ts_raw:1;  /**< force raw MPEG2 transport stream output, if possible */
-    unsigned int mpeg2ts_compute_pcr:1; /**< compute exact PCR for each transport
-                                  stream packet (only meaningful if
-                                  mpeg2ts_raw is TRUE) */
-    unsigned int initial_pause:1;       /**< do not begin to play the stream
-                                        immediately (RTSP only) */
-    unsigned int prealloced_context:1;
-    }
-    bf_flags: byte; // 0:mpeg2ts_raw/1:mpeg2ts_compute_pcr/2:initial_pause/3:prealloced_context
-    {$IF LIBAVFORMAT_VERSION_MAJOR < 53}
-    video_codec_id: TCodecID;
-    audio_codec_id: TCodecID;
-    {$IFEND}
-  end;
-
-  TAVOutputFormat = record
-    name: pchar;
-    (**
-     * Descriptive name for the format, meant to be more human-readable
-     * than \p name. You \e should use the NULL_IF_CONFIG_SMALL() macro
-     * to define it.
-     *)
-    long_name: pchar;
-    mime_type: pchar;
-    extensions: pchar; (*< comma separated filename extensions *)
-    (* size of private data so that it can be allocated in the wrapper *)
-    priv_data_size: cint;
-    (* output support *)
-    audio_codec: TCodecID; (* default audio codec *)
-    video_codec: TCodecID; (* default video codec *)
-    write_header: function (c: PAVFormatContext): cint; cdecl;
-    write_packet: function (c: PAVFormatContext; pkt: PAVPacket): cint; cdecl;
-    write_trailer: function (c: PAVFormatContext): cint; cdecl;
-    (* can use flags: AVFMT_NOFILE, AVFMT_NEEDNUMBER, AVFMT_GLOBALHEADER *)
-    flags: cint;
-    (* currently only used to set pixel format if not YUV420P *)
-    set_parameters: function (c: PAVFormatContext; f: PAVFormatParameters): cint; cdecl;
-    interleave_packet: function (s: PAVFormatContext; out_: PAVPacket; in_: PAVPacket; flush: cint): cint; cdecl;
-
-    {$IF LIBAVFORMAT_VERSION >= 51008000} // 51.8.0
-    (**
-     * list of supported codec_id-codec_tag pairs, ordered by "better choice first"
-     * the arrays are all CODEC_ID_NONE terminated
-     *)
-    codec_tag: {const} PPAVCodecTag;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 51012002} // 51.12.2
-    subtitle_codec: TCodecID; (**< default subtitle codec *)
-    {$IFEND}
-
-    (* private fields *)
-    next: PAVOutputFormat;
-  end;
-
-  TAVInputFormat = record
-    name: pchar;
-    (**
-     * Descriptive name for the format, meant to be more human-readable
-     * than \p name. You \e should use the NULL_IF_CONFIG_SMALL() macro
-     * to define it.
-     *)
-    long_name: pchar;
-    (* size of private data so that it can be allocated in the wrapper *)
-    priv_data_size: cint;
-    (**
-     * Tell if a given file has a chance of being parsed by this format.
-     * The buffer provided is guaranteed to be AVPROBE_PADDING_SIZE bytes
-     * big so you do not have to check for that unless you need more.
-     *)
-    read_probe: function (p: PAVProbeData): cint; cdecl;
-    (* read the format header and initialize the AVFormatContext
-       structure. Return 0 if OK. 'ap' if non NULL contains
-       additionnal paramters. Only used in raw format right
-       now. 'av_new_stream' should be called to create new streams.  *)
-    read_header: function (c: PAVFormatContext; ap: PAVFormatParameters): cint; cdecl;
-    (* read one packet and put it in 'pkt'. pts and flags are also
-       set. 'av_new_stream' can be called only if the flag
-       AVFMTCTX_NOHEADER is used. *)
-    read_packet: function (c: PAVFormatContext; var pkt: TAVPacket): cint; cdecl;
-    (* close the stream. The AVFormatContext and AVStreams are not
-       freed by this function *)
-    read_close: function (c: PAVFormatContext): cint; cdecl;
-    (**
-     * seek to a given timestamp relative to the frames in
-     * stream component stream_index
-     * @param stream_index must not be -1
-     * @param flags selects which direction should be preferred if no exact
-     *              match is available
-     * @return >= 0 on success (but not necessarily the new offset)
-     *)
-    read_seek: function (c: PAVFormatContext; stream_index: cint;
-                  timestamp: cint64; flags: cint): cint; cdecl;
-    (**
-     * gets the next timestamp in stream[stream_index].time_base units.
-     * @return the timestamp or AV_NOPTS_VALUE if an error occurred
-     *)
-    read_timestamp: function (s: PAVFormatContext; stream_index: cint;
-                              pos: pint64; pos_limit: cint64): cint64; cdecl;
-    (* can use flags: AVFMT_NOFILE, AVFMT_NEEDNUMBER *)
-    flags: cint;
-    (* if extensions are defined, then no probe is done. You should
-       usually not use extension format guessing because it is not
-       reliable enough *)
-    extensions: pchar;
-    (* general purpose read only value that the format can use *)
-    value: cint;
-
-    (* start/resume playing - only meaningful if using a network based format (RTSP) *)
-    read_play: function (c: PAVFormatContext): cint; cdecl;
-
-    (* pause playing - only meaningful if using a network based format  (RTSP) *)
-    read_pause: function (c: PAVFormatContext): cint; cdecl;
-
-    {$IF LIBAVFORMAT_VERSION >= 51008000} // 51.8.0
-    codec_tag: {const} PPAVCodecTag;
-    {$IFEND}
-
-    (* private fields *)
-    next: PAVInputFormat;
-  end;
-
-  TAVStreamParseType = (
-    AVSTREAM_PARSE_NONE,
-    AVSTREAM_PARSE_FULL,       (**< full parsing and repack *)
-    AVSTREAM_PARSE_HEADERS,    (**< only parse headers, don't repack *)
-    AVSTREAM_PARSE_TIMESTAMPS  (**< full parsing and interpolation of timestamps for frames not starting on packet boundary *)
-  );
-
-  TAVIndexEntry = record
-    pos: cint64;
-    timestamp: cint64;
-    { Delphi doesn't support bitfields -> use flags_size instead
-    int flags:2;
-    int size:30; //Yeah, trying to keep the size of this small to reduce memory requirements (it is 24 vs 32 byte due to possible 8byte align).
-    }
-    flags_size: cint; // 0..1: flags, 2..31: size
-    min_distance: cint;         (* min distance between this and the previous keyframe, used to avoid unneeded searching *)
-  end;
-
- (**
-  * Stream structure.
-  * New fields can be added to the end with minor version bumps.
-  * Removal, reordering and changes to existing fields require a major
-  * version bump.
-  * sizeof(AVStream) must not be used outside libav*.
-  *)
-  TAVStream = record
-    index: cint;    (* stream index in AVFormatContext *)
-    id: cint;       (* format specific stream id *)
-    codec: PAVCodecContext; (* codec context *)
-    (**
-     * Real base frame rate of the stream.
-     * This is the lowest frame rate with which all timestamps can be
-     * represented accurately (it is the least common multiple of all
-     * frame rates in the stream), Note, this value is just a guess!
-     * For example if the timebase is 1/90000 and all frames have either
-     * approximately 3600 or 1800 timer ticks then r_frame_rate will be 50/1.
-     *)
-    r_frame_rate: TAVRational;
-    priv_data: pointer;
-
-    (* internal data used in av_find_stream_info() *)
-    first_dts: cint64;
-    {$IF LIBAVFORMAT_VERSION_MAJOR < 52}
-    codec_info_nb_frames: cint;
-    {$IFEND}
-
-    (** encoding: PTS generation when outputing stream *)
-    pts: TAVFrac;
-    (**
-     * This is the fundamental unit of time (in seconds) in terms
-     * of which frame timestamps are represented. For fixed-fps content,
-     * timebase should be 1/frame rate and timestamp increments should be
-     * identically 1.
-     *)
-    time_base: TAVRational;
-    pts_wrap_bits: cint; (* number of bits in pts (used for wrapping control) *)
-    (* ffmpeg.c private use *)
-    stream_copy: cint; (**< if set, just copy stream *)
-    discard: TAVDiscard; ///< selects which packets can be discarded at will and dont need to be demuxed
-    //FIXME move stuff to a flags field?
-    (* quality, as it has been removed from AVCodecContext and put in AVVideoFrame
-     * MN:dunno if thats the right place, for it *)
-    quality: cfloat;
-    (**
-     * Decoding: pts of the first frame of the stream, in stream time base.
-     * Only set this if you are absolutely 100% sure that the value you set
-     * it to really is the pts of the first frame.
-     * This may be undefined (AV_NOPTS_VALUE).
-     * @note The ASF header does NOT contain a correct start_time the ASF
-     * demuxer must NOT set this.
-     *)
-    start_time: cint64;
-    (**
-     * Decoding: duration of the stream, in stream time base.
-     * If a source file does not specify a duration, but does specify
-     * a bitrate, this value will be estimates from bit rate and file size.
-     *)
-    duration: cint64;
-
-    language: array [0..3] of char; (* ISO 639 3-letter language code (empty string if undefined) *)
-
-    (* av_read_frame() support *)
-    need_parsing: TAVStreamParseType;
-    parser: PAVCodecParserContext;
-
-    cur_dts: cint64;
-    last_IP_duration: cint;
-    last_IP_pts: cint64;
-    (* av_seek_frame() support *)
-    index_entries: PAVIndexEntry; (* only used if the format does not support seeking natively *)
-    nb_index_entries: cint;
-    index_entries_allocated_size: cuint;
-
-    nb_frames: cint64;                 ///< number of frames in this stream if known or 0
-    
-    {$IF LIBAVFORMAT_VERSION >= 50006000} // 50.6.0
-    pts_buffer: array [0..MAX_REORDER_DELAY] of cint64;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52006000} // 52.6.0
-    filename: PChar; (**< source filename of the stream *)
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52008000} // 52.8.0
-    disposition: cint; (**< AV_DISPOSITION_* bitfield *)
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52019000} // 52.19.0
-    probe_data: TAVProbeData;
-    {$IFEND}
-  end;
-
- (**
-  * format I/O context.
-  * New fields can be added to the end with minor version bumps.
-  * Removal, reordering and changes to existing fields require a major
-  * version bump.
-  * sizeof(AVFormatContext) must not be used outside libav*.
-  *)
-  TAVFormatContext = record
-    av_class: PAVClass; (* set by av_alloc_format_context *)
-    (* can only be iformat or oformat, not both at the same time *)
-    iformat: PAVInputFormat;
-    oformat: PAVOutputFormat;
-    priv_data: pointer;
-
-    {$IF LIBAVFORMAT_VERSION_MAJOR >= 52}
-    pb: PByteIOContext;
-    {$ELSE}
-    pb: TByteIOContext;
-    {$IFEND}
-
-    nb_streams: cuint;
-    streams: array [0..MAX_STREAMS - 1] of PAVStream;
-    filename: array [0..1023] of char; (* input or output filename *)
-    (* stream info *)
-    timestamp: cint64;
-    title: array [0..511] of char;
-    author: array [0..511] of char;
-    copyright: array [0..511] of char;
-    comment: array [0..511] of char;
-    album: array [0..511] of char;
-    year: cint;  (* ID3 year, 0 if none *)
-    track: cint; (* track number, 0 if none *)
-    genre: array [0..31] of char; (* ID3 genre *)
-
-    ctx_flags: cint; (* format specific flags, see AVFMTCTX_xx *)
-    (* private data for pts handling (do not modify directly) *)
-    (* This buffer is only needed when packets were already buffered but
-       not decoded, for example to get the codec parameters in mpeg
-       streams *)
-    packet_buffer: PAVPacketList;
-
-    (* decoding: position of the first frame of the component, in
-       AV_TIME_BASE fractional seconds. NEVER set this value directly:
-       it is deduced from the AVStream values.  *)
-    start_time: cint64;
-    (* decoding: duration of the stream, in AV_TIME_BASE fractional
-       seconds. NEVER set this value directly: it is deduced from the
-       AVStream values.  *)
-    duration: cint64;
-    (* decoding: total file size. 0 if unknown *)
-    file_size: cint64;
-    (* decoding: total stream bitrate in bit/s, 0 if not
-       available. Never set it directly if the file_size and the
-       duration are known as ffmpeg can compute it automatically. *)
-    bit_rate: cint;
-
-    (* av_read_frame() support *)
-    cur_st: PAVStream;
-    cur_ptr: pbyte;
-    cur_len: cint;
-    cur_pkt: TAVPacket;
-
-    (* av_seek_frame() support *)
-    data_offset: cint64; (* offset of the first packet *)
-    index_built: cint;
-
-    mux_rate: cint;
-    packet_size: cint;
-    preload: cint;
-    max_delay: cint;
-
-    (* number of times to loop output in formats that support it *)
-    loop_output: cint;
-
-    flags: cint;
-    loop_input: cint;
-
-    {$IF LIBAVFORMAT_VERSION >= 50006000} // 50.6.0
-    (* decoding: size of data to probe; encoding unused *)
-    probesize: cuint;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 51009000} // 51.9.0
-    (**
-     * maximum duration in AV_TIME_BASE units over which the input should be analyzed in av_find_stream_info()
-     *)
-    max_analyze_duration: cint;
-
-    key: pbyte;
-    keylen : cint;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 51014000} // 51.14.0
-    nb_programs: cuint;
-    programs: PPAVProgram;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52003000} // 52.3.0
-    (**
-     * Forced video codec_id.
-     * demuxing: set by user
-     *)
-    video_codec_id: TCodecID;
-    (**
-     * Forced audio codec_id.
-     * demuxing: set by user
-     *)
-    audio_codec_id: TCodecID;
-    (**
-     * Forced subtitle codec_id.
-     * demuxing: set by user
-     *)
-    subtitle_codec_id: TCodecID;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-    (**
-     * Maximum amount of memory in bytes to use per stream for the index.
-     * If the needed index exceeds this size entries will be discarded as
-     * needed to maintain a smaller size. This can lead to slower or less
-     * accurate seeking (depends on demuxer).
-     * Demuxers for which a full in memory index is mandatory will ignore
-     * this.
-     * muxing  : unused
-     * demuxing: set by user
-     *)
-    max_index_size: cuint;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52009000} // 52.9.0
-    (**
-     * Maximum amount of memory in bytes to use for buffering frames
-     * obtained from real-time capture devices.
-     *)
-    max_picture_buffer: cuint;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52014000} // 52.14.0
-    nb_chapters: cuint;
-    chapters: PAVChapterArray;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52016000} // 52.16.0
-    (**
-     * Flags to enable debuging.
-     *)
-    debug: cint;
-    {$IFEND}
-
-    {$IF LIBAVFORMAT_VERSION >= 52019000} // 52.19.0
-    (**
-     * raw packets from the demuxer, prior to parsing and decoding.
-     * This buffer is used for buffering packets until the codec can
-     * be identified, as parsing cannot be done without knowing the
-     * codec.
-     *)
-    raw_packet_buffer: PAVPacketList;
-    raw_packet_buffer_end: PAVPacketList;
-
-    packet_buffer_end: PAVPacketList;
-    {$IFEND}
-  end;
-
-  (**
-   * New fields can be added to the end with minor version bumps.
-   * Removal, reordering and changes to existing fields require a major
-   * version bump.
-   * sizeof(AVProgram) must not be used outside libav*.
-   *)
-  TAVProgram = record
-      id                : cint;
-      provider_name     : PChar;      ///< Network name for DVB streams
-      name              : PChar;      ///< Service name for DVB streams
-      flags             : cint;
-      discard           : TAVDiscard; ///< selects which program to discard and which to feed to the caller
-      {$IF LIBAVFORMAT_VERSION >= 51016000} // 51.16.0
-      stream_index      : PCardinal;
-      nb_stream_indexes : PCardinal;
-      {$IFEND}
-  end;
-
-  TAVPacketList = record
-    pkt: TAVPacket;
-    next: PAVPacketList;
-  end;
-
-{$IF LIBAVFORMAT_VERSION < 51006000} // 51.6.0
-  (* still image support *)
-  PAVInputImageContext = pointer; {deprecated}
-
-  (* still image support *)
-  TAVImageInfo = record
-    pix_fmt: TAVPixelFormat; (* requested pixel format *)
-    width: cint; (* requested width *)
-    height: cint; (* requested height *)
-    interleaved: cint; (* image is interleaved (e.g. interleaved GIF) *)
-    pict: TAVPicture; (* returned allocated image *)
-  end; {deprecated}
-
-  TAVImageFormat = record
-    name: pchar;
-    extensions: pchar;
-    (* tell if a given file has a chance of being parsing by this format *)
-    img_probe: function (d: PAVProbeData): cint; cdecl;
-    (* read a whole image. 'alloc_cb' is called when the image size is
-       known so that the caller can allocate the image. If 'allo_cb'
-       returns non zero, then the parsing is aborted. Return '0' if
-       OK. *)
-    img_read: function (b: PByteIOContext; alloc_cb: pointer; ptr: pointer): cint; cdecl;
-    (* write the image *)
-    supported_pixel_formats: cint; (* mask of supported formats for output *)
-    img_write: function (b: PByteIOContext; i: PAVImageInfo): cint; cdecl;
-    flags: cint;
-    next: PAVImageFormat;
-  end; {deprecated}
-
-procedure av_register_image_format(img_fmt: PAVImageFormat);
-    cdecl; external av__format; deprecated;
-
-function av_probe_image_format(pd: PAVProbeData): PAVImageFormat;
-    cdecl; external av__format; deprecated;
-
-function guess_image_format(filename: pchar): PAVImageFormat;
-    cdecl; external av__format; deprecated;
-
-function av_read_image(pb: PByteIOContext; filename: pchar;
-                  fmt: PAVImageFormat;
-                  alloc_cb: pointer; opaque: pointer): cint;
-    cdecl; external av__format; deprecated;
-
-function av_write_image(pb: PByteIOContext; fmt: PAVImageFormat; img: PAVImageInfo): cint;
-    cdecl; external av__format; deprecated;
-{$IFEND}
-
-{$IF LIBAVFORMAT_VERSION_MAJOR < 53}
-{
-var
-  first_iformat: PAVInputFormat; external av__format;
-  first_oformat: PAVOutputFormat; external av__format;
-}
-{$IFEND}
-
-{$IF LIBAVFORMAT_VERSION >= 52003000} // 52.3.0
-function av_iformat_next(f: PAVInputFormat): PAVInputFormat;
-    cdecl; external av__format;
-function av_oformat_next(f: PAVOutputFormat): PAVOutputFormat;
-    cdecl; external av__format;
-{$IFEND}
-
-function av_guess_image2_codec(filename: {const} PChar): TCodecID;
-    cdecl; external av__format;
-
-(* XXX: use automatic init with either ELF sections or C file parser *)
-(* modules *)
-
-(* utils.c *)
-procedure av_register_input_format(format: PAVInputFormat);
-  cdecl; external av__format;
-
-procedure av_register_output_format(format: PAVOutputFormat);
-  cdecl; external av__format;
-
-function guess_stream_format(short_name: pchar; filename: pchar; mime_type: pchar): PAVOutputFormat;
-  cdecl; external av__format;
-
-function guess_format(short_name: pchar; filename: pchar; mime_type: pchar): PAVOutputFormat;
-  cdecl; external av__format;
-
-(**
- * Guesses the codec id based upon muxer and filename.
- *)
-function av_guess_codec(fmt: PAVOutputFormat; short_name: pchar;
-                        filename: pchar; mime_type: pchar; type_: TCodecType): TCodecID;
-  cdecl; external av__format;
-
-(**
- * Send a nice hexadecimal dump of a buffer to the specified file stream.
- *
- * @param f The file stream pointer where the dump should be sent to.
- * @param buf buffer
- * @param size buffer size
- *
- * @see av_hex_dump_log, av_pkt_dump, av_pkt_dump_log
- *)
-procedure av_hex_dump(f: PAVFile; buf: pchar; size: cint);
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51011000} // 51.11.0
-(**
- * Send a nice hexadecimal dump of a buffer to the log.
- *
- * @param avcl A pointer to an arbitrary struct of which the first field is a
- * pointer to an AVClass struct.
- * @param level The importance level of the message, lower values signifying
- * higher importance.
- * @param buf buffer
- * @param size buffer size
- *
- * @see av_hex_dump, av_pkt_dump, av_pkt_dump_log
- *)
-procedure av_hex_dump_log(avcl: Pointer; level: cint; buf: PChar; size: cint);
-  cdecl; external av__format;
-{$IFEND}
-
-(**
- * Send a nice dump of a packet to the specified file stream.
- *
- * @param f The file stream pointer where the dump should be sent to.
- * @param pkt packet to dump
- * @param dump_payload true if the payload must be displayed too
- *)
-procedure av_pkt_dump(f: PAVFile; pkt: PAVPacket; dump_payload: cint);
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51011000} // 51.11.0
-(**
- * Send a nice dump of a packet to the log.
- *
- * @param avcl A pointer to an arbitrary struct of which the first field is a
- * pointer to an AVClass struct.
- * @param level The importance level of the message, lower values signifying
- * higher importance.
- * @param pkt packet to dump
- * @param dump_payload true if the payload must be displayed too
- *)
-procedure av_pkt_dump_log(avcl: Pointer; level: cint; pkt: PAVPacket; dump_payload: cint);
-  cdecl; external av__format;
-{$IFEND}
-
-procedure av_register_all();
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51008000} // 51.8.0
-(** codec tag <-> codec id *)
-function av_codec_get_id(var tags: PAVCodecTag; tag: cuint): TCodecID;
-  cdecl; external av__format;
-function av_codec_get_tag(var tags: PAVCodecTag; id: TCodecID): cuint;
-  cdecl; external av__format;
-{$IFEND}
-
-(* media file input *)
-
-(**
- * finds AVInputFormat based on input format's short name.
- *)
-function av_find_input_format(short_name: pchar): PAVInputFormat;
-  cdecl; external av__format;
-
-(**
- * Guess file format.
- *
- * @param is_opened whether the file is already opened, determines whether
- *                  demuxers with or without AVFMT_NOFILE are probed
- *)
-function av_probe_input_format(pd: PAVProbeData; is_opened: cint): PAVInputFormat;
-  cdecl; external av__format;
-
-(**
- * Allocates all the structures needed to read an input stream.
- *        This does not open the needed codecs for decoding the stream[s].
- *)
-function av_open_input_stream(ic_ptr: PAVFormatContext;
-                       pb: PByteIOContext; filename: pchar;
-                       fmt: PAVInputFormat; ap: PAVFormatParameters): cint;
-  cdecl; external av__format;
-
-(**
- * Open a media file as input. The codecs are not opened. Only the file
- * header (if present) is read.
- *
- * @param ic_ptr the opened media file handle is put here
- * @param filename filename to open.
- * @param fmt if non NULL, force the file format to use
- * @param buf_size optional buffer size (zero if default is OK)
- * @param ap additional parameters needed when opening the file (NULL if default)
- * @return 0 if OK. AVERROR_xxx otherwise.
- *)
-function av_open_input_file(var ic_ptr: PAVFormatContext; filename: pchar;
-                     fmt: PAVInputFormat; buf_size: cint;
-                     ap: PAVFormatParameters): cint;
-  cdecl; external av__format;
-
-(**
- * Allocate an AVFormatContext.
- * Can be freed with av_free() but do not forget to free everything you
- * explicitly allocated as well!
- *)
-function av_alloc_format_context(): PAVFormatContext;
-  cdecl; external av__format;
-
-(**
- * Read packets of a media file to get stream information. This
- * is useful for file formats with no headers such as MPEG. This
- * function also computes the real frame rate in case of mpeg2 repeat
- * frame mode.
- * The logical file position is not changed by this function;
- * examined packets may be buffered for later processing.
- *
- * @param ic media file handle
- * @return >=0 if OK. AVERROR_xxx if error.
- * @todo Let user decide somehow what information is needed so we do not waste time getting stuff the user does not need.
- *)
-function av_find_stream_info(ic: PAVFormatContext): cint;
-  cdecl; external av__format;
-
-(**
- * Read a transport packet from a media file.
- *
- * This function is obsolete and should never be used.
- * Use av_read_frame() instead.
- *
- * @param s media file handle
- * @param pkt is filled
- * @return 0 if OK. AVERROR_xxx if error.
- *)
-function av_read_packet(s: PAVFormatContext; var pkt: TAVPacket): cint;
-  cdecl; external av__format;
-
-(**
- * Return the next frame of a stream.
- *
- * The returned packet is valid
- * until the next av_read_frame() or until av_close_input_file() and
- * must be freed with av_free_packet. For video, the packet contains
- * exactly one frame. For audio, it contains an cint number of
- * frames if each frame has a known fixed size (e.g. PCM or ADPCM
- * data). If the audio frames have a variable size (e.g. MPEG audio),
- * then it contains one frame.
- *
- * pkt->pts, pkt->dts and pkt->duration are always set to correct
- * values in AVStream.timebase units (and guessed if the format cannot
- * provided them). pkt->pts can be AV_NOPTS_VALUE if the video format
- * has B frames, so it is better to rely on pkt->dts if you do not
- * decompress the payload.
- *
- * @return 0 if OK, < 0 if error or end of file.
- *)
-function av_read_frame(s: PAVFormatContext; var pkt: TAVPacket): cint;
-  cdecl; external av__format;
-
-(**
- * Seek to the key frame at timestamp.
- * 'timestamp' in 'stream_index'.
- * @param stream_index If stream_index is (-1), a default
- * stream is selected, and timestamp is automatically converted
- * from AV_TIME_BASE units to the stream specific time_base.
- * @param timestamp timestamp in AVStream.time_base units
- *        or if there is no stream specified then in AV_TIME_BASE units
- * @param flags flags which select direction and seeking mode
- * @return >= 0 on success
- *)
-function av_seek_frame(s: PAVFormatContext; stream_index: cint; timestamp: cint64; flags: cint): cint;
-  cdecl; external av__format;
-
-(**
- * start playing a network based stream (e.g. RTSP stream) at the
- * current position
- *)
-function av_read_play(s: PAVFormatContext): cint;
-  cdecl; external av__format;
-
-(**
- * Pause a network based stream (e.g. RTSP stream).
- *
- * Use av_read_play() to resume it.
- *)
-function av_read_pause(s: PAVFormatContext): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 52003000} // 52.3.0
-(**
- * Free a AVFormatContext allocated by av_open_input_stream.
- * @param s context to free
- *)
-procedure av_close_input_stream(s: PAVFormatContext);
-  cdecl; external av__format;
-{$IFEND}
-
-(**
- * Close a media file (but not its codecs).
- *
- * @param s media file handle
- *)
-procedure av_close_input_file(s: PAVFormatContext);
-  cdecl; external av__format;
-
-(**
- * Add a new stream to a media file.
- *
- * Can only be called in the read_header() function. If the flag
- * AVFMTCTX_NOHEADER is in the format context, then new streams
- * can be added in read_packet too.
- *
- * @param s media file handle
- * @param id file format dependent stream id
- *)
-function av_new_stream(s: PAVFormatContext; id: cint): PAVStream;
-  cdecl; external av__format;
-{$IF LIBAVFORMAT_VERSION >= 51014000} // 51.14.0
-function av_new_program(s: PAVFormatContext; id: cint): PAVProgram;
-  cdecl; external av__format;
-{$IFEND}
-
-{$IF LIBAVFORMAT_VERSION >= 52014000} // 52.14.0
-(**
- * Add a new chapter.
- * This function is NOT part of the public API
- * and should be ONLY used by demuxers.
- *
- * @param s media file handle
- * @param id unique id for this chapter
- * @param start chapter start time in time_base units
- * @param end chapter end time in time_base units
- * @param title chapter title
- *
- * @return AVChapter or NULL if error.
- *)
-function ff_new_chapter(s: PAVFormatContext; id: cint; time_base: TAVRational; start, end_: cint64; title: {const} Pchar): PAVChapter;
-  cdecl; external av__format;
-{$IFEND}
-
-(**
- * Set the pts for a given stream.
- *
- * @param s stream
- * @param pts_wrap_bits number of bits effectively used by the pts
- *        (used for wrap control, 33 is the value for MPEG)
- * @param pts_num numerator to convert to seconds (MPEG: 1)
- * @param pts_den denominator to convert to seconds (MPEG: 90000)
- *)
-procedure av_set_pts_info(s: PAVStream; pts_wrap_bits: cint;
-                   pts_num: cint; pts_den: cint);
-  cdecl; external av__format;
-
-const
-  AVSEEK_FLAG_BACKWARD = 1; ///< seek backward
-  AVSEEK_FLAG_BYTE     = 2; ///< seeking based on position in bytes
-  AVSEEK_FLAG_ANY      = 4; ///< seek to any frame, even non keyframes
-
-function av_find_default_stream_index(s: PAVFormatContext): cint;
-  cdecl; external av__format;
-
-(**
- * Gets the index for a specific timestamp.
- * @param flags if AVSEEK_FLAG_BACKWARD then the returned index will correspond to
- *                 the timestamp which is <= the requested one, if backward is 0
- *                 then it will be >=
- *              if AVSEEK_FLAG_ANY seek to any frame, only keyframes otherwise
- * @return < 0 if no such timestamp could be found
- *)
-function av_index_search_timestamp(st: PAVStream; timestamp: cint64; flags: cint): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-(**
- * Ensures the index uses less memory than the maximum specified in
- * AVFormatContext.max_index_size, by discarding entries if it grows
- * too large.
- * This function is not part of the public API and should only be called
- * by demuxers.
- *)
-procedure ff_reduce_index(s: PAVFormatContext; stream_index: cint);
-  cdecl; external av__format;
-{$IFEND}
-
-(**
- * Add a index entry into a sorted list updateing if it is already there.
- *
- * @param timestamp timestamp in the timebase of the given stream
- *)
-function av_add_index_entry(st: PAVStream; pos: cint64; timestamp: cint64;
-                  distance: cint; flags: cint): cint;
-  cdecl; external av__format;
-
-(**
- * Does a binary search using av_index_search_timestamp() and AVCodec.read_timestamp().
- * This is not supposed to be called directly by a user application, but by demuxers.
- * @param target_ts target timestamp in the time base of the given stream
- * @param stream_index stream number
- *)
-function av_seek_frame_binary(s: PAVFormatContext; stream_index: cint;
-                 target_ts: cint64; flags: cint): cint;
-  cdecl; external av__format;
-
-
-(**
- * Updates cur_dts of all streams based on given timestamp and AVStream.
- *
- * Stream ref_st unchanged, others set cur_dts in their native timebase
- * only needed for timestamp wrapping or if (dts not set and pts!=dts).
- * @param timestamp new dts expressed in time_base of param ref_st
- * @param ref_st reference stream giving time_base of param timestamp
- *)
-procedure av_update_cur_dts(s: PAVFormatContext; ref_st: PAVStream;
-                            timestamp: cint64);
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51007000} // 51.7.0
-type
-  TReadTimestampFunc = function (pavfc: PAVFormatContext;
-    arg2: cint; arg3: Pint64; arg4: cint64): cint64; cdecl;
-
-(**
- * Does a binary search using read_timestamp().
- * This is not supposed to be called directly by a user application, but by demuxers.
- * @param target_ts target timestamp in the time base of the given stream
- * @param stream_index stream number
- *)
-function av_gen_search(s: PAVFormatContext; stream_index: cint; target_ts: cint64;
-    pos_min: cint64; pos_max: cint64; pos_limit: cint64; ts_min: cint64; ts_max: cint64;
-    flags: cint; ts_ret: Pint64; read_timestamp: TReadTimestampFunc): cint64;
-  cdecl; external av__format;
-{$IFEND}
-
-(* media file output *)
-function av_set_parameters(s: PAVFormatContext; ap: PAVFormatParameters): cint;
-  cdecl; external av__format;
-
-(**
- * Allocate the stream private data and write the stream header to an
- * output media file.
- *
- * @param s media file handle
- * @return 0 if OK. AVERROR_xxx if error.
- *)
-function av_write_header(s: PAVFormatContext): cint;
-  cdecl; external av__format;
-
-(**
- * Write a packet to an output media file.
- *
- * The packet shall contain one audio or video frame.
- * The packet must be correctly interleaved according to the container specification,
- * if not then av_interleaved_write_frame must be used
- *
- * @param s media file handle
- * @param pkt the packet, which contains the stream_index, buf/buf_size, dts/pts, ...
- * @return < 0 if error, = 0 if OK, 1 if end of stream wanted.
- *)
-function av_write_frame(s: PAVFormatContext; var pkt: TAVPacket): cint;
-  cdecl; external av__format;
-
-(**
- * Writes a packet to an output media file ensuring correct interleaving.
- *
- * The packet must contain one audio or video frame.
- * If the packets are already correctly interleaved the application should
- * call av_write_frame() instead as it is slightly faster. It is also important
- * to keep in mind that completely non-interleaved input will need huge amounts
- * of memory to interleave with this, so it is preferable to interleave at the
- * demuxer level.
- *
- * @param s media file handle
- * @param pkt the packet, which contains the stream_index, buf/buf_size, dts/pts, ...
- * @return < 0 if error, = 0 if OK, 1 if end of stream wanted.
- *)
-function av_interleaved_write_frame(s: PAVFormatContext; var pkt: TAVPacket): cint;
-  cdecl; external av__format;
-
-(**
- * Interleave a packet per DTS in an output media file.
- *
- * Packets with pkt->destruct == av_destruct_packet will be freed inside this function,
- * so they cannot be used after it, note calling av_free_packet() on them is still safe.
- *
- * @param s media file handle
- * @param out the interleaved packet will be output here
- * @param in the input packet
- * @param flush 1 if no further packets are available as input and all
- *              remaining packets should be output
- * @return 1 if a packet was output, 0 if no packet could be output,
- *         < 0 if an error occurred
- *)
-function av_interleave_packet_per_dts(s: PAVFormatContext; _out: PAVPacket;
-                                      pkt: PAVPacket; flush: cint): cint;
-  cdecl; external av__format;
-
-(**
- * @brief Write the stream trailer to an output media file and
- *        free the file private data.
- *
- * @param s media file handle
- * @return 0 if OK. AVERROR_xxx if error.
- *)
-function av_write_trailer(s: pAVFormatContext): cint;
-  cdecl; external av__format;
-
-procedure dump_format(ic: PAVFormatContext; index: cint; url: pchar;
-               is_output: cint);
-  cdecl; external av__format;
-
-(**
- * parses width and height out of string str.
- * @deprecated Use av_parse_video_frame_size instead.
- *)
-function parse_image_size(width_ptr: PCint; height_ptr: PCint; str: pchar): cint;
-  cdecl; external av__format; deprecated;
-
-(**
- * Converts frame rate from string to a fraction.
- * @deprecated Use av_parse_video_frame_rate instead.
- *)
-function parse_frame_rate(frame_rate: PCint; frame_rate_base: PCint; arg: pchar): cint;
-  cdecl; external av__format; deprecated;
-
-(**
- * Parses \p datestr and returns a corresponding number of microseconds.
- * @param datestr String representing a date or a duration.
- * - If a date the syntax is:
- * @code
- *  [{YYYY-MM-DD|YYYYMMDD}]{T| }{HH[:MM[:SS[.m...]]][Z]|HH[MM[SS[.m...]]][Z]}
- * @endcode
- * Time is localtime unless Z is appended, in which case it is
- * interpreted as UTC.
- * If the year-month-day part isn't specified it takes the current
- * year-month-day.
- * Returns the number of microseconds since 1st of January, 1970 up to
- * the time of the parsed date or INT64_MIN if \p datestr cannot be
- * successfully parsed.
- * - If a duration the syntax is:
- * @code
- *  [-]HH[:MM[:SS[.m...]]]
- *  [-]S+[.m...]
- * @endcode
- * Returns the number of microseconds contained in a time interval
- * with the specified duration or INT64_MIN if \p datestr cannot be
- * successfully parsed.
- * @param duration Flag which tells how to interpret \p datestr, if
- * not zero \p datestr is interpreted as a duration, otherwise as a
- * date.
- *)
-function parse_date(datestr: pchar; duration: cint): cint64;
-  cdecl; external av__format;
-
-function av_gettime(): cint64;
-  cdecl; external av__format;
-
-(* ffm specific for ffserver *)
-const
-  FFM_PACKET_SIZE = 4096;
-
-function ffm_read_write_index(fd: cint): cint64;
-  cdecl; external av__format;
-
-procedure ffm_write_write_index(fd: cint; pos: cint64);
-  cdecl; external av__format;
-
-procedure ffm_set_write_index(s: PAVFormatContext; pos: cint64; file_size: cint64);
-  cdecl; external av__format;
-
-(**
- * Attempts to find a specific tag in a URL.
- *
- * syntax: '?tag1=val1&tag2=val2...'. Little URL decoding is done.
- * Return 1 if found.
- *)
-function find_info_tag(arg: pchar; arg_size: cint; tag1: pchar; info: pchar): cint;
-  cdecl; external av__format;
-
-(**
- * Returns in 'buf' the path with '%d' replaced by number.
-
- * Also handles the '%0nd' format where 'n' is the total number
- * of digits and '%%'.
- *
- * @param buf destination buffer
- * @param buf_size destination buffer size
- * @param path numbered sequence string
- * @param number frame number
- * @return 0 if OK, -1 if format error.
- *)
-function av_get_frame_filename(buf: pchar; buf_size: cint;
-                               path: pchar; number: cint): cint;
-  cdecl; external av__format
-  {$IF LIBAVFORMAT_VERSION <= 50006000} // 50.6.0
-  name 'get_frame_filename'
-  {$IFEND};
-
-(**
- * Check whether filename actually is a numbered sequence generator.
- *
- * @param filename possible numbered sequence string
- * @return 1 if a valid numbered sequence string, 0 otherwise.
- *)
-function av_filename_number_test(filename: pchar): cint;
-  cdecl; external av__format
-  {$IF LIBAVFORMAT_VERSION <= 50006000} // 50.6.0
-  name 'filename_number_test'
-  {$IFEND};
-
-{$IF LIBAVFORMAT_VERSION >= 51012002} // 51.12.2
-(**
- * Generate an SDP for an RTP session.
- *
- * @param ac array of AVFormatContexts describing the RTP streams. If the
- *           array is composed by only one context, such context can contain
- *           multiple AVStreams (one AVStream per RTP stream). Otherwise,
- *           all the contexts in the array (an AVCodecContext per RTP stream)
- *           must contain only one AVStream
- * @param n_files number of AVCodecContexts contained in ac
- * @param buff buffer where the SDP will be stored (must be allocated by
- *             the caller
- * @param size the size of the buffer
- * @return 0 if OK. AVERROR_xxx if error.
- *)
-function avf_sdp_create(ac: PPAVFormatContext; n_files: cint; buff: PChar; size: cint): cint;
-  cdecl; external av__format;
-{$IFEND}
-
-implementation
-
-{$IF LIBAVFORMAT_VERSION < 51012002} // 51.12.2
-procedure av_init_packet(var pkt: TAVPacket);
-begin
-  with pkt do begin
-    pts   := AV_NOPTS_VALUE;
-    dts   := AV_NOPTS_VALUE;
-    pos   := -1;
-    duration := 0;
-    flags := 0;
-    stream_index := 0;
-    destruct := @av_destruct_packet_nofree
-  end
-end;
-{$IFEND}
-
-procedure av_free_packet(pkt: PAVPacket);
-begin
-  if ((pkt <> nil) and (@pkt^.destruct <> nil)) then
-    pkt^.destruct(pkt);
-end;
-
-end.
diff --git a/Game/Code/lib/ffmpeg/avio.pas b/Game/Code/lib/ffmpeg/avio.pas
deleted file mode 100644
index 70912e60..00000000
--- a/Game/Code/lib/ffmpeg/avio.pas
+++ /dev/null
@@ -1,538 +0,0 @@
-(*
- * unbuffered io for ffmpeg system
- * copyright (c) 2001 Fabrice Bellard
- *
- * 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
- *)
-
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libavformat/avio.h
- * revision 12658, Mon Mar 31 17:31:11 2008 UTC
- *)
-
-unit avio;
-
-{$IFDEF FPC}
-  {$MODE DELPHI }
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-{$I switches.inc}
-
-interface
-
-uses
-  ctypes,
-  avutil,
-  avcodec,
-  UConfig;
-
-(* output byte stream handling *)
-
-type
-  TOffset = cint64;
-
-(* unbuffered I/O *)
-
-const
-  URL_RDONLY = 0;
-  URL_WRONLY = 1;
-  URL_RDWR   = 2;
-
- (**
-  * Passing this as the "whence" parameter to a seek function causes it to
-  * return the filesize without seeking anywhere. Supporting this is optional.
-  * If it is not supported then the seek function will return <0.
-  *)
-  AVSEEK_SIZE = $10000;
-
-type
-  TURLInterruptCB = function (): cint; cdecl;
-
-type
-  PURLProtocol = ^TURLProtocol;
-
- (**
-  * URL Context.
-  * New fields can be added to the end with minor version bumps.
-  * Removal, reordering and changes to existing fields require a major
-  * version bump.
-  * sizeof(URLContext) must not be used outside libav*.
-  *)
-  PURLContext = ^TURLContext;
-  TURLContext = record
-    {$IF LIBAVFORMAT_VERSION_MAJOR >= 53}
-    av_class: {const} PAVClass; ///< information for av_log(). Set by url_open().
-    {$IFEND}
-    prot: PURLProtocol;
-    flags: cint;
-    is_streamed: cint;  (**< true if streamed (no seek possible), default = false *)
-    max_packet_size: cint;  (**< if non zero, the stream is packetized with this max packet size *)
-    priv_data: pointer;
-    filename: PChar; (**< specified filename *)
-  end;
-
-  PURLPollEntry = ^TURLPollEntry;
-  TURLPollEntry = record
-    handle: PURLContext;
-    events: cint;
-    revents: cint;
-  end;
-
-  TURLProtocol = record
-    name: PChar;
-    url_open: function (h: PURLContext; filename: {const} PChar; flags: cint): cint; cdecl;
-    url_read: function (h: PURLContext; buf: PChar; size: cint): cint; cdecl;
-    url_write: function (h: PURLContext; buf: PChar; size: cint): cint; cdecl;
-    url_seek: function (h: PURLContext; pos: TOffset; whence: cint): TOffset; cdecl;
-    url_close: function (h: PURLContext): cint; cdecl;
-    next: PURLProtocol;
-    {$IF (LIBAVFORMAT_VERSION >= 52001000) and (LIBAVFORMAT_VERSION < 52004000)} // 52.1.0 .. 52.4.0
-    url_read_play: function (h: PURLContext): cint;
-    url_read_pause: function (h: PURLContext): cint;
-    {$IFEND}
-    {$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-    url_read_pause: function (h: PURLContext; pause: cint): cint; cdecl;
-    {$IFEND}
-    {$IF LIBAVFORMAT_VERSION >= 52001000} // 52.1.0
-    url_read_seek: function (h: PURLContext;
-                         stream_index: cint; timestamp: cint64; flags: cint): TOffset; cdecl;
-    {$IFEND}
-  end;
-
- (**
-  * Bytestream IO Context.
-  * New fields can be added to the end with minor version bumps.
-  * Removal, reordering and changes to existing fields require a major
-  * version bump.
-  * sizeof(ByteIOContext) must not be used outside libav*.
-  *)
-  PByteIOContext = ^TByteIOContext;
-  TByteIOContext = record
-    buffer: PChar;
-    buffer_size: cint;
-    buf_ptr: PChar;
-    buf_end: PChar;
-    opaque: pointer;
-    read_packet: function (opaque: pointer; buf: PChar; buf_size: cint): cint; cdecl;
-    write_packet: function (opaque: pointer; buf: PChar; buf_size: cint): cint; cdecl;
-    seek: function (opaque: pointer; offset: TOffset; whence: cint): TOffset; cdecl;
-    pos: TOffset; (* position in the file of the current buffer *)
-    must_flush: cint; (* true if the next seek should flush *)
-    eof_reached: cint; (* true if eof reached *)
-    write_flag: cint;  (* true if open for writing *)
-    is_streamed: cint;
-    max_packet_size: cint;
-    checksum: culong;
-    checksum_ptr: PCuchar;
-    update_checksum: function (checksum: culong; buf: {const} PChar; size: cuint): culong; cdecl;
-    error: cint;         ///< contains the error code or 0 if no error happened
-    {$IF (LIBAVFORMAT_VERSION >= 52001000) and (LIBAVFORMAT_VERSION < 52004000)} // 52.1.0 .. 52.4.0
-    read_play: function(opaque: Pointer): cint; cdecl;
-    read_pause: function(opaque: Pointer): cint; cdecl;
-    {$IFEND}
-    {$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-    read_pause: function(opaque: Pointer; pause: cint): cint; cdecl;
-    {$IFEND}
-    {$IF LIBAVFORMAT_VERSION >= 52001000} // 52.1.0
-    read_seek: function(opaque: Pointer;
-                     stream_index: cint; timestamp: cint64; flags: cint): TOffset; cdecl;
-    {$IFEND}
-  end;
-
-function url_open(h: PPointer; filename: {const} PChar; flags: cint): cint;
-  cdecl; external av__format;
-function url_read (h: PURLContext; buf: PChar; size: cint): cint;
-  cdecl; external av__format;
-function url_write (h: PURLContext; buf: PChar; size: cint): cint;
-  cdecl; external av__format;
-function url_seek (h: PURLContext; pos: TOffset; whence: cint): TOffset;
-  cdecl; external av__format;
-function url_close (h: PURLContext): cint;
-  cdecl; external av__format;
-function url_exist(filename: {const} PChar): cint;
-  cdecl; external av__format;
-function url_filesize (h: PURLContext): TOffset;
-  cdecl; external av__format;
-
-(**
- * Return the maximum packet size associated to packetized file
- * handle. If the file is not packetized (stream like HTTP or file on
- * disk), then 0 is returned.
- *
- * @param h file handle
- * @return maximum packet size in bytes
- *)
-function url_get_max_packet_size(h: PURLContext): cint;
-  cdecl; external av__format;
-procedure url_get_filename(h: PURLContext; buf: PChar; buf_size: cint);
-  cdecl; external av__format;
-
-(**
- * The callback is called in blocking functions to test regulary if
- * asynchronous interruption is needed. AVERROR(EINTR) is returned
- * in this case by the interrupted function. 'NULL' means no interrupt
- * callback is given.
- *)
-procedure url_set_interrupt_cb (interrupt_cb: TURLInterruptCB);
-  cdecl; external av__format;
-
-(* not implemented *)
-function url_poll(poll_table: PURLPollEntry; n: cint; timeout: cint): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-(**
- * Pause and resume playing - only meaningful if using a network streaming
- * protocol (e.g. MMS).
- * @param pause 1 for pause, 0 for resume
- *)
-function av_url_read_pause(h: PURLContext; pause: cint): cint;
-  cdecl; external av__format;
-{$IFEND}
-
-{$IF LIBAVFORMAT_VERSION >= 52001000} // 52.1.0
-(**
- * Seek to a given timestamp relative to some component stream.
- * Only meaningful if using a network streaming protocol (e.g. MMS.).
- * @param stream_index The stream index that the timestamp is relative to.
- *        If stream_index is (-1) the timestamp should be in AV_TIME_BASE
- *        units from the beginning of the presentation.
- *        If a stream_index >= 0 is used and the protocol does not support
- *        seeking based on component streams, the call will fail with ENOTSUP.
- * @param timestamp timestamp in AVStream.time_base units
- *        or if there is no stream specified then in AV_TIME_BASE units.
- * @param flags Optional combination of AVSEEK_FLAG_BACKWARD, AVSEEK_FLAG_BYTE
- *        and AVSEEK_FLAG_ANY. The protocol may silently ignore
- *        AVSEEK_FLAG_BACKWARD and AVSEEK_FLAG_ANY, but AVSEEK_FLAG_BYTE will
- *        fail with ENOTSUP if used and not supported.
- * @return >= 0 on success
- * @see AVInputFormat::read_seek
- *)
-function av_url_read_seek(h: PURLContext;
-                     stream_index: cint; timestamp: cint64; flags: cint): TOffset;
-  cdecl; external av__format;
-{$IFEND}
-
-{
-var
-  first_protocol: PURLProtocol; external av__format;
-  url_interrupt_cb: PURLInterruptCB; external av__format;
-}
-
-{$IF LIBAVFORMAT_VERSION >= 52002000} // 52.2.0
-function av_protocol_next(p: PURLProtocol): PURLProtocol;
-  cdecl; external av__format;
-{$IFEND}
-
-function register_protocol (protocol: PURLProtocol): cint;
-  cdecl; external av__format;
-
-type
-  TReadWriteFunc = function (opaque: Pointer; buf: PChar; buf_size: cint): cint; cdecl;
-  TSeekFunc = function (opaque: Pointer; offset: TOffset; whence: cint): TOffset; cdecl;
-
-function init_put_byte(s: PByteIOContext;
-                buffer: PChar;
-                buffer_size: cint; write_flag: cint;
-                opaque: pointer;
-                read_packet: TReadWriteFunc;
-                write_packet: TReadWriteFunc;
-                seek: TSeekFunc): cint;
-  cdecl; external av__format;
-{$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-function av_alloc_put_byte(
-                  buffer: PChar;
-                  buffer_size: cint;
-                  write_flag: cint;
-                  opaque: Pointer;
-                  read_packet: TReadWriteFunc;
-                  write_packet: TReadWriteFunc;
-                  seek: TSeekFunc): PByteIOContext;
-  cdecl; external av__format;
-{$IFEND}
-
-procedure put_byte(s: PByteIOContext; b: cint);
-  cdecl; external av__format;
-procedure put_buffer (s: PByteIOContext; buf: {const} PChar; size: cint);
-  cdecl; external av__format;
-procedure put_le64(s: PByteIOContext; val: cuint64);
-  cdecl; external av__format;
-procedure put_be64(s: PByteIOContext; val: cuint64);
-  cdecl; external av__format;
-procedure put_le32(s: PByteIOContext; val: cuint);
-  cdecl; external av__format;
-procedure put_be32(s: PByteIOContext; val: cuint);
-  cdecl; external av__format;
-procedure put_le24(s: PByteIOContext; val: cuint);
-  cdecl; external av__format;
-procedure put_be24(s: PByteIOContext; val: cuint);
-  cdecl; external av__format;
-procedure put_le16(s: PByteIOContext; val: cuint);
-  cdecl; external av__format;
-procedure put_be16(s: PByteIOContext; val: cuint);
-  cdecl; external av__format;
-procedure put_tag(s: PByteIOContext; tag: {const} PChar);
-  cdecl; external av__format;
-
-procedure put_strz(s: PByteIOContext; buf: {const} PChar);
-  cdecl; external av__format;
-
-(**
- * fseek() equivalent for ByteIOContext.
- * @return new position or AVERROR.
- *)
-function url_fseek(s: PByteIOContext; offset: TOffset; whence: cint): TOffset;
-  cdecl; external av__format;
-
-(**
- * Skip given number of bytes forward.
- * @param offset number of bytes
- *)
-procedure url_fskip(s: PByteIOContext; offset: TOffset);
-  cdecl; external av__format;
-
-(**
- * ftell() equivalent for ByteIOContext.
- * @return position or AVERROR.
- *)
-function url_ftell(s: PByteIOContext): TOffset;
-  cdecl; external av__format;
-
-(**
- * Gets the filesize.
- * @return filesize or AVERROR
- *)
-function url_fsize(s: PByteIOContext): TOffset;
-  cdecl; external av__format;
-
-(**
- * feof() equivalent for ByteIOContext.
- * @return non zero if and only if end of file
- *)
-function url_feof(s: PByteIOContext): cint;
-  cdecl; external av__format;
-
-function url_ferror(s: PByteIOContext): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 52004000} // 52.4.0
-function av_url_read_fpause(h: PByteIOContext; pause: cint): cint;
-  cdecl; external av__format;
-{$IFEND}
-{$IF LIBAVFORMAT_VERSION >= 52001000} // 52.1.0
-function av_url_read_fseek(h: PByteIOContext;
-                      stream_index: cint; timestamp: cint64; flags: cint): TOffset;
-  cdecl; external av__format;
-{$IFEND}
-
-const
-  URL_EOF = -1;
-(** @note return URL_EOF (-1) if EOF *)
-function url_fgetc(s: PByteIOContext): cint;
-  cdecl; external av__format;
-
-(** @warning currently size is limited *)
-function url_fprintf(s: PByteIOContext; fmt: {const} PChar; args: array of const): cint;
-  cdecl; external av__format;
-
-(** @note unlike fgets, the EOL character is not returned and a whole
-   line is parsed. return NULL if first char read was EOF *)
-function url_fgets(s: PByteIOContext; buf: PChar; buf_size: cint): PChar;
-  cdecl; external av__format;
-
-procedure put_flush_packet (s: PByteIOContext);
-  cdecl; external av__format;
-  
-
-(**
- * Reads size bytes from ByteIOContext into buf.
- * @returns number of bytes read or AVERROR
- *)
-function get_buffer(s: PByteIOContext; buf: PChar; size: cint): cint;
-  cdecl; external av__format;
-
-(**
- * Reads size bytes from ByteIOContext into buf.
- * This reads at most 1 packet. If that is not enough fewer bytes will be
- * returned.
- * @returns number of bytes read or AVERROR
- *)
-function get_partial_buffer(s: PByteIOContext; buf: PChar; size: cint): cint;
-  cdecl; external av__format;
-
-(** @note return 0 if EOF, so you cannot use it if EOF handling is
-   necessary *)
-function get_byte(s: PByteIOContext): cint;
-  cdecl; external av__format;
-function get_le24(s: PByteIOContext): cuint;
-  cdecl; external av__format;
-function get_le32(s: PByteIOContext): cuint;
-  cdecl; external av__format;
-function get_le64(s: PByteIOContext): cuint64;
-  cdecl; external av__format;
-function get_le16(s: PByteIOContext): cuint;
-  cdecl; external av__format;
-
-function get_strz(s: PByteIOContext; buf: PChar; maxlen: cint): PChar;
-  cdecl; external av__format;
-function get_be16(s: PByteIOContext): cuint;
-  cdecl; external av__format;
-function get_be24(s: PByteIOContext): cuint;
-  cdecl; external av__format;
-function get_be32(s: PByteIOContext): cuint;
-  cdecl; external av__format;
-function get_be64(s: PByteIOContext): cuint64;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51017001} // 51.17.1
-function ff_get_v(bc: PByteIOContext): cuint64;
-  cdecl; external av__format;
-{$IFEND}
-
-function url_is_streamed(s: PByteIOContext): cint; {$IFDEF HasInline}inline;{$ENDIF}
-
-(** @note when opened as read/write, the buffers are only used for
-   writing *)
-{$IF LIBAVFORMAT_VERSION >= 52000000} // 52.0.0
-function url_fdopen (var s: PByteIOContext; h: PURLContext): cint;
-{$ELSE}
-function url_fdopen (s: PByteIOContext; h: PURLContext): cint;
-{$IFEND}
-  cdecl; external av__format;
-
-(** @warning must be called before any I/O *)
-function url_setbufsize (s: PByteIOContext; buf_size: cint): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51015000} // 51.15.0
-(** Reset the buffer for reading or writing.
- * @note Will drop any data currently in the buffer without transmitting it.
- * @param flags URL_RDONLY to set up the buffer for reading, or URL_WRONLY
- *        to set up the buffer for writing. *)
-function url_resetbuf(s: PByteIOContext; flags: cint): cint;
-  cdecl; external av__format;
-{$IFEND}
-
-(** @note when opened as read/write, the buffers are only used for
-   writing *)
-{$IF LIBAVFORMAT_VERSION >= 52000000} // 52.0.0
-function url_fopen(var s: PByteIOContext; filename: {const} PChar; flags: cint): cint;
-{$ELSE}
-function url_fopen(s: PByteIOContext; filename: {const} PChar; flags: cint): cint;
-{$IFEND}
-  cdecl; external av__format;
-function url_fclose(s: PByteIOContext): cint;
-  cdecl; external av__format;
-function url_fileno(s: PByteIOContext): PURLContext;
-  cdecl; external av__format;
-
-(**
- * Return the maximum packet size associated to packetized buffered file
- * handle. If the file is not packetized (stream like http or file on
- * disk), then 0 is returned.
- *
- * @param s buffered file handle
- * @return maximum packet size in bytes
- *)
-function url_fget_max_packet_size (s: PByteIOContext): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 52000000} // 52.0.0
-function url_open_buf(var s: PByteIOContext; buf: PChar; buf_size: cint; flags: cint): cint;
-{$ELSE}
-function url_open_buf(s: PByteIOContext; buf: PChar; buf_size: cint; flags: cint): cint;
-{$IFEND}
-  cdecl; external av__format;
-
-(** return the written or read size *)
-function url_close_buf(s: PByteIOContext): cint;
-  cdecl; external av__format;
-
-(**
- * Open a write only memory stream.
- *
- * @param s new IO context
- * @return zero if no error.
- *)
-{$IF LIBAVFORMAT_VERSION >= 52000000} // 52.0.0
-function url_open_dyn_buf(var s: PByteIOContext): cint;
-{$ELSE}
-function url_open_dyn_buf(s: PByteIOContext): cint;
-{$IFEND}
-  cdecl; external av__format;
-
-(**
- * Open a write only packetized memory stream with a maximum packet
- * size of 'max_packet_size'.  The stream is stored in a memory buffer
- * with a big endian 4 byte header giving the packet size in bytes.
- *
- * @param s new IO context
- * @param max_packet_size maximum packet size (must be > 0)
- * @return zero if no error.
- *)
-{$IF LIBAVFORMAT_VERSION >= 52000000} // 52.0.0
-function url_open_dyn_packet_buf(var s: PByteIOContext; max_packet_size: cint): cint;
-{$ELSE}
-function url_open_dyn_packet_buf(s: PByteIOContext; max_packet_size: cint): cint;
-{$IFEND}
-  cdecl; external av__format;
-
-(**
- * Return the written size and a pointer to the buffer. The buffer
- *  must be freed with av_free().
- * @param s IO context
- * @param pbuffer pointer to a byte buffer
- * @return the length of the byte buffer
- *)
-function url_close_dyn_buf(s: PByteIOContext; pbuffer:PPointer): cint;
-  cdecl; external av__format;
-
-{$IF LIBAVFORMAT_VERSION >= 51017001} // 51.17.1
-function ff_crc04C11DB7_update(checksum: culong; buf: {const} PChar; len: cuint): culong;
-  cdecl; external av__format;
-{$IFEND}
-function get_checksum(s: PByteIOContext): culong;
-  cdecl; external av__format;
-procedure init_checksum (s: PByteIOContext; update_checksum: pointer; checksum: culong);
-  cdecl; external av__format;
-
-(* udp.c *)
-function udp_set_remote_url(h: PURLContext; uri: {const} PChar): cint;
-  cdecl; external av__format;
-function udp_get_local_port(h: PURLContext): cint;
-  cdecl; external av__format;
-function udp_get_file_handle(h: PURLContext): cint;
-  cdecl; external av__format;
-
-implementation
-
-function url_is_streamed(s: PByteIOContext): cint;
-begin
-  Result := s^.is_streamed;
-end;
-
-end.
diff --git a/Game/Code/lib/ffmpeg/avutil.pas b/Game/Code/lib/ffmpeg/avutil.pas
deleted file mode 100644
index 17ae141a..00000000
--- a/Game/Code/lib/ffmpeg/avutil.pas
+++ /dev/null
@@ -1,320 +0,0 @@
-(*
- * copyright (c) 2006 Michael Niedermayer <michaelni@gmx.at>
- *
- * This library 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 of the License, or (at your option) any later version.
- *
- * This library 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 this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
- *)
-
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversions of
- *
- * libavutil/avutil.h:
- *  Min. version: 49.0.1, revision 6577,  Sat Oct 7 15:30:46 2006 UTC
- *  Max. version: 49.8.0, revision 14665, Fri Aug 8 18:32:20 2008 UTC
- *
- * libavutil/mem.h:
- *  revision 13665, Thu Jun 5 19:49:47 2008 UTC
- *
- * libavutil/log.h:
- *  revision 13068, Tue May 6 08:41:13 2008 UTC
- *)
-
-unit avutil;
-
-{$IFDEF FPC}
-  {$MODE DELPHI}
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-{$IFDEF DARWIN}
-  {$linklib libavutil}
-{$ENDIF}
-
-interface
-
-uses
-  ctypes,
-  mathematics,
-  rational,
-  UConfig;
-
-const
-  (* Max. supported version by this header *)
-  LIBAVUTIL_MAX_VERSION_MAJOR   = 49;
-  LIBAVUTIL_MAX_VERSION_MINOR   = 8;
-  LIBAVUTIL_MAX_VERSION_RELEASE = 0;
-  LIBAVUTIL_MAX_VERSION = (LIBAVUTIL_MAX_VERSION_MAJOR * VERSION_MAJOR) +
-                          (LIBAVUTIL_MAX_VERSION_MINOR * VERSION_MINOR) +
-                          (LIBAVUTIL_MAX_VERSION_RELEASE * VERSION_RELEASE);
-
-  (* Min. supported version by this header *)
-  LIBAVUTIL_MIN_VERSION_MAJOR   = 49;
-  LIBAVUTIL_MIN_VERSION_MINOR   = 0;
-  LIBAVUTIL_MIN_VERSION_RELEASE = 1;
-  LIBAVUTIL_MIN_VERSION = (LIBAVUTIL_MIN_VERSION_MAJOR * VERSION_MAJOR) +
-                          (LIBAVUTIL_MIN_VERSION_MINOR * VERSION_MINOR) +
-                          (LIBAVUTIL_MIN_VERSION_RELEASE * VERSION_RELEASE);
-
-(* Check if linked versions are supported *)
-{$IF (LIBAVUTIL_VERSION < LIBAVUTIL_MIN_VERSION)}
-  {$MESSAGE Error 'Linked version of libavutil is too old!'}
-{$IFEND}
-
-{$IF (LIBAVUTIL_VERSION > LIBAVUTIL_MAX_VERSION)}
-  {$MESSAGE Warn 'Linked version of libavutil may be unsupported!'}
-{$IFEND}
-
-{$IF LIBAVUTIL_VERSION >= 49008000} // 49.8.0
-(**
- * Returns the LIBAVUTIL_VERSION_INT constant.
- *)
-function avutil_version(): cuint;
-  cdecl; external av__format;
-{$IFEND}
-
-type
-(**
- * Pixel format. Notes:
- *
- * PIX_FMT_RGB32 is handled in an endian-specific manner. A RGBA
- * color is put together as:
- *  (A << 24) | (R << 16) | (G << 8) | B
- * This is stored as BGRA on little endian CPU architectures and ARGB on
- * big endian CPUs.
- *
- * When the pixel format is palettized RGB (PIX_FMT_PAL8), the palettized
- * image data is stored in AVFrame.data[0]. The palette is transported in
- * AVFrame.data[1] and, is 1024 bytes long (256 4-byte entries) and is
- * formatted the same as in PIX_FMT_RGB32 described above (i.e., it is
- * also endian-specific). Note also that the individual RGB palette
- * components stored in AVFrame.data[1] should be in the range 0..255.
- * This is important as many custom PAL8 video codecs that were designed
- * to run on the IBM VGA graphics adapter use 6-bit palette components.
- *)
-
-  PAVPixelFormat = ^TAVPixelFormat;
-  TAVPixelFormat = (
-    PIX_FMT_NONE= -1,
-    PIX_FMT_YUV420P,   ///< Planar YUV 4:2:0, 12bpp, (1 Cr & Cb sample per 2x2 Y samples)
-    PIX_FMT_YUYV422,   ///< Packed YUV 4:2:2, 16bpp, Y0 Cb Y1 Cr
-    PIX_FMT_RGB24,     ///< Packed RGB 8:8:8, 24bpp, RGBRGB...
-    PIX_FMT_BGR24,     ///< Packed RGB 8:8:8, 24bpp, BGRBGR...
-    PIX_FMT_YUV422P,   ///< Planar YUV 4:2:2, 16bpp, (1 Cr & Cb sample per 2x1 Y samples)
-    PIX_FMT_YUV444P,   ///< Planar YUV 4:4:4, 24bpp, (1 Cr & Cb sample per 1x1 Y samples)
-    PIX_FMT_RGB32,     ///< Packed RGB 8:8:8, 32bpp, (msb)8A 8R 8G 8B(lsb), in cpu endianness
-    PIX_FMT_YUV410P,   ///< Planar YUV 4:1:0,  9bpp, (1 Cr & Cb sample per 4x4 Y samples)
-    PIX_FMT_YUV411P,   ///< Planar YUV 4:1:1, 12bpp, (1 Cr & Cb sample per 4x1 Y samples)
-    PIX_FMT_RGB565,    ///< Packed RGB 5:6:5, 16bpp, (msb)   5R 6G 5B(lsb), in cpu endianness
-    PIX_FMT_RGB555,    ///< Packed RGB 5:5:5, 16bpp, (msb)1A 5R 5G 5B(lsb), in cpu endianness most significant bit to 1
-    PIX_FMT_GRAY8,     ///<        Y        ,  8bpp
-    PIX_FMT_MONOWHITE, ///<        Y        ,  1bpp, 0 is white, 1 is black
-    PIX_FMT_MONOBLACK, ///<        Y        ,  1bpp, 0 is black, 1 is white
-    PIX_FMT_PAL8,      ///< 8 bit with PIX_FMT_RGB32 palette
-    PIX_FMT_YUVJ420P,  ///< Planar YUV 4:2:0, 12bpp, full scale (jpeg)
-    PIX_FMT_YUVJ422P,  ///< Planar YUV 4:2:2, 16bpp, full scale (jpeg)
-    PIX_FMT_YUVJ444P,  ///< Planar YUV 4:4:4, 24bpp, full scale (jpeg)
-    PIX_FMT_XVMC_MPEG2_MC,///< XVideo Motion Acceleration via common packet passing(xvmc_render.h)
-    PIX_FMT_XVMC_MPEG2_IDCT,
-    PIX_FMT_UYVY422,   ///< Packed YUV 4:2:2, 16bpp, Cb Y0 Cr Y1
-    PIX_FMT_UYYVYY411, ///< Packed YUV 4:1:1, 12bpp, Cb Y0 Y1 Cr Y2 Y3
-    PIX_FMT_BGR32,     ///< Packed RGB 8:8:8, 32bpp, (msb)8A 8B 8G 8R(lsb), in cpu endianness
-    PIX_FMT_BGR565,    ///< Packed RGB 5:6:5, 16bpp, (msb)   5B 6G 5R(lsb), in cpu endianness
-    PIX_FMT_BGR555,    ///< Packed RGB 5:5:5, 16bpp, (msb)1A 5B 5G 5R(lsb), in cpu endianness most significant bit to 1
-    PIX_FMT_BGR8,      ///< Packed RGB 3:3:2,  8bpp, (msb)2B 3G 3R(lsb)
-    PIX_FMT_BGR4,      ///< Packed RGB 1:2:1,  4bpp, (msb)1B 2G 1R(lsb)
-    PIX_FMT_BGR4_BYTE, ///< Packed RGB 1:2:1,  8bpp, (msb)1B 2G 1R(lsb)
-    PIX_FMT_RGB8,      ///< Packed RGB 3:3:2,  8bpp, (msb)2R 3G 3B(lsb)
-    PIX_FMT_RGB4,      ///< Packed RGB 1:2:1,  4bpp, (msb)2R 3G 3B(lsb)
-    PIX_FMT_RGB4_BYTE, ///< Packed RGB 1:2:1,  8bpp, (msb)2R 3G 3B(lsb)
-    PIX_FMT_NV12,      ///< Planar YUV 4:2:0, 12bpp, 1 plane for Y and 1 for UV
-    PIX_FMT_NV21,      ///< as above, but U and V bytes are swapped
-
-    PIX_FMT_RGB32_1,   ///< Packed RGB 8:8:8, 32bpp, (msb)8R 8G 8B 8A(lsb), in cpu endianness
-    PIX_FMT_BGR32_1,   ///< Packed RGB 8:8:8, 32bpp, (msb)8B 8G 8R 8A(lsb), in cpu endianness
-
-    PIX_FMT_GRAY16BE,  ///<        Y        , 16bpp, big-endian
-    PIX_FMT_GRAY16LE,  ///<        Y        , 16bpp, little-endian
-    PIX_FMT_YUV440P,   ///< Planar YUV 4:4:0 (1 Cr & Cb sample per 1x2 Y samples)
-    PIX_FMT_YUVJ440P,  ///< Planar YUV 4:4:0 full scale (jpeg)
-    PIX_FMT_YUVA420P,  ///< Planar YUV 4:2:0, 20bpp, (1 Cr & Cb sample per 2x2 Y & A samples)
-    PIX_FMT_NB         ///< number of pixel formats, DO NOT USE THIS if you want to link with shared libav* because the number of formats might differ between versions
-  );
-
-const
-{$ifdef WORDS_BIGENDIAN}
-  PIX_FMT_RGBA = PIX_FMT_RGB32_1;
-  PIX_FMT_BGRA = PIX_FMT_BGR32_1;
-  PIX_FMT_ARGB = PIX_FMT_RGB32;
-  PIX_FMT_ABGR = PIX_FMT_BGR32;
-  PIX_FMT_GRAY16 = PIX_FMT_GRAY16BE;
-{$else}
-  PIX_FMT_RGBA = PIX_FMT_BGR32;
-  PIX_FMT_BGRA = PIX_FMT_RGB32;
-  PIX_FMT_ARGB = PIX_FMT_BGR32_1;
-  PIX_FMT_ABGR = PIX_FMT_RGB32_1;
-  PIX_FMT_GRAY16 = PIX_FMT_GRAY16LE;
-{$endif}
-
-{$IF LIBAVUTIL_VERSION_MAJOR < 50} // 50.0.0
-  PIX_FMT_UYVY411 = PIX_FMT_UYYVYY411;
-  PIX_FMT_RGBA32  = PIX_FMT_RGB32;
-  PIX_FMT_YUV422  = PIX_FMT_YUYV422;
-{$IFEND}
-
-(* common.h *)
-
-function MKTAG(a,b,c,d: char): integer;
-
-(* mem.h *)
-
-(**
- * Allocate a block of \p size bytes with alignment suitable for all
- * memory accesses (including vectors if available on the CPU).
- * @param size Size in bytes for the memory block to be allocated.
- * @return Pointer to the allocated block, NULL if it cannot allocate
- * it.
- * @see av_mallocz()
- *)
-function av_malloc(size: cuint): pointer;
-  cdecl; external av__util; {av_malloc_attrib av_alloc_size(1)}
-
-(**
- * Allocate or reallocate a block of memory.
- * If \p ptr is NULL and \p size > 0, allocate a new block. If \p
- * size is zero, free the memory block pointed by \p ptr.
- * @param size Size in bytes for the memory block to be allocated or
- * reallocated.
- * @param ptr Pointer to a memory block already allocated with
- * av_malloc(z)() or av_realloc() or NULL.
- * @return Pointer to a newly reallocated block or NULL if it cannot
- * reallocate or the function is used to free the memory block.
- * @see av_fast_realloc()
- *)
-function av_realloc(ptr: pointer; size: cuint): pointer;
-  cdecl; external av__util; {av_alloc_size(2)}
-
-(**
- * Free a memory block which has been allocated with av_malloc(z)() or
- * av_realloc().
- * @param ptr Pointer to the memory block which should be freed.
- * @note ptr = NULL is explicitly allowed.
- * @note It is recommended that you use av_freep() instead.
- * @see av_freep()
- *)
-procedure av_free(ptr: pointer);
-  cdecl; external av__util;
-
-(**
- * Allocate a block of \p size bytes with alignment suitable for all
- * memory accesses (including vectors if available on the CPU) and
- * set to zeroes all the bytes of the block.
- * @param size Size in bytes for the memory block to be allocated.
- * @return Pointer to the allocated block, NULL if it cannot allocate
- * it.
- * @see av_malloc()
- *)
-function av_mallocz(size: cuint): pointer;
-  cdecl; external av__util; {av_malloc_attrib av_alloc_size(1)}
-
-(**
- * Duplicate the string \p s.
- * @param s String to be duplicated.
- * @return Pointer to a newly allocated string containing a
- * copy of \p s or NULL if it cannot be allocated.
- *)
-function av_strdup({const} s: PChar): PChar;
-  cdecl; external av__util; {av_malloc_attrib}
-
-(**
- * Free a memory block which has been allocated with av_malloc(z)() or
- * av_realloc() and set to NULL the pointer to it.
- * @param ptr Pointer to the pointer to the memory block which should
- * be freed.
- * @see av_free()
- *)
-procedure av_freep (ptr: pointer);
-  cdecl; external av__util;
-
-(* log.h *)
-
-const
-{$IF LIBAVUTIL_VERSION_MAJOR < 50}
-  AV_LOG_QUIET   = -1;
-  AV_LOG_FATAL   =  0;
-  AV_LOG_ERROR   =  0;
-  AV_LOG_WARNING =  1;
-  AV_LOG_INFO    =  1;
-  AV_LOG_VERBOSE =  1;
-  AV_LOG_DEBUG   =  2;
-{$ELSE}
-  AV_LOG_QUIET   = -8;
-
-(**
- * something went really wrong and we will crash now
- *)
-  AV_LOG_PANIC   =  0;
-
-(**
- * something went wrong and recovery is not possible
- * like no header in a format which depends on it or a combination
- * of parameters which are not allowed
- *)
-  AV_LOG_FATAL   =  8;
-
-(**
- * something went wrong and cannot losslessly be recovered
- * but not all future data is affected
- *)
-  AV_LOG_ERROR   = 16;
-
-(**
- * something somehow does not look correct / something which may or may not
- * lead to some problems like use of -vstrict -2
- *)
-  AV_LOG_WARNING = 24;
-
-  AV_LOG_INFO    = 32;
-  AV_LOG_VERBOSE = 40;
-
-(**
- * stuff which is only useful for libav* developers
- *)
-  AV_LOG_DEBUG   = 48;
-{$IFEND}
-
-function av_log_get_level(): cint;
-  cdecl; external av__util;
-procedure av_log_set_level(level: cint);
-  cdecl; external av__util;
-
-
-implementation
-
-function MKTAG(a,b,c,d: char): integer;
-begin
-  Result := (ord(a) or (ord(b) shl 8) or (ord(c) shl 16) or (ord(d) shl 24));
-end;
-
-end.
diff --git a/Game/Code/lib/ffmpeg/mathematics.pas b/Game/Code/lib/ffmpeg/mathematics.pas
deleted file mode 100644
index 2d352df0..00000000
--- a/Game/Code/lib/ffmpeg/mathematics.pas
+++ /dev/null
@@ -1,81 +0,0 @@
-(*
- * copyright (c) 2005 Michael Niedermayer <michaelni@gmx.at>
- *
- * This library 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 of the License, or (at your option) any later version.
- *
- * This library 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 this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
- *)
-
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libavutil/mathematics.h
- * revision 12498, Wed Mar 19 06:17:43 2008 UTC
- *)
-
-unit mathematics;
-
-{$IFDEF FPC}
-  {$MODE DELPHI }
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-interface
-
-uses
-  ctypes,
-  rational,
-  UConfig;
-
-type
-  TAVRounding = (
-    AV_ROUND_ZERO     = 0, ///< round toward zero
-    AV_ROUND_INF      = 1, ///< round away from zero
-    AV_ROUND_DOWN     = 2, ///< round toward -infinity
-    AV_ROUND_UP       = 3, ///< round toward +infinity
-    AV_ROUND_NEAR_INF = 5  ///< round to nearest and halfway cases away from zero
-  );
-
-(**
- * rescale a 64bit integer with rounding to nearest.
- * a simple a*b/c isn't possible as it can overflow
- *)
-function av_rescale (a, b, c: cint64): cint64;
-  cdecl; external av__util; {av_const}
-
-(**
- * rescale a 64bit integer with specified rounding.
- * a simple a*b/c isn't possible as it can overflow
- *)
-function av_rescale_rnd (a, b, c: cint64; enum: TAVRounding): cint64;
-  cdecl; external av__util; {av_const}
-
-(**
- * rescale a 64bit integer by 2 rational numbers.
- *)
-function av_rescale_q (a: cint64; bq, cq: TAVRational): cint64;
-  cdecl; external av__util; {av_const}
-
-implementation
-
-end.
- 
diff --git a/Game/Code/lib/ffmpeg/opt.pas b/Game/Code/lib/ffmpeg/opt.pas
deleted file mode 100644
index bc46fbf2..00000000
--- a/Game/Code/lib/ffmpeg/opt.pas
+++ /dev/null
@@ -1,198 +0,0 @@
-(*
- * AVOptions
- * copyright (c) 2005 Michael Niedermayer <michaelni@gmx.at>
- *
- * This library 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 of the License, or (at your option) any later version.
- *
- * This library 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 this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
- *)
-
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libavcodec/opt.h
- * revision 14436, Sun Jul 27 20:55:56 2008 UTC 
- *)
-
-unit opt;
-
-{$IFDEF FPC}
-  {$MODE DELPHI}
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-interface
-
-uses
-  ctypes,
-  rational,
-  UConfig;
-
-type
-  TAVOptionType = (
-    FF_OPT_TYPE_FLAGS,
-    FF_OPT_TYPE_INT,
-    FF_OPT_TYPE_INT64,
-    FF_OPT_TYPE_DOUBLE,
-    FF_OPT_TYPE_FLOAT,
-    FF_OPT_TYPE_STRING,
-    FF_OPT_TYPE_RATIONAL,
-    FF_OPT_TYPE_BINARY,  ///< offset must point to a pointer immediately followed by an int for the length
-    FF_OPT_TYPE_CONST = 128
-  );
-
-const
-  AV_OPT_FLAG_ENCODING_PARAM  = 1;   ///< a generic parameter which can be set by the user for muxing or encoding
-  AV_OPT_FLAG_DECODING_PARAM  = 2;   ///< a generic parameter which can be set by the user for demuxing or decoding
-  AV_OPT_FLAG_METADATA        = 4;   ///< some data extracted or inserted into the file like title, comment, ...
-  AV_OPT_FLAG_AUDIO_PARAM     = 8;
-  AV_OPT_FLAG_VIDEO_PARAM     = 16;
-  AV_OPT_FLAG_SUBTITLE_PARAM  = 32;
-
-type
-  (**
-   * AVOption
-   *)
-  PAVOption = ^TAVOption;
-  TAVOption = record
-    name: {const} PChar;
-    
-    (**
-     * short English help text
-     * @todo What about other languages?
-     *)
-    help: {const} PChar;
-
-    (**
-     * The offset relative to the context structure where the option
-     * value is stored. It should be 0 for named constants.
-     *)
-    offset: cint;
-    type_: TAVOptionType;
-
-    (**
-     * the default value for scalar options
-     *)
-    default_val: cdouble;
-    min: cdouble;                ///< minimum valid value for the option
-    max: cdouble;                ///< maximum valid value for the option
-
-    flags: cint;
-//FIXME think about enc-audio, ... style flags
-
-    (**
-     * The logical unit to which the option belongs. Non-constant
-     * options and corresponding named constants share the same
-     * unit. May be NULL.
-     *)
-    unit_: {const} PChar;
-  end;
-
-{$IF LIBAVCODEC_VERSION >= 51039000} // 51.39.0
-(**
- * Looks for an option in \p obj. Looks only for the options which
- * have the flags set as specified in \p mask and \p flags (that is,
- * for which it is the case that opt->flags & mask == flags).
- *
- * @param[in] obj a pointer to a struct whose first element is a
- * pointer to an #AVClass
- * @param[in] name the name of the option to look for
- * @param[in] unit the unit of the option to look for, or any if NULL
- * @return a pointer to the option found, or NULL if no option
- * has been found
- *)
-function av_find_opt(obj: Pointer; {const} name: {const} PChar; {const} unit_: PChar; mask: cint; flags: cint): {const} PAVOption;
-  cdecl; external av__codec;
-{$IFEND}
-
-(**
- * @see av_set_string2()
- *)
-function av_set_string(obj: pointer; name: {const} pchar; val: {const} pchar): {const} PAVOption;
-  cdecl; external av__codec; deprecated;
-
-{$IF LIBAVCODEC_VERSION >= 51059000} // 51.59.0
-(**
- * Sets the field of obj with the given name to value.
- *
- * @param[in] obj A struct whose first element is a pointer to an
- * AVClass.
- * @param[in] name the name of the field to set
- * @param[in] val The value to set. If the field is not of a string
- * type, then the given string is parsed.
- * SI postfixes and some named scalars are supported.
- * If the field is of a numeric type, it has to be a numeric or named
- * scalar. Behavior with more than one scalar and +- infix operators
- * is undefined.
- * If the field is of a flags type, it has to be a sequence of numeric
- * scalars or named flags separated by '+' or '-'. Prefixing a flag
- * with '+' causes it to be set without affecting the other flags;
- * similarly, '-' unsets a flag.
- * @return a pointer to the AVOption corresponding to the field set or
- * NULL if no matching AVOption exists, or if the value \p val is not
- * valid
- * @param alloc when 1 then the old value will be av_freed() and the
- *                     new av_strduped()
- *              when 0 then no av_free() nor av_strdup() will be used
- *)
-function av_set_string2(obj: Pointer; name: {const} PChar; val: {const} PChar; alloc: cint): {const} PAVOption;
-  cdecl; external av__codec;
-{$IFEND}
-
-function av_set_double(obj: pointer; name: {const} pchar; n: cdouble): PAVOption;
-  cdecl; external av__codec;
-
-function av_set_q(obj: pointer; name: {const} pchar; n: TAVRational): PAVOption;
-  cdecl; external av__codec;
-
-function av_set_int(obj: pointer; name: {const} pchar; n: cint64): PAVOption;
-  cdecl; external av__codec;
-
-function av_get_double(obj: pointer; name: {const} pchar; var o_out: PAVOption): cdouble;
-  cdecl; external av__codec;
-
-function av_get_q(obj: pointer; name: {const} pchar; var o_out: PAVOption): TAVRational;
-  cdecl; external av__codec;
-
-function av_get_int(obj: pointer; name: {const} pchar; var o_out: {const} PAVOption): cint64;
-  cdecl; external av__codec;
-
-function av_get_string(obj: pointer; name: {const} pchar; var o_out: {const} PAVOption; buf: pchar; buf_len: cint): pchar;
-  cdecl; external av__codec;
-
-function av_next_option(obj: pointer; last: {const} PAVOption): PAVOption;
-  cdecl; external av__codec;
-
-function av_opt_show(obj: pointer; av_log_obj: pointer): cint;
-  cdecl; external av__codec;
-
-procedure av_opt_set_defaults(s: pointer);
-  cdecl; external av__codec;
-
-{$IF LIBAVCODEC_VERSION >= 51039000} // 51.39.0
-procedure av_opt_set_defaults2(s: Pointer; mask: cint; flags: cint);
-  cdecl; external av__codec;
-{$IFEND}
-
-implementation
-
-end.
diff --git a/Game/Code/lib/ffmpeg/rational.pas b/Game/Code/lib/ffmpeg/rational.pas
deleted file mode 100644
index 5a2629a9..00000000
--- a/Game/Code/lib/ffmpeg/rational.pas
+++ /dev/null
@@ -1,153 +0,0 @@
-(*
- * Rational numbers
- * Copyright (c) 2003 Michael Niedermayer <michaelni@gmx.at>
- *
- * This library 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 of the License, or (at your option) any later version.
- *
- * This library 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 this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
- *)
- 
-(*
- * This is a part of Pascal porting of ffmpeg.
- * - Originally by Victor Zinetz for Delphi and Free Pascal on Windows.
- * - For Mac OS X, some modifications were made by The Creative CAT, denoted as CAT
- *   in the source codes.
- * - Changes and updates by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libavutil/rational.h
- * revision 12498, Wed Mar 19 06:17:43 2008 UTC
- *)
-
-unit rational;
-
-{$IFDEF FPC}
-  {$MODE DELPHI}
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-{$I switches.inc}
-
-interface
-
-uses
-  ctypes,
-  UConfig;
-
-type
-(*
- * Rational number num/den.
- *)
-  PAVRational = ^TAVRational;
-  TAVRational = record
-    num: cint; ///< numerator
-    den: cint; ///< denominator
-  end;
-
-(**
- * Compare two rationals.
- * @param a first rational
- * @param b second rational
- * @return 0 if a==b, 1 if a>b and -1 if a<b.
- *)
-function av_cmp_q(a: TAVRational; b: TAVRational): cint; {$IFDEF HasInline}inline;{$ENDIF}
-
-(**
- * Rational to double conversion.
- * @param a rational to convert
- * @return (double) a
- *)
-function av_q2d(a: TAVRational): cdouble; {$IFDEF HasInline}inline;{$ENDIF}
-
-(**
- * Reduce a fraction.
- * This is useful for framerate calculations.
- * @param dst_nom destination numerator
- * @param dst_den destination denominator
- * @param nom source numerator
- * @param den source denominator
- * @param max the maximum allowed for dst_nom & dst_den
- * @return 1 if exact, 0 otherwise
- *)
-function av_reduce(dst_nom: PCint; dst_den: PCint; nom: cint64; den: cint64; max: cint64): cint;
-  cdecl; external av__util;
-
-(**
- * Multiplies two rationals.
- * @param b first rational.
- * @param c second rational.
- * @return b*c.
- *)
-function av_mul_q(b: TAVRational; c: TAVRational): TAVRational;
-  cdecl; external av__util; {av_const}
-
-(**
- * Divides one rational by another.
- * @param b first rational.
- * @param c second rational.
- * @return b/c.
- *)
-function av_div_q(b: TAVRational; c: TAVRational): TAVRational;
-  cdecl; external av__util; {av_const}
-
-(**
- * Adds two rationals.
- * @param b first rational.
- * @param c second rational.
- * @return b+c.
- *)
-function av_add_q(b: TAVRational; c: TAVRational): TAVRational;
-  cdecl; external av__util; {av_const}
-
-(**
- * Subtracts one rational from another.
- * @param b first rational.
- * @param c second rational.
- * @return b-c.
- *)
-function av_sub_q(b: TAVRational; c: TAVRational): TAVRational;
-  cdecl; external av__util; {av_const}
-
-(**
- * Converts a double precision floating point number to a rational.
- * @param d double to convert
- * @param max the maximum allowed numerator and denominator
- * @return (AVRational) d.
- *)
-function av_d2q(d: cdouble; max: cint): TAVRational;
-  cdecl; external av__util; {av_const}
-
-implementation
-
-function av_cmp_q (a: TAVRational; b: TAVRational): cint;
-var
-  tmp: cint64;
-begin
-  tmp := a.num * cint64(b.den) - b.num * cint64(a.den);
-
-  if (tmp <> 0) then
-    Result := (tmp shr 63) or 1
-  else
-    Result := 0
-end;
-
-function av_q2d(a: TAVRational): cdouble;
-begin
-  Result := a.num / a.den;
-end;
-
-end.
diff --git a/Game/Code/lib/ffmpeg/src/MacOSX/MacOSXReadMe.txt b/Game/Code/lib/ffmpeg/src/MacOSX/MacOSXReadMe.txt
deleted file mode 100644
index 59e54e04..00000000
--- a/Game/Code/lib/ffmpeg/src/MacOSX/MacOSXReadMe.txt
+++ /dev/null
@@ -1,23 +0,0 @@
-
-How to download an build ffmpeg for UltraStar Deluxe on Mac OS X:
-
-1. Open a terminal.
-
-2. cd into the Game/Code/lib/ffmpeg/src/MacOSX directory
-
-3. Run the following command:
-
-svn checkout svn://svn.mplayerhq.hu/ffmpeg/trunk ffmpeg
-
-4. The compile ffmpeg. I made a script for this:
-
-./build_ffmpeg.sh
-
-5. On OS X you have to patch the the dylibs. Run the following 
-   script. It patches the dylibs and copies them to the 
-   lib/ffmpeg dir:
-
-./copy_and_patch_dylibs.sh
-
-
-You're done.
diff --git a/Game/Code/lib/ffmpeg/src/MacOSX/build_ffmpeg.sh b/Game/Code/lib/ffmpeg/src/MacOSX/build_ffmpeg.sh
deleted file mode 100755
index bcb3ca1e..00000000
--- a/Game/Code/lib/ffmpeg/src/MacOSX/build_ffmpeg.sh
+++ /dev/null
@@ -1,6 +0,0 @@
-#!/bin/bash
-
-cd ffmpeg
-./configure --enable-shared --disable-static --disable-mmx
-make
-
diff --git a/Game/Code/lib/ffmpeg/src/MacOSX/copy_and_patch_dylibs.sh b/Game/Code/lib/ffmpeg/src/MacOSX/copy_and_patch_dylibs.sh
deleted file mode 100755
index 064d2ecc..00000000
--- a/Game/Code/lib/ffmpeg/src/MacOSX/copy_and_patch_dylibs.sh
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/bin/bash
-
-# Copy dylibs:
-cp ffmpeg/libavcodec/libavcodec.51.dylib ../../libavcodec.dylib
-cp ffmpeg/libavformat/libavformat.52.dylib ../../libavformat.dylib
-cp ffmpeg/libavutil/libavutil.49.dylib ../../libavutil.dylib
-
-# Patching libavcodec:
-install_name_tool -id @executable_path/libavcodec.dylib ../../libavcodec.dylib
-install_name_tool -change /usr/local/lib/libavutil.dylib @executable_path/libavutil.dylib ../../libavcodec.dylib
-
-# Patching libavformat:
-install_name_tool -id @executable_path/libavformat.dylib ../../libavformat.dylib
-install_name_tool -change /usr/local/lib/libavutil.dylib @executable_path/libavutil.dylib ../../libavformat.dylib
-install_name_tool -change /usr/local/lib/libavcodec.dylib @executable_path/libavcodec.dylib ../../libavformat.dylib
-
-# Patching libavcodec:
-install_name_tool -id @executable_path/libavutil.dylib ../../libavutil.dylib
-
-# Printing result:
-otool -L ../../libavutil.dylib
-otool -L ../../libavcodec.dylib
-otool -L ../../libavformat.dylib
\ No newline at end of file
diff --git a/Game/Code/lib/ffmpeg/swscale.pas b/Game/Code/lib/ffmpeg/swscale.pas
deleted file mode 100644
index cac14d57..00000000
--- a/Game/Code/lib/ffmpeg/swscale.pas
+++ /dev/null
@@ -1,202 +0,0 @@
-(*
- * Copyright (C) 2001-2003 Michael Niedermayer <michaelni@gmx.at>
- *
- * 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
- *)
-
-(*
- * FFmpeg Pascal port
- * - Ported by the UltraStar Deluxe Team
- *)
-
-(*
- * Conversion of libswscale/swscale.h
- * revision 26183, Thu Mar 6 11:32:25 2008 UTC
- *)
- 
-unit swscale;
-
-{$IFDEF FPC}
-  {$MODE DELPHI }
-  {$PACKENUM 4}    (* use 4-byte enums *)
-  {$PACKRECORDS C} (* C/C++-compatible record packing *)
-{$ELSE}
-  {$MINENUMSIZE 4} (* use 4-byte enums *)
-{$ENDIF}
-
-{$IFDEF DARWIN}
-  {$linklib libswscale}
-{$ENDIF}
-
-interface
-
-uses
-  ctypes,
-  avutil,
-  UConfig;
-
-const
-  (* Max. supported version by this header *)
-  LIBSWSCALE_MAX_VERSION_MAJOR   = 0;
-  LIBSWSCALE_MAX_VERSION_MINOR   = 5;
-  LIBSWSCALE_MAX_VERSION_RELEASE = 1;
-  LIBSWSCALE_MAX_VERSION = (LIBSWSCALE_MAX_VERSION_MAJOR * VERSION_MAJOR) +
-                           (LIBSWSCALE_MAX_VERSION_MINOR * VERSION_MINOR) +
-                           (LIBSWSCALE_MAX_VERSION_RELEASE * VERSION_RELEASE);
-
-(* Check if linked versions are supported *)
-{$IF (LIBSWSCALE_VERSION > LIBSWSCALE_MAX_VERSION)}
-  {$MESSAGE Warn 'Linked version of libswscale may be unsupported!'}
-{$IFEND}
-
-type
-  TQuadCintArray = array[0..3] of cint;
-  PQuadCintArray = ^TQuadCintArray;
-  TCintArray = array[0..0] of cint;
-  PCintArray = ^TCintArray;
-  TPCuint8Array = array[0..0] of PCuint8;
-  PPCuint8Array = ^TPCuint8Array;
-
-const
-  {* values for the flags, the stuff on the command line is different *}
-  SWS_FAST_BILINEAR =    1;
-  SWS_BILINEAR      =    2;
-  SWS_BICUBIC       =    4;
-  SWS_X             =    8;
-  SWS_POINT         =  $10;
-  SWS_AREA          =  $20;
-  SWS_BICUBLIN      =  $40;
-  SWS_GAUSS         =  $80;
-  SWS_SINC          = $100;
-  SWS_LANCZOS       = $200;
-  SWS_SPLINE        = $400;
-
-  SWS_SRC_V_CHR_DROP_MASK  = $30000;
-  SWS_SRC_V_CHR_DROP_SHIFT = 16;
-
-  SWS_PARAM_DEFAULT        = 123456;
-
-  SWS_PRINT_INFO           = $1000;
-
-  //the following 3 flags are not completely implemented
-  //internal chrominace subsampling info
-  SWS_FULL_CHR_H_INT    = $2000;
-  //input subsampling info
-  SWS_FULL_CHR_H_INP    = $4000;
-  SWS_DIRECT_BGR        = $8000;
-  SWS_ACCURATE_RND      = $40000;
-
-  SWS_CPU_CAPS_MMX      = $80000000;
-  SWS_CPU_CAPS_MMX2     = $20000000;
-  SWS_CPU_CAPS_3DNOW    = $40000000;
-  SWS_CPU_CAPS_ALTIVEC  = $10000000;
-  SWS_CPU_CAPS_BFIN     = $01000000;
-
-  SWS_MAX_REDUCE_CUTOFF = 0.002;
-
-  SWS_CS_ITU709         = 1;
-  SWS_CS_FCC            = 4;
-  SWS_CS_ITU601         = 5;
-  SWS_CS_ITU624         = 5;
-  SWS_CS_SMPTE170M      = 5;
-  SWS_CS_SMPTE240M      = 7;
-  SWS_CS_DEFAULT        = 5;
-
-
-type
-
-  // when used for filters they must have an odd number of elements
-  // coeffs cannot be shared between vectors
-  PSwsVector = ^TSwsVector;
-  TSwsVector = record
-    coeff: PCdouble;
-    length: cint;
-  end;
-
-  // vectors can be shared
-  PSwsFilter = ^TSwsFilter;
-  TSwsFilter = record
-    lumH: PSwsVector;
-    lumV: PSwsVector;
-    chrH: PSwsVector;
-    chrV: PSwsVector;
-  end;
-
-  PSwsContext = ^TSwsContext;
-  TSwsContext = record
-    {internal structure}
-  end;
-
-
-procedure sws_freeContext(swsContext: PSwsContext);
-  cdecl; external sw__scale;
-
-function sws_getContext(srcW: cint; srcH: cint; srcFormat: cint; dstW: cint; dstH: cint; dstFormat: cint; flags: cint;
-              srcFilter: PSwsFilter; dstFilter: PSwsFilter; param: PCdouble): PSwsContext;
-  cdecl; external sw__scale;
-function sws_scale(context: PSwsContext; src: PPCuint8Array; srcStride: PCintArray; srcSliceY: cint; srcSliceH: cint;
-              dst: PPCuint8Array; dstStride: PCintArray): cint;
-  cdecl; external sw__scale;
-function sws_scale_ordered(context: PSwsContext; src: PPCuint8Array; srcStride: PCintArray; srcSliceY: cint;
-              srcSliceH: cint; dst: PPCuint8Array; dstStride: PCintArray): cint;
-  cdecl; external sw__scale; deprecated;
-
-function sws_setColorspaceDetails(c: PSwsContext; inv_table: PQuadCintArray; srcRange: cint; table: PQuadCintArray; dstRange: cint;
-              brightness: cint; contrast: cint; saturation: cint): cint;
-  cdecl; external sw__scale;
-function sws_getColorspaceDetails(c: PSwsContext; var inv_table: PQuadCintArray; var srcRange: cint; var table: PQuadCintArray; var dstRange: cint;
-              var brightness: cint; var contrast: cint; var saturation: cint): cint;
-  cdecl; external sw__scale;
-function sws_getGaussianVec(variance: cdouble; quality: cdouble): PSwsVector;
-  cdecl; external sw__scale;
-function sws_getConstVec(c: cdouble; length: cint): PSwsVector;
-  cdecl; external sw__scale;
-function sws_getIdentityVec: PSwsVector;
-  cdecl; external sw__scale;
-procedure sws_scaleVec(a: PSwsVector; scalar: cdouble);
-  cdecl; external sw__scale;
-procedure sws_normalizeVec(a: PSwsVector; height: cdouble);
-  cdecl; external sw__scale;
-procedure sws_convVec(a: PSwsVector; b: PSwsVector);
-  cdecl; external sw__scale;
-procedure sws_addVec(a: PSwsVector; b: PSwsVector);
-  cdecl; external sw__scale;
-procedure sws_subVec(a: PSwsVector; b: PSwsVector);
-  cdecl; external sw__scale;
-procedure sws_shiftVec(a: PSwsVector; shift: cint);
-  cdecl; external sw__scale;
-function sws_cloneVec(a: PSwsVector): PSwsVector;
-  cdecl; external sw__scale;
-
-procedure sws_printVec(a: PSwsVector);
-  cdecl; external sw__scale;
-procedure sws_freeVec(a: PSwsVector);
-  cdecl; external sw__scale;
-
-function sws_getDefaultFilter(lumaGBlur: cfloat; chromaGBlur: cfloat; lumaSarpen: cfloat; chromaSharpen: cfloat; chromaHShift: cfloat;
-              chromaVShift: cfloat; verbose: cint): PSwsFilter;
-  cdecl; external sw__scale;
-procedure sws_freeFilter(filter: PSwsFilter);
-  cdecl; external sw__scale;
-
-function sws_getCachedContext(context: PSwsContext;
-              srcW: cint; srcH: cint; srcFormat: cint;
-              dstW: cint; dstH: cint; dstFormat: cint; flags: cint;
-              srcFilter: PSwsFilter; dstFilter: PSwsFilter; param: PCdouble): PSwsContext;
-  cdecl; external sw__scale;
-
-implementation
-
-end.