Input

#!/bin/bash # dillo-gemini # © 2019 cel @f/6sQ6d2CMxRUhLpspgGIulDxDCwYD7DzFzPNr7u5AU=.ed25519 # Copying and distribution of this file, with or without modification, # are permitted in any medium without royalty provided the copyright # notice and this notice are preserved. This file is offered as-is, # without any warranty. read -d '>' auth read -d '>' cmd case "$cmd" in "\n" printf "Content-type: text/plain\r\n\r\n" echo Not found } render_gemini() { printf "Content-type: text/html\r\n\r\n" if which ansi2html 2>&1 >/dev/null then ansi2html else cat fi | awk ' BEGIN { print "" } /^```/ { if (!in_literal) { in_literal = 1 print "

"
			} else {
				in_literal = 0
				print "

" } next } in_literal { print next } in_list && !/^\*/ { in_list = 0 print "" } /^\*/ { if (!in_list) { in_list = 1 printf "

%s%s

" "$*" } serve_status_not_supported() { printf "\n" printf "Content-type: text/plain\r\n\r\n" echo Status not implemented: $1 echo $2 } serve_missing_status() { printf "\n" printf "Content-type: text/plain\r\n\r\n" echo Empty status response. $2 } serve_input() { printf "\n" prompt=$1 # TODO: html-escape prompt printf "Content-type: text/html\r\n\r\n" cat <<-EOF Input EOF } serve_success() { printf "\n" type=$1 case "$type" in text/gemini*) render_gemini;; *) printf "Content-type: $type\r\n\r\n"; cat;; esac } serve_redirect() { url=$1 send_status_msg "Redirected" printf "\n" printf "Content-type: text/html\r\n\r\n" # TODO: html-escape url cat <<-EOF Redirect to $url

Redirect to $url EOF } serve_error() { status=$1 meta=$2 send_status_msg "Request failed" printf "\n" printf "Content-type: text/html\r\n\r\n" cat <<-EOF Request failed
Request failed: $status
`$meta` EOF } serve_fail() { meta="$1" send_status_msg "Client certificate required" printf "\n" printf "Content-type: text/html\r\n\r\n" cat <<-EOF Client certificate required
Client certificate required

Not implemented!
`$meta` EOF } serve_gemini() { url=$1 url1=${url#gemini://} hostname=${url1%%/} host=${hostname%%:} port=${hostname##:} # replace "?_=" with "?". # dillo can only submit forms with name=value items, but Gemini # uses the whole querystring as a single string url1=${url%%?_=} if [ "$url1" != "$url" ]; then url="${url1}?${url#?_=}" fi if [ "$host" = "$port" ]; then port=1965; fi send_status_msg "Sending request..." printf "%s\r\n" "$url" | openssl s_client -verify_quiet -quiet "$host:$port" | { read status meta send_status_msg "Status: $status" meta=$(echo "$meta" | sed 's/\s$//') case "$status" in 1) serve_input "$meta";; 2) serve_success "$meta";; 3) serve_redirect "$meta";; 4) serve_error "$status" "$meta";; 5) serve_error "$meta";; #6) serve_client_cert_required "$meta";; '') serve_missing_status "$meta";; ) serve_status_not_supported "$status" "$meta";; esac } } case "$url" in gemini:) serve_gemini "$url";; *) serve_404;; esac

$prompt

Request failed: $status

Client certificate required