subprojects/gst-plugins-base/gst/videoconvertscale/gstvideoconvertscale.c

   1 /* GStreamer
   2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
   3  * Copyright (C) 2003 Ronald Bultje <rbultje@ronald.bitfreak.net>
   4  * Copyright (C) 2005-2012 David Schleef <ds@schleef.org>
   5  * Copyright (C) 2022 Thibault Saunier <tsaunier@igalia.com>
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Library General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Library General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Library General Public
  18  * License along with this library; if not, write to the
  19  * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
  20  * Boston, MA 02110-1301, USA.
  21  */
  22
  23 /**
  24  * SECTION:element-videoconvertscale
  25  * @title: videoconvertscale
  26  *
  27  * This element resizes video frames and allows changing colorspace. By default
  28  * the element will try to negotiate to the same size on the source and sinkpad
  29  * so that no scaling is needed. It is therefore safe to insert this element in
  30  * a pipeline to get more robust behaviour without any cost if no scaling is
  31  * needed.
  32  *
  33  * This element supports a wide range of color spaces including various YUV and
  34  * RGB formats and is therefore generally able to operate anywhere in a
  35  * pipeline.
  36  *
  37  * ## Example pipelines
  38  * |[
  39  * gst-launch-1.0 -v filesrc location=videotestsrc.ogg ! oggdemux ! theoradec ! videoconvertscale ! autovideosink
  40  * ]|
  41  *  Decode an Ogg/Theora and display the video. If the video sink chosen
  42  * cannot perform scaling, the video scaling will be performed by videoconvertscale
  43  * when you resize the video window.
  44  * To create the test Ogg/Theora file refer to the documentation of theoraenc.
  45  * |[
  46  * gst-launch-1.0 -v filesrc location=videotestsrc.ogg ! oggdemux ! theoradec ! videoconvertscale ! video/x-raw,width=100 ! autovideosink
  47  * ]|
  48  *  Decode an Ogg/Theora and display the video with a width of 100.
  49  *
  50  * Since: 1.22
  51  */
  52
  53 /*
  54  * Formulas for PAR, DAR, width and height relations:
  55  *
  56  * dar_n   w   par_n
  57  * ----- = - * -----
  58  * dar_d   h   par_d
  59  *
  60  * par_n    h   dar_n
  61  * ----- =  - * -----
  62  * par_d    w   dar_d
  63  *
  64  *         dar_n   par_d
  65  * w = h * ----- * -----
  66  *         dar_d   par_n
  67  *
  68  *         dar_d   par_n
  69  * h = w * ----- * -----
  70  *         dar_n   par_d
  71  */
  72
  73 #ifdef HAVE_CONFIG_H
  74 #include "config.h"
  75 #endif
  76
  77 #include <string.h>
  78
  79 #include <math.h>
  80
  81 #include <gst/video/gstvideometa.h>
  82 #include <gst/video/gstvideopool.h>
  83
  84 #include "gstvideoconvertscale.h"
  85
  86 typedef struct
  87 {
  88   /* properties */
  89   GstVideoScaleMethod method;
  90   gboolean add_borders;
  91   double sharpness;
  92   double sharpen;
  93   int submethod;
  94   double envelope;
  95   gint n_threads;
  96   GstVideoDitherMethod dither;
  97   guint dither_quantization;
  98   GstVideoResamplerMethod chroma_resampler;
  99   GstVideoAlphaMode alpha_mode;
 100   GstVideoChromaMode chroma_mode;
 101   GstVideoMatrixMode matrix_mode;
 102   GstVideoGammaMode gamma_mode;
 103   GstVideoPrimariesMode primaries_mode;
 104   gdouble alpha_value;
 105
 106   GstVideoConverter *convert;
 107
 108   gint borders_h;
 109   gint borders_w;
 110 } GstVideoConvertScalePrivate;
 111
 112 #define gst_video_convert_scale_parent_class parent_class
 113 G_DEFINE_TYPE_WITH_PRIVATE (GstVideoConvertScale, gst_video_convert_scale,
 114     GST_TYPE_VIDEO_FILTER);
 115 GST_ELEMENT_REGISTER_DEFINE (videoconvertscale, "videoconvertscale",
 116     GST_RANK_SECONDARY, GST_TYPE_VIDEO_CONVERT_SCALE);
 117
 118 #define PRIV(self) gst_video_convert_scale_get_instance_private(((GstVideoConvertScale*) self))
 119
 120 #define GST_CAT_DEFAULT video_convertscale_debug
 121 GST_DEBUG_CATEGORY_STATIC (video_convertscale_debug);
 122 GST_DEBUG_CATEGORY_STATIC (CAT_PERFORMANCE);
 123
 124 #define DEFAULT_PROP_METHOD       GST_VIDEO_SCALE_BILINEAR
 125 #define DEFAULT_PROP_ADD_BORDERS  TRUE
 126 #define DEFAULT_PROP_SHARPNESS    1.0
 127 #define DEFAULT_PROP_SHARPEN      0.0
 128 #define DEFAULT_PROP_DITHER      GST_VIDEO_DITHER_BAYER
 129 #define DEFAULT_PROP_ENVELOPE     2.0
 130 #define DEFAULT_PROP_DITHER_QUANTIZATION 1
 131 #define DEFAULT_PROP_CHROMA_RESAMPLER   GST_VIDEO_RESAMPLER_METHOD_LINEAR
 132 #define DEFAULT_PROP_ALPHA_MODE GST_VIDEO_ALPHA_MODE_COPY
 133 #define DEFAULT_PROP_ALPHA_VALUE 1.0
 134 #define DEFAULT_PROP_CHROMA_MODE GST_VIDEO_CHROMA_MODE_FULL
 135 #define DEFAULT_PROP_MATRIX_MODE GST_VIDEO_MATRIX_MODE_FULL
 136 #define DEFAULT_PROP_GAMMA_MODE GST_VIDEO_GAMMA_MODE_NONE
 137 #define DEFAULT_PROP_PRIMARIES_MODE GST_VIDEO_PRIMARIES_MODE_NONE
 138 #define DEFAULT_PROP_N_THREADS 1
 139
 140 static GQuark _colorspace_quark;
 141
 142 enum
 143 {
 144   PROP_0,
 145   PROP_METHOD,
 146   PROP_ADD_BORDERS,
 147   PROP_SHARPNESS,
 148   PROP_SHARPEN,
 149   PROP_DITHER,
 150   PROP_SUBMETHOD,
 151   PROP_ENVELOPE,
 152   PROP_N_THREADS,
 153   PROP_DITHER_QUANTIZATION,
 154   PROP_CHROMA_RESAMPLER,
 155   PROP_ALPHA_MODE,
 156   PROP_ALPHA_VALUE,
 157   PROP_CHROMA_MODE,
 158   PROP_MATRIX_MODE,
 159   PROP_GAMMA_MODE,
 160   PROP_PRIMARIES_MODE,
 161 };
 162
 163 #undef GST_VIDEO_SIZE_RANGE
 164 #define GST_VIDEO_SIZE_RANGE "(int) [ 1, 32767]"
 165
 166 /* FIXME: add v210 support
 167  * FIXME: add v216 support
 168  * FIXME: add UYVP support
 169  * FIXME: add A420 support
 170  * FIXME: add YUV9 support
 171  * FIXME: add YVU9 support
 172  * FIXME: add IYU1 support
 173  * FIXME: add r210 support
 174  */
 175
 176 #define GST_VIDEO_FORMATS GST_VIDEO_FORMATS_ALL
 177
 178 static GstStaticCaps gst_video_convert_scale_format_caps =
 179     GST_STATIC_CAPS (GST_VIDEO_CAPS_MAKE (GST_VIDEO_FORMATS) ";"
 180     GST_VIDEO_CAPS_MAKE_WITH_FEATURES ("ANY", GST_VIDEO_FORMATS));
 181
 182 static GQuark _size_quark;
 183 static GQuark _scale_quark;
 184
 185 #define GST_TYPE_VIDEO_SCALE_METHOD (gst_video_scale_method_get_type())
 186 static GType
 187 gst_video_scale_method_get_type (void)
 188 {
 189   static GType video_scale_method_type = 0;
 190
 191   static const GEnumValue video_scale_methods[] = {
 192     {GST_VIDEO_SCALE_NEAREST, "Nearest Neighbour", "nearest-neighbour"},
 193     {GST_VIDEO_SCALE_BILINEAR, "Bilinear (2-tap)", "bilinear"},
 194     {GST_VIDEO_SCALE_4TAP, "4-tap Sinc", "4-tap"},
 195     {GST_VIDEO_SCALE_LANCZOS, "Lanczos", "lanczos"},
 196     {GST_VIDEO_SCALE_BILINEAR2, "Bilinear (multi-tap)", "bilinear2"},
 197     {GST_VIDEO_SCALE_SINC, "Sinc (multi-tap)", "sinc"},
 198     {GST_VIDEO_SCALE_HERMITE, "Hermite (multi-tap)", "hermite"},
 199     {GST_VIDEO_SCALE_SPLINE, "Spline (multi-tap)", "spline"},
 200     {GST_VIDEO_SCALE_CATROM, "Catmull-Rom (multi-tap)", "catrom"},
 201     {GST_VIDEO_SCALE_MITCHELL, "Mitchell (multi-tap)", "mitchell"},
 202     {0, NULL, NULL},
 203   };
 204
 205   if (!video_scale_method_type) {
 206     video_scale_method_type =
 207         g_enum_register_static ("GstVideoScaleMethod", video_scale_methods);
 208   }
 209   return video_scale_method_type;
 210 }
 211
 212 static GstCaps *
 213 gst_video_convert_scale_get_capslist (void)
 214 {
 215   static GstCaps *caps = NULL;
 216   static gsize inited = 0;
 217
 218   if (g_once_init_enter (&inited)) {
 219     caps = gst_static_caps_get (&gst_video_convert_scale_format_caps);
 220     g_once_init_leave (&inited, 1);
 221   }
 222   return caps;
 223 }
 224
 225 static GstPadTemplate *
 226 gst_video_convert_scale_src_template_factory (void)
 227 {
 228   return gst_pad_template_new ("src", GST_PAD_SRC, GST_PAD_ALWAYS,
 229       gst_video_convert_scale_get_capslist ());
 230 }
 231
 232 static GstPadTemplate *
 233 gst_video_convert_scale_sink_template_factory (void)
 234 {
 235   return gst_pad_template_new ("sink", GST_PAD_SINK, GST_PAD_ALWAYS,
 236       gst_video_convert_scale_get_capslist ());
 237 }
 238
 239
 240 static void gst_video_convert_scale_finalize (GstVideoConvertScale * self);
 241 static gboolean gst_video_convert_scale_src_event (GstBaseTransform * trans,
 242     GstEvent * event);
 243
 244 /* base transform vmethods */
 245 static GstCaps *gst_video_convert_scale_transform_caps (GstBaseTransform *
 246     trans, GstPadDirection direction, GstCaps * caps, GstCaps * filter);
 247 static GstCaps *gst_video_convert_scale_fixate_caps (GstBaseTransform * base,
 248     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps);
 249 static gboolean gst_video_convert_scale_transform_meta (GstBaseTransform *
 250     trans, GstBuffer * outbuf, GstMeta * meta, GstBuffer * inbuf);
 251
 252 static gboolean gst_video_convert_scale_set_info (GstVideoFilter * filter,
 253     GstCaps * in, GstVideoInfo * in_info, GstCaps * out,
 254     GstVideoInfo * out_info);
 255 static GstFlowReturn gst_video_convert_scale_transform_frame (GstVideoFilter *
 256     filter, GstVideoFrame * in, GstVideoFrame * out);
 257
 258 static void gst_video_convert_scale_set_property (GObject * object,
 259     guint prop_id, const GValue * value, GParamSpec * pspec);
 260 static void gst_video_convert_scale_get_property (GObject * object,
 261     guint prop_id, GValue * value, GParamSpec * pspec);
 262
 263 static GstCapsFeatures *features_format_interlaced,
 264     *features_format_interlaced_sysmem;
 265
 266 static gboolean
 267 gst_video_convert_scale_filter_meta (GstBaseTransform * trans, GstQuery * query,
 268     GType api, const GstStructure * params)
 269 {
 270   /* This element cannot passthrough the crop meta, because it would convert the
 271    * wrong sub-region of the image, and worst, our output image may not be large
 272    * enough for the crop to be applied later */
 273   if (api == GST_VIDEO_CROP_META_API_TYPE)
 274     return FALSE;
 275
 276   /* propose all other metadata upstream */
 277   return TRUE;
 278 }
 279
 280 static void
 281 gst_video_convert_scale_class_init (GstVideoConvertScaleClass * klass)
 282 {
 283   GObjectClass *gobject_class = (GObjectClass *) klass;
 284   GstElementClass *element_class = (GstElementClass *) klass;
 285   GstBaseTransformClass *trans_class = (GstBaseTransformClass *) klass;
 286   GstVideoFilterClass *filter_class = (GstVideoFilterClass *) klass;
 287
 288   GST_DEBUG_CATEGORY_INIT (video_convertscale_debug, "videoconvertscale", 0,
 289       "videoconvertscale element");
 290   GST_DEBUG_CATEGORY_GET (CAT_PERFORMANCE, "GST_PERFORMANCE");
 291
 292   features_format_interlaced =
 293       gst_caps_features_new (GST_CAPS_FEATURE_FORMAT_INTERLACED, NULL);
 294   features_format_interlaced_sysmem =
 295       gst_caps_features_copy (features_format_interlaced);
 296   gst_caps_features_add (features_format_interlaced_sysmem,
 297       GST_CAPS_FEATURE_MEMORY_SYSTEM_MEMORY);
 298
 299   _colorspace_quark = g_quark_from_static_string ("colorspace");
 300
 301   gobject_class->finalize =
 302       (GObjectFinalizeFunc) gst_video_convert_scale_finalize;
 303   gobject_class->set_property = gst_video_convert_scale_set_property;
 304   gobject_class->get_property = gst_video_convert_scale_get_property;
 305
 306   g_object_class_install_property (gobject_class, PROP_METHOD,
 307       g_param_spec_enum ("method", "method", "method",
 308           GST_TYPE_VIDEO_SCALE_METHOD, DEFAULT_PROP_METHOD,
 309           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 310
 311   g_object_class_install_property (gobject_class, PROP_ADD_BORDERS,
 312       g_param_spec_boolean ("add-borders", "Add Borders",
 313           "Add black borders if necessary to keep the display aspect ratio",
 314           DEFAULT_PROP_ADD_BORDERS,
 315           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 316
 317   g_object_class_install_property (gobject_class, PROP_SHARPNESS,
 318       g_param_spec_double ("sharpness", "Sharpness",
 319           "Sharpness of filter", 0.5, 1.5, DEFAULT_PROP_SHARPNESS,
 320           G_PARAM_CONSTRUCT | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 321
 322   g_object_class_install_property (gobject_class, PROP_SHARPEN,
 323       g_param_spec_double ("sharpen", "Sharpen",
 324           "Sharpening", 0.0, 1.0, DEFAULT_PROP_SHARPEN,
 325           G_PARAM_CONSTRUCT | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 326
 327   g_object_class_install_property (gobject_class, PROP_DITHER,
 328       g_param_spec_enum ("dither", "Dither", "Apply dithering while converting",
 329           gst_video_dither_method_get_type (), DEFAULT_PROP_DITHER,
 330           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 331   g_object_class_install_property (gobject_class, PROP_ENVELOPE,
 332       g_param_spec_double ("envelope", "Envelope",
 333           "Size of filter envelope", 1.0, 5.0, DEFAULT_PROP_ENVELOPE,
 334           G_PARAM_CONSTRUCT | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 335
 336   g_object_class_install_property (gobject_class, PROP_N_THREADS,
 337       g_param_spec_uint ("n-threads", "Threads",
 338           "Maximum number of threads to use", 0, G_MAXUINT,
 339           DEFAULT_PROP_N_THREADS,
 340           G_PARAM_CONSTRUCT | G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 341
 342   g_object_class_install_property (gobject_class, PROP_DITHER_QUANTIZATION,
 343       g_param_spec_uint ("dither-quantization", "Dither Quantize",
 344           "Quantizer to use", 0, G_MAXUINT, DEFAULT_PROP_DITHER_QUANTIZATION,
 345           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 346   g_object_class_install_property (gobject_class, PROP_CHROMA_RESAMPLER,
 347       g_param_spec_enum ("chroma-resampler", "Chroma resampler",
 348           "Chroma resampler method", gst_video_resampler_method_get_type (),
 349           DEFAULT_PROP_CHROMA_RESAMPLER,
 350           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 351   g_object_class_install_property (gobject_class, PROP_ALPHA_MODE,
 352       g_param_spec_enum ("alpha-mode", "Alpha Mode",
 353           "Alpha Mode to use", gst_video_alpha_mode_get_type (),
 354           DEFAULT_PROP_ALPHA_MODE, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 355   g_object_class_install_property (gobject_class, PROP_ALPHA_VALUE,
 356       g_param_spec_double ("alpha-value", "Alpha Value",
 357           "Alpha Value to use", 0.0, 1.0,
 358           DEFAULT_PROP_ALPHA_VALUE,
 359           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 360   g_object_class_install_property (gobject_class, PROP_CHROMA_MODE,
 361       g_param_spec_enum ("chroma-mode", "Chroma Mode", "Chroma Resampling Mode",
 362           gst_video_chroma_mode_get_type (), DEFAULT_PROP_CHROMA_MODE,
 363           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 364   g_object_class_install_property (gobject_class, PROP_MATRIX_MODE,
 365       g_param_spec_enum ("matrix-mode", "Matrix Mode", "Matrix Conversion Mode",
 366           gst_video_matrix_mode_get_type (), DEFAULT_PROP_MATRIX_MODE,
 367           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 368   g_object_class_install_property (gobject_class, PROP_GAMMA_MODE,
 369       g_param_spec_enum ("gamma-mode", "Gamma Mode", "Gamma Conversion Mode",
 370           gst_video_gamma_mode_get_type (), DEFAULT_PROP_GAMMA_MODE,
 371           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 372   g_object_class_install_property (gobject_class, PROP_PRIMARIES_MODE,
 373       g_param_spec_enum ("primaries-mode", "Primaries Mode",
 374           "Primaries Conversion Mode", gst_video_primaries_mode_get_type (),
 375           DEFAULT_PROP_PRIMARIES_MODE,
 376           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 377
 378   gst_element_class_set_static_metadata (element_class,
 379       "Video colorspace converter and scaler",
 380       "Filter/Converter/Video/Scaler/Colorspace",
 381       "Resizes video and allow color conversion",
 382       "Wim Taymans <wim.taymans@gmail.com>");
 383
 384   gst_element_class_add_pad_template (element_class,
 385       gst_video_convert_scale_sink_template_factory ());
 386   gst_element_class_add_pad_template (element_class,
 387       gst_video_convert_scale_src_template_factory ());
 388
 389   _size_quark = g_quark_from_static_string (GST_META_TAG_VIDEO_SIZE_STR);
 390   _scale_quark = gst_video_meta_transform_scale_get_quark ();
 391
 392   gst_type_mark_as_plugin_api (GST_TYPE_VIDEO_SCALE_METHOD, 0);
 393   trans_class->transform_caps =
 394       GST_DEBUG_FUNCPTR (gst_video_convert_scale_transform_caps);
 395   trans_class->fixate_caps =
 396       GST_DEBUG_FUNCPTR (gst_video_convert_scale_fixate_caps);
 397   trans_class->filter_meta =
 398       GST_DEBUG_FUNCPTR (gst_video_convert_scale_filter_meta);
 399   trans_class->src_event =
 400       GST_DEBUG_FUNCPTR (gst_video_convert_scale_src_event);
 401   trans_class->transform_meta =
 402       GST_DEBUG_FUNCPTR (gst_video_convert_scale_transform_meta);
 403
 404   filter_class->set_info = GST_DEBUG_FUNCPTR (gst_video_convert_scale_set_info);
 405   filter_class->transform_frame =
 406       GST_DEBUG_FUNCPTR (gst_video_convert_scale_transform_frame);
 407 }
 408
 409 static void
 410 gst_video_convert_scale_init (GstVideoConvertScale * self)
 411 {
 412   GstVideoConvertScalePrivate *priv = PRIV (self);
 413
 414   priv->method = DEFAULT_PROP_METHOD;
 415   priv->add_borders = DEFAULT_PROP_ADD_BORDERS;
 416   priv->sharpness = DEFAULT_PROP_SHARPNESS;
 417   priv->sharpen = DEFAULT_PROP_SHARPEN;
 418   priv->envelope = DEFAULT_PROP_ENVELOPE;
 419   priv->n_threads = DEFAULT_PROP_N_THREADS;
 420   priv->dither = DEFAULT_PROP_DITHER;
 421   priv->dither_quantization = DEFAULT_PROP_DITHER_QUANTIZATION;
 422   priv->chroma_resampler = DEFAULT_PROP_CHROMA_RESAMPLER;
 423   priv->alpha_mode = DEFAULT_PROP_ALPHA_MODE;
 424   priv->alpha_value = DEFAULT_PROP_ALPHA_VALUE;
 425   priv->chroma_mode = DEFAULT_PROP_CHROMA_MODE;
 426   priv->matrix_mode = DEFAULT_PROP_MATRIX_MODE;
 427   priv->gamma_mode = DEFAULT_PROP_GAMMA_MODE;
 428   priv->primaries_mode = DEFAULT_PROP_PRIMARIES_MODE;
 429 }
 430
 431 static void
 432 gst_video_convert_scale_finalize (GstVideoConvertScale * self)
 433 {
 434   GstVideoConvertScalePrivate *priv = PRIV (self);
 435
 436   if (priv->convert)
 437     gst_video_converter_free (priv->convert);
 438
 439   G_OBJECT_CLASS (parent_class)->finalize (G_OBJECT (self));
 440 }
 441
 442 static void
 443 gst_video_convert_scale_set_property (GObject * object, guint prop_id,
 444     const GValue * value, GParamSpec * pspec)
 445 {
 446   GstVideoConvertScalePrivate *priv = PRIV (object);
 447
 448   GST_OBJECT_LOCK (object);
 449   switch (prop_id) {
 450     case PROP_METHOD:
 451       priv->method = g_value_get_enum (value);
 452       break;
 453     case PROP_ADD_BORDERS:
 454       priv->add_borders = g_value_get_boolean (value);
 455       GST_OBJECT_UNLOCK (object);
 456
 457       gst_base_transform_reconfigure_src (GST_BASE_TRANSFORM_CAST (object));
 458       return;
 459     case PROP_SHARPNESS:
 460       priv->sharpness = g_value_get_double (value);
 461       break;
 462     case PROP_SHARPEN:
 463       priv->sharpen = g_value_get_double (value);
 464       break;
 465     case PROP_SUBMETHOD:
 466       priv->submethod = g_value_get_int (value);
 467       break;
 468     case PROP_ENVELOPE:
 469       priv->envelope = g_value_get_double (value);
 470       break;
 471     case PROP_N_THREADS:
 472       priv->n_threads = g_value_get_uint (value);
 473       break;
 474     case PROP_DITHER:
 475       priv->dither = g_value_get_enum (value);
 476       break;
 477     case PROP_CHROMA_RESAMPLER:
 478       priv->chroma_resampler = g_value_get_enum (value);
 479       break;
 480     case PROP_ALPHA_MODE:
 481       priv->alpha_mode = g_value_get_enum (value);
 482       break;
 483     case PROP_ALPHA_VALUE:
 484       priv->alpha_value = g_value_get_double (value);
 485       break;
 486     case PROP_CHROMA_MODE:
 487       priv->chroma_mode = g_value_get_enum (value);
 488       break;
 489     case PROP_MATRIX_MODE:
 490       priv->matrix_mode = g_value_get_enum (value);
 491       break;
 492     case PROP_GAMMA_MODE:
 493       priv->gamma_mode = g_value_get_enum (value);
 494       break;
 495     case PROP_PRIMARIES_MODE:
 496       priv->primaries_mode = g_value_get_enum (value);
 497       break;
 498     case PROP_DITHER_QUANTIZATION:
 499       priv->dither_quantization = g_value_get_uint (value);
 500       break;
 501     default:
 502       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 503       break;
 504   }
 505   GST_OBJECT_UNLOCK (object);
 506 }
 507
 508 static void
 509 gst_video_convert_scale_get_property (GObject * object, guint prop_id,
 510     GValue * value, GParamSpec * pspec)
 511 {
 512   GstVideoConvertScalePrivate *priv = PRIV (object);
 513
 514   GST_OBJECT_LOCK (object);
 515   switch (prop_id) {
 516     case PROP_METHOD:
 517       g_value_set_enum (value, priv->method);
 518       break;
 519     case PROP_ADD_BORDERS:
 520       g_value_set_boolean (value, priv->add_borders);
 521       break;
 522     case PROP_SHARPNESS:
 523       g_value_set_double (value, priv->sharpness);
 524       break;
 525     case PROP_SHARPEN:
 526       g_value_set_double (value, priv->sharpen);
 527       break;
 528     case PROP_SUBMETHOD:
 529       g_value_set_int (value, priv->submethod);
 530       break;
 531     case PROP_ENVELOPE:
 532       g_value_set_double (value, priv->envelope);
 533       break;
 534     case PROP_N_THREADS:
 535       g_value_set_uint (value, priv->n_threads);
 536       break;
 537     case PROP_DITHER:
 538       g_value_set_enum (value, priv->dither);
 539       break;
 540     case PROP_CHROMA_RESAMPLER:
 541       g_value_set_enum (value, priv->chroma_resampler);
 542       break;
 543     case PROP_ALPHA_MODE:
 544       g_value_set_enum (value, priv->alpha_mode);
 545       break;
 546     case PROP_ALPHA_VALUE:
 547       g_value_set_double (value, priv->alpha_value);
 548       break;
 549     case PROP_CHROMA_MODE:
 550       g_value_set_enum (value, priv->chroma_mode);
 551       break;
 552     case PROP_MATRIX_MODE:
 553       g_value_set_enum (value, priv->matrix_mode);
 554       break;
 555     case PROP_GAMMA_MODE:
 556       g_value_set_enum (value, priv->gamma_mode);
 557       break;
 558     case PROP_PRIMARIES_MODE:
 559       g_value_set_enum (value, priv->primaries_mode);
 560       break;
 561     case PROP_DITHER_QUANTIZATION:
 562       g_value_set_uint (value, priv->dither_quantization);
 563       break;
 564     default:
 565       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 566       break;
 567   }
 568   GST_OBJECT_UNLOCK (object);
 569 }
 570
 571 static GstCaps *
 572 gst_video_convert_caps_remove_format_and_rangify_size_info (GstCaps * caps)
 573 {
 574   GstCaps *ret;
 575   GstStructure *structure;
 576   GstCapsFeatures *features;
 577   gint i, n;
 578
 579   ret = gst_caps_new_empty ();
 580
 581   n = gst_caps_get_size (caps);
 582   for (i = 0; i < n; i++) {
 583     structure = gst_caps_get_structure (caps, i);
 584     features = gst_caps_get_features (caps, i);
 585
 586     /* If this is already expressed by the existing caps
 587      * skip this structure */
 588     if (i > 0 && gst_caps_is_subset_structure_full (ret, structure, features))
 589       continue;
 590
 591     structure = gst_structure_copy (structure);
 592     /* Only remove format info for the cases when we can actually convert */
 593     if (!gst_caps_features_is_any (features)
 594         && (gst_caps_features_is_equal (features,
 595                 GST_CAPS_FEATURES_MEMORY_SYSTEM_MEMORY)
 596             || gst_caps_features_is_equal (features, features_format_interlaced)
 597             || gst_caps_features_is_equal (features,
 598                 features_format_interlaced_sysmem))) {
 599       gst_structure_set (structure, "width", GST_TYPE_INT_RANGE, 1, G_MAXINT,
 600           "height", GST_TYPE_INT_RANGE, 1, G_MAXINT, NULL);
 601       /* if pixel aspect ratio, make a range of it */
 602       if (gst_structure_has_field (structure, "pixel-aspect-ratio")) {
 603         gst_structure_set (structure, "pixel-aspect-ratio",
 604             GST_TYPE_FRACTION_RANGE, 1, G_MAXINT, G_MAXINT, 1, NULL);
 605       }
 606       gst_structure_remove_fields (structure, "format", "colorimetry",
 607           "chroma-site", NULL);
 608     }
 609     gst_caps_append_structure_full (ret, structure,
 610         gst_caps_features_copy (features));
 611   }
 612
 613   return ret;
 614 }
 615
 616 static GstCaps *
 617 gst_video_convert_scale_transform_caps (GstBaseTransform * trans,
 618     GstPadDirection direction, GstCaps * caps, GstCaps * filter)
 619 {
 620   gint i;
 621   GstCaps *ret;
 622
 623   GST_DEBUG_OBJECT (trans,
 624       "Transforming caps %" GST_PTR_FORMAT " in direction %s", caps,
 625       (direction == GST_PAD_SINK) ? "sink" : "src");
 626
 627   ret = gst_video_convert_caps_remove_format_and_rangify_size_info (caps);
 628   if (filter) {
 629     GstCaps *intersection;
 630
 631     intersection =
 632         gst_caps_intersect_full (filter, ret, GST_CAPS_INTERSECT_FIRST);
 633     gst_caps_unref (ret);
 634     ret = intersection;
 635   }
 636
 637   if (GST_VIDEO_CONVERT_SCALE_GET_CLASS (trans)->any_memory)
 638     return ret;
 639
 640   for (i = 0; i < gst_caps_get_size (ret); i++) {
 641     gint j;
 642     GstCapsFeatures *f = gst_caps_get_features (ret, i);
 643
 644     if (!f || gst_caps_features_is_any (f) ||
 645         gst_caps_features_is_equal (f, GST_CAPS_FEATURES_MEMORY_SYSTEM_MEMORY))
 646       continue;
 647
 648     for (j = 0; j < gst_caps_features_get_size (f); j++) {
 649       const gchar *feature = gst_caps_features_get_nth (f, j);
 650
 651       if (g_str_has_prefix (feature, "memory:")) {
 652         GST_DEBUG_OBJECT (trans, "Can not work with memory `%s`", feature);
 653         gst_caps_remove_structure (ret, i);
 654         break;
 655       }
 656     }
 657   }
 658
 659   GST_DEBUG_OBJECT (trans, "returning caps: %" GST_PTR_FORMAT, ret);
 660
 661   return ret;
 662 }
 663
 664 static gboolean
 665 gst_video_convert_scale_transform_meta (GstBaseTransform * trans,
 666     GstBuffer * outbuf, GstMeta * meta, GstBuffer * inbuf)
 667 {
 668   GstVideoFilter *videofilter = GST_VIDEO_FILTER (trans);
 669   const GstMetaInfo *info = meta->info;
 670   const gchar *const *tags;
 671   const gchar *const *curr = NULL;
 672   gboolean should_copy = TRUE;
 673   const gchar *const valid_tags[] = {
 674     GST_META_TAG_VIDEO_STR,
 675     GST_META_TAG_VIDEO_ORIENTATION_STR,
 676     GST_META_TAG_VIDEO_SIZE_STR,
 677   };
 678
 679   tags = gst_meta_api_type_get_tags (info->api);
 680
 681   /* No specific tags, we are good to copy */
 682   if (!tags) {
 683     return TRUE;
 684   }
 685
 686   if (gst_meta_api_type_has_tag (info->api, _colorspace_quark)) {
 687     /* don't copy colorspace specific metadata, FIXME, we need a MetaTransform
 688      * for the colorspace metadata. */
 689     return FALSE;
 690   }
 691
 692   /* We are only changing size, we can preserve other metas tagged as
 693      orientation and colorspace */
 694   for (curr = tags; *curr; ++curr) {
 695
 696     /* We dont handle any other tag */
 697     if (!g_strv_contains (valid_tags, *curr)) {
 698       should_copy = FALSE;
 699       break;
 700     }
 701   }
 702
 703   /* Cant handle the tags in this meta, let the parent class handle it */
 704   if (!should_copy) {
 705     return GST_BASE_TRANSFORM_CLASS (parent_class)->transform_meta (trans,
 706         outbuf, meta, inbuf);
 707   }
 708
 709   /* This meta is size sensitive, try to transform it accordingly */
 710   if (gst_meta_api_type_has_tag (info->api, _size_quark)) {
 711     GstVideoMetaTransform trans =
 712         { &videofilter->in_info, &videofilter->out_info };
 713
 714     if (info->transform_func)
 715       info->transform_func (outbuf, meta, inbuf, _scale_quark, &trans);
 716     return FALSE;
 717   }
 718
 719   /* No need to transform, we can safely copy this meta */
 720   return TRUE;
 721 }
 722
 723 static gboolean
 724 gst_video_convert_scale_set_info (GstVideoFilter * filter, GstCaps * in,
 725     GstVideoInfo * in_info, GstCaps * out, GstVideoInfo * out_info)
 726 {
 727   GstVideoConvertScale *self = GST_VIDEO_CONVERT_SCALE (filter);
 728   GstVideoConvertScalePrivate *priv = PRIV (self);
 729   gint from_dar_n, from_dar_d, to_dar_n, to_dar_d;
 730   GstVideoInfo tmp_info;
 731
 732   if (priv->convert) {
 733     gst_video_converter_free (priv->convert);
 734     priv->convert = NULL;
 735   }
 736
 737   if (!gst_util_fraction_multiply (in_info->width,
 738           in_info->height, in_info->par_n, in_info->par_d, &from_dar_n,
 739           &from_dar_d)) {
 740     from_dar_n = from_dar_d = -1;
 741   }
 742
 743   if (!gst_util_fraction_multiply (out_info->width,
 744           out_info->height, out_info->par_n, out_info->par_d, &to_dar_n,
 745           &to_dar_d)) {
 746     to_dar_n = to_dar_d = -1;
 747   }
 748
 749   priv->borders_w = priv->borders_h = 0;
 750   if (to_dar_n != from_dar_n || to_dar_d != from_dar_d) {
 751     if (priv->add_borders) {
 752       gint n, d, to_h, to_w;
 753
 754       if (from_dar_n != -1 && from_dar_d != -1
 755           && gst_util_fraction_multiply (from_dar_n, from_dar_d,
 756               out_info->par_d, out_info->par_n, &n, &d)) {
 757         to_h = gst_util_uint64_scale_int (out_info->width, d, n);
 758         if (to_h <= out_info->height) {
 759           priv->borders_h = out_info->height - to_h;
 760           priv->borders_w = 0;
 761         } else {
 762           to_w = gst_util_uint64_scale_int (out_info->height, n, d);
 763           g_assert (to_w <= out_info->width);
 764           priv->borders_h = 0;
 765           priv->borders_w = out_info->width - to_w;
 766         }
 767       } else {
 768         GST_WARNING_OBJECT (self, "Can't calculate borders");
 769       }
 770     } else {
 771       GST_WARNING_OBJECT (self, "Can't keep DAR!");
 772     }
 773   }
 774
 775   /* if present, these must match */
 776   if (in_info->interlace_mode != out_info->interlace_mode)
 777     goto format_mismatch;
 778
 779   /* if the only thing different in the caps is the transfer function, and
 780    * we're converting between equivalent transfer functions, do passthrough */
 781   tmp_info = *in_info;
 782   tmp_info.colorimetry.transfer = out_info->colorimetry.transfer;
 783   if (gst_video_info_is_equal (&tmp_info, out_info)) {
 784     if (gst_video_transfer_function_is_equivalent (in_info->colorimetry.
 785             transfer, in_info->finfo->bits, out_info->colorimetry.transfer,
 786             out_info->finfo->bits)) {
 787       gst_base_transform_set_passthrough (GST_BASE_TRANSFORM (filter), TRUE);
 788     }
 789   } else {
 790     GstStructure *options;
 791     GST_CAT_DEBUG_OBJECT (CAT_PERFORMANCE, filter, "setup videoscaling");
 792     gst_base_transform_set_passthrough (GST_BASE_TRANSFORM (filter), FALSE);
 793
 794     options = gst_structure_new_empty ("videoconvertscale");
 795
 796     switch (priv->method) {
 797       case GST_VIDEO_SCALE_NEAREST:
 798         gst_structure_set (options,
 799             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 800             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_NEAREST,
 801             NULL);
 802         break;
 803       case GST_VIDEO_SCALE_BILINEAR:
 804         gst_structure_set (options,
 805             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 806             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_LINEAR,
 807             GST_VIDEO_RESAMPLER_OPT_MAX_TAPS, G_TYPE_INT, 2, NULL);
 808         break;
 809       case GST_VIDEO_SCALE_4TAP:
 810         gst_structure_set (options,
 811             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 812             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_SINC,
 813             GST_VIDEO_RESAMPLER_OPT_MAX_TAPS, G_TYPE_INT, 4, NULL);
 814         break;
 815       case GST_VIDEO_SCALE_LANCZOS:
 816         gst_structure_set (options,
 817             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 818             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_LANCZOS,
 819             NULL);
 820         break;
 821       case GST_VIDEO_SCALE_BILINEAR2:
 822         gst_structure_set (options,
 823             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 824             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_LINEAR,
 825             NULL);
 826         break;
 827       case GST_VIDEO_SCALE_SINC:
 828         gst_structure_set (options,
 829             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 830             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_SINC,
 831             NULL);
 832         break;
 833       case GST_VIDEO_SCALE_HERMITE:
 834         gst_structure_set (options,
 835             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 836             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 837             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 0.0,
 838             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 0.0,
 839             NULL);
 840         break;
 841       case GST_VIDEO_SCALE_SPLINE:
 842         gst_structure_set (options,
 843             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 844             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 845             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 1.0,
 846             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 0.0,
 847             NULL);
 848         break;
 849       case GST_VIDEO_SCALE_CATROM:
 850         gst_structure_set (options,
 851             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 852             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 853             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 0.0,
 854             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 0.5,
 855             NULL);
 856         break;
 857       case GST_VIDEO_SCALE_MITCHELL:
 858         gst_structure_set (options,
 859             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 860             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 861             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 1.0 / 3.0,
 862             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 1.0 / 3.0,
 863             NULL);
 864         break;
 865     }
 866     gst_structure_set (options,
 867         GST_VIDEO_RESAMPLER_OPT_ENVELOPE, G_TYPE_DOUBLE, priv->envelope,
 868         GST_VIDEO_RESAMPLER_OPT_SHARPNESS, G_TYPE_DOUBLE, priv->sharpness,
 869         GST_VIDEO_RESAMPLER_OPT_SHARPEN, G_TYPE_DOUBLE, priv->sharpen,
 870         GST_VIDEO_CONVERTER_OPT_DEST_X, G_TYPE_INT, priv->borders_w / 2,
 871         GST_VIDEO_CONVERTER_OPT_DEST_Y, G_TYPE_INT, priv->borders_h / 2,
 872         GST_VIDEO_CONVERTER_OPT_DEST_WIDTH, G_TYPE_INT,
 873         out_info->width - priv->borders_w, GST_VIDEO_CONVERTER_OPT_DEST_HEIGHT,
 874         G_TYPE_INT, out_info->height - priv->borders_h,
 875         GST_VIDEO_CONVERTER_OPT_DITHER_METHOD, GST_TYPE_VIDEO_DITHER_METHOD,
 876         priv->dither, GST_VIDEO_CONVERTER_OPT_DITHER_QUANTIZATION, G_TYPE_UINT,
 877         priv->dither_quantization,
 878         GST_VIDEO_CONVERTER_OPT_CHROMA_RESAMPLER_METHOD,
 879         GST_TYPE_VIDEO_RESAMPLER_METHOD, priv->chroma_resampler,
 880         GST_VIDEO_CONVERTER_OPT_ALPHA_MODE, GST_TYPE_VIDEO_ALPHA_MODE,
 881         priv->alpha_mode, GST_VIDEO_CONVERTER_OPT_ALPHA_VALUE, G_TYPE_DOUBLE,
 882         priv->alpha_value, GST_VIDEO_CONVERTER_OPT_CHROMA_MODE,
 883         GST_TYPE_VIDEO_CHROMA_MODE, priv->chroma_mode,
 884         GST_VIDEO_CONVERTER_OPT_MATRIX_MODE, GST_TYPE_VIDEO_MATRIX_MODE,
 885         priv->matrix_mode, GST_VIDEO_CONVERTER_OPT_GAMMA_MODE,
 886         GST_TYPE_VIDEO_GAMMA_MODE, priv->gamma_mode,
 887         GST_VIDEO_CONVERTER_OPT_PRIMARIES_MODE, GST_TYPE_VIDEO_PRIMARIES_MODE,
 888         priv->primaries_mode, GST_VIDEO_CONVERTER_OPT_THREADS, G_TYPE_UINT,
 889         priv->n_threads, NULL);
 890
 891     priv->convert = gst_video_converter_new (in_info, out_info, options);
 892     if (priv->convert == NULL)
 893       goto no_convert;
 894   }
 895
 896   GST_DEBUG_OBJECT (filter, "converting format %s -> %s",
 897       gst_video_format_to_string (GST_VIDEO_INFO_FORMAT (in_info)),
 898       gst_video_format_to_string (GST_VIDEO_INFO_FORMAT (out_info)));
 899   GST_DEBUG_OBJECT (self, "from=%dx%d (par=%d/%d dar=%d/%d), size %"
 900       G_GSIZE_FORMAT " -> to=%dx%d (par=%d/%d dar=%d/%d borders=%d:%d), "
 901       "size %" G_GSIZE_FORMAT,
 902       in_info->width, in_info->height, in_info->par_n, in_info->par_d,
 903       from_dar_n, from_dar_d, in_info->size, out_info->width,
 904       out_info->height, out_info->par_n, out_info->par_d, to_dar_n, to_dar_d,
 905       priv->borders_w, priv->borders_h, out_info->size);
 906
 907   return TRUE;
 908
 909   /* ERRORS */
 910 format_mismatch:
 911   {
 912     GST_ERROR_OBJECT (self, "input and output formats do not match");
 913     return FALSE;
 914   }
 915 no_convert:
 916   {
 917     GST_ERROR_OBJECT (self, "could not create converter");
 918     return FALSE;
 919   }
 920 }
 921
 922 /*
 923  * This is an incomplete matrix of in formats and a score for the preferred output
 924  * format.
 925  *
 926  *         out: RGB24   RGB16  ARGB  AYUV  YUV444  YUV422 YUV420 YUV411 YUV410  PAL  GRAY
 927  *  in
 928  * RGB24          0      2       1     2     2       3      4      5      6      7    8
 929  * RGB16          1      0       1     2     2       3      4      5      6      7    8
 930  * ARGB           2      3       0     1     4       5      6      7      8      9    10
 931  * AYUV           3      4       1     0     2       5      6      7      8      9    10
 932  * YUV444         2      4       3     1     0       5      6      7      8      9    10
 933  * YUV422         3      5       4     2     1       0      6      7      8      9    10
 934  * YUV420         4      6       5     3     2       1      0      7      8      9    10
 935  * YUV411         4      6       5     3     2       1      7      0      8      9    10
 936  * YUV410         6      8       7     5     4       3      2      1      0      9    10
 937  * PAL            1      3       2     6     4       6      7      8      9      0    10
 938  * GRAY           1      4       3     2     1       5      6      7      8      9    0
 939  *
 940  * PAL or GRAY are never preferred, if we can we would convert to PAL instead
 941  * of GRAY, though
 942  * less subsampling is preferred and if any, preferably horizontal
 943  * We would like to keep the alpha, even if we would need to to colorspace conversion
 944  * or lose depth.
 945  */
 946 #define SCORE_FORMAT_CHANGE       1
 947 #define SCORE_DEPTH_CHANGE        1
 948 #define SCORE_ALPHA_CHANGE        1
 949 #define SCORE_CHROMA_W_CHANGE     1
 950 #define SCORE_CHROMA_H_CHANGE     1
 951 #define SCORE_PALETTE_CHANGE      1
 952
 953 #define SCORE_COLORSPACE_LOSS     2     /* RGB <-> YUV */
 954 #define SCORE_DEPTH_LOSS          4     /* change bit depth */
 955 #define SCORE_ALPHA_LOSS          8     /* lose the alpha channel */
 956 #define SCORE_CHROMA_W_LOSS      16     /* vertical subsample */
 957 #define SCORE_CHROMA_H_LOSS      32     /* horizontal subsample */
 958 #define SCORE_PALETTE_LOSS       64     /* convert to palette format */
 959 #define SCORE_COLOR_LOSS        128     /* convert to GRAY */
 960
 961 #define COLORSPACE_MASK (GST_VIDEO_FORMAT_FLAG_YUV | \
 962                          GST_VIDEO_FORMAT_FLAG_RGB | GST_VIDEO_FORMAT_FLAG_GRAY)
 963 #define ALPHA_MASK      (GST_VIDEO_FORMAT_FLAG_ALPHA)
 964 #define PALETTE_MASK    (GST_VIDEO_FORMAT_FLAG_PALETTE)
 965
 966 /* calculate how much loss a conversion would be */
 967 static void
 968 score_value (GstBaseTransform * base, const GstVideoFormatInfo * in_info,
 969     const GValue * val, gint * min_loss, const GstVideoFormatInfo ** out_info)
 970 {
 971   const gchar *fname;
 972   const GstVideoFormatInfo *t_info;
 973   GstVideoFormatFlags in_flags, t_flags;
 974   gint loss;
 975
 976   fname = g_value_get_string (val);
 977   t_info = gst_video_format_get_info (gst_video_format_from_string (fname));
 978   if (!t_info || t_info->format == GST_VIDEO_FORMAT_UNKNOWN)
 979     return;
 980
 981   /* accept input format immediately without loss */
 982   if (in_info == t_info) {
 983     *min_loss = 0;
 984     *out_info = t_info;
 985     return;
 986   }
 987
 988   loss = SCORE_FORMAT_CHANGE;
 989
 990   in_flags = GST_VIDEO_FORMAT_INFO_FLAGS (in_info);
 991   in_flags &= ~GST_VIDEO_FORMAT_FLAG_LE;
 992   in_flags &= ~GST_VIDEO_FORMAT_FLAG_COMPLEX;
 993   in_flags &= ~GST_VIDEO_FORMAT_FLAG_UNPACK;
 994
 995   t_flags = GST_VIDEO_FORMAT_INFO_FLAGS (t_info);
 996   t_flags &= ~GST_VIDEO_FORMAT_FLAG_LE;
 997   t_flags &= ~GST_VIDEO_FORMAT_FLAG_COMPLEX;
 998   t_flags &= ~GST_VIDEO_FORMAT_FLAG_UNPACK;
 999
1000   if ((t_flags & PALETTE_MASK) != (in_flags & PALETTE_MASK)) {
1001     loss += SCORE_PALETTE_CHANGE;
1002     if (t_flags & PALETTE_MASK)
1003       loss += SCORE_PALETTE_LOSS;
1004   }
1005
1006   if ((t_flags & COLORSPACE_MASK) != (in_flags & COLORSPACE_MASK)) {
1007     loss += SCORE_COLORSPACE_LOSS;
1008     if (t_flags & GST_VIDEO_FORMAT_FLAG_GRAY)
1009       loss += SCORE_COLOR_LOSS;
1010   }
1011
1012   if ((t_flags & ALPHA_MASK) != (in_flags & ALPHA_MASK)) {
1013     loss += SCORE_ALPHA_CHANGE;
1014     if (in_flags & ALPHA_MASK)
1015       loss += SCORE_ALPHA_LOSS;
1016   }
1017
1018   if ((in_info->h_sub[1]) != (t_info->h_sub[1])) {
1019     loss += SCORE_CHROMA_H_CHANGE;
1020     if ((in_info->h_sub[1]) < (t_info->h_sub[1]))
1021       loss += SCORE_CHROMA_H_LOSS;
1022   }
1023   if ((in_info->w_sub[1]) != (t_info->w_sub[1])) {
1024     loss += SCORE_CHROMA_W_CHANGE;
1025     if ((in_info->w_sub[1]) < (t_info->w_sub[1]))
1026       loss += SCORE_CHROMA_W_LOSS;
1027   }
1028
1029   if ((in_info->bits) != (t_info->bits)) {
1030     loss += SCORE_DEPTH_CHANGE;
1031     if ((in_info->bits) > (t_info->bits))
1032       loss += SCORE_DEPTH_LOSS;
1033   }
1034
1035   GST_DEBUG_OBJECT (base, "score %s -> %s = %d",
1036       GST_VIDEO_FORMAT_INFO_NAME (in_info),
1037       GST_VIDEO_FORMAT_INFO_NAME (t_info), loss);
1038
1039   if (loss < *min_loss) {
1040     GST_DEBUG_OBJECT (base, "found new best %d", loss);
1041     *out_info = t_info;
1042     *min_loss = loss;
1043   }
1044 }
1045
1046 static void
1047 gst_video_convert_scale_fixate_format (GstBaseTransform * base, GstCaps * caps,
1048     GstCaps * result)
1049 {
1050   GstStructure *ins, *outs;
1051   const gchar *in_format;
1052   const GstVideoFormatInfo *in_info, *out_info = NULL;
1053   gint min_loss = G_MAXINT;
1054   guint i, capslen;
1055
1056   ins = gst_caps_get_structure (caps, 0);
1057   in_format = gst_structure_get_string (ins, "format");
1058   if (!in_format)
1059     return;
1060
1061   GST_DEBUG_OBJECT (base, "source format %s", in_format);
1062
1063   in_info =
1064       gst_video_format_get_info (gst_video_format_from_string (in_format));
1065   if (!in_info)
1066     return;
1067
1068   outs = gst_caps_get_structure (result, 0);
1069
1070   capslen = gst_caps_get_size (result);
1071   GST_DEBUG_OBJECT (base, "iterate %d structures", capslen);
1072   for (i = 0; i < capslen; i++) {
1073     GstStructure *tests;
1074     const GValue *format;
1075
1076     tests = gst_caps_get_structure (result, i);
1077     format = gst_structure_get_value (tests, "format");
1078     gst_structure_remove_fields (tests, "height", "width", "pixel-aspect-ratio",
1079         "display-aspect-ratio", NULL);
1080     /* should not happen */
1081     if (format == NULL)
1082       continue;
1083
1084     if (GST_VALUE_HOLDS_LIST (format)) {
1085       gint j, len;
1086
1087       len = gst_value_list_get_size (format);
1088       GST_DEBUG_OBJECT (base, "have %d formats", len);
1089       for (j = 0; j < len; j++) {
1090         const GValue *val;
1091
1092         val = gst_value_list_get_value (format, j);
1093         if (G_VALUE_HOLDS_STRING (val)) {
1094           score_value (base, in_info, val, &min_loss, &out_info);
1095           if (min_loss == 0)
1096             break;
1097         }
1098       }
1099     } else if (G_VALUE_HOLDS_STRING (format)) {
1100       score_value (base, in_info, format, &min_loss, &out_info);
1101     }
1102   }
1103   if (out_info)
1104     gst_structure_set (outs, "format", G_TYPE_STRING,
1105         GST_VIDEO_FORMAT_INFO_NAME (out_info), NULL);
1106 }
1107
1108 static gboolean
1109 subsampling_unchanged (GstVideoInfo * in_info, GstVideoInfo * out_info)
1110 {
1111   gint i;
1112   const GstVideoFormatInfo *in_format, *out_format;
1113
1114   if (GST_VIDEO_INFO_N_COMPONENTS (in_info) !=
1115       GST_VIDEO_INFO_N_COMPONENTS (out_info))
1116     return FALSE;
1117
1118   in_format = in_info->finfo;
1119   out_format = out_info->finfo;
1120
1121   for (i = 0; i < GST_VIDEO_INFO_N_COMPONENTS (in_info); i++) {
1122     if (GST_VIDEO_FORMAT_INFO_W_SUB (in_format,
1123             i) != GST_VIDEO_FORMAT_INFO_W_SUB (out_format, i))
1124       return FALSE;
1125     if (GST_VIDEO_FORMAT_INFO_H_SUB (in_format,
1126             i) != GST_VIDEO_FORMAT_INFO_H_SUB (out_format, i))
1127       return FALSE;
1128   }
1129
1130   return TRUE;
1131 }
1132
1133 static void
1134 transfer_colorimetry_from_input (GstBaseTransform * trans, GstCaps * in_caps,
1135     GstCaps * out_caps)
1136 {
1137   GstStructure *out_caps_s = gst_caps_get_structure (out_caps, 0);
1138   GstStructure *in_caps_s = gst_caps_get_structure (in_caps, 0);
1139   gboolean have_colorimetry =
1140       gst_structure_has_field (out_caps_s, "colorimetry");
1141   gboolean have_chroma_site =
1142       gst_structure_has_field (out_caps_s, "chroma-site");
1143
1144   /* If the output already has colorimetry and chroma-site, stop,
1145    * otherwise try and transfer what we can from the input caps */
1146   if (have_colorimetry && have_chroma_site)
1147     return;
1148
1149   {
1150     GstVideoInfo in_info, out_info;
1151     const GValue *in_colorimetry =
1152         gst_structure_get_value (in_caps_s, "colorimetry");
1153     GstCaps *tmp_caps = NULL;
1154     GstStructure *tmp_caps_s;
1155
1156     if (!gst_video_info_from_caps (&in_info, in_caps)) {
1157       GST_WARNING_OBJECT (trans,
1158           "Failed to convert sink pad caps to video info");
1159       return;
1160     }
1161
1162     /* We are before fixate_size(), the width and height of
1163        the output caps may be absent or not fixed. */
1164     tmp_caps = gst_caps_copy (out_caps);
1165     tmp_caps = gst_caps_fixate (tmp_caps);
1166     tmp_caps_s = gst_caps_get_structure (tmp_caps, 0);
1167     if (!gst_structure_has_field (tmp_caps_s, "width"))
1168       gst_structure_set_value (tmp_caps_s, "width",
1169           gst_structure_get_value (in_caps_s, "width"));
1170     if (!gst_structure_has_field (tmp_caps_s, "height"))
1171       gst_structure_set_value (tmp_caps_s, "height",
1172           gst_structure_get_value (in_caps_s, "height"));
1173
1174     if (!gst_video_info_from_caps (&out_info, tmp_caps)) {
1175       gst_clear_caps (&tmp_caps);
1176       GST_WARNING_OBJECT (trans,
1177           "Failed to convert src pad caps to video info");
1178       return;
1179     }
1180     gst_clear_caps (&tmp_caps);
1181
1182     if (!have_colorimetry && in_colorimetry != NULL) {
1183       if ((GST_VIDEO_INFO_IS_YUV (&out_info)
1184               && GST_VIDEO_INFO_IS_YUV (&in_info))
1185           || (GST_VIDEO_INFO_IS_RGB (&out_info)
1186               && GST_VIDEO_INFO_IS_RGB (&in_info))
1187           || (GST_VIDEO_INFO_IS_GRAY (&out_info)
1188               && GST_VIDEO_INFO_IS_GRAY (&in_info))) {
1189         /* Can transfer the colorimetry intact from the input if it has it */
1190         gst_structure_set_value (out_caps_s, "colorimetry", in_colorimetry);
1191       } else {
1192         gchar *colorimetry_str;
1193
1194         /* Changing between YUV/RGB - forward primaries and transfer function, but use
1195          * default range and matrix.
1196          * the primaries is used for conversion between RGB and XYZ (CIE 1931 coordinate).
1197          * the transfer function could be another reference (e.g., HDR)
1198          */
1199         out_info.colorimetry.primaries = in_info.colorimetry.primaries;
1200         out_info.colorimetry.transfer = in_info.colorimetry.transfer;
1201
1202         colorimetry_str =
1203             gst_video_colorimetry_to_string (&out_info.colorimetry);
1204         gst_caps_set_simple (out_caps, "colorimetry", G_TYPE_STRING,
1205             colorimetry_str, NULL);
1206         g_free (colorimetry_str);
1207       }
1208     }
1209
1210     /* Only YUV output needs chroma-site. If the input was also YUV and had the same chroma
1211      * subsampling, transfer the siting. If the sub-sampling is changing, then the planes get
1212      * scaled anyway so there's no real reason to prefer the input siting. */
1213     if (!have_chroma_site && GST_VIDEO_INFO_IS_YUV (&out_info)) {
1214       if (GST_VIDEO_INFO_IS_YUV (&in_info)) {
1215         const GValue *in_chroma_site =
1216             gst_structure_get_value (in_caps_s, "chroma-site");
1217         if (in_chroma_site != NULL
1218             && subsampling_unchanged (&in_info, &out_info))
1219           gst_structure_set_value (out_caps_s, "chroma-site", in_chroma_site);
1220       }
1221     }
1222   }
1223 }
1224
1225
1226 static GstCaps *
1227 gst_video_convert_scale_get_fixed_format (GstBaseTransform * trans,
1228     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps)
1229 {
1230   GstCaps *result;
1231
1232   result = gst_caps_intersect (othercaps, caps);
1233   if (gst_caps_is_empty (result)) {
1234     gst_caps_unref (result);
1235     result = gst_caps_copy (othercaps);
1236   }
1237
1238   result = gst_caps_make_writable (result);
1239   gst_video_convert_scale_fixate_format (trans, caps, result);
1240
1241   /* fixate remaining fields */
1242   result = gst_caps_fixate (result);
1243
1244   if (direction == GST_PAD_SINK) {
1245     if (gst_caps_is_subset (caps, result)) {
1246       gst_caps_replace (&result, caps);
1247     } else {
1248       /* Try and preserve input colorimetry / chroma information */
1249       transfer_colorimetry_from_input (trans, caps, result);
1250     }
1251   }
1252
1253   return result;
1254 }
1255
1256 static GstCaps *
1257 gst_video_convert_scale_fixate_size (GstBaseTransform * base,
1258     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps)
1259 {
1260   GstStructure *ins, *outs;
1261   const GValue *from_par, *to_par;
1262   GValue fpar = { 0, };
1263   GValue tpar = { 0, };
1264
1265   othercaps = gst_caps_truncate (othercaps);
1266   othercaps = gst_caps_make_writable (othercaps);
1267   ins = gst_caps_get_structure (caps, 0);
1268   outs = gst_caps_get_structure (othercaps, 0);
1269
1270   from_par = gst_structure_get_value (ins, "pixel-aspect-ratio");
1271   to_par = gst_structure_get_value (outs, "pixel-aspect-ratio");
1272
1273   /* If we're fixating from the sinkpad we always set the PAR and
1274    * assume that missing PAR on the sinkpad means 1/1 and
1275    * missing PAR on the srcpad means undefined
1276    */
1277   if (direction == GST_PAD_SINK) {
1278     if (!from_par) {
1279       g_value_init (&fpar, GST_TYPE_FRACTION);
1280       gst_value_set_fraction (&fpar, 1, 1);
1281       from_par = &fpar;
1282     }
1283     if (!to_par) {
1284       g_value_init (&tpar, GST_TYPE_FRACTION_RANGE);
1285       gst_value_set_fraction_range_full (&tpar, 1, G_MAXINT, G_MAXINT, 1);
1286       to_par = &tpar;
1287     }
1288   } else {
1289     if (!to_par) {
1290       g_value_init (&tpar, GST_TYPE_FRACTION);
1291       gst_value_set_fraction (&tpar, 1, 1);
1292       to_par = &tpar;
1293
1294       gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION, 1, 1,
1295           NULL);
1296     }
1297     if (!from_par) {
1298       g_value_init (&fpar, GST_TYPE_FRACTION);
1299       gst_value_set_fraction (&fpar, 1, 1);
1300       from_par = &fpar;
1301     }
1302   }
1303
1304   /* we have both PAR but they might not be fixated */
1305   {
1306     gint from_w, from_h, from_par_n, from_par_d, to_par_n, to_par_d;
1307     gint w = 0, h = 0;
1308     gint from_dar_n, from_dar_d;
1309     gint num, den;
1310
1311     /* from_par should be fixed */
1312     g_return_val_if_fail (gst_value_is_fixed (from_par), othercaps);
1313
1314     from_par_n = gst_value_get_fraction_numerator (from_par);
1315     from_par_d = gst_value_get_fraction_denominator (from_par);
1316
1317     gst_structure_get_int (ins, "width", &from_w);
1318     gst_structure_get_int (ins, "height", &from_h);
1319
1320     gst_structure_get_int (outs, "width", &w);
1321     gst_structure_get_int (outs, "height", &h);
1322
1323     /* if both width and height are already fixed, we can't do anything
1324      * about it anymore */
1325     if (w && h) {
1326       guint n, d;
1327
1328       GST_DEBUG_OBJECT (base, "dimensions already set to %dx%d, not fixating",
1329           w, h);
1330       if (!gst_value_is_fixed (to_par)) {
1331         if (gst_video_calculate_display_ratio (&n, &d, from_w, from_h,
1332                 from_par_n, from_par_d, w, h)) {
1333           GST_DEBUG_OBJECT (base, "fixating to_par to %dx%d", n, d);
1334           if (gst_structure_has_field (outs, "pixel-aspect-ratio"))
1335             gst_structure_fixate_field_nearest_fraction (outs,
1336                 "pixel-aspect-ratio", n, d);
1337           else if (n != d)
1338             gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1339                 n, d, NULL);
1340         }
1341       }
1342       goto done;
1343     }
1344
1345     /* Calculate input DAR */
1346     if (!gst_util_fraction_multiply (from_w, from_h, from_par_n, from_par_d,
1347             &from_dar_n, &from_dar_d)) {
1348       GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1349           ("Error calculating the output scaled size - integer overflow"));
1350       goto done;
1351     }
1352
1353     GST_DEBUG_OBJECT (base, "Input DAR is %d/%d", from_dar_n, from_dar_d);
1354
1355     /* If either width or height are fixed there's not much we
1356      * can do either except choosing a height or width and PAR
1357      * that matches the DAR as good as possible
1358      */
1359     if (h) {
1360       GstStructure *tmp;
1361       gint set_w, set_par_n, set_par_d;
1362
1363       GST_DEBUG_OBJECT (base, "height is fixed (%d)", h);
1364
1365       /* If the PAR is fixed too, there's not much to do
1366        * except choosing the width that is nearest to the
1367        * width with the same DAR */
1368       if (gst_value_is_fixed (to_par)) {
1369         to_par_n = gst_value_get_fraction_numerator (to_par);
1370         to_par_d = gst_value_get_fraction_denominator (to_par);
1371
1372         GST_DEBUG_OBJECT (base, "PAR is fixed %d/%d", to_par_n, to_par_d);
1373
1374         if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, to_par_d,
1375                 to_par_n, &num, &den)) {
1376           GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1377               ("Error calculating the output scaled size - integer overflow"));
1378           goto done;
1379         }
1380
1381         w = (guint) gst_util_uint64_scale_int_round (h, num, den);
1382         gst_structure_fixate_field_nearest_int (outs, "width", w);
1383
1384         goto done;
1385       }
1386
1387       /* The PAR is not fixed and it's quite likely that we can set
1388        * an arbitrary PAR. */
1389
1390       /* Check if we can keep the input width */
1391       tmp = gst_structure_copy (outs);
1392       gst_structure_fixate_field_nearest_int (tmp, "width", from_w);
1393       gst_structure_get_int (tmp, "width", &set_w);
1394
1395       /* Might have failed but try to keep the DAR nonetheless by
1396        * adjusting the PAR */
1397       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, h, set_w,
1398               &to_par_n, &to_par_d)) {
1399         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1400             ("Error calculating the output scaled size - integer overflow"));
1401         gst_structure_free (tmp);
1402         goto done;
1403       }
1404
1405       if (!gst_structure_has_field (tmp, "pixel-aspect-ratio"))
1406         gst_structure_set_value (tmp, "pixel-aspect-ratio", to_par);
1407       gst_structure_fixate_field_nearest_fraction (tmp, "pixel-aspect-ratio",
1408           to_par_n, to_par_d);
1409       gst_structure_get_fraction (tmp, "pixel-aspect-ratio", &set_par_n,
1410           &set_par_d);
1411       gst_structure_free (tmp);
1412
1413       /* Check if the adjusted PAR is accepted */
1414       if (set_par_n == to_par_n && set_par_d == to_par_d) {
1415         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1416             set_par_n != set_par_d)
1417           gst_structure_set (outs, "width", G_TYPE_INT, set_w,
1418               "pixel-aspect-ratio", GST_TYPE_FRACTION, set_par_n, set_par_d,
1419               NULL);
1420         goto done;
1421       }
1422
1423       /* Otherwise scale the width to the new PAR and check if the
1424        * adjusted with is accepted. If all that fails we can't keep
1425        * the DAR */
1426       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_par_d,
1427               set_par_n, &num, &den)) {
1428         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1429             ("Error calculating the output scaled size - integer overflow"));
1430         goto done;
1431       }
1432
1433       w = (guint) gst_util_uint64_scale_int_round (h, num, den);
1434       gst_structure_fixate_field_nearest_int (outs, "width", w);
1435       if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1436           set_par_n != set_par_d)
1437         gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1438             set_par_n, set_par_d, NULL);
1439
1440       goto done;
1441     } else if (w) {
1442       GstStructure *tmp;
1443       gint set_h, set_par_n, set_par_d;
1444
1445       GST_DEBUG_OBJECT (base, "width is fixed (%d)", w);
1446
1447       /* If the PAR is fixed too, there's not much to do
1448        * except choosing the height that is nearest to the
1449        * height with the same DAR */
1450       if (gst_value_is_fixed (to_par)) {
1451         to_par_n = gst_value_get_fraction_numerator (to_par);
1452         to_par_d = gst_value_get_fraction_denominator (to_par);
1453
1454         GST_DEBUG_OBJECT (base, "PAR is fixed %d/%d", to_par_n, to_par_d);
1455
1456         if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, to_par_d,
1457                 to_par_n, &num, &den)) {
1458           GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1459               ("Error calculating the output scaled size - integer overflow"));
1460           goto done;
1461         }
1462
1463         h = (guint) gst_util_uint64_scale_int_round (w, den, num);
1464         gst_structure_fixate_field_nearest_int (outs, "height", h);
1465
1466         goto done;
1467       }
1468
1469       /* The PAR is not fixed and it's quite likely that we can set
1470        * an arbitrary PAR. */
1471
1472       /* Check if we can keep the input height */
1473       tmp = gst_structure_copy (outs);
1474       gst_structure_fixate_field_nearest_int (tmp, "height", from_h);
1475       gst_structure_get_int (tmp, "height", &set_h);
1476
1477       /* Might have failed but try to keep the DAR nonetheless by
1478        * adjusting the PAR */
1479       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_h, w,
1480               &to_par_n, &to_par_d)) {
1481         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1482             ("Error calculating the output scaled size - integer overflow"));
1483         gst_structure_free (tmp);
1484         goto done;
1485       }
1486       if (!gst_structure_has_field (tmp, "pixel-aspect-ratio"))
1487         gst_structure_set_value (tmp, "pixel-aspect-ratio", to_par);
1488       gst_structure_fixate_field_nearest_fraction (tmp, "pixel-aspect-ratio",
1489           to_par_n, to_par_d);
1490       gst_structure_get_fraction (tmp, "pixel-aspect-ratio", &set_par_n,
1491           &set_par_d);
1492       gst_structure_free (tmp);
1493
1494       /* Check if the adjusted PAR is accepted */
1495       if (set_par_n == to_par_n && set_par_d == to_par_d) {
1496         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1497             set_par_n != set_par_d)
1498           gst_structure_set (outs, "height", G_TYPE_INT, set_h,
1499               "pixel-aspect-ratio", GST_TYPE_FRACTION, set_par_n, set_par_d,
1500               NULL);
1501         goto done;
1502       }
1503
1504       /* Otherwise scale the height to the new PAR and check if the
1505        * adjusted with is accepted. If all that fails we can't keep
1506        * the DAR */
1507       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_par_d,
1508               set_par_n, &num, &den)) {
1509         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1510             ("Error calculating the output scaled size - integer overflow"));
1511         goto done;
1512       }
1513
1514       h = (guint) gst_util_uint64_scale_int_round (w, den, num);
1515       gst_structure_fixate_field_nearest_int (outs, "height", h);
1516       if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1517           set_par_n != set_par_d)
1518         gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1519             set_par_n, set_par_d, NULL);
1520
1521       goto done;
1522     } else if (gst_value_is_fixed (to_par)) {
1523       GstStructure *tmp;
1524       gint set_h, set_w, f_h, f_w;
1525
1526       to_par_n = gst_value_get_fraction_numerator (to_par);
1527       to_par_d = gst_value_get_fraction_denominator (to_par);
1528
1529       /* Calculate scale factor for the PAR change */
1530       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, to_par_n,
1531               to_par_d, &num, &den)) {
1532         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1533             ("Error calculating the output scaled size - integer overflow"));
1534         goto done;
1535       }
1536
1537       /* Try to keep the input height (because of interlacing) */
1538       tmp = gst_structure_copy (outs);
1539       gst_structure_fixate_field_nearest_int (tmp, "height", from_h);
1540       gst_structure_get_int (tmp, "height", &set_h);
1541
1542       /* This might have failed but try to scale the width
1543        * to keep the DAR nonetheless */
1544       w = (guint) gst_util_uint64_scale_int_round (set_h, num, den);
1545       gst_structure_fixate_field_nearest_int (tmp, "width", w);
1546       gst_structure_get_int (tmp, "width", &set_w);
1547       gst_structure_free (tmp);
1548
1549       /* We kept the DAR and the height is nearest to the original height */
1550       if (set_w == w) {
1551         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1552             G_TYPE_INT, set_h, NULL);
1553         goto done;
1554       }
1555
1556       f_h = set_h;
1557       f_w = set_w;
1558
1559       /* If the former failed, try to keep the input width at least */
1560       tmp = gst_structure_copy (outs);
1561       gst_structure_fixate_field_nearest_int (tmp, "width", from_w);
1562       gst_structure_get_int (tmp, "width", &set_w);
1563
1564       /* This might have failed but try to scale the width
1565        * to keep the DAR nonetheless */
1566       h = (guint) gst_util_uint64_scale_int_round (set_w, den, num);
1567       gst_structure_fixate_field_nearest_int (tmp, "height", h);
1568       gst_structure_get_int (tmp, "height", &set_h);
1569       gst_structure_free (tmp);
1570
1571       /* We kept the DAR and the width is nearest to the original width */
1572       if (set_h == h) {
1573         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1574             G_TYPE_INT, set_h, NULL);
1575         goto done;
1576       }
1577
1578       /* If all this failed, keep the dimensions with the DAR that was closest
1579        * to the correct DAR. This changes the DAR but there's not much else to
1580        * do here.
1581        */
1582       if (set_w * ABS (set_h - h) < ABS (f_w - w) * f_h) {
1583         f_h = set_h;
1584         f_w = set_w;
1585       }
1586       gst_structure_set (outs, "width", G_TYPE_INT, f_w, "height", G_TYPE_INT,
1587           f_h, NULL);
1588       goto done;
1589     } else {
1590       GstStructure *tmp;
1591       gint set_h, set_w, set_par_n, set_par_d, tmp2;
1592
1593       /* width, height and PAR are not fixed but passthrough is not possible */
1594
1595       /* First try to keep the height and width as good as possible
1596        * and scale PAR */
1597       tmp = gst_structure_copy (outs);
1598       gst_structure_fixate_field_nearest_int (tmp, "height", from_h);
1599       gst_structure_get_int (tmp, "height", &set_h);
1600       gst_structure_fixate_field_nearest_int (tmp, "width", from_w);
1601       gst_structure_get_int (tmp, "width", &set_w);
1602
1603       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_h, set_w,
1604               &to_par_n, &to_par_d)) {
1605         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1606             ("Error calculating the output scaled size - integer overflow"));
1607         gst_structure_free (tmp);
1608         goto done;
1609       }
1610
1611       if (!gst_structure_has_field (tmp, "pixel-aspect-ratio"))
1612         gst_structure_set_value (tmp, "pixel-aspect-ratio", to_par);
1613       gst_structure_fixate_field_nearest_fraction (tmp, "pixel-aspect-ratio",
1614           to_par_n, to_par_d);
1615       gst_structure_get_fraction (tmp, "pixel-aspect-ratio", &set_par_n,
1616           &set_par_d);
1617       gst_structure_free (tmp);
1618
1619       if (set_par_n == to_par_n && set_par_d == to_par_d) {
1620         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1621             G_TYPE_INT, set_h, NULL);
1622
1623         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1624             set_par_n != set_par_d)
1625           gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1626               set_par_n, set_par_d, NULL);
1627         goto done;
1628       }
1629
1630       /* Otherwise try to scale width to keep the DAR with the set
1631        * PAR and height */
1632       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_par_d,
1633               set_par_n, &num, &den)) {
1634         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1635             ("Error calculating the output scaled size - integer overflow"));
1636         goto done;
1637       }
1638
1639       w = (guint) gst_util_uint64_scale_int_round (set_h, num, den);
1640       tmp = gst_structure_copy (outs);
1641       gst_structure_fixate_field_nearest_int (tmp, "width", w);
1642       gst_structure_get_int (tmp, "width", &tmp2);
1643       gst_structure_free (tmp);
1644
1645       if (tmp2 == w) {
1646         gst_structure_set (outs, "width", G_TYPE_INT, tmp2, "height",
1647             G_TYPE_INT, set_h, NULL);
1648         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1649             set_par_n != set_par_d)
1650           gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1651               set_par_n, set_par_d, NULL);
1652         goto done;
1653       }
1654
1655       /* ... or try the same with the height */
1656       h = (guint) gst_util_uint64_scale_int_round (set_w, den, num);
1657       tmp = gst_structure_copy (outs);
1658       gst_structure_fixate_field_nearest_int (tmp, "height", h);
1659       gst_structure_get_int (tmp, "height", &tmp2);
1660       gst_structure_free (tmp);
1661
1662       if (tmp2 == h) {
1663         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1664             G_TYPE_INT, tmp2, NULL);
1665         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1666             set_par_n != set_par_d)
1667           gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1668               set_par_n, set_par_d, NULL);
1669         goto done;
1670       }
1671
1672       /* If all fails we can't keep the DAR and take the nearest values
1673        * for everything from the first try */
1674       gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1675           G_TYPE_INT, set_h, NULL);
1676       if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1677           set_par_n != set_par_d)
1678         gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1679             set_par_n, set_par_d, NULL);
1680     }
1681   }
1682
1683 done:
1684   othercaps = gst_caps_fixate (othercaps);
1685
1686   GST_DEBUG_OBJECT (base, "fixated othercaps to %" GST_PTR_FORMAT, othercaps);
1687
1688   if (from_par == &fpar)
1689     g_value_unset (&fpar);
1690   if (to_par == &tpar)
1691     g_value_unset (&tpar);
1692
1693   return othercaps;
1694 }
1695
1696 static GstCaps *
1697 gst_video_convert_scale_fixate_caps (GstBaseTransform * base,
1698     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps)
1699 {
1700   GstCaps *format;
1701
1702   GST_DEBUG_OBJECT (base,
1703       "trying to fixate othercaps %" GST_PTR_FORMAT " based on caps %"
1704       GST_PTR_FORMAT, othercaps, caps);
1705
1706   format = gst_video_convert_scale_get_fixed_format (base, direction, caps,
1707       othercaps);
1708
1709   if (gst_caps_is_empty (format)) {
1710     GST_ERROR_OBJECT (base, "Could not convert formats");
1711     return format;
1712   }
1713
1714   othercaps =
1715       gst_video_convert_scale_fixate_size (base, direction, caps, othercaps);
1716   if (gst_caps_get_size (othercaps) == 1) {
1717     gint i;
1718     const gchar *format_fields[] = { "format", "colorimetry", "chroma-site" };
1719     GstStructure *format_struct = gst_caps_get_structure (format, 0);
1720     GstStructure *fixated_struct;
1721
1722     othercaps = gst_caps_make_writable (othercaps);
1723     fixated_struct = gst_caps_get_structure (othercaps, 0);
1724
1725     for (i = 0; i < G_N_ELEMENTS (format_fields); i++) {
1726       if (gst_structure_has_field (format_struct, format_fields[i])) {
1727         gst_structure_set (fixated_struct, format_fields[i], G_TYPE_STRING,
1728             gst_structure_get_string (format_struct, format_fields[i]), NULL);
1729       } else {
1730         gst_structure_remove_field (fixated_struct, format_fields[i]);
1731       }
1732     }
1733   }
1734   gst_caps_unref (format);
1735
1736   GST_DEBUG_OBJECT (base, "fixated othercaps to %" GST_PTR_FORMAT, othercaps);
1737
1738   return othercaps;
1739 }
1740
1741 #define GET_LINE(frame, line) \
1742     (gpointer)(((guint8*)(GST_VIDEO_FRAME_PLANE_DATA (frame, 0))) + \
1743      GST_VIDEO_FRAME_PLANE_STRIDE (frame, 0) * (line))
1744
1745 static GstFlowReturn
1746 gst_video_convert_scale_transform_frame (GstVideoFilter * filter,
1747     GstVideoFrame * in_frame, GstVideoFrame * out_frame)
1748 {
1749   GstVideoConvertScalePrivate *priv = PRIV (filter);
1750   GstFlowReturn ret = GST_FLOW_OK;
1751
1752   GST_CAT_DEBUG_OBJECT (CAT_PERFORMANCE, filter, "doing video scaling");
1753
1754   gst_video_converter_frame (priv->convert, in_frame, out_frame);
1755
1756   return ret;
1757 }
1758
1759 static gboolean
1760 gst_video_convert_scale_src_event (GstBaseTransform * trans, GstEvent * event)
1761 {
1762   GstVideoConvertScale *self = GST_VIDEO_CONVERT_SCALE_CAST (trans);
1763   GstVideoFilter *filter = GST_VIDEO_FILTER_CAST (trans);
1764   gboolean ret;
1765   gdouble x, y;
1766
1767   GST_DEBUG_OBJECT (self, "handling %s event", GST_EVENT_TYPE_NAME (event));
1768
1769   switch (GST_EVENT_TYPE (event)) {
1770     case GST_EVENT_NAVIGATION:
1771       if (filter->in_info.width != filter->out_info.width ||
1772           filter->in_info.height != filter->out_info.height) {
1773         event = gst_event_make_writable (event);
1774
1775         if (gst_navigation_event_get_coordinates (event, &x, &y)) {
1776           gst_navigation_event_set_coordinates (event,
1777               x * filter->in_info.width / filter->out_info.width,
1778               y * filter->in_info.height / filter->out_info.height);
1779         }
1780       }
1781       break;
1782     default:
1783       break;
1784   }
1785
1786   ret = GST_BASE_TRANSFORM_CLASS (parent_class)->src_event (trans, event);
1787
1788   return ret;
1789 }