bug#27046: [PATCH 3/3] gnu: video: Add mediainfo.

[Ethan R. Jones]

* gnu/packages/video.scm (mediainfo): New variable.
---
 gnu/packages/video.scm | 54 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 54 insertions(+)

diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index b8dc02e2f..285d20a12 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -18,6 +18,7 @@
 ;;; Copyright © 2017 Tobias Geerinckx-Rice <address@hidden>
 ;;; Copyright © 2017 Chris Marusich <address@hidden>
 ;;; Copyright © 2017 Thomas Danckaert <address@hidden>
+;;; Copyright © 2017 Ethan R. Jones <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -2142,3 +2143,56 @@ MediaInfo supports the following formats:
  - Subtitles: SRT, SSA, ASS, SAMI...")
     (license license:bsd-2)))
 
+;; TODO also have a GUI version available
+(define-public mediainfo
+  (package
+    (name "mediainfo")
+    (version "0.7.95")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://mediaarea.net/download/source/";
+                                  name "/" version "/"
+                                  name "_" version ".tar.bz2"))
+              (file-name (string-append name "-" version ".tar.bz2"))
+              (sha256
+               (base32
+                "0dy51a3i79jppmg1gi4f6h7jx4hcgnkmfim4d7d3gmnlbkjh8anv"))))
+    (native-inputs
+     `(("autoconf" ,autoconf)
+       ("automake" ,automake)
+       ("libtool" ,libtool)
+       ("pkg-config" ,pkg-config)
+       ("zlib" ,zlib)
+       ("libmediainfo", libmediainfo)
+       ("libzen" ,libzen)))
+    (build-system gnu-build-system)
+    (arguments
+     '(#:tests? #f ; lacks tests
+       #:phases
+       ;; build scripts not in root of archive
+       (modify-phases %standard-phases
+         (add-before
+             'configure 'pre-configure
+           (lambda _
+             (chdir "Project/GNU/CLI")))
+         (add-before 'configure 'autogen
+           (lambda _
+             (zero? (system* "./autogen.sh")))))))
+    (home-page "https://mediaarea.net/en/MediaInfo";)
+    (synopsis "Utility for reading media metadata")
+    (description "MediaInfo is a utility used for retrieving technical
+information and other metadata about audio or video files.
+A non-exhaustive list of the information MediaInfo can retrieve from media 
files include:
+ - General: title, author, director, album, track number, date, duration...
+ - Video: codec, aspect, fps, bitrate...
+ - Audio: codec, sample rate, channels, language, bitrate...
+ - Text: language of subtitle
+ - Chapters: number of chapters, list of chapters
+MediaInfo supports the following formats:
+ - Video: MKV, OGM, AVI, DivX, WMV, QuickTime, Real, MPEG-1, MPEG-2,
+          MPEG-4, DVD (VOB)...
+ - Video Codecs: DivX, XviD, MSMPEG4, ASP, H.264, AVC...)
+ - Audio: OGG, MP3, WAV, RA, AC3, DTS, AAC, M4A, AU, AIFF...
+ - Subtitles: SRT, SSA, ASS, SAMI...
+MediaInfo supplies technical and tag information about a video or audio file")
+    (license license:bsd-2)))
-- 
2.13.0