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 converts from one colorspace to another",
 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   klass->any_memory = FALSE;
 409   klass->converts = TRUE;
 410   klass->scales = TRUE;
 411 }
 412
 413 static void
 414 gst_video_convert_scale_init (GstVideoConvertScale * self)
 415 {
 416   GstVideoConvertScalePrivate *priv = PRIV (self);
 417
 418   priv->method = DEFAULT_PROP_METHOD;
 419   priv->add_borders = DEFAULT_PROP_ADD_BORDERS;
 420   priv->sharpness = DEFAULT_PROP_SHARPNESS;
 421   priv->sharpen = DEFAULT_PROP_SHARPEN;
 422   priv->envelope = DEFAULT_PROP_ENVELOPE;
 423   priv->n_threads = DEFAULT_PROP_N_THREADS;
 424   priv->dither = DEFAULT_PROP_DITHER;
 425   priv->dither_quantization = DEFAULT_PROP_DITHER_QUANTIZATION;
 426   priv->chroma_resampler = DEFAULT_PROP_CHROMA_RESAMPLER;
 427   priv->alpha_mode = DEFAULT_PROP_ALPHA_MODE;
 428   priv->alpha_value = DEFAULT_PROP_ALPHA_VALUE;
 429   priv->chroma_mode = DEFAULT_PROP_CHROMA_MODE;
 430   priv->matrix_mode = DEFAULT_PROP_MATRIX_MODE;
 431   priv->gamma_mode = DEFAULT_PROP_GAMMA_MODE;
 432   priv->primaries_mode = DEFAULT_PROP_PRIMARIES_MODE;
 433 }
 434
 435 static void
 436 gst_video_convert_scale_finalize (GstVideoConvertScale * self)
 437 {
 438   GstVideoConvertScalePrivate *priv = PRIV (self);
 439
 440   if (priv->convert)
 441     gst_video_converter_free (priv->convert);
 442
 443   G_OBJECT_CLASS (parent_class)->finalize (G_OBJECT (self));
 444 }
 445
 446 static void
 447 gst_video_convert_scale_set_property (GObject * object, guint prop_id,
 448     const GValue * value, GParamSpec * pspec)
 449 {
 450   GstVideoConvertScalePrivate *priv = PRIV (object);
 451
 452   GST_OBJECT_LOCK (object);
 453   switch (prop_id) {
 454     case PROP_METHOD:
 455       priv->method = g_value_get_enum (value);
 456       break;
 457     case PROP_ADD_BORDERS:
 458       priv->add_borders = g_value_get_boolean (value);
 459       GST_OBJECT_UNLOCK (object);
 460
 461       gst_base_transform_reconfigure_src (GST_BASE_TRANSFORM_CAST (object));
 462       return;
 463     case PROP_SHARPNESS:
 464       priv->sharpness = g_value_get_double (value);
 465       break;
 466     case PROP_SHARPEN:
 467       priv->sharpen = g_value_get_double (value);
 468       break;
 469     case PROP_SUBMETHOD:
 470       priv->submethod = g_value_get_int (value);
 471       break;
 472     case PROP_ENVELOPE:
 473       priv->envelope = g_value_get_double (value);
 474       break;
 475     case PROP_N_THREADS:
 476       priv->n_threads = g_value_get_uint (value);
 477       break;
 478     case PROP_DITHER:
 479       priv->dither = g_value_get_enum (value);
 480       break;
 481     case PROP_CHROMA_RESAMPLER:
 482       priv->chroma_resampler = g_value_get_enum (value);
 483       break;
 484     case PROP_ALPHA_MODE:
 485       priv->alpha_mode = g_value_get_enum (value);
 486       break;
 487     case PROP_ALPHA_VALUE:
 488       priv->alpha_value = g_value_get_double (value);
 489       break;
 490     case PROP_CHROMA_MODE:
 491       priv->chroma_mode = g_value_get_enum (value);
 492       break;
 493     case PROP_MATRIX_MODE:
 494       priv->matrix_mode = g_value_get_enum (value);
 495       break;
 496     case PROP_GAMMA_MODE:
 497       priv->gamma_mode = g_value_get_enum (value);
 498       break;
 499     case PROP_PRIMARIES_MODE:
 500       priv->primaries_mode = g_value_get_enum (value);
 501       break;
 502     case PROP_DITHER_QUANTIZATION:
 503       priv->dither_quantization = g_value_get_uint (value);
 504       break;
 505     default:
 506       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 507       break;
 508   }
 509   GST_OBJECT_UNLOCK (object);
 510 }
 511
 512 static void
 513 gst_video_convert_scale_get_property (GObject * object, guint prop_id,
 514     GValue * value, GParamSpec * pspec)
 515 {
 516   GstVideoConvertScalePrivate *priv = PRIV (object);
 517
 518   GST_OBJECT_LOCK (object);
 519   switch (prop_id) {
 520     case PROP_METHOD:
 521       g_value_set_enum (value, priv->method);
 522       break;
 523     case PROP_ADD_BORDERS:
 524       g_value_set_boolean (value, priv->add_borders);
 525       break;
 526     case PROP_SHARPNESS:
 527       g_value_set_double (value, priv->sharpness);
 528       break;
 529     case PROP_SHARPEN:
 530       g_value_set_double (value, priv->sharpen);
 531       break;
 532     case PROP_SUBMETHOD:
 533       g_value_set_int (value, priv->submethod);
 534       break;
 535     case PROP_ENVELOPE:
 536       g_value_set_double (value, priv->envelope);
 537       break;
 538     case PROP_N_THREADS:
 539       g_value_set_uint (value, priv->n_threads);
 540       break;
 541     case PROP_DITHER:
 542       g_value_set_enum (value, priv->dither);
 543       break;
 544     case PROP_CHROMA_RESAMPLER:
 545       g_value_set_enum (value, priv->chroma_resampler);
 546       break;
 547     case PROP_ALPHA_MODE:
 548       g_value_set_enum (value, priv->alpha_mode);
 549       break;
 550     case PROP_ALPHA_VALUE:
 551       g_value_set_double (value, priv->alpha_value);
 552       break;
 553     case PROP_CHROMA_MODE:
 554       g_value_set_enum (value, priv->chroma_mode);
 555       break;
 556     case PROP_MATRIX_MODE:
 557       g_value_set_enum (value, priv->matrix_mode);
 558       break;
 559     case PROP_GAMMA_MODE:
 560       g_value_set_enum (value, priv->gamma_mode);
 561       break;
 562     case PROP_PRIMARIES_MODE:
 563       g_value_set_enum (value, priv->primaries_mode);
 564       break;
 565     case PROP_DITHER_QUANTIZATION:
 566       g_value_set_uint (value, priv->dither_quantization);
 567       break;
 568     default:
 569       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 570       break;
 571   }
 572   GST_OBJECT_UNLOCK (object);
 573 }
 574
 575 static GstCaps *
 576 gst_video_convert_caps_remove_format_and_rangify_size_info (GstVideoConvertScale
 577     * self, GstCaps * caps)
 578 {
 579   GstVideoConvertScaleClass *klass = GST_VIDEO_CONVERT_SCALE_GET_CLASS (self);
 580   GstCaps *ret;
 581   GstStructure *structure;
 582   GstCapsFeatures *features;
 583   gint i, n;
 584
 585   ret = gst_caps_new_empty ();
 586
 587   n = gst_caps_get_size (caps);
 588   for (i = 0; i < n; i++) {
 589     structure = gst_caps_get_structure (caps, i);
 590     features = gst_caps_get_features (caps, i);
 591
 592     /* If this is already expressed by the existing caps
 593      * skip this structure */
 594     if (i > 0 && gst_caps_is_subset_structure_full (ret, structure, features))
 595       continue;
 596
 597     structure = gst_structure_copy (structure);
 598     /* Only remove format info for the cases when we can actually convert */
 599     if (!gst_caps_features_is_any (features)
 600         && (gst_caps_features_is_equal (features,
 601                 GST_CAPS_FEATURES_MEMORY_SYSTEM_MEMORY)
 602             || gst_caps_features_is_equal (features, features_format_interlaced)
 603             || gst_caps_features_is_equal (features,
 604                 features_format_interlaced_sysmem))) {
 605       if (klass->scales) {
 606         gst_structure_set (structure, "width", GST_TYPE_INT_RANGE, 1, G_MAXINT,
 607             "height", GST_TYPE_INT_RANGE, 1, G_MAXINT, NULL);
 608         /* if pixel aspect ratio, make a range of it */
 609         if (gst_structure_has_field (structure, "pixel-aspect-ratio")) {
 610           gst_structure_set (structure, "pixel-aspect-ratio",
 611               GST_TYPE_FRACTION_RANGE, 1, G_MAXINT, G_MAXINT, 1, NULL);
 612         }
 613       }
 614
 615       if (klass->converts) {
 616         gst_structure_remove_fields (structure, "format", "colorimetry",
 617             "chroma-site", NULL);
 618       }
 619     }
 620     gst_caps_append_structure_full (ret, structure,
 621         gst_caps_features_copy (features));
 622   }
 623
 624   return ret;
 625 }
 626
 627 static GstCaps *
 628 gst_video_convert_scale_transform_caps (GstBaseTransform * trans,
 629     GstPadDirection direction, GstCaps * caps, GstCaps * filter)
 630 {
 631   GstVideoConvertScale *self = GST_VIDEO_CONVERT_SCALE (trans);
 632   gint i;
 633   GstCaps *ret;
 634
 635   GST_DEBUG_OBJECT (trans,
 636       "Transforming caps %" GST_PTR_FORMAT " in direction %s", caps,
 637       (direction == GST_PAD_SINK) ? "sink" : "src");
 638
 639   ret = gst_video_convert_caps_remove_format_and_rangify_size_info (self, caps);
 640   if (filter) {
 641     GstCaps *intersection;
 642
 643     intersection =
 644         gst_caps_intersect_full (filter, ret, GST_CAPS_INTERSECT_FIRST);
 645     gst_caps_unref (ret);
 646     ret = intersection;
 647   }
 648
 649   if (GST_VIDEO_CONVERT_SCALE_GET_CLASS (trans)->any_memory)
 650     return ret;
 651
 652   for (i = 0; i < gst_caps_get_size (ret); i++) {
 653     gint j;
 654     GstCapsFeatures *f = gst_caps_get_features (ret, i);
 655
 656     if (!f || gst_caps_features_is_any (f) ||
 657         gst_caps_features_is_equal (f, GST_CAPS_FEATURES_MEMORY_SYSTEM_MEMORY))
 658       continue;
 659
 660     for (j = 0; j < gst_caps_features_get_size (f); j++) {
 661       const gchar *feature = gst_caps_features_get_nth (f, j);
 662
 663       if (g_str_has_prefix (feature, "memory:")) {
 664         GST_DEBUG_OBJECT (trans, "Can not work with memory `%s`", feature);
 665         gst_caps_remove_structure (ret, i);
 666         break;
 667       }
 668     }
 669   }
 670
 671   GST_DEBUG_OBJECT (trans, "returning caps: %" GST_PTR_FORMAT, ret);
 672
 673   return ret;
 674 }
 675
 676 static gboolean
 677 gst_video_convert_scale_transform_meta (GstBaseTransform * trans,
 678     GstBuffer * outbuf, GstMeta * meta, GstBuffer * inbuf)
 679 {
 680   GstVideoFilter *videofilter = GST_VIDEO_FILTER (trans);
 681   const GstMetaInfo *info = meta->info;
 682   const gchar *const *tags;
 683   const gchar *const *curr = NULL;
 684   gboolean should_copy = TRUE;
 685   const gchar *const valid_tags[] = {
 686     GST_META_TAG_VIDEO_STR,
 687     GST_META_TAG_VIDEO_ORIENTATION_STR,
 688     GST_META_TAG_VIDEO_SIZE_STR,
 689   };
 690
 691   tags = gst_meta_api_type_get_tags (info->api);
 692
 693   /* No specific tags, we are good to copy */
 694   if (!tags) {
 695     return TRUE;
 696   }
 697
 698   if (gst_meta_api_type_has_tag (info->api, _colorspace_quark)) {
 699     /* don't copy colorspace specific metadata, FIXME, we need a MetaTransform
 700      * for the colorspace metadata. */
 701     return FALSE;
 702   }
 703
 704   /* We are only changing size, we can preserve other metas tagged as
 705      orientation and colorspace */
 706   for (curr = tags; *curr; ++curr) {
 707
 708     /* We dont handle any other tag */
 709     if (!g_strv_contains (valid_tags, *curr)) {
 710       should_copy = FALSE;
 711       break;
 712     }
 713   }
 714
 715   /* Cant handle the tags in this meta, let the parent class handle it */
 716   if (!should_copy) {
 717     return GST_BASE_TRANSFORM_CLASS (parent_class)->transform_meta (trans,
 718         outbuf, meta, inbuf);
 719   }
 720
 721   /* This meta is size sensitive, try to transform it accordingly */
 722   if (gst_meta_api_type_has_tag (info->api, _size_quark)) {
 723     GstVideoMetaTransform trans =
 724         { &videofilter->in_info, &videofilter->out_info };
 725
 726     if (info->transform_func)
 727       info->transform_func (outbuf, meta, inbuf, _scale_quark, &trans);
 728     return FALSE;
 729   }
 730
 731   /* No need to transform, we can safely copy this meta */
 732   return TRUE;
 733 }
 734
 735 static gboolean
 736 gst_video_convert_scale_set_info (GstVideoFilter * filter, GstCaps * in,
 737     GstVideoInfo * in_info, GstCaps * out, GstVideoInfo * out_info)
 738 {
 739   GstVideoConvertScale *self = GST_VIDEO_CONVERT_SCALE (filter);
 740   GstVideoConvertScalePrivate *priv = PRIV (self);
 741   gint from_dar_n, from_dar_d, to_dar_n, to_dar_d;
 742   GstVideoInfo tmp_info;
 743
 744   if (priv->convert) {
 745     gst_video_converter_free (priv->convert);
 746     priv->convert = NULL;
 747   }
 748
 749   if (!gst_util_fraction_multiply (in_info->width,
 750           in_info->height, in_info->par_n, in_info->par_d, &from_dar_n,
 751           &from_dar_d)) {
 752     from_dar_n = from_dar_d = -1;
 753   }
 754
 755   if (!gst_util_fraction_multiply (out_info->width,
 756           out_info->height, out_info->par_n, out_info->par_d, &to_dar_n,
 757           &to_dar_d)) {
 758     to_dar_n = to_dar_d = -1;
 759   }
 760
 761   priv->borders_w = priv->borders_h = 0;
 762   if (to_dar_n != from_dar_n || to_dar_d != from_dar_d) {
 763     if (priv->add_borders) {
 764       gint n, d, to_h, to_w;
 765
 766       if (from_dar_n != -1 && from_dar_d != -1
 767           && gst_util_fraction_multiply (from_dar_n, from_dar_d,
 768               out_info->par_d, out_info->par_n, &n, &d)) {
 769         to_h = gst_util_uint64_scale_int (out_info->width, d, n);
 770         if (to_h <= out_info->height) {
 771           priv->borders_h = out_info->height - to_h;
 772           priv->borders_w = 0;
 773         } else {
 774           to_w = gst_util_uint64_scale_int (out_info->height, n, d);
 775           g_assert (to_w <= out_info->width);
 776           priv->borders_h = 0;
 777           priv->borders_w = out_info->width - to_w;
 778         }
 779       } else {
 780         GST_WARNING_OBJECT (self, "Can't calculate borders");
 781       }
 782     } else {
 783       GST_WARNING_OBJECT (self, "Can't keep DAR!");
 784     }
 785   }
 786
 787   /* if present, these must match */
 788   if (in_info->interlace_mode != out_info->interlace_mode)
 789     goto format_mismatch;
 790
 791   /* if the only thing different in the caps is the transfer function, and
 792    * we're converting between equivalent transfer functions, do passthrough */
 793   tmp_info = *in_info;
 794   tmp_info.colorimetry.transfer = out_info->colorimetry.transfer;
 795   if (gst_video_info_is_equal (&tmp_info, out_info) &&
 796       gst_video_transfer_function_is_equivalent (in_info->colorimetry.transfer,
 797           in_info->finfo->bits, out_info->colorimetry.transfer,
 798           out_info->finfo->bits)) {
 799     gst_base_transform_set_passthrough (GST_BASE_TRANSFORM (filter), TRUE);
 800   } else {
 801     GstStructure *options;
 802     GST_CAT_DEBUG_OBJECT (CAT_PERFORMANCE, filter, "setup videoscaling");
 803     gst_base_transform_set_passthrough (GST_BASE_TRANSFORM (filter), FALSE);
 804
 805     options = gst_structure_new_empty ("videoconvertscale");
 806
 807     switch (priv->method) {
 808       case GST_VIDEO_SCALE_NEAREST:
 809         gst_structure_set (options,
 810             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 811             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_NEAREST,
 812             NULL);
 813         break;
 814       case GST_VIDEO_SCALE_BILINEAR:
 815         gst_structure_set (options,
 816             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 817             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_LINEAR,
 818             GST_VIDEO_RESAMPLER_OPT_MAX_TAPS, G_TYPE_INT, 2, NULL);
 819         break;
 820       case GST_VIDEO_SCALE_4TAP:
 821         gst_structure_set (options,
 822             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 823             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_SINC,
 824             GST_VIDEO_RESAMPLER_OPT_MAX_TAPS, G_TYPE_INT, 4, NULL);
 825         break;
 826       case GST_VIDEO_SCALE_LANCZOS:
 827         gst_structure_set (options,
 828             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 829             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_LANCZOS,
 830             NULL);
 831         break;
 832       case GST_VIDEO_SCALE_BILINEAR2:
 833         gst_structure_set (options,
 834             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 835             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_LINEAR,
 836             NULL);
 837         break;
 838       case GST_VIDEO_SCALE_SINC:
 839         gst_structure_set (options,
 840             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 841             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_SINC,
 842             NULL);
 843         break;
 844       case GST_VIDEO_SCALE_HERMITE:
 845         gst_structure_set (options,
 846             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 847             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 848             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 0.0,
 849             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 0.0,
 850             NULL);
 851         break;
 852       case GST_VIDEO_SCALE_SPLINE:
 853         gst_structure_set (options,
 854             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 855             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 856             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 1.0,
 857             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 0.0,
 858             NULL);
 859         break;
 860       case GST_VIDEO_SCALE_CATROM:
 861         gst_structure_set (options,
 862             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 863             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 864             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 0.0,
 865             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 0.5,
 866             NULL);
 867         break;
 868       case GST_VIDEO_SCALE_MITCHELL:
 869         gst_structure_set (options,
 870             GST_VIDEO_CONVERTER_OPT_RESAMPLER_METHOD,
 871             GST_TYPE_VIDEO_RESAMPLER_METHOD, GST_VIDEO_RESAMPLER_METHOD_CUBIC,
 872             GST_VIDEO_RESAMPLER_OPT_CUBIC_B, G_TYPE_DOUBLE, (gdouble) 1.0 / 3.0,
 873             GST_VIDEO_RESAMPLER_OPT_CUBIC_C, G_TYPE_DOUBLE, (gdouble) 1.0 / 3.0,
 874             NULL);
 875         break;
 876     }
 877     gst_structure_set (options,
 878         GST_VIDEO_RESAMPLER_OPT_ENVELOPE, G_TYPE_DOUBLE, priv->envelope,
 879         GST_VIDEO_RESAMPLER_OPT_SHARPNESS, G_TYPE_DOUBLE, priv->sharpness,
 880         GST_VIDEO_RESAMPLER_OPT_SHARPEN, G_TYPE_DOUBLE, priv->sharpen,
 881         GST_VIDEO_CONVERTER_OPT_DEST_X, G_TYPE_INT, priv->borders_w / 2,
 882         GST_VIDEO_CONVERTER_OPT_DEST_Y, G_TYPE_INT, priv->borders_h / 2,
 883         GST_VIDEO_CONVERTER_OPT_DEST_WIDTH, G_TYPE_INT,
 884         out_info->width - priv->borders_w, GST_VIDEO_CONVERTER_OPT_DEST_HEIGHT,
 885         G_TYPE_INT, out_info->height - priv->borders_h,
 886         GST_VIDEO_CONVERTER_OPT_DITHER_METHOD, GST_TYPE_VIDEO_DITHER_METHOD,
 887         priv->dither, GST_VIDEO_CONVERTER_OPT_DITHER_QUANTIZATION, G_TYPE_UINT,
 888         priv->dither_quantization,
 889         GST_VIDEO_CONVERTER_OPT_CHROMA_RESAMPLER_METHOD,
 890         GST_TYPE_VIDEO_RESAMPLER_METHOD, priv->chroma_resampler,
 891         GST_VIDEO_CONVERTER_OPT_ALPHA_MODE, GST_TYPE_VIDEO_ALPHA_MODE,
 892         priv->alpha_mode, GST_VIDEO_CONVERTER_OPT_ALPHA_VALUE, G_TYPE_DOUBLE,
 893         priv->alpha_value, GST_VIDEO_CONVERTER_OPT_CHROMA_MODE,
 894         GST_TYPE_VIDEO_CHROMA_MODE, priv->chroma_mode,
 895         GST_VIDEO_CONVERTER_OPT_MATRIX_MODE, GST_TYPE_VIDEO_MATRIX_MODE,
 896         priv->matrix_mode, GST_VIDEO_CONVERTER_OPT_GAMMA_MODE,
 897         GST_TYPE_VIDEO_GAMMA_MODE, priv->gamma_mode,
 898         GST_VIDEO_CONVERTER_OPT_PRIMARIES_MODE, GST_TYPE_VIDEO_PRIMARIES_MODE,
 899         priv->primaries_mode, GST_VIDEO_CONVERTER_OPT_THREADS, G_TYPE_UINT,
 900         priv->n_threads, NULL);
 901
 902     priv->convert = gst_video_converter_new (in_info, out_info, options);
 903     if (priv->convert == NULL)
 904       goto no_convert;
 905   }
 906
 907   GST_DEBUG_OBJECT (filter, "converting format %s -> %s",
 908       gst_video_format_to_string (GST_VIDEO_INFO_FORMAT (in_info)),
 909       gst_video_format_to_string (GST_VIDEO_INFO_FORMAT (out_info)));
 910   GST_DEBUG_OBJECT (self, "from=%dx%d (par=%d/%d dar=%d/%d), size %"
 911       G_GSIZE_FORMAT " -> to=%dx%d (par=%d/%d dar=%d/%d borders=%d:%d), "
 912       "size %" G_GSIZE_FORMAT,
 913       in_info->width, in_info->height, in_info->par_n, in_info->par_d,
 914       from_dar_n, from_dar_d, in_info->size, out_info->width,
 915       out_info->height, out_info->par_n, out_info->par_d, to_dar_n, to_dar_d,
 916       priv->borders_w, priv->borders_h, out_info->size);
 917
 918   return TRUE;
 919
 920   /* ERRORS */
 921 format_mismatch:
 922   {
 923     GST_ERROR_OBJECT (self, "input and output formats do not match");
 924     return FALSE;
 925   }
 926 no_convert:
 927   {
 928     GST_ERROR_OBJECT (self, "could not create converter");
 929     return FALSE;
 930   }
 931 }
 932
 933 /*
 934  * This is an incomplete matrix of in formats and a score for the preferred output
 935  * format.
 936  *
 937  *         out: RGB24   RGB16  ARGB  AYUV  YUV444  YUV422 YUV420 YUV411 YUV410  PAL  GRAY
 938  *  in
 939  * RGB24          0      2       1     2     2       3      4      5      6      7    8
 940  * RGB16          1      0       1     2     2       3      4      5      6      7    8
 941  * ARGB           2      3       0     1     4       5      6      7      8      9    10
 942  * AYUV           3      4       1     0     2       5      6      7      8      9    10
 943  * YUV444         2      4       3     1     0       5      6      7      8      9    10
 944  * YUV422         3      5       4     2     1       0      6      7      8      9    10
 945  * YUV420         4      6       5     3     2       1      0      7      8      9    10
 946  * YUV411         4      6       5     3     2       1      7      0      8      9    10
 947  * YUV410         6      8       7     5     4       3      2      1      0      9    10
 948  * PAL            1      3       2     6     4       6      7      8      9      0    10
 949  * GRAY           1      4       3     2     1       5      6      7      8      9    0
 950  *
 951  * PAL or GRAY are never preferred, if we can we would convert to PAL instead
 952  * of GRAY, though
 953  * less subsampling is preferred and if any, preferably horizontal
 954  * We would like to keep the alpha, even if we would need to to colorspace conversion
 955  * or lose depth.
 956  */
 957 #define SCORE_FORMAT_CHANGE       1
 958 #define SCORE_DEPTH_CHANGE        1
 959 #define SCORE_ALPHA_CHANGE        1
 960 #define SCORE_CHROMA_W_CHANGE     1
 961 #define SCORE_CHROMA_H_CHANGE     1
 962 #define SCORE_PALETTE_CHANGE      1
 963
 964 #define SCORE_COLORSPACE_LOSS     2     /* RGB <-> YUV */
 965 #define SCORE_DEPTH_LOSS          4     /* change bit depth */
 966 #define SCORE_ALPHA_LOSS          8     /* lose the alpha channel */
 967 #define SCORE_CHROMA_W_LOSS      16     /* vertical subsample */
 968 #define SCORE_CHROMA_H_LOSS      32     /* horizontal subsample */
 969 #define SCORE_PALETTE_LOSS       64     /* convert to palette format */
 970 #define SCORE_COLOR_LOSS        128     /* convert to GRAY */
 971
 972 #define COLORSPACE_MASK (GST_VIDEO_FORMAT_FLAG_YUV | \
 973                          GST_VIDEO_FORMAT_FLAG_RGB | GST_VIDEO_FORMAT_FLAG_GRAY)
 974 #define ALPHA_MASK      (GST_VIDEO_FORMAT_FLAG_ALPHA)
 975 #define PALETTE_MASK    (GST_VIDEO_FORMAT_FLAG_PALETTE)
 976
 977 /* calculate how much loss a conversion would be */
 978 static void
 979 score_value (GstBaseTransform * base, const GstVideoFormatInfo * in_info,
 980     const GValue * val, gint * min_loss, const GstVideoFormatInfo ** out_info)
 981 {
 982   const gchar *fname;
 983   const GstVideoFormatInfo *t_info;
 984   GstVideoFormatFlags in_flags, t_flags;
 985   gint loss;
 986
 987   fname = g_value_get_string (val);
 988   t_info = gst_video_format_get_info (gst_video_format_from_string (fname));
 989   if (!t_info || t_info->format == GST_VIDEO_FORMAT_UNKNOWN)
 990     return;
 991
 992   /* accept input format immediately without loss */
 993   if (in_info == t_info) {
 994     *min_loss = 0;
 995     *out_info = t_info;
 996     return;
 997   }
 998
 999   loss = SCORE_FORMAT_CHANGE;
1000
1001   in_flags = GST_VIDEO_FORMAT_INFO_FLAGS (in_info);
1002   in_flags &= ~GST_VIDEO_FORMAT_FLAG_LE;
1003   in_flags &= ~GST_VIDEO_FORMAT_FLAG_COMPLEX;
1004   in_flags &= ~GST_VIDEO_FORMAT_FLAG_UNPACK;
1005
1006   t_flags = GST_VIDEO_FORMAT_INFO_FLAGS (t_info);
1007   t_flags &= ~GST_VIDEO_FORMAT_FLAG_LE;
1008   t_flags &= ~GST_VIDEO_FORMAT_FLAG_COMPLEX;
1009   t_flags &= ~GST_VIDEO_FORMAT_FLAG_UNPACK;
1010
1011   if ((t_flags & PALETTE_MASK) != (in_flags & PALETTE_MASK)) {
1012     loss += SCORE_PALETTE_CHANGE;
1013     if (t_flags & PALETTE_MASK)
1014       loss += SCORE_PALETTE_LOSS;
1015   }
1016
1017   if ((t_flags & COLORSPACE_MASK) != (in_flags & COLORSPACE_MASK)) {
1018     loss += SCORE_COLORSPACE_LOSS;
1019     if (t_flags & GST_VIDEO_FORMAT_FLAG_GRAY)
1020       loss += SCORE_COLOR_LOSS;
1021   }
1022
1023   if ((t_flags & ALPHA_MASK) != (in_flags & ALPHA_MASK)) {
1024     loss += SCORE_ALPHA_CHANGE;
1025     if (in_flags & ALPHA_MASK)
1026       loss += SCORE_ALPHA_LOSS;
1027   }
1028
1029   if ((in_info->h_sub[1]) != (t_info->h_sub[1])) {
1030     loss += SCORE_CHROMA_H_CHANGE;
1031     if ((in_info->h_sub[1]) < (t_info->h_sub[1]))
1032       loss += SCORE_CHROMA_H_LOSS;
1033   }
1034   if ((in_info->w_sub[1]) != (t_info->w_sub[1])) {
1035     loss += SCORE_CHROMA_W_CHANGE;
1036     if ((in_info->w_sub[1]) < (t_info->w_sub[1]))
1037       loss += SCORE_CHROMA_W_LOSS;
1038   }
1039
1040   if ((in_info->bits) != (t_info->bits)) {
1041     loss += SCORE_DEPTH_CHANGE;
1042     if ((in_info->bits) > (t_info->bits))
1043       loss += SCORE_DEPTH_LOSS;
1044   }
1045
1046   GST_DEBUG_OBJECT (base, "score %s -> %s = %d",
1047       GST_VIDEO_FORMAT_INFO_NAME (in_info),
1048       GST_VIDEO_FORMAT_INFO_NAME (t_info), loss);
1049
1050   if (loss < *min_loss) {
1051     GST_DEBUG_OBJECT (base, "found new best %d", loss);
1052     *out_info = t_info;
1053     *min_loss = loss;
1054   }
1055 }
1056
1057 static void
1058 gst_video_convert_scale_fixate_format (GstBaseTransform * base, GstCaps * caps,
1059     GstCaps * result)
1060 {
1061   GstStructure *ins, *outs;
1062   const gchar *in_format;
1063   const GstVideoFormatInfo *in_info, *out_info = NULL;
1064   gint min_loss = G_MAXINT;
1065   guint i, capslen;
1066
1067   ins = gst_caps_get_structure (caps, 0);
1068   in_format = gst_structure_get_string (ins, "format");
1069   if (!in_format)
1070     return;
1071
1072   GST_DEBUG_OBJECT (base, "source format %s", in_format);
1073
1074   in_info =
1075       gst_video_format_get_info (gst_video_format_from_string (in_format));
1076   if (!in_info)
1077     return;
1078
1079   outs = gst_caps_get_structure (result, 0);
1080
1081   capslen = gst_caps_get_size (result);
1082   GST_DEBUG_OBJECT (base, "iterate %d structures", capslen);
1083   for (i = 0; i < capslen; i++) {
1084     GstStructure *tests;
1085     const GValue *format;
1086
1087     tests = gst_caps_get_structure (result, i);
1088     format = gst_structure_get_value (tests, "format");
1089     gst_structure_remove_fields (tests, "height", "width", "pixel-aspect-ratio",
1090         "display-aspect-ratio", NULL);
1091     /* should not happen */
1092     if (format == NULL)
1093       continue;
1094
1095     if (GST_VALUE_HOLDS_LIST (format)) {
1096       gint j, len;
1097
1098       len = gst_value_list_get_size (format);
1099       GST_DEBUG_OBJECT (base, "have %d formats", len);
1100       for (j = 0; j < len; j++) {
1101         const GValue *val;
1102
1103         val = gst_value_list_get_value (format, j);
1104         if (G_VALUE_HOLDS_STRING (val)) {
1105           score_value (base, in_info, val, &min_loss, &out_info);
1106           if (min_loss == 0)
1107             break;
1108         }
1109       }
1110     } else if (G_VALUE_HOLDS_STRING (format)) {
1111       score_value (base, in_info, format, &min_loss, &out_info);
1112     }
1113   }
1114   if (out_info)
1115     gst_structure_set (outs, "format", G_TYPE_STRING,
1116         GST_VIDEO_FORMAT_INFO_NAME (out_info), NULL);
1117 }
1118
1119 static gboolean
1120 subsampling_unchanged (GstVideoInfo * in_info, GstVideoInfo * out_info)
1121 {
1122   gint i;
1123   const GstVideoFormatInfo *in_format, *out_format;
1124
1125   if (GST_VIDEO_INFO_N_COMPONENTS (in_info) !=
1126       GST_VIDEO_INFO_N_COMPONENTS (out_info))
1127     return FALSE;
1128
1129   in_format = in_info->finfo;
1130   out_format = out_info->finfo;
1131
1132   for (i = 0; i < GST_VIDEO_INFO_N_COMPONENTS (in_info); i++) {
1133     if (GST_VIDEO_FORMAT_INFO_W_SUB (in_format,
1134             i) != GST_VIDEO_FORMAT_INFO_W_SUB (out_format, i))
1135       return FALSE;
1136     if (GST_VIDEO_FORMAT_INFO_H_SUB (in_format,
1137             i) != GST_VIDEO_FORMAT_INFO_H_SUB (out_format, i))
1138       return FALSE;
1139   }
1140
1141   return TRUE;
1142 }
1143
1144 static void
1145 transfer_colorimetry_from_input (GstBaseTransform * trans, GstCaps * in_caps,
1146     GstCaps * out_caps)
1147 {
1148   GstStructure *out_caps_s = gst_caps_get_structure (out_caps, 0);
1149   GstStructure *in_caps_s = gst_caps_get_structure (in_caps, 0);
1150   gboolean have_colorimetry =
1151       gst_structure_has_field (out_caps_s, "colorimetry");
1152   gboolean have_chroma_site =
1153       gst_structure_has_field (out_caps_s, "chroma-site");
1154
1155   /* If the output already has colorimetry and chroma-site, stop,
1156    * otherwise try and transfer what we can from the input caps */
1157   if (have_colorimetry && have_chroma_site)
1158     return;
1159
1160   {
1161     GstVideoInfo in_info, out_info;
1162     const GValue *in_colorimetry =
1163         gst_structure_get_value (in_caps_s, "colorimetry");
1164     GstCaps *tmp_caps = NULL;
1165     GstStructure *tmp_caps_s;
1166
1167     if (!gst_video_info_from_caps (&in_info, in_caps)) {
1168       GST_WARNING_OBJECT (trans,
1169           "Failed to convert sink pad caps to video info");
1170       return;
1171     }
1172
1173     /* We are before fixate_size(), the width and height of
1174        the output caps may be absent or not fixed. */
1175     tmp_caps = gst_caps_copy (out_caps);
1176     tmp_caps = gst_caps_fixate (tmp_caps);
1177     tmp_caps_s = gst_caps_get_structure (tmp_caps, 0);
1178     if (!gst_structure_has_field (tmp_caps_s, "width"))
1179       gst_structure_set_value (tmp_caps_s, "width",
1180           gst_structure_get_value (in_caps_s, "width"));
1181     if (!gst_structure_has_field (tmp_caps_s, "height"))
1182       gst_structure_set_value (tmp_caps_s, "height",
1183           gst_structure_get_value (in_caps_s, "height"));
1184
1185     if (!gst_video_info_from_caps (&out_info, tmp_caps)) {
1186       gst_clear_caps (&tmp_caps);
1187       GST_WARNING_OBJECT (trans,
1188           "Failed to convert src pad caps to video info");
1189       return;
1190     }
1191     gst_clear_caps (&tmp_caps);
1192
1193     if (!have_colorimetry && in_colorimetry != NULL) {
1194       if ((GST_VIDEO_INFO_IS_YUV (&out_info)
1195               && GST_VIDEO_INFO_IS_YUV (&in_info))
1196           || (GST_VIDEO_INFO_IS_RGB (&out_info)
1197               && GST_VIDEO_INFO_IS_RGB (&in_info))
1198           || (GST_VIDEO_INFO_IS_GRAY (&out_info)
1199               && GST_VIDEO_INFO_IS_GRAY (&in_info))) {
1200         /* Can transfer the colorimetry intact from the input if it has it */
1201         gst_structure_set_value (out_caps_s, "colorimetry", in_colorimetry);
1202       } else {
1203         gchar *colorimetry_str;
1204
1205         /* Changing between YUV/RGB - forward primaries and transfer function, but use
1206          * default range and matrix.
1207          * the primaries is used for conversion between RGB and XYZ (CIE 1931 coordinate).
1208          * the transfer function could be another reference (e.g., HDR)
1209          */
1210         out_info.colorimetry.primaries = in_info.colorimetry.primaries;
1211         out_info.colorimetry.transfer = in_info.colorimetry.transfer;
1212
1213         colorimetry_str =
1214             gst_video_colorimetry_to_string (&out_info.colorimetry);
1215         gst_caps_set_simple (out_caps, "colorimetry", G_TYPE_STRING,
1216             colorimetry_str, NULL);
1217         g_free (colorimetry_str);
1218       }
1219     }
1220
1221     /* Only YUV output needs chroma-site. If the input was also YUV and had the same chroma
1222      * subsampling, transfer the siting. If the sub-sampling is changing, then the planes get
1223      * scaled anyway so there's no real reason to prefer the input siting. */
1224     if (!have_chroma_site && GST_VIDEO_INFO_IS_YUV (&out_info)) {
1225       if (GST_VIDEO_INFO_IS_YUV (&in_info)) {
1226         const GValue *in_chroma_site =
1227             gst_structure_get_value (in_caps_s, "chroma-site");
1228         if (in_chroma_site != NULL
1229             && subsampling_unchanged (&in_info, &out_info))
1230           gst_structure_set_value (out_caps_s, "chroma-site", in_chroma_site);
1231       }
1232     }
1233   }
1234 }
1235
1236
1237 static GstCaps *
1238 gst_video_convert_scale_get_fixed_format (GstBaseTransform * trans,
1239     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps)
1240 {
1241   GstCaps *result;
1242
1243   result = gst_caps_intersect (othercaps, caps);
1244   if (gst_caps_is_empty (result)) {
1245     gst_caps_unref (result);
1246     result = gst_caps_copy (othercaps);
1247   }
1248
1249   result = gst_caps_make_writable (result);
1250   gst_video_convert_scale_fixate_format (trans, caps, result);
1251
1252   /* fixate remaining fields */
1253   result = gst_caps_fixate (result);
1254
1255   if (direction == GST_PAD_SINK) {
1256     if (gst_caps_is_subset (caps, result)) {
1257       gst_caps_replace (&result, caps);
1258     } else {
1259       /* Try and preserve input colorimetry / chroma information */
1260       transfer_colorimetry_from_input (trans, caps, result);
1261     }
1262   }
1263
1264   return result;
1265 }
1266
1267 static GstCaps *
1268 gst_video_convert_scale_fixate_size (GstBaseTransform * base,
1269     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps)
1270 {
1271   GstStructure *ins, *outs;
1272   const GValue *from_par, *to_par;
1273   GValue fpar = { 0, };
1274   GValue tpar = { 0, };
1275
1276   othercaps = gst_caps_truncate (othercaps);
1277   othercaps = gst_caps_make_writable (othercaps);
1278   ins = gst_caps_get_structure (caps, 0);
1279   outs = gst_caps_get_structure (othercaps, 0);
1280
1281   from_par = gst_structure_get_value (ins, "pixel-aspect-ratio");
1282   to_par = gst_structure_get_value (outs, "pixel-aspect-ratio");
1283
1284   /* If we're fixating from the sinkpad we always set the PAR and
1285    * assume that missing PAR on the sinkpad means 1/1 and
1286    * missing PAR on the srcpad means undefined
1287    */
1288   if (direction == GST_PAD_SINK) {
1289     if (!from_par) {
1290       g_value_init (&fpar, GST_TYPE_FRACTION);
1291       gst_value_set_fraction (&fpar, 1, 1);
1292       from_par = &fpar;
1293     }
1294     if (!to_par) {
1295       g_value_init (&tpar, GST_TYPE_FRACTION_RANGE);
1296       gst_value_set_fraction_range_full (&tpar, 1, G_MAXINT, G_MAXINT, 1);
1297       to_par = &tpar;
1298     }
1299   } else {
1300     if (!to_par) {
1301       g_value_init (&tpar, GST_TYPE_FRACTION);
1302       gst_value_set_fraction (&tpar, 1, 1);
1303       to_par = &tpar;
1304
1305       gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION, 1, 1,
1306           NULL);
1307     }
1308     if (!from_par) {
1309       g_value_init (&fpar, GST_TYPE_FRACTION);
1310       gst_value_set_fraction (&fpar, 1, 1);
1311       from_par = &fpar;
1312     }
1313   }
1314
1315   /* we have both PAR but they might not be fixated */
1316   {
1317     gint from_w, from_h, from_par_n, from_par_d, to_par_n, to_par_d;
1318     gint w = 0, h = 0;
1319     gint from_dar_n, from_dar_d;
1320     gint num, den;
1321
1322     /* from_par should be fixed */
1323     g_return_val_if_fail (gst_value_is_fixed (from_par), othercaps);
1324
1325     from_par_n = gst_value_get_fraction_numerator (from_par);
1326     from_par_d = gst_value_get_fraction_denominator (from_par);
1327
1328     gst_structure_get_int (ins, "width", &from_w);
1329     gst_structure_get_int (ins, "height", &from_h);
1330
1331     gst_structure_get_int (outs, "width", &w);
1332     gst_structure_get_int (outs, "height", &h);
1333
1334     /* if both width and height are already fixed, we can't do anything
1335      * about it anymore */
1336     if (w && h) {
1337       guint n, d;
1338
1339       GST_DEBUG_OBJECT (base, "dimensions already set to %dx%d, not fixating",
1340           w, h);
1341       if (!gst_value_is_fixed (to_par)) {
1342         if (gst_video_calculate_display_ratio (&n, &d, from_w, from_h,
1343                 from_par_n, from_par_d, w, h)) {
1344           GST_DEBUG_OBJECT (base, "fixating to_par to %dx%d", n, d);
1345           if (gst_structure_has_field (outs, "pixel-aspect-ratio"))
1346             gst_structure_fixate_field_nearest_fraction (outs,
1347                 "pixel-aspect-ratio", n, d);
1348           else if (n != d)
1349             gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1350                 n, d, NULL);
1351         }
1352       }
1353       goto done;
1354     }
1355
1356     /* Calculate input DAR */
1357     if (!gst_util_fraction_multiply (from_w, from_h, from_par_n, from_par_d,
1358             &from_dar_n, &from_dar_d)) {
1359       GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1360           ("Error calculating the output scaled size - integer overflow"));
1361       goto done;
1362     }
1363
1364     GST_DEBUG_OBJECT (base, "Input DAR is %d/%d", from_dar_n, from_dar_d);
1365
1366     /* If either width or height are fixed there's not much we
1367      * can do either except choosing a height or width and PAR
1368      * that matches the DAR as good as possible
1369      */
1370     if (h) {
1371       GstStructure *tmp;
1372       gint set_w, set_par_n, set_par_d;
1373
1374       GST_DEBUG_OBJECT (base, "height is fixed (%d)", h);
1375
1376       /* If the PAR is fixed too, there's not much to do
1377        * except choosing the width that is nearest to the
1378        * width with the same DAR */
1379       if (gst_value_is_fixed (to_par)) {
1380         to_par_n = gst_value_get_fraction_numerator (to_par);
1381         to_par_d = gst_value_get_fraction_denominator (to_par);
1382
1383         GST_DEBUG_OBJECT (base, "PAR is fixed %d/%d", to_par_n, to_par_d);
1384
1385         if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, to_par_d,
1386                 to_par_n, &num, &den)) {
1387           GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1388               ("Error calculating the output scaled size - integer overflow"));
1389           goto done;
1390         }
1391
1392         w = (guint) gst_util_uint64_scale_int_round (h, num, den);
1393         gst_structure_fixate_field_nearest_int (outs, "width", w);
1394
1395         goto done;
1396       }
1397
1398       /* The PAR is not fixed and it's quite likely that we can set
1399        * an arbitrary PAR. */
1400
1401       /* Check if we can keep the input width */
1402       tmp = gst_structure_copy (outs);
1403       gst_structure_fixate_field_nearest_int (tmp, "width", from_w);
1404       gst_structure_get_int (tmp, "width", &set_w);
1405
1406       /* Might have failed but try to keep the DAR nonetheless by
1407        * adjusting the PAR */
1408       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, h, set_w,
1409               &to_par_n, &to_par_d)) {
1410         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1411             ("Error calculating the output scaled size - integer overflow"));
1412         gst_structure_free (tmp);
1413         goto done;
1414       }
1415
1416       if (!gst_structure_has_field (tmp, "pixel-aspect-ratio"))
1417         gst_structure_set_value (tmp, "pixel-aspect-ratio", to_par);
1418       gst_structure_fixate_field_nearest_fraction (tmp, "pixel-aspect-ratio",
1419           to_par_n, to_par_d);
1420       gst_structure_get_fraction (tmp, "pixel-aspect-ratio", &set_par_n,
1421           &set_par_d);
1422       gst_structure_free (tmp);
1423
1424       /* Check if the adjusted PAR is accepted */
1425       if (set_par_n == to_par_n && set_par_d == to_par_d) {
1426         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1427             set_par_n != set_par_d)
1428           gst_structure_set (outs, "width", G_TYPE_INT, set_w,
1429               "pixel-aspect-ratio", GST_TYPE_FRACTION, set_par_n, set_par_d,
1430               NULL);
1431         goto done;
1432       }
1433
1434       /* Otherwise scale the width to the new PAR and check if the
1435        * adjusted with is accepted. If all that fails we can't keep
1436        * the DAR */
1437       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_par_d,
1438               set_par_n, &num, &den)) {
1439         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1440             ("Error calculating the output scaled size - integer overflow"));
1441         goto done;
1442       }
1443
1444       w = (guint) gst_util_uint64_scale_int_round (h, num, den);
1445       gst_structure_fixate_field_nearest_int (outs, "width", w);
1446       if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1447           set_par_n != set_par_d)
1448         gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1449             set_par_n, set_par_d, NULL);
1450
1451       goto done;
1452     } else if (w) {
1453       GstStructure *tmp;
1454       gint set_h, set_par_n, set_par_d;
1455
1456       GST_DEBUG_OBJECT (base, "width is fixed (%d)", w);
1457
1458       /* If the PAR is fixed too, there's not much to do
1459        * except choosing the height that is nearest to the
1460        * height with the same DAR */
1461       if (gst_value_is_fixed (to_par)) {
1462         to_par_n = gst_value_get_fraction_numerator (to_par);
1463         to_par_d = gst_value_get_fraction_denominator (to_par);
1464
1465         GST_DEBUG_OBJECT (base, "PAR is fixed %d/%d", to_par_n, to_par_d);
1466
1467         if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, to_par_d,
1468                 to_par_n, &num, &den)) {
1469           GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1470               ("Error calculating the output scaled size - integer overflow"));
1471           goto done;
1472         }
1473
1474         h = (guint) gst_util_uint64_scale_int_round (w, den, num);
1475         gst_structure_fixate_field_nearest_int (outs, "height", h);
1476
1477         goto done;
1478       }
1479
1480       /* The PAR is not fixed and it's quite likely that we can set
1481        * an arbitrary PAR. */
1482
1483       /* Check if we can keep the input height */
1484       tmp = gst_structure_copy (outs);
1485       gst_structure_fixate_field_nearest_int (tmp, "height", from_h);
1486       gst_structure_get_int (tmp, "height", &set_h);
1487
1488       /* Might have failed but try to keep the DAR nonetheless by
1489        * adjusting the PAR */
1490       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_h, w,
1491               &to_par_n, &to_par_d)) {
1492         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1493             ("Error calculating the output scaled size - integer overflow"));
1494         gst_structure_free (tmp);
1495         goto done;
1496       }
1497       if (!gst_structure_has_field (tmp, "pixel-aspect-ratio"))
1498         gst_structure_set_value (tmp, "pixel-aspect-ratio", to_par);
1499       gst_structure_fixate_field_nearest_fraction (tmp, "pixel-aspect-ratio",
1500           to_par_n, to_par_d);
1501       gst_structure_get_fraction (tmp, "pixel-aspect-ratio", &set_par_n,
1502           &set_par_d);
1503       gst_structure_free (tmp);
1504
1505       /* Check if the adjusted PAR is accepted */
1506       if (set_par_n == to_par_n && set_par_d == to_par_d) {
1507         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1508             set_par_n != set_par_d)
1509           gst_structure_set (outs, "height", G_TYPE_INT, set_h,
1510               "pixel-aspect-ratio", GST_TYPE_FRACTION, set_par_n, set_par_d,
1511               NULL);
1512         goto done;
1513       }
1514
1515       /* Otherwise scale the height to the new PAR and check if the
1516        * adjusted with is accepted. If all that fails we can't keep
1517        * the DAR */
1518       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_par_d,
1519               set_par_n, &num, &den)) {
1520         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1521             ("Error calculating the output scaled size - integer overflow"));
1522         goto done;
1523       }
1524
1525       h = (guint) gst_util_uint64_scale_int_round (w, den, num);
1526       gst_structure_fixate_field_nearest_int (outs, "height", h);
1527       if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1528           set_par_n != set_par_d)
1529         gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1530             set_par_n, set_par_d, NULL);
1531
1532       goto done;
1533     } else if (gst_value_is_fixed (to_par)) {
1534       GstStructure *tmp;
1535       gint set_h, set_w, f_h, f_w;
1536
1537       to_par_n = gst_value_get_fraction_numerator (to_par);
1538       to_par_d = gst_value_get_fraction_denominator (to_par);
1539
1540       /* Calculate scale factor for the PAR change */
1541       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, to_par_n,
1542               to_par_d, &num, &den)) {
1543         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1544             ("Error calculating the output scaled size - integer overflow"));
1545         goto done;
1546       }
1547
1548       /* Try to keep the input height (because of interlacing) */
1549       tmp = gst_structure_copy (outs);
1550       gst_structure_fixate_field_nearest_int (tmp, "height", from_h);
1551       gst_structure_get_int (tmp, "height", &set_h);
1552
1553       /* This might have failed but try to scale the width
1554        * to keep the DAR nonetheless */
1555       w = (guint) gst_util_uint64_scale_int_round (set_h, num, den);
1556       gst_structure_fixate_field_nearest_int (tmp, "width", w);
1557       gst_structure_get_int (tmp, "width", &set_w);
1558       gst_structure_free (tmp);
1559
1560       /* We kept the DAR and the height is nearest to the original height */
1561       if (set_w == w) {
1562         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1563             G_TYPE_INT, set_h, NULL);
1564         goto done;
1565       }
1566
1567       f_h = set_h;
1568       f_w = set_w;
1569
1570       /* If the former failed, try to keep the input width at least */
1571       tmp = gst_structure_copy (outs);
1572       gst_structure_fixate_field_nearest_int (tmp, "width", from_w);
1573       gst_structure_get_int (tmp, "width", &set_w);
1574
1575       /* This might have failed but try to scale the width
1576        * to keep the DAR nonetheless */
1577       h = (guint) gst_util_uint64_scale_int_round (set_w, den, num);
1578       gst_structure_fixate_field_nearest_int (tmp, "height", h);
1579       gst_structure_get_int (tmp, "height", &set_h);
1580       gst_structure_free (tmp);
1581
1582       /* We kept the DAR and the width is nearest to the original width */
1583       if (set_h == h) {
1584         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1585             G_TYPE_INT, set_h, NULL);
1586         goto done;
1587       }
1588
1589       /* If all this failed, keep the dimensions with the DAR that was closest
1590        * to the correct DAR. This changes the DAR but there's not much else to
1591        * do here.
1592        */
1593       if (set_w * ABS (set_h - h) < ABS (f_w - w) * f_h) {
1594         f_h = set_h;
1595         f_w = set_w;
1596       }
1597       gst_structure_set (outs, "width", G_TYPE_INT, f_w, "height", G_TYPE_INT,
1598           f_h, NULL);
1599       goto done;
1600     } else {
1601       GstStructure *tmp;
1602       gint set_h, set_w, set_par_n, set_par_d, tmp2;
1603
1604       /* width, height and PAR are not fixed but passthrough is not possible */
1605
1606       /* First try to keep the height and width as good as possible
1607        * and scale PAR */
1608       tmp = gst_structure_copy (outs);
1609       gst_structure_fixate_field_nearest_int (tmp, "height", from_h);
1610       gst_structure_get_int (tmp, "height", &set_h);
1611       gst_structure_fixate_field_nearest_int (tmp, "width", from_w);
1612       gst_structure_get_int (tmp, "width", &set_w);
1613
1614       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_h, set_w,
1615               &to_par_n, &to_par_d)) {
1616         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1617             ("Error calculating the output scaled size - integer overflow"));
1618         gst_structure_free (tmp);
1619         goto done;
1620       }
1621
1622       if (!gst_structure_has_field (tmp, "pixel-aspect-ratio"))
1623         gst_structure_set_value (tmp, "pixel-aspect-ratio", to_par);
1624       gst_structure_fixate_field_nearest_fraction (tmp, "pixel-aspect-ratio",
1625           to_par_n, to_par_d);
1626       gst_structure_get_fraction (tmp, "pixel-aspect-ratio", &set_par_n,
1627           &set_par_d);
1628       gst_structure_free (tmp);
1629
1630       if (set_par_n == to_par_n && set_par_d == to_par_d) {
1631         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1632             G_TYPE_INT, set_h, NULL);
1633
1634         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1635             set_par_n != set_par_d)
1636           gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1637               set_par_n, set_par_d, NULL);
1638         goto done;
1639       }
1640
1641       /* Otherwise try to scale width to keep the DAR with the set
1642        * PAR and height */
1643       if (!gst_util_fraction_multiply (from_dar_n, from_dar_d, set_par_d,
1644               set_par_n, &num, &den)) {
1645         GST_ELEMENT_ERROR (base, CORE, NEGOTIATION, (NULL),
1646             ("Error calculating the output scaled size - integer overflow"));
1647         goto done;
1648       }
1649
1650       w = (guint) gst_util_uint64_scale_int_round (set_h, num, den);
1651       tmp = gst_structure_copy (outs);
1652       gst_structure_fixate_field_nearest_int (tmp, "width", w);
1653       gst_structure_get_int (tmp, "width", &tmp2);
1654       gst_structure_free (tmp);
1655
1656       if (tmp2 == w) {
1657         gst_structure_set (outs, "width", G_TYPE_INT, tmp2, "height",
1658             G_TYPE_INT, set_h, NULL);
1659         if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1660             set_par_n != set_par_d)
1661           gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1662               set_par_n, set_par_d, NULL);
1663         goto done;
1664       }
1665
1666       /* ... or try the same with the height */
1667       h = (guint) gst_util_uint64_scale_int_round (set_w, den, num);
1668       tmp = gst_structure_copy (outs);
1669       gst_structure_fixate_field_nearest_int (tmp, "height", h);
1670       gst_structure_get_int (tmp, "height", &tmp2);
1671       gst_structure_free (tmp);
1672
1673       if (tmp2 == h) {
1674         gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1675             G_TYPE_INT, tmp2, 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         goto done;
1681       }
1682
1683       /* If all fails we can't keep the DAR and take the nearest values
1684        * for everything from the first try */
1685       gst_structure_set (outs, "width", G_TYPE_INT, set_w, "height",
1686           G_TYPE_INT, set_h, NULL);
1687       if (gst_structure_has_field (outs, "pixel-aspect-ratio") ||
1688           set_par_n != set_par_d)
1689         gst_structure_set (outs, "pixel-aspect-ratio", GST_TYPE_FRACTION,
1690             set_par_n, set_par_d, NULL);
1691     }
1692   }
1693
1694 done:
1695   othercaps = gst_caps_fixate (othercaps);
1696
1697   GST_DEBUG_OBJECT (base, "fixated othercaps to %" GST_PTR_FORMAT, othercaps);
1698
1699   if (from_par == &fpar)
1700     g_value_unset (&fpar);
1701   if (to_par == &tpar)
1702     g_value_unset (&tpar);
1703
1704   return othercaps;
1705 }
1706
1707 static GstCaps *
1708 gst_video_convert_scale_fixate_caps (GstBaseTransform * base,
1709     GstPadDirection direction, GstCaps * caps, GstCaps * othercaps)
1710 {
1711   GstCaps *format;
1712
1713   GST_DEBUG_OBJECT (base,
1714       "trying to fixate othercaps %" GST_PTR_FORMAT " based on caps %"
1715       GST_PTR_FORMAT, othercaps, caps);
1716
1717   format = gst_video_convert_scale_get_fixed_format (base, direction, caps,
1718       othercaps);
1719
1720   if (gst_caps_is_empty (format)) {
1721     GST_ERROR_OBJECT (base, "Could not convert formats");
1722     return format;
1723   }
1724
1725   othercaps =
1726       gst_video_convert_scale_fixate_size (base, direction, caps, othercaps);
1727   if (gst_caps_get_size (othercaps) == 1) {
1728     gint i;
1729     const gchar *format_fields[] = { "format", "colorimetry", "chroma-site" };
1730     GstStructure *format_struct = gst_caps_get_structure (format, 0);
1731     GstStructure *fixated_struct;
1732
1733     othercaps = gst_caps_make_writable (othercaps);
1734     fixated_struct = gst_caps_get_structure (othercaps, 0);
1735
1736     for (i = 0; i < G_N_ELEMENTS (format_fields); i++) {
1737       if (gst_structure_has_field (format_struct, format_fields[i])) {
1738         gst_structure_set (fixated_struct, format_fields[i], G_TYPE_STRING,
1739             gst_structure_get_string (format_struct, format_fields[i]), NULL);
1740       } else {
1741         gst_structure_remove_field (fixated_struct, format_fields[i]);
1742       }
1743     }
1744   }
1745   gst_caps_unref (format);
1746
1747   GST_DEBUG_OBJECT (base, "fixated othercaps to %" GST_PTR_FORMAT, othercaps);
1748
1749   return othercaps;
1750 }
1751
1752 #define GET_LINE(frame, line) \
1753     (gpointer)(((guint8*)(GST_VIDEO_FRAME_PLANE_DATA (frame, 0))) + \
1754      GST_VIDEO_FRAME_PLANE_STRIDE (frame, 0) * (line))
1755
1756 static GstFlowReturn
1757 gst_video_convert_scale_transform_frame (GstVideoFilter * filter,
1758     GstVideoFrame * in_frame, GstVideoFrame * out_frame)
1759 {
1760   GstVideoConvertScalePrivate *priv = PRIV (filter);
1761   GstFlowReturn ret = GST_FLOW_OK;
1762
1763   GST_CAT_DEBUG_OBJECT (CAT_PERFORMANCE, filter, "doing video scaling");
1764
1765   gst_video_converter_frame (priv->convert, in_frame, out_frame);
1766
1767   return ret;
1768 }
1769
1770 static gboolean
1771 gst_video_convert_scale_src_event (GstBaseTransform * trans, GstEvent * event)
1772 {
1773   GstVideoConvertScale *self = GST_VIDEO_CONVERT_SCALE_CAST (trans);
1774   GstVideoFilter *filter = GST_VIDEO_FILTER_CAST (trans);
1775   gboolean ret;
1776   gdouble x, y;
1777
1778   GST_DEBUG_OBJECT (self, "handling %s event", GST_EVENT_TYPE_NAME (event));
1779
1780   switch (GST_EVENT_TYPE (event)) {
1781     case GST_EVENT_NAVIGATION:
1782       if (filter->in_info.width != filter->out_info.width ||
1783           filter->in_info.height != filter->out_info.height) {
1784         event = gst_event_make_writable (event);
1785
1786         if (gst_navigation_event_get_coordinates (event, &x, &y)) {
1787           gst_navigation_event_set_coordinates (event,
1788               x * filter->in_info.width / filter->out_info.width,
1789               y * filter->in_info.height / filter->out_info.height);
1790         }
1791       }
1792       break;
1793     default:
1794       break;
1795   }
1796
1797   ret = GST_BASE_TRANSFORM_CLASS (parent_class)->src_event (trans, event);
1798
1799   return ret;
1800 }