From 6f9c0c6b3b92d7802bf05e44e90ac1b30de37347 Mon Sep 17 00:00:00 2001
From: Michael Kerrisk <mtk.manpages@gmail.com>
Date: Wed, 19 Oct 2005 12:04:53 +0000
Subject: [PATCH] Maintenance scripts

---
 scripts/find_dots_no_parens.sh    | 67 +++++++++++++++++++++++++++++++
 scripts/find_slashes_no_parens.sh | 61 ++++++++++++++++++++++++++++
 2 files changed, 128 insertions(+)
 create mode 100644 scripts/find_dots_no_parens.sh
 create mode 100644 scripts/find_slashes_no_parens.sh

diff --git a/scripts/find_dots_no_parens.sh b/scripts/find_dots_no_parens.sh
new file mode 100644
index 000000000..7472b7a9c
--- /dev/null
+++ b/scripts/find_dots_no_parens.sh
@@ -0,0 +1,67 @@
+#!/bin/sh
+#
+# find_dot_no_parens.sh
+#
+# Look for function names after /^.[BIR]/ that aren't
+# followed by "()".
+#
+# This script is designed to help with "by hand" tidy-ups after
+# the automated changes made by add_parens_for_own_funcs.sh.
+#
+# The first argument to this script names a manual page directory where 
+# 'man2' and 'man3' subdirectories can be found.  The pages names in 
+# these directories are used to generate a series of regular expressions 
+# that can be used to search the manual page files that are named in 
+# the remaining command-line arguments.
+#
+# Example usage: 
+#
+#    cd man-pages-x.yy
+#    sh find_dots_no_parens.sh . man?/*.? > matches.log
+
+if test $# -lt 2; then
+    echo "Usage: $0 man-page-root-dir file file..." 1>&2
+    exit 1
+fi
+
+dir=$1
+
+if ! test -d $dir/man2 || ! test -d $dir/man3; then
+    echo "Can't find man2 and man3 under $dir" 1>&2
+    exit 1
+fi
+
+shift 1
+
+echo "This will take probably a few moments..." 1>&2
+
+awk_script_file=tmp.$0.awk
+rm -f $awk_script_file
+
+# We grep out a few page names that are likely to generate false 
+# positives...
+echo '{' >> $awk_script_file
+echo '    myvar = $2;' >> $awk_script_file
+echo '    gsub("[^a-z_0-9]*$", "", myvar);' >> $awk_script_file
+echo '    if ( myvar == "NOMATCHESFORTHIS" || ' >> $awk_script_file
+
+for page in $(
+
+	find $dir/man2/* $dir/man3/* -type f -name '*.[23]' | 
+	egrep -v '/(stderr|stdin|stdout|errno|termios|string)\..$'); do
+    
+    base=$(basename $page | sed -e 's/\.[23]$//')
+    echo "        myvar == \"$base\" ||" >> $awk_script_file
+
+done
+
+echo '        myvar == "NOMATCHESFORTHIS" )' >> $awk_script_file
+echo '    print $0' >> $awk_script_file
+echo '}' >> $awk_script_file
+
+grep '^\.[BRI][BRI]* [a-zA-Z0-9_][a-zA-Z0-9_]*[^a-zA-Z_]*$' $* | 
+	awk -f $awk_script_file | grep -v '([0-9]*)'
+
+exit 0
+rm -f $awk_script_file
+
diff --git a/scripts/find_slashes_no_parens.sh b/scripts/find_slashes_no_parens.sh
new file mode 100644
index 000000000..e67369f80
--- /dev/null
+++ b/scripts/find_slashes_no_parens.sh
@@ -0,0 +1,61 @@
+#!/bin/sh
+#
+# find_slashes_no_parens.sh
+#
+# Look for function names inside \f[BI]...\f[PB] that aren't
+# followed by "()".
+#
+# This script is designed to help with "by hand" tidy-ups after
+# the automated changes made by add_parens_for_own_funcs.sh.
+#
+# The first argument to this script names a manual page directory where 
+# 'man2' and 'man3' subdirectories can be found.  The pages names in 
+# these directories are used to generate a series of regular expressions 
+# that can be used to search the manual page files that are named in 
+# the remaining command-line arguments.
+#
+# Example usage: 
+#
+#    cd man-pages-x.yy
+#    sh find_slashes_no_parens.sh . man?/*.? > matches.log
+
+if test $# -lt 2; then
+    echo "Usage: $0 man-page-root-dir file file..." 1>&2
+    exit 1
+fi
+
+dir=$1
+
+if ! test -d $dir/man2 || ! test -d $dir/man3; then
+    echo "Can't find man2 and man3 under $dir" 1>&2
+    exit 1
+fi
+
+shift 1
+
+echo "This will probably take a few minutes..." 1>&2
+
+regexp_file=tmp.$0.regexp
+rm -f $regexp_file
+
+# We grep out a few page names that are likely to generate false 
+# positives...
+
+for page in $(
+
+	find $dir/man2/* $dir/man3/* -type f -name '*.[23]' | 
+	egrep -v '/(stderr|stdin|stdout|errno|termios|string)\..$'); do
+    
+    base=$(basename $page | sed -e 's/\.[23]$//')
+
+    echo "\\\\f[BI]$base\\\\f[PB][^(]" >> $regexp_file
+    echo "\\\\f[BI]$base\\\\f[PB]\$" >> $regexp_file
+done
+
+sort -o $regexp_file $regexp_file	# Not really needed
+
+echo "Built regexp file; now about to grep..." 1>&2
+
+grep -f $regexp_file $*
+
+rm -f $regexp_file