Add themoviedb support for bay.parazy.de - annna - Annna the nice friendly bot.
 (HTM) git clone git://bitreich.org/annna/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/annna/
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) Tags
 (DIR) README
       ---
 (DIR) commit 07add18a679ee42ddfb270c6d98e37647a186225
 (DIR) parent 02a180aeae1e6ef0a928d4182012d7ee708bf7e6
 (HTM) Author: Annna Robert-Houdin <annna@bitreich.org>
       Date:   Thu, 19 Aug 2021 20:29:46 +0200
       
       Add themoviedb support for bay.parazy.de
       
       Diffstat:
         M annna-message-common                |       7 +++++++
         A themoviedb2gopherbay                |      18 ++++++++++++++++++
       
       2 files changed, 25 insertions(+), 0 deletions(-)
       ---
 (DIR) diff --git a/annna-message-common b/annna-message-common
       @@ -95,6 +95,13 @@ case "${text}" in
                                        nuris="gopher://bay.parazy.de:666/1/q.dcgi?${movietitle}"
                                fi
                                ;;
       +                *themoviedb.org/movie/*)
       +                        movietitle="$(themoviedb2gopherbay "${uri}" | sed 's, ,+,g')"
       +                        if [ -n "${movietitle}" ];
       +                        then
       +                                nuris="gopher://bay.parazy.de:666/1/q.dcgi?${movietitle}"
       +                        fi
       +                        ;;
                        *lichess.org/????????|*lichess.org/????????/|*lichess.org/????????/black|*lichess.org/????????/white)
                                nuris="$(printf "%s\n" "${uri}" \
                                        | sed 's,https://lichess.org\(/[^ ]*\)$,\1,; s,^/\([^/]*\)/black$,/black/\1,; s,/white,,; s,\(.*\),https://lichess1.org/game/export/gif\1.gif,;')"
 (DIR) diff --git a/themoviedb2gopherbay b/themoviedb2gopherbay
       @@ -0,0 +1,18 @@
       +#!/bin/sh
       +
       +if [ $# -lt 1 ];
       +then
       +        printf "usage: %s themoviedburi\n" "$(basename "$0")" >&2
       +        exit 1
       +fi
       +
       +imdburi="$1"
       +title="$(curl -s "${imdburi}" \
       +        | xml2tsv 2>/dev/null \
       +        | grep property=og:title \
       +        | sed 's,.*content=\([^\t]*\).*,\1,')"
       +
       +[ -z "${title}" ] && exit 1
       +
       +printf "%s\n" "${title}"
       +