src/modules/gstreamer/emotion_sink.c

   1 #include "emotion_gstreamer.h"
   2
   3 static GstStaticPadTemplate sinktemplate = GST_STATIC_PAD_TEMPLATE("sink",
   4                                                                    GST_PAD_SINK, GST_PAD_ALWAYS,
   5                                                                    GST_STATIC_CAPS(GST_VIDEO_CAPS_YUV("{ I420, YV12, YUY2, NV12, ST12, TM12 }") ";"
   6                                                                                    GST_VIDEO_CAPS_BGRx ";" GST_VIDEO_CAPS_BGR ";" GST_VIDEO_CAPS_BGRA));
   7
   8 GST_DEBUG_CATEGORY_STATIC(evas_video_sink_debug);
   9 #define GST_CAT_DEFAULT evas_video_sink_debug
  10
  11 enum {
  12   REPAINT_REQUESTED,
  13   LAST_SIGNAL
  14 };
  15
  16 enum {
  17   PROP_0,
  18   PROP_EVAS_OBJECT,
  19   PROP_WIDTH,
  20   PROP_HEIGHT,
  21   PROP_EV,
  22   PROP_LAST
  23 };
  24
  25 static guint evas_video_sink_signals[LAST_SIGNAL] = { 0, };
  26
  27 #define _do_init(bla)                                   \
  28   GST_DEBUG_CATEGORY_INIT(evas_video_sink_debug,        \
  29                           "emotion-sink",               \
  30                           0,                            \
  31                           "emotion video sink")
  32
  33 GST_BOILERPLATE_FULL(EvasVideoSink,
  34                      evas_video_sink,
  35                      GstVideoSink,
  36                      GST_TYPE_VIDEO_SINK,
  37                      _do_init);
  38
  39
  40 static void unlock_buffer_mutex(EvasVideoSinkPrivate* priv);
  41 static void evas_video_sink_main_render(void *data);
  42 static void evas_video_sink_samsung_main_render(void *data);
  43
  44 static void
  45 _evas_video_bgrx_step(unsigned char *evas_data, const unsigned char *gst_data,
  46                       unsigned int w, unsigned int h __UNUSED__, unsigned int output_height, unsigned int step)
  47 {
  48    unsigned int x;
  49    unsigned int y;
  50
  51    for (y = 0; y < output_height; ++y)
  52      {
  53         for (x = 0; x < w; x++)
  54           {
  55              evas_data[0] = gst_data[0];
  56              evas_data[1] = gst_data[1];
  57              evas_data[2] = gst_data[2];
  58              evas_data[3] = 255;
  59              gst_data += step;
  60              evas_data += 4;
  61           }
  62      }
  63 }
  64
  65 static void
  66 _evas_video_bgr(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h, unsigned int output_height)
  67 {
  68    _evas_video_bgrx_step(evas_data, gst_data, w, h, output_height, 3);
  69 }
  70
  71 static void
  72 _evas_video_bgrx(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h, unsigned int output_height)
  73 {
  74    _evas_video_bgrx_step(evas_data, gst_data, w, h, output_height, 4);
  75 }
  76
  77 static void
  78 _evas_video_bgra(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h __UNUSED__, unsigned int output_height)
  79 {
  80    unsigned int x;
  81    unsigned int y;
  82
  83    for (y = 0; y < output_height; ++y)
  84      {
  85         unsigned char alpha;
  86
  87         for (x = 0; x < w; ++x)
  88           {
  89              alpha = gst_data[3];
  90              evas_data[0] = (gst_data[0] * alpha) / 255;
  91              evas_data[1] = (gst_data[1] * alpha) / 255;
  92              evas_data[2] = (gst_data[2] * alpha) / 255;
  93              evas_data[3] = alpha;
  94              gst_data += 4;
  95              evas_data += 4;
  96           }
  97      }
  98 }
  99
 100 static void
 101 _evas_video_i420(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h __UNUSED__, unsigned int output_height)
 102 {
 103    const unsigned char **rows;
 104    unsigned int i, j;
 105    unsigned int rh;
 106
 107    rh = output_height;
 108
 109    rows = (const unsigned char **)evas_data;
 110
 111    for (i = 0; i < rh; i++)
 112      rows[i] = &gst_data[i * w];
 113
 114    for (j = 0; j < (rh / 2); j++, i++)
 115      rows[i] = &gst_data[h * w + j * (w / 2)];
 116
 117    for (j = 0; j < (rh / 2); j++, i++)
 118      rows[i] = &gst_data[h * w + rh * (w / 4) + j * (w / 2)];
 119 }
 120
 121 static void
 122 _evas_video_yv12(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h __UNUSED__, unsigned int output_height)
 123 {
 124    const unsigned char **rows;
 125    unsigned int i, j;
 126    unsigned int rh;
 127
 128    rh = output_height;
 129
 130    rows = (const unsigned char **)evas_data;
 131
 132    for (i = 0; i < rh; i++)
 133      rows[i] = &gst_data[i * w];
 134
 135    for (j = 0; j < (rh / 2); j++, i++)
 136      rows[i] = &gst_data[h * w + rh * (w / 4) + j * (w / 2)];
 137
 138    for (j = 0; j < (rh / 2); j++, i++)
 139      rows[i] = &gst_data[h * w + j * (w / 2)];
 140 }
 141
 142 static void
 143 _evas_video_yuy2(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h __UNUSED__, unsigned int output_height)
 144 {
 145    const unsigned char **rows;
 146    unsigned int i;
 147
 148    rows = (const unsigned char **)evas_data;
 149
 150    for (i = 0; i < output_height; i++)
 151      rows[i] = &gst_data[i * w * 2];
 152 }
 153
 154 static void
 155 _evas_video_nv12(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h __UNUSED__, unsigned int output_height)
 156 {
 157    const unsigned char **rows;
 158    unsigned int i, j;
 159    unsigned int rh;
 160
 161    rh = output_height;
 162
 163    rows = (const unsigned char **)evas_data;
 164
 165    for (i = 0; i < rh; i++)
 166      rows[i] = &gst_data[i * w];
 167
 168    for (j = 0; j < (rh / 2); j++, i++)
 169      rows[i] = &gst_data[rh * w + j * w];
 170 }
 171
 172 static void
 173 _evas_video_mt12(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h, unsigned int output_height __UNUSED__)
 174 {
 175    const unsigned char **rows;
 176    unsigned int i;
 177    unsigned int j;
 178
 179    rows = (const unsigned char **)evas_data;
 180
 181    for (i = 0; i < (h / 32) / 2; i++)
 182      rows[i] = &gst_data[i * w * 2 * 32];
 183
 184    if ((h / 32) % 2)
 185      {
 186         rows[i] = &gst_data[i * w * 2 * 32];
 187         i++;
 188      }
 189
 190    for (j = 0; j < ((h / 2) / 32) / 2; ++j, ++i)
 191      rows[i] = &gst_data[h * w + j * (w / 2) * 2 * 16];
 192 }
 193
 194 static void
 195 _evas_video_st12_multiplane(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w, unsigned int h, unsigned int output_height __UNUSED__)
 196 {
 197    const GstMultiPlaneImageBuffer *mp_buf = (const GstMultiPlaneImageBuffer *) gst_data;
 198    const unsigned char **rows;
 199    unsigned int i;
 200    unsigned int j;
 201
 202    rows = (const unsigned char **)evas_data;
 203
 204    for (i = 0; i < (h / 32) / 2; i++)
 205      rows[i] = mp_buf->uaddr[0] + i * w * 2 * 32;
 206    if ((h / 32) % 2)
 207      {
 208         rows[i] = mp_buf->uaddr[0] + i * w * 2 * 32;
 209         i++;
 210      }
 211
 212    for (j = 0; j < ((h / 2) / 16) / 2; j++, i++)
 213      {
 214        rows[i] = mp_buf->uaddr[1] + j * w * 2 * 16 * 2;
 215      }
 216    if (((h / 2) / 16) % 2)
 217      rows[i] = mp_buf->uaddr[1] + j * w * 2 * 16 * 2;
 218 }
 219
 220 static void
 221 _evas_video_st12(unsigned char *evas_data, const unsigned char *gst_data, unsigned int w __UNUSED__, unsigned int h, unsigned int output_height __UNUSED__)
 222 {
 223    const SCMN_IMGB *imgb = (const SCMN_IMGB *) gst_data;
 224    const unsigned char **rows;
 225    unsigned int i, j;
 226
 227    rows = (const unsigned char **)evas_data;
 228
 229    for (i = 0; i < (h / 32) / 2; i++)
 230      rows[i] = imgb->uaddr[0] + i * imgb->stride[0] * 2 * 32;
 231    if ((h / 32) % 2)
 232      {
 233         rows[i] = imgb->uaddr[0] + i * imgb->stride[0] * 2 * 32;
 234         i++;
 235      }
 236
 237    for (j = 0; j < (unsigned int) imgb->elevation[1] / 32 / 2; j++, i++)
 238      rows[i] = imgb->uaddr[1] + j * imgb->stride[1] * 32 * 2;
 239    if ((imgb->elevation[1] / 32) % 2)
 240      rows[i++] = imgb->uaddr[1] + j * imgb->stride[1] * 32 * 2;
 241 }
 242
 243 static const struct {
 244    const char *name;
 245    guint32 fourcc;
 246    Evas_Colorspace eformat;
 247    Evas_Video_Convert_Cb func;
 248    Eina_Bool force_height;
 249 } colorspace_fourcc_convertion[] = {
 250   { "I420", GST_MAKE_FOURCC('I', '4', '2', '0'), EVAS_COLORSPACE_YCBCR422P601_PL, _evas_video_i420, EINA_TRUE },
 251   { "YV12", GST_MAKE_FOURCC('Y', 'V', '1', '2'), EVAS_COLORSPACE_YCBCR422P601_PL, _evas_video_yv12, EINA_TRUE },
 252   { "YUY2", GST_MAKE_FOURCC('Y', 'U', 'Y', '2'), EVAS_COLORSPACE_YCBCR422601_PL, _evas_video_yuy2, EINA_FALSE },
 253   { "NV12", GST_MAKE_FOURCC('N', 'V', '1', '2'), EVAS_COLORSPACE_YCBCR420NV12601_PL, _evas_video_nv12, EINA_TRUE },
 254   { "TM12", GST_MAKE_FOURCC('T', 'M', '1', '2'), EVAS_COLORSPACE_YCBCR420TM12601_PL, _evas_video_mt12, EINA_TRUE }
 255 };
 256
 257 static const struct {
 258    const char *name;
 259    GstVideoFormat format;
 260    Evas_Colorspace eformat;
 261    Evas_Video_Convert_Cb func;
 262 } colorspace_format_convertion[] = {
 263   { "BGR", GST_VIDEO_FORMAT_BGR, EVAS_COLORSPACE_ARGB8888, _evas_video_bgr },
 264   { "BGRx", GST_VIDEO_FORMAT_BGRx, EVAS_COLORSPACE_ARGB8888, _evas_video_bgrx },
 265   { "BGRA", GST_VIDEO_FORMAT_BGRA, EVAS_COLORSPACE_ARGB8888, _evas_video_bgra }
 266 };
 267
 268 static void
 269 evas_video_sink_base_init(gpointer g_class)
 270 {
 271    GstElementClass* element_class;
 272
 273    element_class = GST_ELEMENT_CLASS(g_class);
 274    gst_element_class_add_pad_template(element_class, gst_static_pad_template_get(&sinktemplate));
 275    gst_element_class_set_details_simple(element_class, "Evas video sink",
 276                                         "Sink/Video", "Sends video data from a GStreamer pipeline to an Evas object",
 277                                         "Vincent Torri <vtorri@univ-evry.fr>");
 278 }
 279
 280 static void
 281 evas_video_sink_init(EvasVideoSink* sink, EvasVideoSinkClass* klass __UNUSED__)
 282 {
 283    EvasVideoSinkPrivate* priv;
 284
 285    INF("sink init");
 286    sink->priv = priv = G_TYPE_INSTANCE_GET_PRIVATE(sink, EVAS_TYPE_VIDEO_SINK, EvasVideoSinkPrivate);
 287    priv->o = NULL;
 288    priv->width = 0;
 289    priv->height = 0;
 290    priv->func = NULL;
 291    priv->eformat = EVAS_COLORSPACE_ARGB8888;
 292    priv->samsung = EINA_FALSE;
 293    eina_lock_new(&priv->m);
 294    eina_condition_new(&priv->c, &priv->m);
 295    priv->unlocked = EINA_FALSE;
 296 }
 297
 298 /**** Object methods ****/
 299 static void
 300 _cleanup_priv(void *data, Evas *e __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
 301 {
 302    EvasVideoSinkPrivate* priv;
 303
 304    priv = data;
 305
 306    eina_lock_take(&priv->m);
 307    if (priv->o == obj)
 308      priv->o = NULL;
 309    eina_lock_release(&priv->m);
 310 }
 311
 312 static void
 313 evas_video_sink_set_property(GObject * object, guint prop_id,
 314                              const GValue * value, GParamSpec * pspec)
 315 {
 316    EvasVideoSink* sink;
 317    EvasVideoSinkPrivate* priv;
 318
 319    sink = EVAS_VIDEO_SINK (object);
 320    priv = sink->priv;
 321
 322    switch (prop_id) {
 323     case PROP_EVAS_OBJECT:
 324        eina_lock_take(&priv->m);
 325        evas_object_event_callback_del(priv->o, EVAS_CALLBACK_FREE, _cleanup_priv);
 326        priv->o = g_value_get_pointer (value);
 327        INF("sink set Evas_Object %p.", priv->o);
 328        evas_object_event_callback_add(priv->o, EVAS_CALLBACK_FREE, _cleanup_priv, priv);
 329        eina_lock_release(&priv->m);
 330        break;
 331     case PROP_EV:
 332        INF("sink set ev.");
 333        eina_lock_take(&priv->m);
 334        priv->ev = g_value_get_pointer (value);
 335        if (priv->ev)
 336          priv->ev->samsung = EINA_TRUE;
 337        eina_lock_release(&priv->m);
 338        break;
 339     default:
 340        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 341        ERR("invalid property");
 342        break;
 343    }
 344 }
 345
 346 static void
 347 evas_video_sink_get_property(GObject * object, guint prop_id,
 348                              GValue * value, GParamSpec * pspec)
 349 {
 350    EvasVideoSink* sink;
 351    EvasVideoSinkPrivate* priv;
 352
 353    sink = EVAS_VIDEO_SINK (object);
 354    priv = sink->priv;
 355
 356    switch (prop_id) {
 357     case PROP_EVAS_OBJECT:
 358        INF("sink get property.");
 359        eina_lock_take(&priv->m);
 360        g_value_set_pointer(value, priv->o);
 361        eina_lock_release(&priv->m);
 362        break;
 363     case PROP_WIDTH:
 364        INF("sink get width.");
 365        eina_lock_take(&priv->m);
 366        g_value_set_int(value, priv->width);
 367        eina_lock_release(&priv->m);
 368        break;
 369     case PROP_HEIGHT:
 370        INF("sink get height.");
 371        eina_lock_take(&priv->m);
 372        g_value_set_int (value, priv->height);
 373        eina_lock_release(&priv->m);
 374        break;
 375     case PROP_EV:
 376        INF("sink get ev.");
 377        eina_lock_take(&priv->m);
 378        g_value_set_pointer (value, priv->ev);
 379        eina_lock_release(&priv->m);
 380        break;
 381     default:
 382        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 383        ERR("invalide property");
 384        break;
 385    }
 386 }
 387
 388 static void
 389 evas_video_sink_dispose(GObject* object)
 390 {
 391    EvasVideoSink* sink;
 392    EvasVideoSinkPrivate* priv;
 393
 394    INF("dispose.");
 395
 396    sink = EVAS_VIDEO_SINK(object);
 397    priv = sink->priv;
 398
 399    eina_lock_free(&priv->m);
 400    eina_condition_free(&priv->c);
 401
 402    G_OBJECT_CLASS(parent_class)->dispose(object);
 403 }
 404
 405
 406 /**** BaseSink methods ****/
 407
 408 gboolean evas_video_sink_set_caps(GstBaseSink *bsink, GstCaps *caps)
 409 {
 410    EvasVideoSink* sink;
 411    EvasVideoSinkPrivate* priv;
 412    GstStructure *structure;
 413    GstVideoFormat format;
 414    guint32 fourcc;
 415    unsigned int i;
 416
 417    sink = EVAS_VIDEO_SINK(bsink);
 418    priv = sink->priv;
 419
 420    structure = gst_caps_get_structure(caps, 0);
 421
 422    if (gst_structure_get_int(structure, "width", (int*) &priv->width)
 423        && gst_structure_get_int(structure, "height", (int*) &priv->height)
 424        && gst_structure_get_fourcc(structure, "format", &fourcc))
 425      {
 426         priv->source_height = priv->height;
 427
 428         for (i = 0; i < sizeof (colorspace_fourcc_convertion) / sizeof (colorspace_fourcc_convertion[0]); ++i)
 429           if (fourcc == colorspace_fourcc_convertion[i].fourcc)
 430             {
 431                fprintf(stderr, "Found '%s'\n", colorspace_fourcc_convertion[i].name);
 432                priv->eformat = colorspace_fourcc_convertion[i].eformat;
 433                priv->func = colorspace_fourcc_convertion[i].func;
 434                if (colorspace_fourcc_convertion[i].force_height)
 435                  {
 436                     priv->height = (priv->height >> 1) << 1;
 437                  }
 438                if (priv->ev)
 439                  priv->ev->kill_buffer = EINA_TRUE;
 440                return TRUE;
 441             }
 442
 443         if (fourcc == GST_MAKE_FOURCC('S', 'T', '1', '2'))
 444           {
 445              fprintf(stderr, "Found '%s'\n", "ST12");
 446              priv->eformat = EVAS_COLORSPACE_YCBCR420TM12601_PL;
 447              priv->samsung = EINA_TRUE;
 448              priv->func = NULL;
 449              if (priv->ev)
 450                {
 451                   priv->ev->samsung = EINA_TRUE;
 452                   priv->ev->kill_buffer = EINA_TRUE;
 453                }
 454              return TRUE;
 455           }
 456      }
 457
 458    INF("fallback code !");
 459    if (!gst_video_format_parse_caps(caps, &format, (int*) &priv->width, (int*) &priv->height))
 460      {
 461         ERR("Unable to parse caps.");
 462         return FALSE;
 463      }
 464
 465    priv->source_height = priv->height;
 466
 467    for (i = 0; i < sizeof (colorspace_format_convertion) / sizeof (colorspace_format_convertion[0]); ++i)
 468      if (format == colorspace_format_convertion[i].format)
 469        {
 470           fprintf(stderr, "Found '%s'\n", colorspace_format_convertion[i].name);
 471           priv->eformat = colorspace_format_convertion[i].eformat;
 472           priv->func = colorspace_format_convertion[i].func;
 473           if (priv->ev)
 474             priv->ev->kill_buffer = EINA_FALSE;
 475           return TRUE;
 476        }
 477
 478    ERR("unsupported : %d\n", format);
 479    return FALSE;
 480 }
 481
 482 static gboolean
 483 evas_video_sink_start(GstBaseSink* base_sink)
 484 {
 485    EvasVideoSinkPrivate* priv;
 486    gboolean res = TRUE;
 487
 488    INF("sink start");
 489
 490    priv = EVAS_VIDEO_SINK(base_sink)->priv;
 491    eina_lock_take(&priv->m);
 492    if (!priv->o)
 493      res = FALSE;
 494    else
 495      priv->unlocked = EINA_FALSE;
 496    eina_lock_release(&priv->m);
 497    return res;
 498 }
 499
 500 static gboolean
 501 evas_video_sink_stop(GstBaseSink* base_sink)
 502 {
 503    EvasVideoSinkPrivate* priv = EVAS_VIDEO_SINK(base_sink)->priv;
 504
 505    INF("sink stop");
 506
 507    unlock_buffer_mutex(priv);
 508    return TRUE;
 509 }
 510
 511 static gboolean
 512 evas_video_sink_unlock(GstBaseSink* object)
 513 {
 514    EvasVideoSink* sink;
 515
 516    INF("sink unlock");
 517
 518    sink = EVAS_VIDEO_SINK(object);
 519
 520    unlock_buffer_mutex(sink->priv);
 521
 522    return GST_CALL_PARENT_WITH_DEFAULT(GST_BASE_SINK_CLASS, unlock,
 523                                        (object), TRUE);
 524 }
 525
 526 static gboolean
 527 evas_video_sink_unlock_stop(GstBaseSink* object)
 528 {
 529    EvasVideoSink* sink;
 530    EvasVideoSinkPrivate* priv;
 531
 532    sink = EVAS_VIDEO_SINK(object);
 533    priv = sink->priv;
 534
 535    INF("sink unlock stop");
 536
 537    eina_lock_take(&priv->m);
 538    priv->unlocked = FALSE;
 539    eina_lock_release(&priv->m);
 540
 541    return GST_CALL_PARENT_WITH_DEFAULT(GST_BASE_SINK_CLASS, unlock_stop,
 542                                        (object), TRUE);
 543 }
 544
 545 static GstFlowReturn
 546 evas_video_sink_preroll(GstBaseSink* bsink, GstBuffer* buffer)
 547 {
 548    Emotion_Gstreamer_Buffer *send;
 549    EvasVideoSinkPrivate *priv;
 550    EvasVideoSink *sink;
 551
 552    INF("sink preroll %p [%i]", GST_BUFFER_DATA(buffer), GST_BUFFER_SIZE(buffer));
 553
 554    sink = EVAS_VIDEO_SINK(bsink);
 555    priv = sink->priv;
 556
 557    if (GST_BUFFER_SIZE(buffer) <= 0 && !priv->samsung)
 558      {
 559         WRN("empty buffer");
 560         return GST_FLOW_OK;
 561      }
 562
 563    send = emotion_gstreamer_buffer_alloc(priv, buffer, EINA_TRUE);
 564
 565    if (send)
 566      {
 567         if (priv->samsung)
 568           {
 569              if (!priv->func)
 570                {
 571                   GstStructure *structure;
 572                   GstCaps *caps;
 573                   gboolean is_multiplane = FALSE;
 574
 575                   caps = GST_BUFFER_CAPS(buffer);
 576                   structure = gst_caps_get_structure (caps, 0);
 577                   gst_structure_get_boolean(structure, "multiplane", &is_multiplane);
 578                   gst_caps_unref(caps);
 579
 580                   if (is_multiplane)
 581                     priv->func = _evas_video_st12_multiplane;
 582                   else
 583                     priv->func = _evas_video_st12;
 584                }
 585
 586              ecore_main_loop_thread_safe_call_async(evas_video_sink_samsung_main_render, send);
 587           }
 588         else
 589           ecore_main_loop_thread_safe_call_async(evas_video_sink_main_render, send);
 590      }
 591
 592    return GST_FLOW_OK;
 593 }
 594
 595 static GstFlowReturn
 596 evas_video_sink_render(GstBaseSink* bsink, GstBuffer* buffer)
 597 {
 598    Emotion_Gstreamer_Buffer *send;
 599    EvasVideoSinkPrivate *priv;
 600    EvasVideoSink *sink;
 601
 602    INF("sink render %p", buffer);
 603
 604    sink = EVAS_VIDEO_SINK(bsink);
 605    priv = sink->priv;
 606
 607    eina_lock_take(&priv->m);
 608
 609    if (priv->unlocked) {
 610       ERR("LOCKED");
 611       eina_lock_release(&priv->m);
 612       return GST_FLOW_OK;
 613    }
 614
 615    send = emotion_gstreamer_buffer_alloc(priv, buffer, EINA_FALSE);
 616    if (!send) {
 617       eina_lock_release(&priv->m);
 618       return GST_FLOW_ERROR;
 619    }
 620
 621    if (priv->samsung)
 622      {
 623         if (!priv->func)
 624           {
 625              GstStructure *structure;
 626              GstCaps *caps;
 627              gboolean is_multiplane = FALSE;
 628
 629              caps = GST_BUFFER_CAPS(buffer);
 630              structure = gst_caps_get_structure (caps, 0);
 631              gst_structure_get_boolean(structure, "multiplane", &is_multiplane);
 632              gst_caps_unref(caps);
 633
 634              if (is_multiplane)
 635                priv->func = _evas_video_st12_multiplane;
 636              else
 637                priv->func = _evas_video_st12;
 638           }
 639
 640         ecore_main_loop_thread_safe_call_async(evas_video_sink_samsung_main_render, send);
 641      }
 642    else
 643      ecore_main_loop_thread_safe_call_async(evas_video_sink_main_render, send);
 644
 645    eina_condition_wait(&priv->c);
 646    eina_lock_release(&priv->m);
 647
 648    return GST_FLOW_OK;
 649 }
 650
 651 static void
 652 evas_video_sink_samsung_main_render(void *data)
 653 {
 654    Emotion_Gstreamer_Buffer *send;
 655    Emotion_Video_Stream *vstream;
 656    EvasVideoSinkPrivate* priv;
 657    GstBuffer* buffer;
 658    unsigned char *evas_data;
 659    const guint8 *gst_data;
 660    GstFormat fmt = GST_FORMAT_TIME;
 661    gint64 pos;
 662    Eina_Bool preroll;
 663    int stride, elevation;
 664    Evas_Coord w, h;
 665
 666    send = data;
 667
 668    if (!send) goto exit_point;
 669
 670    priv = send->sink;
 671    buffer = send->frame;
 672    preroll = send->preroll;
 673
 674    if (!priv || !priv->o || priv->unlocked)
 675      goto exit_point;
 676
 677    _emotion_gstreamer_video_pipeline_parse(send->ev, EINA_TRUE);
 678
 679    /* Getting stride to compute the right size and then fill the object properly */
 680    /* Y => [0] and UV in [1] */
 681    if (priv->func == _evas_video_st12_multiplane)
 682      {
 683         const GstMultiPlaneImageBuffer *mp_buf = (const GstMultiPlaneImageBuffer *) buffer;
 684
 685         stride = mp_buf->stride[0];
 686         elevation = mp_buf->elevation[0];
 687         priv->width = mp_buf->width[0];
 688         priv->height = mp_buf->height[0];
 689
 690         gst_data = (const guint8 *) mp_buf;
 691      }
 692    else
 693      {
 694         const SCMN_IMGB *imgb = (const SCMN_IMGB *) GST_BUFFER_MALLOCDATA(buffer);
 695
 696         stride = imgb->stride[0];
 697         elevation = imgb->elevation[0];
 698         priv->width = imgb->width[0];
 699         priv->height = imgb->height[0];
 700
 701         gst_data = (const guint8 *) imgb;
 702      }
 703
 704    evas_object_geometry_get(priv->o, NULL, NULL, &w, &h);
 705
 706    send->ev->fill.width = stride * w / priv->width;
 707    send->ev->fill.height = elevation * h / priv->height;
 708
 709    evas_object_image_alpha_set(priv->o, 0);
 710    evas_object_image_colorspace_set(priv->o, priv->eformat);
 711    evas_object_image_size_set(priv->o, stride, elevation);
 712    evas_object_image_fill_set(priv->o, 0, 0, send->ev->fill.width, send->ev->fill.height);
 713
 714    evas_data = evas_object_image_data_get(priv->o, 1);
 715
 716    if (priv->func)
 717      priv->func(evas_data, gst_data, stride, elevation, elevation);
 718    else
 719      WRN("No way to decode %x colorspace !", priv->eformat);
 720
 721    evas_object_image_data_set(priv->o, evas_data);
 722    evas_object_image_data_update_add(priv->o, 0, 0, priv->width, priv->height);
 723    evas_object_image_pixels_dirty_set(priv->o, 0);
 724
 725    _emotion_frame_new(send->ev->obj);
 726
 727    vstream = eina_list_nth(send->ev->video_streams, send->ev->video_stream_nbr - 1);
 728
 729    gst_element_query_position(send->ev->pipeline, &fmt, &pos);
 730    send->ev->position = (double)pos / (double)GST_SECOND;
 731
 732    if (vstream)
 733      {
 734         vstream->width = priv->width;
 735         vstream->height = priv->height;
 736
 737         _emotion_video_pos_update(send->ev->obj, send->ev->position, vstream->length_time);
 738      }
 739
 740    send->ev->ratio = (double) priv->width / (double) priv->height;
 741    _emotion_frame_resize(send->ev->obj, priv->width, priv->height, send->ev->ratio);
 742
 743    /* FIXME: why is last buffer not protected ? */
 744
 745  exit_point:
 746    emotion_gstreamer_buffer_free(send);
 747
 748    if (preroll || !priv->o) return ;
 749
 750    if (!priv->unlocked)
 751      eina_condition_signal(&priv->c);
 752 }
 753
 754 static void
 755 evas_video_sink_main_render(void *data)
 756 {
 757    Emotion_Gstreamer_Buffer *send;
 758    Emotion_Gstreamer_Video *ev = NULL;
 759    Emotion_Video_Stream *vstream;
 760    EvasVideoSinkPrivate* priv;
 761    GstBuffer* buffer;
 762    unsigned char *evas_data;
 763    GstFormat fmt = GST_FORMAT_TIME;
 764    gint64 pos;
 765    Eina_Bool preroll;
 766
 767    send = data;
 768
 769    if (!send) goto exit_point;
 770
 771    priv = send->sink;
 772    buffer = send->frame;
 773    preroll = send->preroll;
 774    ev = send->ev;
 775
 776    if (!priv || !priv->o || priv->unlocked)
 777      goto exit_point;
 778
 779    _emotion_gstreamer_video_pipeline_parse(ev, EINA_TRUE);
 780
 781    INF("sink main render [%i, %i] (source height: %i)", priv->width, priv->height, priv->source_height);
 782
 783    evas_object_image_alpha_set(priv->o, 0);
 784    evas_object_image_colorspace_set(priv->o, priv->eformat);
 785    evas_object_image_size_set(priv->o, priv->width, priv->height);
 786
 787    evas_data = evas_object_image_data_get(priv->o, 1);
 788
 789    if (priv->func)
 790      priv->func(evas_data, GST_BUFFER_DATA(buffer), priv->width, priv->source_height, priv->height);
 791    else
 792      WRN("No way to decode %x colorspace !", priv->eformat);
 793
 794    evas_object_image_data_set(priv->o, evas_data);
 795    evas_object_image_data_update_add(priv->o, 0, 0, priv->width, priv->height);
 796    evas_object_image_pixels_dirty_set(priv->o, 0);
 797
 798    _emotion_frame_new(ev->obj);
 799
 800    gst_element_query_position(ev->pipeline, &fmt, &pos);
 801    ev->position = (double)pos / (double)GST_SECOND;
 802
 803    vstream = eina_list_nth(ev->video_streams, ev->video_stream_nbr - 1);
 804
 805    if (vstream)
 806      {
 807        vstream->width = priv->width;
 808        vstream->height = priv->height;
 809        _emotion_video_pos_update(ev->obj, ev->position, vstream->length_time);
 810      }
 811
 812    ev->ratio = (double) priv->width / (double) priv->height;
 813
 814    _emotion_frame_resize(ev->obj, priv->width, priv->height, ev->ratio);
 815
 816    buffer = gst_buffer_ref(buffer);
 817    if (ev->last_buffer) gst_buffer_unref(ev->last_buffer);
 818    ev->last_buffer = buffer;
 819
 820  exit_point:
 821    emotion_gstreamer_buffer_free(send);
 822
 823    if (preroll || !priv->o) return ;
 824
 825    if (!priv->unlocked)
 826      eina_condition_signal(&priv->c);
 827 }
 828
 829 static void
 830 unlock_buffer_mutex(EvasVideoSinkPrivate* priv)
 831 {
 832    priv->unlocked = EINA_TRUE;
 833
 834    eina_condition_signal(&priv->c);
 835 }
 836
 837 static void
 838 marshal_VOID__MINIOBJECT(GClosure * closure, GValue * return_value __UNUSED__,
 839                          guint n_param_values, const GValue * param_values,
 840                          gpointer invocation_hint __UNUSED__, gpointer marshal_data)
 841 {
 842    typedef void (*marshalfunc_VOID__MINIOBJECT) (gpointer obj, gpointer arg1, gpointer data2);
 843    marshalfunc_VOID__MINIOBJECT callback;
 844    GCClosure *cc;
 845    gpointer data1, data2;
 846
 847    cc = (GCClosure *) closure;
 848
 849    g_return_if_fail(n_param_values == 2);
 850
 851    if (G_CCLOSURE_SWAP_DATA(closure)) {
 852       data1 = closure->data;
 853       data2 = g_value_peek_pointer(param_values + 0);
 854    } else {
 855       data1 = g_value_peek_pointer(param_values + 0);
 856       data2 = closure->data;
 857    }
 858    callback = (marshalfunc_VOID__MINIOBJECT) (marshal_data ? marshal_data : cc->callback);
 859
 860    callback(data1, gst_value_get_mini_object(param_values + 1), data2);
 861 }
 862
 863 static void
 864 evas_video_sink_class_init(EvasVideoSinkClass* klass)
 865 {
 866    GObjectClass* gobject_class;
 867    GstBaseSinkClass* gstbase_sink_class;
 868
 869    gobject_class = G_OBJECT_CLASS(klass);
 870    gstbase_sink_class = GST_BASE_SINK_CLASS(klass);
 871
 872    g_type_class_add_private(klass, sizeof(EvasVideoSinkPrivate));
 873
 874    gobject_class->set_property = evas_video_sink_set_property;
 875    gobject_class->get_property = evas_video_sink_get_property;
 876
 877    g_object_class_install_property (gobject_class, PROP_EVAS_OBJECT,
 878                                     g_param_spec_pointer ("evas-object", "Evas Object",
 879                                                           "The Evas object where the display of the video will be done",
 880                                                           G_PARAM_READWRITE));
 881
 882    g_object_class_install_property (gobject_class, PROP_WIDTH,
 883                                     g_param_spec_int ("width", "Width",
 884                                                       "The width of the video",
 885                                                       0, 65536, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
 886
 887    g_object_class_install_property (gobject_class, PROP_HEIGHT,
 888                                     g_param_spec_int ("height", "Height",
 889                                                       "The height of the video",
 890                                                       0, 65536, 0, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
 891    g_object_class_install_property (gobject_class, PROP_EV,
 892                                     g_param_spec_pointer ("ev", "Emotion_Gstreamer_Video",
 893                                                           "THe internal data of the emotion object",
 894                                                           G_PARAM_READWRITE));
 895
 896    gobject_class->dispose = evas_video_sink_dispose;
 897
 898    gstbase_sink_class->set_caps = evas_video_sink_set_caps;
 899    gstbase_sink_class->stop = evas_video_sink_stop;
 900    gstbase_sink_class->start = evas_video_sink_start;
 901    gstbase_sink_class->unlock = evas_video_sink_unlock;
 902    gstbase_sink_class->unlock_stop = evas_video_sink_unlock_stop;
 903    gstbase_sink_class->render = evas_video_sink_render;
 904    gstbase_sink_class->preroll = evas_video_sink_preroll;
 905
 906    evas_video_sink_signals[REPAINT_REQUESTED] = g_signal_new("repaint-requested",
 907                                                              G_TYPE_FROM_CLASS(klass),
 908                                                              (GSignalFlags)(G_SIGNAL_RUN_LAST | G_SIGNAL_ACTION),
 909                                                              0,
 910                                                              0,
 911                                                              0,
 912                                                              marshal_VOID__MINIOBJECT,
 913                                                              G_TYPE_NONE, 1, GST_TYPE_BUFFER);
 914 }
 915
 916 gboolean
 917 gstreamer_plugin_init (GstPlugin * plugin)
 918 {
 919    return gst_element_register (plugin,
 920                                 "emotion-sink",
 921                                 GST_RANK_NONE,
 922                                 EVAS_TYPE_VIDEO_SINK);
 923 }
 924
 925 static void
 926 _emotion_gstreamer_pause(void *data, Ecore_Thread *thread)
 927 {
 928    Emotion_Gstreamer_Video *ev = data;
 929
 930    if (ecore_thread_check(thread) || !ev->pipeline) return ;
 931
 932    gst_element_set_state(ev->pipeline, GST_STATE_PAUSED);
 933 }
 934
 935 static void
 936 _emotion_gstreamer_cancel(void *data, Ecore_Thread *thread)
 937 {
 938    Emotion_Gstreamer_Video *ev = data;
 939
 940    ev->threads = eina_list_remove(ev->threads, thread);
 941
 942    if (getenv("EMOTION_GSTREAMER_DOT")) GST_DEBUG_BIN_TO_DOT_FILE_WITH_TS(GST_BIN(ev->pipeline), GST_DEBUG_GRAPH_SHOW_ALL, getenv("EMOTION_GSTREAMER_DOT"));
 943
 944    if (ev->in == ev->out && ev->threads == NULL && ev->delete_me)
 945      em_shutdown(ev);
 946 }
 947
 948 static void
 949 _emotion_gstreamer_end(void *data, Ecore_Thread *thread)
 950 {
 951    Emotion_Gstreamer_Video *ev = data;
 952
 953    ev->threads = eina_list_remove(ev->threads, thread);
 954
 955    if (ev->play)
 956      {
 957         gst_element_set_state(ev->pipeline, GST_STATE_PLAYING);
 958         ev->play_started = 1;
 959      }
 960
 961    if (getenv("EMOTION_GSTREAMER_DOT")) GST_DEBUG_BIN_TO_DOT_FILE_WITH_TS(GST_BIN(ev->pipeline), GST_DEBUG_GRAPH_SHOW_ALL, getenv("EMOTION_GSTREAMER_DOT"));
 962
 963    if (ev->in == ev->out && ev->threads == NULL && ev->delete_me)
 964      em_shutdown(ev);
 965    else
 966      _emotion_gstreamer_video_pipeline_parse(data, EINA_TRUE);
 967 }
 968
 969 static void
 970 _on_post_clear(void *data, Evas *e __UNUSED__, void *event_info __UNUSED__)
 971 {
 972    Emotion_Gstreamer_Video *ev = data;
 973
 974    if (!ev->kill_buffer) return ;
 975
 976 #if 0
 977    if (ev->last_buffer) gst_buffer_unref(ev->last_buffer);
 978    ev->last_buffer = NULL;
 979 #endif
 980 }
 981
 982 static void
 983 _on_resize_fill(void *data, Evas *e __UNUSED__, Evas_Object *obj, void *event_info __UNUSED__)
 984 {
 985    Emotion_Gstreamer_Video *ev = data;
 986
 987    if (ev->samsung)
 988      evas_object_image_fill_set(obj, 0, 0, ev->fill.width, ev->fill.height);
 989 }
 990
 991 GstElement *
 992 gstreamer_video_sink_new(Emotion_Gstreamer_Video *ev,
 993                          Evas_Object *o,
 994                          const char *uri)
 995 {
 996    GstElement *playbin;
 997    GstElement *sink = NULL;
 998    Evas_Object *obj;
 999    int flags;
1000 #if defined HAVE_ECORE_X && defined HAVE_XOVERLAY_H
1001    const char *engine;
1002    Eina_List *engines;
1003 #endif
1004
1005    obj = emotion_object_image_get(o);
1006    if (!obj)
1007      {
1008         ERR("Not Evas_Object specified");
1009         return NULL;
1010      }
1011
1012    evas_object_event_callback_del_full(obj, EVAS_CALLBACK_RESIZE, _on_resize_fill, ev);
1013    evas_event_callback_del_full(evas_object_evas_get(obj), EVAS_CALLBACK_RENDER_FLUSH_POST, _on_post_clear, ev);
1014
1015    if (!uri)
1016      return NULL;
1017
1018    playbin = gst_element_factory_make("playbin2", "playbin");
1019    if (!playbin)
1020      {
1021         ERR("Unable to create 'playbin' GstElement.");
1022         return NULL;
1023      }
1024
1025 #if defined HAVE_ECORE_X && defined HAVE_XOVERLAY_H
1026    engines = evas_render_method_list();
1027
1028    engine = eina_list_nth(engines, evas_output_method_get(evas_object_evas_get(obj)) - 1);
1029
1030    if (engine && strstr(engine, "_x11") != NULL)
1031      {
1032 #if 0
1033         Evas_Coord x, y, w, h;
1034         Ecore_X_Window win;
1035
1036         evas_object_geometry_get(obj, &x, &y, &w, &h);
1037
1038         win = ecore_x_window_new(0, x, y, w, h);
1039         if (win)
1040           {
1041              sink = gst_element_factory_make("xvimagesink", NULL);
1042              if (sink)
1043                {
1044                   gst_x_overlay_set_window_handle(GST_X_OVERLAY(sink), win);
1045                   ev->win = win;
1046                }
1047              else
1048                {
1049                   ecore_x_window_free(win);
1050                }
1051           }
1052 #endif
1053      }
1054    evas_render_method_list_free(engines);
1055 #else
1056 # warning "no ecore_x or xoverlay"
1057 #endif
1058    if (!sink)
1059      {
1060         sink = gst_element_factory_make("emotion-sink", "sink");
1061         if (!sink)
1062           {
1063              ERR("Unable to create 'emotion-sink' GstElement.");
1064              goto unref_pipeline;
1065           }
1066
1067         g_object_set(G_OBJECT(sink), "evas-object", obj, NULL);
1068         g_object_set(G_OBJECT(sink), "ev", ev, NULL);
1069
1070         evas_object_image_pixels_get_callback_set(obj, NULL, NULL);
1071      }
1072
1073 #define GST_PLAY_FLAG_NATIVE_VIDEO  (1 << 6)
1074 #define GST_PLAY_FLAG_DOWNLOAD      (1 << 7)
1075 #define GST_PLAY_FLAG_AUDIO         (1 << 1)
1076 #define GST_PLAY_FLAG_NATIVE_AUDIO  (1 << 5)
1077
1078    g_object_get(G_OBJECT(playbin), "flags", &flags, NULL);
1079    g_object_set(G_OBJECT(playbin), "flags", flags | GST_PLAY_FLAG_NATIVE_VIDEO | GST_PLAY_FLAG_DOWNLOAD | GST_PLAY_FLAG_NATIVE_AUDIO, NULL);
1080    g_object_set(G_OBJECT(playbin), "video-sink", sink, NULL);
1081    g_object_set(G_OBJECT(playbin), "uri", uri, NULL);
1082
1083    evas_object_image_pixels_get_callback_set(obj, NULL, NULL);
1084    evas_object_event_callback_add(obj, EVAS_CALLBACK_RESIZE, _on_resize_fill, ev);
1085    evas_event_callback_add(evas_object_evas_get(obj), EVAS_CALLBACK_RENDER_FLUSH_POST, _on_post_clear, ev);
1086
1087    ev->pipeline = playbin;
1088    ev->sink = sink;
1089    ev->threads = eina_list_append(ev->threads,
1090                                   ecore_thread_run(_emotion_gstreamer_pause,
1091                                                    _emotion_gstreamer_end,
1092                                                    _emotion_gstreamer_cancel,
1093                                                    ev));
1094
1095    /** NOTE: you need to set: GST_DEBUG_DUMP_DOT_DIR=/tmp EMOTION_ENGINE=gstreamer to save the $EMOTION_GSTREAMER_DOT file in '/tmp' */
1096    /** then call dot -Tpng -oemotion_pipeline.png /tmp/$TIMESTAMP-$EMOTION_GSTREAMER_DOT.dot */
1097    if (getenv("EMOTION_GSTREAMER_DOT")) GST_DEBUG_BIN_TO_DOT_FILE_WITH_TS(GST_BIN(playbin), GST_DEBUG_GRAPH_SHOW_ALL, getenv("EMOTION_GSTREAMER_DOT"));
1098
1099    return playbin;
1100
1101  unref_pipeline:
1102    gst_object_unref(playbin);
1103    return NULL;
1104 }