WIP: plugin: Add VA memory GL-based importer

On an unlikely chance that sink was compiled without any importers, iterated dir does not exists thus we try to unref a NULL. Avoid doing that.

.gitattributes

@@ -1 +1,5 @@
-lib/* linguist-vendored
+extras/**/* linguist-vendored
+lib/**/* linguist-vendored
+lib/**/**/* linguist-vendored
+lib/gst/clapper/gstclapper-mpris* linguist-vendored=false
+lib/gst/clapper/gtk4/* linguist-vendored=false

.github/workflows/flatpak-nightly.yml

@@ -0,0 +1,42 @@
+on:
+  workflow_dispatch:
+  schedule:
+    - cron: "0 0 * * *"
+name: "Flatpak Nightly"
+jobs:
+  flatpak:
+    name: "Flatpak"
+    runs-on: ubuntu-latest
+    timeout-minutes: 600
+    container:
+      image: bilelmoussaoui/flatpak-github-actions:gnome-nightly
+      options: --privileged
+    strategy:
+      matrix:
+        arch: [x86_64, aarch64]
+      fail-fast: false
+    steps:
+    - uses: actions/checkout@v2
+      with:
+        submodules: recursive
+    - name: Install Docker
+      run: |
+        dnf -y install docker
+    - name: Setup QEMU
+      id: qemu
+      uses: docker/setup-qemu-action@v1
+      with:
+        platforms: arm64
+    - name: Prepare Runtime
+      run: |
+        flatpak --system install -y --noninteractive flathub org.freedesktop.Sdk.Extension.rust-nightly/${{ matrix.arch }}/21.08
+        flatpak --system install -y --noninteractive flathub org.freedesktop.Sdk.Extension.llvm13/${{ matrix.arch }}/21.08
+    - uses: bilelmoussaoui/flatpak-github-actions/flatpak-builder@v4
+      name: Build
+      with:
+        bundle: com.github.rafostar.Clapper.flatpak
+        manifest-path: pkgs/flatpak/com.github.rafostar.Clapper-nightly.json
+        repository-name: gnome-nightly
+        repository-url: https://nightly.gnome.org/gnome-nightly.flatpakrepo
+        cache-key: flatpak-builder-${{ github.sha }}-testing-${{ github.run_number }}
+        arch: ${{ matrix.arch }}

.github/workflows/flatpak.yml

@@ -0,0 +1,40 @@
+on:
+  workflow_dispatch:
+  push:
+    branches:
+      - master
+  pull_request:
+    branches:
+      - master
+name: "Flatpak"
+jobs:
+  flatpak:
+    name: "Flatpak"
+    runs-on: ubuntu-latest
+    timeout-minutes: 600
+    container:
+      image: bilelmoussaoui/flatpak-github-actions:gnome-42
+      options: --privileged
+    strategy:
+      matrix:
+        arch: [x86_64, aarch64]
+      fail-fast: false
+    steps:
+    - uses: actions/checkout@v2
+      with:
+        submodules: recursive
+    - name: Install Docker
+      run: |
+        dnf -y install docker
+    - name: Setup QEMU
+      id: qemu
+      uses: docker/setup-qemu-action@v1
+      with:
+        platforms: arm64
+    - uses: bilelmoussaoui/flatpak-github-actions/flatpak-builder@v4
+      name: "Build"
+      with:
+        bundle: com.github.rafostar.Clapper.flatpak
+        manifest-path: pkgs/flatpak/com.github.rafostar.Clapper.json
+        cache-key: flatpak-builder-${{ github.sha }}
+        arch: ${{ matrix.arch }}

.gitmodules

@@ -1,3 +1,3 @@
-[submodule "pkgs/flatpak/shared-modules"]
-	path = pkgs/flatpak/shared-modules
-	url = https://github.com/flathub/shared-modules.git
+[submodule "pkgs/flatpak/flathub"]
+	path = pkgs/flatpak/flathub
+	url = https://github.com/flathub/com.github.rafostar.Clapper.git

.obs/workflows.yml

@@ -0,0 +1,10 @@
+rebuild_master:
+  steps:
+    - trigger_services:
+        project: home:Rafostar
+        package: clapper
+  filters:
+    event: push
+    branches:
+      only:
+        - master

README.md

@@ -1,6 +1,12 @@
 # Clapper
-A GNOME media player build using [GJS](https://gitlab.gnome.org/GNOME/gjs) with [GTK4](https://www.gtk.org) toolkit.
-The media player is using [GStreamer](https://gstreamer.freedesktop.org/) as a media backend and renders everything via [OpenGL](https://www.opengl.org).
+[![Flatpak](https://github.com/Rafostar/clapper/actions/workflows/flatpak.yml/badge.svg?event=push)](https://github.com/Rafostar/clapper/actions/workflows/flatpak.yml)
+[![Flatpak Nightly](https://github.com/Rafostar/clapper/actions/workflows/flatpak-nightly.yml/badge.svg?event=schedule)](https://github.com/Rafostar/clapper/actions/workflows/flatpak-nightly.yml)
+[![Crowdin](https://badges.crowdin.net/clapper/localized.svg)](https://crowdin.com/project/clapper)
+[![Matrix](https://img.shields.io/matrix/clapper-player:matrix.org?label=matrix)](https://matrix.to/#/#clapper-player:matrix.org)
+[![Donate](https://img.shields.io/liberapay/receives/Clapper.svg?logo=liberapay)](https://liberapay.com/Clapper)
+
+A GNOME media player built using [GJS](https://gitlab.gnome.org/GNOME/gjs) with [GTK4](https://www.gtk.org) toolkit.
+The media player uses [GStreamer](https://gstreamer.freedesktop.org/) as a media backend and renders everything via [OpenGL](https://www.opengl.org).
 
 <p align="center">
 <img src="https://raw.githubusercontent.com/wiki/Rafostar/clapper/media/screenshot-windowed.png"><br>
@@ -23,47 +29,42 @@ The media player is using [GStreamer](https://gstreamer.freedesktop.org/) as a m
 * [Adaptive UI](https://raw.githubusercontent.com/wiki/Rafostar/clapper/media/screenshot-mobile.png)
 * [Playlist from file](https://github.com/Rafostar/clapper/wiki/Playlists)
 * Chapters on progress bar
+* MPRIS support
 
 ## Installation from Flatpak
 The `Flatpak` package includes all required dependencies and codecs.
-Additionally it also has a few patches, thus some functionalities work better (or are only available) in `Flatpak` version (until my changes are accepted upstream). List of patches used in this version can be found [here](https://github.com/Rafostar/clapper/issues/35).
+Additionally it also has a few patches, thus some functionalities work better (or are only available) in `Flatpak` version (until my changes are accepted upstream).
+List of patches used in this version can be found [here](https://github.com/Rafostar/clapper/issues/35).
 
-```sh
-flatpak install https://rafostar.github.io/flatpak/com.github.rafostar.Clapper.flatpakref
-```
+<a href='https://flathub.org/apps/details/com.github.rafostar.Clapper'>
+  <img width='240' alt='Download on Flathub' src='https://flathub.org/assets/badges/flathub-badge-en.png'/>
+</a>
 
-## Packages
-The [pkgs folder](https://github.com/Rafostar/clapper/tree/master/pkgs) in this repository contains build scripts for various package formats. You can use them to build package yourself or download one of pre-built packages:
+## Packages in Linux Distributions
+[![Packaging status](https://repology.org/badge/vertical-allrepos/clapper.svg)](https://repology.org/project/clapper/versions)
 
-#### Debian, Fedora & openSUSE
-Pre-built packages are available in [my repo](https://software.opensuse.org//download.html?project=home%3ARafostar&package=clapper) ([see status](https://build.opensuse.org/package/show/home:Rafostar/clapper))
+Pre-built RPM packages are also available in [my repo](https://software.opensuse.org//download.html?project=home%3ARafostar&package=clapper) ([see status](https://build.opensuse.org/package/show/home:Rafostar/clapper)).<br>
+Those are automatically built on each git commit, thus are considered unstable.
 
-#### Arch Linux
-You can get Clapper from the AUR: [clapper-git](https://aur.archlinux.org/packages/clapper-git)
-
-## Installation from source code
+## Installation from Source Code
 ```sh
 meson builddir --prefix=/usr/local
 sudo meson install -C builddir
 ```
 
-## Q&A
-**Q:** Does using `GJS` negatively impact video performance?<br>
-**A:** Absolutely not. `GJS` here is used to put together the GUI during startup.
-It has nothing to do with video rendering. All used `GTK4` and `GStreamer` libraries are in C.
-Even the custom video widget that I prepared for this player (based on original `GTK3` implementation) is a compiled C code.
-All these libs are acting "on their own" and no function calls from `GJS` related to video decoding and rendering are performed during playback.
+## Questions?
+Feel free to ask me any questions. Come and talk on Matrix: [#clapper-player:matrix.org](https://matrix.to/#/#clapper-player:matrix.org)
 
-**Q:** What settings should I set to maximize performance?<br>
-**A:** As of now, player works best on `Wayland` session. `Wayland` users can try enabling highly experimental `vah264dec` plugin for improved performance (this plugin does not work on `Xorg` right now) for standard (8-bit) `H.264` videos.
-It can be enabled from inside player preferences dialog inside `Advanced -> GStreamer` tab using customizable `Plugin Ranking` feature.
-Since the whole app is rendered using your GPU, users of VERY weak GPUs might try to disable the "render window shadows" option to have more GPU power available for non-fullscreen video rendering.
+## Translations
+Preferred translation method is to use [Clapper Crowdin](https://crowdin.com/project/clapper) web page.
 
-## Other Questions?
-Feel free to ask me any questions.<br>
-Use either GitHub [discussions](https://github.com/Rafostar/clapper/discussions) or come and talk on Matrix: **#clapper-player:matrix.org**
+Crowdin does not require any additional tools and translating can be done through web browser.
+You can login using GitHub account or create a new one. Only I can add new languages to this project,
+so if your language is not available, please contact me first.
 
 ## Special Thanks
 Many thanks to [sp1ritCS](https://github.com/sp1ritCS) for creating and maintaining package build files.
+Big thanks to [bridadan](https://github.com/bridadan) and [Uniformbuffer3](https://github.com/Uniformbuffer3) for helping
+with testing V4L2 and NVDEC hardware acceleration methods.
 
 Thanks a lot to all the people who are supporting the development with their anonymous donations through [Liberapay](https://liberapay.com/Clapper/). I :heart: U.

TODO.md

@@ -15,11 +15,11 @@
 - [X] Picture-in-Picture mode window (floating window)
 - [ ] Touch gestures/swipes support
 - Media playlists:
-  - [ ] Add more items to playlist via GUI
+  - [X] Add more items to playlist via D&D
   - [X] Select video from playlist
   - [ ] Reorder playlist items via D&D
   - [X] Load special playlist file (.claps)
-  - [ ] Save to playlist file from GUI
+  - [X] Save to playlist file from GUI
 - Seeking:
   - [X] Customizable seek time
   - [X] Set seek mode (default, accurate, fast)
@@ -31,7 +31,7 @@
   - [X] Audio offset
 - [ ] MDNS and UPNP (discovering media in local network)
 - [X] DND files from Nautilus to play (ignore incompatible ones)
-  - [ ] Support dropping whole folders
+  - [X] Support dropping whole folders
 - [ ] Search for subtitles, download and activate (SMplayer)
 - [ ] Auto add subtitles from same folder
   - [ ] Set global subtitles folders
@@ -40,7 +40,7 @@
 - [X] Remote playback controls via HTTP (VLC) + WebSockets
   - [ ] Expand available API
   - [ ] API documentation
-- [ ] Integration with the top bar
-  - [ ] MPRIS support
-  - [ ] Controls in the notifications panel
+- [X] Integration with the top bar
+  - [X] MPRIS support
+  - [X] Controls in the notifications panel
   - [ ] Progress bar in the notifications panel (maybe via extension)

_service

@@ -4,7 +4,6 @@
     <param name="url">https://github.com/Rafostar/clapper.git</param>
     <param name="extract">pkgs/rpm/clapper.spec</param>
     <param name="extract">pkgs/rpm/clapper.rpmlintrc</param>
-    <param name="extract">pkgs/deb/clapper.dsc</param>
   </service>
   <service name="tar" mode="buildtime"/>
   <service name="recompress" mode="buildtime">

bin/com.github.rafostar.Clapper.Subprocess.in

@@ -1,17 +0,0 @@
-#!@GJS@
-
-/* pkg init enforces the imports path to the folder
- * named after the pkg name, but I would prefer to have
- * the bundled subprocess stored in the same directory */
-imports.searchPath.unshift('@datadir@/@PACKAGE_NAME@');
-
-const Package = imports.package;
-
-Package.init({
-  name: '@PACKAGE_NAME@.@ID_POSTFIX@',
-  version: '@PACKAGE_VERSION@',
-  prefix: '@prefix@',
-  libdir: '@libdir@',
-  datadir: '@datadir@',
-});
-Package.run(imports.src.main@ID_POSTFIX@);

bin/com.github.rafostar.Clapper.in

@@ -1,12 +1,9 @@
 #!@GJS@
 
-const Package = imports.package;
-
-Package.init({
+imports.package.init({
   name: '@PACKAGE_NAME@',
   version: '@PACKAGE_VERSION@',
   prefix: '@prefix@',
   libdir: '@libdir@',
-  datadir: '@datadir@',
 });
-Package.run(imports.src.main);
+imports.package.run(imports.src.main);

bin/meson.build

@@ -1,24 +1,22 @@
-clapper_apps = ['', 'Remote', 'Daemon']
-
-foreach id_postfix : clapper_apps
-  app_postfix = (id_postfix != '') ? '.' + id_postfix : ''
-  template_type = (id_postfix != '') ? '.Subprocess' : ''
-
 bin_conf = configuration_data()
+
 bin_conf.set('GJS', find_program('gjs').path())
 bin_conf.set('PACKAGE_NAME', meson.project_name())
 bin_conf.set('PACKAGE_VERSION', meson.project_version())
-  bin_conf.set('ID_POSTFIX', id_postfix)
 bin_conf.set('prefix', get_option('prefix'))
-  bin_conf.set('libdir', join_paths(get_option('prefix'), get_option('libdir')))
-  bin_conf.set('datadir', join_paths(get_option('prefix'), get_option('datadir')))
+bin_conf.set('libdir', libdir)
 
 configure_file(
-    input: 'com.github.rafostar.Clapper' + template_type + '.in',
-    output: 'com.github.rafostar.Clapper' + app_postfix,
+  input: 'com.github.rafostar.Clapper.in',
+  output: 'com.github.rafostar.Clapper',
   configuration: bin_conf,
   install: true,
-    install_dir: get_option('bindir'),
+  install_dir: bindir,
   install_mode: 'rwxr-xr-x'
 )
-endforeach
+
+clapper_symlink_cmd = 'ln -fs @0@ $DESTDIR@1@'.format(
+  'com.github.rafostar.Clapper',
+  join_paths(bindir, 'clapper')
+)
+meson.add_install_script('sh', '-c', clapper_symlink_cmd)

crowdin.yml

@@ -0,0 +1,3 @@
+files:
+  - source: /po/com.github.rafostar.Clapper.pot
+    translation: /po/%osx_locale%.po

css/styles.css

@@ -5,19 +5,35 @@ scale marks {
 radio {
   margin-left: -2px;
 }
+scrolledwindow scrollbar.vertical slider {
+  min-height: 16px;
+}
+
 /* Adwaita is missing osd ListBox */
-.osd list {
+.clapperplaylist {
   background: none;
 }
-.osd list row {
+.clapperplaylist row {
+  border-radius: 5px;
+}
+.clapperplaylist row {
+  color: @theme_fg_color;
+}
+.clapperplaylist row button {
+  margin: 0px;
+  padding: 0px;
+  min-width: 28px;
+  min-height: 28px;
+}
+.fullscreen.tvmode .clapperplaylist row button {
+  min-width: 36px;
+  min-height: 36px;
+  margin-left: 2px;
+  margin-right: 2px;
+}
+.osd .clapperplaylist row image {
   -gtk-icon-shadow: none;
 }
-.gtk402 trough highlight {
-  border-color: transparent;
-}
-.gtk402 .osd trough highlight {
-  border-color: inherit;
-}
 .osdheaderbar {
   background: transparent;
 }
@@ -25,7 +41,7 @@ radio {
   border: transparent;
 }
 .linkseparator {
-  background: alpha(@borders, 0.75);
+  background: rgba(24,24,24,0.72);
   min-width: 1px;
 }
 .linkedleft image {
@@ -34,18 +50,18 @@ radio {
 .linkedright image {
   margin-right: 2px;
 }
-/* Non-osd style for popover menu */
-.menupopover label {
-  color: @theme_text_color;
+
+/* Flat popovers */
+popover arrow,
+popover contents {
+  border-color: transparent;
+  box-shadow: none;
 }
-.menupopover arrow {
-  background: @theme_base_color;
-  border-color: @insensitive_base_color;
-}
-.menupopover contents {
-  background: @theme_base_color;
-  border-color: @insensitive_base_color;
+.popoverseparator separator {
+  background-color: @insensitive_fg_color;
 }
+
+/* Rounded corners */
 .adwrounded.csd {
   border-radius: 8px;
 }
@@ -62,22 +78,54 @@ radio {
   border-radius: 8px;
 }
 
+/* Reduce sliders size */
+scale trough slider {
+  min-height: 18px;
+  min-width: 18px;
+}
+.fullscreen.tvmode scale trough slider {
+  min-height: 20px;
+  min-width: 20px;
+}
+
 .videowidget {
   min-width: 320px;
   min-height: 180px;
 }
 
-.tvmode popover box {
+.fullscreen.tvmode popover box {
   text-shadow: none;
   font-size: 21px;
   font-weight: 500;
 }
-.tvmode button {
+.clappercontrols {
+  margin-left: 2px;
+  margin-right: 2px;
+}
+.fullscreen.tvmode .clappercontrols {
+  margin-left: 1px;
+  margin-right: 1px;
+}
+.clappercontrolsbutton {
+  margin: 3px;
+  margin-left: 1px;
+  margin-right: 1px;
+}
+.fullscreen.tvmode .clappercontrolsbutton {
   min-width: 32px;
   min-height: 32px;
+  margin: 5px;
+  margin-left: 4px;
+  margin-right: 4px;
+}
+.clappercontrolsbutton.text-button {
+  padding-left: 4px;
+  padding-right: 4px;
+}
+.fullscreen.tvmode button image {
   -gtk-icon-shadow: none;
 }
-.tvmode radio {
+.fullscreen.tvmode radio {
   margin-left: 0px;
   margin-right: 4px;
   border: 2px solid;
@@ -85,40 +133,30 @@ radio {
   min-height: 17px;
 }
 
-.tvmode .playercontrols {
-  -gtk-icon-size: 24px;
+/* Also affects popover buttons */
+.fullscreen.tvmode .clappercontrols button image {
+  -gtk-icon-size: 26px;
 }
-.playbackicon {
-  -gtk-icon-size: 20px;
-}
-.tvmode .playbackicon {
-  -gtk-icon-size: 28px;
-}
-.labelbutton {
-  margin-left: -4px;
-  margin-right: -4px;
-  margin-top: 1px;
-  min-width: 8px;
+.clappercontrolsbutton.text-button label {
   font-family: 'Cantarell', sans-serif;
   font-variant-numeric: tabular-nums;
   font-weight: 600;
 }
-.tvmode .labelbutton {
-  margin-top: 0px;
-  font-size: 23px;
+.fullscreen.tvmode .clappercontrolsbutton.text-button label {
+  font-size: 22px;
   text-shadow: none;
 }
 
 /* Top Revealer */
-.tvmode .revealertopgrid {
+.fullscreen.tvmode .revealertopgrid {
   font-family: 'Cantarell', sans-serif;
 }
-.tvmode .tvtitle {
+.fullscreen.tvmode .tvtitle {
   font-size: 28px;
   font-weight: 500;
   text-shadow: none;
 }
-.tvtime {
+.fullscreen.tvmode .tvtime {
   margin-top: -2px;
   margin-bottom: -2px;
   min-height: 4px;
@@ -126,7 +164,7 @@ radio {
   font-weight: 700;
   font-variant-numeric: tabular-nums;
 }
-.tvendtime {
+.fullscreen.tvmode .tvendtime {
   margin-top: -4px;
   margin-bottom: 2px;
   min-height: 6px;
@@ -135,31 +173,27 @@ radio {
   font-variant-numeric: tabular-nums;
 }
 
-/* Button Inside Popover */
-.popoverbutton {
-  min-width: 24px;
-  min-height: 24px;
-}
-
 /* Position Scale */
 .positionscale {
-  margin-top: -2px;
-  margin-bottom: -2px;
-}
-.tvmode .positionscale {
-  margin-top: -1px;
+  margin: -2px;
 }
 .positionscale trough highlight {
-  min-height: 4px;
-}
-.osd .positionscale trough highlight {
   min-height: 6px;
 }
-.tvmode .positionscale trough slider {
+.fullscreen.tvmode .positionscale {
+  padding-left: 12px;
+  padding-right: 12px;
+}
+.fullscreen.tvmode .positionscale.fine-tune {
+  padding-left: 12px;
+  padding-right: 12px;
+}
+.fullscreen.tvmode .positionscale trough slider {
   color: transparent;
   background: transparent;
   border-color: transparent;
   box-shadow: none;
+  outline: none;
 }
 .positionscale mark indicator {
   min-height: 6px;
@@ -167,11 +201,11 @@ radio {
 .positionscale.fine-tune mark indicator {
   min-height: 6px;
 }
-.tvmode .positionscale mark indicator {
+.fullscreen.tvmode .positionscale mark indicator {
   min-height: 7px;
   min-width: 2px;
 }
-.tvmode .positionscale.fine-tune mark indicator {
+.fullscreen.tvmode .positionscale.fine-tune mark indicator {
   min-height: 7px;
   min-width: 2px;
 }
@@ -183,17 +217,20 @@ radio {
   margin-top: 4px;
   margin-bottom: -6px;
 }
-.tvmode .positionscale marks.top {
+.fullscreen.tvmode .positionscale marks.top {
   margin-bottom: 2px;
 }
-.tvmode .positionscale marks.bottom {
+.fullscreen.tvmode .positionscale marks.bottom {
   margin-top: 2px;
 }
-.tvmode .positionscale trough highlight {
+.fullscreen.tvmode .positionscale trough {
+  border-radius: 3px;
+}
+.fullscreen.tvmode .positionscale trough highlight {
   border-radius: 3px;
   min-height: 20px;
 }
-.tvmode .positionscale.fine-tune trough highlight {
+.fullscreen.tvmode .positionscale.fine-tune trough highlight {
   border-radius: 3px;
   min-height: 20px;
 }
@@ -205,7 +242,7 @@ radio {
   margin-right: -6px;
   min-height: 180px;
 }
-.tvmode .volumescale {
+.fullscreen.tvmode .volumescale {
   margin: 2px;
   margin-left: -6px;
   margin-right: -4px;
@@ -216,7 +253,10 @@ radio {
   margin-top: -4px;
   margin-bottom: -6px;
 }
-.tvmode .volumescale trough highlight {
+.volumescale trough highlight {
+  min-width: 4px;
+}
+.fullscreen.tvmode .volumescale trough highlight {
   min-width: 6px;
 }
 .overamp trough highlight {
@@ -224,16 +264,23 @@ radio {
 }
 
 /* Elapsed Popover */
-.elapsedpopoverbox {
-  min-width: 260px;
+.elapsedpopover {
+  min-width: 326px;
 }
-.elapsedpopoverbox box separator {
-  background: @insensitive_fg_color;
+.fullscreen.tvmode .elapsedpopover {
+  min-width: 448px;
 }
-.tvmode .elapsedpopoverbox {
-  min-width: 360px;
+.elapsedpopover contents {
+  padding-bottom: 0px;
 }
-.tvmode .speedscale trough highlight {
+.speedscale {
+  margin-left: 4px;
+  margin-right: 4px;
+}
+.speedscale trough highlight {
+  min-height: 4px;
+}
+.fullscreen.tvmode .speedscale trough highlight {
   min-height: 6px;
 }
 
@@ -256,33 +303,16 @@ radio {
 .chapterlabel {
   min-width: 32px;
 }
-.tvmode .chapterlabel {
+.fullscreen.tvmode .chapterlabel {
   min-width: 40px;
   text-shadow: none;
   font-size: 22px;
   font-weight: 600;
 }
 
-/* Preferences */
-.prefsnotebook grid {
-  margin: 10px;
-}
-.prefssubpage header {
-  background: none;
-}
-.prefssubpage header tabs tab {
-  box-shadow: none;
-  margin: 0px;
-  margin-right: 1px;
-}
-.prefssubpage header tabs tab:checked {
-  color: initial;
-  background: @theme_selected_bg_color;
-}
-
 /* Open URI Dialog */
 .uridialogbox {
-  margin: 12px;
+  margin: 10px;
 }
 
 /* Tweaks */
@@ -298,14 +328,60 @@ radio {
 .gpufriendly {
   box-shadow: -8px -8px transparent, 8px 8px transparent;
 }
-.gpufriendlyfs {
+.fullscreen.gpufriendlyfs {
   box-shadow: none;
 }
-.brightscale trough highlight {
-  filter: brightness(120%);
-}
 
 /* Error BG */
 .blackbackground {
   background: black;
 }
+
+/** SCALING LOW-RES **/
+.fullscreen.tvmode.lowres .clappercontrols button image {
+  -gtk-icon-size: 22px;
+}
+.fullscreen.tvmode.lowres .clappercontrolsbutton {
+  min-width: 28px;
+  min-height: 28px;
+}
+.fullscreen.tvmode.lowres .clappercontrolsbutton.text-button label {
+  font-size: 21px;
+}
+.fullscreen.tvmode.lowres .positionscale trough highlight {
+  min-height: 18px;
+}
+.fullscreen.tvmode.lowres .positionscale.fine-tune trough highlight {
+  min-height: 18px;
+}
+.fullscreen.tvmode.lowres popover box {
+  font-size: 19px;
+}
+.fullscreen.tvmode.lowres radio {
+  min-width: 15px;
+  min-height: 15px;
+}
+.fullscreen.tvmode.lowres .clapperplaylist row button {
+  min-width: 32px;
+  min-height: 32px;
+}
+.fullscreen.tvmode.lowres .tvtitle {
+  font-size: 26px;
+}
+.fullscreen.tvmode.lowres .tvtime {
+  font-size: 34px;
+}
+.fullscreen.tvmode.lowres .tvendtime {
+  font-size: 21px;
+}
+.fullscreen.tvmode.lowres .elapsedpopover {
+  min-width: 410px;
+}
+.fullscreen.tvmode.lowres .chapterlabel {
+  font-size: 21px;
+}
+
+/** SCALING HI-RES **/
+.fullscreen.tvmode.hires .clappercontrols button image {
+  -gtk-icon-size: 24px; /* Sharpest on 2160p with scaling 2x */
+}

data/com.github.rafostar.Clapper-symbolic.svg

@@ -0,0 +1,115 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!-- Created with Inkscape (http://www.inkscape.org/) -->
+
+<svg
+   width="16"
+   height="16"
+   viewBox="0 0 4.2333333 4.2333334"
+   version="1.1"
+   id="svg5"
+   inkscape:version="1.1 (c68e22c387, 2021-05-23)"
+   sodipodi:docname="com.github.rafostar.Clapper-symbolic.svg"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:svg="http://www.w3.org/2000/svg">
+  <sodipodi:namedview
+     id="namedview7"
+     pagecolor="#ffffff"
+     bordercolor="#666666"
+     borderopacity="1.0"
+     inkscape:pageshadow="2"
+     inkscape:pageopacity="0.0"
+     inkscape:pagecheckerboard="0"
+     inkscape:document-units="mm"
+     showgrid="false"
+     inkscape:snap-bbox="true"
+     inkscape:bbox-paths="true"
+     inkscape:bbox-nodes="true"
+     inkscape:snap-bbox-edge-midpoints="true"
+     inkscape:snap-bbox-midpoints="true"
+     inkscape:object-paths="true"
+     inkscape:snap-intersection-paths="true"
+     inkscape:snap-smooth-nodes="true"
+     inkscape:snap-midpoints="true"
+     inkscape:snap-global="false"
+     units="px"
+     inkscape:zoom="32"
+     inkscape:cx="6.078125"
+     inkscape:cy="8.09375"
+     inkscape:window-width="1680"
+     inkscape:window-height="981"
+     inkscape:window-x="0"
+     inkscape:window-y="0"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="layer1" />
+  <defs
+     id="defs2">
+    <inkscape:path-effect
+       effect="fillet_chamfer"
+       id="path-effect1853"
+       is_visible="true"
+       lpeversion="1"
+       satellites_param="F,0,0,1,0,1.8520833,0,1 @ F,0,0,1,0,1.8520833,0,1 @ F,0,0,1,0,1.8520833,0,1 @ F,0,0,1,0,1.8520833,0,1"
+       unit="px"
+       method="auto"
+       mode="F"
+       radius="7"
+       chamfer_steps="1"
+       flexible="false"
+       use_knot_distance="true"
+       apply_no_radius="true"
+       apply_with_radius="true"
+       only_selected="false"
+       hide_knots="false" />
+    <inkscape:path-effect
+       effect="fillet_chamfer"
+       id="path-effect1732"
+       is_visible="true"
+       lpeversion="1"
+       satellites_param="F,0,0,1,0,1.8520833,0,1 @ F,0,0,1,0,1.8520833,0,1 @ F,0,0,1,0,1.8520833,0,1 @ F,0,0,1,0,1.8520833,0,1"
+       unit="px"
+       method="auto"
+       mode="F"
+       radius="7"
+       chamfer_steps="1"
+       flexible="false"
+       use_knot_distance="true"
+       apply_no_radius="true"
+       apply_with_radius="true"
+       only_selected="false"
+       hide_knots="false" />
+  </defs>
+  <g
+     inkscape:label="Layer 1"
+     inkscape:groupmode="layer"
+     id="layer1">
+    <g
+       id="g2022"
+       transform="matrix(0.06169519,0,0,0.06168906,-4.7800087,-3.2713603)">
+      <path
+         id="rect973"
+         style="fill:#000000;stroke-width:1.30776;stroke-linecap:round;stroke-linejoin:round;paint-order:stroke markers fill"
+         d="m 88.193064,81.795006 c -0.699254,0 -1.342327,0.227875 -1.864484,0.609782 h 51.32503 c -0.52216,-0.381907 -1.16471,-0.609782 -1.86397,-0.609782 z m -3.157945,10.475846 v 26.225278 c 0,1.74939 1.40856,3.15743 3.157945,3.15743 h 47.596576 c 1.74939,0 3.15795,-1.40804 3.15795,-3.15743 V 92.270852 Z m 20.323311,4.964038 15.40009,9.27283 -15.5205,9.56634 z" />
+      <path
+         style="fill:#000000;stroke:#000000;stroke-width:0.264583px;stroke-linecap:butt;stroke-linejoin:miter;stroke-opacity:1"
+         d="m 83.974394,69.464471 7.344033,-0.06509 a 2.7923103,2.7923103 33.047712 0 1 2.587466,1.683384 l 7.009937,16.201526 a 1.2163248,1.2163248 123.30899 0 1 -1.116623,1.699322 l -15.720141,-0.004 a 1.862525,1.862525 44.853691 0 1 -1.862019,-1.852534 l -0.08473,-15.79409 a 1.8585738,1.8585738 134.59241 0 1 1.842075,-1.868472 z"
+         id="path1422"
+         inkscape:path-effect="#path-effect1732"
+         inkscape:original-d="m 82.122383,69.480886 11.048055,-0.09792 8.480852,19.601124 -19.424307,-0.005 z" />
+      <rect
+         style="fill:#000000;stroke-width:1.3;stroke-linecap:round;stroke-linejoin:round;paint-order:stroke markers fill"
+         id="rect1544"
+         width="59.366463"
+         height="9.8661175"
+         x="82"
+         y="79.292183"
+         ry="1.2306831" />
+      <path
+         id="rect1847"
+         style="fill:#000000;stroke-width:4.91339;stroke-linecap:round;stroke-linejoin:round;paint-order:stroke markers fill"
+         d="m 522.12695,200.42773 c -0.45798,3.8e-4 -0.92335,0.0696 -1.38476,0.21289 l -172.88672,53.70313 5.28515,-0.0469 a 10.55362,10.55362 0 0 1 9.7793,6.36328 l 10.69922,24.72656 158.18359,-49.13477 c 2.46089,-0.7644 3.82691,-3.36137 3.0625,-5.82226 l -8.30078,-26.72657 c -0.62108,-1.99947 -2.4529,-3.277 -4.4375,-3.27539 z m -203.69531,63.05469 -3.08398,0.95899 c -2.46089,0.7644 -3.82691,3.35942 -3.0625,5.82031 l 6.29101,20.2539 z"
+         transform="scale(0.26458333)" />
+    </g>
+  </g>
+</svg>

data/com.github.rafostar.Clapper.data.gresource.xml

@@ -0,0 +1,9 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<gresources>
+  <gresource prefix="/com/github/rafostar/Clapper">
+    <file preprocess="xml-stripblanks" alias="icons/scalable/actions/play-symbolic.svg">icons/play-symbolic.svg</file>
+    <file preprocess="xml-stripblanks" alias="icons/scalable/actions/pause-symbolic.svg">icons/pause-symbolic.svg</file>
+    <file preprocess="xml-stripblanks" alias="icons/scalable/actions/pip-in-symbolic.svg">icons/pip-in-symbolic.svg</file>
+    <file preprocess="xml-stripblanks" alias="icons/scalable/actions/pip-out-symbolic.svg">icons/pip-out-symbolic.svg</file>
+  </gresource>
+</gresources>

data/com.github.rafostar.Clapper.gschema.xml

@@ -6,31 +6,31 @@
       <default>false</default>
       <summary>Automatically enter fullscreen when first file is loaded</summary>
     </key>
-    <key name="volume-initial" type="s">
-      <default>"restore"</default>
-      <summary>Mode used for startup volume value</summary>
+    <key name="volume-custom" type="b">
+      <default>false</default>
+      <summary>Set custom volume value at startup</summary>
     </key>
     <key name="volume-value" type="i">
       <default>100</default>
       <summary>Custom initial volume value in percentage after startup</summary>
     </key>
-    <key name="close-auto" type="b">
-      <default>false</default>
-      <summary>Automatically close the app after playback finishes</summary>
+    <key name="after-playback" type="i">
+      <default>0</default>
+      <summary>What to do after playback finishes</summary>
     </key>
 
-    <!-- Behaviour -->
-    <key name="seeking-mode" type="s">
-      <default>"normal"</default>
+    <!-- Behavior -->
+    <key name="seeking-mode" type="i">
+      <default>0</default>
       <summary>Mode used for seeking</summary>
     </key>
     <key name="seeking-value" type="i">
       <default>10</default>
       <summary>Time amount to seek with single press of arrow keys</summary>
     </key>
-    <key name="seeking-unit" type="s">
-      <default>"second"</default>
-      <summary>Unit to use with seeking value</summary>
+    <key name="seeking-unit" type="i">
+      <default>0</default>
+      <summary>Unit ID to use with seeking value</summary>
     </key>
     <key name="resume-enabled" type="b">
       <default>true</default>
@@ -46,16 +46,12 @@
     </key>
 
     <!-- Audio -->
-    <key name="audio-offset" type="d">
+    <key name="audio-offset" type="i">
       <default>0</default>
       <summary>Offset time for audio tracks relative to video (milliseconds)</summary>
     </key>
 
     <!-- Subtitles -->
-    <key name="subtitle-offset" type="d">
-      <default>0</default>
-      <summary>Offset time for subtitle tracks relative to video (milliseconds)</summary>
-    </key>
     <key name="subtitle-font" type="s">
       <default>"Sans 12"</default>
       <summary>The subtitles font description</summary>
@@ -84,10 +80,6 @@
       <default>true</default>
       <summary>Enable to force the app to use dark theme variant</summary>
     </key>
-    <key name="brighter-sliders" type="b">
-      <default>true</default>
-      <summary>Enable to make all sliders/bars brighter</summary>
-    </key>
     <key name="render-shadows" type="b">
       <default>true</default>
       <summary>Enable rendering window shadows (only if theme has them)</summary>
@@ -95,9 +87,17 @@
 
     <!-- GStreamer -->
     <key name="plugin-ranking" type="s">
-      <default>'[{"apply":false,"name":"vah264dec","rank":300}]'</default>
+      <default>'{}'</default>
       <summary>Custom values for GStreamer plugin ranking</summary>
     </key>
+    <key name="use-playbin3" type="b">
+      <default>false</default>
+      <summary>Use playbin3 element instead of playbin2</summary>
+    </key>
+    <key name="use-pipewire" type="b">
+      <default>false</default>
+      <summary>Use PipeWire for audio output</summary>
+    </key>
     <key name="play-flags" type="i">
       <default>1687</default>
       <summary>Set PlayFlags for playbin</summary>
@@ -105,7 +105,7 @@
 
     <!-- Other -->
     <key name="window-size" type="s">
-      <default>'[960, 583]'</default>
+      <default>'[800, 490]'</default>
       <summary>Stores window size to restore on next launch</summary>
     </key>
     <key name="volume-last" type="d">

data/com.github.rafostar.Clapper.metainfo.xml

@@ -9,24 +9,20 @@
   <launchable type="desktop-id">com.github.rafostar.Clapper.desktop</launchable>
   <description>
     <p>
-      Clapper is a GNOME media player build using GJS with GTK4 toolkit.
+      Clapper is a GNOME media player built using GJS with GTK4 toolkit.
       The media player is using GStreamer as a media backend and renders
       everything via OpenGL. Player works natively on both Xorg and Wayland.
-      It also supports VA-API on AMD/Intel GPUs.
+      It also supports hardware acceleration through VA-API on AMD/Intel GPUs,
+      NVDEC on Nvidia and V4L2 on mobile devices.
     </p>
     <p>
       The media player has an adaptive GUI. When viewing videos in "Windowed Mode",
       Clapper will use mostly unmodified GTK widgets to match your OS look nicely.
       When player enters "Fullscreen Mode" all GUI elements will become darker, bigger
       and semi-transparent for your viewing comfort. It also has a "Floating Mode" which
-      displays video only on top of all other windows for a PiP-like viewing experience.
+      displays only video on top of all other windows for a PiP-like viewing experience.
       Mobile friendly transitions are also supported.
     </p>
-    <p>
-      For best stability Wayland session is recommended. Wayland users with AMD/Intel GPUs
-      can try enabling HIGHLY EXPERIMENTAL "vah264dec" plugin inside player preferences
-      for reduced CPU and GPU usage on standard (8-bit) H.264 videos.
-    </p>
   </description>
   <developer_name>Rafał Dzięgiel</developer_name>
   <url type="homepage">https://rafostar.github.io/clapper</url>
@@ -52,6 +48,129 @@
     </screenshot>
   </screenshots>
   <releases>
+    <release version="0.4.1" date="2021-12-20">
+      <description>
+        <p>Fixes:</p>
+        <ul>
+          <li>Compatibility with more recent libadwaita versions</li>
+          <li>Toggle mute with M button alone</li>
+          <li>Allow handling YouTube with external GStreamer plugins</li>
+          <li>Fix catching errors when reading clipboard</li>
+          <li>Fix missing translator-credits</li>
+          <li>Fix missing gio-unix-2.0 dep</li>
+          <li>Fix playback pausing when entering fullscreen with touchscreen</li>
+          <li>Fix GST_PLUGIN_FEATURE_RANK env usage</li>
+          <li>Fix video/audio decoder change detection</li>
+          <li>Merge global video tags instead replacing them</li>
+          <li>Few other misc bug fixes</li>
+        </ul>
+        <p>New translations:</p>
+        <ul>
+          <li>Chinese Simplified</li>
+          <li>Czech</li>
+          <li>Hungarian</li>
+          <li>Portuguese</li>
+          <li>Portuguese, Brazilian</li>
+          <li>Russian</li>
+          <li>Spanish</li>
+        </ul>
+      </description>
+    </release>
+    <release version="0.4.0" date="2021-09-12">
+      <description>
+        <p>Changes:</p>
+        <ul>
+          <li>Now uses libadwaita</li>
+          <li>New and adaptive preferences window</li>
+          <li>Improved open URI dialog</li>
+          <li>Few small tweaks to fullscreen UI design</li>
+          <li>Show current video and audio decoders in popovers (easy way to check if HW accel is used)</li>
+          <li>Enabled NVDEC hardware acceleration by default (requires Nvidia proprietary drivers)</li>
+          <li>Added option to use PipeWire for audio output (experimental)</li>
+          <li>Added option to use playbin3 element (experimental)</li>
+          <li>New PiP icon from icon development kit</li>
+          <li>Improved performance on devices running OpenGL ES</li>
+          <li>Translations support</li>
+          <li>Various bug fixes</li>
+        </ul>
+        <p>New keyboard shortcuts:</p>
+        <ul>
+          <li>Leave fullscreen with Escape key</li>
+          <li>Toggle mute with Ctrl+M</li>
+        </ul>
+        <p>More touchscreen gestures:</p>
+        <ul>
+          <li>Toggle playback with a long press</li>
+          <li>Switch playlist items via double tap on screen side</li>
+        </ul>
+        <p>New translations:</p>
+        <ul>
+          <li>Catalan</li>
+          <li>Dutch</li>
+          <li>German</li>
+          <li>Italian</li>
+          <li>Polish</li>
+        </ul>
+      </description>
+    </release>
+    <release version="0.3.0" date="2021-06-18">
+      <description>
+        <p>Changes:</p>
+        <ul>
+          <li>Added MPRIS support</li>
+          <li>Added repeat modes: single video, whole playlist and shuffle</li>
+          <li>Support opening folders with media files</li>
+          <li>Append playlist items by holding Ctrl while doing Drag and Drop</li>
+          <li>Improved handling of keyboard shortcuts</li>
+          <li>Added more keyboard shortcuts</li>
+          <li>Added window that shows available keyboard shortcuts</li>
+          <li>Show black screen by default after playback (make showing last frame optional instead)</li>
+          <li>Added ability to export playlist to file</li>
+          <li>Improve handling of changing displays with different resolutions</li>
+          <li>Added support for EGL under x11 with GTK 4.3.1 or later</li>
+          <li>Added missing symbolic app icon</li>
+          <li>Some misc bug fixes and code cleanups</li>
+        </ul>
+      </description>
+    </release>
+    <release version="0.2.1" date="2021-04-19">
+      <description>
+        <p>Player:</p>
+        <ul>
+          <li>Fix missing top left menu buttons on some system configurations</li>
+          <li>Fix potential video sink deadlock</li>
+          <li>Do not show mobile controls transition on launch</li>
+          <li>Show tooltip with full playlist item text on hover</li>
+        </ul>
+        <p>YouTube:</p>
+        <ul>
+          <li>Auto select best matching resolution for used monitor</li>
+          <li>Added some YouTube related preferences</li>
+          <li>Added support for live HLS videos</li>
+          <li>Added support for non-adaptive live HLS streaming</li>
+        </ul>
+      </description>
+    </release>
+    <release version="0.2.0" date="2021-04-13">
+      <description>
+        <p>New features:</p>
+        <ul>
+          <li>YouTube support - drag and drop videos from youtube or use open URI dialog to play them</li>
+          <li>Added convenient ways of opening external subtitles</li>
+        </ul>
+        <p>Changes:</p>
+        <ul>
+          <li>Few GUI layout improvements</li>
+          <li>Simplified video sink code</li>
+          <li>Fixed missing Ctrl+O common keybinding</li>
+          <li>Fixed error when playback finishes during controls reveal animation</li>
+          <li>Fixed startup window size on Xorg</li>
+          <li>Fixed top time not showing up on fullscreen startup</li>
+          <li>Fixed missing file extensions in online URIs</li>
+          <li>Fixed some error messages not being displayed</li>
+        </ul>
+      </description>
+    </release>
     <release version="0.1.0" date="2021-02-26">
       <description>
         <p>First stable release</p>
@@ -64,6 +183,14 @@
     </release>
   </releases>
   <content_rating type="oars-1.1" />
+  <recommends>
+    <control>keyboard</control>
+    <control>pointing</control>
+    <control>touch</control>
+  </recommends>
+  <requires>
+    <display_length compare="ge">small</display_length>
+  </requires>
   <custom>
     <value key="Purism::form_factor">workstation</value>
     <value key="Purism::form_factor">mobile</value>

data/com.github.rafostar.Clapper.svg

@@ -1,29 +1,29 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <svg version="1.1" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" viewBox="0 0 256 256" width="256" height="256">
   <defs>
-    <path d="M27.2 243.52C27.2 236.16 27.2 199.83 27.2 134.22C47.64 134.22 211.12 134.22 231.56 134.22C231.56 199.83 231.56 236.16 231.56 243.52C231.56 250.4 225.96 256 218.92 256C183.07 256 57.77 256 39.84 256C32.8 256 27.2 250.4 27.2 243.52Z" id="b1nGq5BrLC"></path>
-    <path d="M24.32 103.65C24.32 106.22 24.32 127.02 24.32 129.58C24.32 132.78 26.72 135.18 29.92 135.18C50.41 135.18 215.08 135.18 235.72 135.18C238.76 135.18 241.32 132.78 241.32 129.58C241.32 127.02 241.32 106.22 241.32 103.65C241.32 100.45 238.76 98.05 235.72 98.05C194.59 98.05 50.41 98.05 29.92 98.05C26.72 98.05 24.32 100.45 24.32 103.65Z" id="a3jkaoNn4k"></path>
-    <path d="M174.59 135.18L211.87 98.05L171.07 98.05L133.78 135.18L174.59 135.18Z" id="atpVQ8mnd"></path>
-    <path d="M76.81 135.18L114.1 98.05L73.13 98.05L35.84 135.18L76.81 135.18Z" id="bMtYoNHu0"></path>
-    <path d="M19.04 69.41C19.84 71.97 25.92 91.97 26.72 94.37C27.68 97.41 30.72 99.01 33.76 98.05C54.09 91.81 216.68 42.04 237 35.8C240.04 35 241.64 31.8 240.84 28.92C240.04 26.36 233.96 6.36 233.16 3.96C232.2 0.92 229.16 -0.68 226.12 0.28C185.47 12.6 43.21 56.29 22.88 62.53C19.84 63.33 18.24 66.53 19.04 69.41Z" id="b5oP0Glp4"></path>
-    <path d="M176.51 54.37L129.94 29.4L169.15 17.56L215.72 42.52L176.51 54.37Z" id="lwBgev6DR"></path>
-    <path d="M81.61 83.49L35.04 58.69L74.25 46.69L120.82 71.49L81.61 83.49Z" id="cUsjEMRUu"></path>
-    <path d="M14.72 66.69C14.72 72.93 14.72 123.02 14.72 129.26C14.72 132.62 17.44 135.18 20.64 135.18C26.56 135.18 74.09 135.18 80.01 135.18C84.33 135.18 87.21 130.86 85.61 127.02C82.89 120.78 61.45 70.53 58.73 64.29C57.77 62.05 55.69 60.77 53.29 60.77C46.73 60.77 24 60.77 20.64 60.77C17.44 60.77 14.72 63.33 14.72 66.69Z" id="c1bcHZGXe"></path>
-    <path d="M32.64 60.61C31.52 60.61 21.92 60.61 20.64 60.61C17.44 60.61 14.72 63.33 14.72 66.53C14.72 72.77 14.72 123.02 14.72 129.26C14.72 132.46 17.44 135.18 20.64 135.18C21.92 135.18 31.52 135.18 32.64 135.18C29.44 135.18 26.72 132.46 26.72 129.26C26.72 116.62 26.72 72.77 26.72 66.53C26.72 63.33 29.44 60.61 32.64 60.61Z" id="f2PtH0V1vC"></path>
-    <path d="M231.56 135.18C231.56 143.82 231.56 148.46 231.56 149.42C231.56 149.42 231.56 149.42 231.56 149.42C108.98 149.42 40.8 149.42 27.2 149.42C27.2 149.42 27.2 149.42 27.2 149.42C27.2 140.94 27.2 136.14 27.2 135.18C27.2 135.18 27.2 135.18 27.2 135.18C149.78 135.18 217.96 135.18 231.56 135.18C231.56 135.18 231.56 135.18 231.56 135.18Z" id="a1SvrrkqVm"></path>
-    <path d="M104.22 162.46L104.22 234.46L163.22 198.54L104.22 162.46Z" id="agXcvKqh8"></path>
+    <path id="b1nGq5BrLC" d="M27.2 243.52C27.2 236.16 27.2 199.83 27.2 134.22C47.64 134.22 211.12 134.22 231.56 134.22C231.56 199.83 231.56 236.16 231.56 243.52C231.56 250.4 225.96 256 218.92 256C183.07 256 57.77 256 39.84 256C32.8 256 27.2 250.4 27.2 243.52Z"></path>
+    <path id="a3jkaoNn4k" d="M24.32 103.65C24.32 106.22 24.32 127.02 24.32 129.58C24.32 132.78 26.72 135.18 29.92 135.18C50.41 135.18 215.08 135.18 235.72 135.18C238.76 135.18 241.32 132.78 241.32 129.58C241.32 127.02 241.32 106.22 241.32 103.65C241.32 100.45 238.76 98.05 235.72 98.05C194.59 98.05 50.41 98.05 29.92 98.05C26.72 98.05 24.32 100.45 24.32 103.65Z"></path>
+    <path id="atpVQ8mnd" d="M174.59 135.18L211.87 98.05L171.07 98.05L133.78 135.18L174.59 135.18Z"></path>
+    <path id="bMtYoNHu0" d="M76.81 135.18L114.1 98.05L73.13 98.05L35.84 135.18L76.81 135.18Z"></path>
+    <path id="b5oP0Glp4" d="M19.04 69.41C19.84 71.97 25.92 91.97 26.72 94.37C27.68 97.41 30.72 99.01 33.76 98.05C54.09 91.81 216.68 42.04 237 35.8C240.04 35 241.64 31.8 240.84 28.92C240.04 26.36 233.96 6.36 233.16 3.96C232.2 0.92 229.16 -0.68 226.12 0.28C185.47 12.6 43.21 56.29 22.88 62.53C19.84 63.33 18.24 66.53 19.04 69.41Z"></path>
+    <path id="lwBgev6DR" d="M176.51 54.37L129.94 29.4L169.15 17.56L215.72 42.52L176.51 54.37Z"></path>
+    <path id="cUsjEMRUu" d="M81.61 83.49L35.04 58.69L74.25 46.69L120.82 71.49L81.61 83.49Z"></path>
+    <path id="c1bcHZGXe" d="M14.72 66.69C14.72 72.93 14.72 123.02 14.72 129.26C14.72 132.62 17.44 135.18 20.64 135.18C26.56 135.18 74.09 135.18 80.01 135.18C84.33 135.18 87.21 130.86 85.61 127.02C82.89 120.78 61.45 70.53 58.73 64.29C57.77 62.05 55.69 60.77 53.29 60.77C46.73 60.77 24 60.77 20.64 60.77C17.44 60.77 14.72 63.33 14.72 66.69Z"></path>
+    <path id="f2PtH0V1vC" d="M32.64 60.61C31.52 60.61 21.92 60.61 20.64 60.61C17.44 60.61 14.72 63.33 14.72 66.53C14.72 72.77 14.72 123.02 14.72 129.26C14.72 132.46 17.44 135.18 20.64 135.18C21.92 135.18 31.52 135.18 32.64 135.18C29.44 135.18 26.72 132.46 26.72 129.26C26.72 116.62 26.72 72.77 26.72 66.53C26.72 63.33 29.44 60.61 32.64 60.61Z"></path>
+    <path id="a1SvrrkqVm" d="M231.56 135.18C231.56 143.82 231.56 148.46 231.56 149.42C231.56 149.42 231.56 149.42 231.56 149.42C108.98 149.42 40.8 149.42 27.2 149.42C27.2 149.42 27.2 149.42 27.2 149.42C27.2 140.94 27.2 136.14 27.2 135.18C27.2 135.18 27.2 135.18 27.2 135.18C149.78 135.18 217.96 135.18 231.56 135.18C231.56 135.18 231.56 135.18 231.56 135.18Z"></path>
+    <path id="agXcvKqh8" d="M104.22 162.46L104.22 234.46L163.22 198.54L104.22 162.46Z"></path>
   </defs>
   <g>
-    <g><use xlink:href="#b1nGq5BrLC" fill="#4747d1"></use></g>
-    <g><use xlink:href="#a3jkaoNn4k" fill="#4747d1"></use></g>
-    <g><use xlink:href="#atpVQ8mnd" fill="#f1f1f1"></use></g>
-    <g><use xlink:href="#bMtYoNHu0" fill="#f1f1f1"></use></g>
-    <g><use xlink:href="#b5oP0Glp4" fill="#4747d1"></use></g>
-    <g><use xlink:href="#lwBgev6DR" fill="#f1f1f1"></use></g>
-    <g><use xlink:href="#cUsjEMRUu" fill="#f1f1f1"></use></g>
-    <g><use xlink:href="#c1bcHZGXe" fill="#a9a9a9"></use></g>
-    <g><use xlink:href="#f2PtH0V1vC" opacity="0.2" fill="#000000"></use></g>
-    <g><use xlink:href="#a1SvrrkqVm" opacity="0.2" fill="#000000"></use></g>
-    <g><use xlink:href="#agXcvKqh8" fill="#f1f1f1"></use></g>
+    <g><use xlink:href="#b1nGq5BrLC" fill="#4747d1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#a3jkaoNn4k" fill="#4747d1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#atpVQ8mnd" fill="#f1f1f1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#bMtYoNHu0" fill="#f1f1f1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#b5oP0Glp4" fill="#4747d1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#lwBgev6DR" fill="#f1f1f1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#cUsjEMRUu" fill="#f1f1f1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#c1bcHZGXe" fill="#a9a9a9" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#f2PtH0V1vC" opacity="0.2" fill="#000000" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#a1SvrrkqVm" opacity="0.2" fill="#000000" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
+    <g><use xlink:href="#agXcvKqh8" fill="#f1f1f1" transform="matrix(1, 0, 0, 0.97, 0, 0)"></use></g>
   </g>
 </svg>

data/gstclapper-mpris-gdbus.xml

@@ -0,0 +1,52 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<node>
+  <interface name="org.mpris.MediaPlayer2">
+    <method name="Raise"/>
+    <method name="Quit"/>
+    <property name="CanQuit" type="b" access="read"/>
+    <property name="Fullscreen" type="b" access="readwrite"/>
+    <property name="CanSetFullscreen" type="b" access="read"/>
+    <property name="CanRaise" type="b" access="read"/>
+    <property name="HasTrackList" type="b" access="read"/>
+    <property name="Identity" type="s" access="read"/>
+    <property name="DesktopEntry" type="s" access="read"/>
+    <property name="SupportedUriSchemes" type="as" access="read"/>
+    <property name="SupportedMimeTypes" type="as" access="read"/>
+  </interface>
+  <interface name="org.mpris.MediaPlayer2.Player">
+    <method name="Next"/>
+    <method name="Previous"/>
+    <method name="Pause"/>
+    <method name="PlayPause"/>
+    <method name="Stop"/>
+    <method name="Play"/>
+    <method name="Seek">
+      <arg name="Offset" type="x" direction="in"/>
+    </method>
+    <method name="SetPosition">
+      <arg name="TrackId" type="o" direction="in"/>
+      <arg name="Position" type="x" direction="in"/>
+    </method>
+    <method name="OpenUri">
+      <arg name="Uri" type="s" direction="in"/>
+    </method>
+    <signal name="Seeked">
+      <arg type="x" name="Position"/>
+    </signal>
+    <property name="PlaybackStatus" type="s" access="read"/>
+    <property name="LoopStatus" type="s" access="readwrite"/>
+    <property name="Rate" type="d" access="readwrite"/>
+    <property name="Shuffle" type="b" access="readwrite"/>
+    <property name="Metadata" type="a{sv}" access="read"/>
+    <property name="Volume" type="d" access="readwrite"/>
+    <property name="Position" type="x" access="read"/>
+    <property name="MinimumRate" type="d" access="read"/>
+    <property name="MaximumRate" type="d" access="read"/>
+    <property name="CanGoNext" type="b" access="read"/>
+    <property name="CanGoPrevious" type="b" access="read"/>
+    <property name="CanPlay" type="b" access="read"/>
+    <property name="CanPause" type="b" access="read"/>
+    <property name="CanSeek" type="b" access="read"/>
+    <property name="CanControl" type="b" access="read"/>
+  </interface>
+</node>

data/icons/pause-symbolic.svg

@@ -0,0 +1,7 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<svg height="16px" viewBox="0 0 16 16" width="16px" xmlns="http://www.w3.org/2000/svg">
+    <g fill="#2e3436">
+        <path d="m 3 3 h 4 v 10 h -4 z m 0 0"/>
+        <path d="m 9 3 h 4 v 10 h -4 z m 0 0"/>
+    </g>
+</svg>

data/icons/pip-in-symbolic.svg

@@ -0,0 +1,112 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<svg height="16px" viewBox="0 0 16 16" width="16px" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+    <filter id="a" height="100%" width="100%" x="0%" y="0%">
+        <feColorMatrix in="SourceGraphic" type="matrix" values="0 0 0 0 1 0 0 0 0 1 0 0 0 0 1 0 0 0 1 0"/>
+    </filter>
+    <mask id="b">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.3"/>
+        </g>
+    </mask>
+    <clipPath id="c">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="d">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="e">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="f">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="g">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="h">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="i">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="j">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="k">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="l">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="m">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="n">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="o">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="p">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.3"/>
+        </g>
+    </mask>
+    <clipPath id="q">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="r">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.5"/>
+        </g>
+    </mask>
+    <clipPath id="s">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <g fill="#2e3436">
+        <path d="m 1 2.007812 c -0.550781 0 -1 0.449219 -1 1 v 9 c 0 0.550782 0.449219 1 1 1 h 4 v -2 h -3 v -7 h 10 v 3 h 2 v -4 c 0 -0.550781 -0.449219 -1 -1 -1 z m 0 0" fill-opacity="0.35"/>
+        <path d="m 9 10 c -0.550781 0 -1 0.449219 -1 1 v 4.007812 c 0 0.550782 0.449219 1 1 1 h 6 c 0.550781 0 1 -0.449218 1 -1 v -4.007812 c 0 -0.550781 -0.449219 -1 -1 -1 z m 1 2 h 4 v 2.007812 h -4 z m 0 0"/>
+        <path d="m 3.132812 5.140625 c 0.171876 -0.164063 0.496094 -0.1875 0.757813 0.015625 l 3.109375 3.089844 v 0.753906 h -0.753906 l -3.109375 -3.089844 c -0.191407 -0.191406 -0.179688 -0.597656 -0.003907 -0.769531 z m 0 0"/>
+        <path d="m 4 9 h 4 v 1 h -4 z m 0 0"/>
+        <path d="m 7 6 h 1 v 4 h -1 z m 0 0"/>
+    </g>
+    <g clip-path="url(#c)" mask="url(#b)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 562.460938 212.058594 h 10.449218 c -1.183594 0.492187 -1.296875 2.460937 0 3 h -10.449218 z m 0 0" fill="#2e3436"/>
+    </g>
+    <g clip-path="url(#e)" mask="url(#d)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 16 632 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#g)" mask="url(#f)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 17 631 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#i)" mask="url(#h)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 18 634 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#k)" mask="url(#j)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 16 634 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#m)" mask="url(#l)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 17 635 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#o)" mask="url(#n)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 19 635 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#q)" mask="url(#p)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 136 660 v 7 h 7 v -7 z m 0 0" fill="#2e3436"/>
+    </g>
+    <g clip-path="url(#s)" mask="url(#r)" transform="matrix(1 0 0 1 -580 -764)">
+        <path d="m 219 642 h 3 v 12 h -3 z m 0 0" fill="#2e3436"/>
+    </g>
+</svg>

data/icons/pip-out-symbolic.svg

@@ -0,0 +1,112 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<svg height="16px" viewBox="0 0 16 16" width="16px" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
+    <filter id="a" height="100%" width="100%" x="0%" y="0%">
+        <feColorMatrix in="SourceGraphic" type="matrix" values="0 0 0 0 1 0 0 0 0 1 0 0 0 0 1 0 0 0 1 0"/>
+    </filter>
+    <mask id="b">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.3"/>
+        </g>
+    </mask>
+    <clipPath id="c">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="d">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="e">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="f">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="g">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="h">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="i">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="j">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="k">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="l">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="m">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="n">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.05"/>
+        </g>
+    </mask>
+    <clipPath id="o">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="p">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.3"/>
+        </g>
+    </mask>
+    <clipPath id="q">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <mask id="r">
+        <g filter="url(#a)">
+            <path d="m 0 0 h 16 v 16 h -16 z" fill-opacity="0.5"/>
+        </g>
+    </mask>
+    <clipPath id="s">
+        <path d="m 0 0 h 1024 v 800 h -1024 z"/>
+    </clipPath>
+    <g fill="#2e3436">
+        <path d="m 1 2.007812 c -0.550781 0 -1 0.449219 -1 1 v 9 c 0 0.550782 0.449219 1 1 1 h 4 v -2 h -3 v -7 h 10 v 3 h 2 v -4 c 0 -0.550781 -0.449219 -1 -1 -1 z m 0 0"/>
+        <path d="m 9 10 c -0.550781 0 -1 0.449219 -1 1 v 4.007812 c 0 0.550782 0.449219 1 1 1 h 6 c 0.550781 0 1 -0.449218 1 -1 v -4.007812 c 0 -0.550781 -0.449219 -1 -1 -1 z m 1 2 h 4 v 2.007812 h -4 z m 0 0" fill-opacity="0.35"/>
+        <path d="m 7.863281 9.871094 c -0.167969 0.164062 -0.492187 0.1875 -0.753906 -0.019532 l -3.113281 -3.085937 v -0.753906 h 0.753906 l 3.109375 3.085937 c 0.191406 0.191406 0.179687 0.601563 0.003906 0.773438 z m 0 0"/>
+        <path d="m 6.996094 6.011719 h -4 v -1 h 4 z m 0 0"/>
+        <path d="m 3.996094 9.011719 h -1 v -4 h 1 z m 0 0"/>
+    </g>
+    <g clip-path="url(#c)" mask="url(#b)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 562.460938 212.058594 h 10.449218 c -1.183594 0.492187 -1.296875 2.460937 0 3 h -10.449218 z m 0 0" fill="#2e3436"/>
+    </g>
+    <g clip-path="url(#e)" mask="url(#d)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 16 632 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#g)" mask="url(#f)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 17 631 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#i)" mask="url(#h)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 18 634 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#k)" mask="url(#j)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 16 634 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#m)" mask="url(#l)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 17 635 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#o)" mask="url(#n)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 19 635 h 1 v 1 h -1 z m 0 0" fill="#2e3436" fill-rule="evenodd"/>
+    </g>
+    <g clip-path="url(#q)" mask="url(#p)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 136 660 v 7 h 7 v -7 z m 0 0" fill="#2e3436"/>
+    </g>
+    <g clip-path="url(#s)" mask="url(#r)" transform="matrix(1 0 0 1 -600 -764)">
+        <path d="m 219 642 h 3 v 12 h -3 z m 0 0" fill="#2e3436"/>
+    </g>
+</svg>

data/icons/play-symbolic.svg

@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<svg height="16px" viewBox="2 2 16 16" width="16px" xmlns="http://www.w3.org/2000/svg">
+    <path d="M 5 3.746094 L 5 16.246094 L 6.25 16.246094 C 6.46875 16.246094 6.683594 16.195312 6.875 16.089844 L 15.625 11.089844 C 16.015625 10.875 16.210938 10.433594 16.210938 9.996094 C 16.210938 9.554688 16.015625 9.117188 15.625 8.902344 L 6.875 3.902344 C 6.683594 3.792969 6.46875 3.746094 6.25 3.746094 Z M 5 3.746094" fill="#2e3436"/>
+</svg>

data/meson.build

@@ -1,18 +1,34 @@
-sharedir = join_paths(get_option('prefix'), 'share')
-iconsdir = join_paths(sharedir, 'icons', 'hicolor')
+iconsdir = join_paths(datadir, 'icons', 'hicolor')
+
+appstream_util = find_program('appstream-util', required: false)
+if appstream_util.found()
+  test('Validate appstream file', appstream_util, args: [
+    'validate-relax',
+    join_paths(meson.current_source_dir(), 'com.github.rafostar.Clapper.metainfo.xml')
+  ])
+endif
 
 install_data('com.github.rafostar.Clapper.svg',
   install_dir: join_paths(iconsdir, 'scalable', 'apps')
 )
+install_data('com.github.rafostar.Clapper-symbolic.svg',
+  install_dir: join_paths(iconsdir, 'symbolic', 'apps')
+)
 install_data('com.github.rafostar.Clapper.gschema.xml',
-  install_dir: join_paths(sharedir, 'glib-2.0', 'schemas')
+  install_dir: join_paths(datadir, 'glib-2.0', 'schemas')
 )
 install_data('com.github.rafostar.Clapper.xml',
-  install_dir: join_paths(sharedir, 'mime', 'packages')
+  install_dir: join_paths(datadir, 'mime', 'packages')
 )
 install_data('com.github.rafostar.Clapper.desktop',
-  install_dir: join_paths(sharedir, 'applications')
+  install_dir: join_paths(datadir, 'applications')
 )
 install_data('com.github.rafostar.Clapper.metainfo.xml',
-  install_dir: join_paths(sharedir, 'metainfo')
+  install_dir: join_paths(datadir, 'metainfo')
+)
+gnome.compile_resources('com.github.rafostar.Clapper.data',
+  'com.github.rafostar.Clapper.data.gresource.xml',
+  gresource_bundle: true,
+  install: true,
+  install_dir: pkgdatadir,
 )

lib/gst/clapper/clapper.h

@@ -28,6 +28,7 @@
 #include <gst/clapper/gstclapper-g-main-context-signal-dispatcher.h>
 #include <gst/clapper/gstclapper-video-overlay-video-renderer.h>
 #include <gst/clapper/gstclapper-visualization.h>
+#include <gst/clapper/gstclapper-mpris.h>
 #include <gst/clapper/gstclapper-gtk4-plugin.h>
 
 #endif /* __CLAPPER_H__ */

lib/gst/clapper/gstclapper-gtk4-plugin.c

@@ -30,7 +30,7 @@
 #endif
 
 #include "gstclapper-gtk4-plugin.h"
-#include "gtk4/gstgtkglsink.h"
+#include "gtk4/gstclapperglsink.h"
 
 enum
 {
@@ -77,9 +77,7 @@ gst_clapper_gtk4_plugin_constructed (GObject * object)
 {
   GstClapperGtk4Plugin *self = GST_CLAPPER_GTK4_PLUGIN (object);
 
-  if (!self->video_sink)
-    self->video_sink = g_object_new (GST_TYPE_GTK_GL_SINK, NULL);
-
+  self->video_sink = g_object_new (GST_TYPE_CLAPPER_GL_SINK, NULL);
   gst_object_ref_sink (self->video_sink);
 
   G_OBJECT_CLASS (parent_class)->constructed (object);
@@ -111,35 +109,15 @@ gst_clapper_gtk4_plugin_finalize (GObject * object)
   G_OBJECT_CLASS (parent_class)->finalize (object);
 }
 
-#define C_ENUM(v) ((gint) v)
-
-GType
-gst_clapper_gtk4_plugin_type_get_type (void)
-{
-  static gsize id = 0;
-  static const GEnumValue values[] = {
-    {C_ENUM (GST_CLAPPER_GTK4_PLUGIN_TYPE_GLAREA), "GST_CLAPPER_GTK4_PLUGIN_TYPE_GLAREA", "glarea"},
-    {0, NULL, NULL}
-  };
-
-  if (g_once_init_enter (&id)) {
-    GType tmp = g_enum_register_static ("GstClapperGtk4PluginType", values);
-    g_once_init_leave (&id, tmp);
-  }
-
-  return (GType) id;
-}
-
 /**
  * gst_clapper_gtk4_plugin_new:
- * @plugin_type: (allow-none): Requested GstClapperGtk4PluginType
  *
  * Creates a new GTK4 plugin.
  *
  * Returns: (transfer full): the new GstClapperGtk4Plugin
  */
 GstClapperGtk4Plugin *
-gst_clapper_gtk4_plugin_new (G_GNUC_UNUSED const GstClapperGtk4PluginType plugin_type)
+gst_clapper_gtk4_plugin_new (void)
 {
   return g_object_new (GST_TYPE_CLAPPER_GTK4_PLUGIN, NULL);
 }

lib/gst/clapper/gstclapper-gtk4-plugin.h

@@ -26,20 +26,6 @@
 
 G_BEGIN_DECLS
 
-/* PluginType */
-GST_CLAPPER_API
-GType         gst_clapper_gtk4_plugin_type_get_type     (void);
-#define       GST_TYPE_CLAPPER_GTK4_PLUGIN_TYPE         (gst_clapper_gtk4_plugin_type_get_type ())
-
-/**
- * GstClapperGtk4PluginType:
- * @GST_CLAPPER_GTK4_PLUGIN_TYPE_GLAREA: GTK4 GLArea sink.
- */
-typedef enum
-{
-  GST_CLAPPER_GTK4_PLUGIN_TYPE_GLAREA,
-} GstClapperGtk4PluginType;
-
 #define GST_TYPE_CLAPPER_GTK4_PLUGIN             (gst_clapper_gtk4_plugin_get_type ())
 #define GST_IS_CLAPPER_GTK4_PLUGIN(obj)          (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GST_TYPE_CLAPPER_GTK4_PLUGIN))
 #define GST_IS_CLAPPER_GTK4_PLUGIN_CLASS(klass)  (G_TYPE_CHECK_CLASS_TYPE ((klass), GST_TYPE_CLAPPER_GTK4_PLUGIN))
@@ -79,7 +65,7 @@ GST_CLAPPER_API
 GType gst_clapper_gtk4_plugin_get_type             (void);
 
 GST_CLAPPER_API
-GstClapperGtk4Plugin * gst_clapper_gtk4_plugin_new (const GstClapperGtk4PluginType plugin_type);
+GstClapperGtk4Plugin * gst_clapper_gtk4_plugin_new (void);
 
 G_END_DECLS
 

lib/gst/clapper/gstclapper-media-info-private.h

@@ -45,6 +45,7 @@ struct _GstClapperSubtitleInfo
 {
   GstClapperStreamInfo  parent;
 
+  gchar *title;
   gchar *language;
 };
 

lib/gst/clapper/gstclapper-media-info.c

@@ -379,6 +379,7 @@ gst_clapper_subtitle_info_finalize (GObject * object)
 {
   GstClapperSubtitleInfo *info = GST_CLAPPER_SUBTITLE_INFO (object);
 
+  g_free (info->title);
   g_free (info->language);
 
   G_OBJECT_CLASS (gst_clapper_subtitle_info_parent_class)->finalize (object);
@@ -392,6 +393,20 @@ gst_clapper_subtitle_info_class_init (GstClapperSubtitleInfoClass * klass)
   gobject_class->finalize = gst_clapper_subtitle_info_finalize;
 }
 
+/**
+ * gst_clapper_subtitle_info_get_title:
+ * @info: a #GstClapperSubtitleInfo
+ *
+ * Returns: the title of the stream, or NULL if unknown.
+ */
+const gchar *
+gst_clapper_subtitle_info_get_title (const GstClapperSubtitleInfo * info)
+{
+  g_return_val_if_fail (GST_IS_CLAPPER_SUBTITLE_INFO (info), NULL);
+
+  return info->title;
+}
+
 /**
  * gst_clapper_subtitle_info_get_language:
  * @info: a #GstClapperSubtitleInfo
@@ -513,6 +528,8 @@ gst_clapper_subtitle_info_copy (GstClapperSubtitleInfo * ref)
   GstClapperSubtitleInfo *ret;
 
   ret = gst_clapper_subtitle_info_new ();
+  if (ref->title)
+    ret->title = g_strdup (ref->title);
   if (ref->language)
     ret->language = g_strdup (ref->language);
 
@@ -767,7 +784,8 @@ gst_clapper_media_info_get_toc (const GstClapperMediaInfo * info)
  * gst_clapper_media_info_get_title:
  * @info: a #GstClapperMediaInfo
  *
- * Returns: the media title.
+ * Returns: the media title. When metadata does not contain title,
+ * returns title parsed from URI.
  */
 const gchar *
 gst_clapper_media_info_get_title (const GstClapperMediaInfo * info)

lib/gst/clapper/gstclapper-media-info.h

@@ -169,6 +169,9 @@ typedef struct _GstClapperSubtitleInfoClass GstClapperSubtitleInfoClass;
 GST_CLAPPER_API
 GType         gst_clapper_subtitle_info_get_type (void);
 
+GST_CLAPPER_API
+const gchar * gst_clapper_subtitle_info_get_title    (const GstClapperSubtitleInfo *info);
+
 GST_CLAPPER_API
 const gchar * gst_clapper_subtitle_info_get_language (const GstClapperSubtitleInfo *info);
 

lib/gst/clapper/gstclapper-mpris-private.h

@@ -0,0 +1,43 @@
+/*
+ * Copyright (C) 2021 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifndef __GST_CLAPPER_MPRIS_PRIVATE_H__
+#define __GST_CLAPPER_MPRIS_PRIVATE_H__
+
+#include <gst/clapper/gstclapper-mpris.h>
+#include <gst/clapper/gstclapper.h>
+
+G_BEGIN_DECLS
+
+G_GNUC_INTERNAL
+void gst_clapper_mpris_set_clapper                  (GstClapperMpris *self, GstClapper *clapper,
+                                                        GstClapperSignalDispatcher *signal_dispatcher);
+
+G_GNUC_INTERNAL
+void gst_clapper_mpris_set_media_info               (GstClapperMpris *self, GstClapperMediaInfo *info);
+
+G_GNUC_INTERNAL
+void gst_clapper_mpris_set_playback_status          (GstClapperMpris *self, const gchar *status);
+
+G_GNUC_INTERNAL
+void gst_clapper_mpris_set_position                 (GstClapperMpris *self, gint64 position);
+
+G_END_DECLS
+
+#endif /* __GST_CLAPPER_MPRIS_PRIVATE_H__ */

lib/gst/clapper/gstclapper-mpris.c

@@ -0,0 +1,793 @@
+/*
+ * Copyright (C) 2021 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclapper-mpris-gdbus.h"
+#include "gstclapper-mpris.h"
+#include "gstclapper-mpris-private.h"
+#include "gstclapper-signal-dispatcher-private.h"
+
+GST_DEBUG_CATEGORY_STATIC (gst_clapper_mpris_debug);
+#define GST_CAT_DEFAULT gst_clapper_mpris_debug
+
+#define MPRIS_DEFAULT_VOLUME 1.0
+
+enum
+{
+  PROP_0,
+  PROP_OWN_NAME,
+  PROP_ID_PATH,
+  PROP_IDENTITY,
+  PROP_DESKTOP_ENTRY,
+  PROP_DEFAULT_ART_URL,
+  PROP_VOLUME,
+  PROP_LAST
+};
+
+struct _GstClapperMpris
+{
+  GObject parent;
+
+  GstClapperMprisMediaPlayer2 *base_skeleton;
+  GstClapperMprisMediaPlayer2Player *player_skeleton;
+
+  GstClapperSignalDispatcher *signal_dispatcher;
+  GstClapperMediaInfo *media_info;
+
+  guint name_id;
+
+  /* Properties */
+  gchar *own_name;
+  gchar *id_path;
+  gchar *identity;
+  gchar *desktop_entry;
+  gchar *default_art_url;
+
+  gboolean parse_media_info;
+
+  /* Current status */
+  gchar *playback_status;
+  gboolean can_play;
+  guint64 position;
+
+  GThread *thread;
+  GMutex lock;
+  GCond cond;
+  GMainContext *context;
+  GMainLoop *loop;
+};
+
+struct _GstClapperMprisClass
+{
+  GObjectClass parent_class;
+};
+
+#define parent_class gst_clapper_mpris_parent_class
+G_DEFINE_TYPE (GstClapperMpris, gst_clapper_mpris, G_TYPE_OBJECT);
+
+static GParamSpec *param_specs[PROP_LAST] = { NULL, };
+
+static void gst_clapper_mpris_set_property (GObject * object, guint prop_id,
+    const GValue * value, GParamSpec * pspec);
+static void gst_clapper_mpris_get_property (GObject * object, guint prop_id,
+    GValue * value, GParamSpec * pspec);
+static void gst_clapper_mpris_dispose (GObject * object);
+static void gst_clapper_mpris_finalize (GObject * object);
+static void gst_clapper_mpris_constructed (GObject * object);
+static gpointer gst_clapper_mpris_main (gpointer data);
+
+static void unregister (GstClapperMpris * self);
+
+static void
+gst_clapper_mpris_init (GstClapperMpris * self)
+{
+  GST_DEBUG_CATEGORY_INIT (gst_clapper_mpris_debug, "ClapperMpris", 0,
+      "GstClapperMpris");
+  GST_TRACE_OBJECT (self, "Initializing");
+
+  self = gst_clapper_mpris_get_instance_private (self);
+
+  g_mutex_init (&self->lock);
+  g_cond_init (&self->cond);
+
+  self->context = g_main_context_new ();
+  self->loop = g_main_loop_new (self->context, FALSE);
+
+  self->base_skeleton = gst_clapper_mpris_media_player2_skeleton_new ();
+  self->player_skeleton = gst_clapper_mpris_media_player2_player_skeleton_new ();
+
+  self->name_id = 0;
+  self->own_name = NULL;
+  self->id_path = NULL;
+  self->identity = NULL;
+  self->desktop_entry = NULL;
+  self->default_art_url = NULL;
+
+  self->signal_dispatcher = NULL;
+  self->media_info = NULL;
+  self->parse_media_info = FALSE;
+
+  self->playback_status = g_strdup ("Stopped");
+  self->can_play = FALSE;
+  self->position = 0;
+
+  GST_TRACE_OBJECT (self, "Initialized");
+}
+
+static void
+gst_clapper_mpris_class_init (GstClapperMprisClass * klass)
+{
+  GObjectClass *gobject_class = (GObjectClass *) klass;
+
+  gobject_class->set_property = gst_clapper_mpris_set_property;
+  gobject_class->get_property = gst_clapper_mpris_get_property;
+  gobject_class->dispose = gst_clapper_mpris_dispose;
+  gobject_class->finalize = gst_clapper_mpris_finalize;
+  gobject_class->constructed = gst_clapper_mpris_constructed;
+
+  param_specs[PROP_OWN_NAME] =
+      g_param_spec_string ("own-name", "DBus own name",
+      "DBus name to own on connection",
+      NULL, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY |
+      G_PARAM_EXPLICIT_NOTIFY | G_PARAM_STATIC_STRINGS);
+
+  param_specs[PROP_ID_PATH] =
+      g_param_spec_string ("id-path", "DBus id path",
+      "A valid D-Bus path describing this player",
+      NULL, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY |
+      G_PARAM_EXPLICIT_NOTIFY | G_PARAM_STATIC_STRINGS);
+
+  param_specs[PROP_IDENTITY] =
+      g_param_spec_string ("identity", "Player name",
+      "A friendly name to identify the media player",
+      NULL, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY |
+      G_PARAM_EXPLICIT_NOTIFY | G_PARAM_STATIC_STRINGS);
+
+  param_specs[PROP_DESKTOP_ENTRY] =
+      g_param_spec_string ("desktop-entry", "Desktop entry filename",
+      "The basename of an installed .desktop file",
+      NULL, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY |
+      G_PARAM_EXPLICIT_NOTIFY | G_PARAM_STATIC_STRINGS);
+
+  param_specs[PROP_DEFAULT_ART_URL] =
+      g_param_spec_string ("default-art-url", "Default Art URL",
+      "Default art to show when media does not provide one",
+      NULL, G_PARAM_READWRITE | G_PARAM_CONSTRUCT_ONLY |
+      G_PARAM_EXPLICIT_NOTIFY | G_PARAM_STATIC_STRINGS);
+
+  param_specs[PROP_VOLUME] =
+      g_param_spec_double ("volume", "Volume", "Volume",
+      0, 1.5, MPRIS_DEFAULT_VOLUME, G_PARAM_READWRITE |
+      G_PARAM_EXPLICIT_NOTIFY | G_PARAM_STATIC_STRINGS);
+
+  g_object_class_install_properties (gobject_class, PROP_LAST, param_specs);
+}
+
+static void
+gst_clapper_mpris_set_property (GObject * object, guint prop_id,
+    const GValue * value, GParamSpec * pspec)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (object);
+
+  switch (prop_id) {
+    case PROP_OWN_NAME:
+      self->own_name = g_value_dup_string (value);
+      break;
+    case PROP_ID_PATH:
+      self->id_path = g_value_dup_string (value);
+      break;
+    case PROP_IDENTITY:
+      self->identity = g_value_dup_string (value);
+      break;
+    case PROP_DESKTOP_ENTRY:
+      self->desktop_entry = g_value_dup_string (value);
+      break;
+    case PROP_DEFAULT_ART_URL:
+      self->default_art_url = g_value_dup_string (value);
+      break;
+    case PROP_VOLUME:
+      g_object_set_property (G_OBJECT (self->player_skeleton), "volume", value);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static void
+gst_clapper_mpris_get_property (GObject * object, guint prop_id,
+    GValue * value, GParamSpec * pspec)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (object);
+
+  switch (prop_id) {
+    case PROP_OWN_NAME:
+      g_value_set_string (value, self->own_name);
+      break;
+    case PROP_ID_PATH:
+      g_value_set_string (value, self->id_path);
+      break;
+    case PROP_IDENTITY:
+      g_value_set_string (value, self->identity);
+      break;
+    case PROP_DESKTOP_ENTRY:
+      g_value_set_string (value, self->desktop_entry);
+      break;
+    case PROP_DEFAULT_ART_URL:
+      g_value_set_string (value, self->default_art_url);
+      break;
+    case PROP_VOLUME:
+      g_object_get_property (G_OBJECT (self->player_skeleton), "volume", value);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static void
+gst_clapper_mpris_dispose (GObject * object)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (object);
+
+  GST_TRACE_OBJECT (self, "Stopping main thread");
+
+  if (self->loop) {
+    g_main_loop_quit (self->loop);
+
+    if (self->thread != g_thread_self ())
+      g_thread_join (self->thread);
+    else
+      g_thread_unref (self->thread);
+    self->thread = NULL;
+
+    g_main_loop_unref (self->loop);
+    self->loop = NULL;
+
+    g_main_context_unref (self->context);
+    self->context = NULL;
+  }
+
+  G_OBJECT_CLASS (parent_class)->dispose (object);
+}
+
+static void
+gst_clapper_mpris_finalize (GObject * object)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (object);
+
+  GST_TRACE_OBJECT (self, "Finalize");
+
+  g_free (self->own_name);
+  g_free (self->id_path);
+  g_free (self->identity);
+  g_free (self->desktop_entry);
+  g_free (self->default_art_url);
+  g_free (self->playback_status);
+
+  if (self->base_skeleton)
+    g_object_unref (self->base_skeleton);
+  if (self->player_skeleton)
+    g_object_unref (self->player_skeleton);
+  if (self->signal_dispatcher)
+    g_object_unref (self->signal_dispatcher);
+  if (self->media_info)
+    g_object_unref (self->media_info);
+
+  g_mutex_clear (&self->lock);
+  g_cond_clear (&self->cond);
+
+  G_OBJECT_CLASS (parent_class)->finalize (object);
+}
+
+static void
+gst_clapper_mpris_constructed (GObject * object)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (object);
+
+  GST_TRACE_OBJECT (self, "Constructed");
+
+  g_mutex_lock (&self->lock);
+  self->thread = g_thread_new ("GstClapperMpris",
+      gst_clapper_mpris_main, self);
+  while (!self->loop || !g_main_loop_is_running (self->loop))
+    g_cond_wait (&self->cond, &self->lock);
+  g_mutex_unlock (&self->lock);
+
+  G_OBJECT_CLASS (parent_class)->constructed (object);
+}
+
+static gboolean
+main_loop_running_cb (gpointer user_data)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (user_data);
+
+  GST_TRACE_OBJECT (self, "Main loop running now");
+
+  g_mutex_lock (&self->lock);
+  g_cond_signal (&self->cond);
+  g_mutex_unlock (&self->lock);
+
+  return G_SOURCE_REMOVE;
+}
+
+static gboolean
+handle_play_cb (GstClapperMprisMediaPlayer2Player * player_skeleton,
+    GDBusMethodInvocation * invocation, gpointer user_data)
+{
+  GstClapper *clapper = GST_CLAPPER (user_data);
+
+  GST_DEBUG ("Handle Play");
+
+  gst_clapper_play (clapper);
+  gst_clapper_mpris_media_player2_player_complete_play (player_skeleton, invocation);
+
+  return TRUE;
+}
+
+static gboolean
+handle_pause_cb (GstClapperMprisMediaPlayer2Player * player_skeleton,
+    GDBusMethodInvocation * invocation, gpointer user_data)
+{
+  GstClapper *clapper = GST_CLAPPER (user_data);
+
+  GST_DEBUG ("Handle Pause");
+
+  gst_clapper_pause (clapper);
+  gst_clapper_mpris_media_player2_player_complete_pause (player_skeleton, invocation);
+
+  return TRUE;
+}
+
+static gboolean
+handle_play_pause_cb (GstClapperMprisMediaPlayer2Player * player_skeleton,
+    GDBusMethodInvocation * invocation, gpointer user_data)
+{
+  GstClapper *clapper = GST_CLAPPER (user_data);
+
+  GST_DEBUG ("Handle PlayPause");
+
+  gst_clapper_toggle_play (clapper);
+  gst_clapper_mpris_media_player2_player_complete_play_pause (player_skeleton, invocation);
+
+  return TRUE;
+}
+
+static gboolean
+handle_seek_cb (GstClapperMprisMediaPlayer2Player * player_skeleton,
+    GDBusMethodInvocation * invocation, gint64 offset, gpointer user_data)
+{
+  GstClapper *clapper = GST_CLAPPER (user_data);
+
+  GST_DEBUG ("Handle Seek");
+
+  gst_clapper_seek_offset (clapper, offset * GST_USECOND);
+  gst_clapper_mpris_media_player2_player_complete_seek (player_skeleton, invocation);
+
+  return TRUE;
+}
+
+static gboolean
+handle_set_position_cb (GstClapperMprisMediaPlayer2Player * player_skeleton,
+    GDBusMethodInvocation * invocation, const gchar * track_id,
+    gint64 position, gpointer user_data)
+{
+  GstClapper *clapper = GST_CLAPPER (user_data);
+
+  GST_DEBUG ("Handle SetPosition");
+
+  gst_clapper_seek (clapper, position * GST_USECOND);
+  gst_clapper_mpris_media_player2_player_complete_set_position (player_skeleton, invocation);
+
+  return TRUE;
+}
+
+static gboolean
+handle_open_uri_cb (GstClapperMprisMediaPlayer2Player * player_skeleton,
+    GDBusMethodInvocation * invocation, const gchar * uri,
+    gpointer user_data)
+{
+  GstClapper *clapper = GST_CLAPPER (user_data);
+
+  GST_DEBUG ("Handle OpenUri");
+
+  /* FIXME: set one item playlist instead */
+  gst_clapper_set_uri (clapper, uri);
+  gst_clapper_mpris_media_player2_player_complete_open_uri (player_skeleton, invocation);
+
+  return TRUE;
+}
+
+static void
+volume_notify_dispatch (gpointer user_data)
+{
+  GstClapperMpris *self = user_data;
+
+  g_object_notify_by_pspec (G_OBJECT (self), param_specs[PROP_VOLUME]);
+}
+
+static void
+handle_volume_notify_cb (G_GNUC_UNUSED GObject * obj,
+    G_GNUC_UNUSED GParamSpec * pspec, GstClapperMpris * self)
+{
+  gst_clapper_signal_dispatcher_dispatch (self->signal_dispatcher, NULL,
+      volume_notify_dispatch, g_object_ref (self),
+      (GDestroyNotify) g_object_unref);
+}
+
+static void
+unregister (GstClapperMpris * self)
+{
+  if (!self->name_id)
+    return;
+
+  GST_DEBUG_OBJECT (self, "Unregister");
+  g_dbus_interface_skeleton_unexport (G_DBUS_INTERFACE_SKELETON (self->base_skeleton));
+  g_dbus_interface_skeleton_unexport (G_DBUS_INTERFACE_SKELETON (self->player_skeleton));
+  g_bus_unown_name (self->name_id);
+  self->name_id = 0;
+}
+
+static const gchar *
+_get_mpris_trackid (GstClapperMpris * self)
+{
+  /* TODO: Support more tracks */
+  return g_strdup_printf ("%s%s%i", self->id_path, "/Track/", 0);
+}
+
+static void
+_set_supported_uri_schemes (GstClapperMpris * self)
+{
+  const gchar *uri_schemes[96] = {};
+  GList *elements, *el;
+  guint index = 0;
+
+  elements = gst_element_factory_list_get_elements (
+      GST_ELEMENT_FACTORY_TYPE_SRC, GST_RANK_NONE);
+
+  for (el = elements; el != NULL; el = el->next) {
+    const gchar *const *protocols;
+    GstElementFactory *factory = GST_ELEMENT_FACTORY (el->data);
+
+    if (gst_element_factory_get_uri_type (factory) != GST_URI_SRC)
+      continue;
+
+    protocols = gst_element_factory_get_uri_protocols (factory);
+    if (protocols == NULL || *protocols == NULL)
+      continue;
+
+    while (*protocols != NULL) {
+      guint j = index;
+
+      while (j--) {
+        if (strcmp (uri_schemes[j], *protocols) == 0)
+          goto next;
+      }
+      uri_schemes[index] = *protocols;
+      GST_DEBUG_OBJECT (self, "Added supported URI scheme: %s", *protocols);
+      ++index;
+next:
+      ++protocols;
+    }
+  }
+  gst_plugin_feature_list_free (elements);
+
+  gst_clapper_mpris_media_player2_set_supported_uri_schemes (
+      self->base_skeleton, uri_schemes);
+}
+
+static void
+name_acquired_cb (GDBusConnection * connection,
+    const gchar *name, gpointer user_data)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (user_data);
+  GVariantBuilder builder;
+
+  g_dbus_interface_skeleton_export (G_DBUS_INTERFACE_SKELETON (self->base_skeleton),
+      connection, "/org/mpris/MediaPlayer2", NULL);
+  g_dbus_interface_skeleton_export (G_DBUS_INTERFACE_SKELETON (self->player_skeleton),
+      connection, "/org/mpris/MediaPlayer2", NULL);
+
+  if (self->identity)
+    gst_clapper_mpris_media_player2_set_identity (self->base_skeleton, self->identity);
+  if (self->desktop_entry)
+    gst_clapper_mpris_media_player2_set_desktop_entry (self->base_skeleton, self->desktop_entry);
+
+  _set_supported_uri_schemes (self);
+
+  gst_clapper_mpris_media_player2_player_set_playback_status (self->player_skeleton, "Stopped");
+  gst_clapper_mpris_media_player2_player_set_minimum_rate (self->player_skeleton, 0.01);
+  gst_clapper_mpris_media_player2_player_set_maximum_rate (self->player_skeleton, 2.0);
+  gst_clapper_mpris_media_player2_player_set_can_seek (self->player_skeleton, TRUE);
+  gst_clapper_mpris_media_player2_player_set_can_control (self->player_skeleton, TRUE);
+
+  g_object_bind_property (self->player_skeleton, "can-play",
+      self->player_skeleton, "can-pause", G_BINDING_DEFAULT);
+
+  g_variant_builder_init (&builder, G_VARIANT_TYPE_ARRAY);
+  g_variant_builder_add (&builder, "{sv}", "mpris:trackid", g_variant_new_string (_get_mpris_trackid (self)));
+  g_variant_builder_add (&builder, "{sv}", "mpris:length", g_variant_new_uint64 (0));
+  if (self->default_art_url)
+    g_variant_builder_add (&builder, "{sv}", "mpris:artUrl", g_variant_new_string (self->default_art_url));
+  gst_clapper_mpris_media_player2_player_set_metadata (self->player_skeleton, g_variant_builder_end (&builder));
+
+  GST_DEBUG_OBJECT (self, "Ready");
+}
+
+static void
+name_lost_cb (GDBusConnection * connection,
+    const gchar * name, gpointer user_data)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (user_data);
+
+  unregister (self);
+}
+
+static gboolean
+mpris_update_props_dispatch (gpointer user_data)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (user_data);
+
+  GST_DEBUG_OBJECT (self, "Updating MPRIS props");
+  g_mutex_lock (&self->lock);
+
+  if (self->parse_media_info) {
+    GVariantBuilder builder;
+    guint64 duration;
+    const gchar *track_id, *uri, *title;
+
+    GST_DEBUG_OBJECT (self, "Parsing media info");
+    g_variant_builder_init (&builder, G_VARIANT_TYPE_ARRAY);
+
+    track_id = _get_mpris_trackid (self);
+    uri = gst_clapper_media_info_get_uri (self->media_info);
+    title = gst_clapper_media_info_get_title (self->media_info);
+
+    if (track_id) {
+      g_variant_builder_add (&builder, "{sv}", "mpris:trackid",
+          g_variant_new_string (track_id));
+      GST_DEBUG_OBJECT (self, "mpris:trackid: %s", track_id);
+    }
+    if (uri) {
+      g_variant_builder_add (&builder, "{sv}", "xesam:url",
+          g_variant_new_string (uri));
+      GST_DEBUG_OBJECT (self, "xesam:url: %s", uri);
+    }
+    if (title) {
+      g_variant_builder_add (&builder, "{sv}", "xesam:title",
+          g_variant_new_string (title));
+      GST_DEBUG_OBJECT (self, "xesam:title: %s", title);
+    }
+
+    duration = gst_clapper_media_info_get_duration (self->media_info);
+    duration = (duration != GST_CLOCK_TIME_NONE) ? duration / GST_USECOND : 0;
+    g_variant_builder_add (&builder, "{sv}", "mpris:length", g_variant_new_uint64 (duration));
+    GST_DEBUG_OBJECT (self, "mpris:length: %ld", duration);
+
+    /* TODO: Check for image sample */
+    if (self->default_art_url) {
+      g_variant_builder_add (&builder, "{sv}", "mpris:artUrl", g_variant_new_string (self->default_art_url));
+      GST_DEBUG_OBJECT (self, "mpris:artUrl: %s", self->default_art_url);
+    }
+
+    GST_DEBUG_OBJECT (self, "Media info parsed");
+    self->parse_media_info = FALSE;
+
+    gst_clapper_mpris_media_player2_player_set_metadata (
+        self->player_skeleton, g_variant_builder_end (&builder));
+  }
+  if (gst_clapper_mpris_media_player2_player_get_can_play (
+          self->player_skeleton) != self->can_play) {
+    /* "can-play" is bound with "can-pause" */
+    gst_clapper_mpris_media_player2_player_set_can_play (
+        self->player_skeleton, self->can_play);
+    GST_DEBUG_OBJECT (self, "CanPlay/CanPause: %s", self->can_play ? "yes" : "no");
+  }
+  if (strcmp (gst_clapper_mpris_media_player2_player_get_playback_status (
+          self->player_skeleton), self->playback_status) != 0) {
+    gst_clapper_mpris_media_player2_player_set_playback_status (
+        self->player_skeleton, self->playback_status);
+    GST_DEBUG_OBJECT (self, "PlaybackStatus: %s", self->playback_status);
+  }
+  if (gst_clapper_mpris_media_player2_player_get_position (
+          self->player_skeleton) != self->position) {
+    gst_clapper_mpris_media_player2_player_set_position (
+        self->player_skeleton, self->position);
+    GST_DEBUG_OBJECT (self, "Position: %ld", self->position);
+  }
+
+  g_mutex_unlock (&self->lock);
+  GST_DEBUG_OBJECT (self, "MPRIS props updated");
+
+  return G_SOURCE_REMOVE;
+}
+
+static void
+mpris_dispatcher_update_dispatch (GstClapperMpris * self)
+{
+  if (!self->name_id)
+    return;
+
+  GST_DEBUG_OBJECT (self, "Queued update props dispatch");
+
+  g_main_context_invoke_full (self->context,
+      G_PRIORITY_DEFAULT, mpris_update_props_dispatch,
+      g_object_ref (self), g_object_unref);
+}
+
+static gpointer
+gst_clapper_mpris_main (gpointer data)
+{
+  GstClapperMpris *self = GST_CLAPPER_MPRIS (data);
+
+  GDBusConnectionFlags flags;
+  GDBusConnection *connection;
+  GSource *source;
+  gchar *address;
+
+  GST_TRACE_OBJECT (self, "Starting main thread");
+
+  g_main_context_push_thread_default (self->context);
+
+  source = g_idle_source_new ();
+  g_source_set_callback (source, (GSourceFunc) main_loop_running_cb, self,
+      NULL);
+  g_source_attach (source, self->context);
+  g_source_unref (source);
+
+  address = g_dbus_address_get_for_bus_sync (G_BUS_TYPE_SESSION, NULL, NULL);
+  if (!address) {
+    GST_WARNING_OBJECT (self, "No MPRIS bus address");
+    goto no_mpris;
+  }
+
+  GST_DEBUG_OBJECT (self, "Obtained MPRIS DBus address");
+
+  flags = G_DBUS_CONNECTION_FLAGS_AUTHENTICATION_CLIENT |
+      G_DBUS_CONNECTION_FLAGS_MESSAGE_BUS_CONNECTION;
+  connection = g_dbus_connection_new_for_address_sync (address,
+      flags, NULL, NULL, NULL);
+  g_free (address);
+
+  if (!connection) {
+    GST_WARNING_OBJECT (self, "No MPRIS bus connection");
+    goto no_mpris;
+  }
+
+  GST_DEBUG_OBJECT (self, "Obtained MPRIS DBus connection");
+
+  self->name_id = g_bus_own_name_on_connection (connection, self->own_name,
+      G_BUS_NAME_OWNER_FLAGS_NONE,
+      (GBusNameAcquiredCallback) name_acquired_cb,
+      (GBusNameLostCallback) name_lost_cb,
+      self, NULL);
+  g_object_unref (connection);
+  goto done;
+
+no_mpris:
+  g_warning ("GstClapperMpris: failed to create DBus connection");
+
+done:
+  GST_TRACE_OBJECT (self, "Starting main loop");
+  g_main_loop_run (self->loop);
+  GST_TRACE_OBJECT (self, "Stopped main loop");
+
+  unregister (self);
+  g_main_context_pop_thread_default (self->context);
+
+  GST_TRACE_OBJECT (self, "Stopped main thread");
+
+  return NULL;
+}
+
+void
+gst_clapper_mpris_set_clapper (GstClapperMpris * self, GstClapper * clapper,
+    GstClapperSignalDispatcher * signal_dispatcher)
+{
+  if (signal_dispatcher)
+    self->signal_dispatcher = g_object_ref (signal_dispatcher);
+
+  g_signal_connect (self->player_skeleton, "handle-play",
+      G_CALLBACK (handle_play_cb), clapper);
+  g_signal_connect (self->player_skeleton, "handle-pause",
+      G_CALLBACK (handle_pause_cb), clapper);
+  g_signal_connect (self->player_skeleton, "handle-play-pause",
+      G_CALLBACK (handle_play_pause_cb), clapper);
+  g_signal_connect (self->player_skeleton, "handle-seek",
+      G_CALLBACK (handle_seek_cb), clapper);
+  g_signal_connect (self->player_skeleton, "handle-set-position",
+      G_CALLBACK (handle_set_position_cb), clapper);
+  g_signal_connect (self->player_skeleton, "handle-open-uri",
+      G_CALLBACK (handle_open_uri_cb), clapper);
+
+  g_object_bind_property (clapper, "volume", self, "volume", G_BINDING_BIDIRECTIONAL);
+  g_signal_connect (self->player_skeleton, "notify::volume",
+      G_CALLBACK (handle_volume_notify_cb), self);
+}
+
+void
+gst_clapper_mpris_set_playback_status (GstClapperMpris * self, const gchar * status)
+{
+  g_mutex_lock (&self->lock);
+  if (strcmp (self->playback_status, status) == 0) {
+    g_mutex_unlock (&self->lock);
+    return;
+  }
+  g_free (self->playback_status);
+  self->playback_status = g_strdup (status);
+  self->can_play = strcmp (status, "Stopped") != 0;
+  g_mutex_unlock (&self->lock);
+
+  mpris_dispatcher_update_dispatch (self);
+}
+
+void
+gst_clapper_mpris_set_position (GstClapperMpris * self, gint64 position)
+{
+  position /= GST_USECOND;
+
+  g_mutex_lock (&self->lock);
+  if (self->position == position) {
+    g_mutex_unlock (&self->lock);
+    return;
+  }
+  self->position = position;
+  g_mutex_unlock (&self->lock);
+
+  mpris_dispatcher_update_dispatch (self);
+}
+
+void
+gst_clapper_mpris_set_media_info (GstClapperMpris *self, GstClapperMediaInfo *info)
+{
+  g_mutex_lock (&self->lock);
+  if (self->media_info)
+    g_object_unref (self->media_info);
+  self->media_info = info;
+  self->parse_media_info = TRUE;
+  g_mutex_unlock (&self->lock);
+
+  mpris_dispatcher_update_dispatch (self);
+}
+
+/**
+ * gst_clapper_mpris_new:
+ * @own_name: DBus own name
+ * @id_path: DBus id path used for prefix
+ * @identity: (allow-none): friendly name
+ * @desktop_entry: (allow-none): Desktop entry filename
+ * @default_art_url: (allow-none): filepath to default art
+ *
+ * Creates a new #GstClapperMpris instance.
+ *
+ * Returns: (transfer full): a new #GstClapperMpris instance
+ */
+GstClapperMpris *
+gst_clapper_mpris_new (const gchar * own_name, const gchar * id_path,
+    const gchar * identity, const gchar * desktop_entry,
+    const gchar * default_art_url)
+{
+  return g_object_new (GST_TYPE_CLAPPER_MPRIS,
+      "own-name", own_name, "id_path", id_path,
+      "identity", identity, "desktop-entry", desktop_entry,
+      "default-art-url", default_art_url, NULL);
+}

lib/gst/clapper/gstclapper-mpris.h

@@ -0,0 +1,54 @@
+/*
+ * Copyright (C) 2021 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifndef __GST_CLAPPER_MPRIS_H__
+#define __GST_CLAPPER_MPRIS_H__
+
+#include <glib.h>
+#include <gio/gio.h>
+
+#include <gst/clapper/clapper-prelude.h>
+
+G_BEGIN_DECLS
+
+typedef struct _GstClapperMpris GstClapperMpris;
+typedef struct _GstClapperMprisClass GstClapperMprisClass;
+
+#define GST_TYPE_CLAPPER_MPRIS             (gst_clapper_mpris_get_type ())
+#define GST_IS_CLAPPER_MPRIS(obj)          (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GST_TYPE_CLAPPER_MPRIS))
+#define GST_IS_CLAPPER_MPRIS_CLASS(klass)  (G_TYPE_CHECK_CLASS_TYPE ((klass), GST_TYPE_CLAPPER_MPRIS))
+#define GST_CLAPPER_MPRIS_GET_CLASS(obj)   (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_CLAPPER_MPRIS, GstClapperMprisClass))
+#define GST_CLAPPER_MPRIS(obj)             (G_TYPE_CHECK_INSTANCE_CAST ((obj), GST_TYPE_CLAPPER_MPRIS, GstClapperMpris))
+#define GST_CLAPPER_MPRIS_CLASS(klass)     (G_TYPE_CHECK_CLASS_CAST ((klass), GST_TYPE_CLAPPER_MPRIS, GstClapperMprisClass))
+#define GST_CLAPPER_MPRIS_CAST(obj)        ((GstClapperMpris*)(obj))
+
+#ifdef G_DEFINE_AUTOPTR_CLEANUP_FUNC
+G_DEFINE_AUTOPTR_CLEANUP_FUNC(GstClapperMpris, g_object_unref)
+#endif
+
+GST_CLAPPER_API
+GType gst_clapper_mpris_get_type                      (void);
+
+GST_CLAPPER_API
+GstClapperMpris * gst_clapper_mpris_new               (const gchar *own_name, const gchar *id_path, const gchar *identity,
+                                                          const gchar *desktop_entry, const gchar *default_art_url);
+
+G_END_DECLS
+
+#endif /* __GST_CLAPPER_MPRIS_H__ */

lib/gst/clapper/gstclapper.h

@@ -30,6 +30,7 @@
 #include <gst/clapper/gstclapper-signal-dispatcher.h>
 #include <gst/clapper/gstclapper-video-renderer.h>
 #include <gst/clapper/gstclapper-media-info.h>
+#include <gst/clapper/gstclapper-mpris.h>
 
 G_BEGIN_DECLS
 
@@ -153,7 +154,11 @@ GST_CLAPPER_API
 GType        gst_clapper_get_type                           (void);
 
 GST_CLAPPER_API
-GstClapper * gst_clapper_new                                (GstClapperVideoRenderer *video_renderer, GstClapperSignalDispatcher *signal_dispatcher);
+void         gst_clapper_gst_init                           (int *argc, char **argv[]);
+
+GST_CLAPPER_API
+GstClapper * gst_clapper_new                                (GstClapperVideoRenderer *video_renderer, GstClapperSignalDispatcher *signal_dispatcher,
+                                                                GstClapperMpris *mpris);
 
 GST_CLAPPER_API
 void         gst_clapper_play                               (GstClapper *clapper);
@@ -161,12 +166,22 @@ void         gst_clapper_play                               (GstClapper *clapper
 GST_CLAPPER_API
 void         gst_clapper_pause                              (GstClapper *clapper);
 
+GST_CLAPPER_API
+void         gst_clapper_toggle_play                        (GstClapper *clapper);
+
 GST_CLAPPER_API
 void         gst_clapper_stop                               (GstClapper *clapper);
 
 GST_CLAPPER_API
 void         gst_clapper_seek                               (GstClapper *clapper, GstClockTime position);
 
+GST_CLAPPER_API
+void         gst_clapper_seek_offset                        (GstClapper *clapper, GstClockTime offset);
+
+GST_CLAPPER_API
+GstClapperState
+             gst_clapper_get_state                          (GstClapper *clapper);
+
 GST_CLAPPER_API
 GstClapperSeekMode
              gst_clapper_get_seek_mode                      (GstClapper *clapper);
@@ -213,6 +228,10 @@ void         gst_clapper_set_mute                           (GstClapper *clapper
 GST_CLAPPER_API
 GstElement * gst_clapper_get_pipeline                       (GstClapper *clapper);
 
+GST_CLAPPER_API
+GstClapperMpris *
+             gst_clapper_get_mpris                          (GstClapper *clapper);
+
 GST_CLAPPER_API
 void         gst_clapper_set_video_track_enabled            (GstClapper *clapper, gboolean enabled);
 

lib/gst/clapper/gtk4/gstclapperglsink.c

@@ -0,0 +1,759 @@
+/*
+ * GStreamer
+ * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+/**
+ * SECTION:gstclapperglsink
+ * @title: GstClapperGLSink
+ *
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <gst/gl/gstglfuncs.h>
+
+#include "gstclapperglsink.h"
+#include "gstgtkutils.h"
+
+GST_DEBUG_CATEGORY (gst_debug_clapper_gl_sink);
+#define GST_CAT_DEFAULT gst_debug_clapper_gl_sink
+
+#define GST_CLAPPER_GL_SINK_CAPS \
+    "video/x-raw(" GST_CAPS_FEATURE_MEMORY_GL_MEMORY "), "              \
+    "format = (string) RGBA, "                                          \
+    "width = " GST_VIDEO_SIZE_RANGE ", "                                \
+    "height = " GST_VIDEO_SIZE_RANGE ", "                               \
+    "framerate = " GST_VIDEO_FPS_RANGE ", "                             \
+    "texture-target = (string) { 2D, external-oes } "                   \
+    " ; "                                                               \
+    "video/x-raw(" GST_CAPS_FEATURE_MEMORY_GL_MEMORY ","                \
+    GST_CAPS_FEATURE_META_GST_VIDEO_OVERLAY_COMPOSITION "), "           \
+    "format = (string) RGBA, "                                          \
+    "width = " GST_VIDEO_SIZE_RANGE ", "                                \
+    "height = " GST_VIDEO_SIZE_RANGE ", "                               \
+    "framerate = " GST_VIDEO_FPS_RANGE ", "                             \
+    "texture-target = (string) { 2D, external-oes } "
+
+static GstStaticPadTemplate gst_clapper_gl_sink_template =
+    GST_STATIC_PAD_TEMPLATE ("sink",
+    GST_PAD_SINK,
+    GST_PAD_ALWAYS,
+    GST_STATIC_CAPS (GST_CLAPPER_GL_SINK_CAPS));
+
+static void gst_clapper_gl_sink_finalize (GObject * object);
+static void gst_clapper_gl_sink_set_property (GObject * object, guint prop_id,
+    const GValue * value, GParamSpec * param_spec);
+static void gst_clapper_gl_sink_get_property (GObject * object, guint prop_id,
+    GValue * value, GParamSpec * param_spec);
+
+static gboolean gst_clapper_gl_sink_propose_allocation (GstBaseSink * bsink,
+    GstQuery * query);
+static gboolean gst_clapper_gl_sink_query (GstBaseSink * bsink, GstQuery * query);
+static gboolean gst_clapper_gl_sink_start (GstBaseSink * bsink);
+static gboolean gst_clapper_gl_sink_stop (GstBaseSink * bsink);
+static GstFlowReturn gst_clapper_gl_sink_wait_event (GstBaseSink * bsink, GstEvent * event);
+
+static GstStateChangeReturn
+gst_clapper_gl_sink_change_state (GstElement * element,
+    GstStateChange transition);
+
+static void gst_clapper_gl_sink_get_times (GstBaseSink * bsink, GstBuffer * buf,
+    GstClockTime * start, GstClockTime * end);
+static GstCaps *gst_clapper_gl_sink_get_caps (GstBaseSink * bsink,
+    GstCaps * filter);
+static gboolean gst_clapper_gl_sink_set_caps (GstBaseSink * bsink,
+    GstCaps * caps);
+static GstFlowReturn gst_clapper_gl_sink_show_frame (GstVideoSink * bsink,
+    GstBuffer * buf);
+
+static void
+gst_clapper_gl_sink_navigation_interface_init (GstNavigationInterface * iface);
+
+#define gst_clapper_gl_sink_parent_class parent_class
+G_DEFINE_TYPE_WITH_CODE (GstClapperGLSink, gst_clapper_gl_sink,
+    GST_TYPE_VIDEO_SINK,
+    G_IMPLEMENT_INTERFACE (GST_TYPE_NAVIGATION,
+        gst_clapper_gl_sink_navigation_interface_init);
+    GST_DEBUG_CATEGORY_INIT (gst_debug_clapper_gl_sink,
+        "clapperglsink", 0, "Clapper GL Sink"));
+
+static void
+gst_clapper_gl_sink_class_init (GstClapperGLSinkClass * klass)
+{
+  GObjectClass *gobject_class;
+  GstElementClass *gstelement_class;
+  GstBaseSinkClass *gstbasesink_class;
+  GstVideoSinkClass *gstvideosink_class;
+  GstClapperGLSinkClass *gstclapperglsink_class;
+
+  gobject_class = (GObjectClass *) klass;
+  gstelement_class = (GstElementClass *) klass;
+  gstbasesink_class = (GstBaseSinkClass *) klass;
+  gstvideosink_class = (GstVideoSinkClass *) klass;
+  gstclapperglsink_class = (GstClapperGLSinkClass *) klass;
+
+  gobject_class->set_property = gst_clapper_gl_sink_set_property;
+  gobject_class->get_property = gst_clapper_gl_sink_get_property;
+  gobject_class->finalize = gst_clapper_gl_sink_finalize;
+
+  g_object_class_install_property (gobject_class, PROP_WIDGET,
+      g_param_spec_object ("widget", "GTK Widget",
+          "The GtkWidget to place in the widget hierarchy "
+          "(must only be get from the GTK main thread)",
+          GTK_TYPE_WIDGET, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
+
+  gst_gtk_install_shared_properties (gobject_class);
+
+  gstelement_class->change_state = gst_clapper_gl_sink_change_state;
+
+  gstbasesink_class->get_caps = gst_clapper_gl_sink_get_caps;
+  gstbasesink_class->set_caps = gst_clapper_gl_sink_set_caps;
+  gstbasesink_class->get_times = gst_clapper_gl_sink_get_times;
+  gstbasesink_class->propose_allocation = gst_clapper_gl_sink_propose_allocation;
+  gstbasesink_class->query = gst_clapper_gl_sink_query;
+  gstbasesink_class->start = gst_clapper_gl_sink_start;
+  gstbasesink_class->stop = gst_clapper_gl_sink_stop;
+  gstbasesink_class->wait_event = gst_clapper_gl_sink_wait_event;
+
+  gstvideosink_class->show_frame = gst_clapper_gl_sink_show_frame;
+
+  gstclapperglsink_class->create_widget = gtk_clapper_gl_widget_new;
+  gstclapperglsink_class->window_title = "GTK4 GL Renderer";
+
+  gst_element_class_set_metadata (gstelement_class,
+      "GTK4 GL Video Sink",
+      "Sink/Video", "A video sink that renders to a GtkWidget using OpenGL",
+      "Matthew Waters <matthew@centricular.com>, "
+      "Rafał Dzięgiel <rafostar.github@gmail.com>");
+
+  gst_element_class_add_static_pad_template (gstelement_class,
+      &gst_clapper_gl_sink_template);
+
+  gst_type_mark_as_plugin_api (GST_TYPE_CLAPPER_GL_SINK, 0);
+}
+
+static void
+gst_clapper_gl_sink_init (GstClapperGLSink * clapper_sink)
+{
+  clapper_sink->force_aspect_ratio = DEFAULT_FORCE_ASPECT_RATIO;
+  clapper_sink->par_n = DEFAULT_PAR_N;
+  clapper_sink->par_d = DEFAULT_PAR_D;
+  clapper_sink->keep_last_frame = DEFAULT_KEEP_LAST_FRAME;
+
+  clapper_sink->had_eos = FALSE;
+}
+
+static void
+gst_clapper_gl_sink_finalize (GObject * object)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (object);
+
+  GST_DEBUG ("Finalizing Clapper GL sink");
+
+  GST_OBJECT_LOCK (clapper_sink);
+  if (clapper_sink->window && clapper_sink->window_destroy_id)
+    g_signal_handler_disconnect (clapper_sink->window, clapper_sink->window_destroy_id);
+  if (clapper_sink->widget && clapper_sink->widget_destroy_id)
+    g_signal_handler_disconnect (clapper_sink->widget, clapper_sink->widget_destroy_id);
+
+  g_clear_object (&clapper_sink->widget);
+  GST_OBJECT_UNLOCK (clapper_sink);
+
+  G_OBJECT_CLASS (parent_class)->finalize (object);
+}
+
+static void
+widget_destroy_cb (GtkWidget * widget, GstClapperGLSink * clapper_sink)
+{
+  GST_OBJECT_LOCK (clapper_sink);
+  g_clear_object (&clapper_sink->widget);
+  GST_OBJECT_UNLOCK (clapper_sink);
+}
+
+static void
+window_destroy_cb (GtkWidget * widget, GstClapperGLSink * clapper_sink)
+{
+  GST_OBJECT_LOCK (clapper_sink);
+  if (clapper_sink->widget) {
+    if (clapper_sink->widget_destroy_id) {
+      g_signal_handler_disconnect (clapper_sink->widget,
+          clapper_sink->widget_destroy_id);
+      clapper_sink->widget_destroy_id = 0;
+    }
+    g_clear_object (&clapper_sink->widget);
+  }
+  clapper_sink->window = NULL;
+  GST_OBJECT_UNLOCK (clapper_sink);
+}
+
+static GtkClapperGLWidget *
+gst_clapper_gl_sink_get_widget (GstClapperGLSink * clapper_sink)
+{
+  if (clapper_sink->widget != NULL)
+    return clapper_sink->widget;
+
+  /* Ensure GTK is initialized, this has no side effect if it was already
+   * initialized. Also, we do that lazily, so the application can be first */
+  if (!gtk_init_check ()) {
+    GST_ERROR_OBJECT (clapper_sink, "Could not ensure GTK initialization.");
+    return NULL;
+  }
+
+  g_assert (GST_CLAPPER_GL_SINK_GET_CLASS (clapper_sink)->create_widget);
+  clapper_sink->widget = (GtkClapperGLWidget *)
+      GST_CLAPPER_GL_SINK_GET_CLASS (clapper_sink)->create_widget ();
+
+  g_object_bind_property (clapper_sink, "force-aspect-ratio", clapper_sink->widget,
+      "force-aspect-ratio", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
+  g_object_bind_property (clapper_sink, "pixel-aspect-ratio", clapper_sink->widget,
+      "pixel-aspect-ratio", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
+  g_object_bind_property (clapper_sink, "keep-last-frame", clapper_sink->widget,
+      "keep-last-frame", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
+
+  /* Take the floating ref, other wise the destruction of the container will
+   * make this widget disappear possibly before we are done. */
+  gst_object_ref_sink (clapper_sink->widget);
+
+  clapper_sink->widget_destroy_id = g_signal_connect (clapper_sink->widget, "destroy",
+      G_CALLBACK (widget_destroy_cb), clapper_sink);
+
+  /* back pointer */
+  gtk_clapper_gl_widget_set_element (GTK_CLAPPER_GL_WIDGET (clapper_sink->widget),
+      GST_ELEMENT (clapper_sink));
+
+  return clapper_sink->widget;
+}
+
+static void
+gst_clapper_gl_sink_get_property (GObject * object, guint prop_id,
+    GValue * value, GParamSpec * pspec)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (object);
+
+  switch (prop_id) {
+    case PROP_WIDGET:
+    {
+      GObject *widget = NULL;
+
+      GST_OBJECT_LOCK (clapper_sink);
+      if (clapper_sink->widget != NULL)
+        widget = G_OBJECT (clapper_sink->widget);
+      GST_OBJECT_UNLOCK (clapper_sink);
+
+      if (!widget)
+        widget =
+            gst_gtk_invoke_on_main ((GThreadFunc) gst_clapper_gl_sink_get_widget,
+            clapper_sink);
+
+      g_value_set_object (value, widget);
+      break;
+    }
+    case PROP_FORCE_ASPECT_RATIO:
+      g_value_set_boolean (value, clapper_sink->force_aspect_ratio);
+      break;
+    case PROP_PIXEL_ASPECT_RATIO:
+      gst_value_set_fraction (value, clapper_sink->par_n, clapper_sink->par_d);
+      break;
+    case PROP_KEEP_LAST_FRAME:
+      g_value_set_boolean (value, clapper_sink->keep_last_frame);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static void
+gst_clapper_gl_sink_set_property (GObject * object, guint prop_id,
+    const GValue * value, GParamSpec * pspec)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (object);
+
+  switch (prop_id) {
+    case PROP_FORCE_ASPECT_RATIO:
+      clapper_sink->force_aspect_ratio = g_value_get_boolean (value);
+      break;
+    case PROP_PIXEL_ASPECT_RATIO:
+      clapper_sink->par_n = gst_value_get_fraction_numerator (value);
+      clapper_sink->par_d = gst_value_get_fraction_denominator (value);
+      break;
+    case PROP_KEEP_LAST_FRAME:
+      clapper_sink->keep_last_frame = g_value_get_boolean (value);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+}
+
+static void
+gst_clapper_gl_sink_navigation_send_event (GstNavigation * navigation,
+    GstStructure * structure)
+{
+  GstClapperGLSink *sink = GST_CLAPPER_GL_SINK (navigation);
+  GstEvent *event;
+  GstPad *pad;
+
+  event = gst_event_new_navigation (structure);
+  pad = gst_pad_get_peer (GST_VIDEO_SINK_PAD (sink));
+
+  GST_TRACE_OBJECT (sink, "navigation event %" GST_PTR_FORMAT, structure);
+
+  if (GST_IS_PAD (pad) && GST_IS_EVENT (event)) {
+    if (!gst_pad_send_event (pad, gst_event_ref (event))) {
+      /* If upstream didn't handle the event we'll post a message with it
+       * for the application in case it wants to do something with it */
+      gst_element_post_message (GST_ELEMENT_CAST (sink),
+          gst_navigation_message_new_event (GST_OBJECT_CAST (sink), event));
+    }
+    gst_event_unref (event);
+    gst_object_unref (pad);
+  }
+}
+
+static void
+gst_clapper_gl_sink_navigation_interface_init (GstNavigationInterface * iface)
+{
+  iface->send_event = gst_clapper_gl_sink_navigation_send_event;
+}
+
+static gboolean
+gst_clapper_gl_sink_propose_allocation (GstBaseSink * bsink, GstQuery * query)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+  GstBufferPool *pool = NULL;
+  GstStructure *config;
+  GstCaps *caps;
+  GstVideoInfo info;
+  guint size;
+  gboolean need_pool;
+  GstStructure *allocation_meta = NULL;
+  gint display_width, display_height;
+
+  if (!clapper_sink->display || !clapper_sink->context)
+    return FALSE;
+
+  gst_query_parse_allocation (query, &caps, &need_pool);
+
+  if (caps == NULL)
+    goto no_caps;
+
+  if (!gst_video_info_from_caps (&info, caps))
+    goto invalid_caps;
+
+  /* the normal size of a frame */
+  size = info.size;
+
+  if (need_pool) {
+    GST_DEBUG_OBJECT (clapper_sink, "create new pool");
+    pool = gst_gl_buffer_pool_new (clapper_sink->context);
+
+    config = gst_buffer_pool_get_config (pool);
+    gst_buffer_pool_config_set_params (config, caps, size, 0, 0);
+    gst_buffer_pool_config_add_option (config,
+        GST_BUFFER_POOL_OPTION_GL_SYNC_META);
+
+    if (!gst_buffer_pool_set_config (pool, config)) {
+      gst_object_unref (pool);
+      goto config_failed;
+    }
+  }
+
+  /* we need at least 2 buffer because we hold on to the last one */
+  gst_query_add_allocation_pool (query, pool, size, 2, 0);
+  if (pool)
+    gst_object_unref (pool);
+
+  GST_OBJECT_LOCK (clapper_sink);
+  display_width = clapper_sink->display_width;
+  display_height = clapper_sink->display_height;
+  GST_OBJECT_UNLOCK (clapper_sink);
+
+  if (display_width != 0 && display_height != 0) {
+    GST_DEBUG_OBJECT (clapper_sink, "sending alloc query with size %dx%d",
+        display_width, display_height);
+    allocation_meta = gst_structure_new ("GstVideoOverlayCompositionMeta",
+        "width", G_TYPE_UINT, display_width,
+        "height", G_TYPE_UINT, display_height, NULL);
+  }
+
+  gst_query_add_allocation_meta (query,
+      GST_VIDEO_OVERLAY_COMPOSITION_META_API_TYPE, allocation_meta);
+
+  if (allocation_meta)
+    gst_structure_free (allocation_meta);
+
+  /* we also support various metadata */
+  gst_query_add_allocation_meta (query, GST_VIDEO_META_API_TYPE, 0);
+
+  if (clapper_sink->context->gl_vtable->FenceSync)
+    gst_query_add_allocation_meta (query, GST_GL_SYNC_META_API_TYPE, 0);
+
+  return TRUE;
+
+  /* ERRORS */
+no_caps:
+  {
+    GST_DEBUG_OBJECT (bsink, "no caps specified");
+    return FALSE;
+  }
+invalid_caps:
+  {
+    GST_DEBUG_OBJECT (bsink, "invalid caps specified");
+    return FALSE;
+  }
+config_failed:
+  {
+    GST_DEBUG_OBJECT (bsink, "failed setting config");
+    return FALSE;
+  }
+}
+
+static gboolean
+gst_clapper_gl_sink_query (GstBaseSink * bsink, GstQuery * query)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+  gboolean res = FALSE;
+
+  switch (GST_QUERY_TYPE (query)) {
+    case GST_QUERY_CONTEXT:
+      res = gst_gl_handle_context_query ((GstElement *) clapper_sink, query,
+          clapper_sink->display, clapper_sink->context, clapper_sink->gtk_context);
+      break;
+    default:
+      res = GST_BASE_SINK_CLASS (parent_class)->query (bsink, query);
+      break;
+  }
+
+  return res;
+}
+
+static gboolean
+gst_clapper_gl_sink_start_on_main (GstBaseSink * bsink)
+{
+  GstClapperGLSink *gst_sink = GST_CLAPPER_GL_SINK (bsink);
+  GstClapperGLSinkClass *klass = GST_CLAPPER_GL_SINK_GET_CLASS (bsink);
+  GtkWidget *toplevel;
+  GtkRoot *root;
+
+  if (gst_clapper_gl_sink_get_widget (gst_sink) == NULL)
+    return FALSE;
+
+  /* After this point, clapper_sink->widget will always be set */
+
+  root = gtk_widget_get_root (GTK_WIDGET (gst_sink->widget));
+  if (!GTK_IS_ROOT (root)) {
+    GtkWidget *parent = gtk_widget_get_parent (GTK_WIDGET (gst_sink->widget));
+    if (parent) {
+      GtkWidget *temp_parent;
+      while ((temp_parent = gtk_widget_get_parent (parent)))
+        parent = temp_parent;
+    }
+    toplevel = (parent) ? parent : GTK_WIDGET (gst_sink->widget);
+
+    /* sanity check */
+    g_assert (klass->window_title);
+
+    /* User did not add widget its own UI, let's popup a new GtkWindow to
+     * make gst-launch-1.0 work. */
+    gst_sink->window = gtk_window_new ();
+    gtk_window_set_default_size (GTK_WINDOW (gst_sink->window), 640, 480);
+    gtk_window_set_title (GTK_WINDOW (gst_sink->window), klass->window_title);
+    gtk_window_set_child (GTK_WINDOW (gst_sink->window), toplevel);
+
+    gst_sink->window_destroy_id = g_signal_connect (
+        GTK_WINDOW (gst_sink->window),
+        "destroy", G_CALLBACK (window_destroy_cb), gst_sink);
+  }
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_gl_sink_start (GstBaseSink * bsink)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+  GtkClapperGLWidget *clapper_widget;
+
+  if (!(! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
+      gst_clapper_gl_sink_start_on_main, bsink)))
+    return FALSE;
+
+  /* After this point, clapper_sink->widget will always be set */
+  clapper_widget = GTK_CLAPPER_GL_WIDGET (clapper_sink->widget);
+
+  if (!gtk_clapper_gl_widget_init_winsys (clapper_widget)) {
+    GST_ELEMENT_ERROR (bsink, RESOURCE, NOT_FOUND, ("%s",
+            "Failed to initialize OpenGL with GTK"), (NULL));
+    return FALSE;
+  }
+
+  if (!clapper_sink->display)
+    clapper_sink->display = gtk_clapper_gl_widget_get_display (clapper_widget);
+  if (!clapper_sink->context)
+    clapper_sink->context = gtk_clapper_gl_widget_get_context (clapper_widget);
+  if (!clapper_sink->gtk_context)
+    clapper_sink->gtk_context = gtk_clapper_gl_widget_get_gtk_context (clapper_widget);
+
+  if (!clapper_sink->display || !clapper_sink->context || !clapper_sink->gtk_context) {
+    GST_ELEMENT_ERROR (bsink, RESOURCE, NOT_FOUND, ("%s",
+            "Failed to retrieve OpenGL context from GTK"), (NULL));
+    return FALSE;
+  }
+
+  gst_gl_element_propagate_display_context (GST_ELEMENT (bsink),
+      clapper_sink->display);
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_gl_sink_stop_on_main (GstBaseSink * bsink)
+{
+  GstClapperGLSink *gst_sink = GST_CLAPPER_GL_SINK (bsink);
+
+  if (gst_sink->window) {
+    gtk_window_destroy (GTK_WINDOW (gst_sink->window));
+    gst_sink->window = NULL;
+    gst_sink->widget = NULL;
+  }
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_gl_sink_stop (GstBaseSink * bsink)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+
+  if (clapper_sink->display) {
+    gst_object_unref (clapper_sink->display);
+    clapper_sink->display = NULL;
+  }
+  if (clapper_sink->context) {
+    gst_object_unref (clapper_sink->context);
+    clapper_sink->context = NULL;
+  }
+  if (clapper_sink->gtk_context) {
+    gst_object_unref (clapper_sink->gtk_context);
+    clapper_sink->gtk_context = NULL;
+  }
+  if (clapper_sink->window)
+    return ! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
+        gst_clapper_gl_sink_stop_on_main, bsink);
+
+  return TRUE;
+}
+
+static void
+gst_gtk_window_show_all_and_unref (GtkWidget * window)
+{
+  gtk_window_present (GTK_WINDOW (window));
+  g_object_unref (window);
+}
+
+static GstStateChangeReturn
+gst_clapper_gl_sink_change_state (GstElement * element, GstStateChange transition)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (element);
+  GstStateChangeReturn ret = GST_STATE_CHANGE_SUCCESS;
+
+  GST_DEBUG_OBJECT (element, "changing state: %s => %s",
+      gst_element_state_get_name (GST_STATE_TRANSITION_CURRENT (transition)),
+      gst_element_state_get_name (GST_STATE_TRANSITION_NEXT (transition)));
+
+  ret = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
+  if (ret == GST_STATE_CHANGE_FAILURE)
+    return ret;
+
+  switch (transition) {
+    case GST_STATE_CHANGE_NULL_TO_READY:
+      GST_OBJECT_LOCK (clapper_sink);
+      clapper_sink->had_eos = FALSE;
+      if (clapper_sink->widget) {
+        GTK_CLAPPER_GL_WIDGET_LOCK (clapper_sink->widget);
+        clapper_sink->widget->ignore_buffers = FALSE;
+        GTK_CLAPPER_GL_WIDGET_UNLOCK (clapper_sink->widget);
+      }
+      GST_OBJECT_UNLOCK (clapper_sink);
+      break;
+    case GST_STATE_CHANGE_READY_TO_PAUSED:{
+      GtkWindow *window = NULL;
+
+      GST_OBJECT_LOCK (clapper_sink);
+      if (clapper_sink->window)
+        window = g_object_ref (GTK_WINDOW (clapper_sink->window));
+      GST_OBJECT_UNLOCK (clapper_sink);
+
+      if (window) {
+        gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
+            gst_gtk_window_show_all_and_unref, window);
+      }
+      break;
+    }
+    case GST_STATE_CHANGE_READY_TO_NULL:
+      GST_OBJECT_LOCK (clapper_sink);
+      if (clapper_sink->widget) {
+        GTK_CLAPPER_GL_WIDGET_LOCK (clapper_sink->widget);
+        clapper_sink->widget->ignore_buffers =
+            !clapper_sink->had_eos || !clapper_sink->keep_last_frame;
+        GTK_CLAPPER_GL_WIDGET_UNLOCK (clapper_sink->widget);
+      }
+      GST_OBJECT_UNLOCK (clapper_sink);
+      /* Fall through to render black bg */
+    case GST_STATE_CHANGE_PAUSED_TO_READY:
+      GST_OBJECT_LOCK (clapper_sink);
+      if (clapper_sink->widget)
+        gtk_clapper_gl_widget_set_buffer (clapper_sink->widget, NULL);
+      GST_OBJECT_UNLOCK (clapper_sink);
+      break;
+    default:
+      break;
+  }
+
+  return ret;
+}
+
+static void
+gst_clapper_gl_sink_get_times (GstBaseSink * bsink, GstBuffer * buf,
+    GstClockTime * start, GstClockTime * end)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+
+  if (GST_BUFFER_TIMESTAMP_IS_VALID (buf)) {
+    *start = GST_BUFFER_TIMESTAMP (buf);
+    if (GST_BUFFER_DURATION_IS_VALID (buf))
+      *end = *start + GST_BUFFER_DURATION (buf);
+    else {
+      if (GST_VIDEO_INFO_FPS_N (&clapper_sink->v_info) > 0) {
+        *end = *start +
+            gst_util_uint64_scale_int (GST_SECOND,
+            GST_VIDEO_INFO_FPS_D (&clapper_sink->v_info),
+            GST_VIDEO_INFO_FPS_N (&clapper_sink->v_info));
+      }
+    }
+  }
+}
+
+static GstCaps *
+gst_clapper_gl_sink_get_caps (GstBaseSink * bsink, GstCaps * filter)
+{
+  GstCaps *tmp = NULL;
+  GstCaps *result = NULL;
+
+  tmp = gst_pad_get_pad_template_caps (GST_BASE_SINK_PAD (bsink));
+
+  if (filter) {
+    GST_DEBUG_OBJECT (bsink, "intersecting with filter caps %" GST_PTR_FORMAT,
+        filter);
+
+    result = gst_caps_intersect_full (filter, tmp, GST_CAPS_INTERSECT_FIRST);
+    gst_caps_unref (tmp);
+  } else {
+    result = tmp;
+  }
+
+  result = gst_gl_overlay_compositor_add_caps (result);
+
+  GST_DEBUG_OBJECT (bsink, "returning caps: %" GST_PTR_FORMAT, result);
+
+  return result;
+}
+
+static gboolean
+gst_clapper_gl_sink_set_caps (GstBaseSink * bsink, GstCaps * caps)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+  gboolean res = FALSE;
+
+  GST_DEBUG ("set caps with %" GST_PTR_FORMAT, caps);
+
+  if (!gst_video_info_from_caps (&clapper_sink->v_info, caps))
+    return FALSE;
+
+  GST_OBJECT_LOCK (clapper_sink);
+
+  if (clapper_sink->widget == NULL) {
+    GST_OBJECT_UNLOCK (clapper_sink);
+    GST_ELEMENT_ERROR (clapper_sink, RESOURCE, NOT_FOUND,
+        ("%s", "Output widget was destroyed"), (NULL));
+    return FALSE;
+  }
+
+  if (!gtk_clapper_gl_widget_set_format (clapper_sink->widget, &clapper_sink->v_info)) {
+    GST_OBJECT_UNLOCK (clapper_sink);
+    return FALSE;
+  }
+
+  res = gtk_clapper_gl_widget_update_output_format (clapper_sink->widget, caps);
+  GST_OBJECT_UNLOCK (clapper_sink);
+
+  return res;
+}
+
+static GstFlowReturn
+gst_clapper_gl_sink_wait_event (GstBaseSink * bsink, GstEvent * event)
+{
+  GstClapperGLSink *clapper_sink = GST_CLAPPER_GL_SINK (bsink);
+  GstFlowReturn ret;
+
+  ret = GST_BASE_SINK_CLASS (parent_class)->wait_event (bsink, event);
+
+  switch (event->type) {
+    case GST_EVENT_EOS:
+      if (ret == GST_FLOW_OK) {
+        GST_OBJECT_LOCK (clapper_sink);
+        clapper_sink->had_eos = TRUE;
+        GST_OBJECT_UNLOCK (clapper_sink);
+      }
+      break;
+    default:
+      break;
+  }
+
+  return ret;
+}
+
+static GstFlowReturn
+gst_clapper_gl_sink_show_frame (GstVideoSink * vsink, GstBuffer * buf)
+{
+  GstClapperGLSink *clapper_sink;
+
+  GST_TRACE ("rendering buffer:%p", buf);
+
+  clapper_sink = GST_CLAPPER_GL_SINK (vsink);
+
+  GST_OBJECT_LOCK (clapper_sink);
+
+  if (clapper_sink->widget == NULL) {
+    GST_OBJECT_UNLOCK (clapper_sink);
+    GST_ELEMENT_ERROR (clapper_sink, RESOURCE, NOT_FOUND,
+        ("%s", "Output widget was destroyed"), (NULL));
+    return GST_FLOW_ERROR;
+  }
+
+  gtk_clapper_gl_widget_set_buffer (clapper_sink->widget, buf);
+
+  GST_OBJECT_UNLOCK (clapper_sink);
+
+  return GST_FLOW_OK;
+}

lib/gst/clapper/gtk4/gstclapperglsink.h

@@ -0,0 +1,105 @@
+/*
+ * GStreamer
+ * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifndef __GST_CLAPPER_GL_SINK_H__
+#define __GST_CLAPPER_GL_SINK_H__
+
+#include <gtk/gtk.h>
+#include <gst/gst.h>
+#include <gst/video/gstvideosink.h>
+#include <gst/video/video.h>
+#include <gst/gl/gl.h>
+
+#include "gtkclapperglwidget.h"
+
+#define GST_TYPE_CLAPPER_GL_SINK            (gst_clapper_gl_sink_get_type())
+#define GST_CLAPPER_GL_SINK(obj)            (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_CLAPPER_GL_SINK,GstClapperGLSink))
+#define GST_CLAPPER_GL_SINK_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_CLAPPER_GL_SINK,GstClapperGLClass))
+#define GST_CLAPPER_GL_SINK_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_CLAPPER_GL_SINK, GstClapperGLSinkClass))
+#define GST_IS_CLAPPER_GL_SINK(obj)         (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_CLAPPER_GL_SINK))
+#define GST_IS_CLAPPER_GL_SINK_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_CLAPPER_GL_SINK))
+#define GST_CLAPPER_GL_SINK_CAST(obj)       ((GstClapperGLSink*)(obj))
+
+G_BEGIN_DECLS
+typedef struct _GstClapperGLSink GstClapperGLSink;
+typedef struct _GstClapperGLSinkClass GstClapperGLSinkClass;
+
+GType gst_clapper_gl_sink_get_type (void);
+
+/**
+ * GstClapperGLSink:
+ *
+ * Opaque #GstClapperGLSink object
+ */
+struct _GstClapperGLSink
+{
+  /* <private> */
+  GstVideoSink parent;
+
+  GstVideoInfo v_info;
+
+  GtkClapperGLWidget *widget;
+
+  gboolean had_eos;
+
+  /* properties */
+  gboolean force_aspect_ratio;
+  gint par_n, par_d;
+  gboolean keep_last_frame;
+
+  gboolean ignore_textures;
+
+  GtkWidget *window;
+  gulong widget_destroy_id;
+  gulong window_destroy_id;
+
+  GstGLDisplay *display;
+  GstGLContext *context;
+  GstGLContext *gtk_context;
+
+  GstGLUpload *upload;
+  GstBuffer *uploaded_buffer;
+
+  /* read/write with object lock */
+  gint display_width, display_height;
+};
+
+/**
+ * GstClapperGLSinkClass:
+ *
+ * The #GstClapperGLSinkClass struct only contains private data
+ */
+struct _GstClapperGLSinkClass
+{
+  GstVideoSinkClass object_class;
+
+  /* metadata */
+  const gchar *window_title;
+
+  /* virtuals */
+  GtkWidget* (*create_widget) (void);
+};
+
+G_DEFINE_AUTOPTR_CLEANUP_FUNC (GstClapperGLSink, gst_object_unref)
+
+G_END_DECLS
+
+#endif /* __GST_CLAPPER_GL_SINK_H__ */

lib/gst/clapper/gtk4/gstclapperglutils.c

@@ -0,0 +1,103 @@
+/*
+ * GStreamer
+ * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2015 Thibault Saunier <tsaunier@gnome.org>
+ * Copyright (C) 2021 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+/* FIXME: remove these once their headers are public in gstreamer:
+ * https://gitlab.freedesktop.org/gstreamer/gst-plugins-base/-/merge_requests/804
+ */
+
+#include "gstclapperglutils.h"
+
+static const gfloat identity_matrix[] = {
+  1.0, 0.0, 0.0, 0.0,
+  0.0, 1.0, 0.0, 0.0,
+  0.0, 0.0, 1.0, 0.0,
+  0.0, 0.0, 0.0, 1.0,
+};
+
+static const gfloat from_ndc_matrix[] = {
+  0.5, 0.0, 0.0, 0.0,
+  0.0, 0.5, 0.0, 0.0,
+  0.0, 0.0, 0.5, 0.0,
+  0.5, 0.5, 0.5, 1.0,
+};
+
+static const gfloat to_ndc_matrix[] = {
+  2.0, 0.0, 0.0, 0.0,
+  0.0, 2.0, 0.0, 0.0,
+  0.0, 0.0, 2.0, 0.0,
+  -1.0, -1.0, -1.0, 1.0,
+};
+
+/* multiplies two 4x4 matrices, @a X @b, and stores the result in @result
+ * https://en.wikipedia.org/wiki/Matrix_multiplication
+ */
+static void
+gst_gl_multiply_matrix4 (const gfloat * a, const gfloat * b, gfloat * result)
+{
+  int i, j, k;
+  gfloat tmp[16] = { 0.0f };
+
+  if (!a || !b || !result)
+    return;
+  for (i = 0; i < 4; i++) {     /* column */
+    for (j = 0; j < 4; j++) {   /* row */
+      for (k = 0; k < 4; k++) {
+        tmp[j + (i * 4)] += a[k + (i * 4)] * b[j + (k * 4)];
+      }
+    }
+  }
+
+  for (i = 0; i < 16; i++)
+    result[i] = tmp[i];
+}
+
+/*
+ * gst_clapper_gl_get_affine_transformation_meta_as_ndc:
+ * @meta: (nullable): a #GstVideoAffineTransformationMeta
+ * @matrix: (out): result of the 4x4 matrix
+ *
+ * Retrieves the stored 4x4 affine transformation matrix stored in @meta in
+ * NDC coordinates. if @meta is NULL, an identity matrix is returned.
+ *
+ * NDC is a left-handed coordinate system
+ * - x - [-1, 1] - +ve X moves right
+ * - y - [-1, 1] - +ve Y moves up
+ * - z - [-1, 1] - +ve Z moves into
+ */
+void
+gst_clapper_gl_get_affine_transformation_meta_as_ndc (GstVideoAffineTransformationMeta *
+    meta, gfloat * matrix)
+{
+  if (!meta) {
+    int i;
+
+    for (i = 0; i < 16; i++) {
+      matrix[i] = identity_matrix[i];
+    }
+  } else {
+    float tmp[16];
+
+    /* change of basis multiplications */
+    gst_gl_multiply_matrix4 (from_ndc_matrix, meta->matrix, tmp);
+    gst_gl_multiply_matrix4 (tmp, to_ndc_matrix, matrix);
+  }
+}

lib/gst/clapper/gtk4/gstclapperglutils.h

@@ -1,6 +1,7 @@
 /*
  * GStreamer
- * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
+ * Copyright (C) 2016 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2021 Rafał Dzięgiel <rafostar.github@gmail.com>
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Library General Public
@@ -18,14 +19,11 @@
  * Boston, MA 02110-1301, USA.
  */
 
-#if defined(BUILD_FOR_GTK4)
-#define GTKCONFIG_PLUGIN gtk4
-#define GTKCONFIG_NAME "GTK4"
-#define GTKCONFIG_SINK "gtk4sink"
-#define GTKCONFIG_GLSINK "gtk4glsink"
-#else
-#define GTKCONFIG_PLUGIN gtk
-#define GTKCONFIG_NAME "GTK"
-#define GTKCONFIG_SINK "gtksink"
-#define GTKCONFIG_GLSINK "gtkglsink"
-#endif
+#ifndef __GST_CLAPPER_GL_UTILS_H__
+#define __GST_CLAPPER_GL_UTILS_H__
+
+#include <gst/video/gstvideoaffinetransformationmeta.h>
+
+void gst_clapper_gl_get_affine_transformation_meta_as_ndc (GstVideoAffineTransformationMeta *meta, gfloat *matrix);
+
+#endif /* __GST_CLAPPER_GL_UTILS_H__ */

lib/gst/clapper/gtk4/gstgtkbasesink.c

@@ -1,574 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-/**
- * SECTION:gtkgstsink
- * @title: GstGtkBaseSink
- *
- */
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include "gstgtkbasesink.h"
-#include "gstgtkutils.h"
-
-GST_DEBUG_CATEGORY (gst_debug_gtk_base_sink);
-#define GST_CAT_DEFAULT gst_debug_gtk_base_sink
-
-#define DEFAULT_FORCE_ASPECT_RATIO  TRUE
-#define DEFAULT_PAR_N               0
-#define DEFAULT_PAR_D               1
-#define DEFAULT_IGNORE_ALPHA        TRUE
-#define DEFAULT_IGNORE_TEXTURES     FALSE
-
-static void gst_gtk_base_sink_finalize (GObject * object);
-static void gst_gtk_base_sink_set_property (GObject * object, guint prop_id,
-    const GValue * value, GParamSpec * param_spec);
-static void gst_gtk_base_sink_get_property (GObject * object, guint prop_id,
-    GValue * value, GParamSpec * param_spec);
-
-static gboolean gst_gtk_base_sink_start (GstBaseSink * bsink);
-static gboolean gst_gtk_base_sink_stop (GstBaseSink * bsink);
-
-static GstStateChangeReturn
-gst_gtk_base_sink_change_state (GstElement * element,
-    GstStateChange transition);
-
-static void gst_gtk_base_sink_get_times (GstBaseSink * bsink, GstBuffer * buf,
-    GstClockTime * start, GstClockTime * end);
-static gboolean gst_gtk_base_sink_set_caps (GstBaseSink * bsink,
-    GstCaps * caps);
-static GstFlowReturn gst_gtk_base_sink_show_frame (GstVideoSink * bsink,
-    GstBuffer * buf);
-
-static void
-gst_gtk_base_sink_navigation_interface_init (GstNavigationInterface * iface);
-
-enum
-{
-  PROP_0,
-  PROP_WIDGET,
-  PROP_FORCE_ASPECT_RATIO,
-  PROP_PIXEL_ASPECT_RATIO,
-  PROP_IGNORE_ALPHA,
-  PROP_IGNORE_TEXTURES,
-};
-
-#define gst_gtk_base_sink_parent_class parent_class
-G_DEFINE_ABSTRACT_TYPE_WITH_CODE (GstGtkBaseSink, gst_gtk_base_sink,
-    GST_TYPE_VIDEO_SINK,
-    G_IMPLEMENT_INTERFACE (GST_TYPE_NAVIGATION,
-        gst_gtk_base_sink_navigation_interface_init);
-    GST_DEBUG_CATEGORY_INIT (gst_debug_gtk_base_sink,
-        "gtkbasesink", 0, "GTK Video Sink base class"));
-
-
-static void
-gst_gtk_base_sink_class_init (GstGtkBaseSinkClass * klass)
-{
-  GObjectClass *gobject_class;
-  GstElementClass *gstelement_class;
-  GstBaseSinkClass *gstbasesink_class;
-  GstVideoSinkClass *gstvideosink_class;
-
-  gobject_class = (GObjectClass *) klass;
-  gstelement_class = (GstElementClass *) klass;
-  gstbasesink_class = (GstBaseSinkClass *) klass;
-  gstvideosink_class = (GstVideoSinkClass *) klass;
-
-  gobject_class->set_property = gst_gtk_base_sink_set_property;
-  gobject_class->get_property = gst_gtk_base_sink_get_property;
-
-  g_object_class_install_property (gobject_class, PROP_WIDGET,
-      g_param_spec_object ("widget", "GTK Widget",
-          "The GtkWidget to place in the widget hierarchy "
-          "(must only be get from the GTK main thread)",
-          GTK_TYPE_WIDGET, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
-
-  g_object_class_install_property (gobject_class, PROP_FORCE_ASPECT_RATIO,
-      g_param_spec_boolean ("force-aspect-ratio",
-          "Force aspect ratio",
-          "When enabled, scaling will respect original aspect ratio",
-          DEFAULT_FORCE_ASPECT_RATIO,
-          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-  g_object_class_install_property (gobject_class, PROP_PIXEL_ASPECT_RATIO,
-      gst_param_spec_fraction ("pixel-aspect-ratio", "Pixel Aspect Ratio",
-          "The pixel aspect ratio of the device", DEFAULT_PAR_N, DEFAULT_PAR_D,
-          G_MAXINT, 1, 1, 1, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-  /* Disabling alpha was removed in GTK4 */
-#if !defined(BUILD_FOR_GTK4)
-  g_object_class_install_property (gobject_class, PROP_IGNORE_ALPHA,
-      g_param_spec_boolean ("ignore-alpha", "Ignore Alpha",
-          "When enabled, alpha will be ignored and converted to black",
-          DEFAULT_IGNORE_ALPHA, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-#endif
-
-  g_object_class_install_property (gobject_class, PROP_IGNORE_TEXTURES,
-      g_param_spec_boolean ("ignore-textures", "Ignore Textures",
-          "When enabled, textures will be ignored and not drawn",
-          DEFAULT_IGNORE_TEXTURES, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-  gobject_class->finalize = gst_gtk_base_sink_finalize;
-
-  gstelement_class->change_state = gst_gtk_base_sink_change_state;
-  gstbasesink_class->set_caps = gst_gtk_base_sink_set_caps;
-  gstbasesink_class->get_times = gst_gtk_base_sink_get_times;
-  gstbasesink_class->start = gst_gtk_base_sink_start;
-  gstbasesink_class->stop = gst_gtk_base_sink_stop;
-
-  gstvideosink_class->show_frame = gst_gtk_base_sink_show_frame;
-
-  gst_type_mark_as_plugin_api (GST_TYPE_GTK_BASE_SINK, 0);
-}
-
-static void
-gst_gtk_base_sink_init (GstGtkBaseSink * gtk_sink)
-{
-  gtk_sink->force_aspect_ratio = DEFAULT_FORCE_ASPECT_RATIO;
-  gtk_sink->par_n = DEFAULT_PAR_N;
-  gtk_sink->par_d = DEFAULT_PAR_D;
-  gtk_sink->ignore_alpha = DEFAULT_IGNORE_ALPHA;
-  gtk_sink->ignore_textures = DEFAULT_IGNORE_TEXTURES;
-}
-
-static void
-gst_gtk_base_sink_finalize (GObject * object)
-{
-  GstGtkBaseSink *gtk_sink = GST_GTK_BASE_SINK (object);
-
-  GST_DEBUG ("finalizing base sink");
-
-  GST_OBJECT_LOCK (gtk_sink);
-  if (gtk_sink->window && gtk_sink->window_destroy_id)
-    g_signal_handler_disconnect (gtk_sink->window, gtk_sink->window_destroy_id);
-  if (gtk_sink->widget && gtk_sink->widget_destroy_id)
-    g_signal_handler_disconnect (gtk_sink->widget, gtk_sink->widget_destroy_id);
-
-  g_clear_object (&gtk_sink->widget);
-  GST_OBJECT_UNLOCK (gtk_sink);
-
-  G_OBJECT_CLASS (parent_class)->finalize (object);
-}
-
-static void
-widget_destroy_cb (GtkWidget * widget, GstGtkBaseSink * gtk_sink)
-{
-  GST_OBJECT_LOCK (gtk_sink);
-  g_clear_object (&gtk_sink->widget);
-  GST_OBJECT_UNLOCK (gtk_sink);
-}
-
-static void
-window_destroy_cb (GtkWidget * widget, GstGtkBaseSink * gtk_sink)
-{
-  GST_OBJECT_LOCK (gtk_sink);
-  if (gtk_sink->widget) {
-    if (gtk_sink->widget_destroy_id) {
-      g_signal_handler_disconnect (gtk_sink->widget,
-          gtk_sink->widget_destroy_id);
-      gtk_sink->widget_destroy_id = 0;
-    }
-    g_clear_object (&gtk_sink->widget);
-  }
-  gtk_sink->window = NULL;
-  GST_OBJECT_UNLOCK (gtk_sink);
-}
-
-static GtkGstBaseWidget *
-gst_gtk_base_sink_get_widget (GstGtkBaseSink * gtk_sink)
-{
-  if (gtk_sink->widget != NULL)
-    return gtk_sink->widget;
-
-  /* Ensure GTK is initialized, this has no side effect if it was already
-   * initialized. Also, we do that lazily, so the application can be first */
-  if (!gtk_init_check (
-#if !defined(BUILD_FOR_GTK4)
-          NULL, NULL
-#endif
-      )) {
-    GST_ERROR_OBJECT (gtk_sink, "Could not ensure GTK initialization.");
-    return NULL;
-  }
-
-  g_assert (GST_GTK_BASE_SINK_GET_CLASS (gtk_sink)->create_widget);
-  gtk_sink->widget = (GtkGstBaseWidget *)
-      GST_GTK_BASE_SINK_GET_CLASS (gtk_sink)->create_widget ();
-
-  gtk_sink->bind_aspect_ratio =
-      g_object_bind_property (gtk_sink, "force-aspect-ratio", gtk_sink->widget,
-      "force-aspect-ratio", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
-  gtk_sink->bind_pixel_aspect_ratio =
-      g_object_bind_property (gtk_sink, "pixel-aspect-ratio", gtk_sink->widget,
-      "pixel-aspect-ratio", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
-#if !defined(BUILD_FOR_GTK4)
-  gtk_sink->bind_ignore_alpha =
-      g_object_bind_property (gtk_sink, "ignore-alpha", gtk_sink->widget,
-      "ignore-alpha", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
-#endif
-
-  gtk_sink->bind_ignore_textures =
-      g_object_bind_property (gtk_sink, "ignore-textures", gtk_sink->widget,
-      "ignore-textures", G_BINDING_BIDIRECTIONAL | G_BINDING_SYNC_CREATE);
-
-  /* Take the floating ref, other wise the destruction of the container will
-   * make this widget disappear possibly before we are done. */
-  gst_object_ref_sink (gtk_sink->widget);
-
-  gtk_sink->widget_destroy_id = g_signal_connect (gtk_sink->widget, "destroy",
-      G_CALLBACK (widget_destroy_cb), gtk_sink);
-
-  /* back pointer */
-  gtk_gst_base_widget_set_element (GTK_GST_BASE_WIDGET (gtk_sink->widget),
-      GST_ELEMENT (gtk_sink));
-
-  return gtk_sink->widget;
-}
-
-static void
-gst_gtk_base_sink_get_property (GObject * object, guint prop_id,
-    GValue * value, GParamSpec * pspec)
-{
-  GstGtkBaseSink *gtk_sink = GST_GTK_BASE_SINK (object);
-
-  switch (prop_id) {
-    case PROP_WIDGET:
-    {
-      GObject *widget = NULL;
-
-      GST_OBJECT_LOCK (gtk_sink);
-      if (gtk_sink->widget != NULL)
-        widget = G_OBJECT (gtk_sink->widget);
-      GST_OBJECT_UNLOCK (gtk_sink);
-
-      if (!widget)
-        widget =
-            gst_gtk_invoke_on_main ((GThreadFunc) gst_gtk_base_sink_get_widget,
-            gtk_sink);
-
-      g_value_set_object (value, widget);
-      break;
-    }
-    case PROP_FORCE_ASPECT_RATIO:
-      g_value_set_boolean (value, gtk_sink->force_aspect_ratio);
-      break;
-    case PROP_PIXEL_ASPECT_RATIO:
-      gst_value_set_fraction (value, gtk_sink->par_n, gtk_sink->par_d);
-      break;
-    case PROP_IGNORE_ALPHA:
-      g_value_set_boolean (value, gtk_sink->ignore_alpha);
-      break;
-    case PROP_IGNORE_TEXTURES:
-      g_value_set_boolean (value, gtk_sink->ignore_textures);
-      break;
-    default:
-      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
-      break;
-  }
-}
-
-static void
-gst_gtk_base_sink_set_property (GObject * object, guint prop_id,
-    const GValue * value, GParamSpec * pspec)
-{
-  GstGtkBaseSink *gtk_sink = GST_GTK_BASE_SINK (object);
-
-  switch (prop_id) {
-    case PROP_FORCE_ASPECT_RATIO:
-      gtk_sink->force_aspect_ratio = g_value_get_boolean (value);
-      break;
-    case PROP_PIXEL_ASPECT_RATIO:
-      gtk_sink->par_n = gst_value_get_fraction_numerator (value);
-      gtk_sink->par_d = gst_value_get_fraction_denominator (value);
-      break;
-    case PROP_IGNORE_ALPHA:
-      gtk_sink->ignore_alpha = g_value_get_boolean (value);
-      break;
-    case PROP_IGNORE_TEXTURES:
-      gtk_sink->ignore_textures = g_value_get_boolean (value);
-      break;
-    default:
-      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
-      break;
-  }
-}
-
-static void
-gst_gtk_base_sink_navigation_send_event (GstNavigation * navigation,
-    GstStructure * structure)
-{
-  GstGtkBaseSink *sink = GST_GTK_BASE_SINK (navigation);
-  GstEvent *event;
-  GstPad *pad;
-
-  event = gst_event_new_navigation (structure);
-  pad = gst_pad_get_peer (GST_VIDEO_SINK_PAD (sink));
-
-  GST_TRACE_OBJECT (sink, "navigation event %" GST_PTR_FORMAT, structure);
-
-  if (GST_IS_PAD (pad) && GST_IS_EVENT (event)) {
-    if (!gst_pad_send_event (pad, gst_event_ref (event))) {
-      /* If upstream didn't handle the event we'll post a message with it
-       * for the application in case it wants to do something with it */
-      gst_element_post_message (GST_ELEMENT_CAST (sink),
-          gst_navigation_message_new_event (GST_OBJECT_CAST (sink), event));
-    }
-    gst_event_unref (event);
-    gst_object_unref (pad);
-  }
-}
-
-static void
-gst_gtk_base_sink_navigation_interface_init (GstNavigationInterface * iface)
-{
-  iface->send_event = gst_gtk_base_sink_navigation_send_event;
-}
-
-static gboolean
-gst_gtk_base_sink_start_on_main (GstBaseSink * bsink)
-{
-  GstGtkBaseSink *gst_sink = GST_GTK_BASE_SINK (bsink);
-  GstGtkBaseSinkClass *klass = GST_GTK_BASE_SINK_GET_CLASS (bsink);
-  GtkWidget *toplevel;
-#if defined(BUILD_FOR_GTK4)
-  GtkRoot *root;
-#endif
-
-  if (gst_gtk_base_sink_get_widget (gst_sink) == NULL)
-    return FALSE;
-
-  /* After this point, gtk_sink->widget will always be set */
-
-#if defined(BUILD_FOR_GTK4)
-  root = gtk_widget_get_root (GTK_WIDGET (gst_sink->widget));
-  if (!GTK_IS_ROOT (root)) {
-    GtkWidget *parent = gtk_widget_get_parent (GTK_WIDGET (gst_sink->widget));
-    if (parent) {
-      GtkWidget *temp_parent;
-      while ((temp_parent = gtk_widget_get_parent (parent)))
-        parent = temp_parent;
-    }
-    toplevel = (parent) ? parent : GTK_WIDGET (gst_sink->widget);
-#else
-  toplevel = gtk_widget_get_toplevel (GTK_WIDGET (gst_sink->widget));
-  if (!gtk_widget_is_toplevel (toplevel)) {
-#endif
-    /* sanity check */
-    g_assert (klass->window_title);
-
-    /* User did not add widget its own UI, let's popup a new GtkWindow to
-     * make gst-launch-1.0 work. */
-    gst_sink->window = gtk_window_new (
-#if !defined(BUILD_FOR_GTK4)
-        GTK_WINDOW_TOPLEVEL
-#endif
-        );
-    gtk_window_set_default_size (GTK_WINDOW (gst_sink->window), 640, 480);
-    gtk_window_set_title (GTK_WINDOW (gst_sink->window), klass->window_title);
-#if defined(BUILD_FOR_GTK4)
-    gtk_window_set_child (GTK_WINDOW (
-#else
-    gtk_container_add (GTK_CONTAINER (
-#endif
-            gst_sink->window), toplevel);
-
-    gst_sink->window_destroy_id = g_signal_connect (
-#if defined(BUILD_FOR_GTK4)
-        GTK_WINDOW (gst_sink->window),
-#else
-        gst_sink->window,
-#endif
-        "destroy", G_CALLBACK (window_destroy_cb), gst_sink);
-  }
-
-  return TRUE;
-}
-
-static gboolean
-gst_gtk_base_sink_start (GstBaseSink * bsink)
-{
-  return ! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
-      gst_gtk_base_sink_start_on_main, bsink);
-}
-
-static gboolean
-gst_gtk_base_sink_stop_on_main (GstBaseSink * bsink)
-{
-  GstGtkBaseSink *gst_sink = GST_GTK_BASE_SINK (bsink);
-
-  if (gst_sink->window) {
-#if defined(BUILD_FOR_GTK4)
-    gtk_window_destroy (GTK_WINDOW (gst_sink->window));
-#else
-    gtk_widget_destroy (gst_sink->window);
-#endif
-    gst_sink->window = NULL;
-    gst_sink->widget = NULL;
-  }
-
-  return TRUE;
-}
-
-static gboolean
-gst_gtk_base_sink_stop (GstBaseSink * bsink)
-{
-  GstGtkBaseSink *gst_sink = GST_GTK_BASE_SINK (bsink);
-
-  if (gst_sink->window)
-    return ! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
-        gst_gtk_base_sink_stop_on_main, bsink);
-
-  return TRUE;
-}
-
-static void
-gst_gtk_window_show_all_and_unref (GtkWidget * window)
-{
-#if defined(BUILD_FOR_GTK4)
-  gtk_window_present (GTK_WINDOW (window));
-#else
-  gtk_widget_show_all (window);
-#endif
-  g_object_unref (window);
-}
-
-static GstStateChangeReturn
-gst_gtk_base_sink_change_state (GstElement * element, GstStateChange transition)
-{
-  GstGtkBaseSink *gtk_sink = GST_GTK_BASE_SINK (element);
-  GstStateChangeReturn ret = GST_STATE_CHANGE_SUCCESS;
-
-  GST_DEBUG_OBJECT (element, "changing state: %s => %s",
-      gst_element_state_get_name (GST_STATE_TRANSITION_CURRENT (transition)),
-      gst_element_state_get_name (GST_STATE_TRANSITION_NEXT (transition)));
-
-  ret = GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
-  if (ret == GST_STATE_CHANGE_FAILURE)
-    return ret;
-
-  switch (transition) {
-    case GST_STATE_CHANGE_READY_TO_PAUSED:
-    {
-      GtkWindow *window = NULL;
-
-      GST_OBJECT_LOCK (gtk_sink);
-      if (gtk_sink->window)
-        window = g_object_ref (GTK_WINDOW (gtk_sink->window));
-      GST_OBJECT_UNLOCK (gtk_sink);
-
-      if (window) {
-        gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
-            gst_gtk_window_show_all_and_unref, window);
-      }
-      break;
-    }
-    case GST_STATE_CHANGE_PAUSED_TO_READY:
-      GST_OBJECT_LOCK (gtk_sink);
-      if (gtk_sink->widget)
-        gtk_gst_base_widget_set_buffer (gtk_sink->widget, NULL);
-      GST_OBJECT_UNLOCK (gtk_sink);
-      break;
-    default:
-      break;
-  }
-
-  return ret;
-}
-
-static void
-gst_gtk_base_sink_get_times (GstBaseSink * bsink, GstBuffer * buf,
-    GstClockTime * start, GstClockTime * end)
-{
-  GstGtkBaseSink *gtk_sink;
-
-  gtk_sink = GST_GTK_BASE_SINK (bsink);
-
-  if (GST_BUFFER_TIMESTAMP_IS_VALID (buf)) {
-    *start = GST_BUFFER_TIMESTAMP (buf);
-    if (GST_BUFFER_DURATION_IS_VALID (buf))
-      *end = *start + GST_BUFFER_DURATION (buf);
-    else {
-      if (GST_VIDEO_INFO_FPS_N (&gtk_sink->v_info) > 0) {
-        *end = *start +
-            gst_util_uint64_scale_int (GST_SECOND,
-            GST_VIDEO_INFO_FPS_D (&gtk_sink->v_info),
-            GST_VIDEO_INFO_FPS_N (&gtk_sink->v_info));
-      }
-    }
-  }
-}
-
-gboolean
-gst_gtk_base_sink_set_caps (GstBaseSink * bsink, GstCaps * caps)
-{
-  GstGtkBaseSink *gtk_sink = GST_GTK_BASE_SINK (bsink);
-
-  GST_DEBUG ("set caps with %" GST_PTR_FORMAT, caps);
-
-  if (!gst_video_info_from_caps (&gtk_sink->v_info, caps))
-    return FALSE;
-
-  GST_OBJECT_LOCK (gtk_sink);
-
-  if (gtk_sink->widget == NULL) {
-    GST_OBJECT_UNLOCK (gtk_sink);
-    GST_ELEMENT_ERROR (gtk_sink, RESOURCE, NOT_FOUND,
-        ("%s", "Output widget was destroyed"), (NULL));
-    return FALSE;
-  }
-
-  if (!gtk_gst_base_widget_set_format (gtk_sink->widget, &gtk_sink->v_info)) {
-    GST_OBJECT_UNLOCK (gtk_sink);
-    return FALSE;
-  }
-  GST_OBJECT_UNLOCK (gtk_sink);
-
-  return TRUE;
-}
-
-static GstFlowReturn
-gst_gtk_base_sink_show_frame (GstVideoSink * vsink, GstBuffer * buf)
-{
-  GstGtkBaseSink *gtk_sink;
-
-  GST_TRACE ("rendering buffer:%p", buf);
-
-  gtk_sink = GST_GTK_BASE_SINK (vsink);
-
-  GST_OBJECT_LOCK (gtk_sink);
-
-  if (gtk_sink->widget == NULL) {
-    GST_OBJECT_UNLOCK (gtk_sink);
-    GST_ELEMENT_ERROR (gtk_sink, RESOURCE, NOT_FOUND,
-        ("%s", "Output widget was destroyed"), (NULL));
-    return GST_FLOW_ERROR;
-  }
-
-  gtk_gst_base_widget_set_buffer (gtk_sink->widget, buf);
-
-  GST_OBJECT_UNLOCK (gtk_sink);
-
-  return GST_FLOW_OK;
-}

lib/gst/clapper/gtk4/gstgtkbasesink.h

@@ -1,99 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-#ifndef __GST_GTK_BASE_SINK_H__
-#define __GST_GTK_BASE_SINK_H__
-
-#include <gtk/gtk.h>
-#include <gst/gst.h>
-#include <gst/video/gstvideosink.h>
-#include <gst/video/video.h>
-
-#include "gtkgstbasewidget.h"
-
-#define GST_TYPE_GTK_BASE_SINK            (gst_gtk_base_sink_get_type())
-#define GST_GTK_BASE_SINK(obj)            (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_GTK_BASE_SINK,GstGtkBaseSink))
-#define GST_GTK_BASE_SINK_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_GTK_BASE_SINK,GstGtkBaseSinkClass))
-#define GST_GTK_BASE_SINK_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_GTK_BASE_SINK, GstGtkBaseSinkClass))
-#define GST_IS_GTK_BASE_SINK(obj)         (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_GTK_BASE_SINK))
-#define GST_IS_GTK_BASE_SINK_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_GTK_BASE_SINK))
-#define GST_GTK_BASE_SINK_CAST(obj)       ((GstGtkBaseSink*)(obj))
-
-G_BEGIN_DECLS
-
-typedef struct _GstGtkBaseSink GstGtkBaseSink;
-typedef struct _GstGtkBaseSinkClass GstGtkBaseSinkClass;
-
-GType gst_gtk_base_sink_get_type (void);
-
-/**
- * GstGtkBaseSink:
- *
- * Opaque #GstGtkBaseSink object
- */
-struct _GstGtkBaseSink
-{
-  /* <private> */
-  GstVideoSink          parent;
-
-  GstVideoInfo          v_info;
-
-  GtkGstBaseWidget     *widget;
-
-  /* properties */
-  gboolean              force_aspect_ratio;
-  GBinding             *bind_aspect_ratio;
-
-  gint                  par_n;
-  gint                  par_d;
-  GBinding             *bind_pixel_aspect_ratio;
-
-  gboolean              ignore_alpha;
-  GBinding             *bind_ignore_alpha;
-
-  gboolean              ignore_textures;
-  GBinding             *bind_ignore_textures;
-
-  GtkWidget            *window;
-  gulong                widget_destroy_id;
-  gulong                window_destroy_id;
-};
-
-/**
- * GstGtkBaseSinkClass:
- *
- * The #GstGtkBaseSinkClass struct only contains private data
- */
-struct _GstGtkBaseSinkClass
-{
-  GstVideoSinkClass object_class;
-
-  /* metadata */
-  const gchar *window_title;
-
-  /* virtuals */
-  GtkWidget* (*create_widget) (void);
-};
-
-G_DEFINE_AUTOPTR_CLEANUP_FUNC (GstGtkBaseSink, gst_object_unref)
-
-G_END_DECLS
-
-#endif /* __GST_GTK_BASE_SINK_H__ */

lib/gst/clapper/gtk4/gstgtkglsink.c

@@ -1,336 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-/**
- * SECTION:element-gtkglsink
- * @title: gtkglsink
- */
-
-/**
- * SECTION:element-gtk4glsink
- * @title: gtk4glsink
- */
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include <gst/gl/gstglfuncs.h>
-
-#include "gtkconfig.h"
-#include "gstgtkglsink.h"
-#include "gtkgstglwidget.h"
-
-GST_DEBUG_CATEGORY (gst_debug_gtk_gl_sink);
-#define GST_CAT_DEFAULT gst_debug_gtk_gl_sink
-
-static gboolean gst_gtk_gl_sink_start (GstBaseSink * bsink);
-static gboolean gst_gtk_gl_sink_stop (GstBaseSink * bsink);
-static gboolean gst_gtk_gl_sink_query (GstBaseSink * bsink, GstQuery * query);
-static gboolean gst_gtk_gl_sink_propose_allocation (GstBaseSink * bsink,
-    GstQuery * query);
-static GstCaps *gst_gtk_gl_sink_get_caps (GstBaseSink * bsink,
-    GstCaps * filter);
-
-static void gst_gtk_gl_sink_finalize (GObject * object);
-
-static GstStaticPadTemplate gst_gtk_gl_sink_template =
-    GST_STATIC_PAD_TEMPLATE ("sink",
-    GST_PAD_SINK,
-    GST_PAD_ALWAYS,
-    GST_STATIC_CAPS (GST_VIDEO_CAPS_MAKE_WITH_FEATURES
-        (GST_CAPS_FEATURE_MEMORY_GL_MEMORY, "RGBA") "; "
-        GST_VIDEO_CAPS_MAKE_WITH_FEATURES
-        (GST_CAPS_FEATURE_MEMORY_GL_MEMORY ", "
-            GST_CAPS_FEATURE_META_GST_VIDEO_OVERLAY_COMPOSITION, "RGBA")));
-
-#define gst_gtk_gl_sink_parent_class parent_class
-G_DEFINE_TYPE_WITH_CODE (GstGtkGLSink, gst_gtk_gl_sink,
-    GST_TYPE_GTK_BASE_SINK, GST_DEBUG_CATEGORY_INIT (gst_debug_gtk_gl_sink,
-        GTKCONFIG_GLSINK, 0, GTKCONFIG_NAME " GL Video Sink"));
-
-static void
-gst_gtk_gl_sink_class_init (GstGtkGLSinkClass * klass)
-{
-  GObjectClass *gobject_class;
-  GstElementClass *gstelement_class;
-  GstBaseSinkClass *gstbasesink_class;
-  GstGtkBaseSinkClass *gstgtkbasesink_class;
-
-  gobject_class = (GObjectClass *) klass;
-  gstelement_class = (GstElementClass *) klass;
-  gstbasesink_class = (GstBaseSinkClass *) klass;
-  gstgtkbasesink_class = (GstGtkBaseSinkClass *) klass;
-
-  gobject_class->finalize = gst_gtk_gl_sink_finalize;
-
-  gstbasesink_class->query = gst_gtk_gl_sink_query;
-  gstbasesink_class->propose_allocation = gst_gtk_gl_sink_propose_allocation;
-  gstbasesink_class->start = gst_gtk_gl_sink_start;
-  gstbasesink_class->stop = gst_gtk_gl_sink_stop;
-  gstbasesink_class->get_caps = gst_gtk_gl_sink_get_caps;
-
-  gstgtkbasesink_class->create_widget = gtk_gst_gl_widget_new;
-  gstgtkbasesink_class->window_title = GTKCONFIG_NAME " GL Renderer";
-
-  gst_element_class_set_metadata (gstelement_class,
-      GTKCONFIG_NAME " GL Video Sink",
-      "Sink/Video", "A video sink that renders to a GtkWidget using OpenGL",
-      "Matthew Waters <matthew@centricular.com>, "
-      "Rafał Dzięgiel <rafostar.github@gmail.com>");
-
-  gst_element_class_add_static_pad_template (gstelement_class,
-      &gst_gtk_gl_sink_template);
-}
-
-static void
-gst_gtk_gl_sink_init (GstGtkGLSink * gtk_sink)
-{
-}
-
-static gboolean
-gst_gtk_gl_sink_query (GstBaseSink * bsink, GstQuery * query)
-{
-  GstGtkGLSink *gtk_sink = GST_GTK_GL_SINK (bsink);
-  gboolean res = FALSE;
-
-  switch (GST_QUERY_TYPE (query)) {
-    case GST_QUERY_CONTEXT:
-    {
-      if (gst_gl_handle_context_query ((GstElement *) gtk_sink, query,
-              gtk_sink->display, gtk_sink->context, gtk_sink->gtk_context))
-        return TRUE;
-      break;
-    }
-    default:
-      res = GST_BASE_SINK_CLASS (parent_class)->query (bsink, query);
-      break;
-  }
-
-  return res;
-}
-
-static void
-destroy_cb (GtkWidget * widget, GstGtkGLSink * gtk_sink)
-{
-  if (gtk_sink->widget_destroy_sig_handler) {
-    g_signal_handler_disconnect (widget, gtk_sink->widget_destroy_sig_handler);
-    gtk_sink->widget_destroy_sig_handler = 0;
-  }
-}
-
-static gboolean
-gst_gtk_gl_sink_start (GstBaseSink * bsink)
-{
-  GstGtkBaseSink *base_sink = GST_GTK_BASE_SINK (bsink);
-  GstGtkGLSink *gtk_sink = GST_GTK_GL_SINK (bsink);
-  GtkGstGLWidget *gst_widget;
-
-  if (!GST_BASE_SINK_CLASS (parent_class)->start (bsink))
-    return FALSE;
-
-  /* After this point, gtk_sink->widget will always be set */
-  gst_widget = GTK_GST_GL_WIDGET (base_sink->widget);
-
-  if (!gtk_sink->widget_destroy_sig_handler) {
-    gtk_sink->widget_destroy_sig_handler =
-        g_signal_connect (gst_widget, "destroy", G_CALLBACK (destroy_cb),
-        gtk_sink);
-  }
-
-  if (!gtk_gst_gl_widget_init_winsys (gst_widget)) {
-    GST_ELEMENT_ERROR (bsink, RESOURCE, NOT_FOUND, ("%s",
-            "Failed to initialize OpenGL with GTK"), (NULL));
-    return FALSE;
-  }
-
-  if (!gtk_sink->display)
-    gtk_sink->display = gtk_gst_gl_widget_get_display (gst_widget);
-  if (!gtk_sink->context)
-    gtk_sink->context = gtk_gst_gl_widget_get_context (gst_widget);
-  if (!gtk_sink->gtk_context)
-    gtk_sink->gtk_context = gtk_gst_gl_widget_get_gtk_context (gst_widget);
-
-  if (!gtk_sink->display || !gtk_sink->context || !gtk_sink->gtk_context) {
-    GST_ELEMENT_ERROR (bsink, RESOURCE, NOT_FOUND, ("%s",
-            "Failed to retrieve OpenGL context from GTK"), (NULL));
-    return FALSE;
-  }
-
-  gst_gl_element_propagate_display_context (GST_ELEMENT (bsink),
-      gtk_sink->display);
-
-  return TRUE;
-}
-
-static gboolean
-gst_gtk_gl_sink_stop (GstBaseSink * bsink)
-{
-  GstGtkGLSink *gtk_sink = GST_GTK_GL_SINK (bsink);
-  GstGtkBaseSink *base_sink = GST_GTK_BASE_SINK (bsink);
-
-  if (gtk_sink->display) {
-    gst_object_unref (gtk_sink->display);
-    gtk_sink->display = NULL;
-  }
-
-  if (gtk_sink->context) {
-    gst_object_unref (gtk_sink->context);
-    gtk_sink->context = NULL;
-  }
-
-  if (gtk_sink->gtk_context) {
-    gst_object_unref (gtk_sink->gtk_context);
-    gtk_sink->gtk_context = NULL;
-  }
-
-  return GST_BASE_SINK_CLASS (parent_class)->stop (bsink);
-}
-
-static gboolean
-gst_gtk_gl_sink_propose_allocation (GstBaseSink * bsink, GstQuery * query)
-{
-  GstGtkGLSink *gtk_sink = GST_GTK_GL_SINK (bsink);
-  GstBufferPool *pool = NULL;
-  GstStructure *config;
-  GstCaps *caps;
-  GstVideoInfo info;
-  guint size;
-  gboolean need_pool;
-  GstStructure *allocation_meta = NULL;
-  gint display_width, display_height;
-
-  if (!gtk_sink->display || !gtk_sink->context)
-    return FALSE;
-
-  gst_query_parse_allocation (query, &caps, &need_pool);
-
-  if (caps == NULL)
-    goto no_caps;
-
-  if (!gst_video_info_from_caps (&info, caps))
-    goto invalid_caps;
-
-  /* the normal size of a frame */
-  size = info.size;
-
-  if (need_pool) {
-    GST_DEBUG_OBJECT (gtk_sink, "create new pool");
-    pool = gst_gl_buffer_pool_new (gtk_sink->context);
-
-    config = gst_buffer_pool_get_config (pool);
-    gst_buffer_pool_config_set_params (config, caps, size, 0, 0);
-    gst_buffer_pool_config_add_option (config,
-        GST_BUFFER_POOL_OPTION_GL_SYNC_META);
-
-    if (!gst_buffer_pool_set_config (pool, config))
-      goto config_failed;
-  }
-
-  /* we need at least 2 buffer because we hold on to the last one */
-  gst_query_add_allocation_pool (query, pool, size, 2, 0);
-  if (pool)
-    gst_object_unref (pool);
-
-  GST_OBJECT_LOCK (gtk_sink);
-  display_width = gtk_sink->display_width;
-  display_height = gtk_sink->display_height;
-  GST_OBJECT_UNLOCK (gtk_sink);
-
-  if (display_width != 0 && display_height != 0) {
-    GST_DEBUG_OBJECT (gtk_sink, "sending alloc query with size %dx%d",
-        display_width, display_height);
-    allocation_meta = gst_structure_new ("GstVideoOverlayCompositionMeta",
-        "width", G_TYPE_UINT, display_width,
-        "height", G_TYPE_UINT, display_height, NULL);
-  }
-
-  gst_query_add_allocation_meta (query,
-      GST_VIDEO_OVERLAY_COMPOSITION_META_API_TYPE, allocation_meta);
-
-  if (allocation_meta)
-    gst_structure_free (allocation_meta);
-
-  /* we also support various metadata */
-  gst_query_add_allocation_meta (query, GST_VIDEO_META_API_TYPE, 0);
-
-  if (gtk_sink->context->gl_vtable->FenceSync)
-    gst_query_add_allocation_meta (query, GST_GL_SYNC_META_API_TYPE, 0);
-
-  return TRUE;
-
-  /* ERRORS */
-no_caps:
-  {
-    GST_DEBUG_OBJECT (bsink, "no caps specified");
-    return FALSE;
-  }
-invalid_caps:
-  {
-    GST_DEBUG_OBJECT (bsink, "invalid caps specified");
-    return FALSE;
-  }
-config_failed:
-  {
-    GST_DEBUG_OBJECT (bsink, "failed setting config");
-    return FALSE;
-  }
-}
-
-static GstCaps *
-gst_gtk_gl_sink_get_caps (GstBaseSink * bsink, GstCaps * filter)
-{
-  GstCaps *tmp = NULL;
-  GstCaps *result = NULL;
-
-  tmp = gst_pad_get_pad_template_caps (GST_BASE_SINK_PAD (bsink));
-
-  if (filter) {
-    GST_DEBUG_OBJECT (bsink, "intersecting with filter caps %" GST_PTR_FORMAT,
-        filter);
-
-    result = gst_caps_intersect_full (filter, tmp, GST_CAPS_INTERSECT_FIRST);
-    gst_caps_unref (tmp);
-  } else {
-    result = tmp;
-  }
-
-  result = gst_gl_overlay_compositor_add_caps (result);
-
-  GST_DEBUG_OBJECT (bsink, "returning caps: %" GST_PTR_FORMAT, result);
-
-  return result;
-}
-
-static void
-gst_gtk_gl_sink_finalize (GObject * object)
-{
-  GstGtkGLSink *gtk_sink = GST_GTK_GL_SINK (object);
-  GstGtkBaseSink *base_sink = GST_GTK_BASE_SINK (object);
-
-  if (gtk_sink->widget_destroy_sig_handler) {
-    g_signal_handler_disconnect (base_sink->widget,
-        gtk_sink->widget_destroy_sig_handler);
-    gtk_sink->widget_destroy_sig_handler = 0;
-  }
-
-  G_OBJECT_CLASS (parent_class)->finalize (object);
-}

lib/gst/clapper/gtk4/gstgtkutils.c

@@ -19,6 +19,7 @@
  * Boston, MA 02110-1301, USA.
  */
 
+#include <gst/gst.h>
 #include "gstgtkutils.h"
 
 struct invoke_context
@@ -69,3 +70,26 @@ gst_gtk_invoke_on_main (GThreadFunc func, gpointer data)
 
   return info.res;
 }
+
+void
+gst_gtk_install_shared_properties (GObjectClass *gobject_class)
+{
+  g_object_class_install_property (gobject_class, PROP_FORCE_ASPECT_RATIO,
+      g_param_spec_boolean ("force-aspect-ratio",
+          "Force aspect ratio",
+          "When enabled, scaling will respect original aspect ratio",
+          DEFAULT_FORCE_ASPECT_RATIO,
+          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
+
+  g_object_class_install_property (gobject_class, PROP_PIXEL_ASPECT_RATIO,
+      gst_param_spec_fraction ("pixel-aspect-ratio", "Pixel Aspect Ratio",
+          "The pixel aspect ratio of the device", DEFAULT_PAR_N, DEFAULT_PAR_D,
+          G_MAXINT, 1, 1, 1, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
+
+  g_object_class_install_property (gobject_class, PROP_KEEP_LAST_FRAME,
+      g_param_spec_boolean ("keep-last-frame",
+          "Keep last frame",
+          "Keep showing last video frame after playback instead of black screen",
+          DEFAULT_KEEP_LAST_FRAME,
+          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
+}

lib/gst/clapper/gtk4/gstgtkutils.h

@@ -22,8 +22,25 @@
 #ifndef __GST_GTK_UTILS_H__
 #define __GST_GTK_UTILS_H__
 
+#define DEFAULT_FORCE_ASPECT_RATIO  TRUE
+#define DEFAULT_PAR_N               0
+#define DEFAULT_PAR_D               1
+#define DEFAULT_KEEP_LAST_FRAME     FALSE
+
 #include <glib.h>
+#include <glib-object.h>
+
+enum
+{
+  PROP_0,
+  PROP_WIDGET,
+  PROP_FORCE_ASPECT_RATIO,
+  PROP_PIXEL_ASPECT_RATIO,
+  PROP_KEEP_LAST_FRAME
+};
 
 gpointer gst_gtk_invoke_on_main (GThreadFunc func, gpointer data);
 
+void gst_gtk_install_shared_properties (GObjectClass *gobject_class);
+
 #endif /* __GST_GTK_UTILS_H__ */

lib/gst/clapper/gtk4/gtkclapperglwidget.h

@@ -0,0 +1,113 @@
+/*
+ * GStreamer
+ * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifndef __GTK_CLAPPER_GL_WIDGET_H__
+#define __GTK_CLAPPER_GL_WIDGET_H__
+
+#include <gtk/gtk.h>
+#include <gst/gst.h>
+#include <gst/video/video.h>
+#include <gst/gl/gl.h>
+
+G_BEGIN_DECLS
+
+GType gtk_clapper_gl_widget_get_type (void);
+#define GTK_TYPE_CLAPPER_GL_WIDGET            (gtk_clapper_gl_widget_get_type())
+#define GTK_CLAPPER_GL_WIDGET(obj)            (G_TYPE_CHECK_INSTANCE_CAST((obj),GTK_TYPE_CLAPPER_GL_WIDGET,GtkClapperGLWidget))
+#define GTK_CLAPPER_GL_WIDGET_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST((klass),GTK_TYPE_CLAPPER_GL_WIDGET,GtkClapperGLWidgetClass))
+#define GTK_IS_CLAPPER_GL_WIDGET(obj)         (G_TYPE_CHECK_INSTANCE_TYPE((obj),GTK_TYPE_CLAPPER_GL_WIDGET))
+#define GTK_IS_CLAPPER_GL_WIDGET_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass),GTK_TYPE_CLAPPER_GL_WIDGET))
+#define GTK_CLAPPER_GL_WIDGET_CAST(obj)       ((GtkClapperGLWidget*)(obj))
+#define GTK_CLAPPER_GL_WIDGET_LOCK(w)         g_mutex_lock(&((GtkClapperGLWidget*)(w))->lock)
+#define GTK_CLAPPER_GL_WIDGET_UNLOCK(w)       g_mutex_unlock(&((GtkClapperGLWidget*)(w))->lock)
+
+typedef struct _GtkClapperGLWidget GtkClapperGLWidget;
+typedef struct _GtkClapperGLWidgetClass GtkClapperGLWidgetClass;
+typedef struct _GtkClapperGLWidgetPrivate GtkClapperGLWidgetPrivate;
+
+struct _GtkClapperGLWidget
+{
+  /* <private> */
+  GtkGLArea parent;
+  GtkClapperGLWidgetPrivate *priv;
+
+  /* properties */
+  gboolean force_aspect_ratio;
+  gint par_n, par_d;
+  gboolean keep_last_frame;
+
+  gint display_width;
+  gint display_height;
+
+  /* Widget dimensions */
+  gint scaled_width;
+  gint scaled_height;
+
+  /* Position coords */
+  gdouble last_pos_x;
+  gdouble last_pos_y;
+
+  gboolean negotiated;
+  gboolean ignore_buffers;
+  GstBuffer *pending_buffer;
+  GstBuffer *buffer;
+  GstVideoInfo v_info;
+
+  /* resize */
+  gboolean pending_resize;
+  GstVideoInfo pending_v_info;
+  guint display_ratio_num;
+  guint display_ratio_den;
+
+  /*< private >*/
+  GMutex lock;
+  GWeakRef element;
+
+  /* event controllers */
+  GtkEventController *key_controller;
+  GtkEventController *motion_controller;
+  GtkGesture *click_gesture;
+
+  /* Pending draw idles callback */
+  guint draw_id;
+};
+
+struct _GtkClapperGLWidgetClass
+{
+  GtkGLAreaClass parent_class;
+};
+
+/* API */
+gboolean        gtk_clapper_gl_widget_set_format           (GtkClapperGLWidget * widget, GstVideoInfo * v_info);
+void            gtk_clapper_gl_widget_set_buffer           (GtkClapperGLWidget * widget, GstBuffer * buffer);
+void            gtk_clapper_gl_widget_set_element          (GtkClapperGLWidget * widget, GstElement * element);
+
+GtkWidget *     gtk_clapper_gl_widget_new                  (void);
+
+gboolean        gtk_clapper_gl_widget_init_winsys          (GtkClapperGLWidget * widget);
+GstGLDisplay *  gtk_clapper_gl_widget_get_display          (GtkClapperGLWidget * widget);
+GstGLContext *  gtk_clapper_gl_widget_get_context          (GtkClapperGLWidget * widget);
+GstGLContext *  gtk_clapper_gl_widget_get_gtk_context      (GtkClapperGLWidget * widget);
+gboolean        gtk_clapper_gl_widget_update_output_format (GtkClapperGLWidget * widget, GstCaps * caps);
+
+G_END_DECLS
+
+#endif /* __GTK_CLAPPER_GL_WIDGET_H__ */

lib/gst/clapper/gtk4/gtkgstbasewidget.c

@@ -1,619 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include <stdio.h>
-
-#include "gtkgstbasewidget.h"
-
-GST_DEBUG_CATEGORY (gst_debug_gtk_base_widget);
-#define GST_CAT_DEFAULT gst_debug_gtk_base_widget
-
-#define DEFAULT_FORCE_ASPECT_RATIO  TRUE
-#define DEFAULT_PAR_N               0
-#define DEFAULT_PAR_D               1
-#define DEFAULT_IGNORE_ALPHA        TRUE
-#define DEFAULT_IGNORE_TEXTURES     FALSE
-
-enum
-{
-  PROP_0,
-  PROP_FORCE_ASPECT_RATIO,
-  PROP_PIXEL_ASPECT_RATIO,
-  PROP_IGNORE_ALPHA,
-  PROP_IGNORE_TEXTURES,
-};
-
-static void
-gtk_gst_base_widget_get_preferred_width (GtkWidget * widget, gint * min,
-    gint * natural)
-{
-  GtkGstBaseWidget *gst_widget = (GtkGstBaseWidget *) widget;
-  gint video_width = gst_widget->display_width;
-
-  if (!gst_widget->negotiated)
-    video_width = 10;
-
-  if (min)
-    *min = 1;
-  if (natural)
-    *natural = video_width;
-}
-
-static void
-gtk_gst_base_widget_get_preferred_height (GtkWidget * widget, gint * min,
-    gint * natural)
-{
-  GtkGstBaseWidget *gst_widget = (GtkGstBaseWidget *) widget;
-  gint video_height = gst_widget->display_height;
-
-  if (!gst_widget->negotiated)
-    video_height = 10;
-
-  if (min)
-    *min = 1;
-  if (natural)
-    *natural = video_height;
-}
-
-#if defined(BUILD_FOR_GTK4)
-static void
-gtk_gst_base_widget_measure (GtkWidget * widget, GtkOrientation orientation,
-    gint for_size, gint * min, gint * natural,
-    gint * minimum_baseline, gint * natural_baseline)
-{
-  if (orientation == GTK_ORIENTATION_HORIZONTAL)
-    gtk_gst_base_widget_get_preferred_width (widget, min, natural);
-  else
-    gtk_gst_base_widget_get_preferred_height (widget, min, natural);
-
-  *minimum_baseline = -1;
-  *natural_baseline = -1;
-}
-#endif
-
-static void
-gtk_gst_base_widget_set_property (GObject * object, guint prop_id,
-    const GValue * value, GParamSpec * pspec)
-{
-  GtkGstBaseWidget *gtk_widget = GTK_GST_BASE_WIDGET (object);
-
-  switch (prop_id) {
-    case PROP_FORCE_ASPECT_RATIO:
-      gtk_widget->force_aspect_ratio = g_value_get_boolean (value);
-      break;
-    case PROP_PIXEL_ASPECT_RATIO:
-      gtk_widget->par_n = gst_value_get_fraction_numerator (value);
-      gtk_widget->par_d = gst_value_get_fraction_denominator (value);
-      break;
-    case PROP_IGNORE_ALPHA:
-      gtk_widget->ignore_alpha = g_value_get_boolean (value);
-      break;
-    case PROP_IGNORE_TEXTURES:
-      gtk_widget->ignore_textures = g_value_get_boolean (value);
-      break;
-    default:
-      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
-      break;
-  }
-}
-
-static void
-gtk_gst_base_widget_get_property (GObject * object, guint prop_id,
-    GValue * value, GParamSpec * pspec)
-{
-  GtkGstBaseWidget *gtk_widget = GTK_GST_BASE_WIDGET (object);
-
-  switch (prop_id) {
-    case PROP_FORCE_ASPECT_RATIO:
-      g_value_set_boolean (value, gtk_widget->force_aspect_ratio);
-      break;
-    case PROP_PIXEL_ASPECT_RATIO:
-      gst_value_set_fraction (value, gtk_widget->par_n, gtk_widget->par_d);
-      break;
-    case PROP_IGNORE_ALPHA:
-      g_value_set_boolean (value, gtk_widget->ignore_alpha);
-      break;
-    case PROP_IGNORE_TEXTURES:
-      g_value_set_boolean (value, gtk_widget->ignore_textures);
-      break;
-    default:
-      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
-      break;
-  }
-}
-
-static gboolean
-_calculate_par (GtkGstBaseWidget * widget, GstVideoInfo * info)
-{
-  gboolean ok;
-  gint width, height;
-  gint par_n, par_d;
-  gint display_par_n, display_par_d;
-
-  width = GST_VIDEO_INFO_WIDTH (info);
-  height = GST_VIDEO_INFO_HEIGHT (info);
-
-  par_n = GST_VIDEO_INFO_PAR_N (info);
-  par_d = GST_VIDEO_INFO_PAR_D (info);
-
-  if (!par_n)
-    par_n = 1;
-
-  /* get display's PAR */
-  if (widget->par_n != 0 && widget->par_d != 0) {
-    display_par_n = widget->par_n;
-    display_par_d = widget->par_d;
-  } else {
-    display_par_n = 1;
-    display_par_d = 1;
-  }
-
-
-  ok = gst_video_calculate_display_ratio (&widget->display_ratio_num,
-      &widget->display_ratio_den, width, height, par_n, par_d, display_par_n,
-      display_par_d);
-
-  if (ok) {
-    GST_LOG ("PAR: %u/%u DAR:%u/%u", par_n, par_d, display_par_n,
-        display_par_d);
-    return TRUE;
-  }
-
-  return FALSE;
-}
-
-static void
-_apply_par (GtkGstBaseWidget * widget)
-{
-  guint display_ratio_num, display_ratio_den;
-  gint width, height;
-
-  width = GST_VIDEO_INFO_WIDTH (&widget->v_info);
-  height = GST_VIDEO_INFO_HEIGHT (&widget->v_info);
-
-  display_ratio_num = widget->display_ratio_num;
-  display_ratio_den = widget->display_ratio_den;
-
-  if (height % display_ratio_den == 0) {
-    GST_DEBUG ("keeping video height");
-    widget->display_width = (guint)
-        gst_util_uint64_scale_int (height, display_ratio_num,
-        display_ratio_den);
-    widget->display_height = height;
-  } else if (width % display_ratio_num == 0) {
-    GST_DEBUG ("keeping video width");
-    widget->display_width = width;
-    widget->display_height = (guint)
-        gst_util_uint64_scale_int (width, display_ratio_den, display_ratio_num);
-  } else {
-    GST_DEBUG ("approximating while keeping video height");
-    widget->display_width = (guint)
-        gst_util_uint64_scale_int (height, display_ratio_num,
-        display_ratio_den);
-    widget->display_height = height;
-  }
-
-  GST_DEBUG ("scaling to %dx%d", widget->display_width, widget->display_height);
-}
-
-static gboolean
-_queue_draw (GtkGstBaseWidget * widget)
-{
-  GTK_GST_BASE_WIDGET_LOCK (widget);
-  widget->draw_id = 0;
-
-  if (widget->pending_resize) {
-    widget->pending_resize = FALSE;
-
-    widget->v_info = widget->pending_v_info;
-    widget->negotiated = TRUE;
-
-    _apply_par (widget);
-
-    gtk_widget_queue_resize (GTK_WIDGET (widget));
-  } else {
-    gtk_widget_queue_draw (GTK_WIDGET (widget));
-  }
-
-  GTK_GST_BASE_WIDGET_UNLOCK (widget);
-
-  return G_SOURCE_REMOVE;
-}
-
-static const gchar *
-_gdk_key_to_navigation_string (guint keyval)
-{
-  /* TODO: expand */
-  switch (keyval) {
-#define KEY(key) case GDK_KEY_ ## key: return G_STRINGIFY(key)
-      KEY (Up);
-      KEY (Down);
-      KEY (Left);
-      KEY (Right);
-      KEY (Home);
-      KEY (End);
-#undef KEY
-    default:
-      return NULL;
-  }
-}
-
-static GdkEvent *
-_get_current_event (GtkEventController * controller)
-{
-#if defined(BUILD_FOR_GTK4)
-  return gtk_event_controller_get_current_event (controller);
-#else
-  return gtk_get_current_event ();
-#endif
-}
-
-static void
-_gdk_event_free (GdkEvent * event)
-{
-#if !defined(BUILD_FOR_GTK4)
-  if (event)
-    gdk_event_free (event);
-#endif
-}
-
-static gboolean
-gtk_gst_base_widget_key_event (GtkEventControllerKey * key_controller,
-    guint keyval, guint keycode, GdkModifierType state)
-{
-  GtkEventController *controller = GTK_EVENT_CONTROLLER (key_controller);
-  GtkWidget *widget = gtk_event_controller_get_widget (controller);
-  GtkGstBaseWidget *base_widget = GTK_GST_BASE_WIDGET (widget);
-  GstElement *element;
-
-  if ((element = g_weak_ref_get (&base_widget->element))) {
-    if (GST_IS_NAVIGATION (element)) {
-      GdkEvent *event = _get_current_event (controller);
-      const gchar *str = _gdk_key_to_navigation_string (keyval);
-
-      if (str) {
-        const gchar *key_type =
-            gdk_event_get_event_type (event) ==
-            GDK_KEY_PRESS ? "key-press" : "key-release";
-        gst_navigation_send_key_event (GST_NAVIGATION (element), key_type, str);
-      }
-      _gdk_event_free (event);
-    }
-    g_object_unref (element);
-  }
-
-  return FALSE;
-}
-
-static void
-_fit_stream_to_allocated_size (GtkGstBaseWidget * base_widget,
-    GtkAllocation * allocation, GstVideoRectangle * result)
-{
-  if (base_widget->force_aspect_ratio) {
-    GstVideoRectangle src, dst;
-
-    src.x = 0;
-    src.y = 0;
-    src.w = base_widget->display_width;
-    src.h = base_widget->display_height;
-
-    dst.x = 0;
-    dst.y = 0;
-    dst.w = allocation->width;
-    dst.h = allocation->height;
-
-    gst_video_sink_center_rect (src, dst, result, TRUE);
-  } else {
-    result->x = 0;
-    result->y = 0;
-    result->w = allocation->width;
-    result->h = allocation->height;
-  }
-}
-
-static void
-_display_size_to_stream_size (GtkGstBaseWidget * base_widget, gdouble x,
-    gdouble y, gdouble * stream_x, gdouble * stream_y)
-{
-  gdouble stream_width, stream_height;
-  GtkAllocation allocation;
-  GstVideoRectangle result;
-
-  gtk_widget_get_allocation (GTK_WIDGET (base_widget), &allocation);
-  _fit_stream_to_allocated_size (base_widget, &allocation, &result);
-
-  stream_width = (gdouble) GST_VIDEO_INFO_WIDTH (&base_widget->v_info);
-  stream_height = (gdouble) GST_VIDEO_INFO_HEIGHT (&base_widget->v_info);
-
-  /* from display coordinates to stream coordinates */
-  if (result.w > 0)
-    *stream_x = (x - result.x) / result.w * stream_width;
-  else
-    *stream_x = 0.;
-
-  /* clip to stream size */
-  if (*stream_x < 0.)
-    *stream_x = 0.;
-  if (*stream_x > GST_VIDEO_INFO_WIDTH (&base_widget->v_info))
-    *stream_x = GST_VIDEO_INFO_WIDTH (&base_widget->v_info);
-
-  /* same for y-axis */
-  if (result.h > 0)
-    *stream_y = (y - result.y) / result.h * stream_height;
-  else
-    *stream_y = 0.;
-
-  if (*stream_y < 0.)
-    *stream_y = 0.;
-  if (*stream_y > GST_VIDEO_INFO_HEIGHT (&base_widget->v_info))
-    *stream_y = GST_VIDEO_INFO_HEIGHT (&base_widget->v_info);
-
-  GST_TRACE ("transform %fx%f into %fx%f", x, y, *stream_x, *stream_y);
-}
-
-static gboolean
-gtk_gst_base_widget_button_event (
-#if defined(BUILD_FOR_GTK4)
-    GtkGestureClick * gesture,
-#else
-    GtkGestureMultiPress * gesture,
-#endif
-    gint n_press, gdouble x, gdouble y)
-{
-  GtkEventController *controller = GTK_EVENT_CONTROLLER (gesture);
-  GtkWidget *widget = gtk_event_controller_get_widget (controller);
-  GtkGstBaseWidget *base_widget = GTK_GST_BASE_WIDGET (widget);
-  GstElement *element;
-
-  if ((element = g_weak_ref_get (&base_widget->element))) {
-    if (GST_IS_NAVIGATION (element)) {
-      GdkEvent *event = _get_current_event (controller);
-      const gchar *key_type =
-          gdk_event_get_event_type (event) == GDK_BUTTON_PRESS
-          ? "mouse-button-press" : "mouse-button-release";
-      gdouble stream_x, stream_y;
-#if !defined(BUILD_FOR_GTK4)
-      guint button;
-      gdk_event_get_button (event, &button);
-#endif
-
-      _display_size_to_stream_size (base_widget, x, y, &stream_x, &stream_y);
-
-      gst_navigation_send_mouse_event (GST_NAVIGATION (element), key_type,
-#if defined(BUILD_FOR_GTK4)
-          /* Gesture is set to ignore other buttons so we do not have to check */
-          GDK_BUTTON_PRIMARY,
-#else
-          button,
-#endif
-          stream_x, stream_y);
-
-      _gdk_event_free (event);
-    }
-    g_object_unref (element);
-  }
-
-  return FALSE;
-}
-
-static gboolean
-gtk_gst_base_widget_motion_event (GtkEventControllerMotion * motion_controller,
-    gdouble x, gdouble y)
-{
-  GtkEventController *controller = GTK_EVENT_CONTROLLER (motion_controller);
-  GtkWidget *widget = gtk_event_controller_get_widget (controller);
-  GtkGstBaseWidget *base_widget = GTK_GST_BASE_WIDGET (widget);
-  GstElement *element;
-
-  if ((element = g_weak_ref_get (&base_widget->element))) {
-    if (GST_IS_NAVIGATION (element)) {
-      gdouble stream_x, stream_y;
-
-      _display_size_to_stream_size (base_widget, x, y, &stream_x, &stream_y);
-
-      gst_navigation_send_mouse_event (GST_NAVIGATION (element), "mouse-move",
-          0, stream_x, stream_y);
-    }
-    g_object_unref (element);
-  }
-
-  return FALSE;
-}
-
-void
-gtk_gst_base_widget_class_init (GtkGstBaseWidgetClass * klass)
-{
-  GObjectClass *gobject_klass = (GObjectClass *) klass;
-  GtkWidgetClass *widget_klass = (GtkWidgetClass *) klass;
-
-  gobject_klass->set_property = gtk_gst_base_widget_set_property;
-  gobject_klass->get_property = gtk_gst_base_widget_get_property;
-
-  g_object_class_install_property (gobject_klass, PROP_FORCE_ASPECT_RATIO,
-      g_param_spec_boolean ("force-aspect-ratio",
-          "Force aspect ratio",
-          "When enabled, scaling will respect original aspect ratio",
-          DEFAULT_FORCE_ASPECT_RATIO,
-          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-  g_object_class_install_property (gobject_klass, PROP_PIXEL_ASPECT_RATIO,
-      gst_param_spec_fraction ("pixel-aspect-ratio", "Pixel Aspect Ratio",
-          "The pixel aspect ratio of the device", DEFAULT_PAR_N, DEFAULT_PAR_D,
-          G_MAXINT, 1, 1, 1, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-  g_object_class_install_property (gobject_klass, PROP_IGNORE_ALPHA,
-      g_param_spec_boolean ("ignore-alpha", "Ignore Alpha",
-          "When enabled, alpha will be ignored and converted to black",
-          DEFAULT_IGNORE_ALPHA, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-  g_object_class_install_property (gobject_klass, PROP_IGNORE_TEXTURES,
-      g_param_spec_boolean ("ignore-textures", "Ignore Textures",
-          "When enabled, textures will be ignored and not drawn",
-          DEFAULT_IGNORE_TEXTURES, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-
-#if defined(BUILD_FOR_GTK4)
-  widget_klass->measure = gtk_gst_base_widget_measure;
-#else
-  widget_klass->get_preferred_width = gtk_gst_base_widget_get_preferred_width;
-  widget_klass->get_preferred_height = gtk_gst_base_widget_get_preferred_height;
-#endif
-
-  GST_DEBUG_CATEGORY_INIT (gst_debug_gtk_base_widget, "gtkbasewidget", 0,
-      "GTK Video Base Widget");
-}
-
-void
-gtk_gst_base_widget_init (GtkGstBaseWidget * widget)
-{
-  widget->force_aspect_ratio = DEFAULT_FORCE_ASPECT_RATIO;
-  widget->par_n = DEFAULT_PAR_N;
-  widget->par_d = DEFAULT_PAR_D;
-  widget->ignore_alpha = DEFAULT_IGNORE_ALPHA;
-  widget->ignore_textures = DEFAULT_IGNORE_TEXTURES;
-
-  gst_video_info_init (&widget->v_info);
-  gst_video_info_init (&widget->pending_v_info);
-
-  g_weak_ref_init (&widget->element, NULL);
-  g_mutex_init (&widget->lock);
-
-  widget->key_controller = gtk_event_controller_key_new (
-#if !defined(BUILD_FOR_GTK4)
-      GTK_WIDGET (widget)
-#endif
-      );
-  g_signal_connect (widget->key_controller, "key-pressed",
-      G_CALLBACK (gtk_gst_base_widget_key_event), NULL);
-  g_signal_connect (widget->key_controller, "key-released",
-      G_CALLBACK (gtk_gst_base_widget_key_event), NULL);
-
-  widget->motion_controller = gtk_event_controller_motion_new (
-#if !defined(BUILD_FOR_GTK4)
-      GTK_WIDGET (widget)
-#endif
-      );
-  g_signal_connect (widget->motion_controller, "motion",
-      G_CALLBACK (gtk_gst_base_widget_motion_event), NULL);
-
-  widget->click_gesture =
-#if defined(BUILD_FOR_GTK4)
-      gtk_gesture_click_new ();
-#else
-      gtk_gesture_multi_press_new (GTK_WIDGET (widget));
-#endif
-  g_signal_connect (widget->click_gesture, "pressed",
-      G_CALLBACK (gtk_gst_base_widget_button_event), NULL);
-  g_signal_connect (widget->click_gesture, "released",
-      G_CALLBACK (gtk_gst_base_widget_button_event), NULL);
-
-#if defined(BUILD_FOR_GTK4)
-  /* Otherwise widget in grid will appear as a 1x1px
-   * video which might be misleading for users */
-  gtk_widget_set_hexpand (GTK_WIDGET (widget), TRUE);
-  gtk_widget_set_vexpand (GTK_WIDGET (widget), TRUE);
-
-  gtk_widget_set_focusable (GTK_WIDGET (widget), TRUE);
-  gtk_gesture_single_set_button (GTK_GESTURE_SINGLE (widget->click_gesture),
-      GDK_BUTTON_PRIMARY);
-
-  gtk_widget_add_controller (GTK_WIDGET (widget), widget->key_controller);
-  gtk_widget_add_controller (GTK_WIDGET (widget), widget->motion_controller);
-  gtk_widget_add_controller (GTK_WIDGET (widget),
-      GTK_EVENT_CONTROLLER (widget->click_gesture));
-#endif
-
-  gtk_widget_set_can_focus (GTK_WIDGET (widget), TRUE);
-}
-
-void
-gtk_gst_base_widget_finalize (GObject * object)
-{
-  GtkGstBaseWidget *widget = GTK_GST_BASE_WIDGET (object);
-
-  /* GTK4 takes ownership of EventControllers
-   * while GTK3 still needs manual unref */
-#if !defined(BUILD_FOR_GTK4)
-  g_object_unref (widget->key_controller);
-  g_object_unref (widget->motion_controller);
-  g_object_unref (widget->click_gesture);
-#endif
-
-  gst_buffer_replace (&widget->pending_buffer, NULL);
-  gst_buffer_replace (&widget->buffer, NULL);
-  g_mutex_clear (&widget->lock);
-  g_weak_ref_clear (&widget->element);
-
-  if (widget->draw_id)
-    g_source_remove (widget->draw_id);
-}
-
-void
-gtk_gst_base_widget_set_element (GtkGstBaseWidget * widget,
-    GstElement * element)
-{
-  g_weak_ref_set (&widget->element, element);
-}
-
-gboolean
-gtk_gst_base_widget_set_format (GtkGstBaseWidget * widget,
-    GstVideoInfo * v_info)
-{
-  GTK_GST_BASE_WIDGET_LOCK (widget);
-
-  if (gst_video_info_is_equal (&widget->pending_v_info, v_info)) {
-    GTK_GST_BASE_WIDGET_UNLOCK (widget);
-    return TRUE;
-  }
-
-  if (!_calculate_par (widget, v_info)) {
-    GTK_GST_BASE_WIDGET_UNLOCK (widget);
-    return FALSE;
-  }
-
-  widget->pending_resize = TRUE;
-  widget->pending_v_info = *v_info;
-
-  GTK_GST_BASE_WIDGET_UNLOCK (widget);
-
-  return TRUE;
-}
-
-void
-gtk_gst_base_widget_set_buffer (GtkGstBaseWidget * widget, GstBuffer * buffer)
-{
-  /* As we have no type, this is better then no check */
-  g_return_if_fail (GTK_IS_WIDGET (widget));
-
-  GTK_GST_BASE_WIDGET_LOCK (widget);
-
-  gst_buffer_replace (&widget->pending_buffer, buffer);
-
-  if (!widget->draw_id) {
-    widget->draw_id = g_idle_add_full (G_PRIORITY_DEFAULT,
-        (GSourceFunc) _queue_draw, widget, NULL);
-  }
-
-  GTK_GST_BASE_WIDGET_UNLOCK (widget);
-}

lib/gst/clapper/gtk4/gtkgstbasewidget.h

@@ -1,102 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-#ifndef __GTK_GST_BASE_WIDGET_H__
-#define __GTK_GST_BASE_WIDGET_H__
-
-#include <gtk/gtk.h>
-#include <gst/gst.h>
-#include <gst/video/video.h>
-
-#if !defined(BUILD_FOR_GTK4)
-#include <gdk/gdk.h>
-#endif
-
-#define GTK_GST_BASE_WIDGET(w)         ((GtkGstBaseWidget *)(w))
-#define GTK_GST_BASE_WIDGET_CLASS(k)   ((GtkGstBaseWidgetClass *)(k))
-#define GTK_GST_BASE_WIDGET_LOCK(w)    g_mutex_lock(&((GtkGstBaseWidget*)(w))->lock)
-#define GTK_GST_BASE_WIDGET_UNLOCK(w)  g_mutex_unlock(&((GtkGstBaseWidget*)(w))->lock)
-
-G_BEGIN_DECLS
-
-typedef struct _GtkGstBaseWidget GtkGstBaseWidget;
-typedef struct _GtkGstBaseWidgetClass GtkGstBaseWidgetClass;
-
-struct _GtkGstBaseWidget
-{
-  union {
-    GtkGLArea gl_area;
-  } parent;
-
-  /* properties */
-  gboolean force_aspect_ratio;
-  gint par_n, par_d;
-  gboolean ignore_alpha;
-  gboolean ignore_textures;
-
-  gint display_width;
-  gint display_height;
-
-  gboolean negotiated;
-  GstBuffer *pending_buffer;
-  GstBuffer *buffer;
-  GstVideoInfo v_info;
-
-  /* resize */
-  gboolean pending_resize;
-  GstVideoInfo pending_v_info;
-  guint display_ratio_num;
-  guint display_ratio_den;
-
-  /*< private >*/
-  GMutex lock;
-  GWeakRef element;
-
-  /* event controllers */
-  GtkEventController *key_controller;
-  GtkEventController *motion_controller;
-  GtkGesture *click_gesture;
-
-  /* Pending draw idles callback */
-  guint draw_id;
-};
-
-struct _GtkGstBaseWidgetClass
-{
-  union {
-    GtkGLAreaClass gl_area_class;
-  } parent_class;
-};
-
-/* For implementer */
-void            gtk_gst_base_widget_class_init           (GtkGstBaseWidgetClass * klass);
-void            gtk_gst_base_widget_init                 (GtkGstBaseWidget * widget);
-
-void            gtk_gst_base_widget_finalize             (GObject * object);
-
-/* API */
-gboolean        gtk_gst_base_widget_set_format           (GtkGstBaseWidget * widget, GstVideoInfo * v_info);
-void            gtk_gst_base_widget_set_buffer           (GtkGstBaseWidget * widget, GstBuffer * buffer);
-void            gtk_gst_base_widget_set_element          (GtkGstBaseWidget * widget, GstElement * element);
-
-G_END_DECLS
-
-#endif /* __GTK_GST_BASE_WIDGET_H__ */

lib/gst/clapper/gtk4/gtkgstglwidget.c

@@ -1,604 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- * Copyright (C) 2020 Rafał Dzięgiel <rafostar.github@gmail.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include <stdio.h>
-
-#include "gtkgstglwidget.h"
-#include "gstgtkutils.h"
-#include <gst/gl/gstglfuncs.h>
-#include <gst/video/video.h>
-
-#if GST_GL_HAVE_WINDOW_X11 && defined (GDK_WINDOWING_X11)
-#if defined(BUILD_FOR_GTK4)
-#include <gdk/x11/gdkx.h>
-#else
-#include <gdk/gdkx.h>
-#endif
-#include <gst/gl/x11/gstgldisplay_x11.h>
-#endif
-
-#if GST_GL_HAVE_WINDOW_WAYLAND && defined (GDK_WINDOWING_WAYLAND)
-#if defined(BUILD_FOR_GTK4)
-#include <gdk/wayland/gdkwayland.h>
-#else
-#include <gdk/gdkwayland.h>
-#endif
-#include <gst/gl/wayland/gstgldisplay_wayland.h>
-#endif
-
-/**
- * SECTION:gtkgstglwidget
- * @title: GtkGstGlWidget
- * @short_description: a #GtkGLArea that renders GStreamer video #GstBuffers
- * @see_also: #GtkGLArea, #GstBuffer
- *
- * #GtkGstGLWidget is an #GtkWidget that renders GStreamer video buffers.
- */
-
-#define GST_CAT_DEFAULT gtk_gst_gl_widget_debug
-GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
-
-struct _GtkGstGLWidgetPrivate
-{
-  gboolean initiated;
-  GstGLDisplay *display;
-  GdkGLContext *gdk_context;
-  GstGLContext *other_context;
-  GstGLContext *context;
-  GstGLUpload *upload;
-  GstGLShader *shader;
-  GLuint vao;
-  GLuint vertex_buffer;
-  GLint attr_position;
-  GLint attr_texture;
-  GLuint current_tex;
-  GstGLOverlayCompositor *overlay_compositor;
-};
-
-static const GLfloat vertices[] = {
-  1.0f, 1.0f, 0.0f, 1.0f, 0.0f,
-  -1.0f, 1.0f, 0.0f, 0.0f, 0.0f,
-  -1.0f, -1.0f, 0.0f, 0.0f, 1.0f,
-  1.0f, -1.0f, 0.0f, 1.0f, 1.0f
-};
-
-G_DEFINE_TYPE_WITH_CODE (GtkGstGLWidget, gtk_gst_gl_widget, GTK_TYPE_GL_AREA,
-    G_ADD_PRIVATE (GtkGstGLWidget)
-    GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "gtkgstglwidget", 0,
-        "GTK Gst GL Widget"));
-
-static void
-gtk_gst_gl_widget_bind_buffer (GtkGstGLWidget * gst_widget)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  const GstGLFuncs *gl = priv->context->gl_vtable;
-
-  gl->BindBuffer (GL_ARRAY_BUFFER, priv->vertex_buffer);
-
-  /* Load the vertex position */
-  gl->VertexAttribPointer (priv->attr_position, 3, GL_FLOAT, GL_FALSE,
-      5 * sizeof (GLfloat), (void *) 0);
-
-  /* Load the texture coordinate */
-  gl->VertexAttribPointer (priv->attr_texture, 2, GL_FLOAT, GL_FALSE,
-      5 * sizeof (GLfloat), (void *) (3 * sizeof (GLfloat)));
-
-  gl->EnableVertexAttribArray (priv->attr_position);
-  gl->EnableVertexAttribArray (priv->attr_texture);
-}
-
-static void
-gtk_gst_gl_widget_unbind_buffer (GtkGstGLWidget * gst_widget)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  const GstGLFuncs *gl = priv->context->gl_vtable;
-
-  gl->BindBuffer (GL_ARRAY_BUFFER, 0);
-
-  gl->DisableVertexAttribArray (priv->attr_position);
-  gl->DisableVertexAttribArray (priv->attr_texture);
-}
-
-static void
-gtk_gst_gl_widget_init_redisplay (GtkGstGLWidget * gst_widget)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  const GstGLFuncs *gl = priv->context->gl_vtable;
-  GError *error = NULL;
-
-  gst_gl_insert_debug_marker (priv->other_context, "initializing redisplay");
-  if (!(priv->shader = gst_gl_shader_new_default (priv->context, &error))) {
-    GST_ERROR ("Failed to initialize shader: %s", error->message);
-    return;
-  }
-
-  priv->attr_position =
-      gst_gl_shader_get_attribute_location (priv->shader, "a_position");
-  priv->attr_texture =
-      gst_gl_shader_get_attribute_location (priv->shader, "a_texcoord");
-
-  if (gl->GenVertexArrays) {
-    gl->GenVertexArrays (1, &priv->vao);
-    gl->BindVertexArray (priv->vao);
-  }
-
-  gl->GenBuffers (1, &priv->vertex_buffer);
-  gl->BindBuffer (GL_ARRAY_BUFFER, priv->vertex_buffer);
-  gl->BufferData (GL_ARRAY_BUFFER, 4 * 5 * sizeof (GLfloat), vertices,
-      GL_STATIC_DRAW);
-
-  if (gl->GenVertexArrays) {
-    gtk_gst_gl_widget_bind_buffer (gst_widget);
-    gl->BindVertexArray (0);
-  }
-
-  gl->BindBuffer (GL_ARRAY_BUFFER, 0);
-
-  priv->overlay_compositor =
-      gst_gl_overlay_compositor_new (priv->other_context);
-
-  priv->initiated = TRUE;
-}
-
-static void
-_redraw_texture (GtkGstGLWidget * gst_widget, guint tex)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  const GstGLFuncs *gl = priv->context->gl_vtable;
-  const GLushort indices[] = { 0, 1, 2, 0, 2, 3 };
-
-  if (gst_widget->base.force_aspect_ratio) {
-    GstVideoRectangle src, dst, result;
-    gint widget_width, widget_height, widget_scale;
-
-    gl->ClearColor (0.0, 0.0, 0.0, 1.0);
-    gl->Clear (GL_COLOR_BUFFER_BIT);
-
-    widget_scale = gtk_widget_get_scale_factor ((GtkWidget *) gst_widget);
-    widget_width = gtk_widget_get_allocated_width ((GtkWidget *) gst_widget);
-    widget_height = gtk_widget_get_allocated_height ((GtkWidget *) gst_widget);
-
-    src.x = 0;
-    src.y = 0;
-    src.w = gst_widget->base.display_width;
-    src.h = gst_widget->base.display_height;
-
-    dst.x = 0;
-    dst.y = 0;
-    dst.w = widget_width * widget_scale;
-    dst.h = widget_height * widget_scale;
-
-    gst_video_sink_center_rect (src, dst, &result, TRUE);
-
-    gl->Viewport (result.x, result.y, result.w, result.h);
-  }
-
-  gst_gl_shader_use (priv->shader);
-
-  if (gl->BindVertexArray)
-    gl->BindVertexArray (priv->vao);
-  gtk_gst_gl_widget_bind_buffer (gst_widget);
-
-  gl->ActiveTexture (GL_TEXTURE0);
-  gl->BindTexture (GL_TEXTURE_2D, tex);
-  gst_gl_shader_set_uniform_1i (priv->shader, "tex", 0);
-
-  gl->DrawElements (GL_TRIANGLES, 6, GL_UNSIGNED_SHORT, indices);
-
-  if (gl->BindVertexArray)
-    gl->BindVertexArray (0);
-  else
-    gtk_gst_gl_widget_unbind_buffer (gst_widget);
-
-  gl->BindTexture (GL_TEXTURE_2D, 0);
-}
-
-static inline void
-_draw_black (GstGLContext * context)
-{
-  const GstGLFuncs *gl = context->gl_vtable;
-
-  gst_gl_insert_debug_marker (context, "rendering black");
-  gl->ClearColor (0.0, 0.0, 0.0, 1.0);
-  gl->Clear (GL_COLOR_BUFFER_BIT);
-}
-
-static inline void
-_draw_black_with_gdk (GdkGLContext * gdk_context)
-{
-  GST_DEBUG ("rendering empty frame with gdk context %p", gdk_context);
-  glClearColor (0.0, 0.0, 0.0, 1.0);
-  glClear (GL_COLOR_BUFFER_BIT);
-}
-
-static gboolean
-gtk_gst_gl_widget_render (GtkGLArea * widget, GdkGLContext * context)
-{
-  GtkGstGLWidgetPrivate *priv = GTK_GST_GL_WIDGET (widget)->priv;
-  GtkGstBaseWidget *base_widget = GTK_GST_BASE_WIDGET (widget);
-
-  GTK_GST_BASE_WIDGET_LOCK (widget);
-
-  /* Draw black with GDK context when priv is not available yet.
-     GTK calls render with GDK context already active. */
-  if (!priv->context || !priv->other_context || base_widget->ignore_textures) {
-    _draw_black_with_gdk (context);
-    goto done;
-  }
-
-  gst_gl_context_activate (priv->other_context, TRUE);
-
-  if (!priv->initiated || !base_widget->negotiated) {
-    if (!priv->initiated)
-      gtk_gst_gl_widget_init_redisplay (GTK_GST_GL_WIDGET (widget));
-
-    _draw_black (priv->other_context);
-    goto done;
-  }
-
-  /* Upload latest buffer */
-  if (base_widget->pending_buffer) {
-    GstBuffer *buffer = base_widget->pending_buffer;
-    GstVideoFrame gl_frame;
-    GstGLSyncMeta *sync_meta;
-
-    if (!gst_video_frame_map (&gl_frame, &base_widget->v_info, buffer,
-            GST_MAP_READ | GST_MAP_GL)) {
-      _draw_black (priv->other_context);
-      goto done;
-    }
-
-    priv->current_tex = *(guint *) gl_frame.data[0];
-    gst_gl_insert_debug_marker (priv->other_context, "redrawing texture %u",
-        priv->current_tex);
-
-    gst_gl_overlay_compositor_upload_overlays (priv->overlay_compositor,
-        buffer);
-
-    sync_meta = gst_buffer_get_gl_sync_meta (buffer);
-    if (sync_meta) {
-      /* XXX: the set_sync() seems to be needed for resizing */
-      gst_gl_sync_meta_set_sync_point (sync_meta, priv->context);
-      gst_gl_sync_meta_wait (sync_meta, priv->other_context);
-    }
-
-    gst_video_frame_unmap (&gl_frame);
-
-    if (base_widget->buffer)
-      gst_buffer_unref (base_widget->buffer);
-
-    /* Keep the buffer to ensure current_tex stay valid */
-    base_widget->buffer = buffer;
-    base_widget->pending_buffer = NULL;
-  }
-
-  GST_DEBUG ("rendering buffer %p with gdk context %p",
-      base_widget->buffer, context);
-
-  _redraw_texture (GTK_GST_GL_WIDGET (widget), priv->current_tex);
-  gst_gl_overlay_compositor_draw_overlays (priv->overlay_compositor);
-
-  gst_gl_insert_debug_marker (priv->other_context, "texture %u redrawn",
-      priv->current_tex);
-
-done:
-  if (priv->other_context)
-    gst_gl_context_activate (priv->other_context, FALSE);
-
-  GTK_GST_BASE_WIDGET_UNLOCK (widget);
-  return FALSE;
-}
-
-static void
-_reset_gl (GtkGstGLWidget * gst_widget)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  const GstGLFuncs *gl = priv->other_context->gl_vtable;
-
-  if (!priv->gdk_context)
-    priv->gdk_context = gtk_gl_area_get_context (GTK_GL_AREA (gst_widget));
-
-  if (priv->gdk_context == NULL)
-    return;
-
-  gdk_gl_context_make_current (priv->gdk_context);
-  gst_gl_context_activate (priv->other_context, TRUE);
-
-  if (priv->vao) {
-    gl->DeleteVertexArrays (1, &priv->vao);
-    priv->vao = 0;
-  }
-
-  if (priv->vertex_buffer) {
-    gl->DeleteBuffers (1, &priv->vertex_buffer);
-    priv->vertex_buffer = 0;
-  }
-
-  if (priv->upload) {
-    gst_object_unref (priv->upload);
-    priv->upload = NULL;
-  }
-
-  if (priv->shader) {
-    gst_object_unref (priv->shader);
-    priv->shader = NULL;
-  }
-
-  if (priv->overlay_compositor)
-    gst_object_unref (priv->overlay_compositor);
-
-  gst_gl_context_activate (priv->other_context, FALSE);
-
-  gst_object_unref (priv->other_context);
-  priv->other_context = NULL;
-
-  gdk_gl_context_clear_current ();
-
-  g_object_unref (priv->gdk_context);
-  priv->gdk_context = NULL;
-}
-
-static void
-gtk_gst_gl_widget_finalize (GObject * object)
-{
-  GtkGstGLWidgetPrivate *priv = GTK_GST_GL_WIDGET (object)->priv;
-  GtkGstBaseWidget *base_widget = GTK_GST_BASE_WIDGET (object);
-
-  if (priv->other_context)
-    gst_gtk_invoke_on_main ((GThreadFunc) (GCallback) _reset_gl, base_widget);
-
-  if (priv->context)
-    gst_object_unref (priv->context);
-
-  if (priv->display)
-    gst_object_unref (priv->display);
-
-  gtk_gst_base_widget_finalize (object);
-  G_OBJECT_CLASS (gtk_gst_gl_widget_parent_class)->finalize (object);
-}
-
-static void
-gtk_gst_gl_widget_class_init (GtkGstGLWidgetClass * klass)
-{
-  GObjectClass *gobject_klass = (GObjectClass *) klass;
-  GtkGLAreaClass *gl_widget_klass = (GtkGLAreaClass *) klass;
-
-  gtk_gst_base_widget_class_init (GTK_GST_BASE_WIDGET_CLASS (klass));
-
-  gobject_klass->finalize = gtk_gst_gl_widget_finalize;
-  gl_widget_klass->render = gtk_gst_gl_widget_render;
-}
-
-static void
-gtk_gst_gl_widget_init (GtkGstGLWidget * gst_widget)
-{
-  GtkGstBaseWidget *base_widget = GTK_GST_BASE_WIDGET (gst_widget);
-  GdkDisplay *display;
-  GtkGstGLWidgetPrivate *priv;
-
-  gtk_gst_base_widget_init (base_widget);
-
-  gst_widget->priv = priv = gtk_gst_gl_widget_get_instance_private (gst_widget);
-
-  display = gdk_display_get_default ();
-
-#if GST_GL_HAVE_WINDOW_X11 && defined (GDK_WINDOWING_X11)
-  if (GDK_IS_X11_DISPLAY (display)) {
-    priv->display = (GstGLDisplay *)
-        gst_gl_display_x11_new_with_display (gdk_x11_display_get_xdisplay
-        (display));
-  }
-#endif
-#if GST_GL_HAVE_WINDOW_WAYLAND && defined (GDK_WINDOWING_WAYLAND)
-  if (GDK_IS_WAYLAND_DISPLAY (display)) {
-    struct wl_display *wayland_display =
-        gdk_wayland_display_get_wl_display (display);
-    priv->display = (GstGLDisplay *)
-        gst_gl_display_wayland_new_with_display (wayland_display);
-  }
-#endif
-
-  (void) display;
-
-  if (!priv->display)
-    priv->display = gst_gl_display_new ();
-
-  GST_INFO ("Created %" GST_PTR_FORMAT, priv->display);
-
-  /* GTK4 always has alpha */
-#if !defined(BUILD_FOR_GTK4)
-  gtk_gl_area_set_has_alpha (GTK_GL_AREA (gst_widget),
-      !base_widget->ignore_alpha);
-#endif
-}
-
-static void
-_get_gl_context (GtkGstGLWidget * gst_widget)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  GstGLPlatform platform = GST_GL_PLATFORM_NONE;
-  GstGLAPI gl_api = GST_GL_API_NONE;
-  guintptr gl_handle = 0;
-
-  gtk_widget_realize (GTK_WIDGET (gst_widget));
-
-  if (priv->other_context)
-    gst_object_unref (priv->other_context);
-  priv->other_context = NULL;
-
-  if (priv->gdk_context)
-    g_object_unref (priv->gdk_context);
-
-  priv->gdk_context = gtk_gl_area_get_context (GTK_GL_AREA (gst_widget));
-  if (priv->gdk_context == NULL) {
-    GError *error = gtk_gl_area_get_error (GTK_GL_AREA (gst_widget));
-
-    GST_ERROR_OBJECT (gst_widget, "Error creating GdkGLContext : %s",
-        error ? error->message : "No error set by Gdk");
-    g_clear_error (&error);
-    return;
-  }
-
-  g_object_ref (priv->gdk_context);
-
-  gdk_gl_context_make_current (priv->gdk_context);
-
-#if GST_GL_HAVE_WINDOW_X11 && defined (GDK_WINDOWING_X11)
-  if (GST_IS_GL_DISPLAY_X11 (priv->display)) {
-#if GST_GL_HAVE_PLATFORM_GLX
-    if (!gl_handle) {
-      platform = GST_GL_PLATFORM_GLX;
-      gl_handle = gst_gl_context_get_current_gl_context (platform);
-    }
-#endif
-
-#if GST_GL_HAVE_PLATFORM_EGL
-    if (!gl_handle) {
-      platform = GST_GL_PLATFORM_EGL;
-      gl_handle = gst_gl_context_get_current_gl_context (platform);
-    }
-#endif
-
-    if (gl_handle) {
-      gl_api = gst_gl_context_get_current_gl_api (platform, NULL, NULL);
-      priv->other_context =
-          gst_gl_context_new_wrapped (priv->display, gl_handle,
-          platform, gl_api);
-    }
-  }
-#endif
-#if GST_GL_HAVE_WINDOW_WAYLAND && GST_GL_HAVE_PLATFORM_EGL && defined (GDK_WINDOWING_WAYLAND)
-  if (GST_IS_GL_DISPLAY_WAYLAND (priv->display)) {
-    platform = GST_GL_PLATFORM_EGL;
-    gl_api = gst_gl_context_get_current_gl_api (platform, NULL, NULL);
-    gl_handle = gst_gl_context_get_current_gl_context (platform);
-    if (gl_handle)
-      priv->other_context =
-          gst_gl_context_new_wrapped (priv->display, gl_handle,
-          platform, gl_api);
-  }
-#endif
-
-  (void) platform;
-  (void) gl_api;
-  (void) gl_handle;
-
-  if (priv->other_context) {
-    GError *error = NULL;
-
-    GST_INFO ("Retrieved Gdk OpenGL context %" GST_PTR_FORMAT,
-        priv->other_context);
-    gst_gl_context_activate (priv->other_context, TRUE);
-    if (!gst_gl_context_fill_info (priv->other_context, &error)) {
-      GST_ERROR ("failed to retrieve gdk context info: %s", error->message);
-      g_clear_error (&error);
-      g_object_unref (priv->other_context);
-      priv->other_context = NULL;
-    } else {
-      gst_gl_context_activate (priv->other_context, FALSE);
-    }
-  } else {
-    GST_WARNING ("Could not retrieve Gdk OpenGL context");
-  }
-}
-
-GtkWidget *
-gtk_gst_gl_widget_new (void)
-{
-  return (GtkWidget *) g_object_new (GTK_TYPE_GST_GL_WIDGET, NULL);
-}
-
-gboolean
-gtk_gst_gl_widget_init_winsys (GtkGstGLWidget * gst_widget)
-{
-  GtkGstGLWidgetPrivate *priv = gst_widget->priv;
-  GError *error = NULL;
-
-  g_return_val_if_fail (GTK_IS_GST_GL_WIDGET (gst_widget), FALSE);
-  g_return_val_if_fail (priv->display != NULL, FALSE);
-
-  GTK_GST_BASE_WIDGET_LOCK (gst_widget);
-
-  if (priv->display && priv->gdk_context && priv->other_context) {
-    GST_TRACE ("have already initialized contexts");
-    GTK_GST_BASE_WIDGET_UNLOCK (gst_widget);
-    return TRUE;
-  }
-
-  if (!priv->other_context) {
-    GTK_GST_BASE_WIDGET_UNLOCK (gst_widget);
-    gst_gtk_invoke_on_main ((GThreadFunc) (GCallback) _get_gl_context, gst_widget);
-    GTK_GST_BASE_WIDGET_LOCK (gst_widget);
-  }
-
-  if (!GST_IS_GL_CONTEXT (priv->other_context)) {
-    GST_FIXME ("Could not retrieve Gdk OpenGL context");
-    GTK_GST_BASE_WIDGET_UNLOCK (gst_widget);
-    return FALSE;
-  }
-
-  GST_OBJECT_LOCK (priv->display);
-  if (!gst_gl_display_create_context (priv->display, priv->other_context,
-          &priv->context, &error)) {
-    GST_WARNING ("Could not create OpenGL context: %s",
-        error ? error->message : "Unknown");
-    g_clear_error (&error);
-    GST_OBJECT_UNLOCK (priv->display);
-    GTK_GST_BASE_WIDGET_UNLOCK (gst_widget);
-    return FALSE;
-  }
-  gst_gl_display_add_context (priv->display, priv->context);
-  GST_OBJECT_UNLOCK (priv->display);
-
-  GTK_GST_BASE_WIDGET_UNLOCK (gst_widget);
-  return TRUE;
-}
-
-GstGLContext *
-gtk_gst_gl_widget_get_gtk_context (GtkGstGLWidget * gst_widget)
-{
-  if (!gst_widget->priv->other_context)
-    return NULL;
-
-  return gst_object_ref (gst_widget->priv->other_context);
-}
-
-GstGLContext *
-gtk_gst_gl_widget_get_context (GtkGstGLWidget * gst_widget)
-{
-  if (!gst_widget->priv->context)
-    return NULL;
-
-  return gst_object_ref (gst_widget->priv->context);
-}
-
-GstGLDisplay *
-gtk_gst_gl_widget_get_display (GtkGstGLWidget * gst_widget)
-{
-  if (!gst_widget->priv->display)
-    return NULL;
-
-  return gst_object_ref (gst_widget->priv->display);
-}

lib/gst/clapper/gtk4/gtkgstglwidget.h

@@ -1,77 +0,0 @@
-/*
- * GStreamer
- * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-#ifndef __GTK_GST_GL_WIDGET_H__
-#define __GTK_GST_GL_WIDGET_H__
-
-#include <gtk/gtk.h>
-#include <gst/gst.h>
-#include <gst/gl/gl.h>
-
-#include "gtkgstbasewidget.h"
-
-G_BEGIN_DECLS
-
-GType gtk_gst_gl_widget_get_type (void);
-#define GTK_TYPE_GST_GL_WIDGET (gtk_gst_gl_widget_get_type())
-#define GTK_GST_GL_WIDGET(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj),GTK_TYPE_GST_GL_WIDGET,GtkGstGLWidget))
-#define GTK_GST_GL_WIDGET_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass),GTK_TYPE_GST_GL_WIDGET,GtkGstGLWidgetClass))
-#define GTK_IS_GST_GL_WIDGET(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj),GTK_TYPE_GST_GL_WIDGET))
-#define GTK_IS_GST_GL_WIDGET_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass),GTK_TYPE_GST_GL_WIDGET))
-#define GTK_GST_GL_WIDGET_CAST(obj) ((GtkGstGLWidget*)(obj))
-
-typedef struct _GtkGstGLWidget GtkGstGLWidget;
-typedef struct _GtkGstGLWidgetClass GtkGstGLWidgetClass;
-typedef struct _GtkGstGLWidgetPrivate GtkGstGLWidgetPrivate;
-
-/**
- * GtkGstGLWidget:
- *
- * Opaque #GtkGstGLWidget object
- */
-struct _GtkGstGLWidget
-{
-  /* <private> */
-  GtkGstBaseWidget base;
-
-  GtkGstGLWidgetPrivate   *priv;
-};
-
-/**
- * GtkGstGLWidgetClass:
- *
- * The #GtkGstGLWidgetClass struct only contains private data
- */
-struct _GtkGstGLWidgetClass
-{
-  /* <private> */
-  GtkGstBaseWidgetClass base_class;
-};
-
-GtkWidget *     gtk_gst_gl_widget_new (void);
-
-gboolean        gtk_gst_gl_widget_init_winsys          (GtkGstGLWidget * widget);
-GstGLDisplay *  gtk_gst_gl_widget_get_display          (GtkGstGLWidget * widget);
-GstGLContext *  gtk_gst_gl_widget_get_context          (GtkGstGLWidget * widget);
-GstGLContext *  gtk_gst_gl_widget_get_gtk_context      (GtkGstGLWidget * widget);
-
-G_END_DECLS
-
-#endif /* __GTK_GST_GL_WIDGET_H__ */

lib/gst/clapper/meson.build

@@ -6,13 +6,13 @@ gstclapper_sources = [
   'gstclapper-g-main-context-signal-dispatcher.c',
   'gstclapper-video-overlay-video-renderer.c',
   'gstclapper-visualization.c',
+  'gstclapper-mpris.c',
   'gstclapper-gtk4-plugin.c',
 
-  'gtk4/gstgtkbasesink.c',
+  'gtk4/gstclapperglsink.c',
   'gtk4/gstgtkutils.c',
-  'gtk4/gtkgstbasewidget.c',
-  'gtk4/gstgtkglsink.c',
-  'gtk4/gtkgstglwidget.c',
+  'gtk4/gtkclapperglwidget.c',
+  'gtk4/gstclapperglutils.c',
 ]
 gstclapper_headers = [
   'clapper.h',
@@ -25,6 +25,7 @@ gstclapper_headers = [
   'gstclapper-g-main-context-signal-dispatcher.h',
   'gstclapper-video-overlay-video-renderer.h',
   'gstclapper-visualization.h',
+  'gstclapper-mpris.h',
   'gstclapper-gtk4-plugin.h',
 ]
 gstclapper_defines = [
@@ -32,7 +33,6 @@ gstclapper_defines = [
   '-DBUILDING_GST_CLAPPER',
   '-DGST_USE_UNSTABLE_API',
   '-DHAVE_GTK_GL',
-  '-DBUILD_FOR_GTK4',
 ]
 gtk_deps = [gstgl_dep, gstglproto_dep]
 have_gtk_gl_windowing = false
@@ -43,10 +43,13 @@ if not gtk4_dep.version().version_compare('>=4.0.0')
   error('GTK4 version on this system is too old')
 endif
 
-if gst_gl_have_window_x11 and gst_gl_have_platform_glx
+if gst_gl_have_window_x11 and (gst_gl_have_platform_egl or gst_gl_have_platform_glx)
   gtk_x11_dep = dependency('gtk4-x11', required: false)
   if gtk_x11_dep.found()
-    gtk_deps += [gtk_x11_dep, gstglx11_dep]
+    gtk_deps += gtk_x11_dep
+    if gst_gl_have_platform_glx
+      gtk_deps += gstglx11_dep
+    endif
     have_gtk_gl_windowing = true
   endif
 endif
@@ -54,24 +57,35 @@ endif
 if gst_gl_have_window_wayland and gst_gl_have_platform_egl
   gtk_wayland_dep = dependency('gtk4-wayland', required: false)
   if gtk_wayland_dep.found()
-    gtk_deps += [gtk_wayland_dep, gstglegl_dep, gstglwayland_dep]
+    gtk_deps += [gtk_wayland_dep, gstglwayland_dep]
     have_gtk_gl_windowing = true
   endif
 endif
 
+if gst_gl_have_platform_egl
+  gtk_deps += gstglegl_dep
+endif
+
 if not have_gtk_gl_windowing
   error('GTK4 widget requires GL windowing')
 endif
 
+gstclapper_mpris_gdbus = gnome.gdbus_codegen('gstclapper-mpris-gdbus',
+  sources: '../../../data/gstclapper-mpris-gdbus.xml',
+  interface_prefix: 'org.mpris.',
+  namespace: 'GstClapperMpris'
+)
+
 gstclapper = library('gstclapper-' + api_version,
-  gstclapper_sources,
+  gstclapper_sources + gstclapper_mpris_gdbus,
   c_args: gstclapper_defines,
   link_args: noseh_link_args,
   include_directories: [configinc, libsinc],
   version: libversion,
   install: true,
-  install_dir : clapper_libdir,
-  dependencies : [gtk4_dep, gstbase_dep, gstvideo_dep, gstaudio_dep,
+  install_dir: pkglibdir,
+  dependencies: [gtk4_dep, glib_dep, gio_dep, giounix_dep,
+    gstbase_dep, gstvideo_dep, gstaudio_dep,
     gsttag_dep, gstpbutils_dep, libm] + gtk_deps,
 )
 
@@ -85,7 +99,7 @@ clapper_gir = gnome.generate_gir(gstclapper,
   includes: ['Gst-1.0', 'GstPbutils-1.0', 'GstBase-1.0', 'GstVideo-1.0',
     'GstAudio-1.0', 'GstTag-1.0'],
   install: true,
-  install_dir_typelib : join_paths(clapper_libdir, 'girepository-1.0'),
+  install_dir_typelib: join_paths(pkglibdir, 'girepository-1.0'),
   extra_args: gir_init_section + ['-DGST_USE_UNSTABLE_API'],
   dependencies: [gstbase_dep, gstvideo_dep, gstaudio_dep,
     gsttag_dep, gstpbutils_dep]

lib/gst/meson.build

@@ -1 +1,7 @@
+if get_option('lib')
   subdir('clapper')
+endif
+
+if not get_option('gst-plugin').disabled()
+  subdir('plugin')
+endif

lib/gst/plugin/gstclapperimporter.c

@@ -0,0 +1,439 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclapperimporter.h"
+#include "gstgtkutils.h"
+
+#define GST_CAT_DEFAULT gst_clapper_importer_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+#define parent_class gst_clapper_importer_parent_class
+G_DEFINE_TYPE (GstClapperImporter, gst_clapper_importer, GST_TYPE_OBJECT);
+
+typedef struct
+{
+  GdkTexture *texture;
+  GstVideoOverlayRectangle *rectangle;
+
+  gint x, y;
+  guint width, height;
+
+  gint index;
+  gatomicrefcount ref_count;
+} GstClapperGdkOverlay;
+
+static GstClapperGdkOverlay *
+gst_clapper_gdk_overlay_new (GdkTexture *texture, GstVideoOverlayRectangle *rectangle,
+    gint x, gint y, guint width, guint height, guint index)
+{
+  GstClapperGdkOverlay *overlay = g_slice_new (GstClapperGdkOverlay);
+
+  overlay->texture = g_object_ref (texture);
+  overlay->rectangle = gst_video_overlay_rectangle_ref (rectangle);
+  overlay->x = x;
+  overlay->y = y;
+  overlay->width = width;
+  overlay->height = height;
+  overlay->index = index;
+
+  g_atomic_ref_count_init (&overlay->ref_count);
+
+  return overlay;
+}
+
+static GstClapperGdkOverlay *
+gst_clapper_gdk_overlay_ref (GstClapperGdkOverlay *overlay)
+{
+  g_atomic_ref_count_inc (&overlay->ref_count);
+
+  return overlay;
+}
+
+static void
+gst_clapper_gdk_overlay_unref (GstClapperGdkOverlay *overlay)
+{
+  if (g_atomic_ref_count_dec (&overlay->ref_count)) {
+    GST_TRACE ("Freeing overlay: %" GST_PTR_FORMAT, overlay);
+
+    g_object_unref (overlay->texture);
+    gst_video_overlay_rectangle_unref (overlay->rectangle);
+    g_slice_free (GstClapperGdkOverlay, overlay);
+  }
+}
+
+static GstBufferPool *
+_default_create_pool (GstClapperImporter *self, GstStructure **config)
+{
+  GST_FIXME_OBJECT (self, "Need to create buffer pool");
+
+  return NULL;
+}
+
+static GdkTexture *
+_default_generate_texture (GstClapperImporter *self,
+    GstBuffer *buffer, GstVideoInfo *v_info)
+{
+  GST_FIXME_OBJECT (self, "GdkTexture generation not implemented");
+
+  return NULL;
+}
+
+static void
+gst_clapper_importer_init (GstClapperImporter *self)
+{
+  gst_video_info_init (&self->pending_v_info);
+  gst_video_info_init (&self->v_info);
+
+  self->pending_overlays = g_ptr_array_new_with_free_func (
+      (GDestroyNotify) gst_clapper_gdk_overlay_unref);
+  self->overlays = g_ptr_array_new_with_free_func (
+      (GDestroyNotify) gst_clapper_gdk_overlay_unref);
+
+  gdk_rgba_parse (&self->bg, "black");
+}
+
+static void
+gst_clapper_importer_finalize (GObject *object)
+{
+  GstClapperImporter *self = GST_CLAPPER_IMPORTER_CAST (object);
+
+  GST_TRACE ("Finalize");
+
+  gst_clear_buffer (&self->pending_buffer);
+  gst_clear_buffer (&self->buffer);
+
+  g_ptr_array_unref (self->pending_overlays);
+  g_ptr_array_unref (self->overlays);
+
+  g_clear_object (&self->texture);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, finalize, (object));
+}
+
+static void
+gst_clapper_importer_class_init (GstClapperImporterClass *klass)
+{
+  GObjectClass *gobject_class = (GObjectClass *) klass;
+  GstClapperImporterClass *importer_class = (GstClapperImporterClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clapperimporter", 0,
+      "Clapper Importer");
+
+  gobject_class->finalize = gst_clapper_importer_finalize;
+
+  importer_class->create_pool = _default_create_pool;
+  importer_class->generate_texture = _default_generate_texture;
+}
+
+static GstClapperGdkOverlay *
+_get_cached_overlay (GPtrArray *overlays, GstVideoOverlayRectangle *rectangle)
+{
+  guint i;
+
+  for (i = 0; i < overlays->len; i++) {
+    GstClapperGdkOverlay *overlay = g_ptr_array_index (overlays, i);
+
+    if (overlay->rectangle == rectangle)
+      return overlay;
+  }
+
+  return NULL;
+}
+
+static gint
+_sort_overlays_cb (gconstpointer a, gconstpointer b)
+{
+  GstClapperGdkOverlay *overlay_a, *overlay_b;
+
+  overlay_a = *((GstClapperGdkOverlay **) a);
+  overlay_b = *((GstClapperGdkOverlay **) b);
+
+  return (overlay_a->index - overlay_b->index);
+}
+
+/*
+ * Prepares overlays to show with the next rendered buffer.
+ *
+ * In order for overlays caching to work correctly, this should be called for
+ * every received buffer (even if its going to be disgarded), also must be
+ * called together with pending buffer replacement within a single importer
+ * locking, to make sure prepared overlays always match the pending buffer.
+ */
+static void
+gst_clapper_importer_prepare_overlays_locked (GstClapperImporter *self)
+{
+  GstVideoOverlayCompositionMeta *comp_meta;
+  guint num_overlays, i;
+
+  if (G_UNLIKELY (!self->pending_buffer)
+      || !(comp_meta = gst_buffer_get_video_overlay_composition_meta (self->pending_buffer))) {
+    guint n_pending = self->pending_overlays->len;
+
+    /* Remove all cached overlays if new buffer does not have any */
+    if (n_pending > 0) {
+      GST_TRACE ("No overlays in buffer, removing all cached ones");
+      g_ptr_array_remove_range (self->pending_overlays, 0, n_pending);
+    }
+
+    return;
+  }
+
+  GST_LOG_OBJECT (self, "Preparing overlays...");
+
+  /* Mark all old overlays as unused by giving them negative index */
+  for (i = 0; i < self->pending_overlays->len; i++) {
+    GstClapperGdkOverlay *overlay = g_ptr_array_index (self->pending_overlays, i);
+    overlay->index = -1;
+  }
+
+  num_overlays = gst_video_overlay_composition_n_rectangles (comp_meta->overlay);
+
+  for (i = 0; i < num_overlays; i++) {
+    GdkTexture *texture;
+    GstBuffer *comp_buffer;
+    GstVideoFrame comp_frame;
+    GstVideoMeta *v_meta;
+    GstVideoInfo v_info;
+    GstVideoOverlayRectangle *rectangle;
+    GstClapperGdkOverlay *overlay;
+    GstVideoOverlayFormatFlags flags, alpha_flags = 0;
+    gint comp_x, comp_y;
+    guint comp_width, comp_height;
+
+    rectangle = gst_video_overlay_composition_get_rectangle (comp_meta->overlay, i);
+
+    if ((overlay = _get_cached_overlay (self->pending_overlays, rectangle))) {
+      overlay->index = i;
+
+      GST_TRACE ("Reusing cached overlay: %" GST_PTR_FORMAT, overlay);
+      continue;
+    }
+
+    if (G_UNLIKELY (!gst_video_overlay_rectangle_get_render_rectangle (rectangle,
+        &comp_x, &comp_y, &comp_width, &comp_height))) {
+      GST_WARNING ("Invalid overlay rectangle dimensions: %" GST_PTR_FORMAT, rectangle);
+      continue;
+    }
+
+    flags = gst_video_overlay_rectangle_get_flags (rectangle);
+
+    if (flags & GST_VIDEO_OVERLAY_FORMAT_FLAG_PREMULTIPLIED_ALPHA)
+      alpha_flags |= GST_VIDEO_OVERLAY_FORMAT_FLAG_PREMULTIPLIED_ALPHA;
+
+    comp_buffer = gst_video_overlay_rectangle_get_pixels_unscaled_argb (rectangle, alpha_flags);
+
+    /* Update overlay video info from video meta */
+    if ((v_meta = gst_buffer_get_video_meta (comp_buffer))) {
+      gst_video_info_set_format (&v_info, v_meta->format, v_meta->width, v_meta->height);
+      v_info.stride[0] = v_meta->stride[0];
+    }
+
+    if (G_UNLIKELY (!gst_video_frame_map (&comp_frame, &v_info, comp_buffer, GST_MAP_READ)))
+      return;
+
+    if ((texture = gst_video_frame_into_gdk_texture (&comp_frame))) {
+      overlay = gst_clapper_gdk_overlay_new (texture, rectangle, comp_x, comp_y,
+          comp_width, comp_height, i);
+      g_object_unref (texture);
+
+      GST_TRACE_OBJECT (self, "Created overlay: %"
+          GST_PTR_FORMAT ", x: %i, y: %i, width: %u, height: %u",
+          overlay, overlay->x, overlay->y, overlay->width, overlay->height);
+
+      g_ptr_array_insert (self->pending_overlays, i, overlay);
+    }
+
+    gst_video_frame_unmap (&comp_frame);
+  }
+
+  /* Remove all overlays that are not going to be used */
+  for (i = self->pending_overlays->len; i > 0; i--) {
+    GstClapperGdkOverlay *overlay = g_ptr_array_index (self->pending_overlays, i - 1);
+
+    if (overlay->index < 0) {
+      GST_TRACE ("Removing unused cached overlay: %" GST_PTR_FORMAT, overlay);
+      g_ptr_array_remove (self->pending_overlays, overlay);
+    }
+  }
+
+  /* Sort remaining overlays */
+  if (self->pending_overlays->len > 1) {
+    GST_LOG_OBJECT (self, "Sorting overlays");
+    g_ptr_array_sort (self->pending_overlays, (GCompareFunc) _sort_overlays_cb);
+  }
+
+  if (G_UNLIKELY (num_overlays != self->pending_overlays->len)) {
+    GST_WARNING_OBJECT (self, "Some overlays could not be prepared, %u != %u",
+        num_overlays, self->pending_overlays->len);
+  }
+
+  GST_LOG_OBJECT (self, "Prepared overlays: %u", self->pending_overlays->len);
+}
+
+gboolean
+gst_clapper_importer_prepare (GstClapperImporter *self)
+{
+  GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+  if (importer_class->prepare) {
+    if (!importer_class->prepare (self))
+      return FALSE;
+  }
+
+  GST_DEBUG_OBJECT (self, "Importer prepared");
+
+  return TRUE;
+}
+
+void
+gst_clapper_importer_share_data (GstClapperImporter *self, GstClapperImporter *dest)
+{
+  GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+  if (importer_class->share_data)
+    importer_class->share_data (self, dest);
+}
+
+void
+gst_clapper_importer_set_caps (GstClapperImporter *self, GstCaps *caps)
+{
+  GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+  GST_OBJECT_LOCK (self);
+  self->has_pending_v_info = gst_video_info_from_caps (&self->pending_v_info, caps);
+  GST_OBJECT_UNLOCK (self);
+
+  if (importer_class->set_caps)
+    importer_class->set_caps (self, caps);
+}
+
+void
+gst_clapper_importer_set_buffer (GstClapperImporter *self, GstBuffer *buffer)
+{
+  /* Both overlays and pending buffer must be
+   * set within a single importer locking */
+  GST_OBJECT_LOCK (self);
+
+  gst_buffer_replace (&self->pending_buffer, buffer);
+  gst_clapper_importer_prepare_overlays_locked (self);
+
+  GST_OBJECT_UNLOCK (self);
+}
+
+GstBufferPool *
+gst_clapper_importer_create_pool (GstClapperImporter *self, GstStructure **config)
+{
+  GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+  return importer_class->create_pool (self, config);
+}
+
+void
+gst_clapper_importer_add_allocation_metas (GstClapperImporter *self, GstQuery *query)
+{
+  GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+  if (importer_class->add_allocation_metas)
+    importer_class->add_allocation_metas (self, query);
+}
+
+gboolean
+gst_clapper_importer_handle_context_query (GstClapperImporter *self,
+    GstBaseSink *bsink, GstQuery *query)
+{
+  GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+  if (!importer_class->handle_context_query)
+    return FALSE;
+
+  return importer_class->handle_context_query (self, bsink, query);
+}
+
+void
+gst_clapper_importer_snapshot (GstClapperImporter *self, GdkSnapshot *snapshot,
+    gdouble width, gdouble height, gfloat scale_x, gfloat scale_y)
+{
+  guint i;
+  gboolean buffer_changed;
+
+  /* Collect all data that we need to snapshot pending buffer,
+   * lock ourselves to make sure everything matches */
+  GST_OBJECT_LOCK (self);
+
+  buffer_changed = gst_buffer_replace (&self->buffer, self->pending_buffer);
+
+  /* Only replace v_info when buffer changed, this way
+   * we still use old (correct) v_info when resizing */
+  if (buffer_changed && self->has_pending_v_info) {
+    self->v_info = self->pending_v_info;
+    self->has_pending_v_info = FALSE;
+  }
+
+  /* Ref overlays associated with current buffer */
+  for (i = 0; i < self->pending_overlays->len; i++) {
+    GstClapperGdkOverlay *overlay = g_ptr_array_index (self->pending_overlays, i);
+
+    g_ptr_array_insert (self->overlays, i, gst_clapper_gdk_overlay_ref (overlay));
+  }
+
+  GST_OBJECT_UNLOCK (self);
+
+  /* Draw black BG when no buffer or imported format has alpha */
+  if (!self->buffer || GST_VIDEO_INFO_HAS_ALPHA (&self->v_info))
+    gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (0, 0, width, height));
+
+  if (self->buffer) {
+    if (buffer_changed || !self->texture) {
+      GstClapperImporterClass *importer_class = GST_CLAPPER_IMPORTER_GET_CLASS (self);
+
+      GST_TRACE_OBJECT (self, "Importing %" GST_PTR_FORMAT, self->buffer);
+
+      g_clear_object (&self->texture);
+      self->texture = importer_class->generate_texture (self, self->buffer, &self->v_info);
+    } else {
+      GST_TRACE_OBJECT (self, "Reusing texture from %" GST_PTR_FORMAT, self->buffer);
+    }
+
+    if (G_LIKELY (self->texture)) {
+      gtk_snapshot_append_texture (snapshot, self->texture, &GRAPHENE_RECT_INIT (0, 0, width, height));
+
+      for (i = 0; i < self->overlays->len; i++) {
+        GstClapperGdkOverlay *overlay = g_ptr_array_index (self->overlays, i);
+
+        gtk_snapshot_append_texture (snapshot, overlay->texture,
+            &GRAPHENE_RECT_INIT (overlay->x * scale_x, overlay->y * scale_y,
+                overlay->width * scale_x, overlay->height * scale_y));
+      }
+    } else {
+      GST_ERROR_OBJECT (self, "Failed import of %" GST_PTR_FORMAT, self->buffer);
+
+      /* Draw black instead of texture on failure if not drawn already */
+      if (!GST_VIDEO_INFO_HAS_ALPHA (&self->v_info))
+        gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (0, 0, width, height));
+    }
+  }
+
+  /* Unref all used overlays */
+  if (self->overlays->len > 0)
+    g_ptr_array_remove_range (self->overlays, 0, self->overlays->len);
+}

lib/gst/plugin/gstclapperimporter.h

@@ -0,0 +1,102 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include <gtk/gtk.h>
+#include <gst/gst.h>
+#include <gst/video/video.h>
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_IMPORTER               (gst_clapper_importer_get_type())
+#define GST_IS_CLAPPER_IMPORTER(obj)            (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GST_TYPE_CLAPPER_IMPORTER))
+#define GST_IS_CLAPPER_IMPORTER_CLASS(klass)    (G_TYPE_CHECK_CLASS_TYPE ((klass), GST_TYPE_CLAPPER_IMPORTER))
+#define GST_CLAPPER_IMPORTER_GET_CLASS(obj)     (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_CLAPPER_IMPORTER, GstClapperImporterClass))
+#define GST_CLAPPER_IMPORTER(obj)               (G_TYPE_CHECK_INSTANCE_CAST ((obj), GST_TYPE_CLAPPER_IMPORTER, GstClapperImporter))
+#define GST_CLAPPER_IMPORTER_CLASS(klass)       (G_TYPE_CHECK_CLASS_CAST ((klass), GST_TYPE_CLAPPER_IMPORTER, GstClapperImporterClass))
+#define GST_CLAPPER_IMPORTER_CAST(obj)          ((GstClapperImporter *)(obj))
+
+#define GST_CLAPPER_IMPORTER_DEFINE(camel,lower,type)                     \
+G_DEFINE_TYPE (camel, lower, type)                                        \
+G_MODULE_EXPORT GstClapperImporter *make_importer (void);                 \
+G_MODULE_EXPORT GstCaps *make_caps (GstRank *rank, GStrv *context_types);
+
+typedef struct _GstClapperImporter GstClapperImporter;
+typedef struct _GstClapperImporterClass GstClapperImporterClass;
+
+#ifdef G_DEFINE_AUTOPTR_CLEANUP_FUNC
+G_DEFINE_AUTOPTR_CLEANUP_FUNC (GstClapperImporter, gst_object_unref)
+#endif
+
+struct _GstClapperImporter
+{
+  GstObject parent;
+
+  GstBuffer *pending_buffer, *buffer;
+  GPtrArray *pending_overlays, *overlays;
+  GstVideoInfo pending_v_info, v_info;
+  gboolean has_pending_v_info;
+
+  GdkTexture *texture;
+
+  GdkRGBA bg;
+};
+
+struct _GstClapperImporterClass
+{
+  GstObjectClass parent_class;
+
+  gboolean (* prepare) (GstClapperImporter *importer);
+
+  void (* share_data) (GstClapperImporter *src,
+                       GstClapperImporter *dest);
+
+  void (* set_caps) (GstClapperImporter *importer,
+                     GstCaps            *caps);
+
+  gboolean (* handle_context_query) (GstClapperImporter *importer,
+                                     GstBaseSink        *bsink,
+                                     GstQuery           *query);
+
+  GstBufferPool * (* create_pool) (GstClapperImporter *importer,
+                                   GstStructure      **config);
+
+  void (* add_allocation_metas) (GstClapperImporter *importer,
+                                 GstQuery           *query);
+
+  GdkTexture * (* generate_texture) (GstClapperImporter *importer,
+                                     GstBuffer          *buffer,
+                                     GstVideoInfo       *v_info);
+};
+
+GType           gst_clapper_importer_get_type                (void);
+
+gboolean        gst_clapper_importer_prepare                 (GstClapperImporter *importer);
+void            gst_clapper_importer_share_data              (GstClapperImporter *importer, GstClapperImporter *dest);
+gboolean        gst_clapper_importer_handle_context_query    (GstClapperImporter *importer, GstBaseSink *bsink, GstQuery *query);
+GstBufferPool * gst_clapper_importer_create_pool             (GstClapperImporter *importer, GstStructure **config);
+void            gst_clapper_importer_add_allocation_metas    (GstClapperImporter *importer, GstQuery *query);
+
+void            gst_clapper_importer_set_caps                (GstClapperImporter *importer, GstCaps *caps);
+void            gst_clapper_importer_set_buffer              (GstClapperImporter *importer, GstBuffer *buffer);
+
+void            gst_clapper_importer_snapshot                (GstClapperImporter *importer, GdkSnapshot *snapshot, gdouble width, gdouble height, gfloat scale_x, gfloat scale_y);
+
+G_END_DECLS

lib/gst/plugin/gstclapperimporterloader.c

@@ -0,0 +1,417 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <gmodule.h>
+
+#include "gstclapperimporterloader.h"
+#include "gstclapperimporter.h"
+
+#define GST_CAT_DEFAULT gst_clapper_importer_loader_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+typedef GstClapperImporter* (* MakeImporter) (void);
+typedef GstCaps* (* MakeCaps) (GstRank *rank, GStrv *context_types);
+
+typedef struct
+{
+  gchar *module_path;
+  GModule *open_module;
+  GstCaps *caps;
+  GstRank rank;
+  GStrv context_types;
+} GstClapperImporterData;
+
+static void
+gst_clapper_importer_data_free (GstClapperImporterData *data)
+{
+  g_free (data->module_path);
+
+  if (data->open_module)
+    g_module_close (data->open_module);
+
+  gst_clear_caps (&data->caps);
+  g_strfreev (data->context_types);
+  g_free (data);
+}
+
+static gboolean
+_open_importer (GstClapperImporterData *data)
+{
+  g_return_val_if_fail (data && data->module_path, FALSE);
+
+  /* Already open */
+  if (data->open_module)
+    return TRUE;
+
+  GST_DEBUG ("Opening module: %s", data->module_path);
+  data->open_module = g_module_open (data->module_path, G_MODULE_BIND_LAZY);
+
+  if (!data->open_module) {
+    GST_WARNING ("Could not load importer: %s, reason: %s",
+        data->module_path, g_module_error ());
+    return FALSE;
+  }
+  GST_DEBUG ("Opened importer module");
+
+  /* Make sure module stays loaded. Seems to be needed for
+   * reusing exported symbols from the same module again */
+  g_module_make_resident (data->open_module);
+
+  return TRUE;
+}
+
+static void
+_close_importer (GstClapperImporterData *data)
+{
+  if (!data || !data->open_module)
+    return;
+
+  if (G_LIKELY (g_module_close (data->open_module)))
+    GST_DEBUG ("Closed module: %s", data->module_path);
+  else
+    GST_WARNING ("Could not close importer module");
+
+  data->open_module = NULL;
+}
+
+static GstClapperImporter *
+_obtain_importer_internal (GstClapperImporterData *data)
+{
+  MakeImporter make_importer;
+  GstClapperImporter *importer = NULL;
+
+  if (!_open_importer (data))
+    goto finish;
+
+  if (!g_module_symbol (data->open_module, "make_importer", (gpointer *) &make_importer)
+      || make_importer == NULL) {
+    GST_WARNING ("Make function missing in importer");
+    goto fail;
+  }
+
+  /* Do not close the module, we are gonna continue using it */
+  if ((importer = make_importer ()))
+    goto finish;
+
+fail:
+  _close_importer (data);
+
+finish:
+  return importer;
+}
+
+static GstClapperImporterData *
+_fill_importer_data (const gchar *module_path)
+{
+  MakeCaps make_caps;
+  GstClapperImporterData *data;
+
+  data = g_new0 (GstClapperImporterData, 1);
+  data->module_path = g_strdup (module_path);
+  data->open_module = g_module_open (data->module_path, G_MODULE_BIND_LAZY);
+
+  if (!data->open_module)
+    goto fail;
+
+  if (!g_module_symbol (data->open_module, "make_caps", (gpointer *) &make_caps)
+      || make_caps == NULL) {
+    GST_WARNING ("Make caps function missing in importer");
+    goto fail;
+  }
+
+  data->caps = make_caps (&data->rank, &data->context_types);
+  GST_DEBUG ("Caps reading %ssuccessful", data->caps ? "" : "un");
+
+  if (!data->caps)
+    goto fail;
+
+  /* Once we obtain importer data, close module afterwards */
+  _close_importer (data);
+
+  return data;
+
+fail:
+  gst_clapper_importer_data_free (data);
+
+  return NULL;
+}
+
+static gint
+_sort_importers_cb (gconstpointer a, gconstpointer b)
+{
+  GstClapperImporterData *data_a, *data_b;
+
+  data_a = *((GstClapperImporterData **) a);
+  data_b = *((GstClapperImporterData **) b);
+
+  return (data_b->rank - data_a->rank);
+}
+
+static gpointer
+_obtain_available_importers (G_GNUC_UNUSED gpointer data)
+{
+  GPtrArray *importers;
+  GFile *dir;
+  GFileEnumerator *dir_enum;
+  GError *error = NULL;
+
+  importers = g_ptr_array_new_with_free_func (
+      (GDestroyNotify) gst_clapper_importer_data_free);
+
+  GST_INFO ("Checking available clapper sink importers");
+
+  dir = g_file_new_for_path (CLAPPER_SINK_IMPORTER_PATH);
+
+  if ((dir_enum = g_file_enumerate_children (dir,
+      G_FILE_ATTRIBUTE_STANDARD_NAME,
+      G_FILE_QUERY_INFO_NOFOLLOW_SYMLINKS, NULL, &error))) {
+    while (TRUE) {
+      GFileInfo *info = NULL;
+      GstClapperImporterData *data;
+      gchar *module_path;
+      const gchar *module_name;
+
+      if (!g_file_enumerator_iterate (dir_enum, &info,
+          NULL, NULL, &error) || !info)
+        break;
+
+      module_name = g_file_info_get_name (info);
+
+      if (!g_str_has_suffix (module_name, G_MODULE_SUFFIX))
+        continue;
+
+      module_path = g_module_build_path (CLAPPER_SINK_IMPORTER_PATH, module_name);
+      data = _fill_importer_data (module_path);
+      g_free (module_path);
+
+      if (!data) {
+        GST_WARNING ("Could not read importer data: %s", module_name);
+        continue;
+      }
+
+      GST_INFO ("Found importer: %s, caps: %" GST_PTR_FORMAT, module_name, data->caps);
+      g_ptr_array_add (importers, data);
+    }
+
+    g_object_unref (dir_enum);
+  }
+
+  g_object_unref (dir);
+
+  if (error) {
+    GST_ERROR ("Could not load importer, reason: %s",
+        (error->message) ? error->message : "unknown");
+    g_error_free (error);
+  }
+
+  g_ptr_array_sort (importers, (GCompareFunc) _sort_importers_cb);
+
+  return importers;
+}
+
+static const GPtrArray *
+gst_clapper_importer_loader_get_available_importers (void)
+{
+  static GOnce once = G_ONCE_INIT;
+
+  g_once (&once, _obtain_available_importers, NULL);
+  return (const GPtrArray *) once.retval;
+}
+
+static GstClapperImporterData *
+_find_open_importer_data (const GPtrArray *importers)
+{
+  guint i;
+
+  for (i = 0; i < importers->len; i++) {
+    GstClapperImporterData *data = g_ptr_array_index (importers, i);
+
+    if (data->open_module)
+      return data;
+  }
+
+  return NULL;
+}
+
+static GstClapperImporterData *
+_get_importer_data_for_caps (const GPtrArray *importers, const GstCaps *caps)
+{
+  guint i;
+
+  for (i = 0; i < importers->len; i++) {
+    GstClapperImporterData *data = g_ptr_array_index (importers, i);
+
+    if (!gst_caps_is_always_compatible (caps, data->caps))
+      continue;
+
+    return data;
+  }
+
+  return NULL;
+}
+
+static GstClapperImporterData *
+_get_importer_data_for_context_type (const GPtrArray *importers, const gchar *context_type)
+{
+  guint i;
+
+  for (i = 0; i < importers->len; i++) {
+    GstClapperImporterData *data = g_ptr_array_index (importers, i);
+    guint j;
+
+    if (!data->context_types)
+      continue;
+
+    for (j = 0; data->context_types[j]; j++) {
+      if (strcmp (context_type, data->context_types[j]))
+        continue;
+
+      return data;
+    }
+  }
+
+  return NULL;
+}
+
+void
+gst_clapper_importer_loader_unload_all (void)
+{
+  const GPtrArray *importers;
+  guint i;
+
+  importers = gst_clapper_importer_loader_get_available_importers ();
+  GST_TRACE ("Unloading all open modules");
+
+  for (i = 0; i < importers->len; i++) {
+    GstClapperImporterData *data = g_ptr_array_index (importers, i);
+
+    _close_importer (data);
+  }
+}
+
+GstPadTemplate *
+gst_clapper_importer_loader_make_sink_pad_template (void)
+{
+  const GPtrArray *importers;
+  GstCaps *sink_caps;
+  GstPadTemplate *templ;
+  guint i;
+
+  /* This is only called once from sink class init function */
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clapperimporterloader", 0,
+      "Clapper Importer Loader");
+
+  importers = gst_clapper_importer_loader_get_available_importers ();
+  sink_caps = gst_caps_new_empty ();
+
+  for (i = 0; i < importers->len; i++) {
+    GstClapperImporterData *data = g_ptr_array_index (importers, i);
+    GstCaps *copied_caps;
+
+    copied_caps = gst_caps_copy (data->caps);
+    gst_caps_append (sink_caps, copied_caps);
+  }
+
+  if (G_UNLIKELY (gst_caps_is_empty (sink_caps)))
+    gst_caps_append (sink_caps, gst_caps_new_any ());
+
+  templ = gst_pad_template_new ("sink", GST_PAD_SINK, GST_PAD_ALWAYS, sink_caps);
+  gst_caps_unref (sink_caps);
+
+  return templ;
+}
+
+static gboolean
+_find_importer_internal (GstCaps *caps, GstQuery *query, GstClapperImporter **importer)
+{
+  const GPtrArray *importers;
+  GstClapperImporterData *old_data = NULL, *new_data = NULL;
+  GstClapperImporter *found_importer = NULL;
+
+  importers = gst_clapper_importer_loader_get_available_importers ();
+  old_data = _find_open_importer_data (importers);
+
+  if (caps) {
+    GST_DEBUG ("Requested importer for caps: %" GST_PTR_FORMAT, caps);
+    new_data = _get_importer_data_for_caps (importers, caps);
+  } else if (query) {
+    const gchar *context_type;
+
+    gst_query_parse_context_type (query, &context_type);
+
+    GST_DEBUG ("Requested importer for context: %s", context_type);
+    new_data = _get_importer_data_for_context_type (importers, context_type);
+
+    /* In case missing importer for context query, leave the old one.
+     * We should allow some queries to go through unresponded */
+    if (!new_data)
+      new_data = old_data;
+  }
+  GST_LOG ("Old importer path: %s, new path: %s",
+      (old_data != NULL) ? old_data->module_path : NULL,
+      (new_data != NULL) ? new_data->module_path : NULL);
+
+  if (old_data == new_data) {
+    GST_DEBUG ("No importer change");
+
+    if (*importer && caps)
+      gst_clapper_importer_set_caps (*importer, caps);
+
+    return (*importer != NULL);
+  }
+
+  if (new_data) {
+    found_importer = _obtain_importer_internal (new_data);
+
+    if (*importer && found_importer)
+      gst_clapper_importer_share_data (*importer, found_importer);
+  }
+
+  gst_clear_object (importer);
+  _close_importer (old_data);
+
+  if (found_importer && gst_clapper_importer_prepare (found_importer)) {
+    if (caps)
+      gst_clapper_importer_set_caps (found_importer, caps);
+
+    *importer = found_importer;
+    return TRUE;
+  }
+
+  gst_clear_object (&found_importer);
+  _close_importer (new_data);
+
+  return FALSE;
+}
+
+gboolean
+gst_clapper_importer_loader_find_importer_for_caps (GstCaps *caps, GstClapperImporter **importer)
+{
+  return _find_importer_internal (caps, NULL, importer);
+}
+
+gboolean
+gst_clapper_importer_loader_find_importer_for_context_query (GstQuery *query, GstClapperImporter **importer)
+{
+  return _find_importer_internal (NULL, query, importer);
+}

lib/gst/plugin/gstclapperimporterloader.h

@@ -0,0 +1,36 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include <gst/gst.h>
+
+#include "gstclapperimporter.h"
+
+G_BEGIN_DECLS
+
+GstPadTemplate * gst_clapper_importer_loader_make_sink_pad_template          (void);
+
+gboolean         gst_clapper_importer_loader_find_importer_for_caps          (GstCaps *caps, GstClapperImporter **importer);
+
+gboolean         gst_clapper_importer_loader_find_importer_for_context_query (GstQuery *query, GstClapperImporter **importer);
+
+void             gst_clapper_importer_loader_unload_all                      (void);
+
+G_END_DECLS

lib/gst/plugin/gstclapperpaintable.c

@@ -0,0 +1,428 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclapperpaintable.h"
+
+#define DEFAULT_PAR_N               1
+#define DEFAULT_PAR_D               1
+
+#define GST_CAT_DEFAULT gst_clapper_paintable_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+static void gst_clapper_paintable_iface_init (GdkPaintableInterface *iface);
+static void gst_clapper_paintable_dispose (GObject *object);
+static void gst_clapper_paintable_finalize (GObject *object);
+
+#define parent_class gst_clapper_paintable_parent_class
+G_DEFINE_TYPE_WITH_CODE (GstClapperPaintable, gst_clapper_paintable, G_TYPE_OBJECT,
+    G_IMPLEMENT_INTERFACE (GDK_TYPE_PAINTABLE,
+        gst_clapper_paintable_iface_init));
+
+static void
+gst_clapper_paintable_class_init (GstClapperPaintableClass *klass)
+{
+  GObjectClass *gobject_class = (GObjectClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clapperpaintable", 0,
+      "Clapper Paintable");
+
+  gobject_class->dispose = gst_clapper_paintable_dispose;
+  gobject_class->finalize = gst_clapper_paintable_finalize;
+}
+
+static void
+gst_clapper_paintable_init (GstClapperPaintable *self)
+{
+  self->par_n = DEFAULT_PAR_N;
+  self->par_d = DEFAULT_PAR_D;
+  self->pixel_aspect = ((gdouble) self->par_d / self->par_n);
+
+  g_mutex_init (&self->lock);
+  gst_video_info_init (&self->v_info);
+  g_weak_ref_init (&self->widget, NULL);
+  g_weak_ref_init (&self->importer, NULL);
+
+  gdk_rgba_parse (&self->bg, "black");
+}
+
+static void
+gst_clapper_paintable_dispose (GObject *object)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE (object);
+
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+
+  if (self->draw_id > 0) {
+    g_source_remove (self->draw_id);
+    self->draw_id = 0;
+  }
+
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, dispose, (object));
+}
+
+static void
+gst_clapper_paintable_finalize (GObject *object)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE (object);
+
+  GST_TRACE ("Finalize");
+
+  g_weak_ref_clear (&self->widget);
+  g_weak_ref_clear (&self->importer);
+  g_mutex_clear (&self->lock);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, finalize, (object));
+}
+
+static gboolean
+calculate_display_par (GstClapperPaintable *self, const GstVideoInfo *info)
+{
+  gint width, height, par_n, par_d, req_par_n, req_par_d;
+  gboolean success;
+
+  width = GST_VIDEO_INFO_WIDTH (info);
+  height = GST_VIDEO_INFO_HEIGHT (info);
+
+  /* Cannot apply aspect ratio if there is no video */
+  if (width == 0 || height == 0)
+    return FALSE;
+
+  par_n = GST_VIDEO_INFO_PAR_N (info);
+  par_d = GST_VIDEO_INFO_PAR_D (info);
+
+  req_par_n = self->par_n;
+  req_par_d = self->par_d;
+
+  if (par_n == 0)
+    par_n = 1;
+
+  /* Use defaults if user set zero */
+  if (req_par_n == 0 || req_par_d == 0) {
+    req_par_n = DEFAULT_PAR_N;
+    req_par_d = DEFAULT_PAR_D;
+  }
+
+  GST_LOG_OBJECT (self, "PAR: %u/%u, DAR: %u/%u", par_n, par_d, req_par_n, req_par_d);
+
+  if (!(success = gst_video_calculate_display_ratio (&self->display_ratio_num,
+      &self->display_ratio_den, width, height, par_n, par_d,
+      req_par_n, req_par_d))) {
+    GST_ERROR_OBJECT (self, "Could not calculate display ratio values");
+  }
+
+  return success;
+}
+
+static void
+invalidate_paintable_size_internal (GstClapperPaintable *self)
+{
+  gint video_width, video_height;
+  guint display_ratio_num, display_ratio_den;
+
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+
+  video_width = GST_VIDEO_INFO_WIDTH (&self->v_info);
+  video_height = GST_VIDEO_INFO_HEIGHT (&self->v_info);
+
+  display_ratio_num = self->display_ratio_num;
+  display_ratio_den = self->display_ratio_den;
+
+  self->pixel_aspect = ((gdouble) self->par_d / self->par_n);
+
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+
+  if (video_height % display_ratio_den == 0) {
+    GST_LOG ("Keeping video height");
+
+    self->display_width = (guint)
+        gst_util_uint64_scale_int (video_height, display_ratio_num, display_ratio_den);
+    self->display_height = video_height;
+  } else if (video_width % display_ratio_num == 0) {
+    GST_LOG ("Keeping video width");
+
+    self->display_width = video_width;
+    self->display_height = (guint)
+        gst_util_uint64_scale_int (video_width, display_ratio_den, display_ratio_num);
+  } else {
+    GST_LOG ("Approximating while keeping video height");
+
+    self->display_width = (guint)
+        gst_util_uint64_scale_int (video_height, display_ratio_num, display_ratio_den);
+    self->display_height = video_height;
+  }
+
+  self->display_aspect_ratio = ((gdouble) self->display_width
+      / (gdouble) self->display_height);
+
+  GST_DEBUG_OBJECT (self, "Invalidate paintable size, display: %dx%d",
+      self->display_width, self->display_height);
+  gdk_paintable_invalidate_size ((GdkPaintable *) self);
+}
+
+static gboolean
+invalidate_paintable_size_on_main_cb (GstClapperPaintable *self)
+{
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+  self->draw_id = 0;
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+
+  invalidate_paintable_size_internal (self);
+
+  return G_SOURCE_REMOVE;
+}
+
+static gboolean
+update_paintable_on_main_cb (GstClapperPaintable *self)
+{
+  gboolean size_changed;
+
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+
+  /* Check if we will need to invalidate size */
+  if ((size_changed = self->pending_resize))
+    self->pending_resize = FALSE;
+
+  self->draw_id = 0;
+
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+
+  if (size_changed)
+    invalidate_paintable_size_internal (self);
+
+  GST_LOG_OBJECT (self, "Invalidate paintable contents");
+  gdk_paintable_invalidate_contents ((GdkPaintable *) self);
+
+  return G_SOURCE_REMOVE;
+}
+
+GstClapperPaintable *
+gst_clapper_paintable_new (void)
+{
+  return g_object_new (GST_TYPE_CLAPPER_PAINTABLE, NULL);
+}
+
+void
+gst_clapper_paintable_set_widget (GstClapperPaintable *self, GtkWidget *widget)
+{
+  g_weak_ref_set (&self->widget, widget);
+}
+
+void
+gst_clapper_paintable_set_importer (GstClapperPaintable *self, GstClapperImporter *importer)
+{
+  g_weak_ref_set (&self->importer, importer);
+}
+
+void
+gst_clapper_paintable_queue_draw (GstClapperPaintable *self)
+{
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+
+  if (self->draw_id > 0) {
+    GST_CLAPPER_PAINTABLE_UNLOCK (self);
+    GST_TRACE ("Already have pending draw");
+
+    return;
+  }
+
+  self->draw_id = g_idle_add_full (G_PRIORITY_DEFAULT,
+      (GSourceFunc) update_paintable_on_main_cb, self, NULL);
+
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+}
+
+gboolean
+gst_clapper_paintable_set_video_info (GstClapperPaintable *self, const GstVideoInfo *v_info)
+{
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+
+  if (gst_video_info_is_equal (&self->v_info, v_info)) {
+    GST_CLAPPER_PAINTABLE_UNLOCK (self);
+    return TRUE;
+  }
+
+  /* Reject info if values would cause integer overflow */
+  if (G_UNLIKELY (!calculate_display_par (self, v_info))) {
+    GST_CLAPPER_PAINTABLE_UNLOCK (self);
+    return FALSE;
+  }
+
+  self->pending_resize = TRUE;
+  self->v_info = *v_info;
+
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+
+  return TRUE;
+}
+
+void
+gst_clapper_paintable_set_pixel_aspect_ratio (GstClapperPaintable *self,
+    gint par_n, gint par_d)
+{
+  gboolean success;
+
+  GST_CLAPPER_PAINTABLE_LOCK (self);
+
+  /* No change */
+  if (self->par_n == par_n && self->par_d == par_d) {
+    GST_CLAPPER_PAINTABLE_UNLOCK (self);
+    return;
+  }
+
+  self->par_n = par_n;
+  self->par_d = par_d;
+
+  /* Check if we can accept new values. This will update
+   * display `ratio_num` and `ratio_den` only when successful */
+  success = calculate_display_par (self, &self->v_info);
+
+  /* If paintable update is queued, wait for it, otherwise invalidate
+   * size only for change to be applied even when paused */
+  if (!success || self->draw_id > 0) {
+    self->pending_resize = success;
+    GST_CLAPPER_PAINTABLE_UNLOCK (self);
+
+    return;
+  }
+
+  self->draw_id = g_idle_add_full (G_PRIORITY_DEFAULT,
+      (GSourceFunc) invalidate_paintable_size_on_main_cb, self, NULL);
+
+  GST_CLAPPER_PAINTABLE_UNLOCK (self);
+}
+
+/*
+ * GdkPaintableInterface
+ */
+static void
+gst_clapper_paintable_snapshot_internal (GstClapperPaintable *self,
+    GdkSnapshot *snapshot, gdouble width, gdouble height,
+    gint widget_width, gint widget_height)
+{
+  GstClapperImporter *importer;
+  gfloat scale_x, scale_y;
+
+  GST_LOG_OBJECT (self, "Snapshot");
+
+  scale_x = (gfloat) width / self->display_width;
+  scale_y = (gfloat) height / self->display_height;
+
+  /* Apply black borders when keeping aspect ratio */
+  if (scale_x == scale_y || abs (scale_x - scale_y) <= FLT_EPSILON) {
+    if (widget_height - height > 0) {
+      /* XXX: Top uses integer to work with GTK rounding (not going offscreen) */
+      gint top_bar_height = (widget_height - height) / 2;
+      gdouble bottom_bar_height = (widget_height - top_bar_height - height);
+
+      gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (0, 0, width, -top_bar_height));
+      gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (0, height, width, bottom_bar_height));
+    } else if (widget_width - width > 0) {
+      gint left_bar_width = (widget_width - width) / 2;
+      gdouble right_bar_width = (widget_width - left_bar_width - width);
+
+      gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (0, 0, -left_bar_width, height));
+      gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (width, 0, right_bar_width, height));
+    }
+  }
+
+  if ((importer = g_weak_ref_get (&self->importer))) {
+    gst_clapper_importer_snapshot (importer, snapshot, width, height,
+        scale_x * self->pixel_aspect, scale_y);
+    g_object_unref (importer);
+  } else {
+    GST_LOG_OBJECT (self, "No texture importer, drawing black");
+    gtk_snapshot_append_color (snapshot, &self->bg, &GRAPHENE_RECT_INIT (0, 0, width, height));
+  }
+}
+
+static void
+gst_clapper_paintable_snapshot (GdkPaintable *paintable,
+    GdkSnapshot *snapshot, gdouble width, gdouble height)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE_CAST (paintable);
+  GtkWidget *widget;
+  gint widget_width = 0, widget_height = 0;
+
+  if ((widget = g_weak_ref_get (&self->widget))) {
+    gint scale_factor;
+
+    scale_factor = gtk_widget_get_scale_factor (widget);
+    widget_width = gtk_widget_get_width (widget) * scale_factor;
+    widget_height = gtk_widget_get_height (widget) * scale_factor;
+
+    g_object_unref (widget);
+  }
+
+  gst_clapper_paintable_snapshot_internal (self, snapshot,
+      width, height, widget_width, widget_height);
+}
+
+static GdkPaintable *
+gst_clapper_paintable_get_current_image (GdkPaintable *paintable)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE_CAST (paintable);
+  GtkSnapshot *snapshot = gtk_snapshot_new ();
+
+  /* Snapshot without widget size in order to get
+   * paintable without black borders */
+  gst_clapper_paintable_snapshot_internal (self, snapshot,
+      self->display_width, self->display_height, 0, 0);
+
+  return gtk_snapshot_free_to_paintable (snapshot, NULL);
+}
+
+static gint
+gst_clapper_paintable_get_intrinsic_width (GdkPaintable *paintable)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE_CAST (paintable);
+
+  return self->display_width;
+}
+
+static gint
+gst_clapper_paintable_get_intrinsic_height (GdkPaintable *paintable)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE_CAST (paintable);
+
+  return self->display_height;
+}
+
+static gdouble
+gst_clapper_paintable_get_intrinsic_aspect_ratio (GdkPaintable *paintable)
+{
+  GstClapperPaintable *self = GST_CLAPPER_PAINTABLE_CAST (paintable);
+
+  return self->display_aspect_ratio;
+}
+
+static void
+gst_clapper_paintable_iface_init (GdkPaintableInterface *iface)
+{
+  iface->snapshot = gst_clapper_paintable_snapshot;
+  iface->get_current_image = gst_clapper_paintable_get_current_image;
+  iface->get_intrinsic_width = gst_clapper_paintable_get_intrinsic_width;
+  iface->get_intrinsic_height = gst_clapper_paintable_get_intrinsic_height;
+  iface->get_intrinsic_aspect_ratio = gst_clapper_paintable_get_intrinsic_aspect_ratio;
+}

lib/gst/plugin/gstclapperpaintable.h

@@ -0,0 +1,78 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include <gtk/gtk.h>
+#include <gst/gst.h>
+#include <gst/video/video.h>
+
+#include "gstclapperimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_PAINTABLE (gst_clapper_paintable_get_type())
+G_DECLARE_FINAL_TYPE (GstClapperPaintable, gst_clapper_paintable, GST, CLAPPER_PAINTABLE, GObject)
+
+#define GST_CLAPPER_PAINTABLE_CAST(obj)          ((GstClapperPaintable *)(obj))
+
+#define GST_CLAPPER_PAINTABLE_GET_LOCK(obj)      (&GST_CLAPPER_PAINTABLE_CAST(obj)->lock)
+#define GST_CLAPPER_PAINTABLE_LOCK(obj)          g_mutex_lock (GST_CLAPPER_PAINTABLE_GET_LOCK(obj))
+#define GST_CLAPPER_PAINTABLE_UNLOCK(obj)        g_mutex_unlock (GST_CLAPPER_PAINTABLE_GET_LOCK(obj))
+
+struct _GstClapperPaintable
+{
+  GObject parent;
+
+  GMutex lock;
+
+  GstVideoInfo v_info;
+
+  GdkRGBA bg;
+
+  GWeakRef widget, importer;
+
+  /* Sink properties */
+  gint par_n, par_d;
+
+  /* For drawing overlays */
+  gdouble pixel_aspect;
+
+  /* Resize */
+  gboolean pending_resize;
+  guint display_ratio_num;
+  guint display_ratio_den;
+
+  /* GdkPaintableInterface */
+  gint display_width;
+  gint display_height;
+  gdouble display_aspect_ratio;
+
+  /* Pending draw signal id */
+  guint draw_id;
+};
+
+GstClapperPaintable * gst_clapper_paintable_new                    (void);
+void                  gst_clapper_paintable_queue_draw             (GstClapperPaintable *paintable);
+void                  gst_clapper_paintable_set_widget             (GstClapperPaintable *paintable, GtkWidget *widget);
+void                  gst_clapper_paintable_set_importer           (GstClapperPaintable *paintable, GstClapperImporter *importer);
+gboolean              gst_clapper_paintable_set_video_info         (GstClapperPaintable *paintable, const GstVideoInfo *v_info);
+void                  gst_clapper_paintable_set_pixel_aspect_ratio (GstClapperPaintable *paintable, gint par_n, gint par_d);
+
+G_END_DECLS

lib/gst/plugin/gstclappersink.c

@@ -0,0 +1,910 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclappersink.h"
+#include "gstclapperimporterloader.h"
+#include "gstgtkutils.h"
+
+#define DEFAULT_FORCE_ASPECT_RATIO  TRUE
+#define DEFAULT_PAR_N               1
+#define DEFAULT_PAR_D               1
+#define DEFAULT_KEEP_LAST_FRAME     FALSE
+
+#define WINDOW_CSS_CLASS_NAME       "clappersinkwindow"
+
+enum
+{
+  PROP_0,
+  PROP_WIDGET,
+  PROP_FORCE_ASPECT_RATIO,
+  PROP_PIXEL_ASPECT_RATIO,
+  PROP_KEEP_LAST_FRAME,
+  PROP_LAST
+};
+
+#define GST_CAT_DEFAULT gst_clapper_sink_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+static void gst_clapper_sink_navigation_interface_init (
+    GstNavigationInterface *iface);
+
+#define parent_class gst_clapper_sink_parent_class
+G_DEFINE_TYPE_WITH_CODE (GstClapperSink, gst_clapper_sink, GST_TYPE_VIDEO_SINK,
+    G_IMPLEMENT_INTERFACE (GST_TYPE_NAVIGATION,
+        gst_clapper_sink_navigation_interface_init));
+GST_ELEMENT_REGISTER_DEFINE (clappersink, "clappersink", GST_RANK_NONE,
+    GST_TYPE_CLAPPER_SINK);
+
+static void
+window_clear_no_lock (GstClapperSink *self)
+{
+  if (!self->window)
+    return;
+
+  GST_TRACE_OBJECT (self, "Window clear");
+
+  if (self->window_destroy_id) {
+    g_signal_handler_disconnect (self->window, self->window_destroy_id);
+    self->window_destroy_id = 0;
+  }
+  self->window = NULL;
+  self->presented_window = FALSE;
+}
+
+static void
+widget_clear_no_lock (GstClapperSink *self)
+{
+  if (!self->widget)
+    return;
+
+  GST_TRACE_OBJECT (self, "Widget clear");
+
+  if (self->widget_destroy_id) {
+    g_signal_handler_disconnect (self->widget, self->widget_destroy_id);
+    self->widget_destroy_id = 0;
+  }
+  g_clear_object (&self->widget);
+}
+
+static void
+widget_destroy_cb (GtkWidget *widget, GstClapperSink *self)
+{
+  GST_CLAPPER_SINK_LOCK (self);
+  widget_clear_no_lock (self);
+  GST_CLAPPER_SINK_UNLOCK (self);
+}
+
+static void
+window_destroy_cb (GtkWidget *window, GstClapperSink *self)
+{
+  GST_DEBUG_OBJECT (self, "Window destroy");
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  widget_clear_no_lock (self);
+  window_clear_no_lock (self);
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+}
+
+static void
+calculate_stream_coords (GstClapperSink *self, GtkWidget *widget,
+    gdouble x, gdouble y, gdouble *stream_x, gdouble *stream_y)
+{
+  GstVideoRectangle result;
+  gint scaled_width, scaled_height, scale_factor;
+  gint video_width, video_height;
+  gboolean force_aspect_ratio;
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  video_width = GST_VIDEO_INFO_WIDTH (&self->v_info);
+  video_height = GST_VIDEO_INFO_HEIGHT (&self->v_info);
+  force_aspect_ratio = self->force_aspect_ratio;
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  scale_factor = gtk_widget_get_scale_factor (widget);
+  scaled_width = gtk_widget_get_width (widget) * scale_factor;
+  scaled_height = gtk_widget_get_height (widget) * scale_factor;
+
+  if (force_aspect_ratio) {
+    GstVideoRectangle src, dst;
+
+    src.x = 0;
+    src.y = 0;
+    src.w = gdk_paintable_get_intrinsic_width ((GdkPaintable *) self->paintable);
+    src.h = gdk_paintable_get_intrinsic_height ((GdkPaintable *) self->paintable);
+
+    dst.x = 0;
+    dst.y = 0;
+    dst.w = scaled_width;
+    dst.h = scaled_height;
+
+    gst_video_center_rect (&src, &dst, &result, TRUE);
+  } else {
+    result.x = 0;
+    result.y = 0;
+    result.w = scaled_width;
+    result.h = scaled_height;
+  }
+
+  /* Display coordinates to stream coordinates */
+  *stream_x = (result.w > 0)
+      ? (x - result.x) / result.w * video_width
+      : 0;
+  *stream_y = (result.h > 0)
+      ? (y - result.y) / result.h * video_height
+      : 0;
+
+  /* Clip to stream size */
+  *stream_x = CLAMP (*stream_x, 0, video_width);
+  *stream_y = CLAMP (*stream_y, 0, video_height);
+
+  GST_LOG ("Transform coords %fx%f => %fx%f", x, y, *stream_x, *stream_y);
+}
+
+static void
+gst_clapper_sink_widget_motion_event (GtkEventControllerMotion *motion,
+    gdouble x, gdouble y, GstClapperSink *self)
+{
+  GtkWidget *widget;
+  gdouble stream_x, stream_y;
+  gboolean is_inactive;
+
+  if (x == self->last_pos_x && y == self->last_pos_y)
+    return;
+
+  GST_OBJECT_LOCK (self);
+  is_inactive = (GST_STATE (self) < GST_STATE_PLAYING);
+  GST_OBJECT_UNLOCK (self);
+
+  if (is_inactive)
+    return;
+
+  self->last_pos_x = x;
+  self->last_pos_y = y;
+
+  widget = gtk_event_controller_get_widget ((GtkEventController *) motion);
+  calculate_stream_coords (self, widget, x, y, &stream_x, &stream_y);
+  GST_LOG ("Event \"mouse-move\", x: %f, y: %f", stream_x, stream_y);
+
+  gst_navigation_send_mouse_event ((GstNavigation *) self, "mouse-move",
+      0, stream_x, stream_y);
+}
+
+static void
+gst_clapper_sink_widget_button_event (GtkGestureClick *click,
+    gint n_press, gdouble x, gdouble y, GstClapperSink *self)
+{
+  GtkWidget *widget;
+  GdkEvent *event;
+  GdkEventType event_type;
+  const gchar *event_name;
+  gdouble stream_x, stream_y;
+  gboolean is_inactive;
+
+  GST_OBJECT_LOCK (self);
+  is_inactive = (GST_STATE (self) < GST_STATE_PLAYING);
+  GST_OBJECT_UNLOCK (self);
+
+  if (is_inactive)
+    return;
+
+  event = gtk_event_controller_get_current_event ((GtkEventController *) click);
+  event_type = gdk_event_get_event_type (event);
+
+  /* FIXME: Touchscreen handling should probably use new touch events from GStreamer 1.22 */
+  event_name = (event_type == GDK_BUTTON_PRESS || event_type == GDK_TOUCH_BEGIN)
+      ? "mouse-button-press"
+      : (event_type == GDK_BUTTON_RELEASE || event_type == GDK_TOUCH_END)
+      ? "mouse-button-release"
+      : NULL;
+
+  /* Can be NULL on touch */
+  if (!event_name)
+    return;
+
+  widget = gtk_event_controller_get_widget ((GtkEventController *) click);
+  calculate_stream_coords (self, widget, x, y, &stream_x, &stream_y);
+  GST_LOG ("Event \"%s\", x: %f, y: %f", event_name, stream_x, stream_y);
+
+  /* Gesture is set to handle only primary button, so we do not have to check */
+  gst_navigation_send_mouse_event ((GstNavigation *) self, event_name,
+      1, stream_x, stream_y);
+}
+
+/* Must call from main thread only with a lock */
+static GtkWidget *
+gst_clapper_sink_get_widget (GstClapperSink *self)
+{
+  if (G_UNLIKELY (!self->widget)) {
+    GtkEventController *controller;
+    GtkGesture *gesture;
+
+    /* Make sure GTK is initialized */
+    if (!gtk_init_check ()) {
+      GST_ERROR_OBJECT (self, "Could not ensure GTK initialization");
+      return NULL;
+    }
+
+    self->widget = gtk_picture_new ();
+
+    /* Otherwise widget in grid will appear as a 1x1px
+     * video which might be misleading for users */
+    gtk_widget_set_hexpand (self->widget, TRUE);
+    gtk_widget_set_vexpand (self->widget, TRUE);
+
+    gtk_widget_set_focusable (self->widget, TRUE);
+    gtk_widget_set_can_focus (self->widget, TRUE);
+
+    controller = gtk_event_controller_motion_new ();
+    g_signal_connect (controller, "motion",
+        G_CALLBACK (gst_clapper_sink_widget_motion_event), self);
+    gtk_widget_add_controller (self->widget, controller);
+
+    gesture = gtk_gesture_click_new ();
+    gtk_gesture_single_set_button (GTK_GESTURE_SINGLE (gesture), 1);
+    g_signal_connect (gesture, "pressed",
+        G_CALLBACK (gst_clapper_sink_widget_button_event), self);
+    g_signal_connect (gesture, "released",
+        G_CALLBACK (gst_clapper_sink_widget_button_event), self);
+    gtk_widget_add_controller (self->widget, GTK_EVENT_CONTROLLER (gesture));
+
+    /* TODO: Implement touch events once we depend on GStreamer 1.22 */
+
+    /* Take floating ref */
+    g_object_ref_sink (self->widget);
+
+    /* Set widget back pointer */
+    gst_clapper_paintable_set_widget (self->paintable, self->widget);
+
+    /* Set earlier remembered property */
+    gtk_picture_set_keep_aspect_ratio (GTK_PICTURE (self->widget),
+        self->force_aspect_ratio);
+
+    gtk_picture_set_paintable (GTK_PICTURE (self->widget), GDK_PAINTABLE (self->paintable));
+
+    self->widget_destroy_id = g_signal_connect (self->widget,
+        "destroy", G_CALLBACK (widget_destroy_cb), self);
+  }
+
+  return self->widget;
+}
+
+static GtkWidget *
+gst_clapper_sink_obtain_widget (GstClapperSink *self)
+{
+  GtkWidget *widget;
+
+  GST_CLAPPER_SINK_LOCK (self);
+  widget = gst_clapper_sink_get_widget (self);
+  if (widget)
+    g_object_ref (widget);
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  return widget;
+}
+
+static void
+gst_clapper_sink_get_property (GObject *object, guint prop_id,
+    GValue *value, GParamSpec *pspec)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (object);
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  switch (prop_id) {
+    case PROP_WIDGET:
+      if (self->widget) {
+        g_value_set_object (value, self->widget);
+      } else {
+        GtkWidget *widget;
+
+        GST_CLAPPER_SINK_UNLOCK (self);
+        widget = gst_gtk_invoke_on_main ((GThreadFunc) gst_clapper_sink_obtain_widget, self);
+        GST_CLAPPER_SINK_LOCK (self);
+
+        g_value_set_object (value, widget);
+        g_object_unref (widget);
+      }
+      break;
+    case PROP_FORCE_ASPECT_RATIO:
+      g_value_set_boolean (value, self->force_aspect_ratio);
+      break;
+    case PROP_PIXEL_ASPECT_RATIO:
+      gst_value_set_fraction (value, self->par_n, self->par_d);
+      break;
+    case PROP_KEEP_LAST_FRAME:
+      g_value_set_boolean (value, self->keep_last_frame);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+}
+
+static void
+gst_clapper_sink_set_property (GObject *object, guint prop_id,
+    const GValue *value, GParamSpec *pspec)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (object);
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  switch (prop_id) {
+    case PROP_FORCE_ASPECT_RATIO:
+      self->force_aspect_ratio = g_value_get_boolean (value);
+
+      if (self->widget) {
+        gtk_picture_set_keep_aspect_ratio (GTK_PICTURE (self->widget),
+            self->force_aspect_ratio);
+      }
+      break;
+    case PROP_PIXEL_ASPECT_RATIO:
+      self->par_n = gst_value_get_fraction_numerator (value);
+      self->par_d = gst_value_get_fraction_denominator (value);
+
+      gst_clapper_paintable_set_pixel_aspect_ratio (self->paintable,
+          self->par_n, self->par_d);
+      break;
+    case PROP_KEEP_LAST_FRAME:
+      self->keep_last_frame = g_value_get_boolean (value);
+      break;
+    default:
+      G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
+      break;
+  }
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+}
+
+static void
+gst_clapper_sink_navigation_send_event (GstNavigation *navigation,
+    GstStructure *structure)
+{
+  GstClapperSink *sink = GST_CLAPPER_SINK_CAST (navigation);
+  GstEvent *event;
+
+  GST_TRACE_OBJECT (sink, "Navigation event: %" GST_PTR_FORMAT, structure);
+  event = gst_event_new_navigation (structure);
+
+  if (G_LIKELY (event)) {
+    GstPad *pad;
+
+    pad = gst_pad_get_peer (GST_VIDEO_SINK_PAD (sink));
+
+    if (G_LIKELY (pad)) {
+      if (!gst_pad_send_event (pad, gst_event_ref (event))) {
+        /* If upstream didn't handle the event we'll post a message with it
+         * for the application in case it wants to do something with it */
+        gst_element_post_message (GST_ELEMENT_CAST (sink),
+            gst_navigation_message_new_event (GST_OBJECT_CAST (sink), event));
+      }
+      gst_object_unref (pad);
+    }
+    gst_event_unref (event);
+  }
+}
+
+static gboolean
+gst_clapper_sink_propose_allocation (GstBaseSink *bsink, GstQuery *query)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (bsink);
+  GstBufferPool *pool = NULL;
+  GstCaps *caps;
+  GstVideoInfo info;
+  guint size, min_buffers;
+  gboolean need_pool;
+
+  gst_query_parse_allocation (query, &caps, &need_pool);
+
+  if (!caps) {
+    GST_DEBUG_OBJECT (self, "No caps specified");
+    return FALSE;
+  }
+
+  if (!gst_video_info_from_caps (&info, caps)) {
+    GST_DEBUG_OBJECT (self, "Invalid caps specified");
+    return FALSE;
+  }
+
+  /* Normal size of a frame */
+  size = GST_VIDEO_INFO_SIZE (&info);
+
+  /* We keep around current buffer and a pending one */
+  min_buffers = 3;
+
+  if (need_pool) {
+    GstStructure *config = NULL;
+
+    GST_DEBUG_OBJECT (self, "Need to create buffer pool");
+
+    GST_CLAPPER_SINK_LOCK (self);
+    pool = gst_clapper_importer_create_pool (self->importer, &config);
+    GST_CLAPPER_SINK_UNLOCK (self);
+
+    if (pool) {
+      /* If we did not get config, use default one */
+      if (!config)
+        config = gst_buffer_pool_get_config (pool);
+
+      gst_buffer_pool_config_set_params (config, caps, size, min_buffers, 0);
+
+      if (!gst_buffer_pool_set_config (pool, config)) {
+        gst_object_unref (pool);
+
+        GST_ERROR_OBJECT (self, "Failed to set config");
+        return FALSE;
+      }
+    } else if (config) {
+      GST_WARNING_OBJECT (self, "Got config without a pool to apply it");
+      gst_structure_free (config);
+    }
+  }
+
+  gst_query_add_allocation_pool (query, pool, size, min_buffers, 0);
+  if (pool)
+    gst_object_unref (pool);
+
+  GST_CLAPPER_SINK_LOCK (self);
+  gst_clapper_importer_add_allocation_metas (self->importer, query);
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_sink_query (GstBaseSink *bsink, GstQuery *query)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (bsink);
+  gboolean res = FALSE;
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  if (GST_QUERY_TYPE (query) == GST_QUERY_CONTEXT) {
+    gboolean is_inactive;
+
+    GST_OBJECT_LOCK (self);
+    is_inactive = (GST_STATE (self) < GST_STATE_PAUSED);
+    GST_OBJECT_UNLOCK (self);
+
+    /* Some random context query in the middle of playback
+     * should not trigger importer replacement */
+    if (is_inactive)
+      gst_clapper_importer_loader_find_importer_for_context_query (query, &self->importer);
+    if (self->importer)
+      res = gst_clapper_importer_handle_context_query (self->importer, bsink, query);
+  }
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  if (res)
+    return TRUE;
+
+  return GST_BASE_SINK_CLASS (parent_class)->query (bsink, query);
+}
+
+static gboolean
+gst_clapper_sink_start_on_main (GstClapperSink *self)
+{
+  GtkWidget *widget;
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  /* Make sure widget is created */
+  if (!(widget = gst_clapper_sink_get_widget (self))) {
+    GST_CLAPPER_SINK_UNLOCK (self);
+
+    return FALSE;
+  }
+
+  /* When no toplevel window, make our own */
+  if (G_UNLIKELY (!gtk_widget_get_root (widget) && !self->window)) {
+    GtkWidget *toplevel, *parent;
+    GtkCssProvider *provider;
+    gchar *win_title;
+
+    if ((parent = gtk_widget_get_parent (widget))) {
+      GtkWidget *temp_parent;
+
+      while ((temp_parent = gtk_widget_get_parent (parent)))
+        parent = temp_parent;
+    }
+    toplevel = (parent) ? parent : widget;
+
+    self->window = (GtkWindow *) gtk_window_new ();
+    gtk_widget_add_css_class (GTK_WIDGET (self->window), WINDOW_CSS_CLASS_NAME);
+
+    provider = gtk_css_provider_new ();
+    gtk_css_provider_load_from_data (provider,
+        "." WINDOW_CSS_CLASS_NAME " { background: none; }", -1);
+    gtk_style_context_add_provider_for_display (
+        gdk_display_get_default (), GTK_STYLE_PROVIDER (provider),
+        GTK_STYLE_PROVIDER_PRIORITY_APPLICATION);
+    g_object_unref (provider);
+
+    win_title = g_strdup_printf ("Clapper Sink - GTK %u.%u.%u Window",
+        gtk_get_major_version (),
+        gtk_get_minor_version (),
+        gtk_get_micro_version ());
+
+    /* Set some common default size, adding stock headerbar height
+     * to it in order to display 4:3 aspect video widget */
+    gtk_window_set_default_size (self->window, 640, 480 + 37);
+    gtk_window_set_title (self->window, win_title);
+    gtk_window_set_child (self->window, toplevel);
+
+    g_free (win_title);
+
+    self->window_destroy_id = g_signal_connect (self->window,
+        "destroy", G_CALLBACK (window_destroy_cb), self);
+  }
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  return TRUE;
+}
+
+static gboolean
+window_present_on_main_idle (GtkWindow *window)
+{
+  GST_INFO ("Presenting window");
+  gtk_window_present (window);
+
+  return G_SOURCE_REMOVE;
+}
+
+static gboolean
+gst_clapper_sink_start (GstBaseSink *bsink)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (bsink);
+
+  GST_INFO_OBJECT (self, "Start");
+
+  if (G_UNLIKELY (!(! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
+      gst_clapper_sink_start_on_main, self)))) {
+    GST_ELEMENT_ERROR (self, RESOURCE, NOT_FOUND,
+        ("GtkWidget could not be created"), (NULL));
+
+    return FALSE;
+  }
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_sink_stop_on_main (GstClapperSink *self)
+{
+  GtkWindow *window = NULL;
+
+  GST_CLAPPER_SINK_LOCK (self);
+  if (self->window)
+    window = g_object_ref (self->window);
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  if (window) {
+    gtk_window_destroy (window);
+    g_object_unref (window);
+  }
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_sink_stop (GstBaseSink *bsink)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (bsink);
+  gboolean has_window;
+
+  GST_INFO_OBJECT (self, "Stop");
+
+  GST_CLAPPER_SINK_LOCK (self);
+  has_window = (self->window != NULL);
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  if (G_UNLIKELY (has_window)) {
+    return (! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
+        gst_clapper_sink_stop_on_main, self));
+  }
+
+  return TRUE;
+}
+
+static GstStateChangeReturn
+gst_clapper_sink_change_state (GstElement *element, GstStateChange transition)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (element);
+
+  GST_DEBUG_OBJECT (self, "Changing state: %s => %s",
+      gst_element_state_get_name (GST_STATE_TRANSITION_CURRENT (transition)),
+      gst_element_state_get_name (GST_STATE_TRANSITION_NEXT (transition)));
+
+  switch (transition) {
+    case GST_STATE_CHANGE_PAUSED_TO_READY:
+      GST_CLAPPER_SINK_LOCK (self);
+      if (!self->keep_last_frame && self->importer) {
+        gst_clapper_importer_set_buffer (self->importer, NULL);
+        gst_clapper_paintable_queue_draw (self->paintable);
+      }
+      GST_CLAPPER_SINK_UNLOCK (self);
+      break;
+    case GST_STATE_CHANGE_PAUSED_TO_PLAYING:
+      GST_CLAPPER_SINK_LOCK (self);
+      if (G_UNLIKELY (self->window && !self->presented_window)) {
+        g_idle_add_full (G_PRIORITY_DEFAULT,
+            (GSourceFunc) window_present_on_main_idle,
+            g_object_ref (self->window), (GDestroyNotify) g_object_unref);
+        self->presented_window = TRUE;
+      }
+      GST_CLAPPER_SINK_UNLOCK (self);
+      break;
+    default:
+      break;
+  }
+
+  return GST_ELEMENT_CLASS (parent_class)->change_state (element, transition);
+}
+
+static void
+gst_clapper_sink_get_times (GstBaseSink *bsink, GstBuffer *buffer,
+    GstClockTime *start, GstClockTime *end)
+{
+  if (!GST_BUFFER_TIMESTAMP_IS_VALID (buffer))
+    return;
+
+  *start = GST_BUFFER_TIMESTAMP (buffer);
+
+  if (GST_BUFFER_DURATION_IS_VALID (buffer)) {
+    *end = *start + GST_BUFFER_DURATION (buffer);
+  } else {
+    GstClapperSink *self = GST_CLAPPER_SINK_CAST (bsink);
+    gint fps_n, fps_d;
+
+    GST_CLAPPER_SINK_LOCK (self);
+    fps_n = GST_VIDEO_INFO_FPS_N (&self->v_info);
+    fps_d = GST_VIDEO_INFO_FPS_D (&self->v_info);
+    GST_CLAPPER_SINK_UNLOCK (self);
+
+    if (fps_n > 0)
+      *end = *start + gst_util_uint64_scale_int (GST_SECOND, fps_d, fps_n);
+  }
+}
+
+static GstCaps *
+gst_clapper_sink_get_caps (GstBaseSink *bsink, GstCaps *filter)
+{
+  GstCaps *result, *tmp;
+
+  tmp = gst_pad_get_pad_template_caps (GST_BASE_SINK_PAD (bsink));
+
+  if (filter) {
+    GST_DEBUG ("Intersecting with filter caps: %" GST_PTR_FORMAT, filter);
+    result = gst_caps_intersect_full (filter, tmp, GST_CAPS_INTERSECT_FIRST);
+    gst_caps_unref (tmp);
+  } else {
+    result = tmp;
+  }
+  GST_DEBUG ("Returning caps: %" GST_PTR_FORMAT, result);
+
+  return result;
+}
+
+static gboolean
+gst_clapper_sink_set_caps (GstBaseSink *bsink, GstCaps *caps)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (bsink);
+
+  GST_INFO_OBJECT (self, "Set caps: %" GST_PTR_FORMAT, caps);
+  GST_CLAPPER_SINK_LOCK (self);
+
+  if (G_UNLIKELY (!self->widget)) {
+    GST_CLAPPER_SINK_UNLOCK (self);
+    GST_ELEMENT_ERROR (self, RESOURCE, NOT_FOUND,
+        ("Output widget was destroyed"), (NULL));
+
+    return FALSE;
+  }
+
+  if (!gst_clapper_importer_loader_find_importer_for_caps (caps, &self->importer)) {
+    GST_CLAPPER_SINK_UNLOCK (self);
+    GST_ELEMENT_ERROR (self, RESOURCE, NOT_FOUND,
+        ("No importer for given caps found"), (NULL));
+
+    return FALSE;
+  }
+  gst_clapper_paintable_set_importer (self->paintable, self->importer);
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  return GST_BASE_SINK_CLASS (parent_class)->set_caps (bsink, caps);
+}
+
+static gboolean
+gst_clapper_sink_set_info (GstVideoSink *vsink, GstCaps *caps, const GstVideoInfo *info)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (vsink);
+  gboolean res;
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  self->v_info = *info;
+  GST_DEBUG_OBJECT (self, "Video info changed");
+
+  res = gst_clapper_paintable_set_video_info (self->paintable, info);
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  return res;
+}
+
+static GstFlowReturn
+gst_clapper_sink_show_frame (GstVideoSink *vsink, GstBuffer *buffer)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (vsink);
+
+  GST_TRACE ("Got %" GST_PTR_FORMAT, buffer);
+  GST_CLAPPER_SINK_LOCK (self);
+
+  if (G_UNLIKELY (!self->widget)) {
+    GST_CLAPPER_SINK_UNLOCK (self);
+    GST_ELEMENT_ERROR (self, RESOURCE, NOT_FOUND,
+        ("Output widget was destroyed"), (NULL));
+
+    return GST_FLOW_ERROR;
+  }
+
+  gst_clapper_importer_set_buffer (self->importer, buffer);
+  gst_clapper_paintable_queue_draw (self->paintable);
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  return GST_FLOW_OK;
+}
+
+static void
+gst_clapper_sink_init (GstClapperSink *self)
+{
+  GObjectClass *gobject_class;
+
+  gobject_class = (GObjectClass *) GST_CLAPPER_SINK_GET_CLASS (self);
+
+  /* HACK: install here instead of class init to avoid GStreamer
+   * plugin scanner GObject type conflicts with older GTK versions */
+  if (!g_object_class_find_property (gobject_class, "widget")) {
+    g_object_class_install_property (gobject_class, PROP_WIDGET,
+        g_param_spec_object ("widget", "GTK Widget",
+            "The GtkWidget to place in the widget hierarchy",
+            GTK_TYPE_WIDGET, G_PARAM_READABLE | G_PARAM_STATIC_STRINGS));
+  }
+
+  self->force_aspect_ratio = DEFAULT_FORCE_ASPECT_RATIO;
+  self->par_n = DEFAULT_PAR_N;
+  self->par_d = DEFAULT_PAR_D;
+  self->keep_last_frame = DEFAULT_KEEP_LAST_FRAME;
+
+  g_mutex_init (&self->lock);
+  gst_video_info_init (&self->v_info);
+
+  self->paintable = gst_clapper_paintable_new ();
+}
+
+static void
+gst_clapper_sink_dispose (GObject *object)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (object);
+
+  GST_CLAPPER_SINK_LOCK (self);
+
+  window_clear_no_lock (self);
+  widget_clear_no_lock (self);
+
+  g_clear_object (&self->paintable);
+  gst_clear_object (&self->importer);
+
+  GST_CLAPPER_SINK_UNLOCK (self);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, dispose, (object));
+}
+
+static void
+gst_clapper_sink_finalize (GObject *object)
+{
+  GstClapperSink *self = GST_CLAPPER_SINK_CAST (object);
+
+  GST_TRACE ("Finalize");
+
+  gst_clapper_importer_loader_unload_all ();
+  g_mutex_clear (&self->lock);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, finalize, (object));
+}
+
+static void
+gst_clapper_sink_class_init (GstClapperSinkClass *klass)
+{
+  GstPadTemplate *sink_pad_templ;
+
+  GObjectClass *gobject_class = (GObjectClass *) klass;
+  GstElementClass *gstelement_class = (GstElementClass *) klass;
+  GstBaseSinkClass *gstbasesink_class = (GstBaseSinkClass *) klass;
+  GstVideoSinkClass *gstvideosink_class = (GstVideoSinkClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clappersink", 0,
+      "Clapper Sink");
+
+  gobject_class->get_property = gst_clapper_sink_get_property;
+  gobject_class->set_property = gst_clapper_sink_set_property;
+  gobject_class->dispose = gst_clapper_sink_dispose;
+  gobject_class->finalize = gst_clapper_sink_finalize;
+
+  g_object_class_install_property (gobject_class, PROP_FORCE_ASPECT_RATIO,
+      g_param_spec_boolean ("force-aspect-ratio", "Force aspect ratio",
+          "When enabled, scaling will respect original aspect ratio",
+          DEFAULT_FORCE_ASPECT_RATIO,
+          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
+
+  g_object_class_install_property (gobject_class, PROP_PIXEL_ASPECT_RATIO,
+      gst_param_spec_fraction ("pixel-aspect-ratio", "Pixel Aspect Ratio",
+          "The pixel aspect ratio of the device",
+          DEFAULT_PAR_N, DEFAULT_PAR_D,
+          G_MAXINT, 1, 1, 1, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
+
+  g_object_class_install_property (gobject_class, PROP_KEEP_LAST_FRAME,
+      g_param_spec_boolean ("keep-last-frame", "Keep last frame",
+          "Keep showing last video frame after playback instead of black screen",
+          DEFAULT_KEEP_LAST_FRAME,
+          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
+
+  gstelement_class->change_state = gst_clapper_sink_change_state;
+
+  gstbasesink_class->get_caps = gst_clapper_sink_get_caps;
+  gstbasesink_class->set_caps = gst_clapper_sink_set_caps;
+  gstbasesink_class->get_times = gst_clapper_sink_get_times;
+  gstbasesink_class->propose_allocation = gst_clapper_sink_propose_allocation;
+  gstbasesink_class->query = gst_clapper_sink_query;
+  gstbasesink_class->start = gst_clapper_sink_start;
+  gstbasesink_class->stop = gst_clapper_sink_stop;
+
+  gstvideosink_class->set_info = gst_clapper_sink_set_info;
+  gstvideosink_class->show_frame = gst_clapper_sink_show_frame;
+
+  gst_element_class_set_metadata (gstelement_class,
+      "Clapper video sink",
+      "Sink/Video", "A GTK4 video sink used by Clapper media player",
+      "Rafał Dzięgiel <rafostar.github@gmail.com>");
+
+  sink_pad_templ = gst_clapper_importer_loader_make_sink_pad_template ();
+  gst_element_class_add_pad_template (gstelement_class, sink_pad_templ);
+}
+
+/*
+ * GstNavigationInterface
+ */
+static void
+gst_clapper_sink_navigation_interface_init (GstNavigationInterface *iface)
+{
+  /* TODO: Port to "send_event_simple" once we depend on GStreamer 1.22 */
+  iface->send_event = gst_clapper_sink_navigation_send_event;
+}

lib/gst/plugin/gstclappersink.h

@@ -0,0 +1,72 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include <gtk/gtk.h>
+#include <gst/gst.h>
+#include <gst/video/gstvideosink.h>
+#include <gst/video/video.h>
+
+#include "gstclapperpaintable.h"
+#include "gstclapperimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_SINK (gst_clapper_sink_get_type())
+G_DECLARE_FINAL_TYPE (GstClapperSink, gst_clapper_sink, GST, CLAPPER_SINK, GstVideoSink)
+
+#define GST_CLAPPER_SINK_GET_CLASS(obj)     (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_CLAPPER_SINK, GstClapperSinkClass))
+#define GST_CLAPPER_SINK_CAST(obj)          ((GstClapperSink *)(obj))
+
+#define GST_CLAPPER_SINK_GET_LOCK(obj)      (&GST_CLAPPER_SINK_CAST(obj)->lock)
+#define GST_CLAPPER_SINK_LOCK(obj)          g_mutex_lock (GST_CLAPPER_SINK_GET_LOCK(obj))
+#define GST_CLAPPER_SINK_UNLOCK(obj)        g_mutex_unlock (GST_CLAPPER_SINK_GET_LOCK(obj))
+
+struct _GstClapperSink
+{
+  GstVideoSink parent;
+
+  GMutex lock;
+
+  GstClapperPaintable *paintable;
+  GstClapperImporter *importer;
+  GstVideoInfo v_info;
+
+  GtkWidget *widget;
+  GtkWindow *window;
+
+  gboolean presented_window;
+
+  /* Properties */
+  gboolean force_aspect_ratio;
+  gint par_n, par_d;
+  gboolean keep_last_frame;
+
+  /* Position coords */
+  gdouble last_pos_x;
+  gdouble last_pos_y;
+
+  gulong widget_destroy_id;
+  gulong window_destroy_id;
+};
+
+GST_ELEMENT_REGISTER_DECLARE (clappersink);
+
+G_END_DECLS

lib/gst/plugin/gstgdkformats.h

@@ -0,0 +1,37 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#include <glib.h>
+
+#if G_BYTE_ORDER == G_LITTLE_ENDIAN
+#define GST_GDK_MEMORY_ENDIAN_FORMATS      "RGBA64_LE"
+#define GST_GDK_GL_TEXTURE_ENDIAN_FORMATS  "RGBA64_LE"
+#elif G_BYTE_ORDER == G_BIG_ENDIAN
+#define GST_GDK_MEMORY_ENDIAN_FORMATS      "RGBA64_BE"
+#define GST_GDK_GL_TEXTURE_ENDIAN_FORMATS  "RGBA64_BE"
+#endif
+
+#define GST_GDK_MEMORY_FORMATS                       \
+    GST_GDK_MEMORY_ENDIAN_FORMATS ", "               \
+    "ABGR, BGRA, ARGB, RGBA, BGRx, RGBx, BGR, RGB"
+
+/* Formats that `GdkGLTexture` supports */
+#define GST_GDK_GL_TEXTURE_FORMATS                   \
+    GST_GDK_GL_TEXTURE_ENDIAN_FORMATS ", "           \
+    "RGBA, RGBx, RGB"

lib/gst/plugin/gstgtkutils.c

@@ -0,0 +1,132 @@
+/*
+ * GStreamer
+ * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2015 Thibault Saunier <tsaunier@gnome.org>
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#include "gstgtkutils.h"
+
+struct invoke_context
+{
+  GThreadFunc func;
+  gpointer data;
+  GMutex lock;
+  GCond cond;
+  gboolean fired;
+
+  gpointer res;
+};
+
+static gboolean
+gst_gtk_invoke_func (struct invoke_context *info)
+{
+  g_mutex_lock (&info->lock);
+  info->res = info->func (info->data);
+  info->fired = TRUE;
+  g_cond_signal (&info->cond);
+  g_mutex_unlock (&info->lock);
+
+  return G_SOURCE_REMOVE;
+}
+
+gpointer
+gst_gtk_invoke_on_main (GThreadFunc func, gpointer data)
+{
+  GMainContext *main_context = g_main_context_default ();
+  struct invoke_context info;
+
+  g_mutex_init (&info.lock);
+  g_cond_init (&info.cond);
+  info.fired = FALSE;
+  info.func = func;
+  info.data = data;
+
+  g_main_context_invoke (main_context, (GSourceFunc) gst_gtk_invoke_func,
+      &info);
+
+  g_mutex_lock (&info.lock);
+  while (!info.fired)
+    g_cond_wait (&info.cond, &info.lock);
+  g_mutex_unlock (&info.lock);
+
+  g_mutex_clear (&info.lock);
+  g_cond_clear (&info.cond);
+
+  return info.res;
+}
+
+/* For use with `GdkMemoryTexture` only! */
+GdkMemoryFormat
+gst_video_format_to_gdk_memory_format (GstVideoFormat format)
+{
+  switch (format) {
+    case GST_VIDEO_FORMAT_RGBA64_LE:
+    case GST_VIDEO_FORMAT_RGBA64_BE:
+      return GDK_MEMORY_R16G16B16A16_PREMULTIPLIED;
+    case GST_VIDEO_FORMAT_RGBA:
+      return GDK_MEMORY_R8G8B8A8;
+    case GST_VIDEO_FORMAT_BGRA:
+      return GDK_MEMORY_B8G8R8A8;
+    case GST_VIDEO_FORMAT_ARGB:
+      return GDK_MEMORY_A8R8G8B8;
+    case GST_VIDEO_FORMAT_ABGR:
+      return GDK_MEMORY_A8B8G8R8;
+    case GST_VIDEO_FORMAT_RGBx:
+      return GDK_MEMORY_R8G8B8A8_PREMULTIPLIED;
+    case GST_VIDEO_FORMAT_BGRx:
+      return GDK_MEMORY_B8G8R8A8_PREMULTIPLIED;
+    case GST_VIDEO_FORMAT_RGB:
+      return GDK_MEMORY_R8G8B8;
+    case GST_VIDEO_FORMAT_BGR:
+      return GDK_MEMORY_B8G8R8;
+    default:
+      break;
+  }
+
+  /* This should never happen as long as above switch statement
+   * is updated when new formats are added to caps */
+  g_assert_not_reached ();
+
+  /* Fallback format */
+  return GDK_MEMORY_R8G8B8A8_PREMULTIPLIED;
+}
+
+GdkTexture *
+gst_video_frame_into_gdk_texture (GstVideoFrame *frame)
+{
+  GdkTexture *texture;
+  GBytes *bytes;
+
+  bytes = g_bytes_new_with_free_func (
+      GST_VIDEO_FRAME_PLANE_DATA (frame, 0),
+      GST_VIDEO_FRAME_HEIGHT (frame) * GST_VIDEO_FRAME_PLANE_STRIDE (frame, 0),
+      (GDestroyNotify) gst_buffer_unref,
+      gst_buffer_ref (frame->buffer));
+
+  texture = gdk_memory_texture_new (
+      GST_VIDEO_FRAME_WIDTH (frame),
+      GST_VIDEO_FRAME_HEIGHT (frame),
+      gst_video_format_to_gdk_memory_format (GST_VIDEO_FRAME_FORMAT (frame)),
+      bytes,
+      GST_VIDEO_FRAME_PLANE_STRIDE (frame, 0));
+
+  g_bytes_unref (bytes);
+
+  return texture;
+}

lib/gst/plugin/gstgtkutils.h

@@ -1,6 +1,8 @@
 /*
  * GStreamer
  * Copyright (C) 2015 Matthew Waters <matthew@centricular.com>
+ * Copyright (C) 2015 Thibault Saunier <tsaunier@gnome.org>
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Library General Public
@@ -18,47 +20,18 @@
  * Boston, MA 02110-1301, USA.
  */
 
-#ifndef __GST_GTK_GL_SINK_H__
-#define __GST_GTK_GL_SINK_H__
+#pragma once
 
+#include <glib.h>
 #include <gtk/gtk.h>
-#include <gst/gst.h>
-#include <gst/video/gstvideosink.h>
 #include <gst/video/video.h>
-#include <gst/gl/gl.h>
-
-#include "gstgtkbasesink.h"
 
 G_BEGIN_DECLS
 
-#define GST_TYPE_GTK_GL_SINK (gst_gtk_gl_sink_get_type ())
-G_DECLARE_FINAL_TYPE (GstGtkGLSink, gst_gtk_gl_sink, GST, GTK_GL_SINK,
-    GstGtkBaseSink);
+gpointer        gst_gtk_invoke_on_main                (GThreadFunc func, gpointer data);
 
-/**
- * GstGtkGLSink:
- *
- * Opaque #GstGtkGLSink object
- */
-struct _GstGtkGLSink
-{
-  /* <private> */
-  GstGtkBaseSink        parent;
+GdkMemoryFormat gst_video_format_to_gdk_memory_format (GstVideoFormat format);
 
-  GstGLDisplay         *display;
-  GstGLContext         *context;
-  GstGLContext         *gtk_context;
-
-  GstGLUpload          *upload;
-  GstBuffer            *uploaded_buffer;
-
-  /* read/write with object lock */
-  gint                  display_width;
-  gint                  display_height;
-
-  gulong                widget_destroy_sig_handler;
-};
+GdkTexture *    gst_video_frame_into_gdk_texture      (GstVideoFrame *frame);
 
 G_END_DECLS
-
-#endif /* __GST_GTK_GL_SINK_H__ */

lib/gst/plugin/gstplugin.c

@@ -0,0 +1,43 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <gmodule.h>
+
+#include "gstclappersink.h"
+
+static gboolean
+plugin_init (GstPlugin *plugin)
+{
+  if (!g_module_supported ())
+    return FALSE;
+
+  gst_plugin_add_dependency_simple (plugin,
+      NULL, CLAPPER_SINK_IMPORTER_PATH, NULL,
+      GST_PLUGIN_DEPENDENCY_FLAG_NONE);
+
+  return GST_ELEMENT_REGISTER (clappersink, plugin);
+}
+
+GST_PLUGIN_DEFINE (GST_VERSION_MAJOR, GST_VERSION_MINOR,
+    clapper, "Clapper elements", plugin_init, VERSION, "LGPL",
+    GST_PACKAGE_NAME, GST_PACKAGE_ORIGIN)

lib/gst/plugin/importers/gstclapperglbaseimporter.c

@@ -0,0 +1,549 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclapperglbaseimporter.h"
+#include "gst/plugin/gstgdkformats.h"
+#include "gst/plugin/gstgtkutils.h"
+
+#include <gst/gl/gstglfuncs.h>
+
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_WAYLAND
+#include <gdk/wayland/gdkwayland.h>
+#include <gst/gl/wayland/gstgldisplay_wayland.h>
+#endif
+
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11
+#include <gdk/x11/gdkx.h>
+#endif
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_GLX
+#include <gst/gl/x11/gstgldisplay_x11.h>
+#endif
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_EGL
+#include <gst/gl/egl/gstgldisplay_egl.h>
+#endif
+
+#define GST_CAT_DEFAULT gst_clapper_gl_base_importer_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+#define parent_class gst_clapper_gl_base_importer_parent_class
+G_DEFINE_TYPE (GstClapperGLBaseImporter, gst_clapper_gl_base_importer, GST_TYPE_CLAPPER_IMPORTER);
+
+static GstGLContext *
+wrap_current_gl (GstGLDisplay *display, GdkGLAPI gdk_gl_api, GstGLPlatform platform)
+{
+  GstGLAPI gst_gl_api = GST_GL_API_NONE;
+
+  switch (gdk_gl_api) {
+    case GDK_GL_API_GL:
+      gst_gl_api = GST_GL_API_OPENGL | GST_GL_API_OPENGL3;
+      break;
+    case GDK_GL_API_GLES:
+      gst_gl_api = GST_GL_API_GLES2;
+      break;
+    default:
+      g_assert_not_reached ();
+      break;
+  }
+
+  if (gst_gl_api != GST_GL_API_NONE) {
+    guintptr gl_handle;
+
+    gst_gl_display_filter_gl_api (display, gst_gl_api);
+
+    if ((gl_handle = gst_gl_context_get_current_gl_context (platform)))
+      return gst_gl_context_new_wrapped (display, gl_handle, platform, gst_gl_api);
+  }
+
+  return NULL;
+}
+
+static gboolean
+retrieve_gl_context_on_main (GstClapperGLBaseImporter *self)
+{
+  GstClapperGLBaseImporterClass *gl_bi_class = GST_CLAPPER_GL_BASE_IMPORTER_GET_CLASS (self);
+  GdkDisplay *gdk_display;
+  GdkGLContext *gdk_context;
+  GError *error = NULL;
+  GdkGLAPI gdk_gl_api;
+  GstGLPlatform platform = GST_GL_PLATFORM_NONE;
+  gint gl_major = 0, gl_minor = 0;
+
+  if (!gtk_init_check ()) {
+    GST_ERROR_OBJECT (self, "Could not ensure GTK initialization");
+    return FALSE;
+  }
+
+  /* Make sure we are clean here, otherwise data sharing
+   * between GL-based importers may lead to leaks */
+  gst_clear_object (&self->wrapped_context);
+  g_clear_object (&self->gdk_context);
+  gst_clear_object (&self->gst_display);
+
+  gdk_display = gdk_display_get_default ();
+
+  if (!(gdk_context = gdk_display_create_gl_context (gdk_display, &error))) {
+    GST_ERROR_OBJECT (self, "Error creating Gdk GL context: %s",
+        error ? error->message : "No error set by Gdk");
+    g_clear_error (&error);
+
+    return FALSE;
+  }
+
+  if (!gl_bi_class->gdk_context_realize (self, gdk_context)) {
+    GST_ERROR_OBJECT (self, "Could not realize Gdk context: %" GST_PTR_FORMAT,
+        gdk_context);
+    g_object_unref (gdk_context);
+
+    return FALSE;
+  }
+  gdk_gl_api = gdk_gl_context_get_api (gdk_context);
+
+  GST_OBJECT_LOCK (self);
+
+  self->gdk_context = gdk_context;
+
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_WAYLAND
+  if (GDK_IS_WAYLAND_DISPLAY (gdk_display)) {
+    struct wl_display *wayland_display =
+        gdk_wayland_display_get_wl_display (gdk_display);
+    self->gst_display = (GstGLDisplay *)
+        gst_gl_display_wayland_new_with_display (wayland_display);
+  }
+#endif
+
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11
+  if (GDK_IS_X11_DISPLAY (gdk_display)) {
+    gpointer display_ptr;
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_EGL
+    display_ptr = gdk_x11_display_get_egl_display (gdk_display);
+    if (display_ptr) {
+      self->gst_display = (GstGLDisplay *)
+          gst_gl_display_egl_new_with_egl_display (display_ptr);
+    }
+#endif
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_GLX
+    if (!self->gst_display) {
+      display_ptr = gdk_x11_display_get_xdisplay (gdk_display);
+      self->gst_display = (GstGLDisplay *)
+          gst_gl_display_x11_new_with_display (display_ptr);
+    }
+  }
+#endif
+#endif
+
+  /* Fallback to generic display */
+  if (G_UNLIKELY (!self->gst_display)) {
+    GST_WARNING_OBJECT (self, "Unknown Gdk display!");
+    self->gst_display = gst_gl_display_new ();
+  }
+
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_WAYLAND
+  if (GST_IS_GL_DISPLAY_WAYLAND (self->gst_display)) {
+    platform = GST_GL_PLATFORM_EGL;
+    GST_INFO_OBJECT (self, "Using EGL on Wayland");
+    goto have_display;
+  }
+#endif
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_EGL
+  if (GST_IS_GL_DISPLAY_EGL (self->gst_display)) {
+    platform = GST_GL_PLATFORM_EGL;
+    GST_INFO_OBJECT (self, "Using EGL on x11");
+    goto have_display;
+  }
+#endif
+#if GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_GLX
+  if (GST_IS_GL_DISPLAY_X11 (self->gst_display)) {
+    platform = GST_GL_PLATFORM_GLX;
+    GST_INFO_OBJECT (self, "Using GLX on x11");
+    goto have_display;
+  }
+#endif
+
+  g_clear_object (&self->gdk_context);
+  gst_clear_object (&self->gst_display);
+
+  GST_OBJECT_UNLOCK (self);
+
+  GST_ERROR_OBJECT (self, "Unsupported GL platform");
+  return FALSE;
+
+have_display:
+  gdk_gl_context_make_current (self->gdk_context);
+
+  self->wrapped_context = wrap_current_gl (self->gst_display, gdk_gl_api, platform);
+  if (!self->wrapped_context) {
+    GST_ERROR ("Could not retrieve Gdk OpenGL context");
+    gdk_gl_context_clear_current ();
+
+    g_clear_object (&self->gdk_context);
+    gst_clear_object (&self->gst_display);
+
+    GST_OBJECT_UNLOCK (self);
+
+    return FALSE;
+  }
+
+  GST_INFO ("Retrieved Gdk OpenGL context %" GST_PTR_FORMAT, self->wrapped_context);
+  gst_gl_context_activate (self->wrapped_context, TRUE);
+
+  if (!gst_gl_context_fill_info (self->wrapped_context, &error)) {
+    GST_ERROR ("Failed to fill Gdk context info: %s", error->message);
+    g_clear_error (&error);
+
+    gst_gl_context_activate (self->wrapped_context, FALSE);
+
+    gst_clear_object (&self->wrapped_context);
+    g_clear_object (&self->gdk_context);
+    gst_clear_object (&self->gst_display);
+
+    GST_OBJECT_UNLOCK (self);
+
+    return FALSE;
+  }
+
+  gst_gl_context_get_gl_version (self->wrapped_context, &gl_major, &gl_minor);
+  GST_INFO ("Using OpenGL%s %i.%i", (gdk_gl_api == GDK_GL_API_GLES) ? " ES" : "",
+      gl_major, gl_minor);
+
+  /* Deactivate in both places */
+  gst_gl_context_activate (self->wrapped_context, FALSE);
+  gdk_gl_context_clear_current ();
+
+  GST_OBJECT_UNLOCK (self);
+
+  return TRUE;
+}
+
+static gboolean
+retrieve_gst_context (GstClapperGLBaseImporter *self)
+{
+  GstGLDisplay *gst_display = NULL;
+  GstGLContext *gst_context = NULL;
+  GError *error = NULL;
+
+  GST_OBJECT_LOCK (self);
+
+  gst_display = gst_object_ref (self->gst_display);
+
+  /* GstGLDisplay operations require display object lock to be held */
+  GST_OBJECT_LOCK (gst_display);
+
+  if (!self->gst_context) {
+    GST_TRACE_OBJECT (self, "Creating new GstGLContext");
+
+    if (!gst_gl_display_create_context (gst_display, self->wrapped_context,
+        &self->gst_context, &error)) {
+      GST_WARNING ("Could not create OpenGL context: %s",
+          error ? error->message : "Unknown");
+      g_clear_error (&error);
+
+      GST_OBJECT_UNLOCK (gst_display);
+      GST_OBJECT_UNLOCK (self);
+
+      return FALSE;
+    }
+  }
+
+  gst_context = gst_object_ref (self->gst_context);
+
+  GST_OBJECT_UNLOCK (self);
+
+  gst_gl_display_add_context (gst_display, gst_context);
+
+  GST_OBJECT_UNLOCK (gst_display);
+
+  gst_object_unref (gst_display);
+  gst_object_unref (gst_context);
+
+  return TRUE;
+}
+
+static gboolean
+gst_clapper_gl_base_importer_prepare (GstClapperImporter *importer)
+{
+  GstClapperGLBaseImporter *self = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+  gboolean need_invoke;
+
+  GST_OBJECT_LOCK (self);
+  need_invoke = (!self->gdk_context || !self->gst_display || !self->wrapped_context);
+  GST_OBJECT_UNLOCK (self);
+
+  if (need_invoke) {
+    if (!(! !gst_gtk_invoke_on_main ((GThreadFunc) (GCallback)
+        retrieve_gl_context_on_main, self)))
+      return FALSE;
+  }
+
+  if (!retrieve_gst_context (self))
+    return FALSE;
+
+  if (!GST_CLAPPER_IMPORTER_CLASS (parent_class)->prepare)
+    return TRUE;
+
+  return GST_CLAPPER_IMPORTER_CLASS (parent_class)->prepare (importer);
+}
+
+static void
+gst_clapper_gl_base_importer_share_data (GstClapperImporter *importer, GstClapperImporter *dest_importer)
+{
+  GstClapperGLBaseImporter *self = GST_CLAPPER_GL_BASE_IMPORTER (importer);
+
+  if (GST_IS_CLAPPER_GL_BASE_IMPORTER (dest_importer)) {
+    GstClapperGLBaseImporter *dest = GST_CLAPPER_GL_BASE_IMPORTER (dest_importer);
+
+    GST_OBJECT_LOCK (self);
+    GST_OBJECT_LOCK (dest);
+
+    /* Successfully prepared GL importer should have all three */
+    if (self->gdk_context && self->gst_display && self->wrapped_context) {
+      g_clear_object (&dest->gdk_context);
+      dest->gdk_context = g_object_ref (self->gdk_context);
+
+      gst_clear_object (&dest->gst_display);
+      dest->gst_display = gst_object_ref (self->gst_display);
+
+      gst_clear_object (&dest->wrapped_context);
+      dest->wrapped_context = gst_object_ref (self->wrapped_context);
+    }
+
+    /* This context is not required, we can create it ourselves
+     * using gst_display and wrapped_context */
+    if (self->gst_context) {
+      gst_clear_object (&dest->gst_context);
+      dest->gst_context = gst_object_ref (self->gst_context);
+    }
+
+    GST_OBJECT_UNLOCK (dest);
+    GST_OBJECT_UNLOCK (self);
+  }
+
+  if (GST_CLAPPER_IMPORTER_CLASS (parent_class)->share_data)
+    GST_CLAPPER_IMPORTER_CLASS (parent_class)->share_data (importer, dest_importer);
+}
+
+static gboolean
+gst_clapper_gl_base_importer_handle_context_query (GstClapperImporter *importer,
+    GstBaseSink *bsink, GstQuery *query)
+{
+  GstClapperGLBaseImporter *self = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+  gboolean res;
+
+  GST_OBJECT_LOCK (self);
+  res = gst_gl_handle_context_query (GST_ELEMENT_CAST (bsink), query,
+      self->gst_display, self->gst_context, self->wrapped_context);
+  GST_OBJECT_UNLOCK (self);
+
+  return res;
+}
+
+static GstBufferPool *
+gst_clapper_gl_base_importer_create_pool (GstClapperImporter *importer, GstStructure **config)
+{
+  GstClapperGLBaseImporter *self = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+  GstBufferPool *pool;
+
+  GST_DEBUG_OBJECT (self, "Creating new GL buffer pool");
+
+  GST_OBJECT_LOCK (self);
+  pool = gst_gl_buffer_pool_new (self->gst_context);
+  GST_OBJECT_UNLOCK (self);
+
+  *config = gst_buffer_pool_get_config (pool);
+
+  gst_buffer_pool_config_add_option (*config, GST_BUFFER_POOL_OPTION_VIDEO_META);
+  gst_buffer_pool_config_add_option (*config, GST_BUFFER_POOL_OPTION_GL_SYNC_META);
+
+  return pool;
+}
+
+static void
+gst_clapper_gl_base_importer_add_allocation_metas (GstClapperImporter *importer, GstQuery *query)
+{
+  GstClapperGLBaseImporter *self = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+
+  gst_query_add_allocation_meta (query, GST_VIDEO_OVERLAY_COMPOSITION_META_API_TYPE, NULL);
+  gst_query_add_allocation_meta (query, GST_VIDEO_META_API_TYPE, NULL);
+
+  GST_OBJECT_LOCK (self);
+  if (self->gst_context->gl_vtable->FenceSync)
+    gst_query_add_allocation_meta (query, GST_GL_SYNC_META_API_TYPE, NULL);
+  GST_OBJECT_UNLOCK (self);
+}
+
+static gboolean
+gst_clapper_gl_base_importer_gdk_context_realize (GstClapperGLBaseImporter *self, GdkGLContext *gdk_context)
+{
+  GdkGLAPI allowed_apis;
+  GError *error = NULL;
+  const gchar *gl_env;
+  gboolean success;
+
+  GST_DEBUG_OBJECT (self, "Realizing GdkGLContext with default implementation");
+
+  /* Use single "GST_GL_API" env to also influence Gdk GL selection */
+  gl_env = g_getenv ("GST_GL_API");
+  allowed_apis = (!gl_env || g_str_has_prefix (gl_env, "gles"))
+      ? GDK_GL_API_GLES
+      : (g_str_has_prefix (gl_env, "opengl"))
+      ? GDK_GL_API_GL
+      : GDK_GL_API_GL | GDK_GL_API_GLES;
+
+  gdk_gl_context_set_allowed_apis (gdk_context, allowed_apis);
+  if (!(success = gdk_gl_context_realize (gdk_context, &error))) {
+    GST_WARNING_OBJECT (self, "Could not realize Gdk context with %s: %s",
+        (allowed_apis & GDK_GL_API_GL) ? "GL" : "GLES", error->message);
+    g_clear_error (&error);
+  }
+  if (!success && !gl_env) {
+    gdk_gl_context_set_allowed_apis (gdk_context, GDK_GL_API_GL);
+    if (!(success = gdk_gl_context_realize (gdk_context, &error))) {
+      GST_WARNING_OBJECT (self, "Could not realize Gdk context with GL: %s", error->message);
+      g_clear_error (&error);
+    }
+  }
+
+  return success;
+}
+
+static void
+gst_clapper_gl_base_importer_init (GstClapperGLBaseImporter *self)
+{
+}
+
+static void
+gst_clapper_gl_base_importer_finalize (GObject *object)
+{
+  GstClapperGLBaseImporter *self = GST_CLAPPER_GL_BASE_IMPORTER_CAST (object);
+
+  g_clear_object (&self->gdk_context);
+
+  gst_clear_object (&self->gst_display);
+  gst_clear_object (&self->wrapped_context);
+  gst_clear_object (&self->gst_context);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, finalize, (object));
+}
+
+static void
+gst_clapper_gl_base_importer_class_init (GstClapperGLBaseImporterClass *klass)
+{
+  GObjectClass *gobject_class = (GObjectClass *) klass;
+  GstClapperImporterClass *importer_class = (GstClapperImporterClass *) klass;
+  GstClapperGLBaseImporterClass *gl_bi_class = (GstClapperGLBaseImporterClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clapperglbaseimporter", 0,
+      "Clapper GL Base Importer");
+
+  gobject_class->finalize = gst_clapper_gl_base_importer_finalize;
+
+  importer_class->prepare = gst_clapper_gl_base_importer_prepare;
+  importer_class->share_data = gst_clapper_gl_base_importer_share_data;
+  importer_class->handle_context_query = gst_clapper_gl_base_importer_handle_context_query;
+  importer_class->create_pool = gst_clapper_gl_base_importer_create_pool;
+  importer_class->add_allocation_metas = gst_clapper_gl_base_importer_add_allocation_metas;
+
+  gl_bi_class->gdk_context_realize = gst_clapper_gl_base_importer_gdk_context_realize;
+}
+
+GstCaps *
+gst_clapper_gl_base_importer_make_supported_gdk_gl_caps (void)
+{
+  GstCaps *caps, *tmp;
+
+  tmp = gst_caps_from_string (
+      GST_VIDEO_CAPS_MAKE_WITH_FEATURES (GST_CAPS_FEATURE_MEMORY_GL_MEMORY,
+          "{ " GST_GDK_GL_TEXTURE_FORMATS " }") ", "
+          "texture-target = (string) { " GST_GL_TEXTURE_TARGET_2D_STR " }");
+
+  caps = gst_caps_copy (tmp);
+  gst_caps_set_features_simple (caps, gst_caps_features_new (
+      GST_CAPS_FEATURE_MEMORY_GL_MEMORY,
+      GST_CAPS_FEATURE_META_GST_VIDEO_OVERLAY_COMPOSITION, NULL));
+
+  gst_caps_append (caps, tmp);
+
+  return caps;
+}
+
+GStrv
+gst_clapper_gl_base_importer_make_gl_context_types (void)
+{
+  GStrv context_types;
+  GStrvBuilder *builder = g_strv_builder_new ();
+
+  g_strv_builder_add (builder, GST_GL_DISPLAY_CONTEXT_TYPE);
+  g_strv_builder_add (builder, "gst.gl.app_context");
+  g_strv_builder_add (builder, "gst.gl.local_context");
+
+  context_types = g_strv_builder_end (builder);
+  g_strv_builder_unref (builder);
+
+  return context_types;
+}
+
+GdkTexture *
+gst_clapper_gl_base_importer_make_gl_texture (GstClapperGLBaseImporter *self,
+    GstBuffer *buffer, GstVideoInfo *v_info)
+{
+  GdkTexture *texture;
+  GstGLSyncMeta *sync_meta;
+  GstVideoFrame frame;
+
+  if (G_UNLIKELY (!gst_video_frame_map (&frame, v_info, buffer, GST_MAP_READ | GST_MAP_GL))) {
+    GST_ERROR_OBJECT (self, "Could not map input buffer for reading");
+    return NULL;
+  }
+
+  GST_OBJECT_LOCK (self);
+
+  /* Must have context active here for both sync meta
+   * and Gdk texture format auto-detection to work */
+  gdk_gl_context_make_current (self->gdk_context);
+  gst_gl_context_activate (self->wrapped_context, TRUE);
+
+  sync_meta = gst_buffer_get_gl_sync_meta (buffer);
+
+  /* Wait for all previous OpenGL commands to complete,
+   * before we start using the input texture */
+  if (sync_meta) {
+    gst_gl_sync_meta_set_sync_point (sync_meta, self->gst_context);
+    gst_gl_sync_meta_wait (sync_meta, self->wrapped_context);
+  }
+
+  texture = gdk_gl_texture_new (
+      self->gdk_context,
+      *(guint *) GST_VIDEO_FRAME_PLANE_DATA (&frame, 0),
+      GST_VIDEO_FRAME_WIDTH (&frame),
+      GST_VIDEO_FRAME_HEIGHT (&frame),
+      (GDestroyNotify) gst_buffer_unref,
+      gst_buffer_ref (buffer));
+
+  gst_gl_context_activate (self->wrapped_context, FALSE);
+  gdk_gl_context_clear_current ();
+
+  GST_OBJECT_UNLOCK (self);
+
+  gst_video_frame_unmap (&frame);
+
+  return texture;
+}

lib/gst/plugin/importers/gstclapperglbaseimporter.h

@@ -0,0 +1,75 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include <gst/gl/gl.h>
+
+#include "gst/plugin/gstclapperimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_GL_BASE_IMPORTER               (gst_clapper_gl_base_importer_get_type())
+#define GST_IS_CLAPPER_GL_BASE_IMPORTER(obj)            (G_TYPE_CHECK_INSTANCE_TYPE ((obj), GST_TYPE_CLAPPER_GL_BASE_IMPORTER))
+#define GST_IS_CLAPPER_GL_BASE_IMPORTER_CLASS(klass)    (G_TYPE_CHECK_CLASS_TYPE ((klass), GST_TYPE_CLAPPER_GL_BASE_IMPORTER))
+#define GST_CLAPPER_GL_BASE_IMPORTER_GET_CLASS(obj)     (G_TYPE_INSTANCE_GET_CLASS ((obj), GST_TYPE_CLAPPER_GL_BASE_IMPORTER, GstClapperGLBaseImporterClass))
+#define GST_CLAPPER_GL_BASE_IMPORTER(obj)               (G_TYPE_CHECK_INSTANCE_CAST ((obj), GST_TYPE_CLAPPER_GL_BASE_IMPORTER, GstClapperGLBaseImporter))
+#define GST_CLAPPER_GL_BASE_IMPORTER_CLASS(klass)       (G_TYPE_CHECK_CLASS_CAST ((klass), GST_TYPE_CLAPPER_GL_BASE_IMPORTER, GstClapperGLBaseImporterClass))
+#define GST_CLAPPER_GL_BASE_IMPORTER_CAST(obj)          ((GstClapperGLBaseImporter *)(obj))
+
+#define GST_CLAPPER_GL_BASE_IMPORTER_HAVE_WAYLAND       (GST_GL_HAVE_WINDOW_WAYLAND && defined (GDK_WINDOWING_WAYLAND))
+#define GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11           (GST_GL_HAVE_WINDOW_X11 && defined (GDK_WINDOWING_X11))
+#define GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_GLX       (GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11 && GST_GL_HAVE_PLATFORM_GLX)
+#define GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11_EGL       (GST_CLAPPER_GL_BASE_IMPORTER_HAVE_X11 && GST_GL_HAVE_PLATFORM_EGL)
+
+typedef struct _GstClapperGLBaseImporter GstClapperGLBaseImporter;
+typedef struct _GstClapperGLBaseImporterClass GstClapperGLBaseImporterClass;
+
+#ifdef G_DEFINE_AUTOPTR_CLEANUP_FUNC
+G_DEFINE_AUTOPTR_CLEANUP_FUNC (GstClapperGLBaseImporter, gst_object_unref)
+#endif
+
+struct _GstClapperGLBaseImporter
+{
+  GstClapperImporter parent;
+
+  GdkGLContext *gdk_context;
+
+  GstGLDisplay *gst_display;
+  GstGLContext *wrapped_context;
+  GstGLContext *gst_context;
+};
+
+struct _GstClapperGLBaseImporterClass
+{
+  GstClapperImporterClass parent_class;
+
+  gboolean (* gdk_context_realize) (GstClapperGLBaseImporter *gl_bi,
+                                    GdkGLContext             *gdk_context);
+};
+
+GType        gst_clapper_gl_base_importer_get_type                   (void);
+
+GstCaps *    gst_clapper_gl_base_importer_make_supported_gdk_gl_caps (void);
+
+GStrv        gst_clapper_gl_base_importer_make_gl_context_types      (void);
+
+GdkTexture * gst_clapper_gl_base_importer_make_gl_texture            (GstClapperGLBaseImporter *self, GstBuffer *buffer, GstVideoInfo *v_info);
+
+G_END_DECLS

lib/gst/plugin/importers/gstclapperglimporter.c

@@ -0,0 +1,70 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclapperglimporter.h"
+
+#define GST_CAT_DEFAULT gst_clapper_gl_importer_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+#define parent_class gst_clapper_gl_importer_parent_class
+GST_CLAPPER_IMPORTER_DEFINE (GstClapperGLImporter, gst_clapper_gl_importer, GST_TYPE_CLAPPER_GL_BASE_IMPORTER);
+
+static GdkTexture *
+gst_clapper_gl_importer_generate_texture (GstClapperImporter *importer,
+    GstBuffer *buffer, GstVideoInfo *v_info)
+{
+  GstClapperGLBaseImporter *gl_bi = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+
+  return gst_clapper_gl_base_importer_make_gl_texture (gl_bi, buffer, v_info);
+}
+
+static void
+gst_clapper_gl_importer_init (GstClapperGLImporter *self)
+{
+}
+
+static void
+gst_clapper_gl_importer_class_init (GstClapperGLImporterClass *klass)
+{
+  GstClapperImporterClass *importer_class = (GstClapperImporterClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clapperglimporter", 0,
+      "Clapper GL Importer");
+
+  importer_class->generate_texture = gst_clapper_gl_importer_generate_texture;
+}
+
+GstClapperImporter *
+make_importer (void)
+{
+  return g_object_new (GST_TYPE_CLAPPER_GL_IMPORTER, NULL);
+}
+
+GstCaps *
+make_caps (GstRank *rank, GStrv *context_types)
+{
+  *rank = GST_RANK_SECONDARY;
+  *context_types = gst_clapper_gl_base_importer_make_gl_context_types ();
+
+  return gst_clapper_gl_base_importer_make_supported_gdk_gl_caps ();
+}

lib/gst/plugin/importers/gstclapperglimporter.h

@@ -0,0 +1,36 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include "gstclapperglbaseimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_GL_IMPORTER (gst_clapper_gl_importer_get_type())
+G_DECLARE_FINAL_TYPE (GstClapperGLImporter, gst_clapper_gl_importer, GST, CLAPPER_GL_IMPORTER, GstClapperGLBaseImporter)
+
+#define GST_CLAPPER_GL_IMPORTER_CAST(obj)        ((GstClapperGLImporter *)(obj))
+
+struct _GstClapperGLImporter
+{
+  GstClapperGLBaseImporter parent;
+};
+
+G_END_DECLS

lib/gst/plugin/importers/gstclappergluploader.c

@@ -0,0 +1,232 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclappergluploader.h"
+
+#define GST_CAT_DEFAULT gst_clapper_gl_uploader_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+#define parent_class gst_clapper_gl_uploader_parent_class
+GST_CLAPPER_IMPORTER_DEFINE (GstClapperGLUploader, gst_clapper_gl_uploader, GST_TYPE_CLAPPER_GL_BASE_IMPORTER);
+
+static void
+_update_elements_caps_locked (GstClapperGLUploader *self, GstCaps *upload_sink_caps)
+{
+  GstClapperGLBaseImporter *gl_bi = GST_CLAPPER_GL_BASE_IMPORTER_CAST (self);
+  GstCaps *upload_src_caps, *color_sink_caps, *color_src_caps, *gdk_sink_caps;
+
+  GST_INFO_OBJECT (self, "Input caps: %" GST_PTR_FORMAT, upload_sink_caps);
+
+  upload_src_caps = gst_gl_upload_transform_caps (self->upload, gl_bi->gst_context,
+      GST_PAD_SINK, upload_sink_caps, NULL);
+  upload_src_caps = gst_caps_fixate (upload_src_caps);
+
+  GST_INFO_OBJECT (self, "GLUpload caps: %" GST_PTR_FORMAT, upload_src_caps);
+  gst_gl_upload_set_caps (self->upload, upload_sink_caps, upload_src_caps);
+
+  gdk_sink_caps = gst_clapper_gl_base_importer_make_supported_gdk_gl_caps ();
+  color_sink_caps = gst_gl_color_convert_transform_caps (gl_bi->gst_context,
+      GST_PAD_SRC, upload_src_caps, gdk_sink_caps);
+  gst_caps_unref (gdk_sink_caps);
+
+  /* Second caps arg is transfer-full */
+  color_src_caps = gst_gl_color_convert_fixate_caps (gl_bi->gst_context,
+      GST_PAD_SINK, upload_src_caps, color_sink_caps);
+
+  GST_INFO_OBJECT (self, "GLColorConvert caps: %" GST_PTR_FORMAT, color_src_caps);
+  gst_gl_color_convert_set_caps (self->color_convert, upload_src_caps, color_src_caps);
+
+  self->has_pending_v_info = gst_video_info_from_caps (&self->pending_v_info, color_src_caps);
+
+  gst_caps_unref (upload_src_caps);
+  gst_caps_unref (color_src_caps);
+}
+
+static void
+gst_clapper_gl_uploader_set_caps (GstClapperImporter *importer, GstCaps *caps)
+{
+  GstClapperGLUploader *self = GST_CLAPPER_GL_UPLOADER_CAST (importer);
+
+  GST_OBJECT_LOCK (self);
+  _update_elements_caps_locked (self, caps);
+  GST_OBJECT_UNLOCK (self);
+}
+
+static void
+_uploader_reconfigure_locked (GstClapperGLUploader *self)
+{
+  GstCaps *in_caps = NULL;
+
+  GST_DEBUG_OBJECT (self, "Reconfiguring upload");
+
+  gst_gl_upload_get_caps (self->upload, &in_caps, NULL);
+
+  if (G_LIKELY (in_caps)) {
+    _update_elements_caps_locked (self, in_caps);
+    gst_caps_unref (in_caps);
+  }
+}
+
+static gboolean
+gst_clapper_gl_uploader_prepare (GstClapperImporter *importer)
+{
+  gboolean res = GST_CLAPPER_IMPORTER_CLASS (parent_class)->prepare (importer);
+
+  if (res) {
+    GstClapperGLUploader *self = GST_CLAPPER_GL_UPLOADER_CAST (importer);
+    GstClapperGLBaseImporter *gl_bi = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+
+    GST_OBJECT_LOCK (self);
+
+    if (!self->upload)
+      self->upload = gst_gl_upload_new (gl_bi->gst_context);
+    if (!self->color_convert)
+      self->color_convert = gst_gl_color_convert_new (gl_bi->gst_context);
+
+    GST_OBJECT_UNLOCK (self);
+  }
+
+  return res;
+}
+
+static GstBuffer *
+_upload_perform_locked (GstClapperGLUploader *self, GstBuffer *buffer)
+{
+  GstBuffer *upload_buf = NULL;
+  GstGLUploadReturn ret;
+
+  ret = gst_gl_upload_perform_with_buffer (self->upload, buffer, &upload_buf);
+
+  if (G_UNLIKELY (ret != GST_GL_UPLOAD_DONE)) {
+    switch (ret) {
+      case GST_GL_UPLOAD_RECONFIGURE:
+        _uploader_reconfigure_locked (self);
+        /* Retry with the same buffer after reconfiguring */
+        return _upload_perform_locked (self, buffer);
+      default:
+        GST_ERROR_OBJECT (self, "Could not upload input buffer, returned: %i", ret);
+        break;
+    }
+  }
+
+  return upload_buf;
+}
+
+static GdkTexture *
+gst_clapper_gl_uploader_generate_texture (GstClapperImporter *importer,
+    GstBuffer *buffer, GstVideoInfo *v_info)
+{
+  GstClapperGLUploader *self = GST_CLAPPER_GL_UPLOADER_CAST (importer);
+  GstClapperGLBaseImporter *gl_bi = GST_CLAPPER_GL_BASE_IMPORTER_CAST (importer);
+  GstBuffer *upload_buf, *color_buf;
+  GdkTexture *texture;
+
+  /* XXX: We both upload and perform color conversion here, thus we skip
+   * upload for buffers that are not going to be shown and gain more free
+   * CPU time to prepare the next one. Improves performance on weak HW. */
+
+  GST_LOG_OBJECT (self, "Uploading %" GST_PTR_FORMAT, buffer);
+
+  GST_OBJECT_LOCK (self);
+
+  upload_buf = _upload_perform_locked (self, buffer);
+
+  if (G_UNLIKELY (!upload_buf)) {
+    GST_ERROR_OBJECT (self, "Could not perform upload on input buffer");
+    GST_OBJECT_UNLOCK (self);
+
+    return NULL;
+  }
+  GST_LOG_OBJECT (self, "Uploaded into %" GST_PTR_FORMAT, upload_buf);
+
+  color_buf = gst_gl_color_convert_perform (self->color_convert, upload_buf);
+  gst_buffer_unref (upload_buf);
+
+  /* Use video info associated with converted buffer */
+  if (self->has_pending_v_info) {
+    self->v_info = self->pending_v_info;
+    self->has_pending_v_info = FALSE;
+  }
+
+  GST_OBJECT_UNLOCK (self);
+
+  if (G_UNLIKELY (!color_buf)) {
+    GST_ERROR_OBJECT (self, "Could not perform color conversion on input buffer");
+    return NULL;
+  }
+  GST_LOG_OBJECT (self, "Color converted into %" GST_PTR_FORMAT, color_buf);
+
+  texture = gst_clapper_gl_base_importer_make_gl_texture (gl_bi, color_buf, &self->v_info);
+  gst_buffer_unref (color_buf);
+
+  return texture;
+}
+
+static void
+gst_clapper_gl_uploader_init (GstClapperGLUploader *self)
+{
+  gst_video_info_init (&self->pending_v_info);
+  gst_video_info_init (&self->v_info);
+}
+
+static void
+gst_clapper_gl_uploader_finalize (GObject *object)
+{
+  GstClapperGLUploader *self = GST_CLAPPER_GL_UPLOADER_CAST (object);
+
+  gst_clear_object (&self->upload);
+  gst_clear_object (&self->color_convert);
+
+  GST_CALL_PARENT (G_OBJECT_CLASS, finalize, (object));
+}
+
+static void
+gst_clapper_gl_uploader_class_init (GstClapperGLUploaderClass *klass)
+{
+  GObjectClass *gobject_class = (GObjectClass *) klass;
+  GstClapperImporterClass *importer_class = (GstClapperImporterClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clappergluploader", 0,
+      "Clapper GL Uploader");
+
+  gobject_class->finalize = gst_clapper_gl_uploader_finalize;
+
+  importer_class->prepare = gst_clapper_gl_uploader_prepare;
+  importer_class->set_caps = gst_clapper_gl_uploader_set_caps;
+  importer_class->generate_texture = gst_clapper_gl_uploader_generate_texture;
+}
+
+GstClapperImporter *
+make_importer (void)
+{
+  return g_object_new (GST_TYPE_CLAPPER_GL_UPLOADER, NULL);
+}
+
+GstCaps *
+make_caps (GstRank *rank, GStrv *context_types)
+{
+  *rank = GST_RANK_MARGINAL + 1;
+  *context_types = gst_clapper_gl_base_importer_make_gl_context_types ();
+
+  return gst_gl_upload_get_input_template_caps ();
+}

lib/gst/plugin/importers/gstclappergluploader.h

@@ -0,0 +1,42 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include "gstclapperglbaseimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_GL_UPLOADER (gst_clapper_gl_uploader_get_type())
+G_DECLARE_FINAL_TYPE (GstClapperGLUploader, gst_clapper_gl_uploader, GST, CLAPPER_GL_UPLOADER, GstClapperGLBaseImporter)
+
+#define GST_CLAPPER_GL_UPLOADER_CAST(obj)        ((GstClapperGLUploader *)(obj))
+
+struct _GstClapperGLUploader
+{
+  GstClapperGLBaseImporter parent;
+
+  GstGLUpload *upload;
+  GstGLColorConvert *color_convert;
+
+  GstVideoInfo pending_v_info, v_info;
+  gboolean has_pending_v_info;
+};
+
+G_END_DECLS

lib/gst/plugin/importers/gstclapperrawimporter.c

@@ -0,0 +1,111 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclapperrawimporter.h"
+#include "gst/plugin/gstgtkutils.h"
+#include "gst/plugin/gstgdkformats.h"
+
+#define GST_CAT_DEFAULT gst_clapper_raw_importer_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+#define parent_class gst_clapper_raw_importer_parent_class
+GST_CLAPPER_IMPORTER_DEFINE (GstClapperRawImporter, gst_clapper_raw_importer, GST_TYPE_CLAPPER_IMPORTER);
+
+static GstBufferPool *
+gst_clapper_raw_importer_create_pool (GstClapperImporter *importer, GstStructure **config)
+{
+  GstClapperRawImporter *self = GST_CLAPPER_RAW_IMPORTER_CAST (importer);
+  GstBufferPool *pool;
+
+  GST_DEBUG_OBJECT (self, "Creating new buffer pool");
+
+  pool = gst_video_buffer_pool_new ();
+  *config = gst_buffer_pool_get_config (pool);
+
+  gst_buffer_pool_config_add_option (*config, GST_BUFFER_POOL_OPTION_VIDEO_META);
+
+  return pool;
+}
+
+static void
+gst_clapper_raw_importer_add_allocation_metas (GstClapperImporter *importer, GstQuery *query)
+{
+  gst_query_add_allocation_meta (query, GST_VIDEO_OVERLAY_COMPOSITION_META_API_TYPE, NULL);
+  gst_query_add_allocation_meta (query, GST_VIDEO_META_API_TYPE, NULL);
+}
+
+static GdkTexture *
+gst_clapper_raw_importer_generate_texture (GstClapperImporter *importer,
+    GstBuffer *buffer, GstVideoInfo *v_info)
+{
+  GdkTexture *texture;
+  GstVideoFrame frame;
+
+  if (G_UNLIKELY (!gst_video_frame_map (&frame, v_info, buffer, GST_MAP_READ))) {
+    GST_ERROR_OBJECT (importer, "Could not map input buffer for reading");
+    return NULL;
+  }
+
+  texture = gst_video_frame_into_gdk_texture (&frame);
+  gst_video_frame_unmap (&frame);
+
+  return texture;
+}
+
+static void
+gst_clapper_raw_importer_init (GstClapperRawImporter *self)
+{
+}
+
+static void
+gst_clapper_raw_importer_class_init (GstClapperRawImporterClass *klass)
+{
+  GstClapperImporterClass *importer_class = (GstClapperImporterClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clapperrawimporter", 0,
+      "Clapper RAW Importer");
+
+  importer_class->create_pool = gst_clapper_raw_importer_create_pool;
+  importer_class->add_allocation_metas = gst_clapper_raw_importer_add_allocation_metas;
+  importer_class->generate_texture = gst_clapper_raw_importer_generate_texture;
+}
+
+GstClapperImporter *
+make_importer (void)
+{
+  return g_object_new (GST_TYPE_CLAPPER_RAW_IMPORTER, NULL);
+}
+
+GstCaps *
+make_caps (GstRank *rank, GStrv *context_types)
+{
+  *rank = GST_RANK_MARGINAL;
+
+  return gst_caps_from_string (
+      GST_VIDEO_CAPS_MAKE_WITH_FEATURES (GST_CAPS_FEATURE_MEMORY_SYSTEM_MEMORY ", "
+          GST_CAPS_FEATURE_META_GST_VIDEO_OVERLAY_COMPOSITION,
+          "{ " GST_GDK_MEMORY_FORMATS " }")
+      "; "
+      GST_VIDEO_CAPS_MAKE (
+          "{ " GST_GDK_MEMORY_FORMATS " }"));
+}

lib/gst/plugin/importers/gstclapperrawimporter.h

@@ -0,0 +1,36 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include "gst/plugin/gstclapperimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_RAW_IMPORTER (gst_clapper_raw_importer_get_type())
+G_DECLARE_FINAL_TYPE (GstClapperRawImporter, gst_clapper_raw_importer, GST, CLAPPER_RAW_IMPORTER, GstClapperImporter)
+
+#define GST_CLAPPER_RAW_IMPORTER_CAST(obj)        ((GstClapperRawImporter *)(obj))
+
+struct _GstClapperRawImporter
+{
+  GstClapperImporter parent;
+};
+
+G_END_DECLS

lib/gst/plugin/importers/gstclappervaglimporter.c

@@ -0,0 +1,83 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "gstclappervaglimporter.h"
+#include "gst/plugin/gstgdkformats.h"
+
+#include <gst/va/gstva.h>
+
+#define GST_CAT_DEFAULT gst_clapper_va_gl_importer_debug
+GST_DEBUG_CATEGORY_STATIC (GST_CAT_DEFAULT);
+
+#define parent_class gst_clapper_va_gl_importer_parent_class
+GST_CLAPPER_IMPORTER_DEFINE (GstClapperVAGLImporter, gst_clapper_va_gl_importer, GST_TYPE_CLAPPER_GL_BASE_IMPORTER);
+
+static GdkTexture *
+gst_clapper_va_gl_importer_generate_texture (GstClapperImporter *importer,
+    GstBuffer *buffer, GstVideoInfo *v_info)
+{
+  return NULL;
+}
+
+static void
+gst_clapper_va_gl_importer_init (GstClapperVAGLImporter *self)
+{
+}
+
+static void
+gst_clapper_va_gl_importer_class_init (GstClapperVAGLImporterClass *klass)
+{
+  GstClapperImporterClass *importer_class = (GstClapperImporterClass *) klass;
+
+  GST_DEBUG_CATEGORY_INIT (GST_CAT_DEFAULT, "clappervaglimporter", 0,
+      "Clapper VA GL Importer");
+
+  importer_class->generate_texture = gst_clapper_va_gl_importer_generate_texture;
+}
+
+GstClapperImporter *
+make_importer (void)
+{
+  return g_object_new (GST_TYPE_CLAPPER_VA_GL_IMPORTER, NULL);
+}
+
+GstCaps *
+make_caps (GstRank *rank, GStrv *context_types)
+{
+  GstCaps *caps, *tmp;
+
+  *rank = GST_RANK_PRIMARY;
+
+  tmp = gst_caps_from_string (
+      GST_VIDEO_CAPS_MAKE_WITH_FEATURES (GST_CAPS_FEATURE_MEMORY_VA,
+          "{ " GST_GDK_GL_TEXTURE_FORMATS " }"));
+
+  caps = gst_caps_copy (tmp);
+  gst_caps_set_features_simple (caps, gst_caps_features_new (
+      GST_CAPS_FEATURE_MEMORY_VA,
+      GST_CAPS_FEATURE_META_GST_VIDEO_OVERLAY_COMPOSITION, NULL));
+
+  gst_caps_append (caps, tmp);
+
+  return caps;
+}

lib/gst/plugin/importers/gstclappervaglimporter.h

@@ -0,0 +1,36 @@
+/*
+ * Copyright (C) 2022 Rafał Dzięgiel <rafostar.github@gmail.com>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor,
+ * Boston, MA 02110-1301, USA.
+ */
+
+#pragma once
+
+#include "gstclapperglbaseimporter.h"
+
+G_BEGIN_DECLS
+
+#define GST_TYPE_CLAPPER_VA_GL_IMPORTER (gst_clapper_va_gl_importer_get_type())
+G_DECLARE_FINAL_TYPE (GstClapperVAGLImporter, gst_clapper_va_gl_importer, GST, CLAPPER_VA_GL_IMPORTER, GstClapperGLBaseImporter)
+
+#define GST_CLAPPER_VA_GL_IMPORTER_CAST(obj)        ((GstClapperVAGLImporter *)(obj))
+
+struct _GstClapperVAGLImporter
+{
+  GstClapperGLBaseImporter parent;
+};
+
+G_END_DECLS

lib/gst/plugin/importers/meson.build

@@ -0,0 +1,157 @@
+gst_clapper_gl_base_importer_dep = dependency('', required: false)
+
+plugin_needs_gl_base = (
+  not get_option('glimporter').disabled()
+  or not get_option('gluploader').disabled()
+  or not get_option('vaglimporter').disabled()
+)
+plugin_gl_support_required = (
+  get_option('glimporter').enabled()
+  or get_option('gluploader').enabled()
+  or get_option('vaglimporter').enabled()
+)
+
+gst_plugin_gl_deps = [gstgl_dep, gstglproto_dep]
+have_gtk_gl_windowing = false
+
+if gst_gl_have_window_x11 and (gst_gl_have_platform_egl or gst_gl_have_platform_glx)
+  gtk_x11_dep = dependency('gtk4-x11', required: false)
+  if gtk_x11_dep.found()
+    gst_plugin_gl_deps += gtk_x11_dep
+    if gst_gl_have_platform_glx
+      gst_plugin_gl_deps += gstglx11_dep
+    endif
+    have_gtk_gl_windowing = true
+  endif
+endif
+
+if gst_gl_have_window_wayland and gst_gl_have_platform_egl
+  gtk_wayland_dep = dependency('gtk4-wayland', required: false)
+  if gtk_wayland_dep.found()
+    gst_plugin_gl_deps += [gtk_wayland_dep, gstglwayland_dep]
+    have_gtk_gl_windowing = true
+  endif
+endif
+
+if plugin_gl_support_required and not have_gtk_gl_windowing
+  error('GL-based importer was enabled, but support for current GL windowing is missing')
+endif
+
+if gst_gl_have_platform_egl
+  gst_plugin_gl_deps += gstglegl_dep
+endif
+
+gst_clapper_gl_base_importer_deps = [
+  gst_clapper_sink_dep
+] + gst_plugin_gl_deps
+
+foreach dep : gst_clapper_gl_base_importer_deps
+  if not dep.found()
+    if plugin_gl_support_required
+      error('GL-based importer was enabled, but required dependencies were not found')
+    endif
+    plugin_needs_gl_base = false
+  endif
+endforeach
+
+if plugin_needs_gl_base
+  gst_clapper_gl_base_importer_dep = declare_dependency(
+    link_with: library('gstclapperglbaseimporter',
+      'gstclapperglbaseimporter.c',
+      c_args: gst_clapper_plugin_args,
+      include_directories: configinc,
+      dependencies: gst_clapper_gl_base_importer_deps,
+      version: libversion,
+      install: true,
+    ),
+    include_directories: configinc,
+    dependencies: gst_clapper_gl_base_importer_deps,
+  )
+endif
+
+build_glimporter = (
+  not get_option('glimporter').disabled()
+  and gst_clapper_gl_base_importer_dep.found()
+)
+
+if build_glimporter
+  library(
+    'gstclapperglimporter',
+    'gstclapperglimporter.c',
+    dependencies: gst_clapper_gl_base_importer_dep,
+    include_directories: configinc,
+    c_args: gst_clapper_plugin_args,
+    install: true,
+    install_dir: gst_clapper_importers_libdir,
+  )
+endif
+
+build_gluploader = (
+  not get_option('gluploader').disabled()
+  and gst_clapper_gl_base_importer_dep.found()
+)
+
+if build_gluploader
+  library(
+    'gstclappergluploader',
+    'gstclappergluploader.c',
+    dependencies: gst_clapper_gl_base_importer_dep,
+    include_directories: configinc,
+    c_args: gst_clapper_plugin_args,
+    install: true,
+    install_dir: gst_clapper_importers_libdir,
+  )
+endif
+
+# No need to auto build rawimporter if we are building gluploader
+build_rawimporter = (
+  not get_option('rawimporter').disabled()
+  and (not build_gluploader or get_option('rawimporter').enabled())
+)
+
+if build_rawimporter
+  library(
+    'gstclapperrawimporter',
+    'gstclapperrawimporter.c',
+    dependencies: gst_clapper_sink_dep,
+    include_directories: configinc,
+    c_args: gst_clapper_plugin_args,
+    install: true,
+    install_dir: gst_clapper_importers_libdir,
+  )
+endif
+
+gst_va_dep = dependency('gstreamer-va-1.0',
+  version: gst_req,
+  required: false,
+)
+
+gst_clapper_va_gl_importer_deps = [
+  gst_clapper_gl_base_importer_dep,
+  gst_va_dep,
+]
+
+foreach dep : gst_clapper_va_gl_importer_deps
+  if not dep.found()
+    if get_option('vaglimporter').enabled()
+      error('VA GL-based importer was enabled, but required dependencies were not found')
+    endif
+  endif
+endforeach
+
+build_vaglimporter = (
+  not get_option('vaglimporter').disabled()
+  and gst_clapper_gl_base_importer_dep.found()
+)
+
+if build_vaglimporter
+  library(
+    'gstclappervaglimporter',
+    'gstclappervaglimporter.c',
+    dependencies: gst_clapper_va_gl_importer_deps,
+    include_directories: configinc,
+    c_args: gst_clapper_plugin_args,
+    install: true,
+    install_dir: gst_clapper_importers_libdir,
+  )
+endif

lib/gst/plugin/meson.build

@@ -0,0 +1,58 @@
+gst_plugins_libdir = join_paths(prefix, libdir, 'gstreamer-1.0')
+
+gst_clapper_plugin_args = [
+  '-DHAVE_CONFIG_H',
+  '-DGST_USE_UNSTABLE_API',
+]
+gtk4_dep = dependency('gtk4', version: '>=4.6.0', required: false)
+
+gmodule_dep = dependency('gmodule-2.0',
+  version: glib_req,
+  required: false,
+  fallback: ['glib', 'libgmodule_dep'],
+)
+
+gst_clapper_plugin_deps = [
+  gtk4_dep,
+  gst_dep,
+  gstbase_dep,
+  gstvideo_dep,
+  gmodule_dep,
+]
+
+foreach dep : gst_clapper_plugin_deps
+  if not dep.found()
+    if get_option('gst-plugin').enabled()
+      error('GStreamer plugin was enabled, but required dependencies were not found')
+    endif
+    subdir_done()
+  endif
+endforeach
+
+if get_option('default_library') == 'static'
+  gst_clapper_plugin_args += ['-DGST_STATIC_COMPILATION']
+endif
+
+gst_clapper_plugin_sources = [
+  'gstclappersink.c',
+  'gstclapperpaintable.c',
+  'gstgtkutils.c',
+  'gstplugin.c',
+  'gstclapperimporter.c',
+  'gstclapperimporterloader.c',
+]
+
+gst_clapper_sink_dep = declare_dependency(
+  link_with: library('gstclapper',
+    gst_clapper_plugin_sources,
+    c_args: gst_clapper_plugin_args,
+    include_directories: configinc,
+    dependencies: gst_clapper_plugin_deps,
+    install: true,
+    install_dir: gst_plugins_libdir,
+  ),
+  include_directories: configinc,
+  dependencies: gst_clapper_plugin_deps,
+)
+
+subdir('importers')

lib/meson.build

@@ -1,5 +1,5 @@
-glib_req = '>= 2.56.0'
-gst_req = '>= 1.18.0'
+glib_req = '>= 2.68.0'
+gst_req = '>= 1.20.0'
 
 api_version = '1.0'
 libversion = meson.project_version()
@@ -7,10 +7,6 @@ libversion = meson.project_version()
 cc = meson.get_compiler('c')
 cxx = meson.get_compiler('cpp')
 
-clapper_libdir = join_paths(
-  get_option('prefix'), get_option('libdir'), meson.project_name()
-)
-
 cdata = configuration_data()
 
 if cc.get_id() == 'msvc'
@@ -46,10 +42,6 @@ endif
 # Symbol visibility
 if cc.get_id() == 'msvc'
   export_define = '__declspec(dllexport) extern'
-elif cc.has_argument('-fvisibility=hidden')
-  add_project_arguments('-fvisibility=hidden', language: 'c')
-  add_project_arguments('-fvisibility=hidden', language: 'cpp')
-  export_define = 'extern __attribute__ ((visibility ("default")))'
 else
   export_define = 'extern'
 endif
@@ -136,13 +128,13 @@ cdata.set('SIZEOF_SHORT', cc.sizeof('short'))
 cdata.set('SIZEOF_VOIDP', cc.sizeof('void*'))
 
 cdata.set_quoted('VERSION', libversion)
-cdata.set_quoted('PACKAGE', 'gst-plugins-clapper')
+cdata.set_quoted('PACKAGE', 'clapper')
 cdata.set_quoted('PACKAGE_VERSION', libversion)
 cdata.set_quoted('PACKAGE_BUGREPORT', 'https://github.com/Rafostar/clapper/issues/new')
 cdata.set_quoted('PACKAGE_NAME', 'GStreamer Clapper Libs')
 cdata.set_quoted('GST_API_VERSION', api_version)
 cdata.set_quoted('GST_LICENSE', 'LGPL')
-cdata.set_quoted('LIBDIR', clapper_libdir)
+cdata.set_quoted('LIBDIR', pkglibdir)
 cdata.set_quoted('LOCALEDIR', join_paths(get_option('prefix'), get_option('localedir')))
 
 warning_flags = [
@@ -188,7 +180,7 @@ foreach extra_arg : warning_flags
   endif
 endforeach
 
-cdata.set_quoted('GST_PACKAGE_NAME', 'GStreamer Plugins Clapper')
+cdata.set_quoted('GST_PACKAGE_NAME', 'gst-plugin-clapper')
 cdata.set_quoted('GST_PACKAGE_ORIGIN', 'https://github.com/Rafostar/clapper')
 
 # Mandatory GST deps
@@ -251,34 +243,25 @@ libm = cc.find_library('m', required : false)
 glib_dep = dependency('glib-2.0', version: glib_req, fallback: ['glib', 'libglib_dep'])
 gmodule_dep = dependency('gmodule-2.0', fallback: ['glib', 'libgmodule_dep'])
 gio_dep = dependency('gio-2.0', fallback: ['glib', 'libgio_dep'])
+giounix_dep = dependency('gio-unix-2.0', version: glib_req, fallback: ['glib', 'libgiounix_dep'])
 
 cdata.set('DISABLE_ORC', 1)
 cdata.set('GST_ENABLE_EXTRA_CHECKS', get_option('devel-checks'))
-cdata.set_quoted('GST_PACKAGE_RELEASE_DATETIME', 'Unknown')
-
-message('GStreamer debug system is disabled')
-if cc.has_argument('-Wno-unused')
-  add_project_arguments('-Wno-unused', language: 'c')
-endif
-if cxx.has_argument ('-Wno-unused')
-  add_project_arguments('-Wno-unused', language: 'cpp')
-endif
 
 configinc = include_directories('.')
 libsinc = include_directories('gst')
 
-gnome = import('gnome')
-gir = find_program('g-ir-scanner', required : true)
-
-if not gir.found()
-  error('Clapper requires GI bindings to be compiled')
-endif
-
+gir = find_program('g-ir-scanner')
 gir_init_section = ['--add-init-section=extern void gst_init(gint*,gchar**);' + \
     'g_setenv("GST_REGISTRY_1.0", "@0@", TRUE);'.format(meson.current_build_dir() + '/gir_empty_registry.reg') + \
     'g_setenv("GST_PLUGIN_PATH_1_0", "", TRUE);' + \
     'g_setenv("GST_PLUGIN_SYSTEM_PATH_1_0", "", TRUE);' + \
     'gst_init(NULL,NULL);', '--quiet'
 ]
+
+gst_clapper_plugin_libdir = join_paths(get_option('prefix'), libdir, 'clapper-0.0', 'gst', 'plugin')
+gst_clapper_importers_libdir = join_paths(gst_clapper_plugin_libdir, 'importers')
+cdata.set_quoted('CLAPPER_SINK_IMPORTER_PATH', gst_clapper_importers_libdir)
+
 subdir('gst')
 configure_file(output: 'config.h', configuration: cdata)

meson.build

@@ -1,33 +1,39 @@
 project('com.github.rafostar.Clapper', 'c', 'cpp',
-  version: '0.1.0',
+  version: '0.4.1',
   meson_version: '>= 0.50.0',
-  license: 'GPL3',
+  license: 'GPL-3.0-or-later',
   default_options: [
     'warning_level=1',
     'buildtype=debugoptimized'
   ]
 )
 
+gnome = import('gnome')
+i18n = import('i18n')
 python = import('python')
-python_bin = python.find_installation('python3')
 
+bindir = join_paths(get_option('prefix'), get_option('bindir'))
+libdir = join_paths(get_option('prefix'), get_option('libdir'))
+datadir = join_paths(get_option('prefix'), get_option('datadir'))
+
+pkglibdir = join_paths(libdir, meson.project_name())
+pkgdatadir = join_paths(datadir, meson.project_name())
+
+subdir('lib')
+
+if get_option('player')
+  subdir('bin')
+  subdir('data')
+  subdir('po')
+
+  install_subdir('src', install_dir: pkgdatadir)
+  install_subdir('extras', install_dir: pkgdatadir)
+  install_subdir('css', install_dir: pkgdatadir)
+  install_subdir('ui', install_dir: pkgdatadir)
+
+  python_bin = python.find_installation('python3')
   if not python_bin.found()
     error('No valid python3 binary found')
   endif
-
-if get_option('clapper-lib')
-  subdir('lib')
-endif
-
-if get_option('clapper-player')
-  subdir('bin')
-  subdir('data')
-
-  installdir = join_paths(get_option('prefix'), 'share', meson.project_name())
-  install_subdir('src', install_dir : installdir)
-  install_subdir('extras', install_dir : installdir)
-  install_subdir('css', install_dir : installdir)
-  install_subdir('ui', install_dir : installdir)
-
   meson.add_install_script('build-aux/meson/postinstall.py')
 endif

meson_options.txt

@@ -1,13 +1,40 @@
-option('clapper-player',
+option('player',
   type: 'boolean',
   value: true,
   description: 'Build Clapper player'
 )
-option('clapper-lib',
+option('lib',
   type: 'boolean',
   value: true,
-  description: 'Build Clapper libs (including API)'
+  description: 'Build GstClapper lib'
 )
+option('gst-plugin',
+  type: 'feature',
+  value: 'enabled',
+  description: 'Build GStreamer plugin (includes GTK video sink element)'
+)
+
+option('vaglimporter',
+  type: 'feature',
+  value: 'auto',
+  description: 'Build VA memory GL-based importer for clappersink'
+)
+option('glimporter',
+  type: 'feature',
+  value: 'auto',
+  description: 'Build GL memory importer for clappersink'
+)
+option('gluploader',
+  type: 'feature',
+  value: 'auto',
+  description: 'Build GL uploader for clappersink'
+)
+option('rawimporter',
+  type: 'feature',
+  value: 'auto',
+  description: 'Build RAW system memory importer for clappersink'
+)
+
 option('devel-checks',
   type: 'boolean',
   value: false,

pkgs/arch/.SRCINFO

@@ -1,29 +0,0 @@
-pkgbase = clapper-git
-	pkgdesc = A GNOME media player built using GJS with GTK4 toolkit and powered by GStreamer with OpenGL rendering.
-	pkgver = r393.bf04af2
-	pkgrel = 1
-	url = https://github.com/Rafostar/clapper
-	arch = any
-	license = GPL-3.0
-	makedepends = meson>=0.50
-	makedepends = git
-	depends = gtk4
-	depends = gjs
-	depends = glib2>=2.56.0
-	depends = gobject-introspection
-	depends = wayland-protocols
-	depends = hicolor-icon-theme
-	depends = gstreamer>=1.18.0
-	depends = gst-plugins-base-libs>=1.18.0
-	depends = gst-plugins-good>=1.18.0
-	depends = gst-plugins-bad-libs>=1.18.0
-	optdepends = gst-libav>=1.18.0: Popular video decoders
-	optdepends = gstreamer-vaapi>=1.18.0: Intel/AMD video acceleration
-	provides = clapper
-	conflicts = clapper
-	replaces = clapper
-	source = clapper::git+https://github.com/Rafostar/clapper.git
-	md5sums = SKIP
-
-pkgname = clapper-git
-

pkgs/arch/.gitignore

@@ -1,4 +0,0 @@
-clapper-*/
-clapper-*.pkg.tar.*
-pkg/
-src/

pkgs/arch/PKGBUILD

@@ -1,74 +0,0 @@
-#
-# PKGBUILD file for package clapper
-#
-# Copyright (C) 2020/21 sp1rit
-# Copyright (C) 2020  Rafostar
-#
-# This program is free software: you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation, either version 3 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program.  If not, see <https://www.gnu.org/licenses/>.
-
-# Maintainer: sp1rit <sp1ritCS@protonmail.com>
-
-_basename=clapper
-pkgname="${_basename}-git"
-pkgver=r393.bf04af2
-pkgrel=1
-pkgdesc="A GNOME media player built using GJS with GTK4 toolkit and powered by GStreamer with OpenGL rendering."
-arch=(any)
-url="https://github.com/Rafostar/clapper"
-license=("GPL-3.0")
-depends=(
-	"gtk4"
-	"gjs"
-	"glib2>=2.56.0" # glib-2.0, gmodule-2.0, gio-2.0
-	"gobject-introspection" # /usr/sbin/g-ir-scanner
-	"wayland-protocols" # gtk4 non-default runtime dep
-	"hicolor-icon-theme"
-	"gstreamer>=1.18.0" # gstreamer-1.0, gstreamer-base-1.0
-	"gst-plugins-base-libs>=1.18.0" # gstreamer-pbutils-1.0, gstreamer-audio-1.0, gstreamer-tag-1.0, gstreamer-video-1.0, gstreamer-gl-1.0, gstreamer-gl-prototypes-1.0, gstreamer-gl-x11-1.0, gstreamer-gl-wayland-1.0, gstreamer-gl-egl-1.0, 
-	"gst-plugins-good>=1.18.0"
-	"gst-plugins-bad-libs>=1.18.0"
-)
-makedepends=(
-	"meson>=0.50"
-	"git"
-)
-optdepends=(
-	"gst-libav>=1.18.0: Popular video decoders"
-	"gstreamer-vaapi>=1.18.0: Intel/AMD video acceleration"
-)
-source=("${_basename}::git+https://github.com/Rafostar/${_basename}.git")
-provides=("${_basename}")
-replaces=("${_basename}")
-conflicts=("${_basename}")
-md5sums=("SKIP")
-
-pkgver() {
-	cd "${srcdir}/${_basename}"
-	printf "r%s.%s" "$(git rev-list --count HEAD)" "$(git rev-parse --short HEAD)"	
-}
-
-prepare() {
-	cd "${srcdir}/${_basename}"
-	arch-meson . _build
-}
-
-build() {
-	cd "${srcdir}/${_basename}"
-	ninja -C _build
-}
-
-package() {
-	cd "${srcdir}/${_basename}"
-	DESTDIR="$pkgdir" meson install -C _build/
-}

pkgs/deb/clapper.dsc

@@ -1,28 +0,0 @@
-Format: 3.0 (quilt)
-Source: clapper
-Binary: clapper
-Architecture: any
-Version: 0.1.0
-Maintainer: Rafostar <rafostar.github@gmail.com>
-Build-Depends: debhelper (>= 10),
-               meson (>= 0.50),
-               gjs,
-               gobject-introspection,
-               libgtk-4-dev (>= 4.0.0),
-               libgstreamer1.0-dev (>= 1.18),
-               libgstreamer-plugins-base1.0-dev (>= 1.18),
-               libgstreamer-gl1.0-0 (>= 1.18),
-               libgles-dev,
-               libglib2.0-dev,
-               libglib2.0-bin,
-               desktop-file-utils,
-               hicolor-icon-theme,
-               brz,
-               libfontconfig1-dev,
-               libpam-systemd
-Package-List:
- clapper deb gnome optional arch=any
-Files:
- 0 0 debian.tar.xz
-Description: Simple and modern GNOME media player
- A GNOME media player built using GJS with GTK4 toolkit and powered by GStreamer with OpenGL rendering.

pkgs/deb/debian/changelog

@@ -1,5 +0,0 @@
-clapper (0.1.0) unstable; urgency=low
-
-  * New version
-
- -- Rafostar <rafostar.github@gmail.com>  Fri, 26 Feb 2021 09:39:00 +0100

pkgs/deb/debian/compat

@@ -1 +0,0 @@
-10

pkgs/deb/debian/control

@@ -1,37 +0,0 @@
-Source: clapper
-Section: gnome
-Priority: optional
-Maintainer: Rafostar <rafostar.github@gmail.com>
-Standards-Version: 4.4.0
-Build-Depends: debhelper (>= 10),
-               meson (>= 0.50),
-               gjs,
-               gobject-introspection,
-               libgtk-4-dev (>= 4.0.0),
-               libgstreamer1.0-dev (>= 1.18),
-               libgstreamer-plugins-base1.0-dev (>= 1.18),
-               libgstreamer-gl1.0-0 (>= 1.18),
-               libgles-dev,
-               libglib2.0-dev,
-               libglib2.0-bin,
-               desktop-file-utils,
-               hicolor-icon-theme
-
-Package: clapper
-Architecture: any
-Depends: gjs,
-         gir1.2-gtk-4.0 (>= 4.0.0),
-         hicolor-icon-theme,
-         libgstreamer1.0-0 (>= 1.18),
-         gstreamer1.0-plugins-base (>= 1.18),
-         gstreamer1.0-plugins-good (>= 1.18),
-         gstreamer1.0-plugins-bad (>= 1.18),
-         gstreamer1.0-gl (>= 1.18)
-Recommends: gstreamer1.0-libav,
-            gstreamer1.0-pulseaudio
-Suggests: gstreamer1.0-plugins-ugly,
-          gstreamer1.0-vaapi
-Description: Simple and modern GNOME media player
- A GNOME media player built using GJS with GTK4 toolkit and powered by GStreamer with OpenGL rendering.
-  .
- More codecs/features and video acceleration can be enabled by installing the suggested packages.

pkgs/deb/debian/copyright

@@ -1,27 +0,0 @@
-Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/
-Upstream-Name: clapper
-Source: https://github.com/Rafostar/clapper
-
-Files:     *
-Copyright: 2020 Rafostar <rafostar.github@gmail.com>
-License:   GPL-3.0+
-
-Files:     debian/*
-Copyright: 2020 Rafostar <rafostar.github@gmail.com>
-License:   GPL-3.0+
-
- This program is free software: you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation, either version 3 of the License, or
- (at your option) any later version.
- .
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- GNU General Public License for more details.
- .
- You should have received a copy of the GNU General Public License
- along with this program.  If not, see <http://www.gnu.org/licenses/>.
- .
- On Debian systems, the complete text of the GNU General Public License
- Version 3 can be found in `/usr/share/common-licenses/GPL-3'.

pkgs/deb/debian/rules

@@ -1,4 +0,0 @@
-#!/usr/bin/make -f
-
-%:
-	dh $@

pkgs/deb/debian/source/format

@@ -1 +0,0 @@
-3.0 (quilt)

pkgs/flatpak/.gitignore

@@ -1,4 +1,6 @@
 build/
+builddir/
 repo/
 .flatpak-builder/
 com.github.rafostar.Clapper.flatpak
+flathub/com.github.rafostar.Clapper.json

pkgs/flatpak/com.github.rafostar.Clapper-nightly.json

@@ -0,0 +1,60 @@
+{
+    "app-id": "com.github.rafostar.Clapper",
+    "runtime": "org.gnome.Platform",
+    "runtime-version": "master",
+    "sdk": "org.gnome.Sdk",
+    "sdk-extensions": [
+        "org.freedesktop.Sdk.Extension.rust-nightly",
+        "org.freedesktop.Sdk.Extension.llvm13"
+    ],
+    "command": "com.github.rafostar.Clapper",
+    "finish-args": [
+        "--share=ipc",
+        "--socket=fallback-x11",
+        "--socket=wayland",
+        "--device=dri",
+        "--socket=pulseaudio",
+        "--share=network",
+        "--device=all",
+        "--filesystem=xdg-run/pipewire-0:ro",
+        "--filesystem=xdg-videos",
+        "--own-name=org.mpris.MediaPlayer2.Clapper",
+        "--talk-name=org.gnome.Shell",
+        "--env=GST_PLUGIN_SYSTEM_PATH=/app/lib/gstreamer-1.0",
+        "--env=GST_VAAPI_ALL_DRIVERS=1"
+    ],
+    "build-options": {
+        "append-path": "/usr/lib/sdk/rust-nightly/bin:/usr/lib/sdk/llvm13/bin",
+        "prepend-ld-library-path": "/usr/lib/sdk/llvm13/lib"
+    },
+    "modules": [
+        "flathub/shared-modules/gudev/gudev.json",
+        "flathub/lib/libsass.json",
+        "flathub/lib/sassc.json",
+        "flathub/lib/libadwaita.json",
+        "flathub/lib/liba52.json",
+        "flathub/lib/libmpeg2.json",
+        "flathub/lib/libdv.json",
+        "flathub/lib/libdvdcss.json",
+        "flathub/lib/libdvdread.json",
+        "flathub/lib/libdvdnav.json",
+        "flathub/lib/libass.json",
+        "flathub/lib/ffmpeg.json",
+        "testing/gstreamer.json",
+        "testing/gst-plugins-rs.json",
+        "testing/gtuber.json",
+        {
+            "name": "clapper",
+            "buildsystem": "meson",
+            "sources": [
+                {
+                    "type": "dir",
+                    "path": "../../."
+                }
+            ]
+        }
+    ],
+    "cleanup-commands": [
+        "ln -s /lib/$FLATPAK_ARCH-linux-*/gstreamer-1.0/libgstpipewire.so /app/lib/gstreamer-1.0/"
+    ]
+}

pkgs/flatpak/com.github.rafostar.Clapper.json

@@ -1,7 +1,7 @@
 {
     "app-id": "com.github.rafostar.Clapper",
     "runtime": "org.gnome.Platform",
-    "runtime-version": "3.38",
+    "runtime-version": "42",
     "sdk": "org.gnome.Sdk",
     "command": "com.github.rafostar.Clapper",
     "finish-args": [
@@ -12,42 +12,42 @@
         "--socket=pulseaudio",
         "--share=network",
         "--device=all",
+        "--filesystem=xdg-run/pipewire-0:ro",
         "--filesystem=xdg-videos",
+        "--own-name=org.mpris.MediaPlayer2.Clapper",
         "--talk-name=org.gnome.Shell",
         "--env=GST_PLUGIN_SYSTEM_PATH=/app/lib/gstreamer-1.0",
         "--env=GST_VAAPI_ALL_DRIVERS=1"
     ],
     "modules": [
-        "lib/glib-networking.json",
-        "shared-modules/gudev/gudev.json",
-        "lib/pango.json",
-        "lib/libsass.json",
-        "lib/sassc.json",
-        "lib/gtk4.json",
-        "lib/liba52.json",
-        "lib/libmpeg2.json",
-        "lib/libdvdcss.json",
-        "lib/libdvdread.json",
-        "lib/libdvdnav.json",
-        "lib/libass.json",
-        "lib/ffmpeg.json",
-        "lib/uchardet.json",
-        "gstreamer-1.0/gstreamer.json",
-        "gstreamer-1.0/gst-plugins-base.json",
-        "gstreamer-1.0/gst-plugins-good.json",
-        "gstreamer-1.0/gst-plugins-bad.json",
-        "gstreamer-1.0/gst-plugins-ugly.json",
-        "gstreamer-1.0/gst-libav.json",
-        "gstreamer-1.0/gstreamer-vaapi.json",
+        "flathub/shared-modules/gudev/gudev.json",
+        "flathub/lib/libsass.json",
+        "flathub/lib/sassc.json",
+        "flathub/lib/liba52.json",
+        "flathub/lib/libmpeg2.json",
+        "flathub/lib/libdv.json",
+        "flathub/lib/libdvdcss.json",
+        "flathub/lib/libdvdread.json",
+        "flathub/lib/libdvdnav.json",
+        "flathub/lib/libass.json",
+        "flathub/lib/ffmpeg.json",
+        "flathub/lib/uchardet.json",
+        "flathub/gstreamer-1.0/gstreamer.json",
+        "testing/gtk4.json",
+        "flathub/lib/libadwaita.json",
+        "testing/gtuber.json",
         {
             "name": "clapper",
             "buildsystem": "meson",
             "sources": [
                 {
-                    "type": "git",
-                    "url": "https://github.com/Rafostar/clapper.git"
+                    "type": "dir",
+                    "path": "../../."
                 }
             ]
         }
+    ],
+    "cleanup-commands": [
+        "ln -s /lib/$FLATPAK_ARCH-linux-*/gstreamer-1.0/libgstpipewire.so /app/lib/gstreamer-1.0/"
     ]
 }

pkgs/flatpak/gstreamer-1.0/gst-libav-stop-caching-codecs.patch

@@ -1,30 +0,0 @@
-From 2c371f17af1695bd42f572d5ccdb837152b8b67a Mon Sep 17 00:00:00 2001
-From: Thomas Coldrick <othko97@gmail.com>
-Date: Thu, 8 Nov 2018 17:46:53 +0000
-Subject: [PATCH] gst-libav-stop-caching-codecs
-
----
- ext/libav/gstav.c | 16 ++++++++++++++++
- 1 file changed, 16 insertions(+)
-
-diff --git a/ext/libav/gstav.c b/ext/libav/gstav.c
-index 2a88230..bfd19a1 100644
---- a/ext/libav/gstav.c
-+++ b/ext/libav/gstav.c
-@@ -155,6 +155,13 @@ plugin_init (GstPlugin * plugin)
-   /* build global ffmpeg param/property info */
-   gst_ffmpeg_cfg_init ();
- 
-+  gst_plugin_add_dependency_simple (plugin, NULL,
-+      "/app/lib",
-+      "libavcodec.so.58,"
-+      "libavformat.so.58,"
-+      "libswscale.so.5",
-+      GST_PLUGIN_DEPENDENCY_FLAG_NONE);
-+
-   gst_ffmpegaudenc_register (plugin);
-   gst_ffmpegvidenc_register (plugin);
-   gst_ffmpegauddec_register (plugin);
--- 
-2.19.1
-

pkgs/flatpak/gstreamer-1.0/gst-libav.json

@@ -1,20 +0,0 @@
-{
-    "name": "gst-libav",
-    "buildsystem": "meson",
-    "config-opts": [
-        "-Ddoc=disabled",
-        "-Dtests=disabled"
-    ],
-    "sources": [
-        {
-            "type": "git",
-            "url": "https://gitlab.freedesktop.org/gstreamer/gst-libav.git",
-            "tag": "1.18.1",
-            "commit": "097313530cae4a49437a779a9ded0ade8113c26b"
-        },
-        {
-            "type": "patch",
-            "path": "gst-libav-stop-caching-codecs.patch"
-        }
-    ]
-}

pkgs/flatpak/gstreamer-1.0/gst-plugins-bad-assrender-fix-mimetype-detection.patch

@@ -1,89 +0,0 @@
-From ab9ceccc8b7f0591f580abfa6901d27c49812a94 Mon Sep 17 00:00:00 2001
-From: Rafostar <40623528+Rafostar@users.noreply.github.com>
-Date: Sun, 10 Jan 2021 20:22:43 +0100
-Subject: [PATCH 1/2] assrender: fix mimetype detection
-
-Previously gst_structure_has_name was used to get a string to compare with supported mimetypes.
-This is incorrect as above function returns a user defined structure name which is
-not the structure mimetype value.
----
- ext/assrender/gstassrender.c | 21 ++++++++++++---------
- 1 file changed, 12 insertions(+), 9 deletions(-)
-
-diff --git a/ext/assrender/gstassrender.c b/ext/assrender/gstassrender.c
-index e6d31985b..a69d3fe78 100644
---- a/ext/assrender/gstassrender.c
-+++ b/ext/assrender/gstassrender.c
-@@ -1557,7 +1557,7 @@ gst_ass_render_handle_tag_sample (GstAssRender * render, GstSample * sample)
-   const GstStructure *structure;
-   gboolean valid_mimetype, valid_extension;
-   guint i;
--  const gchar *filename;
-+  const gchar *mimetype, *filename;
- 
-   buf = gst_sample_get_buffer (sample);
-   structure = gst_sample_get_info (sample);
-@@ -1565,20 +1565,23 @@ gst_ass_render_handle_tag_sample (GstAssRender * render, GstSample * sample)
-   if (!buf || !structure)
-     return;
- 
-+  filename = gst_structure_get_string (structure, "filename");
-+  if (!filename)
-+    return;
-+
-   valid_mimetype = FALSE;
-   valid_extension = FALSE;
- 
--  for (i = 0; i < G_N_ELEMENTS (mimetypes); i++) {
--    if (gst_structure_has_name (structure, mimetypes[i])) {
--      valid_mimetype = TRUE;
--      break;
-+  mimetype = gst_structure_get_string (structure, "mimetype");
-+  if (mimetype) {
-+    for (i = 0; i < G_N_ELEMENTS (mimetypes); i++) {
-+      if (strcmp (mimetype, mimetypes[i]) == 0) {
-+        valid_mimetype = TRUE;
-+        break;
-+      }
-     }
-   }
- 
--  filename = gst_structure_get_string (structure, "filename");
--  if (!filename)
--    return;
--
-   if (!valid_mimetype) {
-     guint len = strlen (filename);
-     const gchar *extension = filename + len - 4;
--- 
-2.28.0
-
-
-From fd7d46171b2abcd3ac247491f01a91444e7b95b2 Mon Sep 17 00:00:00 2001
-From: Rafostar <40623528+Rafostar@users.noreply.github.com>
-Date: Sun, 10 Jan 2021 20:26:58 +0100
-Subject: [PATCH 2/2] assrender: add "vnd.ms-opentype" to supported mimetypes
-
-The "application/vnd.ms-opentype" mimetype is commonly used mimetype
-for fonts with .otf extension, handle it without checking the file extension.
----
- ext/assrender/gstassrender.c | 3 ++-
- 1 file changed, 2 insertions(+), 1 deletion(-)
-
-diff --git a/ext/assrender/gstassrender.c b/ext/assrender/gstassrender.c
-index a69d3fe78..96b062c50 100644
---- a/ext/assrender/gstassrender.c
-+++ b/ext/assrender/gstassrender.c
-@@ -1546,7 +1546,8 @@ gst_ass_render_handle_tag_sample (GstAssRender * render, GstSample * sample)
-   static const gchar *mimetypes[] = {
-     "application/x-font-ttf",
-     "application/x-font-otf",
--    "application/x-truetype-font"
-+    "application/x-truetype-font",
-+    "application/vnd.ms-opentype"
-   };
-   static const gchar *extensions[] = {
-     ".otf",
--- 
-2.28.0
-

pkgs/flatpak/gstreamer-1.0/gst-plugins-bad-assrender-smooth-scaling.patch

@@ -1,30 +0,0 @@
-From 1c8538d8f8c2181106d626d67784af6db094036e Mon Sep 17 00:00:00 2001
-From: Rafostar <rafostar.github@gmail.com>
-Date: Thu, 19 Nov 2020 18:03:11 +0100
-Subject: [PATCH] assrender: fix smooth scaling by disabling hinting
-
-When ass hinting value is set to anything other than NONE,
-subtitles cannot use smooth scaling, thus all animations will jitter.
-
-The libass author warns about possibility of breaking some scripts when it is enabled,
-so lets do what is recommended and disable it to get the smooth scaling working.
----
- ext/assrender/gstassrender.c | 2 +-
- 1 file changed, 1 insertion(+), 1 deletion(-)
-
-diff --git a/ext/assrender/gstassrender.c b/ext/assrender/gstassrender.c
-index e99458bf29..111987b9d8 100644
---- a/ext/assrender/gstassrender.c
-+++ b/ext/assrender/gstassrender.c
-@@ -916,7 +916,7 @@ gst_ass_render_negotiate (GstAssRender * render, GstCaps * caps)
-     ass_set_pixel_aspect (render->ass_renderer,
-         (gdouble) render->info.par_n / (gdouble) render->info.par_d);
-     ass_set_font_scale (render->ass_renderer, 1.0);
--    ass_set_hinting (render->ass_renderer, ASS_HINTING_LIGHT);
-+    ass_set_hinting (render->ass_renderer, ASS_HINTING_NONE);
- 
-     ass_set_fonts (render->ass_renderer, "Arial", "sans-serif", 1, NULL, 1);
-     ass_set_fonts (render->ass_renderer, NULL, "Sans", 1, NULL, 1);
--- 
-GitLab
-

pkgs/flatpak/gstreamer-1.0/gst-plugins-bad-vah264dec-fix-seeking-errors.patch

@@ -1,75 +0,0 @@
-From f9af93d841546ca7898350ae14ed57448b24a644 Mon Sep 17 00:00:00 2001
-From: Seungha Yang <seungha@centricular.com>
-Date: Sat, 14 Nov 2020 03:16:07 +0900
-Subject: [PATCH 1/2] codecs: h264decoder: Don't give up to decode due to
- missing reference picture
-
-Missing reference picture is very common thing for broken/malformed stream.
-Decoder should be able to keep decoding if it's not a very critical error.
-
-Part-of: <https://gitlab.freedesktop.org/gstreamer/gst-plugins-bad/-/merge_requests/1809>
----
- gst-libs/gst/codecs/gsth264decoder.c | 4 ++--
- 1 file changed, 2 insertions(+), 2 deletions(-)
-
-diff --git a/gst-libs/gst/codecs/gsth264decoder.c b/gst-libs/gst/codecs/gsth264decoder.c
-index e6d20af208..40446d92df 100644
---- a/gst-libs/gst/codecs/gsth264decoder.c
-+++ b/gst-libs/gst/codecs/gsth264decoder.c
-@@ -2354,7 +2354,7 @@ modify_ref_pic_list (GstH264Decoder * self, int list)
-         if (!pic) {
-           GST_WARNING_OBJECT (self, "Malformed stream, no pic num %d",
-               pic_num_lx);
--          return FALSE;
-+          break;
-         }
-         shift_right_and_insert (ref_pic_listx, ref_idx_lx,
-             num_ref_idx_lX_active_minus1, pic);
-@@ -2380,7 +2380,7 @@ modify_ref_pic_list (GstH264Decoder * self, int list)
-         if (!pic) {
-           GST_WARNING_OBJECT (self, "Malformed stream, no pic num %d",
-               list_mod->value.long_term_pic_num);
--          return FALSE;
-+          break;
-         }
-         shift_right_and_insert (ref_pic_listx, ref_idx_lx,
-             num_ref_idx_lX_active_minus1, pic);
--- 
-GitLab
-
-
-From 9011a58491b089461762a8f550892de434af5c29 Mon Sep 17 00:00:00 2001
-From: Seungha Yang <seungha@centricular.com>
-Date: Sat, 14 Nov 2020 03:20:19 +0900
-Subject: [PATCH 2/2] vah264dec: Allow missing reference picture
-
-baseclass might provide reference picture list with null picture.
-Ensure picture before filling picture information.
-
-Part-of: <https://gitlab.freedesktop.org/gstreamer/gst-plugins-bad/-/merge_requests/1809>
----
- sys/va/gstvah264dec.c | 8 +++++++-
- 1 file changed, 7 insertions(+), 1 deletion(-)
-
-diff --git a/sys/va/gstvah264dec.c b/sys/va/gstvah264dec.c
-index e90f84bb44..184af430fa 100644
---- a/sys/va/gstvah264dec.c
-+++ b/sys/va/gstvah264dec.c
-@@ -198,7 +198,13 @@ _fill_ref_pic_list (VAPictureH264 va_reflist[32], GArray * reflist)
- 
-   for (i = 0; i < reflist->len; i++) {
-     GstH264Picture *picture = g_array_index (reflist, GstH264Picture *, i);
--    _fill_vaapi_pic (&va_reflist[i], picture);
-+
-+    if (picture) {
-+      _fill_vaapi_pic (&va_reflist[i], picture);
-+    } else {
-+      /* list might include null picture if reference picture was missing */
-+      _init_vaapi_pic (&va_reflist[i]);
-+    }
-   }
- 
-   for (; i < 32; i++)
--- 
-GitLab
-

pkgs/flatpak/gstreamer-1.0/gst-plugins-bad.json

@@ -1,41 +0,0 @@
-{
-    "name": "gst-plugins-bad",
-    "buildsystem": "meson",
-    "config-opts": [
-        "-Ddoc=disabled",
-        "-Dexamples=disabled",
-        "-Dtests=disabled",
-        "-Dnls=disabled",
-        "-Dgobject-cast-checks=disabled",
-        "-Dglib-asserts=disabled",
-        "-Dglib-checks=disabled",
-        "-Dextra-checks=disabled",
-
-        "-Dvulkan=disabled",
-        "-Dwebrtc=disabled",
-        "-Dwasapi=disabled",
-        "-Dwasapi2=disabled",
-        "-Dwinks=disabled",
-        "-Dwinscreencap=disabled"
-    ],
-    "sources": [
-        {
-            "type": "git",
-            "url": "https://gitlab.freedesktop.org/gstreamer/gst-plugins-bad.git",
-            "tag": "1.18.1",
-            "commit": "e5c3c106a2da607953fea36e3a253b382c939684"
-        },
-        {
-            "type": "patch",
-            "path": "gst-plugins-bad-vah264dec-fix-seeking-errors.patch"
-        },
-        {
-            "type": "patch",
-            "path": "gst-plugins-bad-assrender-smooth-scaling.patch"
-        },
-        {
-            "type": "patch",
-            "path": "gst-plugins-bad-assrender-fix-mimetype-detection.patch"
-        }
-    ]
-}

pkgs/flatpak/gstreamer-1.0/gst-plugins-base-autodetect-subtitle-text-encoding.patch

@@ -1,142 +0,0 @@
-From 61a66babede5a587783a1d4eb28e950a755ff362 Mon Sep 17 00:00:00 2001
-From: Rafostar <rafostar.github@gmail.com>
-Date: Wed, 25 Nov 2020 14:44:21 +0100
-Subject: [PATCH] subparse: Autodetect subtitle text encoding
-
-Use "uchardet" to guess the subtitle text encoding if it is not in UTF-8
-or manually specified instead of blindly guessing its "ISO-8859-15".
-The "uchardet" dependency is optional and when is not available at
-compile time, then old behaviour will be used.
----
- gst/subparse/gstsubparse.c | 58 +++++++++++++++++++++++++++++++++-----
- gst/subparse/meson.build   | 12 ++++++--
- 2 files changed, 61 insertions(+), 9 deletions(-)
-
-diff --git a/gst/subparse/gstsubparse.c b/gst/subparse/gstsubparse.c
-index 382e430f2..42283d2d1 100644
---- a/gst/subparse/gstsubparse.c
-+++ b/gst/subparse/gstsubparse.c
-@@ -31,6 +31,10 @@
- #include <sys/types.h>
- #include <glib.h>
- 
-+#if defined(HAVE_UCHARDET)
-+#include <uchardet.h>
-+#endif
-+
- #include "gstsubparse.h"
- #include "gstssaparse.h"
- #include "samiparse.h"
-@@ -148,8 +152,9 @@ gst_sub_parse_class_init (GstSubParseClass * klass)
-           "Encoding to assume if input subtitles are not in UTF-8 or any other "
-           "Unicode encoding. If not set, the GST_SUBTITLE_ENCODING environment "
-           "variable will be checked for an encoding to use. If that is not set "
--          "either, ISO-8859-15 will be assumed.", DEFAULT_ENCODING,
--          G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
-+          "either, then if plugin was build with uchardet support it will be "
-+          "used to guess the encoding, otherwise ISO-8859-15 will be assumed.",
-+          DEFAULT_ENCODING, G_PARAM_READWRITE | G_PARAM_STATIC_STRINGS));
- 
-   g_object_class_install_property (object_class, PROP_VIDEOFPS,
-       gst_param_spec_fraction ("video-fps", "Video framerate",
-@@ -439,6 +444,35 @@ detect_encoding (const gchar * str, gsize len)
-   return NULL;
- }
- 
-+static gchar *
-+uchardet_detect_encoding (const gchar * str, gsize len)
-+{
-+  gchar *charset = NULL;
-+  gint retval;
-+
-+#if defined(HAVE_UCHARDET)
-+  uchardet_t handle = uchardet_new ();
-+  retval = uchardet_handle_data (handle, str, len);
-+
-+  GST_DEBUG ("detecting encoding with uchardet using %li characters", len);
-+
-+  if (retval != 0) {
-+    GST_WARNING ("could not handle data with uchardet");
-+  } else {
-+    uchardet_data_end (handle);
-+    charset = g_strdup (uchardet_get_charset (handle));
-+
-+    if (charset == NULL || *charset == '\0')
-+      GST_WARNING ("uchardet could not detect encoding");
-+    else
-+      GST_INFO ("uchardet detected encoding: %s", charset);
-+  }
-+  uchardet_delete (handle);
-+#endif
-+
-+  return charset;
-+}
-+
- static gchar *
- convert_encoding (GstSubParse * self, const gchar * str, gsize len,
-     gsize * consumed)
-@@ -481,11 +515,18 @@ convert_encoding (GstSubParse * self, const gchar * str, gsize len,
-     encoding = g_getenv ("GST_SUBTITLE_ENCODING");
-   }
-   if (encoding == NULL || *encoding == '\0') {
--    /* if local encoding is UTF-8 and no encoding specified
--     * via the environment variable, assume ISO-8859-15 */
--    if (g_get_charset (&encoding)) {
-+    /* no encoding specified via the environment variable either,
-+     * so try to autodetect with uchardet */
-+    encoding = uchardet_detect_encoding (str, len);
-+  }
-+
-+  /* if uchardet failed and local encoding is UTF-8, assume ISO-8859-15 */
-+  if (encoding == NULL || *encoding == '\0') {
-+    if (g_get_charset (&encoding))
-       encoding = "ISO-8859-15";
--    }
-+  } else {
-+    /* reuse the detected encoding from now on */
-+    self->detected_encoding = g_strdup (encoding);
-   }
- 
-   ret = gst_convert_to_utf8 (str, len, encoding, consumed, &err);
-@@ -2159,7 +2200,10 @@ gst_subparse_type_find (GstTypeFind * tf, gpointer private)
-     enc = g_getenv ("GST_SUBTITLE_ENCODING");
-     if (enc == NULL || *enc == '\0') {
-       /* if local encoding is UTF-8 and no encoding specified
--       * via the environment variable, assume ISO-8859-15 */
-+       * via the environment variable, assume ISO-8859-15
-+       *
-+       * Encoding here is only used for type find, so no need
-+       * to run through uchardet at this point */
-       if (g_get_charset (&enc)) {
-         enc = "ISO-8859-15";
-       }
-diff --git a/gst/subparse/meson.build b/gst/subparse/meson.build
-index 9a76601f0..2dcf8830f 100644
---- a/gst/subparse/meson.build
-+++ b/gst/subparse/meson.build
-@@ -6,12 +6,20 @@ subparse_sources = [
-   'mpl2parse.c',
-   'qttextparse.c',
- ]
-+subparse_defines = []
-+subparse_optional_deps = []
-+
-+subparse_uchardet_dep = dependency('uchardet', required : false)
-+if subparse_uchardet_dep.found()
-+  subparse_defines += '-DHAVE_UCHARDET'
-+  subparse_optional_deps += subparse_uchardet_dep
-+endif
- 
- gstsubparse = library('gstsubparse',
-   subparse_sources,
--  c_args : gst_plugins_base_args,
-+  c_args : gst_plugins_base_args + subparse_defines,
-   include_directories: [configinc, libsinc],
--  dependencies : [gst_base_dep],
-+  dependencies : [gst_base_dep] + subparse_optional_deps,
-   install : true,
-   install_dir : plugins_install_dir,
- )
--- 
-2.26.2
-