release-tools/publish-releases.sh: Start writing the manual

release-tools/publish-releases.sh

@@ -171,6 +171,22 @@ while true; do
             do_upload=false
             shift
             ;;
+        --help )
+            usage
+            exit 0
+            ;;
+        --manual )
+            sed -e '1,/^### BEGIN MANUAL/d' \
+                -e '/^### END MANUAL/,$d' \
+                < "$0" \
+                | pod2man \
+                | man -l -
+            exit 0
+            ;;
+        -- )
+            shift
+            break
+            ;;
         * )
             echo >&2 "Unknown option $1"
             exit 1
@@ -636,3 +652,46 @@ if $do_update; then
         cd data
         git push $git_quiet
     )
+
+exit 0
+
+# cat is inconsequential, it's only there to fend off zealous shell parsers
+# that parse all the way here.
+cat <<EOF
+### BEGIN MANUAL
+=pod
+
+=head1 NAME
+
+publish-release.sh - OpenSSL release publishing script
+
+=head1 SYNOPSIS
+
+B<publish-release.sh>
+[
+]
+
+=head1 DESCRIPTION
+
+B<publish-release.sh> publishes releases created by B<stage-release.sh>,
+given an indication of what versions should be released (where B<--all> is a
+possibility).
+
+=head1 OPTIONS
+
+=over 4
+
+=back
+
+=head1 COPYRIGHT
+
+Copyright 2023 The OpenSSL Project Authors. All Rights Reserved.
+
+Licensed under the Apache License 2.0 (the "License").  You may not use
+this file except in compliance with the License.  You can obtain a copy
+in the file LICENSE in the source distribution or at
+L<https://www.openssl.org/source/license.html>.
+
+=cut
+### END MANUAL
+EOF