iadd script to generate theme channels with commonly used tag openings - bitreich-tv - Meme TV encoding and streaming	Err	bitreich.org	70
hgit clone git://bitreich.org/bitreich-tv git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/bitreich-tv	URL:git://bitreich.org/bitreich-tv git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/bitreich-tv	bitreich.org	70
1Log	/scm/bitreich-tv/log.gph	bitreich.org	70
1Files	/scm/bitreich-tv/files.gph	bitreich.org	70
1Refs	/scm/bitreich-tv/refs.gph	bitreich.org	70
1Tags	/scm/bitreich-tv/tag	bitreich.org	70
1LICENSE	/scm/bitreich-tv/file/LICENSE.gph	bitreich.org	70
i---	Err	bitreich.org	70
1commit 6432f2d9498ec1bd3f401eb6629e86b5de9fda97	/scm/bitreich-tv/commit/6432f2d9498ec1bd3f401eb6629e86b5de9fda97.gph	bitreich.org	70
1parent 43e65f21c98fa9ebc6d8970e1b877db0804eed3f	/scm/bitreich-tv/commit/43e65f21c98fa9ebc6d8970e1b877db0804eed3f.gph	bitreich.org	70
hAuthor: Anders Damsgaard <anders@adamsgaard.dk>	URL:mailto:anders@adamsgaard.dk	bitreich.org	70
iDate:   Mon,  2 Nov 2020 20:46:54 +0100	Err	bitreich.org	70
i	Err	bitreich.org	70
iadd script to generate theme channels with commonly used tag openings	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  A bin/brtv-generate-theme-channels.sh |      21 +++++++++++++++++++++	Err	bitreich.org	70
i	Err	bitreich.org	70
i1 file changed, 21 insertions(+), 0 deletions(-)	Err	bitreich.org	70
i---	Err	bitreich.org	70
1diff --git a/bin/brtv-generate-theme-channels.sh b/bin/brtv-generate-theme-channels.sh	/scm/bitreich-tv/file/bin/brtv-generate-theme-channels.sh.gph	bitreich.org	70
i@@ -0,0 +1,21 @@	Err	bitreich.org	70
i+#!/bin/sh	Err	bitreich.org	70
i+# generate channels where tags begin with a common word	Err	bitreich.org	70
i+# pass hashtags.txt as stdin	Err	bitreich.org	70
i+# optionally specify cutoff value as $1	Err	bitreich.org	70
i+	Err	bitreich.org	70
i+awk -v cutoff="${1:-25}" '	Err	bitreich.org	70
i+/^#[A-z0-9]+-.* / {	Err	bitreich.org	70
i+        split($1, tagwords, "-")	Err	bitreich.org	70
i+        tags[tagwords[1]]++	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+END {	Err	bitreich.org	70
i+        for (tag in tags)	Err	bitreich.org	70
i+                if (tags[tag] >= cutoff)	Err	bitreich.org	70
i+                        print tag	Err	bitreich.org	70
i+}	Err	bitreich.org	70
i+' | while read -r tag; do	Err	bitreich.org	70
i+        grep -E "^${tag}-" "${annna}/${tagfile}" | \	Err	bitreich.org	70
i+        sort -R | \	Err	bitreich.org	70
i+        bin/brtv-generate-playlist.sh | \	Err	bitreich.org	70
i+        bin/brtv-playlist-to-m3u.sh > "${tag#\#}.m3u"	Err	bitreich.org	70
i+done	Err	bitreich.org	70
.