[groff] 27/40: [tests]: Add unit tests for man/mdoc `P` register.

[G. Branden Robinson]

gbranden pushed a commit to branch master
in repository groff.

commit c173960e0c7cb7b52932b1064dc20fe12e8a758f
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Sun Dec 11 13:37:00 2022 -0600

    [tests]: Add unit tests for man/mdoc `P` register.
    
    * tmac/tests/an_P-register-works.sh:
    * tmac/tests/andoc_P-register-works.sh:
    * tmac/tests/doc_P-register-works.sh: Do it.
    
    * tmac/tmac.am (tmac_TESTS): Run tests.
    
    Two tests fail at this commit.
    
    FAIL: tmac/tests/andoc_P-register-works.sh
    FAIL: tmac/tests/doc_P-register-works.sh
---
 ChangeLog                            |   9 +++
 tmac/tests/an_P-register-works.sh    |  51 +++++++++++++++
 tmac/tests/andoc_P-register-works.sh | 117 +++++++++++++++++++++++++++++++++++
 tmac/tests/doc_P-register-works.sh   |  54 ++++++++++++++++
 tmac/tmac.am                         |   3 +
 5 files changed, 234 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 88b69f70c..90c0204ae 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,12 @@
+2022-12-11  G. Branden Robinson <g.branden.robinson@gmail.com>
+
+       [tests]: Add unit tests for man/mdoc `P` register.
+
+       * tmac/tests/an_P-register-works.sh:
+       * tmac/tests/andoc_P-register-works.sh:
+       * tmac/tests/doc_P-register-works.sh: Do it.
+       * tmac/tmac.am (tmac_TESTS): Run tests.
+
 2022-12-11  G. Branden Robinson <g.branden.robinson@gmail.com>
 
        [man, mdoc]: Refactor.  Rename a Boolean register to more
diff --git a/tmac/tests/an_P-register-works.sh 
b/tmac/tests/an_P-register-works.sh
new file mode 100755
index 000000000..12f534144
--- /dev/null
+++ b/tmac/tests/an_P-register-works.sh
@@ -0,0 +1,51 @@
+#!/bin/sh
+#
+# Copyright (C) 2022 Free Software Foundation, Inc.
+#
+# This file is part of groff.
+#
+# groff is free software; you can redistribute it and/or modify it under
+# the terms of the GNU General Public License as published by the Free
+# Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# groff is distributed in the hope that it will be useful, but WITHOUT
+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+# for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+#
+
+groff="${abs_top_builddir:-.}/test-groff"
+
+fail=
+
+wail () {
+    echo "...FAILED" >&2
+    fail=YES
+}
+
+input='.TH foo 1 2022-12-11 "groff test suite"
+.SH Name
+foo \- frobinicate a bar
+.bp
+.SH Description
+It took a while to get here.'
+
+output=$(printf "%s\n" "$input" | "$groff" -rcR=0 -rP13 -man -Tascii \
+    -P-cbou)
+echo "$output"
+
+echo "checking first page footer" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +13$" \
+    | grep '^64:' || wail
+
+echo "checking second page footer" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +14$" \
+    | grep '^130:' || wail
+
+test -z "$fail"
+
+# vim:set ai et sw=4 ts=4 tw=72:
diff --git a/tmac/tests/andoc_P-register-works.sh 
b/tmac/tests/andoc_P-register-works.sh
new file mode 100755
index 000000000..e4e8f77d6
--- /dev/null
+++ b/tmac/tests/andoc_P-register-works.sh
@@ -0,0 +1,117 @@
+#!/bin/sh
+#
+# Copyright (C) 2022 Free Software Foundation, Inc.
+#
+# This file is part of groff.
+#
+# groff is free software; you can redistribute it and/or modify it under
+# the terms of the GNU General Public License as published by the Free
+# Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# groff is distributed in the hope that it will be useful, but WITHOUT
+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+# for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+#
+
+groff="${abs_top_builddir:-.}/test-groff"
+
+fail=
+
+wail () {
+    echo "...FAILED" >&2
+    fail=YES
+}
+
+# Test going back and forth from man(7) to mdoc(7).
+
+input='.TH foo 1 2022-12-11 "groff test suite"
+.SH Name
+foo \- frobinicate a bar
+.bp
+.SH Description
+It took a while to get here.
+.Dd 2022-12-11
+.Dt bar 1
+.Os "groff test suite"
+.Sh Name
+.Nm bar
+.Nd erect something for people to walk into
+.bp
+.Sh Description
+It took a while to get here.
+.TH baz 7 2022-12-11 "groff test suite"
+.SH Name
+baz \- what they do not play at Mos Eisley spaceport cantina
+.bp
+.SH Description
+It took a while to get here.'
+
+# First, check without continuous numbering.  Each page starts at P.
+
+output=$(printf "%s\n" "$input" | "$groff" -rcR=0 -rP13 -mandoc \
+    -Tascii -P-cbou)
+echo "$output"
+
+echo "checking first document, first page footer (discontinuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +13$" \
+    | grep '^64:' || wail
+
+echo "checking first document, second page footer (discontinuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +14$" \
+    | grep '^130:' || wail
+
+echo "checking second document, first page footer (discontinuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +13$" \
+    | grep '^196:' || wail
+
+echo "checking second document, second page footer (discontinuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +14$" \
+    | grep '^262:' || wail
+
+echo "checking third document, first page footer (discontinuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +13$" \
+    | grep '^328:' || wail
+
+echo "checking third document, second page footer (discontinuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +14$" \
+    | grep '^394:' || wail
+
+# Now, check _with_ continuous numbering.  Only the first page is
+# numbered P.
+
+output=$(printf "%s\n" "$input" | "$groff" -rcR=0 -rC1 -rP13 -mandoc \
+    -Tascii -P-cbou)
+echo "$output"
+
+echo "checking first document, first page footer (continuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +13$" \
+    | grep '^64:' || wail
+
+echo "checking first document, second page footer (continuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +14$" \
+    | grep '^130:' || wail
+
+echo "checking second document, first page footer (continuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +15$" \
+    | grep '^196:' || wail
+
+echo "checking second document, second page footer (continuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +16$" \
+    | grep '^262:' || wail
+
+echo "checking third document, first page footer (continuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +17$" \
+    | grep '^328:' || wail
+
+echo "checking third document, second page footer (continuous)" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +18$" \
+    | grep '^394:' || wail
+
+test -z "$fail"
+
+# vim:set ai et sw=4 ts=4 tw=72:
diff --git a/tmac/tests/doc_P-register-works.sh 
b/tmac/tests/doc_P-register-works.sh
new file mode 100755
index 000000000..a3fe817fa
--- /dev/null
+++ b/tmac/tests/doc_P-register-works.sh
@@ -0,0 +1,54 @@
+#!/bin/sh
+#
+# Copyright (C) 2022 Free Software Foundation, Inc.
+#
+# This file is part of groff.
+#
+# groff is free software; you can redistribute it and/or modify it under
+# the terms of the GNU General Public License as published by the Free
+# Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# groff is distributed in the hope that it will be useful, but WITHOUT
+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+# for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+#
+
+groff="${abs_top_builddir:-.}/test-groff"
+
+fail=
+
+wail () {
+    echo "...FAILED" >&2
+    fail=YES
+}
+
+input='.Dd 2022-12-11
+.Dt foo 1
+.Os "groff test suite"
+.Sh Name
+.Nm foo
+.Nd frobnicate a bar
+.bp
+.Sh Description
+It took a while to get here.'
+
+output=$(printf "%s\n" "$input" | "$groff" -rcR=0 -rP13 -mdoc -Tascii \
+    -P-cbou)
+echo "$output"
+
+echo "checking first page footer" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +13$" \
+    | grep '^64:' || wail
+
+echo "checking second page footer" >&2
+echo "$output" | grep -En "^groff test suite +2022-12-11 +14$" \
+    | grep '^130:' || wail
+
+test -z "$fail"
+
+# vim:set ai et sw=4 ts=4 tw=72:
diff --git a/tmac/tmac.am b/tmac/tmac.am
index 46d81dcbb..f3c6065cb 100644
--- a/tmac/tmac.am
+++ b/tmac/tmac.am
@@ -161,6 +161,7 @@ tmac_TESTS = \
   tmac/tests/an_MR-works.sh \
   tmac/tests/an_MT-body-hyphenates.sh \
   tmac/tests/an_MT-works.sh \
+  tmac/tests/an_P-register-works.sh \
   tmac/tests/an_TH-repairs-ad-damage.sh \
   tmac/tests/an_TH-repairs-hy-damage.sh \
   tmac/tests/an_TS-adds-no-vertical-space.sh \
@@ -186,6 +187,7 @@ tmac_TESTS = \
   tmac/tests/an_title-abbreviation-works.sh \
   tmac/tests/an_use-input-traps-correctly.sh \
   tmac/tests/an_works-with-ec.sh \
+  tmac/tests/andoc_P-register-works.sh \
   tmac/tests/andoc_check-an-to-doc-transition.sh \
   tmac/tests/andoc_clear-doc-traps.sh \
   tmac/tests/andoc_flush-between-packages.sh \
@@ -195,6 +197,7 @@ tmac_TESTS = \
   tmac/tests/doc_Lk-respect-sentence-ending-punctuation.sh \
   tmac/tests/doc_Mt-works.sh \
   tmac/tests/doc_Nm-works.sh \
+  tmac/tests/doc_P-register-works.sh \
   tmac/tests/doc_accept-mixed-case-section-headings.sh \
   tmac/tests/doc_do-not-loop-infinitely-when-shortening-headers.sh \
   tmac/tests/doc_indents-correctly.sh \