From dfae3a6de04ae76b4ed170da26afce6c4976583b Mon Sep 17 00:00:00 2001
From: thor <thor@35dc7657-300d-0410-a2e5-dc2837fedb53>
Date: Sun, 17 Apr 2022 12:43:36 +0000
Subject: [PATCH] scripts/mpg123-radio: prototype for HTTPS streaming

git-svn-id: svn://scm.orgis.org/mpg123/trunk@5032 35dc7657-300d-0410-a2e5-dc2837fedb53
---
 scripts/mpg123-radio | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 scripts/mpg123-radio

diff --git a/scripts/mpg123-radio b/scripts/mpg123-radio
new file mode 100644
index 00000000..00bf0348
--- /dev/null
+++ b/scripts/mpg123-radio
@@ -0,0 +1,26 @@
+#!/bin/bash
+
+# needs plain stream URL, not playlist
+
+url=$1
+shift
+
+icy=1
+
+metaint=$(wget --quiet \
+  --user-agent=mpg123-radio/0.1\
+  --header="Icy-MetaData: $icy" \
+  --save-headers "$url" --output-document=- \
+  | perl -ne 'if(/^\s*ICY-meTaint:\s(\d+)/i){ print "$1"; last } last unless /\S/;' )
+
+track=$url
+
+mpg123 --icy-interval "$metaint" "$@" <(wget \
+  --quiet --output-document=- \
+  --user-agent=mpg123-radio/0.1 \
+  --header="Icy-MetaData: $icy" \
+  "$track")
+
+# | grep -i icy-metaint: | tail -n 1 | cut -f 2 -d :
+
+#wget --spider -nd "$url"