#!/bin/sh

# TODO: libmanpage.sh and manpages.sh duplicate a lot of logic

set -e
export LC_ALL=C
SECTIONS="1 2 3 4 5 6 7 8 9"
RELEASES="current nightly" 
if [ -z ${URL+x} ]; then
  URL=https://sortix.org/man/
fi
if [ -z ${NIGHTLY_RELEASE_SITE+x} ]; then
  NIGHTLY_RELEASE_SITE=https://pub.sortix.org/sortix/release
fi
if [ -z ${SITE+x} ]; then
  SITE=../
fi
if [ -z ${SUBDIR+x} ]; then
  SUBDIR=man
fi
if [ -z ${OFFICIAL+x} ]; then
  OFFICIAL="$SITE"
fi
if [ -z ${TEMPLATE+x} ]; then
  TEMPLATE="$SITE"
fi
if [ -z ${RELEASE+x} ]; then
  RELEASE="current"
fi
if [ -z ${RELEASE_STRING+x} ]; then
  if [ "$RELEASE" = current ]; then
    RELEASE_STRING="Sortix"
  else
    RELEASE_STRING="Sortix $RELEASE"
  fi
fi

if [ ! -e "ports.list" ]; then
  echo "$0: No ports.list in the current directory" >&2
  exit 1
fi

backwards() {
  echo "$1" | tr -cd / | sed 's,/,../,g'
}

tositeofficial() {
  BACKWARDS=$(backwards "$1")
  case "$OFFICIAL" in
  http*) echo "$OFFICIAL" ;;
  *) echo "$BACKWARDS$OFFICIAL" ;;
  esac
}

tositeroot() {
  echo "$(backwards "$1")$SITE"
}

frontpage() {
  tositeofficial "$1" | sed 's/^$/./g'
}

begin_html() {
  cat "$TEMPLATE/header.html" | sed "s|@title@|$1|g"
}

header() {
  cat << EOF
<h1>$1</h1>
EOF
}

section() {
  cat << EOF
<h2>$1</h2>
EOF
}

bp() {
  echo "<p>"
}

ep() {
  echo "</p>"
}

link() {
  cat << EOF
<a href="$1">$2</a>$3<br />
EOF
}

end_html() {
  cat "$TEMPLATE/footer.html"
}

finalize_html_stdout() {
  sed -e "s,@root@,$(tositeroot "$1"),g" \
      -e "s,@official@,$(tositeofficial "$1"),g" \
      -e "s,@frontpage@,$(frontpage "$1"),g" \
      -e "s,@year@,$(date +%Y),g"
}

finalize_html() {
  if [ "$VERBOSE" = 1 ]; then
    echo "$1" >&2
  fi
  finalize_html_stdout "$1" > "$1"
}

# TODO: If the header name contains %, or such, should it be escaped? Maybe that
#       is not actually needed. Probably should. Happens in mdoc(7).
#       %25 is the escaped % sign.
# TODO: https://sortix.org/man/man7/man.7.html#br and https://sortix.org/man/man7/man.7.html#BR is a collision, dammit.
# TODO: This doesn't work for headers in manual pages like addr2line(1) that
#       doesn't use mdoc, so the sections don't have id attributes.
selflink() {
  python3 -c '
import re
import sys

id_map = {}
first_pass = []
for line in sys.stdin.readlines():
    result = ""
    while True:
        match = re.search("(.*?)<h(.)( id=\"([^\">]*)\")?>(.*?)</h.>(.*)", line, flags=re.DOTALL)
        if match is None:
            result += line
            break
        lead = match.group(1)
        hl = match.group(2)
        oldid = match.group(4)
        h = match.group(5)
        rest = match.group(6)
        id = h.lower().replace(" ", "-");
        if oldid is not None:
            id_map[oldid] = id
        result += lead + "<h" + hl + " id=\"" + id + "\"><a href=\"#" + id + "\">" + h + "</a></h" + hl + ">"
        line = rest
    first_pass.append(result)
for line in first_pass:
    result = ""
    while True:
        match = re.search("(.*?)<a class=\"link-sec\" href=\"#([^\">]*)\">(.*?)</a>(.*)", line, flags=re.DOTALL)
        if match is None:
            result += line
            break
        lead = match.group(1)
        id = match.group(2)
        text = match.group(3)
        rest = match.group(4)
        if id in id_map:
            id = id_map[id]
        result += lead + "<a class=\"link-sec\" href=\"#" + id + "\">" + text + "</a>"
        line = rest
    print(result, end="")
'
}

see_other_releases() {
  if [ "$2" = true ]; then
    echo '<div style="text-align: right; float: right;">'
  else
    bp
    echo "View in release:"
  fi
  for OTHER_RELEASE in $RELEASES; do
    if [ "$RELEASE" = "$OTHER_RELEASE" ]; then
      OTHER_RELEASE_URL=$(backwards "$1")"$1"
    elif [ "$OTHER_RELEASE" = nightly ] || [ "$OTHER_RELEASE" = volatile ]; then
      OTHER_RELEASE_URL="$NIGHTLY_RELEASE_SITE/$OTHER_RELEASE/man/$1"
    elif [ "$OTHER_RELEASE" = current ]; then
      OTHER_RELEASE_URL=$(tositeofficial "$1")"man/$1"
    else
      OTHER_RELEASE_URL=$(tositeofficial "$1")"release/$OTHER_RELEASE/man/$1"
    fi
    if [ "$OTHER_RELEASE" = "$RELEASE" ]; then
      printf ' <b><a href="%s">%s</a></b>' "$OTHER_RELEASE_URL" "$OTHER_RELEASE"
    else
      printf ' <a href="%s">%s</a>' "$OTHER_RELEASE_URL" "$OTHER_RELEASE"
    fi
  done
  if [ "$2" = true ]; then
    echo '</div>'
  else
    ep
  fi
}

see_stable() {
  if [ "$2" = true ]; then
    see_other_releases "$@"
  fi
  case "$RELEASE" in
  current)
    if [ "$2" != true ]; then
      see_other_releases "$@"
    fi
    ;;
  *dev* | nightly | volatile)
    if [ "$2" = true ]; then
      header "$RELEASE_STRING manual"
    else
      see_other_releases "$@"
    fi
    bp
    cat << EOF
This manual documents $RELEASE_STRING, a development build that has not
been officially released. You can instead view
<a href="@official@man/$1">this document in the latest official manual</a>.
EOF
    ep
    ;;
  *)
    if [ "$2" = true ]; then
      header "$RELEASE_STRING manual"
    else
      see_other_releases "$@"
    fi
    bp
    cat << EOF
This manual documents $RELEASE_STRING. You can instead view
<a href="@official@man/$1">this document in the latest official manual</a>.
EOF
    ep
    ;;
  esac
}

undocumented_see_also() {
  (cat && echo "../man1/man.1.html") |
  sort |
  (while read FILE; do
    NAME=$(expr x"$FILE" : x'.*/\([^/]*\)\.[0-9]\.html$')
    SECTION=$(expr x"$FILE" : x'.*\.\([0-9]\)\.html$')
    printf ".Xr $NAME $SECTION /"
   done) | sed -e 's| /$|\\|' -e 's|/|,\\|g' | tr '/' ',' | tr '\\' '\n'
}