#! /usr/local/bin/zsh
#
# this file:
#   https://dataswamp.org/~incal/sth/scripts/url2title

ua="Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/51.0.2704.103 Safari/537.36"

url=${1/twitter.com/nitter.net}

youtube='youtube.com'
url=${url/$youtube\/embed\//$youtube\/\/watch?v=}

eurl=$(curl -sLI --fail -A $ua -o /dev/null -w '%{url_effective}\n' "$url")
[[ $? != 0 ]] && exit

ct=$(curl -sLI --fail -A $ua -o /dev/null -w '%{content_type}\n' "$eurl")
[[ $? != 0 || $ct != *"text/html"* ]] && exit

title=$(wget --user-agent=$ua \
             --timeout=5      \
             --tries=1        \
             -q   \
             -O - \
             $url |
            perl -l    \
                 -0777 \
                 -n    \
                 -e 'print $1 if /<title.*?>\s*(.*?)\s*<\/title/si')

non_title="Index of "

if [[ ${#${title#*$non_title}} < ${#${title}} ]]; then
    echo "directory listing, ${title#*$non_title}"
else
    echo $title
fi