gst/videotestsrc/gstvideotestsrc.c

   1 /* GStreamer
   2  * Copyright (C) <1999> Erik Walthinsen <omega@cse.ogi.edu>
   3  * Copyright (C) <2002> David A. Schleef <ds@schleef.org>
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Library General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Library General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Library General Public
  16  * License along with this library; if not, write to the
  17  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18  * Boston, MA 02111-1307, USA.
  19  */
  20
  21 /**
  22  * SECTION:element-videotestsrc
  23  *
  24  * The videotestsrc element is used to produce test video data in a wide variety
  25  * of formats. The video test data produced can be controlled with the "pattern"
  26  * property.
  27  *
  28  * <refsect2>
  29  * <title>Example launch line</title>
  30  * |[
  31  * gst-launch -v videotestsrc pattern=snow ! ximagesink
  32  * ]| Shows random noise in an X window.
  33  * </refsect2>
  34  */
  35
  36 #ifdef HAVE_CONFIG_H
  37 #include "config.h"
  38 #endif
  39 #include "gstvideotestsrc.h"
  40 #include "gstvideotestsrcorc.h"
  41 #include "videotestsrc.h"
  42
  43 #include <string.h>
  44 #include <stdlib.h>
  45
  46 GST_DEBUG_CATEGORY_STATIC (video_test_src_debug);
  47 #define GST_CAT_DEFAULT video_test_src_debug
  48
  49 #define DEFAULT_PATTERN            GST_VIDEO_TEST_SRC_SMPTE
  50 #define DEFAULT_TIMESTAMP_OFFSET   0
  51 #define DEFAULT_IS_LIVE            FALSE
  52 #define DEFAULT_COLOR_SPEC         GST_VIDEO_TEST_SRC_BT601
  53 #define DEFAULT_FOREGROUND_COLOR   0xffffffff
  54 #define DEFAULT_BACKGROUND_COLOR   0xff000000
  55 #define DEFAULT_HORIZONTAL_SPEED   0
  56
  57 enum
  58 {
  59   PROP_0,
  60   PROP_PATTERN,
  61   PROP_TIMESTAMP_OFFSET,
  62   PROP_IS_LIVE,
  63   PROP_K0,
  64   PROP_KX,
  65   PROP_KY,
  66   PROP_KT,
  67   PROP_KXT,
  68   PROP_KYT,
  69   PROP_KXY,
  70   PROP_KX2,
  71   PROP_KY2,
  72   PROP_KT2,
  73   PROP_XOFFSET,
  74   PROP_YOFFSET,
  75   PROP_FOREGROUND_COLOR,
  76   PROP_BACKGROUND_COLOR,
  77   PROP_HORIZONTAL_SPEED,
  78   PROP_LAST
  79 };
  80
  81
  82 #define gst_video_test_src_parent_class parent_class
  83 G_DEFINE_TYPE (GstVideoTestSrc, gst_video_test_src, GST_TYPE_PUSH_SRC);
  84
  85 static void gst_video_test_src_set_pattern (GstVideoTestSrc * videotestsrc,
  86     int pattern_type);
  87 static void gst_video_test_src_set_property (GObject * object, guint prop_id,
  88     const GValue * value, GParamSpec * pspec);
  89 static void gst_video_test_src_get_property (GObject * object, guint prop_id,
  90     GValue * value, GParamSpec * pspec);
  91
  92 static GstCaps *gst_video_test_src_getcaps (GstBaseSrc * bsrc,
  93     GstCaps * filter);
  94 static gboolean gst_video_test_src_setcaps (GstBaseSrc * bsrc, GstCaps * caps);
  95 static void gst_video_test_src_src_fixate (GstBaseSrc * bsrc, GstCaps * caps);
  96
  97 static gboolean gst_video_test_src_is_seekable (GstBaseSrc * psrc);
  98 static gboolean gst_video_test_src_do_seek (GstBaseSrc * bsrc,
  99     GstSegment * segment);
 100 static gboolean gst_video_test_src_query (GstBaseSrc * bsrc, GstQuery * query);
 101
 102 static void gst_video_test_src_get_times (GstBaseSrc * basesrc,
 103     GstBuffer * buffer, GstClockTime * start, GstClockTime * end);
 104 static gboolean gst_video_test_src_decide_allocation (GstBaseSrc * bsrc,
 105     GstQuery * query);
 106 static GstFlowReturn gst_video_test_src_fill (GstPushSrc * psrc,
 107     GstBuffer * buffer);
 108 static gboolean gst_video_test_src_start (GstBaseSrc * basesrc);
 109 static gboolean gst_video_test_src_stop (GstBaseSrc * basesrc);
 110
 111 #define GST_TYPE_VIDEO_TEST_SRC_PATTERN (gst_video_test_src_pattern_get_type ())
 112 static GType
 113 gst_video_test_src_pattern_get_type (void)
 114 {
 115   static GType video_test_src_pattern_type = 0;
 116   static const GEnumValue pattern_types[] = {
 117     {GST_VIDEO_TEST_SRC_SMPTE, "SMPTE 100% color bars", "smpte"},
 118     {GST_VIDEO_TEST_SRC_SNOW, "Random (television snow)", "snow"},
 119     {GST_VIDEO_TEST_SRC_BLACK, "100% Black", "black"},
 120     {GST_VIDEO_TEST_SRC_WHITE, "100% White", "white"},
 121     {GST_VIDEO_TEST_SRC_RED, "Red", "red"},
 122     {GST_VIDEO_TEST_SRC_GREEN, "Green", "green"},
 123     {GST_VIDEO_TEST_SRC_BLUE, "Blue", "blue"},
 124     {GST_VIDEO_TEST_SRC_CHECKERS1, "Checkers 1px", "checkers-1"},
 125     {GST_VIDEO_TEST_SRC_CHECKERS2, "Checkers 2px", "checkers-2"},
 126     {GST_VIDEO_TEST_SRC_CHECKERS4, "Checkers 4px", "checkers-4"},
 127     {GST_VIDEO_TEST_SRC_CHECKERS8, "Checkers 8px", "checkers-8"},
 128     {GST_VIDEO_TEST_SRC_CIRCULAR, "Circular", "circular"},
 129     {GST_VIDEO_TEST_SRC_BLINK, "Blink", "blink"},
 130     {GST_VIDEO_TEST_SRC_SMPTE75, "SMPTE 75% color bars", "smpte75"},
 131     {GST_VIDEO_TEST_SRC_ZONE_PLATE, "Zone plate", "zone-plate"},
 132     {GST_VIDEO_TEST_SRC_GAMUT, "Gamut checkers", "gamut"},
 133     {GST_VIDEO_TEST_SRC_CHROMA_ZONE_PLATE, "Chroma zone plate",
 134         "chroma-zone-plate"},
 135     {GST_VIDEO_TEST_SRC_SOLID, "Solid color", "solid-color"},
 136     {GST_VIDEO_TEST_SRC_BALL, "Moving ball", "ball"},
 137     {GST_VIDEO_TEST_SRC_SMPTE100, "SMPTE 100% color bars", "smpte100"},
 138     {GST_VIDEO_TEST_SRC_BAR, "Bar", "bar"},
 139     {0, NULL, NULL}
 140   };
 141
 142   if (!video_test_src_pattern_type) {
 143     video_test_src_pattern_type =
 144         g_enum_register_static ("GstVideoTestSrcPattern", pattern_types);
 145   }
 146   return video_test_src_pattern_type;
 147 }
 148
 149 static void
 150 gst_video_test_src_class_init (GstVideoTestSrcClass * klass)
 151 {
 152   GObjectClass *gobject_class;
 153   GstElementClass *gstelement_class;
 154   GstBaseSrcClass *gstbasesrc_class;
 155   GstPushSrcClass *gstpushsrc_class;
 156   GstCaps *templ_caps;
 157
 158   gobject_class = (GObjectClass *) klass;
 159   gstelement_class = (GstElementClass *) klass;
 160   gstbasesrc_class = (GstBaseSrcClass *) klass;
 161   gstpushsrc_class = (GstPushSrcClass *) klass;
 162
 163   gobject_class->set_property = gst_video_test_src_set_property;
 164   gobject_class->get_property = gst_video_test_src_get_property;
 165
 166   g_object_class_install_property (gobject_class, PROP_PATTERN,
 167       g_param_spec_enum ("pattern", "Pattern",
 168           "Type of test pattern to generate", GST_TYPE_VIDEO_TEST_SRC_PATTERN,
 169           DEFAULT_PATTERN, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 170   g_object_class_install_property (gobject_class, PROP_TIMESTAMP_OFFSET,
 171       g_param_spec_int64 ("timestamp-offset", "Timestamp offset",
 172           "An offset added to timestamps set on buffers (in ns)", G_MININT64,
 173           G_MAXINT64, 0, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 174   g_object_class_install_property (gobject_class, PROP_IS_LIVE,
 175       g_param_spec_boolean ("is-live", "Is Live",
 176           "Whether to act as a live source", DEFAULT_IS_LIVE,
 177           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 178   g_object_class_install_property (gobject_class, PROP_K0,
 179       g_param_spec_int ("k0", "Zoneplate zero order phase",
 180           "Zoneplate zero order phase, for generating plain fields or phase offsets",
 181           G_MININT32, G_MAXINT32, 0,
 182           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 183   g_object_class_install_property (gobject_class, PROP_KX,
 184       g_param_spec_int ("kx", "Zoneplate 1st order x phase",
 185           "Zoneplate 1st order x phase, for generating constant horizontal frequencies",
 186           G_MININT32, G_MAXINT32, 0,
 187           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 188   g_object_class_install_property (gobject_class, PROP_KY,
 189       g_param_spec_int ("ky", "Zoneplate 1st order y phase",
 190           "Zoneplate 1st order y phase, for generating contant vertical frequencies",
 191           G_MININT32, G_MAXINT32, 0,
 192           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 193   g_object_class_install_property (gobject_class, PROP_KT,
 194       g_param_spec_int ("kt", "Zoneplate 1st order t phase",
 195           "Zoneplate 1st order t phase, for generating phase rotation as a function of time",
 196           G_MININT32, G_MAXINT32, 0,
 197           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 198   g_object_class_install_property (gobject_class, PROP_KXT,
 199       g_param_spec_int ("kxt", "Zoneplate x*t product phase",
 200           "Zoneplate x*t product phase, normalised to kxy/256 cycles per vertical pixel at width/2 from origin",
 201           G_MININT32, G_MAXINT32, 0,
 202           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 203   g_object_class_install_property (gobject_class, PROP_KYT,
 204       g_param_spec_int ("kyt", "Zoneplate y*t product phase",
 205           "Zoneplate y*t product phase", G_MININT32, G_MAXINT32, 0,
 206           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 207   g_object_class_install_property (gobject_class, PROP_KXY,
 208       g_param_spec_int ("kxy", "Zoneplate x*y product phase",
 209           "Zoneplate x*y product phase", G_MININT32, G_MAXINT32, 0,
 210           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 211   g_object_class_install_property (gobject_class, PROP_KX2,
 212       g_param_spec_int ("kx2", "Zoneplate 2nd order x phase",
 213           "Zoneplate 2nd order x phase, normalised to kx2/256 cycles per horizontal pixel at width/2 from origin",
 214           G_MININT32, G_MAXINT32, 0,
 215           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 216   g_object_class_install_property (gobject_class, PROP_KY2,
 217       g_param_spec_int ("ky2", "Zoneplate 2nd order y phase",
 218           "Zoneplate 2nd order y phase, normailsed to ky2/256 cycles per vertical pixel at height/2 from origin",
 219           G_MININT32, G_MAXINT32, 0,
 220           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 221   g_object_class_install_property (gobject_class, PROP_KT2,
 222       g_param_spec_int ("kt2", "Zoneplate 2nd order t phase",
 223           "Zoneplate 2nd order t phase, t*t/256 cycles per picture", G_MININT32,
 224           G_MAXINT32, 0, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 225   g_object_class_install_property (gobject_class, PROP_XOFFSET,
 226       g_param_spec_int ("xoffset", "Zoneplate 2nd order products x offset",
 227           "Zoneplate 2nd order products x offset", G_MININT32, G_MAXINT32, 0,
 228           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 229   g_object_class_install_property (gobject_class, PROP_YOFFSET,
 230       g_param_spec_int ("yoffset", "Zoneplate 2nd order products y offset",
 231           "Zoneplate 2nd order products y offset", G_MININT32, G_MAXINT32, 0,
 232           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 233   /**
 234    * GstVideoTestSrc:foreground-color
 235    *
 236    * Color to use for solid-color pattern and foreground color of other
 237    * patterns.  Default is white (0xffffffff).
 238    *
 239    * Since: 0.10.31
 240    **/
 241   g_object_class_install_property (gobject_class, PROP_FOREGROUND_COLOR,
 242       g_param_spec_uint ("foreground-color", "Foreground Color",
 243           "Foreground color to use (big-endian ARGB)", 0, G_MAXUINT32,
 244           DEFAULT_FOREGROUND_COLOR,
 245           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 246   /**
 247    * GstVideoTestSrc:background-color
 248    *
 249    * Color to use for background color of some patterns.  Default is
 250    * black (0xff000000).
 251    *
 252    * Since: 0.10.31
 253    **/
 254   g_object_class_install_property (gobject_class, PROP_BACKGROUND_COLOR,
 255       g_param_spec_uint ("background-color", "Background Color",
 256           "Background color to use (big-endian ARGB)", 0, G_MAXUINT32,
 257           DEFAULT_BACKGROUND_COLOR,
 258           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 259
 260   g_object_class_install_property (gobject_class, PROP_HORIZONTAL_SPEED,
 261       g_param_spec_int ("horizontal-speed", "Horizontal Speed",
 262           "Scroll image number of pixels per frame (positive is scroll to the left)",
 263           G_MININT32, G_MAXINT32, DEFAULT_HORIZONTAL_SPEED,
 264           G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
 265
 266   gst_element_class_set_details_simple (gstelement_class,
 267       "Video test source", "Source/Video",
 268       "Creates a test video stream", "David A. Schleef <ds@schleef.org>");
 269
 270   templ_caps = gst_video_test_src_getcaps (NULL, NULL);
 271   gst_element_class_add_pad_template (gstelement_class,
 272       gst_pad_template_new ("src", GST_PAD_SRC, GST_PAD_ALWAYS, templ_caps));
 273   gst_caps_unref (templ_caps);
 274
 275   gstbasesrc_class->get_caps = gst_video_test_src_getcaps;
 276   gstbasesrc_class->set_caps = gst_video_test_src_setcaps;
 277   gstbasesrc_class->fixate = gst_video_test_src_src_fixate;
 278   gstbasesrc_class->is_seekable = gst_video_test_src_is_seekable;
 279   gstbasesrc_class->do_seek = gst_video_test_src_do_seek;
 280   gstbasesrc_class->query = gst_video_test_src_query;
 281   gstbasesrc_class->get_times = gst_video_test_src_get_times;
 282   gstbasesrc_class->start = gst_video_test_src_start;
 283   gstbasesrc_class->stop = gst_video_test_src_stop;
 284   gstbasesrc_class->decide_allocation = gst_video_test_src_decide_allocation;
 285
 286   gstpushsrc_class->fill = gst_video_test_src_fill;
 287 }
 288
 289 static void
 290 gst_video_test_src_init (GstVideoTestSrc * src)
 291 {
 292   gst_video_test_src_set_pattern (src, DEFAULT_PATTERN);
 293
 294   src->timestamp_offset = DEFAULT_TIMESTAMP_OFFSET;
 295   src->foreground_color = DEFAULT_FOREGROUND_COLOR;
 296   src->background_color = DEFAULT_BACKGROUND_COLOR;
 297   src->horizontal_speed = DEFAULT_HORIZONTAL_SPEED;
 298
 299   /* we operate in time */
 300   gst_base_src_set_format (GST_BASE_SRC (src), GST_FORMAT_TIME);
 301   gst_base_src_set_live (GST_BASE_SRC (src), DEFAULT_IS_LIVE);
 302 }
 303
 304 static void
 305 gst_video_test_src_src_fixate (GstBaseSrc * bsrc, GstCaps * caps)
 306 {
 307   GstStructure *structure;
 308
 309   structure = gst_caps_get_structure (caps, 0);
 310
 311   gst_structure_fixate_field_nearest_int (structure, "width", 320);
 312   gst_structure_fixate_field_nearest_int (structure, "height", 240);
 313   gst_structure_fixate_field_nearest_fraction (structure, "framerate", 30, 1);
 314   if (gst_structure_has_field (structure, "pixel-aspect-ratio"))
 315     gst_structure_fixate_field_nearest_fraction (structure,
 316         "pixel-aspect-ratio", 1, 1);
 317   if (gst_structure_has_field (structure, "colorimetry"))
 318     gst_structure_fixate_field_string (structure, "colorimetry", "bt601");
 319   if (gst_structure_has_field (structure, "chroma-site"))
 320     gst_structure_fixate_field_string (structure, "chroma-site", "mpeg2");
 321
 322   if (gst_structure_has_field (structure, "interlaced"))
 323     gst_structure_fixate_field_boolean (structure, "interlaced", FALSE);
 324
 325   GST_BASE_SRC_CLASS (parent_class)->fixate (bsrc, caps);
 326 }
 327
 328 static void
 329 gst_video_test_src_set_pattern (GstVideoTestSrc * videotestsrc,
 330     int pattern_type)
 331 {
 332   videotestsrc->pattern_type = pattern_type;
 333
 334   GST_DEBUG_OBJECT (videotestsrc, "setting pattern to %d", pattern_type);
 335
 336   switch (pattern_type) {
 337     case GST_VIDEO_TEST_SRC_SMPTE:
 338       videotestsrc->make_image = gst_video_test_src_smpte;
 339       break;
 340     case GST_VIDEO_TEST_SRC_SNOW:
 341       videotestsrc->make_image = gst_video_test_src_snow;
 342       break;
 343     case GST_VIDEO_TEST_SRC_BLACK:
 344       videotestsrc->make_image = gst_video_test_src_black;
 345       break;
 346     case GST_VIDEO_TEST_SRC_WHITE:
 347       videotestsrc->make_image = gst_video_test_src_white;
 348       break;
 349     case GST_VIDEO_TEST_SRC_RED:
 350       videotestsrc->make_image = gst_video_test_src_red;
 351       break;
 352     case GST_VIDEO_TEST_SRC_GREEN:
 353       videotestsrc->make_image = gst_video_test_src_green;
 354       break;
 355     case GST_VIDEO_TEST_SRC_BLUE:
 356       videotestsrc->make_image = gst_video_test_src_blue;
 357       break;
 358     case GST_VIDEO_TEST_SRC_CHECKERS1:
 359       videotestsrc->make_image = gst_video_test_src_checkers1;
 360       break;
 361     case GST_VIDEO_TEST_SRC_CHECKERS2:
 362       videotestsrc->make_image = gst_video_test_src_checkers2;
 363       break;
 364     case GST_VIDEO_TEST_SRC_CHECKERS4:
 365       videotestsrc->make_image = gst_video_test_src_checkers4;
 366       break;
 367     case GST_VIDEO_TEST_SRC_CHECKERS8:
 368       videotestsrc->make_image = gst_video_test_src_checkers8;
 369       break;
 370     case GST_VIDEO_TEST_SRC_CIRCULAR:
 371       videotestsrc->make_image = gst_video_test_src_circular;
 372       break;
 373     case GST_VIDEO_TEST_SRC_BLINK:
 374       videotestsrc->make_image = gst_video_test_src_blink;
 375       break;
 376     case GST_VIDEO_TEST_SRC_SMPTE75:
 377       videotestsrc->make_image = gst_video_test_src_smpte75;
 378       break;
 379     case GST_VIDEO_TEST_SRC_ZONE_PLATE:
 380       videotestsrc->make_image = gst_video_test_src_zoneplate;
 381       break;
 382     case GST_VIDEO_TEST_SRC_GAMUT:
 383       videotestsrc->make_image = gst_video_test_src_gamut;
 384       break;
 385     case GST_VIDEO_TEST_SRC_CHROMA_ZONE_PLATE:
 386       videotestsrc->make_image = gst_video_test_src_chromazoneplate;
 387       break;
 388     case GST_VIDEO_TEST_SRC_SOLID:
 389       videotestsrc->make_image = gst_video_test_src_solid;
 390       break;
 391     case GST_VIDEO_TEST_SRC_BALL:
 392       videotestsrc->make_image = gst_video_test_src_ball;
 393       break;
 394     case GST_VIDEO_TEST_SRC_SMPTE100:
 395       videotestsrc->make_image = gst_video_test_src_smpte100;
 396       break;
 397     case GST_VIDEO_TEST_SRC_BAR:
 398       videotestsrc->make_image = gst_video_test_src_bar;
 399       break;
 400     default:
 401       g_assert_not_reached ();
 402   }
 403 }
 404
 405 static void
 406 gst_video_test_src_set_property (GObject * object, guint prop_id,
 407     const GValue * value, GParamSpec * pspec)
 408 {
 409   GstVideoTestSrc *src = GST_VIDEO_TEST_SRC (object);
 410
 411   switch (prop_id) {
 412     case PROP_PATTERN:
 413       gst_video_test_src_set_pattern (src, g_value_get_enum (value));
 414       break;
 415     case PROP_TIMESTAMP_OFFSET:
 416       src->timestamp_offset = g_value_get_int64 (value);
 417       break;
 418     case PROP_IS_LIVE:
 419       gst_base_src_set_live (GST_BASE_SRC (src), g_value_get_boolean (value));
 420       break;
 421     case PROP_K0:
 422       src->k0 = g_value_get_int (value);
 423       break;
 424     case PROP_KX:
 425       src->kx = g_value_get_int (value);
 426       break;
 427     case PROP_KY:
 428       src->ky = g_value_get_int (value);
 429       break;
 430     case PROP_KT:
 431       src->kt = g_value_get_int (value);
 432       break;
 433     case PROP_KXT:
 434       src->kxt = g_value_get_int (value);
 435       break;
 436     case PROP_KYT:
 437       src->kyt = g_value_get_int (value);
 438       break;
 439     case PROP_KXY:
 440       src->kxy = g_value_get_int (value);
 441       break;
 442     case PROP_KX2:
 443       src->kx2 = g_value_get_int (value);
 444       break;
 445     case PROP_KY2:
 446       src->ky2 = g_value_get_int (value);
 447       break;
 448     case PROP_KT2:
 449       src->kt2 = g_value_get_int (value);
 450       break;
 451     case PROP_XOFFSET:
 452       src->xoffset = g_value_get_int (value);
 453       break;
 454     case PROP_YOFFSET:
 455       src->yoffset = g_value_get_int (value);
 456       break;
 457     case PROP_FOREGROUND_COLOR:
 458       src->foreground_color = g_value_get_uint (value);
 459       break;
 460     case PROP_BACKGROUND_COLOR:
 461       src->background_color = g_value_get_uint (value);
 462       break;
 463     case PROP_HORIZONTAL_SPEED:
 464       src->horizontal_speed = g_value_get_int (value);
 465     default:
 466       break;
 467   }
 468 }
 469
 470 static void
 471 gst_video_test_src_get_property (GObject * object, guint prop_id,
 472     GValue * value, GParamSpec * pspec)
 473 {
 474   GstVideoTestSrc *src = GST_VIDEO_TEST_SRC (object);
 475
 476   switch (prop_id) {
 477     case PROP_PATTERN:
 478       g_value_set_enum (value, src->pattern_type);
 479       break;
 480     case PROP_TIMESTAMP_OFFSET:
 481       g_value_set_int64 (value, src->timestamp_offset);
 482       break;
 483     case PROP_IS_LIVE:
 484       g_value_set_boolean (value, gst_base_src_is_live (GST_BASE_SRC (src)));
 485       break;
 486     case PROP_K0:
 487       g_value_set_int (value, src->k0);
 488       break;
 489     case PROP_KX:
 490       g_value_set_int (value, src->kx);
 491       break;
 492     case PROP_KY:
 493       g_value_set_int (value, src->ky);
 494       break;
 495     case PROP_KT:
 496       g_value_set_int (value, src->kt);
 497       break;
 498     case PROP_KXT:
 499       g_value_set_int (value, src->kxt);
 500       break;
 501     case PROP_KYT:
 502       g_value_set_int (value, src->kyt);
 503       break;
 504     case PROP_KXY:
 505       g_value_set_int (value, src->kxy);
 506       break;
 507     case PROP_KX2:
 508       g_value_set_int (value, src->kx2);
 509       break;
 510     case PROP_KY2:
 511       g_value_set_int (value, src->ky2);
 512       break;
 513     case PROP_KT2:
 514       g_value_set_int (value, src->kt2);
 515       break;
 516     case PROP_XOFFSET:
 517       g_value_set_int (value, src->xoffset);
 518       break;
 519     case PROP_YOFFSET:
 520       g_value_set_int (value, src->yoffset);
 521       break;
 522     case PROP_FOREGROUND_COLOR:
 523       g_value_set_uint (value, src->foreground_color);
 524       break;
 525     case PROP_BACKGROUND_COLOR:
 526       g_value_set_uint (value, src->background_color);
 527       break;
 528     case PROP_HORIZONTAL_SPEED:
 529       g_value_set_int (value, src->horizontal_speed);
 530       break;
 531     default:
 532       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 533       break;
 534   }
 535 }
 536
 537 /* threadsafe because this gets called as the plugin is loaded */
 538 static GstCaps *
 539 gst_video_test_src_getcaps (GstBaseSrc * bsrc, GstCaps * filter)
 540 {
 541   static GstCaps *capslist = NULL;
 542
 543   if (!capslist) {
 544     GstCaps *caps;
 545     GstStructure *structure;
 546     int i;
 547
 548     caps = gst_caps_new_empty ();
 549     for (i = 0; i < n_formats; i++) {
 550       structure = paint_get_structure (format_list + i);
 551       gst_structure_set (structure,
 552           "width", GST_TYPE_INT_RANGE, 1, G_MAXINT,
 553           "height", GST_TYPE_INT_RANGE, 1, G_MAXINT,
 554           "framerate", GST_TYPE_FRACTION_RANGE, 0, 1, G_MAXINT, 1, NULL);
 555       gst_caps_append_structure (caps, structure);
 556     }
 557
 558     capslist = caps;
 559   }
 560
 561   if (filter)
 562     return gst_caps_intersect_full (filter, capslist, GST_CAPS_INTERSECT_FIRST);
 563   else
 564     return gst_caps_ref (capslist);
 565 }
 566
 567 static gboolean
 568 gst_video_test_src_parse_caps (const GstCaps * caps,
 569     gint * width, gint * height, gint * fps_n, gint * fps_d,
 570     GstVideoColorimetry * colorimetry)
 571 {
 572   const GstStructure *structure;
 573   GstPadLinkReturn ret;
 574   const GValue *framerate;
 575   const gchar *csp;
 576
 577   GST_DEBUG ("parsing caps");
 578
 579   structure = gst_caps_get_structure (caps, 0);
 580
 581   ret = gst_structure_get_int (structure, "width", width);
 582   ret &= gst_structure_get_int (structure, "height", height);
 583   framerate = gst_structure_get_value (structure, "framerate");
 584
 585   if (framerate) {
 586     *fps_n = gst_value_get_fraction_numerator (framerate);
 587     *fps_d = gst_value_get_fraction_denominator (framerate);
 588   } else
 589     goto no_framerate;
 590
 591   if ((csp = gst_structure_get_string (structure, "colorimetry")))
 592     gst_video_colorimetry_from_string (colorimetry, csp);
 593
 594   return ret;
 595
 596   /* ERRORS */
 597 no_framerate:
 598   {
 599     GST_DEBUG ("videotestsrc no framerate given");
 600     return FALSE;
 601   }
 602 }
 603
 604 static gboolean
 605 gst_video_test_src_decide_allocation (GstBaseSrc * bsrc, GstQuery * query)
 606 {
 607   GstVideoTestSrc *videotestsrc;
 608   GstBufferPool *pool;
 609   guint size, min, max, prefix, alignment;
 610
 611   videotestsrc = GST_VIDEO_TEST_SRC (bsrc);
 612
 613   gst_query_parse_allocation_params (query, &size, &min, &max, &prefix,
 614       &alignment, &pool);
 615   /* adjust size */
 616   size = MAX (size, videotestsrc->info.size);
 617
 618   if (pool) {
 619     GstStructure *config;
 620
 621     config = gst_buffer_pool_get_config (pool);
 622     gst_buffer_pool_config_add_option (config,
 623         GST_BUFFER_POOL_OPTION_VIDEO_META);
 624     gst_buffer_pool_set_config (pool, config);
 625   }
 626   gst_query_set_allocation_params (query, size, min, max, prefix,
 627       alignment, pool);
 628
 629   return TRUE;
 630 }
 631
 632 static gboolean
 633 gst_video_test_src_setcaps (GstBaseSrc * bsrc, GstCaps * caps)
 634 {
 635   struct format_list_struct *format;
 636   const GstStructure *structure;
 637   GstVideoTestSrc *videotestsrc;
 638   GstVideoInfo info;
 639
 640   videotestsrc = GST_VIDEO_TEST_SRC (bsrc);
 641
 642   structure = gst_caps_get_structure (caps, 0);
 643
 644   if (gst_structure_has_name (structure, "video/x-raw")) {
 645     /* we can use the parsing code */
 646     if (!gst_video_info_from_caps (&info, caps))
 647       goto parse_failed;
 648
 649   } else if (gst_structure_has_name (structure, "video/x-raw-bayer")) {
 650     if (!gst_video_test_src_parse_caps (caps, &info.width, &info.height,
 651             &info.fps_n, &info.fps_d, &info.colorimetry))
 652       goto parse_failed;
 653
 654     info.size =
 655         gst_video_test_src_get_size (videotestsrc, info.width, info.height);
 656   }
 657
 658   if (!(format = paintinfo_find_by_structure (structure)))
 659     goto unknown_format;
 660
 661   /* looks ok here */
 662   videotestsrc->format = format;
 663   videotestsrc->info = info;
 664
 665   GST_DEBUG_OBJECT (videotestsrc, "size %dx%d, %d/%d fps",
 666       info.width, info.height, info.fps_n, info.fps_d);
 667
 668   g_free (videotestsrc->tmpline);
 669   g_free (videotestsrc->tmpline2);
 670   g_free (videotestsrc->tmpline_u8);
 671   videotestsrc->tmpline_u8 = g_malloc (info.width + 8);
 672   videotestsrc->tmpline = g_malloc ((info.width + 8) * 4);
 673   videotestsrc->tmpline2 = g_malloc ((info.width + 8) * 4);
 674
 675   return TRUE;
 676
 677   /* ERRORS */
 678 parse_failed:
 679   {
 680     GST_DEBUG_OBJECT (bsrc, "failed to parse caps");
 681     return FALSE;
 682   }
 683 unknown_format:
 684   {
 685     GST_DEBUG ("videotestsrc format not found");
 686     return FALSE;
 687   }
 688 }
 689
 690 static gboolean
 691 gst_video_test_src_query (GstBaseSrc * bsrc, GstQuery * query)
 692 {
 693   gboolean res;
 694   GstVideoTestSrc *src;
 695
 696   src = GST_VIDEO_TEST_SRC (bsrc);
 697
 698   switch (GST_QUERY_TYPE (query)) {
 699     case GST_QUERY_CONVERT:
 700     {
 701       GstFormat src_fmt, dest_fmt;
 702       gint64 src_val, dest_val;
 703
 704       gst_query_parse_convert (query, &src_fmt, &src_val, &dest_fmt, &dest_val);
 705       res =
 706           gst_video_info_convert (&src->info, src_fmt, src_val, dest_fmt,
 707           &dest_val);
 708       gst_query_set_convert (query, src_fmt, src_val, dest_fmt, dest_val);
 709       break;
 710     }
 711     default:
 712       res = GST_BASE_SRC_CLASS (parent_class)->query (bsrc, query);
 713       break;
 714   }
 715   return res;
 716 }
 717
 718 static void
 719 gst_video_test_src_get_times (GstBaseSrc * basesrc, GstBuffer * buffer,
 720     GstClockTime * start, GstClockTime * end)
 721 {
 722   /* for live sources, sync on the timestamp of the buffer */
 723   if (gst_base_src_is_live (basesrc)) {
 724     GstClockTime timestamp = GST_BUFFER_TIMESTAMP (buffer);
 725
 726     if (GST_CLOCK_TIME_IS_VALID (timestamp)) {
 727       /* get duration to calculate end time */
 728       GstClockTime duration = GST_BUFFER_DURATION (buffer);
 729
 730       if (GST_CLOCK_TIME_IS_VALID (duration)) {
 731         *end = timestamp + duration;
 732       }
 733       *start = timestamp;
 734     }
 735   } else {
 736     *start = -1;
 737     *end = -1;
 738   }
 739 }
 740
 741 static gboolean
 742 gst_video_test_src_do_seek (GstBaseSrc * bsrc, GstSegment * segment)
 743 {
 744   GstClockTime position;
 745   GstVideoTestSrc *src;
 746
 747   src = GST_VIDEO_TEST_SRC (bsrc);
 748
 749   segment->time = segment->start;
 750   position = segment->position;
 751
 752   /* now move to the position indicated */
 753   if (src->info.fps_n) {
 754     src->n_frames = gst_util_uint64_scale (position,
 755         src->info.fps_n, src->info.fps_d * GST_SECOND);
 756   } else {
 757     src->n_frames = 0;
 758   }
 759   if (src->info.fps_n) {
 760     src->running_time = gst_util_uint64_scale (src->n_frames,
 761         src->info.fps_d * GST_SECOND, src->info.fps_n);
 762   } else {
 763     /* FIXME : Not sure what to set here */
 764     src->running_time = 0;
 765   }
 766
 767   g_assert (src->running_time <= position);
 768
 769   return TRUE;
 770 }
 771
 772 static gboolean
 773 gst_video_test_src_is_seekable (GstBaseSrc * psrc)
 774 {
 775   /* we're seekable... */
 776   return TRUE;
 777 }
 778
 779 static GstFlowReturn
 780 gst_video_test_src_fill (GstPushSrc * psrc, GstBuffer * buffer)
 781 {
 782   GstVideoTestSrc *src;
 783   GstClockTime next_time;
 784   GstVideoFrame frame;
 785
 786   src = GST_VIDEO_TEST_SRC (psrc);
 787
 788   if (G_UNLIKELY (src->format == NULL))
 789     goto not_negotiated;
 790
 791   /* 0 framerate and we are at the second frame, eos */
 792   if (G_UNLIKELY (src->info.fps_n == 0 && src->n_frames == 1))
 793     goto eos;
 794
 795   GST_LOG_OBJECT (src,
 796       "creating buffer from pool for frame %d", (gint) src->n_frames);
 797
 798   if (!gst_video_frame_map (&frame, &src->info, buffer, GST_MAP_WRITE))
 799     goto invalid_frame;
 800
 801   src->make_image (src, &frame);
 802
 803   gst_video_frame_unmap (&frame);
 804
 805   GST_BUFFER_TIMESTAMP (buffer) = src->timestamp_offset + src->running_time;
 806   GST_BUFFER_OFFSET (buffer) = src->n_frames;
 807   src->n_frames++;
 808   GST_BUFFER_OFFSET_END (buffer) = src->n_frames;
 809   if (src->info.fps_n) {
 810     next_time = gst_util_uint64_scale_int (src->n_frames * GST_SECOND,
 811         src->info.fps_d, src->info.fps_n);
 812     GST_BUFFER_DURATION (buffer) = next_time - src->running_time;
 813   } else {
 814     next_time = src->timestamp_offset;
 815     /* NONE means forever */
 816     GST_BUFFER_DURATION (buffer) = GST_CLOCK_TIME_NONE;
 817   }
 818
 819   src->running_time = next_time;
 820
 821   return GST_FLOW_OK;
 822
 823 not_negotiated:
 824   {
 825     GST_ELEMENT_ERROR (src, CORE, NEGOTIATION, (NULL),
 826         ("format wasn't negotiated before get function"));
 827     return GST_FLOW_NOT_NEGOTIATED;
 828   }
 829 eos:
 830   {
 831     GST_DEBUG_OBJECT (src, "eos: 0 framerate, frame %d", (gint) src->n_frames);
 832     return GST_FLOW_EOS;
 833   }
 834 invalid_frame:
 835   {
 836     GST_DEBUG_OBJECT (src, "invalid frame");
 837     return GST_FLOW_OK;
 838   }
 839 }
 840
 841 static gboolean
 842 gst_video_test_src_start (GstBaseSrc * basesrc)
 843 {
 844   GstVideoTestSrc *src = GST_VIDEO_TEST_SRC (basesrc);
 845
 846   src->running_time = 0;
 847   src->n_frames = 0;
 848
 849   return TRUE;
 850 }
 851
 852 static gboolean
 853 gst_video_test_src_stop (GstBaseSrc * basesrc)
 854 {
 855   GstVideoTestSrc *src = GST_VIDEO_TEST_SRC (basesrc);
 856
 857   g_free (src->tmpline);
 858   src->tmpline = NULL;
 859   g_free (src->tmpline2);
 860   src->tmpline2 = NULL;
 861   g_free (src->tmpline_u8);
 862   src->tmpline_u8 = NULL;
 863
 864   return TRUE;
 865 }
 866
 867 static gboolean
 868 plugin_init (GstPlugin * plugin)
 869 {
 870   gst_videotestsrc_orc_init ();
 871
 872   GST_DEBUG_CATEGORY_INIT (video_test_src_debug, "videotestsrc", 0,
 873       "Video Test Source");
 874
 875   return gst_element_register (plugin, "videotestsrc", GST_RANK_NONE,
 876       GST_TYPE_VIDEO_TEST_SRC);
 877 }
 878
 879 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
 880     GST_VERSION_MINOR,
 881     "videotestsrc",
 882     "Creates a test video stream",
 883     plugin_init, VERSION, GST_LICENSE, GST_PACKAGE_NAME, GST_PACKAGE_ORIGIN)