iAdd media statistics script - bitreich-memestats - Bitreich meme statistics and graphs.	Err	bitreich.org	70
hgit clone git://bitreich.org/bitreich-memestats git://hg6vgqziawt5s4dj.onion/bitreich-memestats	URL:git://bitreich.org/bitreich-memestats git://hg6vgqziawt5s4dj.onion/bitreich-memestats	bitreich.org	70
1Log	/scm/bitreich-memestats/log.gph	bitreich.org	70
1Files	/scm/bitreich-memestats/files.gph	bitreich.org	70
1Refs	/scm/bitreich-memestats/refs.gph	bitreich.org	70
1Tags	/scm/bitreich-memestats/tag	bitreich.org	70
1LICENSE	/scm/bitreich-memestats/file/LICENSE.gph	bitreich.org	70
i---	Err	bitreich.org	70
1commit 3ef3415790635bdf3af5d3b7636a0c5b6c0869f2	/scm/bitreich-memestats/commit/3ef3415790635bdf3af5d3b7636a0c5b6c0869f2.gph	bitreich.org	70
1parent ff98fb26d863ec1bd65b01d2203fae703f9cca8b	/scm/bitreich-memestats/commit/ff98fb26d863ec1bd65b01d2203fae703f9cca8b.gph	bitreich.org	70
hAuthor: Anders Damsgaard <anders@adamsgaard.dk>	URL:mailto:anders@adamsgaard.dk	bitreich.org	70
iDate:   Mon, 20 Apr 2020 10:03:28 +0200	Err	bitreich.org	70
i	Err	bitreich.org	70
iAdd media statistics script	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  A media-stats.sh                      |      41 +++++++++++++++++++++++++++++++	Err	bitreich.org	70
i	Err	bitreich.org	70
i1 file changed, 41 insertions(+), 0 deletions(-)	Err	bitreich.org	70
i---	Err	bitreich.org	70
1diff --git a/media-stats.sh b/media-stats.sh	/scm/bitreich-memestats/file/media-stats.sh.gph	bitreich.org	70
i@@ -0,0 +1,41 @@	Err	bitreich.org	70
i+#!/bin/sh	Err	bitreich.org	70
i+# output formatted table with memecache media statistics	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+# estimated average image viewing time [s]	Err	bitreich.org	70
i+img_viewing_time=5	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+if [ $# -ne 1 ]; then	Err	bitreich.org	70
i+        printf 'usage: %s <memecache_path>\n' "$0" >&2	Err	bitreich.org	70
i+        exit 1	Err	bitreich.org	70
i+fi	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+i=0	Err	bitreich.org	70
i+sum=0.0	Err	bitreich.org	70
i+for f in "$1"/*.{mkv,mp4,webm,mp3,ogg}; do	Err	bitreich.org	70
i+        i=$((i+=1))	Err	bitreich.org	70
i+        new_sum="$(printf '%f + %f\n' \	Err	bitreich.org	70
i+                "$(ffprobe -v error -show_entries format=duration \	Err	bitreich.org	70
i+                   -of default=noprint_wrappers=1:nokey=1 "$f")" "$sum" 2>/dev/null | \	Err	bitreich.org	70
i+                   bc -l)"	Err	bitreich.org	70
i+        sum="$new_sum"	Err	bitreich.org	70
i+done	Err	bitreich.org	70
i+n_img="$(ls "$1"/*.{png,jpg,JPG,gif} | wc -l)"	Err	bitreich.org	70
i+n_vid="$(ls "$1"/*.{mkv,mp4,webm,mp3,ogg} | wc -l)"	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+printf '\n                      '	Err	bitreich.org	70
i+printf '+----- statistics (%s) ------+\n' "$(date '+%Y-%m-%d')"	Err	bitreich.org	70
i+printf '                      '	Err	bitreich.org	70
i+printf '| number of images:     %8s     |\n' "$n_img"	Err	bitreich.org	70
i+printf '                      '	Err	bitreich.org	70
i+printf '| number of movies:     %8s     |\n' "$n_vid"	Err	bitreich.org	70
i+printf '                      '	Err	bitreich.org	70
i+printf '| average movie length: %10.1f s |\n' \	Err	bitreich.org	70
i+        "$(printf '%f/%f\n' "$sum" "$i" | bc -l)"	Err	bitreich.org	70
i+printf '                      '	Err	bitreich.org	70
i+printf '| total image viewing time: %6.1f h |\n' \	Err	bitreich.org	70
i+        "$(printf '%s*%f/3600\n' "$n_img" "$img_viewing_time" | bc -l)"	Err	bitreich.org	70
i+printf '                      '	Err	bitreich.org	70
i+printf '| total movie length:   %10.1f h |\n' \	Err	bitreich.org	70
i+        "$(printf '%s/3600\n' "$sum" | bc -l)"	Err	bitreich.org	70
i+printf '                      '	Err	bitreich.org	70
i+printf '+------------------------------------+\n'	Err	bitreich.org	70
.