3 # SPDX-License-Identifier: BSD-2-Clause-FreeBSD
5 # Copyright (c) 2010 Gordon Tetlow
8 # Redistribution and use in source and binary forms, with or without
9 # modification, are permitted provided that the following conditions
11 # 1. Redistributions of source code must retain the above copyright
12 # notice, this list of conditions and the following disclaimer.
13 # 2. Redistributions in binary form must reproduce the above copyright
14 # notice, this list of conditions and the following disclaimer in the
15 # documentation and/or other materials provided with the distribution.
17 # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 # ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 # Usage: add_to_manpath path
32 # Adds a variable to manpath while ensuring we don't have duplicates.
33 # Returns true if we were able to add something. False otherwise.
36 *:$1) decho " Skipping duplicate manpath entry $1" 2 ;;
37 $1:*) decho " Skipping duplicate manpath entry $1" 2 ;;
38 *:$1:*) decho " Skipping duplicate manpath entry $1" 2 ;;
39 *) if [ -d "$1" ]; then
40 decho " Adding $1 to manpath"
50 # Usage: build_manlocales
51 # Builds a correct MANLOCALES variable.
53 # If the user has set manlocales, who are we to argue.
54 if [ -n "$MANLOCALES" ]; then
61 MANLOCALES=${manlocales#:}
63 decho "Available manual locales: $MANLOCALES"
66 # Usage: build_manpath
67 # Builds a correct MANPATH variable.
71 # If the user has set a manpath, who are we to argue.
72 if [ -n "$MANPATH" ]; then
74 *:) PREPEND_MANPATH=${MANPATH} ;;
75 :*) APPEND_MANPATH=${MANPATH} ;;
77 PREPEND_MANPATH=${MANPATH%%::*}
78 APPEND_MANPATH=${MANPATH#*::}
84 if [ -n "$PREPEND_MANPATH" ]; then
86 for path in $PREPEND_MANPATH; do
87 add_to_manpath "$path"
94 decho "Adding default manpath entries"
96 for path in $man_default_path; do
97 add_to_manpath "$path"
103 if [ -n "$APPEND_MANPATH" ]; then
105 for path in $APPEND_MANPATH; do
106 add_to_manpath "$path"
113 decho "Using manual path: $MANPATH"
116 # Usage: check_cat catglob
117 # Checks to see if a cat glob is available.
122 setup_cattool $catpage
123 decho " Found catpage $catpage"
130 # Usage: check_man manglob catglob
131 # Given 2 globs, figures out if the manglob is available, if so, check to
132 # see if the catglob is also available and up to date.
135 # We have a match, check for a cat page
137 setup_cattool $manpage
138 decho " Found manpage $manpage"
140 if [ -n "${use_width}" ]; then
143 decho " Skipping catpage: non-standard page width"
144 elif exists "$2" && is_newer $found $manpage; then
145 # cat page found and is newer, use that
148 setup_cattool $catpage
149 decho " Using catpage $catpage"
151 # no cat page or is older
153 decho " Skipping catpage: not found or old"
161 # Usage: decho "string" [debuglevel]
162 # Echoes to stderr string prefaced with -- if high enough debuglevel.
164 if [ $debug -ge ${2:-1} ]; then
170 # Returns true if glob resolves to a real file.
174 # Don't accidentally inherit callers IFS (breaks perl manpages)
177 # Use some globbing tricks in the shell to determine if a file
183 if [ "$1" != "$2" -a -r "$2" ]; then
191 # Usage: find_file path section subdir pagename
192 # Returns: true if something is matched and found.
193 # Search the given path/section combo for a given page.
195 local manroot catroot mann man0 catn cat0
200 manroot="$manroot/$3"
201 catroot="$catroot/$3"
204 if [ ! -d "$manroot" -a ! -d "$catroot" ]; then
207 decho " Searching directory $manroot" 2
209 mann="$manroot/$4.$2*"
210 man0="$manroot/$4.0*"
211 catn="$catroot/$4.$2*"
212 cat0="$catroot/$4.0*"
214 # This is the behavior as seen by the original man utility.
215 # Let's not change that which doesn't seem broken.
216 if check_man "$mann" "$catn"; then
218 elif check_man "$man0" "$cat0"; then
220 elif check_cat "$catn"; then
222 elif check_cat "$cat0"; then
229 # Usage: is_newer file1 file2
230 # Returns true if file1 is newer than file2 as calculated by mtime.
232 if ! [ "$1" -ot "$2" ]; then
233 decho " mtime: $1 not older than $2" 3
236 decho " mtime: $1 older than $2" 3
241 # Usage: manpath_parse_args "$@"
242 # Parses commandline options for manpath.
243 manpath_parse_args() {
247 while getopts 'Ldq' cmd_arg; do
250 d) debug=$(( $debug + 1 )) ;;
257 # Usage: manpath_usage
258 # Display usage for the manpath(1) utility.
260 echo 'usage: manpath [-Ldq]' >&2
264 # Usage: manpath_warnings
265 # Display some warnings to stderr.
267 if [ -n "$Lflag" -a -n "$MANLOCALES" ]; then
268 echo "(Warning: MANLOCALES environment variable set)" >&2
272 # Usage: man_check_for_so page path
273 # Returns: True if able to resolve the file, false if it ended in tears.
274 # Detects the presence of the .so directive and causes the file to be
275 # redirected to another source file.
280 if [ -n "$catpage" ]; then
284 # We need to loop to accommodate multiple .so directives.
287 line=$($cattool $manpage | head -1)
289 .so*) trim "${line#.so}"
290 decho "$manpage includes $tstr"
291 # Glob and check for the file.
292 if ! check_man "$path/$tstr*" ""; then
293 decho " Unable to find $tstr"
304 # Usage: man_display_page
305 # Display either the manpage or catpage depending on the use_cat variable
307 local IFS pipeline testline
309 # We are called with IFS set to colon. This causes really weird
310 # things to happen for the variables that have spaces in them.
313 # If we are supposed to use a catpage and we aren't using troff(1)
314 # just zcat the catpage and we are done.
315 if [ -z "$tflag" -a -n "$use_cat" ]; then
316 if [ -n "$wflag" ]; then
317 echo "$catpage (source: $manpage)"
320 if [ $debug -gt 0 ]; then
321 decho "Command: $cattool $catpage | $MANPAGER"
324 eval "$cattool $catpage | $MANPAGER"
331 # Okay, we are using the manpage, do we just need to output the
332 # name of the manpage?
333 if [ -n "$wflag" ]; then
339 if [ -n "$use_width" ]; then
340 mandoc_args="-O width=${use_width}"
342 testline="mandoc -Tlint -Wunsupp >/dev/null 2>&1"
343 if [ -n "$tflag" ]; then
344 pipeline="mandoc -Tps $mandoc_args"
346 pipeline="mandoc $mandoc_args | $MANPAGER"
349 if ! eval "$cattool $manpage | $testline" ;then
350 if which -s groff; then
351 man_display_page_groff
353 echo "This manpage needs groff(1) to be rendered" >&2
354 echo "First install groff(1): " >&2
355 echo "pkg install groff " >&2
361 if [ $debug -gt 0 ]; then
362 decho "Command: $cattool $manpage | $pipeline"
365 eval "$cattool $manpage | $pipeline"
370 # Usage: man_display_page_groff
371 # Display the manpage using groff
372 man_display_page_groff() {
373 local EQN NROFF PIC TBL TROFF REFER VGRIND
374 local IFS l nroff_dev pipeline preproc_arg tool
376 # So, we really do need to parse the manpage. First, figure out the
377 # device flag (-T) we have to pass to eqn(1) and groff(1). Then,
378 # setup the pipeline of commands based on the user's request.
380 # If the manpage is from a particular charset, we need to setup nroff
381 # to properly output for the correct device.
384 # I don't pretend to know this; I'm just copying from the
385 # previous version of man(1).
386 case "$man_charset" in
387 KOI8-R) nroff_dev="koi8-r" ;;
388 ISO8859-1) nroff_dev="latin1" ;;
389 ISO8859-15) nroff_dev="latin1" ;;
390 UTF-8) nroff_dev="utf8" ;;
391 *) nroff_dev="ascii" ;;
394 NROFF="$NROFF -T$nroff_dev"
395 EQN="$EQN -T$nroff_dev"
397 # Iff the manpage is from the locale and not just the charset,
398 # then we need to define the locale string.
400 */${man_lang}_${man_country}.${man_charset}/*)
401 NROFF="$NROFF -dlocale=$man_lang.$man_charset"
403 */${man_lang}.${man_charset}/*)
404 NROFF="$NROFF -dlocale=$man_lang.$man_charset"
408 # Allow language specific calls to override the default
410 l=$(echo $man_lang | tr [:lower:] [:upper:])
411 for tool in EQN NROFF PIC TBL TROFF REFER VGRIND; do
412 eval "$tool=\${${tool}_$l:-\$$tool}"
415 *) NROFF="$NROFF -Tascii"
420 if [ -z "$MANCOLOR" ]; then
424 if [ -n "${use_width}" ]; then
425 NROFF="$NROFF -rLL=${use_width}n -rLT=${use_width}n"
428 if [ -n "$MANROFFSEQ" ]; then
431 while getopts 'egprtv' preproc_arg; do
432 case "${preproc_arg}" in
433 e) pipeline="$pipeline | $EQN" ;;
434 g) ;; # Ignore for compatibility.
435 p) pipeline="$pipeline | $PIC" ;;
436 r) pipeline="$pipeline | $REFER" ;;
437 t) pipeline="$pipeline | $TBL" ;;
438 v) pipeline="$pipeline | $VGRIND" ;;
442 # Strip the leading " | " from the resulting pipeline.
443 pipeline="${pipeline#" | "}"
448 if [ -n "$tflag" ]; then
449 pipeline="$pipeline | $TROFF"
451 pipeline="$pipeline | $NROFF | $MANPAGER"
454 if [ $debug -gt 0 ]; then
455 decho "Command: $cattool $manpage | $pipeline"
458 eval "$cattool $manpage | $pipeline"
463 # Usage: man_find_and_display page
464 # Search through the manpaths looking for the given page.
465 man_find_and_display() {
466 local found_page locpath p path sect
468 # Check to see if it's a file. But only if it has a '/' in
471 */*) if [ -f "$1" -a -r "$1" ]; then
472 decho "Found a usable page, displaying that"
475 setup_cattool $manpage
476 if man_check_for_so $manpage $(dirname $manpage); then
486 for sect in $MANSECT; do
487 decho "Searching section $sect" 2
488 for path in $MANPATH; do
489 for locpath in $locpaths; do
491 p=${p%/.} # Rid ourselves of the trailing /.
493 # Check if there is a MACHINE specific manpath.
494 if find_file $p $sect $MACHINE "$1"; then
495 if man_check_for_so $manpage $p; then
498 if [ -n "$aflag" ]; then
506 # Check if there is a MACHINE_ARCH
508 if find_file $p $sect $MACHINE_ARCH "$1"; then
509 if man_check_for_so $manpage $p; then
512 if [ -n "$aflag" ]; then
520 # Check plain old manpath.
521 if find_file $p $sect '' "$1"; then
522 if man_check_for_so $manpage $p; then
525 if [ -n "$aflag" ]; then
537 # Nothing? Well, we are done then.
538 if [ -z "$found_page" ]; then
539 echo "No manual entry for $1" >&2
545 # Usage: man_parse_args "$@"
546 # Parses commandline options for man.
551 while getopts 'M:P:S:adfhkm:op:tw' cmd_arg; do
553 M) MANPATH=$OPTARG ;;
554 P) MANPAGER=$OPTARG ;;
555 S) MANSECT=$OPTARG ;;
557 d) debug=$(( $debug + 1 )) ;;
563 p) MANROFFSEQ=$OPTARG ;;
570 shift $(( $OPTIND - 1 ))
572 # Check the args for incompatible options.
573 case "${fflag}${kflag}${tflag}${wflag}" in
574 fflagkflag*) echo "Incompatible options: -f and -k"; man_usage ;;
575 fflag*tflag*) echo "Incompatible options: -f and -t"; man_usage ;;
576 fflag*wflag) echo "Incompatible options: -f and -w"; man_usage ;;
577 *kflagtflag*) echo "Incompatible options: -k and -t"; man_usage ;;
578 *kflag*wflag) echo "Incompatible options: -k and -w"; man_usage ;;
579 *tflagwflag) echo "Incompatible options: -t and -w"; man_usage ;;
582 # Short circuit for whatis(1) and apropos(1)
583 if [ -n "$fflag" ]; then
588 if [ -n "$kflag" ]; then
594 for sect in $man_default_sections; do
595 if [ "$sect" = "$1" ]; then
596 decho "Detected manual section as first arg: $1"
608 # Setup various trivial but essential variables.
610 # Setup machine and architecture variables.
611 if [ -n "$mflag" ]; then
612 MACHINE_ARCH=${mflag%%:*}
615 if [ -z "$MACHINE_ARCH" ]; then
616 MACHINE_ARCH=$($SYSCTL -n hw.machine_arch)
618 if [ -z "$MACHINE" ]; then
619 MACHINE=$($SYSCTL -n hw.machine)
621 decho "Using architecture: $MACHINE_ARCH:$MACHINE"
625 # Setup manual sections to search.
626 if [ -z "$MANSECT" ]; then
627 MANSECT=$man_default_sections
629 decho "Using manual sections: $MANSECT"
636 # Usage: man_setup_width
644 if [ "$MANWIDTH" -gt 0 2>/dev/null ]; then
649 if { sizes=$($STTY size 0>&3 2>/dev/null); } 3>&1; then
651 if [ $2 -gt 80 ]; then
657 if [ -n "$use_width" ]; then
658 decho "Using non-standard page width: ${use_width}"
660 decho 'Using standard page width'
664 # Usage: man_setup_locale
665 # Setup necessary locale variables.
671 man_charset='US-ASCII'
673 # Setup locale information.
674 if [ -n "$oflag" ]; then
675 decho 'Using non-localized manpages'
677 # Use the locale tool to give us proper locale information
680 if [ -n "$LANG" ]; then
690 [a-z][a-z]_[A-Z][A-Z]\.*)
691 lang_cc="${locstr%.*}"
692 man_lang="${locstr%_*}"
693 man_country="${lang_cc#*_}"
694 man_charset="${locstr#*.}"
696 locpaths="$locpaths:$man_lang.$man_charset"
697 if [ "$man_lang" != "en" ]; then
698 locpaths="$locpaths:en.$man_charset"
700 locpaths="$locpaths:."
702 *) echo 'Unknown locale, assuming C' >&2
707 decho "Using locale paths: $locpaths"
710 # Usage: man_usage [exitcode]
711 # Display usage for the man utility.
714 echo ' man [-adho] [-t | -w] [-M manpath] [-P pager] [-S mansect]'
715 echo ' [-m arch[:machine]] [-p [eprtv]] [mansect] page [...]'
716 echo ' man -f page [...] -- Emulates whatis(1)'
717 echo ' man -k page [...] -- Emulates apropos(1)'
719 # When exit'ing with -h, it's not an error.
723 # Usage: parse_configs
724 # Reads the end-user adjustable config files.
728 if [ -n "$parsed_configs" ]; then
734 # Read the global config first in case the user wants
735 # to override config_local.
736 if [ -r "$config_global" ]; then
737 parse_file "$config_global"
740 # Glob the list of files to parse.
742 files=$(echo $config_local)
745 for file in $files; do
746 if [ -r "$file" ]; then
754 # Usage: parse_file file
755 # Reads the specified config files.
757 local file line tstr var
760 decho "Parsing config file: $file"
764 \#*) decho " Comment" 3
766 MANPATH*) decho " MANPATH" 3
767 trim "${line#MANPATH}"
768 add_to_manpath "$tstr"
770 MANLOCALE*) decho " MANLOCALE" 3
771 trim "${line#MANLOCALE}"
772 manlocales="$manlocales:$tstr"
774 MANCONFIG*) decho " MANCONFIG" 3
775 trim "${line#MANCONFIG}"
778 # Set variables in the form of FOO_BAR
779 *_*[\ \ ]*) var="${line%%[\ \ ]*}"
781 eval "$var=\"$tstr\""
782 decho " Parsed $var" 3
789 # Traverse $PATH looking for manpaths.
793 decho "Searching PATH for man directories"
796 for path in $PATH; do
797 if add_to_manpath "$path/man"; then
799 elif add_to_manpath "$path/MAN"; then
803 */bin) p="${path%/bin}/share/man"
813 if [ -z "$manpath" ]; then
814 decho ' Unable to find any manpaths, using default'
815 manpath=$man_default_path
819 # Usage: search_whatis cmd [arglist]
820 # Do the heavy lifting for apropos/whatis
822 local IFS bad cmd f good key keywords loc opt out path rval wlist
827 whatis_parse_args "$@"
833 if [ "$cmd" = "whatis" ]; then
840 for path in $MANPATH; do
841 if [ \! -d "$path" ]; then
842 decho "Skipping non-existent path: $path" 2
846 if [ -f "$path/$f" -a -r "$path/$f" ]; then
847 decho "Found whatis: $path/$f"
848 wlist="$wlist $path/$f"
851 for loc in $MANLOCALES; do
852 if [ -f "$path/$loc/$f" -a -r "$path/$loc/$f" ]; then
853 decho "Found whatis: $path/$loc/$f"
854 wlist="$wlist $path/$loc/$f"
860 if [ -z "$wlist" ]; then
861 echo "$cmd: no whatis databases in $MANPATH" >&2
866 for key in $keywords; do
867 out=$(grep -Ehi $opt -- "$key" $wlist)
868 if [ -n "$out" ]; then
871 bad="$bad\\n$key: nothing appropriate"
876 # Strip leading carriage return.
880 if [ -n "$good" ]; then
881 echo -e "$good" | $MANPAGER
884 if [ -n "$bad" ]; then
891 # Usage: setup_cattool page
892 # Finds an appropriate decompressor based on extension
895 *.bz) cattool='/usr/bin/bzcat' ;;
896 *.bz2) cattool='/usr/bin/bzcat' ;;
897 *.gz) cattool='/usr/bin/zcat' ;;
898 *.lzma) cattool='/usr/bin/lzcat' ;;
899 *.xz) cattool='/usr/bin/xzcat' ;;
900 *) cattool='/usr/bin/zcat -f' ;;
905 # Correctly sets $MANPAGER
908 if [ -z "$MANPAGER" ]; then
909 if [ -n "$MANCOLOR" ]; then
912 if [ -n "$PAGER" ]; then
919 decho "Using pager: $MANPAGER"
923 # Trims whitespace from beginning and end of a variable
928 [\ \ ]*) tstr="${tstr##[\ \ ]}" ;;
929 *[\ \ ]) tstr="${tstr%%[\ \ ]}" ;;
935 # Usage: whatis_parse_args "$@"
936 # Parse commandline args for whatis and apropos.
937 whatis_parse_args() {
940 while getopts 'd' cmd_arg; do
942 d) debug=$(( $debug + 1 )) ;;
947 shift $(( $OPTIND - 1 ))
952 # Usage: whatis_usage
953 # Display usage for the whatis/apropos utility.
955 echo "usage: $cmd [-d] keyword [...]"
963 [ $(stat -f %i /usr/bin/man) -ne $(stat -f %i /usr/bin/apropos) ] && \
965 search_whatis apropos "$@"
970 if [ -z "$pages" ]; then
971 echo 'What manual page do you want?' >&2
976 for page in $pages; do
977 decho "Searching for $page"
978 man_find_and_display "$page"
985 manpath_parse_args "$@"
986 if [ -z "$qflag" ]; then
989 if [ -n "$Lflag" ]; then
1000 [ $(stat -f %i /usr/bin/man) -ne $(stat -f %i /usr/bin/whatis) ] && \
1002 search_whatis whatis "$@"
1005 # User's PATH setting decides on the groff-suite to pick up.
1007 NROFF='groff -S -P-h -Wall -mtty-char -man'
1011 TROFF='groff -S -man'
1014 LOCALE=/usr/bin/locale
1019 man_default_sections='1:8:2:3:3lua:n:4:5:6:7:9:l'
1020 man_default_path='/usr/share/man:/usr/share/openssl/man:/usr/local/share/man:/usr/local/man'
1021 cattool='/usr/bin/zcat -f'
1023 config_global='/etc/man.conf'
1025 # This can be overridden via a setting in /etc/man.conf.
1026 config_local='/usr/local/etc/man.d/*.conf'
1028 # Set noglobbing for now. I don't want spurious globbing.
1032 *apropos) do_apropos "$@" ;;
1033 *manpath) do_manpath "$@" ;;
1034 *whatis) do_whatis "$@" ;;