开源软件构建与测试

We truncated the diff of some files because they were too big. If you want to see the full diff for every file, click here.

Changes of Revision 2

_service:tar_scm:less.spec Changed

_service:tar_scm:backport-End-OSC8-hyperlink-on-invalid-embedded-escape-sequen.patch Deleted

_service:tar_scm:less-475-fsync.patch Changed

@@ -1,7 +1,15 @@
-diff -ur less-418.orig/configure.ac less-418/configure.ac
---- less-418.orig/configure.ac	2008-12-22 07:10:44.000000000 -0500
-+++ less-418/configure.ac	2008-12-22 07:28:58.000000000 -0500
-@@ -203,6 +203,8 @@
+From 5396b6b77d0248678f716038dc747d6898acb0b3 Mon Sep 17 00:00:00 2001
+From: Stephen Gallagher <sgallagh@redhat.com>
+Date: Fri, 22 Jan 2021 09:49:13 -0500
+Subject: PATCH Test for fsync on tty
+
+Signed-off-by: Stephen Gallagher <sgallagh@redhat.com>
+
+Modified for less 581.2 Filip Januš <fjanus@redhat.com>
+diff -ur less-581.2/configure.ac less_fsync/configure.ac
+--- less-581.2/configure.ac	2021-04-28 17:00:08.000000000 +0200
++++ less_fsync/configure.ac	2021-05-06 10:59:07.560062397 +0200
+@@ -221,6 +221,8 @@
  	Define HAVE_TIME_T if your system supports the "time_t" type.)
  AH_TEMPLATE(HAVE_STRERROR,
  	Define HAVE_STRERROR if you have the strerror() function.)
@@ -10,18 +18,18 @@
  AH_TEMPLATE(HAVE_FILENO,
  	Define HAVE_FILENO if you have the fileno() macro.)
  AH_TEMPLATE(HAVE_ERRNO,
-@@ -251,7 +253,7 @@
+@@ -274,7 +276,7 @@
+ AC_COMPILE_IFELSE(AC_LANG_PROGRAM(, int f(int a) { return a; }),AC_MSG_RESULT(yes); AC_DEFINE(HAVE_ANSI_PROTOS),AC_MSG_RESULT(no))
  
  # Checks for library functions.
- AC_TYPE_SIGNAL
--AC_CHECK_FUNCS(fchmod fsync nanosleep poll popen realpath _setjmp sigprocmask sigsetmask snprintf stat system ttyname usleep)
-+AC_CHECK_FUNCS(popen _setjmp sigprocmask sigsetmask snprintf stat system fchmod realpath)
+-AC_CHECK_FUNCS(fchmod fsync nanosleep poll popen realpath _setjmp sigprocmask sigsetmask snprintf stat strsignal system ttyname usleep)
++AC_CHECK_FUNCS(fchmod nanosleep poll popen realpath _setjmp sigprocmask sigsetmask snprintf stat strsignal system ttyname usleep)
  
  # AC_CHECK_FUNCS may not work for inline functions, so test these separately.
  AC_MSG_CHECKING(for memcpy)
-@@ -298,6 +300,16 @@
- #endif, static char *x; x = strerror(0);,
-   AC_MSG_RESULT(yes); AC_DEFINE(HAVE_STRERROR), AC_MSG_RESULT(no))
+@@ -321,6 +323,16 @@
+ #include <errno.h>
+ #endif, static char *x; x = strerror(0);),AC_MSG_RESULT(yes); AC_DEFINE(HAVE_STRERROR),AC_MSG_RESULT(no))
  
 +AC_MSG_CHECKING(for fsync)
 +AC_TRY_RUN(
@@ -34,5 +42,5 @@
 +}, AC_MSG_RESULT(yes); AC_DEFINE(HAVE_FSYNC), AC_MSG_RESULT(no))
 +
  AC_MSG_CHECKING(for sys_errlist)
- AC_TRY_LINK(, extern char *sys_errlist; static char **x; x = sys_errlist;, 
-   AC_MSG_RESULT(yes); AC_DEFINE(HAVE_SYS_ERRLIST), AC_MSG_RESULT(no))
+ AC_LINK_IFELSE(AC_LANG_PROGRAM(, extern char *sys_errlist; static char **x; x = sys_errlist;),AC_MSG_RESULT(yes); AC_DEFINE(HAVE_SYS_ERRLIST),AC_MSG_RESULT(no))
+

_service:tar_scm:less-608.tar.gz Deleted

_service:tar_scm:less-633.tar.gz/COPYING Added

@@ -0,0 +1,674 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <https://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;

_service:tar_scm:less-633.tar.gz/INSTALL Added

@@ -0,0 +1,186 @@
+This file contains generic instructions on how to build and
+install software using autoconf. For specific instructions
+on how to build "less", see the README or README.VER file.
+
+
+Basic Installation
+==================
+
+   These are generic installation instructions.
+
+   The `configure' shell script attempts to guess correct values for
+various system-dependent variables used during compilation.  It uses
+those values to create a `Makefile' in each directory of the package.
+It may also create one or more `.h' files containing system-dependent
+definitions.  Finally, it creates a shell script `config.status' that
+you can run in the future to recreate the current configuration, a file
+`config.cache' that saves the results of its tests to speed up
+reconfiguring, and a file `config.log' containing compiler output
+(useful mainly for debugging `configure').
+
+   If you need to do unusual things to compile the package, please try
+to figure out how `configure' could check whether to do them, and mail
+diffs or instructions to the address given in the `README' so they can
+be considered for the next release.  If at some point `config.cache'
+contains results you don't want to keep, you may remove or edit it.
+
+   The file `configure.ac' is used to create `configure' by a program
+called `autoconf'.  You only need `configure.ac' if you want to change
+it or regenerate `configure' using a newer version of `autoconf'.
+
+The simplest way to compile this package is:
+
+  1. `cd' to the directory containing the package's source code and type
+     `./configure' to configure the package for your system.  If you're
+     using `csh' on an old version of System V, you might need to type
+     `sh ./configure' instead to prevent `csh' from trying to execute
+     `configure' itself.
+
+     Running `configure' takes awhile.  While running, it prints some
+     messages telling which features it is checking for.
+
+  2. Type `make' to compile the package.
+
+  3. Optionally, type `make check' to run any self-tests that come with
+     the package.
+
+  4. Type `make install' to install the programs and any data files and
+     documentation.
+
+  5. You can remove the program binaries and object files from the
+     source code directory by typing `make clean'.  To also remove the
+     files that `configure' created (so you can compile the package for
+     a different kind of computer), type `make distclean'.  There is
+     also a `make maintainer-clean' target, but that is intended mainly
+     for the package's developers.  If you use it, you may have to get
+     all sorts of other programs in order to regenerate files that came
+     with the distribution.
+
+Compilers and Options
+=====================
+
+   Some systems require unusual options for compilation or linking that
+the `configure' script does not know about.  You can give `configure'
+initial values for variables by setting them in the environment.  Using
+a Bourne-compatible shell, you can do that on the command line like
+this:
+     CC=c89 CFLAGS=-O2 LIBS=-lposix ./configure
+
+Or on systems that have the `env' program, you can do it like this:
+     env CPPFLAGS=-I/usr/local/include LDFLAGS=-s ./configure
+
+Compiling For Multiple Architectures
+====================================
+
+   You can compile the package for more than one kind of computer at the
+same time, by placing the object files for each architecture in their
+own directory.  To do this, you must use a version of `make' that
+supports the `VPATH' variable, such as GNU `make'.  `cd' to the
+directory where you want the object files and executables to go and run
+the `configure' script.  `configure' automatically checks for the
+source code in the directory that `configure' is in and in `..'.
+
+   If you have to use a `make' that does not supports the `VPATH'
+variable, you have to compile the package for one architecture at a time
+in the source code directory.  After you have installed the package for
+one architecture, use `make distclean' before reconfiguring for another
+architecture.
+
+Installation Names
+==================
+
+   By default, `make install' will install the package's files in
+`/usr/local/bin', `/usr/local/man', etc.  You can specify an
+installation prefix other than `/usr/local' by giving `configure' the
+option `--prefix=PATH'.
+
+   You can specify separate installation prefixes for
+architecture-specific files and architecture-independent files.  If you
+give `configure' the option `--exec-prefix=PATH', the package will use
+PATH as the prefix for installing programs and libraries.
+Documentation and other data files will still use the regular prefix.
+
+   In addition, if you use an unusual directory layout you can give
+options like `--bindir=PATH' to specify different values for particular
+kinds of files.  Run `configure --help' for a list of the directories
+you can set and what kinds of files go in them.
+
+   If the package supports it, you can cause programs to be installed
+with an extra prefix or suffix on their names by giving `configure' the
+option `--program-prefix=PREFIX' or `--program-suffix=SUFFIX'.
+
+Optional Features
+=================
+
+   Some packages pay attention to `--enable-FEATURE' options to
+`configure', where FEATURE indicates an optional part of the package.
+They may also pay attention to `--with-PACKAGE' options, where PACKAGE
+is something like `gnu-as' or `x' (for the X Window System).  The
+`README' should mention any `--enable-' and `--with-' options that the
+package recognizes.
+
+   For packages that use the X Window System, `configure' can usually
+find the X include and library files automatically, but if it doesn't,
+you can use the `configure' options `--x-includes=DIR' and
+`--x-libraries=DIR' to specify their locations.
+
+Specifying the System Type
+==========================
+
+   There may be some features `configure' can not figure out
+automatically, but needs to determine by the type of host the package
+will run on.  Usually `configure' can figure that out, but if it prints
+a message saying it can not guess the host type, give it the
+`--host=TYPE' option.  TYPE can either be a short name for the system
+type, such as `sun4', or a canonical name with three fields:
+     CPU-COMPANY-SYSTEM
+
+See the file `config.sub' for the possible values of each field.  If
+`config.sub' isn't included in this package, then this package doesn't
+need to know the host type.
+
+   If you are building compiler tools for cross-compiling, you can also
+use the `--target=TYPE' option to select the type of system they will
+produce code for and the `--build=TYPE' option to select the type of
+system on which you are compiling the package.
+
+Sharing Defaults
+================
+
+   If you want to set default values for `configure' scripts to share,
+you can create a site shell script called `config.site' that gives
+default values for variables like `CC', `cache_file', and `prefix'.
+`configure' looks for `PREFIX/share/config.site' if it exists, then
+`PREFIX/etc/config.site' if it exists.  Or, you can set the
+`CONFIG_SITE' environment variable to the location of the site script.
+A warning: not all `configure' scripts look for a site script.
+
+Operation Controls
+==================
+
+   `configure' recognizes the following options to control how it
+operates.
+
+`--cache-file=FILE'
+     Use and save the results of the tests in FILE instead of
+     `./config.cache'.  Set FILE to `/dev/null' to disable caching, for
+     debugging `configure'.
+
+`--help'
+     Print a summary of the options to `configure', and exit.
+
+`--quiet'
+`--silent'
+`-q'
+     Do not print messages saying which checks are being made.
+
+`--srcdir=DIR'
+     Look for the package's source code in directory DIR.  Usually
+     `configure' can determine that directory automatically.
+
+`--version'
+     Print the version of Autoconf used to generate the `configure'
+     script, and exit.
+
+`configure' also accepts some other, not widely useful, options.
+

_service:tar_scm:less-633.tar.gz/LICENSE Added

@@ -0,0 +1,27 @@
+                          Less License
+                          ------------
+
+Less
+Copyright (C) 1984-2023  Mark Nudelman
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions
+are met:
+1. Redistributions of source code must retain the above copyright
+   notice, this list of conditions and the following disclaimer.
+2. Redistributions in binary form must reproduce the above copyright
+   notice in the documentation and/or other materials provided with 
+   the distribution.
+
+THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY
+EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 
+PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE
+FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 
+CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT 
+OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 
+BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 
+WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE 
+OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN 
+IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+

_service:tar_scm:less-633.tar.gz/Makefile.aut Added

@@ -0,0 +1,165 @@
+# Makefile for authoring less.
+
+EMAIL = bug-less@gnu.org
+HOMEPAGE = https://greenwoodsoftware.com/less
+SHELL = /bin/sh
+GIT = git
+NROFF = nroff -t -man
+
+srcdir = .
+REL := $(shell sed -e '/char version/!d' -e 's/^0-9.*$0-9.*$.*/\1/' -e q ${srcdir}/version.c)
+
+ifeq ($(USE_PYTHON),1)
+	MKHELP = mkhelp.py
+else
+	MKHELP = mkhelp.pl
+endif
+
+SRC = \
+	main.c screen.c brac.c ch.c charset.c cmdbuf.c \
+	command.c cvt.c decode.c edit.c filename.c forwback.c \
+	help.c ifile.c input.c jump.c line.c linenum.c \
+	lsystem.c mark.c optfunc.c option.c opttbl.c os.c \
+	output.c pattern.c position.c prompt.c search.c signal.c \
+	tags.c ttyin.c version.c xbuf.c
+DISTFILES_W = \
+	defines.ds  Makefile.dsb Makefile.dsg Makefile.dsu \
+	defines.o2  Makefile.o2e \
+	defines.o9  Makefile.o9c Makefile.o9u \
+	defines.wn  Makefile.wnm Makefile.wnb Makefile.wng \
+	configure 
+UNICODE_FILES = \
+	compose.uni fmt.uni ubin.uni wide.uni
+DISTFILES = \
+	${SRC} regexp.c regexp.h \
+	COPYING INSTALL LICENSE Makefile.in Makefile.aut NEWS README \
+	configure.ac lesskey.c lesskey_parse.c lessecho.c scrsize.c \
+	charset.h cmd.h funcs.h lglob.h less.h lesskey.h option.h \
+	pckeys.h pattern.h position.h xbuf.h \
+	install.sh defines.h.in mkinstalldirs \
+	less.nro less.man lesskey.nro lesskey.man lessecho.nro lessecho.man \
+	less.hlp \
+	mkhelp.pl \
+	mkhelp.py \
+	mkutable $(UNICODE_FILES) \
+	${DISTFILES_W}
+
+all: help.c funcs.h $(UNICODE_FILES) ${srcdir}/configure 
+
+release: .FORCE
+	@if ${srcdir}/ready_to_release -d ${srcdir}; then :; else exit 1; fi
+	${MAKE} -f Makefile.aut tagall 
+	${MAKE} -f Makefile.aut all 
+	${MAKE} -f Makefile.aut clean 
+	${MAKE} -f Makefile.aut dist
+
+.FORCE:
+
+help.c: less.hlp 
+	-mv -f ${srcdir}/help.c ${srcdir}/help.c.old
+	rm -rf help.c
+	${srcdir}/${MKHELP} < less.hlp > help.c
+	if cmp -s help.c help.c.old; then mv -f help.c.old help.c; fi
+
+${srcdir}/configure ${srcdir}/defines.h.in: ${srcdir}/configure.ac ${srcdir}/Makefile.in
+	cd ${srcdir}; autoheader; autoconf
+
+funcs.h: ${SRC:%=${srcdir}/%}
+	-mv -f ${srcdir}/funcs.h ${srcdir}/funcs.h.old
+	grep -h '^public ^;*$$' ${SRC:%=${srcdir}/%} | sed 's/$$/;/' >${srcdir}/funcs.h
+
+lint:
+	lint -I. ${CPPFLAGS} ${SRC}
+
+clean: 
+	rm -f Makefile config.status config.log config.cache defines.h stamp-h \
+		configure defines.h.in funcs.h help.c \
+		less.nro less.man lesskey.nro lesskey.man lessecho.nro lessecho.man 
+
+distclean: clean
+realclean: clean
+
+REPLACE_VERSION = \
+	DT=`date '+%d %h %Y'`; \
+	echo "Stuffing version number ${REL} into $@"; \
+	rm -f $@; \
+	sed \
+		-e "s;@@VERSION@@;${REL};" \
+		-e "s;@@DATE@@;$$DT;" >$@
+
+${srcdir}/less.nro: ${srcdir}/less.nro.VER ${srcdir}/version.c
+	${REPLACE_VERSION} ${srcdir}/less.nro.VER
+${srcdir}/lesskey.nro: ${srcdir}/lesskey.nro.VER ${srcdir}/version.c
+	${REPLACE_VERSION} ${srcdir}/lesskey.nro.VER
+${srcdir}/lessecho.nro: ${srcdir}/lessecho.nro.VER ${srcdir}/version.c
+	${REPLACE_VERSION} ${srcdir}/lessecho.nro.VER
+
+${srcdir}/less.man: ${srcdir}/less.nro
+	${NROFF} ${srcdir}/less.nro >${srcdir}/less.man
+${srcdir}/lesskey.man: ${srcdir}/lesskey.nro
+	${NROFF} ${srcdir}/lesskey.nro >${srcdir}/lesskey.man
+${srcdir}/lessecho.man: ${srcdir}/lessecho.nro
+	${NROFF} ${srcdir}/lessecho.nro >${srcdir}/lessecho.man
+
+compose.uni: unicode/UnicodeData.txt
+	./mkutable -f2 Mn Me -- unicode/UnicodeData.txt > $@
+fmt.uni: unicode/UnicodeData.txt
+	./mkutable -f2 Cf -- unicode/UnicodeData.txt > $@
+ubin.uni: unicode/UnicodeData.txt
+	./mkutable -f2 Cc Cs Co Zl Zp -- unicode/UnicodeData.txt > $@
+wide.uni: unicode/EastAsianWidth.txt
+	./mkutable -f1 W F -- unicode/EastAsianWidth.txt > $@
+
+unicode-check:
+	rm -rf unicode-old
+	mv -f unicode unicode-old
+	${MAKE} -f Makefile.aut unicode/UnicodeData.txt unicode/EastAsianWidth.txt
+	@if diff -q unicode-old unicode >/dev/null; then rm -rf unicode; mv -f unicode-old unicode; echo "unicode files already up to date"; else echo "unicode files updated"; fi
+
+unicode/UnicodeData.txt:
+	mkdir -p unicode
+	lftp -c 'open -u "anonymous:${EMAIL}" ftp.unicode.org ; get Public/UNIDATA/UnicodeData.txt -o $@'
+	touch $@
+unicode/EastAsianWidth.txt:
+	mkdir -p unicode
+	lftp -c 'open -u "anonymous:${EMAIL}" ftp.unicode.org ; get Public/UNIDATA/EastAsianWidth.txt -o $@'
+	touch $@
+
+distfiles: ${DISTFILES}
+
+echo_distfiles: 
+	@echo $(subst .nro,.nro.VER,${DISTFILES})
+
+dist: ${DISTFILES}
+	if  ! -d ${srcdir}/release ; then mkdir ${srcdir}/release; fi
+	@LESSREL=less-${REL} && RELDIR=release/$$LESSREL && \
+	TARF=$$LESSREL-beta.tar.gz && ZIPF=$$LESSREL-beta.zip && \
+	cd ${srcdir} && \
+	rm -rf $$RELDIR && mkdir $$RELDIR && \
+	echo "Preparing $$LESSREL" && \
+	rm -rf $$LESSREL && mkdir $$LESSREL && \
+	cp ${DISTFILES} $$LESSREL && \
+	cd $$LESSREL && chmod -w * && chmod +w ${DISTFILES_W} && chmod +x configure && cd .. && \
+	echo "Creating $$RELDIR/$$TARF" && \
+	tar -cf - $$LESSREL | gzip -c >$$RELDIR/$$TARF && \
+	echo "Signing $$RELDIR/$$TARF" && \
+	gpg --detach-sign $$RELDIR/$$TARF && \
+	mv $$RELDIR/$$TARF.sig $$RELDIR/$$LESSREL.sig && \
+	echo "Creating $$RELDIR/$$ZIPF" && \
+	zip -rq $$RELDIR/$$ZIPF $$LESSREL && \
+	rm -rf $$LESSREL
+
+tagall:
+	echo "tagging v${REL}"; \
+	$(GIT) tag -a -f -m "v${REL}" "v${REL}"
+
+gnu_upload:
+	@if  -z "${REL}" ; then echo "Please set REL=nnn"; exit 1; fi; \
+	LESSREL=less-${REL} && RELDIR=release/$$LESSREL && \
+    TARF=$$LESSREL.tar.gz && \
+	if  ! -s $$RELDIR/$$TARF ; then echo "$$RELDIR/$$TARF does not exist"; exit 1; fi; \
+	cd $$RELDIR && \
+	gpg -b $$TARF && \
+	( echo "version: 1.2"; echo "directory: less"; echo "filename: $$TARF" ) > $$TARF.directive && \
+	gpg --clearsign $$TARF.directive && \
+	echo "upload ready: cd $$RELDIR; ftp ftp-upload.gnu.org; cd /incoming/ftp; put $$TARF $$TARF.sig $$TARF.directive.asc"

_service:tar_scm:less-633.tar.gz/Makefile.dsb Added

@@ -0,0 +1,51 @@
+# Makefile for less.
+# MS-DOS version (Borland C/C++ 4.02)
+
+#### Start of system configuration section. ####
+
+CC = bcc
+LIBDIR = \bc\lib
+
+CFLAGS = -A- -mm -O2 -w- -1- -2- -a -d -Z
+LDFLAGS = -mm
+LIBS =
+EXT = .EXE
+
+#### End of system configuration section. ####
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.obj:
+	$(CC) -c -I. $(CPPFLAGS) $(CFLAGS) $<
+
+OBJ = \
+	main.obj screen.obj brac.obj ch.obj charset.obj cmdbuf.obj \
+	command.obj cvt.obj decode.obj edit.obj filename.obj forwback.obj \
+	help.obj ifile.obj input.obj jump.obj lesskey_parse.obj line.obj linenum.obj \
+	lsystem.obj mark.obj optfunc.obj option.obj opttbl.obj os.obj \
+	output.obj pattern.obj position.obj prompt.obj search.obj signal.obj \
+	tags.obj ttyin.obj version.obj xbuf.obj
+
+all: less$(EXT) lesskey$(EXT)
+
+# This is really horrible, but the command line is too long for 
+# MS-DOS if we try to link $(OBJ).
+less$(EXT): $(OBJ)
+	ren lesskey.obj lesskey.obo
+	$(CC) $(LDFLAGS) -e$@ *.obj $(LIBS)
+	ren lesskey.obo lesskey.obj
+
+lesskey$(EXT): lesskey.obj lesskey_parse.obj version.obj xbuf.obj
+	$(CC) $(LDFLAGS) -e$@ lesskey.obj lesskey_parse.obj version.obj xbuf.obj $(LIBS)
+
+defines.h: defines.ds
+	-del defines.h
+	-copy defines.ds defines.h
+
+$(OBJ): less.h defines.h
+
+clean:
+	-del *.obj 
+	-del less.exe
+	-del lesskey.exe
+

_service:tar_scm:less-633.tar.gz/Makefile.dsg Added

@@ -0,0 +1,88 @@
+# Makefile for less under DJGPP v2.0 or later.
+
+#### Start of system configuration section. ####
+
+srcdir = .
+VPATH = .
+
+CC = gcc
+INSTALL = ginstall -c
+INSTALL_PROGRAM = ginstall
+INSTALL_DATA = ginstall -m 644
+AWK = gawk
+
+CFLAGS = -O2 -g
+CFLAGS_COMPILE_ONLY = -c
+#LDFLAGS = -s
+LDFLAGS = -g
+O=o
+
+LIBS =
+prefix = /dev/env/DJDIR
+exec_prefix = ${prefix}
+
+bindir = ${exec_prefix}/bin
+sysconfdir = ${prefix}/etc
+mandir = ${prefix}/man
+manext = 1
+
+#### End of system configuration section. ####
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.o:
+	${CC} -I. ${CFLAGS_COMPILE_ONLY} -DBINDIR=\"${bindir}\" -DSYSDIR=\"${sysconfdir}\" ${CPPFLAGS} ${CFLAGS} $<
+
+OBJ = \
+	main.${O} screen.${O} brac.${O} ch.${O} charset.${O} cmdbuf.${O} \
+	command.${O} cvt.${O} decode.${O} edit.${O} filename.${O} forwback.${O} \
+	help.${O} ifile.${O} input.${O} jump.${O} lesskey_parse.${O} line.${O} linenum.${O} \
+	lsystem.${O} mark.${O} optfunc.${O} option.${O} opttbl.${O} os.${O} \
+	output.${O} pattern.${O} position.${O} prompt.${O} search.${O} signal.${O} \
+	tags.${O} ttyin.${O} version.${O} xbuf.${O}
+
+all: less lesskey lessecho
+
+less: ${OBJ}
+	${CC} ${LDFLAGS} -o $@ ${OBJ} ${LIBS}
+
+lesskey: lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O}
+	${CC} ${LDFLAGS} -o $@ lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O}
+
+lessecho: lessecho.${O} version.${O}
+	${CC} ${LDFLAGS} -o $@ lessecho.${O} version.${O}
+
+defines.h: defines.ds
+	command.com /c copy $< $@
+
+${OBJ}: ${srcdir}/less.h defines.h ${srcdir}/funcs.h
+
+install: all ${srcdir}/less.man ${srcdir}/lesskey.man
+	${INSTALL_PROGRAM} less.exe ${bindir}/less.exe
+	${INSTALL_PROGRAM} lesskey.exe ${bindir}/lesskey.exe
+	${INSTALL_PROGRAM} lessecho.exe ${bindir}/lessecho.exe
+	${INSTALL_DATA} ${srcdir}/less.man ${mandir}/man${manext}/less.${manext}
+	${INSTALL_DATA} ${srcdir}/lesskey.man ${mandir}/man${manext}/lesskey.${manext}
+
+info:
+install-info:
+dvi:
+check:
+installcheck:
+
+TAGS:
+	etags *.c *.h
+
+clean:
+	command.com /c for %f in (*.${O} less lesskey lessecho *.exe) do if exist %f del %f
+
+mostlyclean: clean
+
+distclean: clean
+	command.com /c if not exist Makefile.dsg ren Makefile Makefile.dsg
+	command.com /c if not exist defines.ds ren defines.h defines.ds
+	command.com /c for %f in (Makefile defines.h) do if exist %f del %f
+
+realclean: distclean
+	command.com /c if exist TAGS del TAGS
+

_service:tar_scm:less-633.tar.gz/Makefile.dsu Added

@@ -0,0 +1,59 @@
+# Makefile for less.
+# MS-DOS version
+
+#### Start of system configuration section. ####
+
+CC = cl
+# Change the following directories to match your installation.
+LIBDIR = c:\msvc\lib
+INCDIR = c:\msvc\include
+
+# CFLAGS are compile-time options and LDFLAGS are link-time options. They are
+# customized for MSVC 1.0 (MSC 8.0). If you have a different version of the
+# compiler, you may need to change some of the options to their equivalents.
+# -Ot     optimize for speed
+# -AL     large memory model
+# -Za     ANSI C conformance
+# -nologo suppress MSVC banners
+# -onerror:noexe   no .EXE file if link errors occur
+CFLAGS = -Ot -AL -Za -nologo
+LDFLAGS = -onerror:noexe -nologo
+LIBS = $(LIBDIR)\llibce.lib $(LIBDIR)\graphics.lib
+
+#### End of system configuration section. ####
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.obj:
+	$(CC) -c -I. -I$(INCDIR) $(CPPFLAGS) $(CFLAGS) $<
+
+OBJ = \
+	main.obj screen.obj brac.obj ch.obj charset.obj cmdbuf.obj \
+	command.obj cvt.obj decode.obj edit.obj filename.obj forwback.obj \
+	help.obj ifile.obj input.obj jump.obj lesskey_parse.obj line.obj linenum.obj \
+	lsystem.obj mark.obj optfunc.obj option.obj opttbl.obj os.obj \
+	output.obj pattern.obj position.obj prompt.obj search.obj signal.obj \
+	tags.obj  ttyin.obj version.obj xbuf.obj
+
+all: less lesskey
+
+# This is really horrible, but the command line is too long for 
+# MS-DOS if we try to link $(OBJ).
+less: $(OBJ)
+	-if exist lesskey.obj del lesskey.obj
+	$(CC) $(LDFLAGS) -o $@ *.obj $(LIBS)
+
+lesskey: lesskey.obj lesskey_parse.obj version.obj xbuf.obj
+	$(CC) $(LDFLAGS) -o $@ lesskey.obj lesskey_parse.obj version.obj xbuf.obj $(LIBS)
+
+defines.h: defines.ds
+	-del defines.h
+	-copy defines.ds defines.h
+
+$(OBJ): less.h defines.h
+
+clean:
+	-del *.obj 
+	-del less.exe
+	-del lesskey.exe
+

_service:tar_scm:less-633.tar.gz/Makefile.in Added

@@ -0,0 +1,134 @@
+# Makefile for less.
+
+#### Start of system configuration section. ####
+
+srcdir = @srcdir@
+VPATH = @srcdir@
+
+CC = @CC@
+INSTALL = @INSTALL@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_DATA = @INSTALL_DATA@
+
+CFLAGS = @CFLAGS@
+CFLAGS_COMPILE_ONLY = -c
+LDFLAGS = @LDFLAGS@
+CPPFLAGS = @CPPFLAGS@
+EXEEXT = @EXEEXT@
+O=o
+ifneq ($(strip $(LESSTEST)),)
+CPPFLAGS += -DLESSTEST
+endif
+
+LIBS = @LIBS@
+
+prefix = @prefix@
+exec_prefix = @exec_prefix@
+
+# Where the installed binary goes.
+bindir = @bindir@
+binprefix = 
+
+sysconfdir = @sysconfdir@
+datarootdir = @datarootdir@
+
+mandir = @mandir@
+manext = 1
+manprefix = 
+DESTDIR =
+
+#### End of system configuration section. ####
+
+SHELL = /bin/sh
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.o:
+	${CC} -I. ${CFLAGS_COMPILE_ONLY} -DBINDIR=\"${bindir}\" -DSYSDIR=\"${sysconfdir}\" ${CPPFLAGS} ${CFLAGS} $<
+
+OBJ = \
+	main.${O} screen.${O} brac.${O} ch.${O} charset.${O} cmdbuf.${O} \
+	command.${O} cvt.${O} decode.${O} edit.${O} filename.${O} forwback.${O} \
+	help.${O} ifile.${O} input.${O} jump.${O} \
+	line.${O} linenum.${O} \
+	lsystem.${O} mark.${O} optfunc.${O} option.${O} opttbl.${O} os.${O} \
+	output.${O} pattern.${O} position.${O} prompt.${O} search.${O} signal.${O} \
+	tags.${O} ttyin.${O} version.${O} xbuf.${O}  @REGEX_O@
+
+ifneq (@SECURE_COMPILE@,1)
+OBJ += lesskey_parse.${O}
+endif
+
+all: less$(EXEEXT) lesskey$(EXEEXT) lessecho$(EXEEXT)
+
+less$(EXEEXT): ${OBJ}
+	${CC} ${LDFLAGS} -o $@ ${OBJ} ${LIBS}
+
+lesskey$(EXEEXT): lesskey.${O} lesskey_parse.${O} xbuf.${O} version.${O}
+	${CC} ${LDFLAGS} -o $@ lesskey.${O} lesskey_parse.${O} xbuf.${O} version.${O}
+
+lessecho$(EXEEXT): lessecho.${O} version.${O}
+	${CC} ${LDFLAGS} -o $@ lessecho.${O} version.${O}
+
+charset.${O}: compose.uni ubin.uni wide.uni
+
+${OBJ}: ${srcdir}/less.h ${srcdir}/funcs.h defines.h 
+
+install: all ${srcdir}/less.nro ${srcdir}/lesskey.nro ${srcdir}/lessecho.nro installdirs
+	${INSTALL_PROGRAM} less$(EXEEXT) ${DESTDIR}${bindir}/${binprefix}less$(EXEEXT)
+	${INSTALL_PROGRAM} lesskey$(EXEEXT) ${DESTDIR}${bindir}/${binprefix}lesskey$(EXEEXT)
+	${INSTALL_PROGRAM} lessecho$(EXEEXT) ${DESTDIR}${bindir}/${binprefix}lessecho$(EXEEXT)
+	${INSTALL_DATA} ${srcdir}/less.nro ${DESTDIR}${mandir}/man${manext}/${manprefix}less.${manext}
+	${INSTALL_DATA} ${srcdir}/lesskey.nro ${DESTDIR}${mandir}/man${manext}/${manprefix}lesskey.${manext}
+	${INSTALL_DATA} ${srcdir}/lessecho.nro ${DESTDIR}${mandir}/man${manext}/${manprefix}lessecho.${manext}
+
+install-strip:
+	${MAKE} INSTALL_PROGRAM='${INSTALL_PROGRAM} -s' install
+
+installdirs: mkinstalldirs
+	${srcdir}/mkinstalldirs ${DESTDIR}${bindir} ${DESTDIR}${mandir}/man${manext}
+
+uninstall:
+	rm -f ${DESTDIR}${bindir}/${binprefix}less$(EXEEXT)
+	rm -f ${DESTDIR}${bindir}/${binprefix}lesskey$(EXEEXT)
+	rm -f ${DESTDIR}${bindir}/${binprefix}lessecho$(EXEEXT)
+	rm -f ${DESTDIR}${mandir}/man${manext}/${manprefix}less.${manext}
+	rm -f ${DESTDIR}${mandir}/man${manext}/${manprefix}lesskey.${manext}
+	rm -f ${DESTDIR}${mandir}/man${manext}/${manprefix}lessecho.${manext}
+
+info:
+install-info:
+dvi:
+installcheck:
+
+check:
+	if  -x less$(EXEEXT)  && ./less$(EXEEXT) -V | grep -q LESSTEST; then :; else ${MAKE} clean; ${MAKE} LESSTEST=1; fi
+	objdir=$$(pwd); rflags=""; if  -z "${VERBOSE}" ; then rflags=-e; fi; cd $(srcdir)/lesstest && ${MAKE} && ./runtest $$rflags -l "$$objdir/less" lt
+
+TAGS:
+	cd ${srcdir} && etags *.c *.h
+
+# config.status might not change defines.h
+# Don't rerun config.status if we just configured (so there's no stamp-h).
+defines.h: stamp-h
+stamp-h: defines.h.in config.status
+	test ! -f stamp-h || CONFIG_FILES= CONFIG_HEADERS=defines.h ./config.status
+	touch stamp-h
+Makefile: ${srcdir}/Makefile.in config.status
+	CONFIG_FILES=Makefile CONFIG_HEADERS= ./config.status
+config.status: ${srcdir}/configure
+	./config.status --recheck
+
+${srcdir}/configure: ${srcdir}/configure.ac
+	cd ${srcdir}; autoheader; autoconf
+
+clean:
+	rm -f *.${O} core less$(EXEEXT) lesskey$(EXEEXT) lessecho$(EXEEXT)
+
+mostlyclean: clean
+
+distclean: clean
+	rm -f Makefile config.status config.log config.cache defines.h stamp-h
+
+realclean: distclean
+	rm -f TAGS

_service:tar_scm:less-633.tar.gz/Makefile.o2e Added

@@ -0,0 +1,43 @@
+# Makefile for less.
+# OS/2 version, for emx+gcc compiler
+
+#### Start of system configuration section. ####
+
+CC = gcc -Zomf
+CFLAGS = -I. -O2 -Wall
+LDFLAGS = -s -Zcrtdll
+LIBS = -ltermcap
+O = obj
+
+#### End of system configuration section. ####
+
+.SUFFIXES: .c .${O}
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.${O}:
+	${CC} -c ${CPPFLAGS} ${CFLAGS} $<
+
+OBJ = \
+	main.${O} screen.${O} brac.${O} ch.${O} charset.${O} cmdbuf.${O} \
+	command.${O} cvt.${O} decode.${O} edit.${O} filename.${O} forwback.${O} \
+	help.${O} ifile.${O} input.${O} jump.${O} lesskey_parse.${O} line.${O} linenum.${O} \
+	lsystem.${O} mark.${O} optfunc.${O} option.${O} opttbl.${O} os.${O} \
+	output.${O} pattern.${O} position.${O} prompt.${O} search.${O} signal.${O} \
+	tags.${O} ttyin.${O} version.${O} xbuf.${O}  regexp.${O}
+
+all:    less.exe lesskey.exe scrsize.exe
+
+less.exe: ${OBJ}
+	${CC} ${OBJ} -o $@ ${LDFLAGS} ${LIBS}
+
+lesskey.exe: lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O}
+	${CC} lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O} -o $@ ${LDFLAGS}
+
+scrsize.exe: scrsize.c
+	${CC} ${CFLAGS} -D__ST_MT_ERRNO__ -s -Zmtd -lX11 $<
+
+${OBJ}: defines.h less.h
+
+defines.h: defines.o2
+	copy defines.o2 defines.h

_service:tar_scm:less-633.tar.gz/Makefile.o9c Added

@@ -0,0 +1,47 @@
+# Makefile for less.
+# OS-9 version for Microware C 3.2.
+
+#### Start of system configuration section. ####
+
+CC = cc
+CPPFLAGS = -D_OSK_MWC32 -DDEBUG=0 -DSTRCSPN
+CFLAGS = -k=0 -v=.
+CFLAGS_COMPILE_ONLY = -r 
+LDFLAGS = -igm=8
+LIBS = -l=/dd/lib/termlib.l
+O = r
+
+
+#### End of system configuration section. ####
+
+.SUFFIXES: .c .${O}
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+
+.c.${O}:
+	${CC} ${CFLAGS_COMPILE_ONLY} ${CPPFLAGS} ${CFLAGS} $<
+
+OBJ = \
+	main.${O} screen.${O} brac.${O} ch.${O} charset.${O} cmdbuf.${O} \
+	command.${O} cvt.${O} decode.${O} edit.${O} filename.${O} forwback.${O} \
+	help.${O} ifile.${O} input.${O} jump.${O} lesskey_parse.${O} line.${O} linenum.${O} \
+	lsystem.${O} mark.${O} optfunc.${O} option.${O} opttbl.${O} os.${O} \
+	output.${O} pattern.${O} position.${O} prompt.${O} search.${O} signal.${O} \
+	tags.${O} ttyin.${O} version.${O} xbuf.${O}  regexp.${O}
+
+all: less lessecho lesskey
+
+less: ${OBJ}
+	${CC} ${OBJ} -f=$@ ${LDFLAGS} ${LIBS}
+
+lesskey: lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O}
+	${CC} lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O} -f=$@ ${LDFLAGS}
+
+lessecho: lessecho.${O} version.${O}
+	${CC} lessecho.${O} version.${O} -f=$@ ${LDFLAGS}
+
+${OBJ}: defines.h less.h
+
+defines.h: defines.o9
+	copy defines.o9 defines.h -rf

_service:tar_scm:less-633.tar.gz/Makefile.o9u Added

@@ -0,0 +1,43 @@
+# Makefile for less.
+# OS-9 version for Ultra C.
+
+#### Start of system configuration section. ####
+
+CC = cc
+CPPFLAGS =
+CFLAGS = -v=.
+CFLAGS_COMPILE_ONLY = -eas
+LDFLAGS = -olM=24k
+LIBS = -ltermlib.l -lsys_clib.l -lunix.l
+O = r
+
+
+#### End of system configuration section. ####
+
+.SUFFIXES: .c .${O}
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.${O}:
+	${CC} ${CFLAGS_COMPILE_ONLY} ${CPPFLAGS} ${CFLAGS} $<
+
+OBJ = \
+	main.${O} screen.${O} brac.${O} ch.${O} charset.${O} cmdbuf.${O} \
+	command.${O} cvt.${O} decode.${O} edit.${O} filename.${O} forwback.${O} \
+	help.${O} ifile.${O} input.${O} jump.${O} lesskey_parse.${O} line.${O} linenum.${O} \
+	lsystem.${O} mark.${O} optfunc.${O} option.${O} opttbl.${O} os.${O} \
+	output.${O} pattern.${O} position.${O} prompt.${O} search.${O} signal.${O} \
+	tags.${O} ttyin.${O} version.${O} xbuf.${O}  regexp.${O}
+
+all: less lesskey
+
+less: ${OBJ}
+	${CC} ${OBJ} -f=$@ ${LDFLAGS} ${LIBS}
+
+lesskey: lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O}
+	${CC} lesskey.${O} lesskey_parse.${O} version.${O} xbuf.${O} -f=$@ ${LDFLAGS}
+
+${OBJ}: defines.h less.h
+
+defines.h: defines.o9
+	copy defines.o9 defines.h -rf

_service:tar_scm:less-633.tar.gz/Makefile.wnb Added

@@ -0,0 +1,71 @@
+# Makefile for less.
+# Windows version
+# Bolarnd C++ 5.5.1 free command line tools
+
+#### Start of system configuration section. ####
+# 
+# Borland's make knows its own location in the
+# filesystem.
+#
+
+CC = bcc32
+LIBDIR = $(MAKEDIR)\..\lib
+
+CFLAGS = -O2 -w-pro -TWC -P-c -v- -d -f- -ff- -vi
+LDFLAGS = -Tpe -v- -ap -c -x -V4.0 -GF:AGGRESSIVE
+LD = ilink32
+LIBS = ${LIBDIR}\import32.lib ${LIBDIR}\cw32.lib
+
+#### End of system configuration section. ####
+
+# 
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+# 
+.c.obj:
+	${CC} -c -I. ${CPPFLAGS} ${CFLAGS} $<
+
+OBJ = \
+	main.obj screen.obj brac.obj ch.obj charset.obj cmdbuf.obj \
+	command.obj cvt.obj decode.obj edit.obj filename.obj forwback.obj \
+	help.obj ifile.obj input.obj jump.obj lesskey_parse.obj line.obj linenum.obj \
+	lsystem.obj mark.obj optfunc.obj option.obj opttbl.obj os.obj \
+	output.obj pattern.obj position.obj prompt.obj search.obj signal.obj \
+	tags.obj ttyin.obj version.obj xbuf.obj regexp.obj
+
+all: less lesskey lessecho
+
+# 
+# This is really horrible, but the command line is too long for 
+# MS-DOS if we try to link ${OBJ}.
+# 
+less: ${OBJ}
+	${LD} ${LDFLAGS} ${LIBDIR}\c0x32.obj $**, $@,,${LIBS}
+
+lesskey: lesskey.obj lesskey_parse.obj version.obj xbuf.obj
+	${LD} ${LDFLAGS} ${LIBDIR}\c0x32.obj $**, $@,,${LIBS}
+
+lessecho: lessecho.obj version.obj
+	${LD} ${LDFLAGS} ${LIBDIR}\c0x32.obj $**, $@,,${LIBS}
+
+defines.h: defines.wn
+	-del defines.h
+	-copy defines.wn defines.h
+
+${OBJ}: less.h defines.h funcs.h cmd.h
+
+clean:
+	-del *.obj 
+	-del *.il? 
+	-del *.tds 
+	-del defines.h
+
+spotless: clean
+	-del less.exe
+	-del lesskey.exe
+	-del lessecho.exe
+
+realclean: spotless
+
+distclean: spotless
+

_service:tar_scm:less-633.tar.gz/Makefile.wng Added

@@ -0,0 +1,133 @@
+# Makefile for less using mingw-w64 package:
+#   http://mingw-w64.org/doku.php
+#
+# Derived from Makefile.wnm
+#
+# Usage: mingw32-make -f Makefile.wng REGEX_PACKAGE={posix|gnu|regcomp-local}
+#
+# The optional command line parameter "REGEX_PACKAGE" is used to specify 
+# a regular expression package for compilation and linking.  This parameter
+# can assume one of three values.  
+#
+# REGEX_PACKAGE == regcomp-local
+#   This choice selects the regular expression package written by Henry
+#   Spencer.  It is implemented by the repository file "regexp.c".  
+#
+# REGEX_PACKAGE == posix
+#   This choice selects the POSIX implementation and is provided by MingW.  
+#   This is the default choice.  
+#
+# REGEX_PACKAGE == gnu
+#   This choice selects the GNU implementation and is provided by MingW.  
+#
+
+#### Start of system configuration section. ####
+
+CC = gcc
+
+# Definitions specific to mingw
+#
+MINGW_DEFINES     = -DMINGW -DWIN32
+
+# This specifies the "root" directory of the MingW installation.  
+# It is defined so that the compiler and linker can find the header files
+# and library that provide regular expression support.  
+#
+MINGW_ROOT_PATH = /mingw-w64/mingw64
+
+# Determine the regular expression package to be used.  
+#
+REGEX_PACKAGE ?= posix
+ifeq (${REGEX_PACKAGE},regcomp-local)
+    MINGW_DEFINES += -DUSE_REGEXP_C
+else ifeq (${REGEX_PACKAGE},posix)
+    MINGW_DEFINES += -DUSE_POSIX_REGCOMP
+else ifeq (${REGEX_PACKAGE},gnu)
+    MINGW_DEFINES += -DUSE_GNU_REGEX
+else
+    $(error REGEX_PACKAGE must be posix, gnu or regcomp-local)
+endif
+
+MINGW_REGEX_IPATH = -I${MINGW_ROOT_PATH}/opt/include
+MINGW_REGEX_LPATH = -L${MINGW_ROOT_PATH}/opt/lib
+MINGW_REGEX_LIB   = -lregex
+
+CFLAGS_MINGW = ${MINGW_DEFINES}
+ifneq  (${REGEX_PACKAGE},regcomp-local)
+CFLAGS_MINGW += ${MINGW_REGEX_IPATH}
+endif
+
+# MingW may use sh.exe instead of cmd.exe.  
+# Make sure it does not.
+#
+SHELL = cmd.exe
+
+CFLAGS  = -O2 ${CFLAGS_MINGW}
+ifneq  (${REGEX_PACKAGE},regcomp-local)
+LDFLAGS = ${MINGW_REGEX_LPATH}
+LIBS    = ${MINGW_REGEX_LIB}
+endif
+
+#### End of system configuration section. ####
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.o:
+	${CC} -c -I. ${CFLAGS} $<
+
+LESS_SRC = brac.c ch.c charset.c cmdbuf.c command.c		\
+           cvt.c decode.c edit.c filename.c forwback.c 		\
+           ifile.c input.c jump.c line.c linenum.c 		\
+           lsystem.c main.c mark.c optfunc.c option.c 		\
+	   opttbl.c os.c output.c pattern.c position.c 		\
+	   prompt.c          screen.c scrsize.c search.c 	\
+	   signal.c tags.c ttyin.c version.c xbuf.c
+ifeq  (${REGEX_PACKAGE},regcomp-local)
+LESS_SRC += regexp.c
+endif
+
+OBJ = \
+	main.o screen.o brac.o ch.o charset.o cmdbuf.o \
+	command.o cvt.o decode.o edit.o filename.o forwback.o \
+	help.o ifile.o input.o jump.o lesskey_parse.o line.o linenum.o \
+	lsystem.o mark.o optfunc.o option.o opttbl.o os.o \
+	output.o pattern.o position.o prompt.o search.o signal.o \
+	tags.o ttyin.o version.o xbuf.o
+ifeq  (${REGEX_PACKAGE},regcomp-local)
+OBJ += regexp.o
+endif
+
+
+all: clean less lesskey lessecho
+
+less: ${OBJ}
+	${CC} ${LDFLAGS} -o $@ ${OBJ} ${LIBS}
+
+lesskey: lesskey.o lesskey_parse.o version.o xbuf.o
+	${CC} ${LDFLAGS} -o $@ lesskey.o lesskey_parse.o version.o xbuf.o
+
+lessecho: lessecho.o version.o
+	${CC} ${LDFLAGS} -o $@ lessecho.o version.o
+
+defines.h: defines.wn
+	copy $< $@
+
+funcs.h: ${LESS_SRC}
+	-move funcs.h funcs.h.old
+	grep -h "^public ^;*$$" ${LESS_SRC} | sed "s/$$/;/" >funcs.h
+
+help.c: less.hlp
+	perl mkhelp.pl  < $<  > $@
+
+${OBJ}: less.h defines.h funcs.h
+
+TAGS:
+	etags *.c *.h
+
+clean:
+	-del *.o
+	-del *.exe
+	-del defines.h
+	-del funcs.h
+	-del help.c
+	-if exist TAGS del TAGS

_service:tar_scm:less-633.tar.gz/Makefile.wnm Added

@@ -0,0 +1,53 @@
+# Makefile for less.
+# Windows 32 Visual C++ version
+
+#### Start of system configuration section. ####
+
+CC = cl
+
+# Normal flags
+CFLAGS = /nologo /W3 /EHsc /O2 /I "." /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /c 
+LDFLAGS = /nologo /subsystem:console /incremental:no
+
+# Debugging flags
+#CFLAGS = /nologo /MDd /W3 /GX /Od /Gm /Zi /I "." /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /c
+#LDFLAGS = /nologo /subsystem:console /incremental:yes /debug
+
+LD = link
+LIBS = user32.lib
+
+#### End of system configuration section. ####
+
+# This rule allows us to supply the necessary -D options
+# in addition to whatever the user asks for.
+.c.obj::
+	$(CC) $(CFLAGS) $<
+
+OBJ = \
+	main.obj screen.obj brac.obj ch.obj charset.obj cmdbuf.obj \
+	command.obj cvt.obj decode.obj edit.obj filename.obj forwback.obj \
+	help.obj ifile.obj input.obj jump.obj lesskey_parse.obj line.obj linenum.obj \
+	lsystem.obj mark.obj optfunc.obj option.obj opttbl.obj os.obj \
+	output.obj pattern.obj position.obj prompt.obj search.obj signal.obj \
+	tags.obj ttyin.obj version.obj xbuf.obj regexp.obj
+
+all: less.exe lesskey.exe
+
+less.exe: $(OBJ)
+	$(LD) $(LDFLAGS) $** $(LIBS) /out:$@
+
+lesskey.exe: lesskey.obj lesskey_parse.obj version.obj xbuf.obj
+	$(LD) $(LDFLAGS) lesskey.obj lesskey_parse.obj version.obj xbuf.obj $(LIBS) /out:$@
+
+defines.h: defines.wn
+	-del defines.h
+	-copy defines.wn defines.h
+
+$(OBJ): less.h defines.h funcs.h cmd.h
+
+clean:
+	-del *.obj 
+	-del less.exe
+	-del lesskey.exe
+
+

_service:tar_scm:less-633.tar.gz/NEWS Added

@@ -0,0 +1,1250 @@
+
+                     NEWS about less
+
+======================================================================
+
+  For the latest news about less, see https://greenwoodsoftware.com/less
+  You can also download the latest version of less from there.
+
+  Report bugs, suggestions or comments at 
+  https://github.com/gwsw/less/issues.
+
+======================================================================
+
+	Major changes between "less" versions 632 and 633
+
+* Fix build on systems which have ncurses/termcap.h or 
+  ncursesw/termcap.h but not termcap.h.
+
+======================================================================
+
+	Major changes between "less" versions 608 and 632
+
+* Add LESSUTFCHARDEF environment variable (github #275).
+
+* Add # command (github #330).
+
+* Add ^S search modifier (github #196).
+
+* Add --wordwrap option (github #113).
+
+* Add --no-vbell option (github #304).
+
+* Add --no-search-headers option (github #44).
+
+* Add --modelines option (github #89).
+
+* Add --intr option (github #224).
+
+* Add --proc-backspace, --proc-tab and --proc-return options (github #335).
+
+* Add --show-preproc-errors option (github #258).
+
+* Add LESS_LINES and LESS_COLUMNS environment variables (github #84).
+
+* Add LESS_DATA_DELAY environment variable (github #337).
+
+* Allow empty "lines" field in --header option.
+
+* Update Unicode tables.
+
+* Improve ability of ^X to interrupt F command (github #49).
+
+* Status column (-J) shows off-screen matches.
+
+* Parenthesized sub-patterns in searches are colored with unique colors,
+  if supported by the regular expression library (github #196).
+
+* Don't allow opening a tty as file input unless -f is set (github #309).
+
+* Don't require newline input after +&... option (github #339).
+
+* Fix incorrect handling of some Private Use Unicode characters.
+
+* Fix ANSI color bug when overstriking with colored chars (github #276).
+
+* Fix compiler const warning (github #279).
+
+* Fix signal race in iread (github #280).
+
+* Fix reading procfs files on Linux (github #282).
+
+* Fix --ignore-case with ctrl-R (no regex) search (github #300).
+
+* Fix bug doing repeat search after setting & filter (github #299).
+
+* Fix bug doing repeat search before non-repeat search.
+
+* Fix crash with -R and certain line lengths (github #338).
+
+* Fix input of Windows dead keys (github #352).
+
+* Don't retain search options from a cancelled search (github #302).
+
+* Don't call realpath on fake filenames like "-" (github #289).
+
+* Implement lesstest test suite.
+
+* Convert function parameter definitions from K&R to C89 (github #316).
+
+======================================================================
+
+	Major changes between "less" versions 590 and 608
+
+* Add the --header option (github #43).
+
+* Add the --no-number-headers option (github #178).
+
+* Add the --status-line option.
+
+* Add the --redraw-on-quit option (github #36).
+
+* Add the --search-options option (github #213).
+
+* Add the --exit-follow-on-close option (github #244).
+
+* Add 'H' color type to set color of header lines.
+
+* Add #version conditional to lesskey.
+
+* Add += syntax to variable section in lesskey files.
+
+* Allow option name in -- command to end with '=' in addition to '\n'.
+
+* Add $HOME/.config to possible locations of lesskey file (github #153).
+
+* Add $XDG_STATE_HOME and $HOME/.local/state to possible locations
+  of history file (github #223).
+
+* Don't read or write history file in secure mode (github #201).
+
+* Fix display of multibyte and double-width chars in prompt.
+
+* Fix ESC-BACKSPACE command when BACKSPACE key does not send 0x08
+  (github #188).
+
+* Add more \k codes to lesskey format.
+
+* Fix bug when empty file is modified while viewing it.
+
+* Fix bug when parsing a malformed lesskey file (githb #234).
+
+* Fix bug scrolling history when --incsearch is set (github #214).
+
+* Fix buffer overflow when invoking lessecho with more than 63 -m/-n 
+  options (github #198).
+
+* Fix buffer overflow in bin_file (github #271).
+
+* Fix bug restoring color at end of highlighted text.
+
+* Fix bug in parsing lesskey file.
+
+* Defer moving cursor to lower left in some more cases.
+
+* Suppress TAB filename expansion in some cases where it doesn't make sense.
+
+* Fix termlib detection when compiler doesn't accept 
+  calls to undeclared functions.
+
+* Fix bug in input of non-ASCII characters on Windows (github #247)
+
+* Escape filenames when invoking LESSCLOSE.
+
+* Fix bug using multibyte UTF-8 char in search string 
+  with --incsearch (github #273).
+
+======================================================================
+
+	Major changes between "less" versions 581 and 590
+
+* Make less able to read lesskey source files (deprecating lesskey).
+
+* If XDG_CONFIG_HOME is set, find lesskey source file 
+  in $XDG_CONFIG_HOME/lesskey rather than $HOME/.lesskey.
+
+* If XDG_DATA_HOME is set, find and store history file 
+  in $XDG_DATA_HOME/lesshst rather than $HOME/.lesshst.
+
+* Add the --lesskey-src option.
+
+* Add the --file-size option.
+
+* With -F, if screen is resized to make file fit on one screen, don't exit.
+
+* Fix bug which could leave terminal in mouse-reporting mode 
+  after exiting less.
+
+* Fix bug which caused failure to respond to window resize.
+
+* Fix backslash bug searching in tag file.
+
+======================================================================
+
+	Major changes between "less" versions 563 and 581
+
+* Change ESC-u command to toggle, not disable, highlighting per man page.
+
+* Add ESC-U command. 
+
+* Add ctrl-W search modifier for wrapping search.
+
+* F command can be interrupted by ^X.
+
+* Support OSC 8 hyperlinks when -R is in effect.
+
+* g command with no number will ignore -j and put first line at top of screen.
+
+* Multiple + or -p command line options are handled better.
+

_service:tar_scm:less-633.tar.gz/README Added

@@ -0,0 +1,246 @@
+
+    This is the source code distribution of "less".
+    This program is part of the GNU project (https://www.gnu.org).
+
+    This program is free software.  You may redistribute it and/or
+    modify it under the terms of either:
+
+    1. The GNU General Public License, as published by the Free
+       Software Foundation; either version 3, or (at your option) any
+       later version.  A copy of this license is in the file COPYING.
+    or
+    2. The Less License, in the file LICENSE.
+
+    Please report any problems at https://github.com/gwsw/less/issues.
+    See https://greenwoodsoftware.com/less for the latest info.
+    Source repository is at https://github.com/gwsw/less.git.
+
+=========================================================================
+
+You should build from a clone of a git repository 
+ONLY IF you are doing development on the less source itself.
+If you are merely using less as a tool, you should download a release
+from https://greenwoodsoftware.com and NOT from github.
+
+The formatted manual page is in less.man.
+The manual page nroff source is in less.nro.
+Major changes made since the last posted version are in NEWS.
+
+=======================================================================
+INSTALLATION (Unix & Linux systems only):
+
+1. Move the distributed source to its own directory and unpack it,
+   if you have not already done so.  
+
+2. If you are building from a clone of a git repository,
+   type "make -f Makefile.aut distfiles".
+   If you are building from a numbered release package (a tar or 
+   zip file with a name like less-999.tar.gz or less-999.zip downloaded 
+   from greenwoodsoftware.com, not from github), you should skip this step. 
+
+3. Type "sh configure".
+   This will generate a Makefile and a defines.h.
+   Warning: if you have a GNU sed, make sure it is version 2.05 or later.
+
+   The file INSTALL describes the usage of the configure program in
+   general.  In addition, these options to configure are supported:
+
+   --with-editor=program
+     Specifies the default editor program used by the "v" command.
+     The default is "vi".
+
+   --with-regex=lib
+     Specifies the regular expression library used by less for pattern
+     matching.  The default is "auto", which means the configure program 
+     finds a regular expression library automatically.  Other values are:
+        gnu            Use the GNU regex library.
+        pcre           Use the PCRE library.
+        pcre2          Use the PCRE2 library.
+        posix          Use the POSIX-compatible regcomp.
+        regcmp         Use the regcmp library.
+        re_comp        Use the re_comp library.
+        regcomp        Use the V8-compatible regcomp.
+        regcomp-local  Use Henry Spencer's V8-compatible regcomp
+                       (source is supplied with less).
+        none           No regular expressions, only simple string matching.
+
+   --with-secure
+     Builds a "secure" version of less, with some features disabled
+     to prevent users from viewing other files, accessing shell
+     commands, etc.
+
+
+4. It is a good idea to look over the generated Makefile and defines.h
+   and make sure they look ok.  If you know of any peculiarities of
+   your system that configure might not have detected, you may fix the
+   Makefile now.  Take particular notice of the list of "terminal" 
+   libraries in the LIBS definition in the Makefile; these may need 
+   to be edited.  The terminal libraries will be some subset of
+       -lncurses  -lcurses  -ltermcap  -ltermlib
+
+   If you wish, you may edit defines.h to remove some optional features.
+   If you choose not to include some features in your version, you may
+   wish to edit the manual page "less.nro" and the help page "less.hlp" 
+   to remove the descriptions of the features which you are removing.
+   If you edit less.hlp, you should run "make -f Makefile.aut help.c".
+
+5. Type "make" and watch the fun.
+
+6. If the make succeeds, it will generate the programs "less",
+   "lesskey" and "lessecho" in your current directory.  Test the 
+   generated programs.
+
+7. When satisfied that it works, if you wish to install it
+   in a public place, type "make install".
+
+   The default install destinations are:
+        Executables (less, lesskey, lessecho) in /usr/local/bin
+        Documentation (less.nro, lesskey.nro) in /usr/local/man/man1
+   If you want to install any of these files elsewhere, define
+   bindir and/or mandir to the appropriate directories.
+
+
+Note to hackers: comments noting possible improvements are enclosed
+in double curly brackets {{ like this }}.
+
+(Note that the above note was originally written at a time when 
+"hackers" most commonly meant "enthusiastic and dedicated computer 
+programmers", not "persons who attempt to circumvent computer security".)
+
+
+
+=======================================================================
+INSTALLATION (MS-DOS systems only,
+              with Microsoft C, Borland C, or DJGPP)
+
+1. Move the distributed source to its own directory.
+   Depending on your compiler, you may need to convert the source 
+   to have CR-LF rather than LF as line terminators.
+
+2. If you are using Microsoft C, rename MAKEFILE.DSU to MAKEFILE.
+   If you are using Borland C, rename MAKEFILE.DSB to MAKEFILE.
+   If you are using DJGPP, rename MAKEFILE.DSG to MAKEFILE.
+
+3. Look at MAKEFILE to make sure that the definitions for CC and LIBDIR
+   are correct.  CC should be the name of your C compiler and
+   LIBDIR should be the directory where the C libraries reside (for
+   Microsoft C only).  If these definitions need to be changed, you can
+   either modify the definitions directly in MAKEFILE, or set your
+   environment variables CC and/or LIBDIR to override the definitions
+   in MAKEFILE.
+
+4. If you wish, you may edit DEFINES.DS to remove some optional features.
+   If you choose not to include some features in your version, you may
+   wish to edit the manual page LESS.MAN and the help page HELP.C
+   to remove the descriptions of the features which you are removing.
+
+5. Run your "make" program and watch the fun.
+   If your "make" requires a flag to import environment variables,
+   you should use that flag.
+   If your compiler runs out of memory, try running "make -n >cmds.bat" 
+   and then run cmds.bat.
+
+6. If the make succeeds, it will generate the programs "LESS.EXE" and
+   "LESSKEY.EXE" in your current directory.  Test the generated programs.
+
+7. When satisfied that it works, you may wish to install LESS.EXE and
+   LESSKEY.EXE in a directory which is included in your PATH.
+
+
+
+=======================================================================
+INSTALLATION (Windows-95, Windows-98 and Windows-NT systems only,
+              with Borland C or Microsoft Visual C++)
+
+1. Move the distributed source to its own directory.
+
+2. If you are using Borland C, rename Makefile.wnb to Makefile.
+   If you are using Microsoft Visual C++, rename Makefile.wnm to Makefile.
+
+3. Check the Makefile to make sure the definitions look ok.
+
+4. If you wish, you may edit defines.wn to remove some optional features.
+   If you choose not to include some features in your version, you may
+   wish to edit the manual page less.man and the help page help.c
+   to remove the descriptions of the features which you are removing.
+
+5. Type "make" and watch the fun.
+
+6. If the make succeeds, it will generate the programs "less.exe" and
+   "lesskey.exe" in your current directory.  Test the generated programs.
+
+7. When satisfied that it works, if you wish to install it
+   in a public place, type "make install".
+   See step 6 of the Unix installation instructions for details
+   on how to change the default installation directories.
+
+
+
+=======================================================================
+INSTALLATION (OS/2 systems only,
+              with EMX C)
+
+1. Move the distributed source to its own directory.
+
+2. Rename Makefile.o2e to Makefile.
+
+3. Check the Makefile to make sure the definitions look ok.
+
+4. If you wish, you may edit defines.o2 to remove some optional features.
+   If you choose not to include some features in your version, you may
+   wish to edit the manual page less.man and the help page help.c
+   to remove the descriptions of the features which you are removing.
+
+5. Type "make" and watch the fun.
+
+6. If the make succeeds, it will generate the programs "less.exe" and
+   "lesskey.exe" in your current directory.  Test the generated programs.
+
+7. Make sure you have the emx runtime installed. You need the emx DLLs

_service:tar_scm:less-633.tar.gz/brac.c Added

@@ -0,0 +1,99 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines to perform bracket matching functions.
+ */
+
+#include "less.h"
+#include "position.h"
+
+/*
+ * Try to match the n-th open bracket 
+ *  which appears in the top displayed line (forwdir),
+ * or the n-th close bracket 
+ *  which appears in the bottom displayed line (!forwdir).
+ * The characters which serve as "open bracket" and 
+ * "close bracket" are given.
+ */
+public void match_brac(char obrac, char cbrac, int forwdir, int n)
+{
+	int c;
+	int nest;
+	POSITION pos;
+	int (*chget)();
+
+	extern int ch_forw_get(), ch_back_get();
+
+	/*
+	 * Seek to the line containing the open bracket.
+	 * This is either the top or bottom line on the screen,
+	 * depending on the type of bracket.
+	 */
+	pos = position((forwdir) ? TOP : BOTTOM);
+	if (pos == NULL_POSITION || ch_seek(pos))
+	{
+		if (forwdir)
+			error("Nothing in top line", NULL_PARG);
+		else
+			error("Nothing in bottom line", NULL_PARG);
+		return;
+	}
+
+	/*
+	 * Look thru the line to find the open bracket to match.
+	 */
+	do
+	{
+		if ((c = ch_forw_get()) == '\n' || c == EOI)
+		{
+			if (forwdir)
+				error("No bracket in top line", NULL_PARG);
+			else
+				error("No bracket in bottom line", NULL_PARG);
+			return;
+		}
+	} while (c != obrac || --n > 0);
+
+	/*
+	 * Position the file just "after" the open bracket
+	 * (in the direction in which we will be searching).
+	 * If searching forward, we are already after the bracket.
+	 * If searching backward, skip back over the open bracket.
+	 */
+	if (!forwdir)
+		(void) ch_back_get();
+
+	/*
+	 * Search the file for the matching bracket.
+	 */
+	chget = (forwdir) ? ch_forw_get : ch_back_get;
+	nest = 0;
+	while ((c = (*chget)()) != EOI)
+	{
+		if (c == obrac)
+		{
+			if (nest == INT_MAX)
+				break;
+			nest++;
+		}
+		else if (c == cbrac && --nest < 0)
+		{
+			/*
+			 * Found the matching bracket.
+			 * If searching backward, put it on the top line.
+			 * If searching forward, put it on the bottom line.
+			 */
+			jump_line_loc(ch_tell(), forwdir ? -1 : 1);
+			return;
+		}
+	}
+	error("No matching bracket", NULL_PARG);
+}

_service:tar_scm:less-633.tar.gz/ch.c Added

@@ -0,0 +1,937 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Low level character input from the input file.
+ * We use these special purpose routines which optimize moving
+ * both forward and backward from the current read pointer.
+ */
+
+#include "less.h"
+#if MSDOS_COMPILER==WIN32C
+#include <errno.h>
+#include <windows.h>
+#endif
+
+#if HAVE_PROCFS
+#include <sys/statfs.h>
+#if HAVE_LINUX_MAGIC_H
+#include <linux/magic.h>
+#endif
+#endif
+
+typedef POSITION BLOCKNUM;
+
+public int ignore_eoi;
+
+/*
+ * Pool of buffers holding the most recently used blocks of the input file.
+ * The buffer pool is kept as a doubly-linked circular list,
+ * in order from most- to least-recently used.
+ * The circular list is anchored by the file state "thisfile".
+ */
+struct bufnode {
+	struct bufnode *next, *prev;
+	struct bufnode *hnext, *hprev;
+};
+
+#define LBUFSIZE        8192
+struct buf {
+	struct bufnode node;
+	BLOCKNUM block;
+	unsigned int datasize;
+	unsigned char dataLBUFSIZE;
+};
+#define bufnode_buf(bn)  ((struct buf *) bn)
+
+/*
+ * The file state is maintained in a filestate structure.
+ * A pointer to the filestate is kept in the ifile structure.
+ */
+#define BUFHASH_SIZE    1024
+struct filestate {
+	struct bufnode buflist;
+	struct bufnode hashtblBUFHASH_SIZE;
+	int file;
+	int flags;
+	POSITION fpos;
+	int nbufs;
+	BLOCKNUM block;
+	unsigned int offset;
+	POSITION fsize;
+};
+
+#define ch_bufhead      thisfile->buflist.next
+#define ch_buftail      thisfile->buflist.prev
+#define ch_nbufs        thisfile->nbufs
+#define ch_block        thisfile->block
+#define ch_offset       thisfile->offset
+#define ch_fpos         thisfile->fpos
+#define ch_fsize        thisfile->fsize
+#define ch_flags        thisfile->flags
+#define ch_file         thisfile->file
+
+#define END_OF_CHAIN    (&thisfile->buflist)
+#define END_OF_HCHAIN(h) (&thisfile->hashtblh)
+#define BUFHASH(blk)    ((blk) & (BUFHASH_SIZE-1))
+
+/*
+ * Macros to manipulate the list of buffers in thisfile->buflist.
+ */
+#define FOR_BUFS(bn) \
+	for (bn = ch_bufhead;  bn != END_OF_CHAIN;  bn = bn->next)
+
+#define BUF_RM(bn) \
+	(bn)->next->prev = (bn)->prev; \
+	(bn)->prev->next = (bn)->next;
+
+#define BUF_INS_HEAD(bn) \
+	(bn)->next = ch_bufhead; \
+	(bn)->prev = END_OF_CHAIN; \
+	ch_bufhead->prev = (bn); \
+	ch_bufhead = (bn);
+
+#define BUF_INS_TAIL(bn) \
+	(bn)->next = END_OF_CHAIN; \
+	(bn)->prev = ch_buftail; \
+	ch_buftail->next = (bn); \
+	ch_buftail = (bn);
+
+/*
+ * Macros to manipulate the list of buffers in thisfile->hashtbln.
+ */
+#define FOR_BUFS_IN_CHAIN(h,bn) \
+	for (bn = thisfile->hashtblh.hnext;  \
+	     bn != END_OF_HCHAIN(h);  bn = bn->hnext)
+
+#define BUF_HASH_RM(bn) \
+	(bn)->hnext->hprev = (bn)->hprev; \
+	(bn)->hprev->hnext = (bn)->hnext;
+
+#define BUF_HASH_INS(bn,h) \
+	(bn)->hnext = thisfile->hashtblh.hnext; \
+	(bn)->hprev = END_OF_HCHAIN(h); \
+	thisfile->hashtblh.hnext->hprev = (bn); \
+	thisfile->hashtblh.hnext = (bn);
+
+static struct filestate *thisfile;
+static int ch_ungotchar = -1;
+static int maxbufs = -1;
+
+extern int autobuf;
+extern int sigs;
+extern int secure;
+extern int screen_trashed;
+extern int follow_mode;
+extern int waiting_for_data;
+extern constant char helpdata;
+extern constant int size_helpdata;
+extern IFILE curr_ifile;
+#if LOGFILE
+extern int logfile;
+extern char *namelogfile;
+#endif
+
+static int ch_addbuf();
+
+
+/*
+ * Get the character pointed to by the read pointer.
+ */
+static int ch_get(void)
+{
+	struct buf *bp;
+	struct bufnode *bn;
+	int n;
+	int read_again;
+	int h;
+	POSITION pos;
+	POSITION len;
+
+	if (thisfile == NULL)
+		return (EOI);
+
+	/*
+	 * Quick check for the common case where 
+	 * the desired char is in the head buffer.
+	 */
+	if (ch_bufhead != END_OF_CHAIN)
+	{
+		bp = bufnode_buf(ch_bufhead);
+		if (ch_block == bp->block && ch_offset < bp->datasize)
+			return bp->datach_offset;
+	}
+
+	/*
+	 * Look for a buffer holding the desired block.
+	 */
+	waiting_for_data = FALSE;
+	h = BUFHASH(ch_block);
+	FOR_BUFS_IN_CHAIN(h, bn)
+	{
+		bp = bufnode_buf(bn);
+		if (bp->block == ch_block)
+		{
+			if (ch_offset >= bp->datasize)
+				/*
+				 * Need more data in this buffer.
+				 */
+				break;
+			goto found;
+		}
+	}
+	if (bn == END_OF_HCHAIN(h))
+	{
+		/*
+		 * Block is not in a buffer.  
+		 * Take the least recently used buffer 
+		 * and read the desired block into it.
+		 * If the LRU buffer has data in it, 
+		 * then maybe allocate a new buffer.
+		 */
+		if (ch_buftail == END_OF_CHAIN ||

_service:tar_scm:less-633.tar.gz/charset.c Added

@@ -0,0 +1,905 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Functions to define the character set
+ * and do things specific to the character set.
+ */
+
+#include "less.h"
+#if HAVE_LOCALE
+#include <locale.h>
+#include <ctype.h>
+#include <langinfo.h>
+#endif
+
+#include "charset.h"
+#include "xbuf.h"
+
+#if MSDOS_COMPILER==WIN32C
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#endif
+
+extern int bs_mode;
+
+public int utf_mode = 0;
+
+/*
+ * Predefined character sets,
+ * selected by the LESSCHARSET environment variable.
+ */
+struct charset {
+	char *name;
+	int *p_flag;
+	char *desc;
+} charsets = {
+		{ "ascii",              NULL,       "8bcccbcc18b95.b" },
+		{ "utf-8",              &utf_mode,  "8bcccbcc18b95.b126.bb" },
+		{ "iso8859",            NULL,       "8bcccbcc18b95.33b." },
+		{ "latin3",             NULL,       "8bcccbcc18b95.33b5.b8.b15.b4.b12.b18.b12.b." },
+		{ "arabic",             NULL,       "8bcccbcc18b95.33b.3b.7b2.13b.3b.b26.5b19.b" },
+		{ "greek",              NULL,       "8bcccbcc18b95.33b4.2b4.b3.b35.b44.b" },
+		{ "greek2005",          NULL,       "8bcccbcc18b95.33b14.b35.b44.b" },
+		{ "hebrew",             NULL,       "8bcccbcc18b95.33b.b29.32b28.2b2.b" },
+		{ "koi8-r",             NULL,       "8bcccbcc18b95.b." },
+		{ "KOI8-T",             NULL,       "8bcccbcc18b95.b8.b6.b8.b.b.5b7.3b4.b4.b3.b.b.3b." },
+		{ "georgianps",         NULL,       "8bcccbcc18b95.3b11.4b12.2b." },
+		{ "tcvn",               NULL,       "b..b...bcccbccbbb7.8b95.b48.5b." },
+		{ "TIS-620",            NULL,       "8bcccbcc18b95.b.4b.11b7.8b." },
+		{ "next",               NULL,       "8bcccbcc18b95.bb125.bb" },
+		{ "dos",                NULL,       "8bcccbcc12bc5b95.b." },
+		{ "windows-1251",       NULL,       "8bcccbcc12bc5b95.b24.b." },
+		{ "windows-1252",       NULL,       "8bcccbcc12bc5b95.b.b11.b.2b12.b." },
+		{ "windows-1255",       NULL,       "8bcccbcc12bc5b95.b.b8.b.5b9.b.4b." },
+		{ "ebcdic",             NULL,       "5bc6bcc7bcc41b.9b7.9b5.b..8b6.10b6.b9.7b9.8b8.17b3.3b9.7b9.8b8.6b10.b.b.b." },
+		{ "IBM-1047",           NULL,       "4cbcbc3b9cbccbccbb4c6bcc5b3cbbc4bc4bccbc191.b" },
+		{ NULL, NULL, NULL }
+};
+
+/*
+ * Support "locale charmap"/nl_langinfo(CODESET) values, as well as others.
+ */
+struct cs_alias {
+	char *name;
+	char *oname;
+} cs_aliases = {
+	{ "UTF-8",              "utf-8" },
+	{ "utf8",               "utf-8" },
+	{ "UTF8",               "utf-8" },
+	{ "ANSI_X3.4-1968",     "ascii" },
+	{ "US-ASCII",           "ascii" },
+	{ "latin1",             "iso8859" },
+	{ "ISO-8859-1",         "iso8859" },
+	{ "latin9",             "iso8859" },
+	{ "ISO-8859-15",        "iso8859" },
+	{ "latin2",             "iso8859" },
+	{ "ISO-8859-2",         "iso8859" },
+	{ "ISO-8859-3",         "latin3" },
+	{ "latin4",             "iso8859" },
+	{ "ISO-8859-4",         "iso8859" },
+	{ "cyrillic",           "iso8859" },
+	{ "ISO-8859-5",         "iso8859" },
+	{ "ISO-8859-6",         "arabic" },
+	{ "ISO-8859-7",         "greek" },
+	{ "IBM9005",            "greek2005" },
+	{ "ISO-8859-8",         "hebrew" },
+	{ "latin5",             "iso8859" },
+	{ "ISO-8859-9",         "iso8859" },
+	{ "latin6",             "iso8859" },
+	{ "ISO-8859-10",        "iso8859" },
+	{ "latin7",             "iso8859" },
+	{ "ISO-8859-13",        "iso8859" },
+	{ "latin8",             "iso8859" },
+	{ "ISO-8859-14",        "iso8859" },
+	{ "latin10",            "iso8859" },
+	{ "ISO-8859-16",        "iso8859" },
+	{ "IBM437",             "dos" },
+	{ "EBCDIC-US",          "ebcdic" },
+	{ "IBM1047",            "IBM-1047" },
+	{ "KOI8-R",             "koi8-r" },
+	{ "KOI8-U",             "koi8-r" },
+	{ "GEORGIAN-PS",        "georgianps" },
+	{ "TCVN5712-1",         "tcvn" },
+	{ "NEXTSTEP",           "next" },
+	{ "windows",            "windows-1252" }, /* backward compatibility */
+	{ "CP1251",             "windows-1251" },
+	{ "CP1252",             "windows-1252" },
+	{ "CP1255",             "windows-1255" },
+	{ NULL, NULL }
+};
+
+#define IS_BINARY_CHAR  01
+#define IS_CONTROL_CHAR 02
+
+static char chardef256;
+static char *binfmt = NULL;
+static char *utfbinfmt = NULL;
+public int binattr = AT_STANDOUT|AT_COLOR_BIN;
+
+static struct xbuffer user_wide_array;
+static struct xbuffer user_ubin_array;
+static struct xbuffer user_compose_array;
+static struct xbuffer user_prt_array;
+static struct wchar_range_table user_wide_table;
+static struct wchar_range_table user_ubin_table;
+static struct wchar_range_table user_compose_table;
+static struct wchar_range_table user_prt_table;
+
+/*
+ * Set a wchar_range_table to the table in an xbuffer.
+ */
+static void wchar_range_table_set(struct wchar_range_table *tbl, struct xbuffer *arr)
+{
+	tbl->table = (struct wchar_range *) arr->data;
+	tbl->count = arr->end / sizeof(struct wchar_range);
+}
+
+/*
+ * Skip over a "U" or "U+" prefix before a hex codepoint.
+ */
+static char * skip_uprefix(char *s)
+{
+	if (*s == 'U' || *s == 'u')
+		if (*++s == '+') ++s;
+	return s;
+}
+
+/*
+ * Parse a dash-separated range of hex values.
+ */
+static void wchar_range_get(char **ss, struct wchar_range *range)
+{
+	char *s = skip_uprefix(*ss);
+	range->first = lstrtoul(s, &s, 16);
+	if (s0 == '-')
+	{
+		s = skip_uprefix(&s1);
+		range->last = lstrtoul(s, &s, 16);
+	} else 
+	{
+		range->last = range->first;
+	}
+	*ss = s;
+}
+
+/*
+ * Parse the LESSUTFCHARDEF variable.
+ */
+static void ichardef_utf(char *s)
+{
+	xbuf_init(&user_wide_array);
+	xbuf_init(&user_ubin_array);
+	xbuf_init(&user_compose_array);
+	xbuf_init(&user_prt_array);
+
+	if (s != NULL)
+	{
+		while (s0 != '\0')
+		{
+			struct wchar_range range;
+			wchar_range_get(&s, &range);
+			if (range.last == 0)
+			{
+				error("invalid hex number(s) in LESSUTFCHARDEF", NULL_PARG);
+				quit(QUIT_ERROR);
+			}
+			if (*s++ != ':')
+			{
+				error("missing colon in LESSUTFCHARDEF", NULL_PARG);
+				quit(QUIT_ERROR);
+			}
+			switch (*s++)

_service:tar_scm:less-633.tar.gz/charset.h Added

_service:tar_scm:less-633.tar.gz/cmd.h Added

@@ -0,0 +1,147 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+#define MAX_USERCMD            1000
+#define MAX_CMDLEN             16
+
+#define A_B_LINE               2
+#define A_B_SCREEN             3
+#define A_B_SCROLL             4
+#define A_B_SEARCH             5
+#define A_DIGIT                6
+#define A_DISP_OPTION          7
+#define A_DEBUG                8
+#define A_EXAMINE              9
+#define A_FIRSTCMD             10
+#define A_FREPAINT             11
+#define A_F_LINE               12
+#define A_F_SCREEN             13
+#define A_F_SCROLL             14
+#define A_F_SEARCH             15
+#define A_GOEND                16
+#define A_GOLINE               17
+#define A_GOMARK               18
+#define A_HELP                 19
+#define A_NEXT_FILE            20
+#define A_PERCENT              21
+#define A_PREV_FILE            23
+#define A_QUIT                 24
+#define A_REPAINT              25
+#define A_SETMARK              26
+#define A_SHELL                27
+#define A_STAT                 28
+#define A_FF_LINE              29
+#define A_BF_LINE              30
+#define A_VERSION              31
+#define A_VISUAL               32
+#define A_F_WINDOW             33
+#define A_B_WINDOW             34
+#define A_F_BRACKET            35
+#define A_B_BRACKET            36
+#define A_PIPE                 37
+#define A_INDEX_FILE           38
+#define A_UNDO_SEARCH          39
+#define A_FF_SCREEN            40
+#define A_LSHIFT               41
+#define A_RSHIFT               42
+#define A_AGAIN_SEARCH         43
+#define A_T_AGAIN_SEARCH       44
+#define A_REVERSE_SEARCH       45
+#define A_T_REVERSE_SEARCH     46
+#define A_OPT_TOGGLE           47
+#define A_OPT_SET              48
+#define A_OPT_UNSET            49
+#define A_F_FOREVER            50
+#define A_GOPOS                51
+#define A_REMOVE_FILE          52
+#define A_NEXT_TAG             53
+#define A_PREV_TAG             54
+#define A_FILTER               55
+#define A_F_UNTIL_HILITE       56
+#define A_GOEND_BUF            57
+#define A_LLSHIFT              58
+#define A_RRSHIFT              59
+#define A_CLRMARK              62
+#define A_SETMARKBOT           63
+#define A_X11MOUSE_IN          64
+#define A_F_MOUSE              66
+#define A_B_MOUSE              67
+/* Note "X116" refers to extended (1006) X11 mouse reporting. */
+#define A_X116MOUSE_IN         68
+#define A_PSHELL               69
+#define A_CLR_SEARCH           70
+
+/* These values must not conflict with any A_* or EC_* value. */
+#define A_INVALID              100
+#define A_NOACTION             101
+#define A_UINVALID             102
+#define A_END_LIST             103
+#define A_SPECIAL_KEY          104
+#define A_PREFIX               105
+#define A_SKIP                 127
+
+#define A_EXTRA                0200
+
+
+/* Line editing characters */
+
+#define EC_BACKSPACE           1
+#define EC_LINEKILL            2
+#define EC_RIGHT               3
+#define EC_LEFT                4
+#define EC_W_LEFT              5
+#define EC_W_RIGHT             6
+#define EC_INSERT              7
+#define EC_DELETE              8
+#define EC_HOME                9
+#define EC_END                 10
+#define EC_W_BACKSPACE         11
+#define EC_W_DELETE            12
+#define EC_UP                  13
+#define EC_DOWN                14
+#define EC_EXPAND              15
+#define EC_F_COMPLETE          17
+#define EC_B_COMPLETE          18
+#define EC_LITERAL             19
+#define EC_ABORT               20
+#define EC_X11MOUSE            21
+#define EC_X116MOUSE           22
+
+#define EC_UINVALID            102
+
+/* Flags for editchar() */
+#define ECF_PEEK                01
+#define ECF_NOHISTORY           02
+#define ECF_NOCOMPLETE          04
+#define ECF_NORIGHTLEFT         010
+
+/* Environment variable stuff */
+#define EV_OK                  01
+
+/* Special keys (keys which output different strings on different terminals) */
+#define SK_SPECIAL_KEY         CONTROL('K')
+#define SK_RIGHT_ARROW         1
+#define SK_LEFT_ARROW          2
+#define SK_UP_ARROW            3
+#define SK_DOWN_ARROW          4
+#define SK_PAGE_UP             5
+#define SK_PAGE_DOWN           6
+#define SK_HOME                7
+#define SK_END                 8
+#define SK_DELETE              9
+#define SK_INSERT              10
+#define SK_CTL_LEFT_ARROW      11
+#define SK_CTL_RIGHT_ARROW     12
+#define SK_CTL_DELETE          13
+#define SK_F1                  14
+#define SK_BACKTAB             15
+#define SK_CTL_BACKSPACE       16
+#define SK_BACKSPACE           17
+#define SK_CONTROL_K           40

_service:tar_scm:less-633.tar.gz/cmdbuf.c Added

@@ -0,0 +1,1677 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Functions which manipulate the command buffer.
+ * Used only by command() and related functions.
+ */
+
+#include "less.h"
+#include "cmd.h"
+#include "charset.h"
+#if HAVE_STAT
+#include <sys/stat.h>
+#endif
+
+extern int sc_width;
+extern int utf_mode;
+extern int no_hist_dups;
+extern int marks_modified;
+extern int secure;
+
+static char cmdbufCMDBUF_SIZE; /* Buffer for holding a multi-char command */
+static int cmd_col;              /* Current column of the cursor */
+static int prompt_col;           /* Column of cursor just after prompt */
+static char *cp;                 /* Pointer into cmdbuf */
+static int cmd_offset;           /* Index into cmdbuf of first displayed char */
+static int literal;              /* Next input char should not be interpreted */
+public int updown_match = -1;    /* Prefix length in up/down movement */
+
+#if TAB_COMPLETE_FILENAME
+static int cmd_complete(int action);
+/*
+ * These variables are statics used by cmd_complete.
+ */
+static int in_completion = 0;
+static char *tk_text;
+static char *tk_original;
+static char *tk_ipoint;
+static char *tk_trial = NULL;
+static struct textlist tk_tlist;
+#endif
+
+static int cmd_left();
+static int cmd_right();
+
+#if SPACES_IN_FILENAMES
+public char openquote = '"';
+public char closequote = '"';
+#endif
+
+#if CMD_HISTORY
+
+/* History file */
+#define HISTFILE_FIRST_LINE      ".less-history-file:"
+#define HISTFILE_SEARCH_SECTION  ".search"
+#define HISTFILE_SHELL_SECTION   ".shell"
+#define HISTFILE_MARK_SECTION    ".mark"
+
+/*
+ * A mlist structure represents a command history.
+ */
+struct mlist
+{
+	struct mlist *next;
+	struct mlist *prev;
+	struct mlist *curr_mp;
+	char *string;
+	int modified;
+};
+
+/*
+ * These are the various command histories that exist.
+ */
+struct mlist mlist_search =  
+	{ &mlist_search,  &mlist_search,  &mlist_search,  NULL, 0 };
+public void *ml_search = (void *) &mlist_search;
+
+struct mlist mlist_examine = 
+	{ &mlist_examine, &mlist_examine, &mlist_examine, NULL, 0 };
+public void *ml_examine = (void *) &mlist_examine;
+
+#if SHELL_ESCAPE || PIPEC
+struct mlist mlist_shell =   
+	{ &mlist_shell,   &mlist_shell,   &mlist_shell,   NULL, 0 };
+public void *ml_shell = (void *) &mlist_shell;
+#endif
+
+#else /* CMD_HISTORY */
+
+/* If CMD_HISTORY is off, these are just flags. */
+public void *ml_search = (void *)1;
+public void *ml_examine = (void *)2;
+#if SHELL_ESCAPE || PIPEC
+public void *ml_shell = (void *)3;
+#endif
+
+#endif /* CMD_HISTORY */
+
+/*
+ * History for the current command.
+ */
+static struct mlist *curr_mlist = NULL;
+static int curr_cmdflags;
+
+static char cmd_mbc_bufMAX_UTF_CHAR_LEN;
+static int cmd_mbc_buf_len;
+static int cmd_mbc_buf_index;
+
+
+/*
+ * Reset command buffer (to empty).
+ */
+public void cmd_reset(void)
+{
+	cp = cmdbuf;
+	*cp = '\0';
+	cmd_col = 0;
+	cmd_offset = 0;
+	literal = 0;
+	cmd_mbc_buf_len = 0;
+	updown_match = -1;
+}
+
+/*
+ * Clear command line.
+ */
+public void clear_cmd(void)
+{
+	cmd_col = prompt_col = 0;
+	cmd_mbc_buf_len = 0;
+	updown_match = -1;
+}
+
+/*
+ * Display a string, usually as a prompt for input into the command buffer.
+ */
+public void cmd_putstr(constant char *s)
+{
+	LWCHAR prev_ch = 0;
+	LWCHAR ch;
+	constant char *endline = s + strlen(s);
+	while (*s != '\0')
+	{
+		char *ns = (char *) s;
+		int width;
+		ch = step_char(&ns, +1, endline);
+		while (s < ns)
+			putchr(*s++);
+		if (!utf_mode)
+			width = 1;
+		else if (is_composing_char(ch) || is_combining_char(prev_ch, ch))
+			width = 0;
+		else
+			width = is_wide_char(ch) ? 2 : 1;
+		cmd_col += width;
+		prompt_col += width;
+		prev_ch = ch;
+	}
+}
+
+/*
+ * How many characters are in the command buffer?
+ */
+public int len_cmdbuf(void)
+{
+	char *s = cmdbuf;
+	char *endline = s + strlen(s);
+	int len = 0;
+
+	while (*s != '\0')
+	{
+		step_char(&s, +1, endline);
+		len++;
+	}
+	return (len);
+}
+
+/*
+ * Common part of cmd_step_right() and cmd_step_left().
+ * {{ Returning pwidth and bswidth separately is a historical artifact
+ *    since they're always the same. Maybe clean this up someday. }}
+ */
+static char * cmd_step_common(char *p, LWCHAR ch, int len, int *pwidth, int *bswidth)
+{
+	char *pr;
+	int width;
+
+	if (len == 1)
+	{
+		pr = prchar((int) ch);
+		width = (int) strlen(pr);
+	} else

_service:tar_scm:less-633.tar.gz/command.c Added

@@ -0,0 +1,2089 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * User-level command processor.
+ */
+
+#include "less.h"
+#if MSDOS_COMPILER==WIN32C
+#include <windows.h>
+#endif
+#include "position.h"
+#include "option.h"
+#include "cmd.h"
+
+extern int erase_char, erase2_char, kill_char;
+extern int sigs;
+extern int quit_if_one_screen;
+extern int one_screen;
+extern int squished;
+extern int sc_width;
+extern int sc_height;
+extern char *kent;
+extern int swindow;
+extern int jump_sline;
+extern int quitting;
+extern int wscroll;
+extern int top_scroll;
+extern int ignore_eoi;
+extern int secure;
+extern int hshift;
+extern int bs_mode;
+extern int proc_backspace;
+extern int show_attn;
+extern int status_col;
+extern POSITION highest_hilite;
+extern POSITION start_attnpos;
+extern POSITION end_attnpos;
+extern char *every_first_cmd;
+extern char version;
+extern struct scrpos initial_scrpos;
+extern IFILE curr_ifile;
+extern void *ml_search;
+extern void *ml_examine;
+extern int wheel_lines;
+extern int header_lines;
+extern int def_search_type;
+extern int updown_match;
+#if SHELL_ESCAPE || PIPEC
+extern void *ml_shell;
+#endif
+#if EDITOR
+extern char *editor;
+extern char *editproto;
+#endif
+extern int screen_trashed;      /* The screen has been overwritten */
+extern int shift_count;
+extern int oldbot;
+extern int forw_prompt;
+extern int incr_search;
+extern int full_screen;
+#if MSDOS_COMPILER==WIN32C
+extern int utf_mode;
+#endif
+
+#if SHELL_ESCAPE
+static char *shellcmd = NULL;   /* For holding last shell command for "!!" */
+#endif
+static int mca;                 /* The multicharacter command (action) */
+static int search_type;         /* The previous type of search */
+static int last_search_type;    /* Type of last executed search */
+static LINENUM number;          /* The number typed by the user */
+static long fraction;           /* The fractional part of the number */
+static struct loption *curropt;
+static int opt_lower;
+static int optflag;
+static int optgetname;
+static POSITION bottompos;
+static int save_hshift;
+static int save_bs_mode;
+static int save_proc_backspace;
+#if PIPEC
+static char pipec;
+#endif
+
+/* Stack of ungotten chars (via ungetcc) */
+struct ungot {
+	struct ungot *ug_next;
+	LWCHAR ug_char;
+};
+static struct ungot* ungot = NULL;
+
+static void multi_search (char *pattern, int n, int silent);
+
+/*
+ * Move the cursor to start of prompt line before executing a command.
+ * This looks nicer if the command takes a long time before
+ * updating the screen.
+ */
+static void cmd_exec(void)
+{
+	clear_attn();
+	clear_bot();
+	flush();
+}
+
+/*
+ * Indicate we are reading a multi-character command.
+ */
+static void set_mca(int action)
+{
+	mca = action;
+	clear_bot();
+	clear_cmd();
+}
+
+/*
+ * Indicate we are not reading a multi-character command.
+ */
+static void clear_mca(void)
+{
+	if (mca == 0)
+		return;
+	mca = 0;
+}
+
+/*
+ * Set up the display to start a new multi-character command.
+ */
+static void start_mca(int action, constant char *prompt, void *mlist, int cmdflags)
+{
+	set_mca(action);
+	cmd_putstr(prompt);
+	set_mlist(mlist, cmdflags);
+}
+
+public int in_mca(void)
+{
+	return (mca != 0 && mca != A_PREFIX);
+}
+
+/*
+ * Set up the display to start a new search command.
+ */
+static void mca_search1(void)
+{
+	int i;
+
+#if HILITE_SEARCH
+	if (search_type & SRCH_FILTER)
+		set_mca(A_FILTER);
+	else 
+#endif
+	if (search_type & SRCH_FORW)
+		set_mca(A_F_SEARCH);
+	else
+		set_mca(A_B_SEARCH);
+
+	if (search_type & SRCH_NO_MATCH)
+		cmd_putstr("Non-match ");
+	if (search_type & SRCH_FIRST_FILE)
+		cmd_putstr("First-file ");
+	if (search_type & SRCH_PAST_EOF)
+		cmd_putstr("EOF-ignore ");
+	if (search_type & SRCH_NO_MOVE)
+		cmd_putstr("Keep-pos ");
+	if (search_type & SRCH_NO_REGEX)
+		cmd_putstr("Regex-off ");
+	if (search_type & SRCH_WRAP)
+		cmd_putstr("Wrap ");
+	for (i = 1; i <= NUM_SEARCH_COLORS; i++)
+	{
+		if (search_type & SRCH_SUBSEARCH(i))
+		{
+			char buf8;
+			SNPRINTF1(buf, sizeof(buf), "Sub-%d ", i);
+			cmd_putstr(buf);
+		}
+	}
+
+#if HILITE_SEARCH
+	if (search_type & SRCH_FILTER)
+		cmd_putstr("&/");
+	else 
+#endif
+	if (search_type & SRCH_FORW)
+		cmd_putstr("/");
+	else
+		cmd_putstr("?");
+	forw_prompt = 0;
+}
+

_service:tar_scm:less-633.tar.gz/compose.uni Added

@@ -0,0 +1,355 @@
+/* Generated by "./mkutable -f2 Mn Me -- unicode/UnicodeData.txt" on Mon Nov 14 18:19:23 PST 2022 */
+	{ 0x0300, 0x036f }, /* Mn */
+	{ 0x0483, 0x0487 }, /* Mn */
+	{ 0x0488, 0x0489 }, /* Me */
+	{ 0x0591, 0x05bd }, /* Mn */
+	{ 0x05bf, 0x05bf }, /* Mn */
+	{ 0x05c1, 0x05c2 }, /* Mn */
+	{ 0x05c4, 0x05c5 }, /* Mn */
+	{ 0x05c7, 0x05c7 }, /* Mn */
+	{ 0x0610, 0x061a }, /* Mn */
+	{ 0x064b, 0x065f }, /* Mn */
+	{ 0x0670, 0x0670 }, /* Mn */
+	{ 0x06d6, 0x06dc }, /* Mn */
+	{ 0x06df, 0x06e4 }, /* Mn */
+	{ 0x06e7, 0x06e8 }, /* Mn */
+	{ 0x06ea, 0x06ed }, /* Mn */
+	{ 0x0711, 0x0711 }, /* Mn */
+	{ 0x0730, 0x074a }, /* Mn */
+	{ 0x07a6, 0x07b0 }, /* Mn */
+	{ 0x07eb, 0x07f3 }, /* Mn */
+	{ 0x07fd, 0x07fd }, /* Mn */
+	{ 0x0816, 0x0819 }, /* Mn */
+	{ 0x081b, 0x0823 }, /* Mn */
+	{ 0x0825, 0x0827 }, /* Mn */
+	{ 0x0829, 0x082d }, /* Mn */
+	{ 0x0859, 0x085b }, /* Mn */
+	{ 0x0898, 0x089f }, /* Mn */
+	{ 0x08ca, 0x08e1 }, /* Mn */
+	{ 0x08e3, 0x0902 }, /* Mn */
+	{ 0x093a, 0x093a }, /* Mn */
+	{ 0x093c, 0x093c }, /* Mn */
+	{ 0x0941, 0x0948 }, /* Mn */
+	{ 0x094d, 0x094d }, /* Mn */
+	{ 0x0951, 0x0957 }, /* Mn */
+	{ 0x0962, 0x0963 }, /* Mn */
+	{ 0x0981, 0x0981 }, /* Mn */
+	{ 0x09bc, 0x09bc }, /* Mn */
+	{ 0x09c1, 0x09c4 }, /* Mn */
+	{ 0x09cd, 0x09cd }, /* Mn */
+	{ 0x09e2, 0x09e3 }, /* Mn */
+	{ 0x09fe, 0x09fe }, /* Mn */
+	{ 0x0a01, 0x0a02 }, /* Mn */
+	{ 0x0a3c, 0x0a3c }, /* Mn */
+	{ 0x0a41, 0x0a42 }, /* Mn */
+	{ 0x0a47, 0x0a48 }, /* Mn */
+	{ 0x0a4b, 0x0a4d }, /* Mn */
+	{ 0x0a51, 0x0a51 }, /* Mn */
+	{ 0x0a70, 0x0a71 }, /* Mn */
+	{ 0x0a75, 0x0a75 }, /* Mn */
+	{ 0x0a81, 0x0a82 }, /* Mn */
+	{ 0x0abc, 0x0abc }, /* Mn */
+	{ 0x0ac1, 0x0ac5 }, /* Mn */
+	{ 0x0ac7, 0x0ac8 }, /* Mn */
+	{ 0x0acd, 0x0acd }, /* Mn */
+	{ 0x0ae2, 0x0ae3 }, /* Mn */
+	{ 0x0afa, 0x0aff }, /* Mn */
+	{ 0x0b01, 0x0b01 }, /* Mn */
+	{ 0x0b3c, 0x0b3c }, /* Mn */
+	{ 0x0b3f, 0x0b3f }, /* Mn */
+	{ 0x0b41, 0x0b44 }, /* Mn */
+	{ 0x0b4d, 0x0b4d }, /* Mn */
+	{ 0x0b55, 0x0b56 }, /* Mn */
+	{ 0x0b62, 0x0b63 }, /* Mn */
+	{ 0x0b82, 0x0b82 }, /* Mn */
+	{ 0x0bc0, 0x0bc0 }, /* Mn */
+	{ 0x0bcd, 0x0bcd }, /* Mn */
+	{ 0x0c00, 0x0c00 }, /* Mn */
+	{ 0x0c04, 0x0c04 }, /* Mn */
+	{ 0x0c3c, 0x0c3c }, /* Mn */
+	{ 0x0c3e, 0x0c40 }, /* Mn */
+	{ 0x0c46, 0x0c48 }, /* Mn */
+	{ 0x0c4a, 0x0c4d }, /* Mn */
+	{ 0x0c55, 0x0c56 }, /* Mn */
+	{ 0x0c62, 0x0c63 }, /* Mn */
+	{ 0x0c81, 0x0c81 }, /* Mn */
+	{ 0x0cbc, 0x0cbc }, /* Mn */
+	{ 0x0cbf, 0x0cbf }, /* Mn */
+	{ 0x0cc6, 0x0cc6 }, /* Mn */
+	{ 0x0ccc, 0x0ccd }, /* Mn */
+	{ 0x0ce2, 0x0ce3 }, /* Mn */
+	{ 0x0d00, 0x0d01 }, /* Mn */
+	{ 0x0d3b, 0x0d3c }, /* Mn */
+	{ 0x0d41, 0x0d44 }, /* Mn */
+	{ 0x0d4d, 0x0d4d }, /* Mn */
+	{ 0x0d62, 0x0d63 }, /* Mn */
+	{ 0x0d81, 0x0d81 }, /* Mn */
+	{ 0x0dca, 0x0dca }, /* Mn */
+	{ 0x0dd2, 0x0dd4 }, /* Mn */
+	{ 0x0dd6, 0x0dd6 }, /* Mn */
+	{ 0x0e31, 0x0e31 }, /* Mn */
+	{ 0x0e34, 0x0e3a }, /* Mn */
+	{ 0x0e47, 0x0e4e }, /* Mn */
+	{ 0x0eb1, 0x0eb1 }, /* Mn */
+	{ 0x0eb4, 0x0ebc }, /* Mn */
+	{ 0x0ec8, 0x0ece }, /* Mn */
+	{ 0x0f18, 0x0f19 }, /* Mn */
+	{ 0x0f35, 0x0f35 }, /* Mn */
+	{ 0x0f37, 0x0f37 }, /* Mn */
+	{ 0x0f39, 0x0f39 }, /* Mn */
+	{ 0x0f71, 0x0f7e }, /* Mn */
+	{ 0x0f80, 0x0f84 }, /* Mn */
+	{ 0x0f86, 0x0f87 }, /* Mn */
+	{ 0x0f8d, 0x0f97 }, /* Mn */
+	{ 0x0f99, 0x0fbc }, /* Mn */
+	{ 0x0fc6, 0x0fc6 }, /* Mn */
+	{ 0x102d, 0x1030 }, /* Mn */
+	{ 0x1032, 0x1037 }, /* Mn */
+	{ 0x1039, 0x103a }, /* Mn */
+	{ 0x103d, 0x103e }, /* Mn */
+	{ 0x1058, 0x1059 }, /* Mn */
+	{ 0x105e, 0x1060 }, /* Mn */
+	{ 0x1071, 0x1074 }, /* Mn */
+	{ 0x1082, 0x1082 }, /* Mn */
+	{ 0x1085, 0x1086 }, /* Mn */
+	{ 0x108d, 0x108d }, /* Mn */
+	{ 0x109d, 0x109d }, /* Mn */
+	{ 0x1160, 0x11ff }, /* Mn */
+	{ 0x135d, 0x135f }, /* Mn */
+	{ 0x1712, 0x1714 }, /* Mn */
+	{ 0x1732, 0x1733 }, /* Mn */
+	{ 0x1752, 0x1753 }, /* Mn */
+	{ 0x1772, 0x1773 }, /* Mn */
+	{ 0x17b4, 0x17b5 }, /* Mn */
+	{ 0x17b7, 0x17bd }, /* Mn */
+	{ 0x17c6, 0x17c6 }, /* Mn */
+	{ 0x17c9, 0x17d3 }, /* Mn */
+	{ 0x17dd, 0x17dd }, /* Mn */
+	{ 0x180b, 0x180d }, /* Mn */
+	{ 0x180f, 0x180f }, /* Mn */
+	{ 0x1885, 0x1886 }, /* Mn */
+	{ 0x18a9, 0x18a9 }, /* Mn */
+	{ 0x1920, 0x1922 }, /* Mn */
+	{ 0x1927, 0x1928 }, /* Mn */
+	{ 0x1932, 0x1932 }, /* Mn */
+	{ 0x1939, 0x193b }, /* Mn */
+	{ 0x1a17, 0x1a18 }, /* Mn */
+	{ 0x1a1b, 0x1a1b }, /* Mn */
+	{ 0x1a56, 0x1a56 }, /* Mn */
+	{ 0x1a58, 0x1a5e }, /* Mn */
+	{ 0x1a60, 0x1a60 }, /* Mn */
+	{ 0x1a62, 0x1a62 }, /* Mn */
+	{ 0x1a65, 0x1a6c }, /* Mn */
+	{ 0x1a73, 0x1a7c }, /* Mn */
+	{ 0x1a7f, 0x1a7f }, /* Mn */
+	{ 0x1ab0, 0x1abd }, /* Mn */
+	{ 0x1abe, 0x1abe }, /* Me */
+	{ 0x1abf, 0x1ace }, /* Mn */
+	{ 0x1b00, 0x1b03 }, /* Mn */
+	{ 0x1b34, 0x1b34 }, /* Mn */
+	{ 0x1b36, 0x1b3a }, /* Mn */
+	{ 0x1b3c, 0x1b3c }, /* Mn */
+	{ 0x1b42, 0x1b42 }, /* Mn */
+	{ 0x1b6b, 0x1b73 }, /* Mn */
+	{ 0x1b80, 0x1b81 }, /* Mn */
+	{ 0x1ba2, 0x1ba5 }, /* Mn */
+	{ 0x1ba8, 0x1ba9 }, /* Mn */
+	{ 0x1bab, 0x1bad }, /* Mn */
+	{ 0x1be6, 0x1be6 }, /* Mn */
+	{ 0x1be8, 0x1be9 }, /* Mn */
+	{ 0x1bed, 0x1bed }, /* Mn */
+	{ 0x1bef, 0x1bf1 }, /* Mn */
+	{ 0x1c2c, 0x1c33 }, /* Mn */
+	{ 0x1c36, 0x1c37 }, /* Mn */
+	{ 0x1cd0, 0x1cd2 }, /* Mn */
+	{ 0x1cd4, 0x1ce0 }, /* Mn */
+	{ 0x1ce2, 0x1ce8 }, /* Mn */
+	{ 0x1ced, 0x1ced }, /* Mn */
+	{ 0x1cf4, 0x1cf4 }, /* Mn */
+	{ 0x1cf8, 0x1cf9 }, /* Mn */
+	{ 0x1dc0, 0x1dff }, /* Mn */
+	{ 0x20d0, 0x20dc }, /* Mn */
+	{ 0x20dd, 0x20e0 }, /* Me */
+	{ 0x20e1, 0x20e1 }, /* Mn */
+	{ 0x20e2, 0x20e4 }, /* Me */
+	{ 0x20e5, 0x20f0 }, /* Mn */
+	{ 0x2cef, 0x2cf1 }, /* Mn */
+	{ 0x2d7f, 0x2d7f }, /* Mn */
+	{ 0x2de0, 0x2dff }, /* Mn */
+	{ 0x302a, 0x302d }, /* Mn */
+	{ 0x3099, 0x309a }, /* Mn */
+	{ 0xa66f, 0xa66f }, /* Mn */
+	{ 0xa670, 0xa672 }, /* Me */
+	{ 0xa674, 0xa67d }, /* Mn */
+	{ 0xa69e, 0xa69f }, /* Mn */
+	{ 0xa6f0, 0xa6f1 }, /* Mn */
+	{ 0xa802, 0xa802 }, /* Mn */
+	{ 0xa806, 0xa806 }, /* Mn */
+	{ 0xa80b, 0xa80b }, /* Mn */
+	{ 0xa825, 0xa826 }, /* Mn */
+	{ 0xa82c, 0xa82c }, /* Mn */
+	{ 0xa8c4, 0xa8c5 }, /* Mn */
+	{ 0xa8e0, 0xa8f1 }, /* Mn */
+	{ 0xa8ff, 0xa8ff }, /* Mn */
+	{ 0xa926, 0xa92d }, /* Mn */
+	{ 0xa947, 0xa951 }, /* Mn */
+	{ 0xa980, 0xa982 }, /* Mn */
+	{ 0xa9b3, 0xa9b3 }, /* Mn */
+	{ 0xa9b6, 0xa9b9 }, /* Mn */
+	{ 0xa9bc, 0xa9bd }, /* Mn */

_service:tar_scm:less-633.tar.gz/configure Added

@@ -0,0 +1,6810 @@
+#! /bin/sh
+# Guess values for system-dependent variables and create Makefiles.
+# Generated by GNU Autoconf 2.69 for less 1.
+#
+#
+# Copyright (C) 1992-1996, 1998-2012 Free Software Foundation, Inc.
+#
+#
+# This configure script is free software; the Free Software Foundation
+# gives unlimited permission to copy, distribute and modify it.
+## -------------------- ##
+## M4sh Initialization. ##
+## -------------------- ##
+
+# Be more Bourne compatible
+DUALCASE=1; export DUALCASE # for MKS sh
+if test -n "${ZSH_VERSION+set}" && (emulate sh) >/dev/null 2>&1; then :
+  emulate sh
+  NULLCMD=:
+  # Pre-4.2 versions of Zsh do word splitting on ${1+"$@"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '${1+"$@"}'='"$@"'
+  setopt NO_GLOB_SUBST
+else
+  case `(set -o) 2>/dev/null` in #(
+  *posix*) :
+    set -o posix ;; #(
+  *) :
+     ;;
+esac
+fi
+
+
+as_nl='
+'
+export as_nl
+# Printing a long string crashes Solaris 7 /usr/bin/printf.
+as_echo='\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\'
+as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo
+as_echo=$as_echo$as_echo$as_echo$as_echo$as_echo$as_echo
+# Prefer a ksh shell builtin over an external printf program on Solaris,
+# but without wasting forks for bash or zsh.
+if test -z "$BASH_VERSION$ZSH_VERSION" \
+    && (test "X`print -r -- $as_echo`" = "X$as_echo") 2>/dev/null; then
+  as_echo='print -r --'
+  as_echo_n='print -rn --'
+elif (test "X`printf %s $as_echo`" = "X$as_echo") 2>/dev/null; then
+  as_echo='printf %s\n'
+  as_echo_n='printf %s'
+else
+  if test "X`(/usr/ucb/echo -n -n $as_echo) 2>/dev/null`" = "X-n $as_echo"; then
+    as_echo_body='eval /usr/ucb/echo -n "$1$as_nl"'
+    as_echo_n='/usr/ucb/echo -n'
+  else
+    as_echo_body='eval expr "X$1" : "X\$.*\$"'
+    as_echo_n_body='eval
+      arg=$1;
+      case $arg in #(
+      *"$as_nl"*)
+	expr "X$arg" : "X\$.*\$$as_nl";
+	arg=`expr "X$arg" : ".*$as_nl\$.*\$"`;;
+      esac;
+      expr "X$arg" : "X\$.*\$" | tr -d "$as_nl"
+    '
+    export as_echo_n_body
+    as_echo_n='sh -c $as_echo_n_body as_echo'
+  fi
+  export as_echo_body
+  as_echo='sh -c $as_echo_body as_echo'
+fi
+
+# The user is always right.
+if test "${PATH_SEPARATOR+set}" != set; then
+  PATH_SEPARATOR=:
+  (PATH='/bin;/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 && {
+    (PATH='/bin:/bin'; FPATH=$PATH; sh -c :) >/dev/null 2>&1 ||
+      PATH_SEPARATOR=';'
+  }
+fi
+
+
+# IFS
+# We need space, tab and new line, in precisely that order.  Quoting is
+# there to prevent editors from complaining about space-tab.
+# (If _AS_PATH_WALK were called with IFS unset, it would disable word
+# splitting by setting IFS to empty value.)
+IFS=" ""	$as_nl"
+
+# Find who we are.  Look in the path if we contain no directory separator.
+as_myself=
+case $0 in #((
+  *\\/* ) as_myself=$0 ;;
+  *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR
+for as_dir in $PATH
+do
+  IFS=$as_save_IFS
+  test -z "$as_dir" && as_dir=.
+    test -r "$as_dir/$0" && as_myself=$as_dir/$0 && break
+  done
+IFS=$as_save_IFS
+
+     ;;
+esac
+# We did not find ourselves, most probably we were run as `sh COMMAND'
+# in which case we are not to be found in the path.
+if test "x$as_myself" = x; then
+  as_myself=$0
+fi
+if test ! -f "$as_myself"; then
+  $as_echo "$as_myself: error: cannot find myself; rerun with an absolute file name" >&2
+  exit 1
+fi
+
+# Unset variables that we do not need and which cause bugs (e.g. in
+# pre-3.0 UWIN ksh).  But do not cause bugs in bash 2.01; the "|| exit 1"
+# suppresses any "Segmentation fault" message there.  '((' could
+# trigger a bug in pdksh 5.2.14.
+for as_var in BASH_ENV ENV MAIL MAILPATH
+do eval test x\${$as_var+set} = xset \
+  && ( (unset $as_var) || exit 1) >/dev/null 2>&1 && unset $as_var || :
+done
+PS1='$ '
+PS2='> '
+PS4='+ '
+
+# NLS nuisances.
+LC_ALL=C
+export LC_ALL
+LANGUAGE=C
+export LANGUAGE
+
+# CDPATH.
+(unset CDPATH) >/dev/null 2>&1 && unset CDPATH
+
+# Use a proper internal environment variable to ensure we don't fall
+  # into an infinite loop, continuously re-executing ourselves.
+  if test x"${_as_can_reexec}" != xno && test "x$CONFIG_SHELL" != x; then
+    _as_can_reexec=no; export _as_can_reexec;
+    # We cannot yet assume a decent shell, so we have to provide a
+# neutralization value for shells without unset; and this also
+# works around shells that cannot unset nonexistent variables.
+# Preserve -v and -x to the replacement shell.
+BASH_ENV=/dev/null
+ENV=/dev/null
+(unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV
+case $- in # ((((
+  *v*x* | *x*v* ) as_opts=-vx ;;
+  *v* ) as_opts=-v ;;
+  *x* ) as_opts=-x ;;
+  * ) as_opts= ;;
+esac
+exec $CONFIG_SHELL $as_opts "$as_myself" ${1+"$@"}
+# Admittedly, this is quite paranoid, since all the known shells bail
+# out after a failed `exec'.
+$as_echo "$0: could not re-execute with $CONFIG_SHELL" >&2
+as_fn_exit 255
+  fi
+  # We don't want this to propagate to other subprocesses.
+          { _as_can_reexec=; unset _as_can_reexec;}
+if test "x$CONFIG_SHELL" = x; then
+  as_bourne_compatible="if test -n \"\${ZSH_VERSION+set}\" && (emulate sh) >/dev/null 2>&1; then :
+  emulate sh
+  NULLCMD=:
+  # Pre-4.2 versions of Zsh do word splitting on \${1+\"\$@\"}, which
+  # is contrary to our usage.  Disable this feature.
+  alias -g '\${1+\"\$@\"}'='\"\$@\"'
+  setopt NO_GLOB_SUBST
+else
+  case \`(set -o) 2>/dev/null\` in #(
+  *posix*) :
+    set -o posix ;; #(
+  *) :
+     ;;
+esac
+fi
+"
+  as_required="as_fn_return () { (exit \$1); }
+as_fn_success () { as_fn_return 0; }
+as_fn_failure () { as_fn_return 1; }
+as_fn_ret_success () { return 0; }
+as_fn_ret_failure () { return 1; }
+
+exitcode=0
+as_fn_success || { exitcode=1; echo as_fn_success failed.; }
+as_fn_failure && { exitcode=1; echo as_fn_failure succeeded.; }
+as_fn_ret_success || { exitcode=1; echo as_fn_ret_success failed.; }
+as_fn_ret_failure && { exitcode=1; echo as_fn_ret_failure succeeded.; }
+if ( set x; as_fn_ret_success y && test x = \"\$1\" ); then :
+
+else
+  exitcode=1; echo positional parameters were not saved.
+fi
+test x\$exitcode = x0 || exit 1
+test -x / || exit 1"
+  as_suggested="  as_lineno_1=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_1a=\$LINENO
+  as_lineno_2=";as_suggested=$as_suggested$LINENO;as_suggested=$as_suggested" as_lineno_2a=\$LINENO
+  eval 'test \"x\$as_lineno_1'\$as_run'\" != \"x\$as_lineno_2'\$as_run'\" &&
+  test \"x\`expr \$as_lineno_1'\$as_run' + 1\`\" = \"x\$as_lineno_2'\$as_run'\"' || exit 1
+test \$(( 1 + 1 )) = 2 || exit 1"

_service:tar_scm:less-633.tar.gz/configure.ac Added

@@ -0,0 +1,696 @@
+# Process this file with autoconf to produce a configure script.
+
+# Copyright (C) 1984-2023  Mark Nudelman
+#
+# You may distribute under the terms of either the GNU General Public
+# License or the Less License, as specified in the README file.
+#
+# For more information about less, or for information on how to 
+# contact the author, see the README file.
+
+# Autoconf initialization.
+AC_INIT(less,1)
+AC_CONFIG_SRCDIR(forwback.c)
+AC_CONFIG_HEADERS(defines.h)
+
+# Checks for programs.
+AC_PROG_CC
+AC_SEARCH_LIBS(strerror,cposix)
+AC_PROG_GCC_TRADITIONAL
+AC_PROG_INSTALL
+
+# Checks for compilation model.
+AC_SYS_LARGEFILE
+
+# Checks for general libraries.
+AC_CHECK_LIB(tinfo, tgoto, have_tinfo=yes, have_tinfo=no)
+AC_CHECK_LIB(tinfow, tgoto, have_tinfow=yes, have_tinfow=no)
+AC_CHECK_LIB(xcurses, initscr, have_xcurses=yes, have_xcurses=no)
+AC_CHECK_LIB(ncursesw, initscr, have_ncursesw=yes, have_ncursesw=no)
+AC_CHECK_LIB(ncurses, initscr, have_ncurses=yes, have_ncurses=no)
+AC_CHECK_LIB(curses, initscr, have_curses=yes, have_curses=no)
+AC_CHECK_LIB(termcap, tgetent, have_termcap=yes, have_termcap=no)
+AC_CHECK_LIB(termlib, tgetent, have_termlib=yes, have_termlib=no)
+# Regular expressions (regcmp) are in -lgen on Solaris 2, (but in libc
+# at least on Solaris 10 (2.10)) and in -lintl on SCO Unix.
+AC_SEARCH_LIBS(regcmp, gen intl PW)
+
+# Checks for header files.
+AC_CHECK_HEADERS_ONCE(ctype.h errno.h fcntl.h inttypes.h limits.h stdckdint.h stdio.h stdlib.h string.h termcap.h ncurses/termcap.h ncursesw/termcap.h termio.h termios.h time.h unistd.h values.h linux/magic.h sys/ioctl.h sys/stream.h sys/types.h sys/wait.h time.h wctype.h)
+
+# Checks for typedefs, structures, and compiler characteristics.
+AC_HEADER_STAT
+AC_C_CONST
+AC_TYPE_OFF_T
+AC_TYPE_SIZE_T
+
+# Checks for terminal libraries
+AC_MSG_CHECKING(for working terminal libraries)
+TERMLIBS=
+include_termcap_h=
+if test "x$ac_cv_header_termcap_h" = xyes; then include_termcap_h="#include <termcap.h>"; elif test "x$ac_cv_header_ncurses_termcap_h" = xyes; then include_termcap_h="#include <ncurses/termcap.h>"; elif test "x$ac_cv_header_ncursesw_termcap_h" = xyes; then include_termcap_h="#include <ncursesw/termcap.h>"; fi
+
+# Check for systems where curses is broken.
+curses_broken=0
+if test x`uname -s` = "xHP-UX" >/dev/null 2>&1; then
+if test x`uname -r` = "xB.11.00" >/dev/null 2>&1; then
+   curses_broken=1
+fi
+if test x`uname -r` = "xB.11.11" >/dev/null 2>&1; then
+   curses_broken=1
+fi
+fi
+
+if test $curses_broken = 0; then
+
+# -- Try tinfo.
+if test "x$TERMLIBS" = x; then
+  if test $have_tinfo = yes; then
+    TERMLIBS="-ltinfo"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try tinfow.
+if test "x$TERMLIBS" = x; then
+  if test $have_tinfow = yes; then
+    TERMLIBS="-ltinfow"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try xcurses.
+if test "x$TERMLIBS" = x; then
+  if test $have_xcurses = yes; then
+    TERMLIBS="-lxcurses"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try ncursesw.
+if test "x$TERMLIBS" = x; then
+  if test $have_ncursesw = yes; then
+    TERMLIBS="-lncursesw"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try ncurses.
+if test "x$TERMLIBS" = x; then
+  if test $have_ncurses = yes; then
+    TERMLIBS="-lncurses"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try curses.
+if test "x$TERMLIBS" = x; then
+  if test $have_curses = yes; then
+    TERMLIBS="-lcurses"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try curses & termcap.
+if test "x$TERMLIBS" = x; then
+  if test $have_curses = yes; then
+  if test $have_termcap = yes; then
+    TERMLIBS="-lcurses -ltermcap"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+  fi
+fi
+fi
+
+# -- Try termcap.
+if test "x$TERMLIBS" = x; then
+  if test $have_termcap = yes; then
+    TERMLIBS="-ltermcap"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+# -- Try termlib.
+if test "x$TERMLIBS" = x; then
+  if test $have_termlib = yes; then
+    TERMLIBS="-lcurses -ltermlib"
+    SAVE_LIBS=$LIBS
+    LIBS="$LIBS $TERMLIBS"
+    AC_LINK_IFELSE(AC_LANG_PROGRAM($include_termcap_h, tgetent(0,0); tgetflag(0); tgetnum(0); tgetstr(0,0);),termok=yes,termok=no)
+    LIBS=$SAVE_LIBS
+    if test $termok = no; then TERMLIBS=""; fi
+  fi
+fi
+
+if test "x$TERMLIBS" = x; then
+  AC_MSG_RESULT(Cannot find terminal libraries - configure failed)
+  exit 1
+fi
+AC_MSG_RESULT(using $TERMLIBS)
+LIBS="$LIBS $TERMLIBS"
+
+# Autoheader templates for symbols defined later by AC_DEFINE.
+AH_TEMPLATE(HAVE_GNU_REGEX,
+	GNU regex library)
+AH_TEMPLATE(HAVE_POSIX_REGCOMP,
+	POSIX regcomp() and regex.h)
+AH_TEMPLATE(HAVE_PCRE,
+	PCRE (Perl-compatible regular expression) library)
+AH_TEMPLATE(HAVE_PCRE2,
+	PCRE2 (Perl-compatible regular expression) library)
+AH_TEMPLATE(HAVE_RE_COMP,
+	BSD re_comp())
+AH_TEMPLATE(HAVE_REGCMP,
+	System V regcmp())
+AH_TEMPLATE(HAVE_V8_REGCOMP,
+	Henry Spencer V8 regcomp() and regexp.h)
+AH_TEMPLATE(NO_REGEX,

_service:tar_scm:less-633.tar.gz/cvt.c Added

@@ -0,0 +1,107 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+/*
+ * Routines to convert text in various ways.  Used by search.
+ */
+
+#include "less.h"
+#include "charset.h"
+
+extern int utf_mode;
+
+/*
+ * Get the length of a buffer needed to convert a string.
+ */
+public int cvt_length(int len, int ops)
+{
+	if (utf_mode)
+		/*
+		 * Just copying a string in UTF-8 mode can cause it to grow 
+		 * in length.
+		 * Four output bytes for one input byte is the worst case.
+		 */
+		len *= 4;
+	return (len + 1);
+}
+
+/*
+ * Allocate a chpos array for use by cvt_text.
+ */
+public int * cvt_alloc_chpos(int len)
+{
+	int i;
+	int *chpos = (int *) ecalloc(sizeof(int), len);
+	/* Initialize all entries to an invalid position. */
+	for (i = 0;  i < len;  i++)
+		chposi = -1;
+	return (chpos);
+}
+
+/*
+ * Convert text.  Perform the transformations specified by ops.
+ * Returns converted text in odst.  The original offset of each
+ * odst character (when it was in osrc) is returned in the chpos array.
+ */
+public void cvt_text(char *odst, char *osrc, int *chpos, int *lenp, int ops)
+{
+	char *dst;
+	char *edst = odst;
+	char *src;
+	char *src_end;
+	LWCHAR ch;
+
+	if (lenp != NULL)
+		src_end = osrc + *lenp;
+	else
+		src_end = osrc + strlen(osrc);
+
+	for (src = osrc, dst = odst;  src < src_end;  )
+	{
+		int src_pos = (int) (src - osrc);
+		int dst_pos = (int) (dst - odst);
+		struct ansi_state *pansi;
+		ch = step_char(&src, +1, src_end);
+		if ((ops & CVT_BS) && ch == '\b' && dst > odst)
+		{
+			/* Delete backspace and preceding char. */
+			do {
+				dst--;
+			} while (dst > odst && utf_mode &&
+				!IS_ASCII_OCTET(*dst) && !IS_UTF8_LEAD(*dst));
+		} else if ((ops & CVT_ANSI) && (pansi = ansi_start(ch)) != NULL)
+		{
+			/* Skip to end of ANSI escape sequence. */
+			while (src < src_end)
+			{
+				if (ansi_step(pansi, ch) != ANSI_MID)
+					break;
+				ch = *src++;
+			}
+			ansi_done(pansi);
+		} else
+		{
+			/* Just copy the char to the destination buffer. */
+			if ((ops & CVT_TO_LC) && IS_UPPER(ch))
+				ch = TO_LOWER(ch);
+			put_wchar(&dst, ch);
+			/* Record the original position of the char. */
+			if (chpos != NULL)
+				chposdst_pos = src_pos;
+		}
+		if (dst > edst)
+			edst = dst;
+	}
+	if ((ops & CVT_CRLF) && edst > odst && edst-1 == '\r')
+		edst--;
+	*edst = '\0';
+	if (lenp != NULL)
+		*lenp = (int) (edst - odst);
+	/* FIXME: why was this here?  if (chpos != NULL) chposdst - odst = src - osrc; */
+}

_service:tar_scm:less-633.tar.gz/decode.c Added

@@ -0,0 +1,1017 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines to decode user commands.
+ *
+ * This is all table driven.
+ * A command table is a sequence of command descriptors.
+ * Each command descriptor is a sequence of bytes with the following format:
+ *     <c1><c2>...<cN><0><action>
+ * The characters c1,c2,...,cN are the command string; that is,
+ * the characters which the user must type.
+ * It is terminated by a null <0> byte.
+ * The byte after the null byte is the action code associated
+ * with the command string.
+ * If an action byte is OR-ed with A_EXTRA, this indicates
+ * that the option byte is followed by an extra string.
+ *
+ * There may be many command tables.
+ * The first (default) table is built-in.
+ * Other tables are read in from "lesskey" files.
+ * All the tables are linked together and are searched in order.
+ */
+
+#include "less.h"
+#include "cmd.h"
+#include "lesskey.h"
+
+extern int erase_char, erase2_char, kill_char;
+extern int secure;
+extern int mousecap;
+extern int screen_trashed;
+extern int sc_height;
+
+#define SK(k) \
+	SK_SPECIAL_KEY, (k), 6, 1, 1, 1
+/*
+ * Command table is ordered roughly according to expected
+ * frequency of use, so the common commands are near the beginning.
+ */
+
+static unsigned char cmdtable =
+{
+	'\r',0,                         A_F_LINE,
+	'\n',0,                         A_F_LINE,
+	'e',0,                          A_F_LINE,
+	'j',0,                          A_F_LINE,
+	SK(SK_DOWN_ARROW),0,            A_F_LINE,
+	CONTROL('E'),0,                 A_F_LINE,
+	CONTROL('N'),0,                 A_F_LINE,
+	'k',0,                          A_B_LINE,
+	'y',0,                          A_B_LINE,
+	CONTROL('Y'),0,                 A_B_LINE,
+	SK(SK_CONTROL_K),0,             A_B_LINE,
+	CONTROL('P'),0,                 A_B_LINE,
+	SK(SK_UP_ARROW),0,              A_B_LINE,
+	'J',0,                          A_FF_LINE,
+	'K',0,                          A_BF_LINE,
+	'Y',0,                          A_BF_LINE,
+	'd',0,                          A_F_SCROLL,
+	CONTROL('D'),0,                 A_F_SCROLL,
+	'u',0,                          A_B_SCROLL,
+	CONTROL('U'),0,                 A_B_SCROLL,
+	ESC,'','M',0,                  A_X11MOUSE_IN,
+	ESC,'','<',0,                  A_X116MOUSE_IN,
+	' ',0,                          A_F_SCREEN,
+	'f',0,                          A_F_SCREEN,
+	CONTROL('F'),0,                 A_F_SCREEN,
+	CONTROL('V'),0,                 A_F_SCREEN,
+	SK(SK_PAGE_DOWN),0,             A_F_SCREEN,
+	'b',0,                          A_B_SCREEN,
+	CONTROL('B'),0,                 A_B_SCREEN,
+	ESC,'v',0,                      A_B_SCREEN,
+	SK(SK_PAGE_UP),0,               A_B_SCREEN,
+	'z',0,                          A_F_WINDOW,
+	'w',0,                          A_B_WINDOW,
+	ESC,' ',0,                      A_FF_SCREEN,
+	'F',0,                          A_F_FOREVER,
+	ESC,'F',0,                      A_F_UNTIL_HILITE,
+	'R',0,                          A_FREPAINT,
+	'r',0,                          A_REPAINT,
+	CONTROL('R'),0,                 A_REPAINT,
+	CONTROL('L'),0,                 A_REPAINT,
+	ESC,'u',0,                      A_UNDO_SEARCH,
+	ESC,'U',0,                      A_CLR_SEARCH,
+	'g',0,                          A_GOLINE,
+	SK(SK_HOME),0,                  A_GOLINE,
+	'<',0,                          A_GOLINE,
+	ESC,'<',0,                      A_GOLINE,
+	'p',0,                          A_PERCENT,
+	'%',0,                          A_PERCENT,
+	ESC,'',0,                      A_LSHIFT,
+	ESC,'',0,                      A_RSHIFT,
+	ESC,'(',0,                      A_LSHIFT,
+	ESC,')',0,                      A_RSHIFT,
+	ESC,'{',0,                      A_LLSHIFT,
+	ESC,'}',0,                      A_RRSHIFT,
+	SK(SK_RIGHT_ARROW),0,           A_RSHIFT,
+	SK(SK_LEFT_ARROW),0,            A_LSHIFT,
+	SK(SK_CTL_RIGHT_ARROW),0,       A_RRSHIFT,
+	SK(SK_CTL_LEFT_ARROW),0,        A_LLSHIFT,
+	'{',0,                          A_F_BRACKET|A_EXTRA,        '{','}',0,
+	'}',0,                          A_B_BRACKET|A_EXTRA,        '{','}',0,
+	'(',0,                          A_F_BRACKET|A_EXTRA,        '(',')',0,
+	')',0,                          A_B_BRACKET|A_EXTRA,        '(',')',0,
+	'',0,                          A_F_BRACKET|A_EXTRA,        '','',0,
+	'',0,                          A_B_BRACKET|A_EXTRA,        '','',0,
+	ESC,CONTROL('F'),0,             A_F_BRACKET,
+	ESC,CONTROL('B'),0,             A_B_BRACKET,
+	'G',0,                          A_GOEND,
+	ESC,'G',0,                      A_GOEND_BUF,
+	ESC,'>',0,                      A_GOEND,
+	'>',0,                          A_GOEND,
+	SK(SK_END),0,                   A_GOEND,
+	'P',0,                          A_GOPOS,
+
+	'0',0,                          A_DIGIT,
+	'1',0,                          A_DIGIT,
+	'2',0,                          A_DIGIT,
+	'3',0,                          A_DIGIT,
+	'4',0,                          A_DIGIT,
+	'5',0,                          A_DIGIT,
+	'6',0,                          A_DIGIT,
+	'7',0,                          A_DIGIT,
+	'8',0,                          A_DIGIT,
+	'9',0,                          A_DIGIT,
+	'.',0,                          A_DIGIT,
+
+	'=',0,                          A_STAT,
+	CONTROL('G'),0,                 A_STAT,
+	':','f',0,                      A_STAT,
+	'/',0,                          A_F_SEARCH,
+	'?',0,                          A_B_SEARCH,
+	ESC,'/',0,                      A_F_SEARCH|A_EXTRA,        '*',0,
+	ESC,'?',0,                      A_B_SEARCH|A_EXTRA,        '*',0,
+	'n',0,                          A_AGAIN_SEARCH,
+	ESC,'n',0,                      A_T_AGAIN_SEARCH,
+	'N',0,                          A_REVERSE_SEARCH,
+	ESC,'N',0,                      A_T_REVERSE_SEARCH,
+	'&',0,                          A_FILTER,
+	'm',0,                          A_SETMARK,
+	'M',0,                          A_SETMARKBOT,
+	ESC,'m',0,                      A_CLRMARK,
+	'\'',0,                         A_GOMARK,
+	CONTROL('X'),CONTROL('X'),0,    A_GOMARK,
+	'E',0,                          A_EXAMINE,
+	':','e',0,                      A_EXAMINE,
+	CONTROL('X'),CONTROL('V'),0,    A_EXAMINE,
+	':','n',0,                      A_NEXT_FILE,
+	':','p',0,                      A_PREV_FILE,
+	't',0,                          A_NEXT_TAG,
+	'T',0,                          A_PREV_TAG,
+	':','x',0,                      A_INDEX_FILE,
+	':','d',0,                      A_REMOVE_FILE,
+	'-',0,                          A_OPT_TOGGLE,
+	':','t',0,                      A_OPT_TOGGLE|A_EXTRA,        't',0,
+	's',0,                          A_OPT_TOGGLE|A_EXTRA,        'o',0,
+	'_',0,                          A_DISP_OPTION,
+	'|',0,                          A_PIPE,
+	'v',0,                          A_VISUAL,
+	'!',0,                          A_SHELL,
+	'#',0,                          A_PSHELL,
+	'+',0,                          A_FIRSTCMD,
+
+	'H',0,                          A_HELP,
+	'h',0,                          A_HELP,
+	SK(SK_F1),0,                    A_HELP,
+	'V',0,                          A_VERSION,
+	'q',0,                          A_QUIT,
+	'Q',0,                          A_QUIT,
+	':','q',0,                      A_QUIT,
+	':','Q',0,                      A_QUIT,
+	'Z','Z',0,                      A_QUIT
+};
+
+static unsigned char edittable =
+{
+	'\t',0,                         EC_F_COMPLETE,  /* TAB */
+	'\17',0,                        EC_B_COMPLETE,  /* BACKTAB */
+	SK(SK_BACKTAB),0,               EC_B_COMPLETE,  /* BACKTAB */
+	ESC,'\t',0,                     EC_B_COMPLETE,  /* ESC TAB */
+	CONTROL('L'),0,                 EC_EXPAND,      /* CTRL-L */
+	CONTROL('V'),0,                 EC_LITERAL,     /* BACKSLASH */
+	CONTROL('A'),0,                 EC_LITERAL,     /* BACKSLASH */
+	ESC,'l',0,                      EC_RIGHT,       /* ESC l */
+	SK(SK_RIGHT_ARROW),0,           EC_RIGHT,       /* RIGHTARROW */
+	ESC,'h',0,                      EC_LEFT,        /* ESC h */
+	SK(SK_LEFT_ARROW),0,            EC_LEFT,        /* LEFTARROW */
+	ESC,'b',0,                      EC_W_LEFT,      /* ESC b */
+	ESC,SK(SK_LEFT_ARROW),0,        EC_W_LEFT,      /* ESC LEFTARROW */
+	SK(SK_CTL_LEFT_ARROW),0,        EC_W_LEFT,      /* CTRL-LEFTARROW */
+	ESC,'w',0,                      EC_W_RIGHT,     /* ESC w */

_service:tar_scm:less-633.tar.gz/defines.ds Added

@@ -0,0 +1,420 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/* DOS definition file for less.  */
+/*
+ * This file has 2 sections:
+ * User preferences.
+ * Settings always true for MS-DOS systems. 
+ */
+&#xc;
+/* User preferences.  */
+
+/*
+ * SECURE is 1 if you wish to disable a bunch of features in order to
+ * be safe to run by unprivileged users.
+ */
+#define	SECURE		0
+
+/*
+ * SHELL_ESCAPE is 1 if you wish to allow shell escapes.
+ * (This is possible only if your system supplies the system() function.)
+ */
+#define	SHELL_ESCAPE	(!SECURE)
+
+/*
+ * EXAMINE is 1 if you wish to allow examining files by name from within less.
+ */
+#define	EXAMINE		(!SECURE)
+
+/*
+ * TAB_COMPLETE_FILENAME is 1 if you wish to allow the TAB key
+ * to complete filenames at prompts.
+ */
+#define	TAB_COMPLETE_FILENAME	(!SECURE)
+
+/*
+ * CMD_HISTORY is 1 if you wish to allow keys to cycle through
+ * previous commands at prompts.
+ */
+#define	CMD_HISTORY	1
+
+/*
+ * HILITE_SEARCH is 1 if you wish to have search targets to be 
+ * displayed in standout mode.
+ */
+#define	HILITE_SEARCH	1
+
+/*
+ * EDITOR is 1 if you wish to allow editor invocation (the "v" command).
+ * (This is possible only if your system supplies the system() function.)
+ * EDIT_PGM is the name of the (default) editor to be invoked.
+ */
+#define	EDITOR		(!SECURE)
+#define	EDIT_PGM	"vi"
+
+/*
+ * TAGS is 1 if you wish to support tag files.
+ */
+#define	TAGS		(!SECURE)
+
+/*
+ * USERFILE is 1 if you wish to allow a .less file to specify 
+ * user-defined key bindings.
+ */
+#define	USERFILE	(!SECURE)
+
+/*
+ * GLOB is 1 if you wish to have shell metacharacters expanded in filenames.
+ * This will generally work if your system provides the "popen" function
+ * and the "echo" shell command.
+ */
+#ifdef __DJGPP__
+#define	GLOB		(!SECURE)
+#else
+#define	GLOB		0
+#endif
+
+/*
+ * PIPEC is 1 if you wish to have the "|" command
+ * which allows the user to pipe data into a shell command.
+ */
+#ifdef __DJGPP__
+#define	PIPEC		(!SECURE)
+#else
+#define	PIPEC		0
+#endif
+
+/*
+ * LOGFILE is 1 if you wish to allow the -o option (to create log files).
+ */
+#define	LOGFILE		(!SECURE)
+
+/*
+ * GNU_OPTIONS is 1 if you wish to support the GNU-style command
+ * line options --help and --version.
+ */
+#define	GNU_OPTIONS	1
+
+/*
+ * ONLY_RETURN is 1 if you want RETURN to be the only input which
+ * will continue past an error message.
+ * Otherwise, any key will continue past an error message.
+ */
+#define	ONLY_RETURN	0
+
+/*
+ * LESSKEYFILE is the filename of the default lesskey output file 
+ * (in the HOME directory).
+ * LESSKEYFILE_SYS is the filename of the system-wide lesskey output file.
+ * DEF_LESSKEYINFILE is the filename of the default lesskey input 
+ * (in the HOME directory).
+ * LESSHISTFILE is the filename of the history file
+ * (in the HOME directory).
+ */
+#define	LESSKEYFILE		"_less"
+#define	LESSKEYFILE_SYS		"c:\\_sysless"
+#define	DEF_LESSKEYINFILE	"_lesskey"
+#define	LESSKEYINFILE_SYS	"c:\\_syslesskey"
+#define LESSHISTFILE		"_lesshst"
+
+&#xc;
+/* Settings always true for MS-DOS systems.  */
+
+/*
+ * Define MSDOS_COMPILER if compiling for MS-DOS.
+ */
+#ifdef __DJGPP__
+#define	MSDOS_COMPILER		DJGPPC
+#else
+#ifdef __BORLANDC__
+#define	MSDOS_COMPILER		BORLANDC
+#else
+#define	MSDOS_COMPILER		MSOFTC
+#endif
+#endif
+
+/*
+ * Pathname separator character.
+ */
+#define	PATHNAME_SEP	"\\"
+
+/*
+ * HAVE_ANSI_PROTOS	is 1 if your compiler supports ANSI function prototypes.
+ */
+#define HAVE_ANSI_PROTOS	1
+
+/*
+ * HAVE_SYS_TYPES_H is 1 if your system has <sys/types.h>.
+ */
+#define HAVE_SYS_TYPES_H	1
+
+/*
+ * Define if you have the <sgstat.h> header file.
+ */
+#define HAVE_SGSTAT_H	0
+
+/*
+ * HAVE_PERROR is 1 if your system has the perror() call.
+ * (Actually, if it has sys_errlist, sys_nerr and errno.)
+ */
+#define	HAVE_PERROR	1
+
+/*
+ * HAVE_TIME is 1 if your system has the time() call.
+ */
+#define	HAVE_TIME	1
+
+/*
+ * HAVE_SHELL is 1 if your system supports a SHELL command interpreter.
+ */
+#define	HAVE_SHELL	0
+
+/*
+ * Default shell metacharacters and meta-escape character.
+ */
+#define	DEF_METACHARS	"; *?\t\n'\"()<>|&"
+#define	DEF_METAESCAPE	""
+
+/* 
+ * HAVE_DUP is 1 if your system has the dup() call.
+ */
+#define	HAVE_DUP	1
+
+/* Define to 1 to support reading lesskey source files (not just binary). */
+#define HAVE_LESSKEYSRC 1
+
+/*
+ * Sizes of various buffers.
+ */
+#if 0 /* old sizes for small memory machines
+#define	CMDBUF_SIZE	512	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	100	/* Max chars to unget() */

_service:tar_scm:less-633.tar.gz/defines.h.in Added

@@ -0,0 +1,480 @@
+/* defines.h.in.  Generated from configure.ac by autoheader.  */
+
+
+/* Unix definition file for less.  -*- C -*-
+ *
+ * This file has 3 sections:
+ * User preferences.
+ * Settings always true on Unix.
+ * Settings automatically determined by configure.
+ *
+ * * * * * *  WARNING  * * * * * *
+ * If you edit defines.h by hand, do "touch stamp-h" before you run make
+ * so config.status doesn't overwrite your changes.
+ */
+
+/* User preferences.  */
+
+/*
+ * SECURE is 1 if you wish to disable a bunch of features in order to
+ * be safe to run by unprivileged users.
+ * SECURE_COMPILE is set by the --with-secure configure option.
+ */
+#define	SECURE		SECURE_COMPILE
+
+/*
+ * SHELL_ESCAPE is 1 if you wish to allow shell escapes.
+ * (This is possible only if your system supplies the system() function.)
+ */
+#define	SHELL_ESCAPE	(!SECURE)
+
+/*
+ * EXAMINE is 1 if you wish to allow examining files by name from within less.
+ */
+#define	EXAMINE		(!SECURE)
+
+/*
+ * TAB_COMPLETE_FILENAME is 1 if you wish to allow the TAB key
+ * to complete filenames at prompts.
+ */
+#define	TAB_COMPLETE_FILENAME	(!SECURE)
+
+/*
+ * CMD_HISTORY is 1 if you wish to allow keys to cycle through
+ * previous commands at prompts.
+ */
+#define	CMD_HISTORY	1
+
+/*
+ * HILITE_SEARCH is 1 if you wish to have search targets to be 
+ * displayed in standout mode.
+ */
+#define	HILITE_SEARCH	1
+
+/*
+ * EDITOR is 1 if you wish to allow editor invocation (the "v" command).
+ * (This is possible only if your system supplies the system() function.)
+ * EDIT_PGM is the name of the (default) editor to be invoked.
+ */
+#define	EDITOR		(!SECURE)
+
+/*
+ * TAGS is 1 if you wish to support tag files.
+ */
+#define	TAGS		(!SECURE)
+
+/*
+ * USERFILE is 1 if you wish to allow a .less file to specify 
+ * user-defined key bindings.
+ */
+#define	USERFILE	(!SECURE)
+
+/*
+ * GLOB is 1 if you wish to have shell metacharacters expanded in filenames.
+ * This will generally work if your system provides the "popen" function
+ * and the "echo" shell command.
+ */
+#define	GLOB		(!SECURE)
+
+/*
+ * PIPEC is 1 if you wish to have the "|" command
+ * which allows the user to pipe data into a shell command.
+ */
+#define	PIPEC		(!SECURE && HAVE_POPEN)
+
+/*
+ * LOGFILE is 1 if you wish to allow the -o option (to create log files).
+ */
+#define	LOGFILE		(!SECURE)
+
+/*
+ * GNU_OPTIONS is 1 if you wish to support the GNU-style command
+ * line options --help and --version.
+ */
+#define	GNU_OPTIONS	1
+
+/*
+ * ONLY_RETURN is 1 if you want RETURN to be the only input which
+ * will continue past an error message.
+ * Otherwise, any key will continue past an error message.
+ */
+#define	ONLY_RETURN	0
+
+/*
+ * LESSKEYFILE is the filename of the default lesskey output file 
+ * (in the HOME directory).
+ * LESSKEYFILE_SYS is the filename of the system-wide lesskey output file.
+ * DEF_LESSKEYINFILE is the filename of the default lesskey input 
+ * (in the HOME directory).
+ * LESSHISTFILE is the filename of the history file
+ * (in the HOME directory).
+ */
+#define	LESSKEYFILE		".less"
+#define	LESSKEYFILE_SYS		SYSDIR "/sysless"
+#define	DEF_LESSKEYINFILE	".lesskey"
+#define	LESSKEYINFILE_SYS	SYSDIR "/syslesskey"
+#define LESSHISTFILE		".lesshst"
+
+
+/* Settings always true on Unix.  */
+
+/*
+ * Define MSDOS_COMPILER if compiling under Microsoft C.
+ */
+#define	MSDOS_COMPILER	0
+
+/*
+ * Pathname separator character.
+ */
+#define	PATHNAME_SEP	"/"
+
+/*
+ * The value returned from tgetent on success.
+ * Some HP-UX systems return 0 on success.
+ */
+#define TGETENT_OK  1
+
+/*
+ * HAVE_ANSI_PROTOS	is 1 if your compiler supports ANSI function prototypes.
+ */
+#define HAVE_ANSI_PROTOS	1
+
+/*
+ * HAVE_SYS_TYPES_H is 1 if your system has <sys/types.h>.
+ */
+#define HAVE_SYS_TYPES_H	1
+
+/*
+ * Define if you have the <sgstat.h> header file.
+ */
+#undef HAVE_SGSTAT_H
+
+/*
+ * HAVE_PERROR is 1 if your system has the perror() call.
+ * (Actually, if it has sys_errlist, sys_nerr and errno.)
+ */
+#define	HAVE_PERROR	1
+
+/*
+ * HAVE_TIME is 1 if your system has the time() call.
+ */
+#define	HAVE_TIME	1
+
+/*
+ * HAVE_SHELL is 1 if your system supports a SHELL command interpreter.
+ */
+#define	HAVE_SHELL	1
+
+/*
+ * Default shell metacharacters and meta-escape character.
+ */
+#define	DEF_METACHARS	"; *?\t\n'\"()<>|&^`#\\$%=~{},"
+#define	DEF_METAESCAPE	"\\"
+
+/* 
+ * HAVE_DUP is 1 if your system has the dup() call.
+ */
+#define	HAVE_DUP	1
+
+/* Define to 1 if you have the memcpy() function. */
+#define HAVE_MEMCPY 1
+
+/* Define to 1 if you have the strchr() function. */
+#define HAVE_STRCHR 1
+
+/* Define to 1 if you have the strstr() function. */
+#define HAVE_STRSTR 1
+
+/* Define to 1 to support reading lesskey source files (not just binary). */
+#define HAVE_LESSKEYSRC 1
+
+/*
+ * Sizes of various buffers.
+ */
+#if 0 /* old sizes for small memory machines */
+#define	CMDBUF_SIZE	512	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	100	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */
+#define	PROMPT_SIZE	200	/* Max size of prompt string */

_service:tar_scm:less-633.tar.gz/defines.o2 Added

@@ -0,0 +1,348 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/* OS/2 definition file for less.  */
+/*
+ * This file has 2 sections:
+ * User preferences.
+ * Settings always true for the emx compiler for OS/2 systems. 
+ */
+
+&#xc;
+/* User preferences.  */
+
+/*
+ * SECURE is 1 if you wish to disable a bunch of features in order to
+ * be safe to run by unprivileged users.
+ */
+#define	SECURE		0
+
+/*
+ * SHELL_ESCAPE is 1 if you wish to allow shell escapes.
+ * (This is possible only if your system supplies the system() function.)
+ */
+#define	SHELL_ESCAPE	(!SECURE)
+
+/*
+ * EXAMINE is 1 if you wish to allow examining files by name from within less.
+ */
+#define	EXAMINE		(!SECURE)
+
+/*
+ * TAB_COMPLETE_FILENAME is 1 if you wish to allow the TAB key
+ * to complete filenames at prompts.
+ */
+#define	TAB_COMPLETE_FILENAME	(!SECURE)
+
+/*
+ * CMD_HISTORY is 1 if you wish to allow keys to cycle through
+ * previous commands at prompts.
+ */
+#define	CMD_HISTORY	1
+
+/*
+ * HILITE_SEARCH is 1 if you wish to have search targets to be 
+ * displayed in standout mode.
+ */
+#define	HILITE_SEARCH	1
+
+/*
+ * EDITOR is 1 if you wish to allow editor invocation (the "v" command).
+ * (This is possible only if your system supplies the system() function.)
+ * EDIT_PGM is the name of the (default) editor to be invoked.
+ */
+#define	EDITOR		(!SECURE)
+#define	EDIT_PGM	"vi"
+
+/*
+ * TAGS is 1 if you wish to support tag files.
+ */
+#define	TAGS		(!SECURE)
+
+/*
+ * USERFILE is 1 if you wish to allow a .less file to specify 
+ * user-defined key bindings.
+ */
+#define	USERFILE	(!SECURE)
+
+/*
+ * GLOB is 1 if you wish to have shell metacharacters expanded in filenames.
+ * This will generally work if your system provides the "popen" function
+ * and the "echo" shell command.
+ */
+#define	GLOB		(!SECURE)
+
+/*
+ * PIPEC is 1 if you wish to have the "|" command
+ * which allows the user to pipe data into a shell command.
+ */
+#define	PIPEC		(!SECURE)
+
+/*
+ * LOGFILE is 1 if you wish to allow the -o option (to create log files).
+ */
+#define	LOGFILE		(!SECURE)
+
+/*
+ * GNU_OPTIONS is 1 if you wish to support the GNU-style command
+ * line options --help and --version.
+ */
+#define	GNU_OPTIONS	1
+
+/*
+ * ONLY_RETURN is 1 if you want RETURN to be the only input which
+ * will continue past an error message.
+ * Otherwise, any key will continue past an error message.
+ */
+#define	ONLY_RETURN	0
+
+/*
+ * LESSKEYFILE is the filename of the default lesskey output file 
+ * (in the HOME directory).
+ * LESSKEYFILE_SYS is the filename of the system-wide lesskey output file.
+ * DEF_LESSKEYINFILE is the filename of the default lesskey input 
+ * (in the HOME directory).
+ * LESSHISTFILE is the filename of the history file
+ * (in the HOME directory).
+ */
+#define	LESSKEYFILE		"less.ini"
+#define	LESSKEYFILE_SYS		"C:\\sysless.ini"
+#define	DEF_LESSKEYINFILE	"lesskey.ini"
+#define	LESSKEYINFILE_SYS	"C:\\syslesskey.ini"
+#define LESSHISTFILE		"lesshst.ini"
+
+&#xc;
+/* Settings always true for the emx compiler for OS/2 systems.  */
+#define OS2 1
+
+/*
+ * Pathname separator character.
+ */
+#define	PATHNAME_SEP	"\\"
+
+/*
+ * HAVE_ANSI_PROTOS	is 1 if your compiler supports ANSI function prototypes.
+ */
+#define HAVE_ANSI_PROTOS	1
+
+/*
+ * HAVE_SYS_TYPES_H is 1 if your system has <sys/types.h>.
+ */
+#define HAVE_SYS_TYPES_H	1
+
+/*
+ * Define if you have the <sgstat.h> header file.
+ */
+#define HAVE_SGSTAT_H	0
+
+/*
+ * HAVE_PERROR is 1 if your system has the perror() call.
+ * (Actually, if it has sys_errlist, sys_nerr and errno.)
+ */
+#define	HAVE_PERROR	1
+
+/*
+ * HAVE_TIME is 1 if your system has the time() call.
+ */
+#define	HAVE_TIME	1
+
+/*
+ * HAVE_SHELL is 1 if your system supports a SHELL command interpreter.
+ */
+#define	HAVE_SHELL	0
+
+/*
+ * Default shell metacharacters and meta-escape character.
+ */
+#define	DEF_METACHARS	"; *?\t\n'\"()<>|&"
+#define	DEF_METAESCAPE	""
+
+/* 
+ * HAVE_DUP is 1 if your system has the dup() call.
+ */
+#define	HAVE_DUP	1
+
+/* Define to 1 to support reading lesskey source files (not just binary). */
+#define HAVE_LESSKEYSRC 1
+
+/*
+ * Sizes of various buffers.
+ */
+#if 0 /* old sizes for small memory machines
+#define	CMDBUF_SIZE	512	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	100	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */
+#define	PROMPT_SIZE	200	/* Max size of prompt string */
+#define	TERMBUF_SIZE	2048	/* Termcap buffer for tgetent */
+#define	TERMSBUF_SIZE	1024	/* Buffer to hold termcap strings */
+#define	TAGLINE_SIZE	512	/* Max size of line in tags file */
+#define	TABSTOP_MAX	32	/* Max number of custom tab stops */
+#else /* more reasonable sizes for modern machines */
+#define	CMDBUF_SIZE	2048	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	200	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Initial max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */
+#define	PROMPT_SIZE	2048	/* Max size of prompt string */
+#define	TERMBUF_SIZE	2048	/* Termcap buffer for tgetent */
+#define	TERMSBUF_SIZE	1024	/* Buffer to hold termcap strings */
+#define	TAGLINE_SIZE	1024	/* Max size of line in tags file */
+#define	TABSTOP_MAX	128	/* Max number of custom tab stops */
+#endif
+

_service:tar_scm:less-633.tar.gz/defines.o9 Added

@@ -0,0 +1,360 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/* OS/9 definition file for less.  */
+/*
+ * This file has 2 sections:
+ * User preferences.
+ * Settings always true for OS-9 systems. 
+ */
+&#xc;
+/* User preferences.  */
+
+/*
+ * SECURE is 1 if you wish to disable a bunch of features in order to
+ * be safe to run by unprivileged users.
+ */
+#define	SECURE		0
+
+/*
+ * SHELL_ESCAPE is 1 if you wish to allow shell escapes.
+ * (This is possible only if your system supplies the system() function.)
+ */
+#define	SHELL_ESCAPE	(!SECURE)
+
+/*
+ * EXAMINE is 1 if you wish to allow examining files by name from within less.
+ */
+#define	EXAMINE		(!SECURE)
+
+/*
+ * TAB_COMPLETE_FILENAME is 1 if you wish to allow the TAB key
+ * to complete filenames at prompts.
+ */
+#define	TAB_COMPLETE_FILENAME	1
+
+/*
+ * CMD_HISTORY is 1 if you wish to allow keys to cycle through
+ * previous commands at prompts.
+ */
+#define	CMD_HISTORY	1
+
+/*
+ * HILITE_SEARCH is 1 if you wish to have search targets to be 
+ * displayed in standout mode.
+ */
+#define	HILITE_SEARCH	1
+
+/*
+ * EDITOR is 1 if you wish to allow editor invocation (the "v" command).
+ * (This is possible only if your system supplies the system() function.)
+ * EDIT_PGM is the name of the (default) editor to be invoked.
+ */
+#define	EDITOR		(!SECURE)
+#define	EDIT_PGM	"umacs"
+
+/*
+ * TAGS is 1 if you wish to support tag files.
+ */
+#define	TAGS		(!SECURE)
+
+/*
+ * USERFILE is 1 if you wish to allow a .less file to specify 
+ * user-defined key bindings.
+ */
+#define	USERFILE	(!SECURE)
+
+/*
+ * GLOB is 1 if you wish to have shell metacharacters expanded in filenames.
+ * This will generally work if your system provides the "popen" function
+ * and the "echo" shell command.
+ */
+#define	GLOB		(!SECURE)
+
+/*
+ * PIPEC is 1 if you wish to have the "|" command
+ * which allows the user to pipe data into a shell command.
+ */
+#define	PIPEC		(!SECURE)
+
+/*
+ * LOGFILE is 1 if you wish to allow the -o option (to create log files).
+ */
+#define	LOGFILE		(!SECURE)
+
+/*
+ * GNU_OPTIONS is 1 if you wish to support the GNU-style command
+ * line options --help and --version.
+ */
+#define	GNU_OPTIONS	1
+
+/*
+ * ONLY_RETURN is 1 if you want RETURN to be the only input which
+ * will continue past an error message.
+ * Otherwise, any key will continue past an error message.
+ */
+#define	ONLY_RETURN	0
+
+/*
+ * LESSKEYFILE is the filename of the default lesskey output file 
+ * (in the HOME directory).
+ * LESSKEYFILE_SYS is the filename of the system-wide lesskey output file.
+ * DEF_LESSKEYINFILE is the filename of the default lesskey input 
+ * (in the HOME directory).
+ * LESSHISTFILE is the filename of the history file
+ * (in the HOME directory).
+ */
+#define	LESSKEYFILE		".less"
+#define	LESSKEYFILE_SYS		"/.sysless"
+#define	DEF_LESSKEYINFILE	".lesskey"
+#define	LESSKEYINFILE_SYS	"/.syslesskey"
+#define LESSHISTFILE		".lesshst"
+
+&#xc;
+/* Settings always true for OS-9.  */
+
+/* This is not needed; it is defined by the compiler. */
+/* #define _OSK 1 */
+#define OS2 		0
+#define MSDOS_COMPILER	0
+
+/*
+ * Pathname separator character.
+ */
+#define	PATHNAME_SEP	"/"
+
+/*
+ * HAVE_ANSI_PROTOS	is 1 if your compiler supports ANSI function prototypes.
+ */
+#define HAVE_ANSI_PROTOS	1
+
+/*
+ * HAVE_SYS_TYPES_H is 1 if your system has <sys/types.h>.
+ */
+#define HAVE_SYS_TYPES_H 0
+
+/*
+ * Define if you have the <sgstat.h> header file.
+ */
+#define HAVE_SGSTAT_H	1
+
+/*
+ * HAVE_PERROR is 1 if your system has the perror() call.
+ * (Actually, if it has sys_errlist, sys_nerr and errno.)
+ */
+#if _OSK_MWC32
+#define	HAVE_PERROR	0
+#else
+#define	HAVE_PERROR	1
+#endif
+
+/*
+ * HAVE_TIME is 1 if your system has the time() call.
+ */
+#define	HAVE_TIME	1
+
+/*
+ * HAVE_SHELL is 1 if your system supports a SHELL command interpreter.
+ */
+#define	HAVE_SHELL 0
+
+/*
+ * Default shell metacharacters and meta-escape character.
+ */
+#define DEF_METACHARS   "; \t\n'\"()<>|&^`#\\"
+#define DEF_METAESCAPE  "\\"
+
+/* 
+ * HAVE_DUP is 1 if your system has the dup() call.
+ */
+#define	HAVE_DUP 0
+
+/* Define to 1 to support reading lesskey source files (not just binary). */
+#define HAVE_LESSKEYSRC 1
+
+/*
+ * Sizes of various buffers.
+ */
+#if 0 /* old sizes for small memory machines
+#define	CMDBUF_SIZE	512	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	100	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */
+#define	PROMPT_SIZE	200	/* Max size of prompt string */
+#define	TERMBUF_SIZE	2048	/* Termcap buffer for tgetent */
+#define	TERMSBUF_SIZE	1024	/* Buffer to hold termcap strings */
+#define	TAGLINE_SIZE	512	/* Max size of line in tags file */
+#define	TABSTOP_MAX	32	/* Max number of custom tab stops */
+#else /* more reasonable sizes for modern machines */
+#define	CMDBUF_SIZE	2048	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	200	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Initial max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */

_service:tar_scm:less-633.tar.gz/defines.wn Added

@@ -0,0 +1,388 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/* Windows definition file for less.  */
+/*
+ * This file has 2 sections:
+ * User preferences.
+ * Settings always true for Windows systems. 
+ */
+
+&#xc;
+/* User preferences.  */
+
+/*
+ * SECURE is 1 if you wish to disable a bunch of features in order to
+ * be safe to run by unprivileged users.
+ */
+#define	SECURE		0
+
+/*
+ * SHELL_ESCAPE is 1 if you wish to allow shell escapes.
+ * (This is possible only if your system supplies the system() function.)
+ */
+#define	SHELL_ESCAPE	(!SECURE)
+
+/*
+ * EXAMINE is 1 if you wish to allow examining files by name from within less.
+ */
+#define	EXAMINE		(!SECURE)
+
+/*
+ * TAB_COMPLETE_FILENAME is 1 if you wish to allow the TAB key
+ * to complete filenames at prompts.
+ */
+#define	TAB_COMPLETE_FILENAME	(!SECURE)
+
+/*
+ * CMD_HISTORY is 1 if you wish to allow keys to cycle through
+ * previous commands at prompts.
+ */
+#define	CMD_HISTORY	1
+
+/*
+ * HILITE_SEARCH is 1 if you wish to have search targets to be 
+ * displayed in standout mode.
+ */
+#define	HILITE_SEARCH	1
+
+/*
+ * EDITOR is 1 if you wish to allow editor invocation (the "v" command).
+ * (This is possible only if your system supplies the system() function.)
+ * EDIT_PGM is the name of the (default) editor to be invoked.
+ */
+#define	EDITOR		(!SECURE)
+#define	EDIT_PGM	"edit"
+
+/*
+ * TAGS is 1 if you wish to support tag files.
+ */
+#define	TAGS		(!SECURE)
+
+/*
+ * USERFILE is 1 if you wish to allow a .less file to specify 
+ * user-defined key bindings.
+ */
+#define	USERFILE	(!SECURE)
+
+/*
+ * GLOB is 1 if you wish to have shell metacharacters expanded in filenames.
+ * This will generally work if your system provides the "popen" function
+ * and the "echo" shell command.
+ */
+#define	GLOB		0
+
+/*
+ * PIPEC is 1 if you wish to have the "|" command
+ * which allows the user to pipe data into a shell command.
+ */
+#define	PIPEC		1
+
+/*
+ * LOGFILE is 1 if you wish to allow the -o option (to create log files).
+ */
+#define	LOGFILE		(!SECURE)
+
+/*
+ * GNU_OPTIONS is 1 if you wish to support the GNU-style command
+ * line options --help and --version.
+ */
+#define	GNU_OPTIONS	1
+
+/*
+ * ONLY_RETURN is 1 if you want RETURN to be the only input which
+ * will continue past an error message.
+ * Otherwise, any key will continue past an error message.
+ */
+#define	ONLY_RETURN	0
+
+/*
+ * LESSKEYFILE is the filename of the default lesskey output file 
+ * (in the HOME directory).
+ * LESSKEYFILE_SYS is the filename of the system-wide lesskey output file.
+ * DEF_LESSKEYINFILE is the filename of the default lesskey input 
+ * (in the HOME directory).
+ * LESSHISTFILE is the filename of the history file
+ * (in the HOME directory).
+ */
+#define	LESSKEYFILE		"_less"
+#define	LESSKEYFILE_SYS		"c:\\_sysless"
+#define	DEF_LESSKEYINFILE	"_lesskey"
+#define	LESSKEYINFILE_SYS	"c:\\_syslesskey"
+#define LESSHISTFILE		"_lesshst"
+
+&#xc;
+/* Settings always true for Windows systems.  */
+
+#define MSDOS_COMPILER	WIN32C
+
+/*
+ * Pathname separator character.
+ */
+#define	PATHNAME_SEP	"\\"
+
+/*
+ * HAVE_ANSI_PROTOS	is 1 if your compiler supports ANSI function prototypes.
+ */
+#define HAVE_ANSI_PROTOS	1
+
+/*
+ * HAVE_SYS_TYPES_H is 1 if your system has <sys/types.h>.
+ */
+#define HAVE_SYS_TYPES_H	1
+
+/*
+ * Define if you have the <sgstat.h> header file.
+ */
+#define HAVE_SGSTAT_H	0
+
+/*
+ * HAVE_PERROR is 1 if your system has the perror() call.
+ * (Actually, if it has sys_errlist, sys_nerr and errno.)
+ */
+#define	HAVE_PERROR	1
+
+/*
+ * HAVE_TIME is 1 if your system has the time() call.
+ */
+#define	HAVE_TIME	1
+
+/*
+ * HAVE_SHELL is 1 if your system supports a SHELL command interpreter.
+ */
+#define	HAVE_SHELL	0
+
+/*
+ * Default shell metacharacters and meta-escape character.
+ */
+#define	DEF_METACHARS	"; *?\t\n'\"()<>|&"
+#define	DEF_METAESCAPE	""
+
+/* 
+ * HAVE_DUP is 1 if your system has the dup() call.
+ */
+#define	HAVE_DUP	1
+
+/* Define to 1 to support reading lesskey source files (not just binary). */
+#define HAVE_LESSKEYSRC 1
+
+/*
+ * Sizes of various buffers.
+ */
+#if 0 /* old sizes for small memory machines */
+#define	CMDBUF_SIZE	512	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	100	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */
+#define	PROMPT_SIZE	200	/* Max size of prompt string */
+#define	TERMBUF_SIZE	2048	/* Termcap buffer for tgetent */
+#define	TERMSBUF_SIZE	1024	/* Buffer to hold termcap strings */
+#define	TAGLINE_SIZE	512	/* Max size of line in tags file */
+#define	TABSTOP_MAX	32	/* Max number of custom tab stops */
+#else /* more reasonable sizes for modern machines */
+#define	CMDBUF_SIZE	2048	/* Buffer for multichar commands */
+#define	UNGOT_SIZE	200	/* Max chars to unget() */
+#define	LINEBUF_SIZE	1024	/* Initial max size of line in input file */
+#define	OUTBUF_SIZE	1024	/* Output buffer */
+#define	PROMPT_SIZE	2048	/* Max size of prompt string */
+#define	TERMBUF_SIZE	2048	/* Termcap buffer for tgetent */
+#define	TERMSBUF_SIZE	1024	/* Buffer to hold termcap strings */
+#define	TAGLINE_SIZE	1024	/* Max size of line in tags file */
+#define	TABSTOP_MAX	128	/* Max number of custom tab stops */
+#endif

_service:tar_scm:less-633.tar.gz/edit.c Added

@@ -0,0 +1,1019 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+#include "less.h"
+#include "position.h"
+#if HAVE_STAT
+#include <sys/stat.h>
+#endif
+#if HAVE_SYS_WAIT_H
+#include <sys/wait.h>
+#endif
+#if OS2
+#include <signal.h>
+#endif
+
+public int fd0 = 0;
+
+extern int new_file;
+extern int cbufs;
+extern char *every_first_cmd;
+extern int force_open;
+extern int is_tty;
+extern int sigs;
+extern int hshift;
+extern int want_filesize;
+extern int consecutive_nulls;
+extern int modelines;
+extern int show_preproc_error;
+extern IFILE curr_ifile;
+extern IFILE old_ifile;
+extern struct scrpos initial_scrpos;
+extern void *ml_examine;
+#if SPACES_IN_FILENAMES
+extern char openquote;
+extern char closequote;
+#endif
+
+#if LOGFILE
+extern int logfile;
+extern int force_logfile;
+extern char *namelogfile;
+#endif
+
+#if HAVE_STAT_INO
+public dev_t curr_dev;
+public ino_t curr_ino;
+#endif
+
+/*
+ * Textlist functions deal with a list of words separated by spaces.
+ * init_textlist sets up a textlist structure.
+ * forw_textlist uses that structure to iterate thru the list of
+ * words, returning each one as a standard null-terminated string.
+ * back_textlist does the same, but runs thru the list backwards.
+ */
+public void init_textlist(struct textlist *tlist, char *str)
+{
+	char *s;
+#if SPACES_IN_FILENAMES
+	int meta_quoted = 0;
+	int delim_quoted = 0;
+	char *esc = get_meta_escape();
+	int esclen = (int) strlen(esc);
+#endif
+	
+	tlist->string = skipsp(str);
+	tlist->endstring = tlist->string + strlen(tlist->string);
+	for (s = str;  s < tlist->endstring;  s++)
+	{
+#if SPACES_IN_FILENAMES
+		if (meta_quoted)
+		{
+			meta_quoted = 0;
+		} else if (esclen > 0 && s + esclen < tlist->endstring &&
+		           strncmp(s, esc, esclen) == 0)
+		{
+			meta_quoted = 1;
+			s += esclen - 1;
+		} else if (delim_quoted)
+		{
+			if (*s == closequote)
+				delim_quoted = 0;
+		} else /* (!delim_quoted) */
+		{
+			if (*s == openquote)
+				delim_quoted = 1;
+			else if (*s == ' ')
+				*s = '\0';
+		}
+#else
+		if (*s == ' ')
+			*s = '\0';
+#endif
+	}
+}
+
+public char * forw_textlist(struct textlist *tlist, char *prev)
+{
+	char *s;
+	
+	/*
+	 * prev == NULL means return the first word in the list.
+	 * Otherwise, return the word after "prev".
+	 */
+	if (prev == NULL)
+		s = tlist->string;
+	else
+		s = prev + strlen(prev);
+	if (s >= tlist->endstring)
+		return (NULL);
+	while (*s == '\0')
+		s++;
+	if (s >= tlist->endstring)
+		return (NULL);
+	return (s);
+}
+
+public char * back_textlist(struct textlist *tlist, char *prev)
+{
+	char *s;
+	
+	/*
+	 * prev == NULL means return the last word in the list.
+	 * Otherwise, return the word before "prev".
+	 */
+	if (prev == NULL)
+		s = tlist->endstring;
+	else if (prev <= tlist->string)
+		return (NULL);
+	else
+		s = prev - 1;
+	while (*s == '\0')
+		s--;
+	if (s <= tlist->string)
+		return (NULL);
+	while (s-1 != '\0' && s > tlist->string)
+		s--;
+	return (s);
+}
+
+/*
+ * Parse a single option setting in a modeline.
+ */
+static void modeline_option(char *str, int opt_len)
+{
+	struct mloption { char *opt_name; void (*opt_func)(char*,int); };
+	struct mloption options = {
+		{ "ts=",         set_tabs },
+		{ "tabstop=",    set_tabs },
+		{ NULL, NULL }
+	};
+	struct mloption *opt;
+	for (opt = options;  opt->opt_name != NULL;  opt++)
+	{
+		int name_len = strlen(opt->opt_name);
+		if (opt_len > name_len && strncmp(str, opt->opt_name, name_len) == 0)
+		{
+			(*opt->opt_func)(str + name_len, opt_len - name_len);
+			break;
+		}
+	}
+}
+
+/*
+ * String length, terminated by option separator (space or colon).
+ * Space/colon can be escaped with backspace.
+ */
+static int modeline_option_len(char *str)
+{
+	int esc = FALSE;
+	char *s;
+	for (s = str;  *s != '\0';  s++)
+	{
+		if (esc)
+			esc = FALSE;
+		else if (*s == '\\')
+			esc = TRUE;
+		else if (*s == ' ' || *s == ':') /* separator */
+			break;
+	}
+	return (s - str);
+}
+
+/*
+ * Parse colon- or space-separated option settings in a modeline.
+ */
+static void modeline_options(char *str, char end_char)
+{
+	for (;;)
+	{
+		int opt_len;
+		str = skipsp(str);

_service:tar_scm:less-633.tar.gz/filename.c Added

@@ -0,0 +1,1118 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines to mess around with filenames (and files).
+ * Much of this is very OS dependent.
+ */
+
+#include "less.h"
+#include "lglob.h"
+#if MSDOS_COMPILER
+#include <dos.h>
+#if MSDOS_COMPILER==WIN32C && !defined(_MSC_VER)
+#include <dir.h>
+#endif
+#if MSDOS_COMPILER==DJGPPC
+#include <glob.h>
+#include <dir.h>
+#define _MAX_PATH      PATH_MAX
+#endif
+#endif
+#ifdef _OSK
+#include <rbf.h>
+#ifndef _OSK_MWC32
+#include <modes.h>
+#endif
+#endif
+
+#if HAVE_STAT
+#include <sys/stat.h>
+#ifndef S_ISDIR
+#define S_ISDIR(m)      (((m) & S_IFMT) == S_IFDIR)
+#endif
+#ifndef S_ISREG
+#define S_ISREG(m)      (((m) & S_IFMT) == S_IFREG)
+#endif
+#endif
+
+extern int force_open;
+extern int secure;
+extern int use_lessopen;
+extern int ctldisp;
+extern int utf_mode;
+extern IFILE curr_ifile;
+extern IFILE old_ifile;
+#if SPACES_IN_FILENAMES
+extern char openquote;
+extern char closequote;
+#endif
+#if HAVE_STAT_INO
+extern ino_t curr_ino;
+extern dev_t curr_dev;
+#endif
+
+/*
+ * Remove quotes around a filename.
+ */
+public char * shell_unquote(char *str)
+{
+	char *name;
+	char *p;
+
+	name = p = (char *) ecalloc(strlen(str)+1, sizeof(char));
+	if (*str == openquote)
+	{
+		str++;
+		while (*str != '\0')
+		{
+			if (*str == closequote)
+			{
+				if (str1 != closequote)
+					break;
+				str++;
+			}
+			*p++ = *str++;
+		}
+	} else
+	{
+		char *esc = get_meta_escape();
+		int esclen = (int) strlen(esc);
+		while (*str != '\0')
+		{
+			if (esclen > 0 && strncmp(str, esc, esclen) == 0)
+				str += esclen;
+			*p++ = *str++;
+		}
+	}
+	*p = '\0';
+	return (name);
+}
+
+/*
+ * Get the shell's escape character.
+ */
+public char * get_meta_escape(void)
+{
+	char *s;
+
+	s = lgetenv("LESSMETAESCAPE");
+	if (s == NULL)
+		s = DEF_METAESCAPE;
+	return (s);
+}
+
+/*
+ * Get the characters which the shell considers to be "metacharacters".
+ */
+static char * metachars(void)
+{
+	static char *mchars = NULL;
+
+	if (mchars == NULL)
+	{
+		mchars = lgetenv("LESSMETACHARS");
+		if (mchars == NULL)
+			mchars = DEF_METACHARS;
+	}
+	return (mchars);
+}
+
+/*
+ * Is this a shell metacharacter?
+ */
+static int metachar(char c)
+{
+	return (strchr(metachars(), c) != NULL);
+}
+
+/*
+ * Insert a backslash before each metacharacter in a string.
+ */
+public char * shell_quote(char *s)
+{
+	char *p;
+	char *newstr;
+	int len;
+	char *esc = get_meta_escape();
+	int esclen = (int) strlen(esc);
+	int use_quotes = 0;
+	int have_quotes = 0;
+
+	/*
+	 * Determine how big a string we need to allocate.
+	 */
+	len = 1; /* Trailing null byte */
+	for (p = s;  *p != '\0';  p++)
+	{
+		len++;
+		if (*p == openquote || *p == closequote)
+			have_quotes = 1;
+		if (metachar(*p))
+		{
+			if (esclen == 0)
+			{
+				/*
+				 * We've got a metachar, but this shell 
+				 * doesn't support escape chars.  Use quotes.
+				 */
+				use_quotes = 1;
+			} else
+			{
+				/*
+				 * Allow space for the escape char.
+				 */
+				len += esclen;
+			}
+		}
+	}
+	if (use_quotes)
+	{
+		if (have_quotes)
+			/*
+			 * We can't quote a string that contains quotes.
+			 */
+			return (NULL);
+		len = (int) strlen(s) + 3;
+	}
+	/*
+	 * Allocate and construct the new string.
+	 */
+	newstr = p = (char *) ecalloc(len, sizeof(char));
+	if (use_quotes)
+	{
+		SNPRINTF3(newstr, len, "%c%s%c", openquote, s, closequote);
+	} else
+	{
+		while (*s != '\0')
+		{
+			if (metachar(*s))
+			{
+				/*
+				 * Add the escape char.

_service:tar_scm:less-633.tar.gz/fmt.uni Added

_service:tar_scm:less-633.tar.gz/forwback.c Added

@@ -0,0 +1,549 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Primitives for displaying the file on the screen,
+ * scrolling either forward or backward.
+ */
+
+#include "less.h"
+#include "position.h"
+
+public int screen_trashed;
+public int squished;
+public int no_back_scroll = 0;
+public int forw_prompt;
+public int first_time = 1;
+
+extern int sigs;
+extern int top_scroll;
+extern int quiet;
+extern int sc_width, sc_height;
+extern int hshift;
+extern int auto_wrap;
+extern int plusoption;
+extern int forw_scroll;
+extern int back_scroll;
+extern int ignore_eoi;
+extern int clear_bg;
+extern int final_attr;
+extern int header_lines;
+extern int header_cols;
+extern int full_screen;
+#if HILITE_SEARCH
+extern int size_linebuf;
+extern int hilite_search;
+extern int status_col;
+#endif
+#if TAGS
+extern char *tagoption;
+#endif
+
+/*
+ * Sound the bell to indicate user is trying to move past end of file.
+ */
+public void eof_bell(void)
+{
+#if HAVE_TIME
+	static time_type last_eof_bell = 0;
+	time_type now = get_time();
+	if (now == last_eof_bell) /* max once per second */
+		return;
+	last_eof_bell = now;
+#endif
+	if (quiet == NOT_QUIET)
+		bell();
+	else
+		vbell();
+}
+
+/*
+ * Check to see if the end of file is currently displayed.
+ */
+public int eof_displayed(void)
+{
+	POSITION pos;
+
+	if (ignore_eoi)
+		return (0);
+
+	if (ch_length() == NULL_POSITION)
+		/*
+		 * If the file length is not known,
+		 * we can't possibly be displaying EOF.
+		 */
+		return (0);
+
+	/*
+	 * If the bottom line is empty, we are at EOF.
+	 * If the bottom line ends at the file length,
+	 * we must be just at EOF.
+	 */
+	pos = position(BOTTOM_PLUS_ONE);
+	return (pos == NULL_POSITION || pos == ch_length());
+}
+
+/*
+ * Check to see if the entire file is currently displayed.
+ */
+public int entire_file_displayed(void)
+{
+	POSITION pos;
+
+	/* Make sure last line of file is displayed. */
+	if (!eof_displayed())
+		return (0);
+
+	/* Make sure first line of file is displayed. */
+	pos = position(0);
+	return (pos == NULL_POSITION || pos == 0);
+}
+
+/*
+ * If the screen is "squished", repaint it.
+ * "Squished" means the first displayed line is not at the top
+ * of the screen; this can happen when we display a short file
+ * for the first time.
+ */
+public void squish_check(void)
+{
+	if (!squished)
+		return;
+	squished = 0;
+	repaint();
+}
+
+/*
+ * Read the first pfx columns of the next line.
+ * If skipeol==0 stop there, otherwise read and discard chars to end of line.
+ */
+static POSITION forw_line_pfx(POSITION pos, int pfx, int skipeol)
+{
+	int save_sc_width = sc_width;
+	int save_auto_wrap = auto_wrap;
+	int save_hshift = hshift;
+	/* Set fake sc_width to force only pfx chars to be read. */
+	sc_width = pfx + line_pfx_width();
+	auto_wrap = 0;
+	hshift = 0;
+	pos = forw_line_seg(pos, skipeol, FALSE, FALSE);
+	sc_width = save_sc_width;
+	auto_wrap = save_auto_wrap;
+	hshift = save_hshift;
+	return pos;
+}
+
+/*
+ * Set header text color.
+ * Underline last line of headers, but not at beginning of file
+ * (where there is no gap between the last header line and the next line).
+ */
+static void set_attr_header(int ln)
+{
+	set_attr_line(AT_COLOR_HEADER);
+	if (ln+1 == header_lines && position(0) != ch_zero())
+		set_attr_line(AT_UNDERLINE);
+}
+
+/*
+ * Display file headers, overlaying text already drawn
+ * at top and left of screen.
+ */
+public int overlay_header(void)
+{
+	POSITION pos = ch_zero(); /* header lines are at beginning of file */
+	int ln;
+	int moved = FALSE;
+
+	if (header_lines > 0)
+	{
+		/* Draw header_lines lines from start of file at top of screen. */
+		home();
+		for (ln = 0; ln < header_lines; ++ln)
+		{
+			pos = forw_line(pos);
+			set_attr_header(ln);
+			clear_eol();
+			put_line();
+		}
+		moved = TRUE;
+	}
+	if (header_cols > 0)
+	{
+		/* Draw header_cols columns at left of each line. */
+		home();
+		pos = ch_zero();
+		for (ln = 0; ln < sc_height-1; ++ln)
+		{
+			if (ln >= header_lines) /* switch from header lines to normal lines */
+				pos = position(ln);
+			if (pos == NULL_POSITION)
+				putchr('\n');
+			else 
+			{
+				/* Need skipeol for all header lines except the last one. */
+				pos = forw_line_pfx(pos, header_cols, ln+1 < header_lines);
+				set_attr_header(ln);
+				put_line();
+			}
+		}
+		moved = TRUE;
+	}
+	if (moved)

_service:tar_scm:less-633.tar.gz/funcs.h Added

@@ -0,0 +1,384 @@
+public char * save(constant char *s);
+public void out_of_memory(void);
+public void * ecalloc(int count, unsigned int size);
+public char * skipsp(char *s);
+public int sprefix(char *ps, char *s, int uppercase);
+public void quit(int status);
+public void raw_mode(int on);
+public void scrsize(void);
+public char * special_key_str(int key);
+public void get_term(void);
+public void init_mouse(void);
+public void deinit_mouse(void);
+public void init(void);
+public void deinit(void);
+public int interactive(void);
+public void home(void);
+public void dump_screen(void);
+public void add_line(void);
+public void remove_top(int n);
+public void win32_scroll_up(int n);
+public void lower_left(void);
+public void line_left(void);
+public void check_winch(void);
+public void goto_line(int sindex);
+public void vbell(void);
+public void bell(void);
+public void clear(void);
+public void clear_eol(void);
+public void clear_bot(void);
+public COLOR_TYPE parse_color(char *str, int *p_fg, int *p_bg);
+public void at_enter(int attr);
+public void at_exit(void);
+public void at_switch(int attr);
+public int is_at_equiv(int attr1, int attr2);
+public int apply_at_specials(int attr);
+public void putbs(void);
+public int win32_kbhit(void);
+public char WIN32getch(void);
+public void WIN32setcolors(int fg, int bg);
+public void WIN32textout(char *text, int len);
+public void match_brac(char obrac, char cbrac, int forwdir, int n);
+public void ch_ungetchar(int c);
+public void end_logfile(void);
+public void sync_logfile(void);
+public int ch_seek(POSITION pos);
+public int ch_end_seek(void);
+public int ch_end_buffer_seek(void);
+public int ch_beg_seek(void);
+public POSITION ch_length(void);
+public POSITION ch_tell(void);
+public int ch_forw_get(void);
+public int ch_back_get(void);
+public void ch_setbufspace(int bufspace);
+public void ch_flush(void);
+public int seekable(int f);
+public void ch_set_eof(void);
+public void ch_init(int f, int flags);
+public void ch_close(void);
+public int ch_getflags(void);
+public void setfmt(char *s, char **fmtvarptr, int *attrptr, char *default_fmt, int for_printf);
+public void init_charset(void);
+public int binary_char(LWCHAR c);
+public int control_char(LWCHAR c);
+public char * prchar(LWCHAR c);
+public char * prutfchar(LWCHAR ch);
+public int utf_len(int ch);
+public int is_utf8_well_formed(char *ss, int slen);
+public void utf_skip_to_lead(char **pp, char *limit);
+public LWCHAR get_wchar(constant char *p);
+public void put_wchar(char **pp, LWCHAR ch);
+public LWCHAR step_char(char **pp, signed int dir, constant char *limit);
+public int is_composing_char(LWCHAR ch);
+public int is_ubin_char(LWCHAR ch);
+public int is_wide_char(LWCHAR ch);
+public int is_combining_char(LWCHAR ch1, LWCHAR ch2);
+public void cmd_reset(void);
+public void clear_cmd(void);
+public void cmd_putstr(constant char *s);
+public int len_cmdbuf(void);
+public void cmd_repaint(constant char *old_cp);
+public void set_mlist(void *mlist, int cmdflags);
+public void cmd_addhist(struct mlist *mlist, constant char *cmd, int modified);
+public void cmd_accept(void);
+public int cmd_char(int c);
+public LINENUM cmd_int(long *frac);
+public char * get_cmdbuf(void);
+public char * cmd_lastpattern(void);
+public void init_cmdhist(void);
+public void save_cmdhist(void);
+public int in_mca(void);
+public int norm_search_type(int st);
+public void dispversion(void);
+public int getcc(void);
+public void ungetcc(LWCHAR c);
+public void ungetcc_back(LWCHAR c);
+public void ungetsc(char *s);
+public LWCHAR peekcc(void);
+public void commands(void);
+public int cvt_length(int len, int ops);
+public int * cvt_alloc_chpos(int len);
+public void cvt_text(char *odst, char *osrc, int *chpos, int *lenp, int ops);
+public void expand_cmd_tables(void);
+public void init_cmds(void);
+public void add_fcmd_table(char *buf, int len);
+public void add_ecmd_table(char *buf, int len);
+public int fcmd_decode(char *cmd, char **sp);
+public int ecmd_decode(char *cmd, char **sp);
+public char * lgetenv(char *var);
+public int isnullenv(char *s);
+public int lesskey(char *filename, int sysvar);
+public int lesskey_src(char *filename, int sysvar);
+public int add_hometable(int (*call_lesskey)(char *, int), char *envname, char *def_filename, int sysvar);
+public int editchar(int c, int flags);
+public void init_textlist(struct textlist *tlist, char *str);
+public char * forw_textlist(struct textlist *tlist, char *prev);
+public char * back_textlist(struct textlist *tlist, char *prev);
+public void close_altpipe(IFILE ifile);
+public void check_altpipe_error(void);
+public int edit(char *filename);
+public int edit_ifile(IFILE ifile);
+public int edit_list(char *filelist);
+public int edit_first(void);
+public int edit_last(void);
+public int edit_next(int n);
+public int edit_prev(int n);
+public int edit_index(int n);
+public IFILE save_curr_ifile(void);
+public void unsave_ifile(IFILE save_ifile);
+public void reedit_ifile(IFILE save_ifile);
+public void reopen_curr_ifile(void);
+public int edit_stdin(void);
+public void cat_file(void);
+public void use_logfile(char *filename);
+public char * shell_unquote(char *str);
+public char * get_meta_escape(void);
+public char * shell_quote(char *s);
+public char * dirfile(char *dirname, char *filename, int must_exist);
+public char * homefile(char *filename);
+public char * fexpand(char *s);
+public char * fcomplete(char *s);
+public int bin_file(int f);
+public char * lglob(char *filename);
+public int is_fake_pathname(char *path);
+public char * lrealpath(char *path);
+public char * open_altfile(char *filename, int *pf, void **pfd);
+public void close_altfile(char *altfilename, char *filename);
+public int is_dir(char *filename);
+public char * bad_file(char *filename);
+public POSITION filesize(int f);
+public int curr_ifile_changed(void);
+public char * shell_coption(void);
+public char * last_component(char *name);
+public void eof_bell(void);
+public int eof_displayed(void);
+public int entire_file_displayed(void);
+public void squish_check(void);
+public int overlay_header(void);
+public void forw(int n, POSITION pos, int force, int only_last, int nblank);
+public void back(int n, POSITION pos, int force, int only_last);
+public void forward(int n, int force, int only_last);
+public void backward(int n, int force, int only_last);
+public int get_back_scroll(void);
+public int get_one_screen(void);
+public void del_ifile(IFILE h);
+public IFILE next_ifile(IFILE h);
+public IFILE prev_ifile(IFILE h);
+public IFILE getoff_ifile(IFILE ifile);
+public int nifile(void);
+public IFILE get_ifile(char *filename, IFILE prev);
+public char * get_filename(IFILE ifile);
+public char * get_real_filename(IFILE ifile);
+public int get_index(IFILE ifile);
+public void store_pos(IFILE ifile, struct scrpos *scrpos);
+public void get_pos(IFILE ifile, struct scrpos *scrpos);
+public void set_open(IFILE ifile);
+public int opened(IFILE ifile);
+public void hold_ifile(IFILE ifile, int incr);
+public int held_ifile(IFILE ifile);
+public void * get_filestate(IFILE ifile);
+public void set_filestate(IFILE ifile, void *filestate);
+public void set_altpipe(IFILE ifile, void *p);
+public void *get_altpipe(IFILE ifile);
+public void set_altfilename(IFILE ifile, char *altfilename);
+public char * get_altfilename(IFILE ifile);
+public void if_dump(void);
+public POSITION forw_line_seg(POSITION curr_pos, int skipeol, int rscroll, int nochop);
+public POSITION forw_line(POSITION curr_pos);
+public POSITION back_line(POSITION curr_pos);
+public void set_attnpos(POSITION pos);
+public void jump_forw(void);
+public void jump_forw_buffered(void);
+public void jump_back(LINENUM linenum);
+public void repaint(void);
+public void jump_percent(int percent, long fraction);
+public void jump_line_loc(POSITION pos, int sline);
+public void jump_loc(POSITION pos, int sline);
+public void init_line(void);
+public int is_ascii_char(LWCHAR ch);
+public POSITION line_position(void);

_service:tar_scm:less-633.tar.gz/help.c Added

@@ -0,0 +1,303 @@
+/* This file was generated by mkhelp.pl from less.hlp at 18:42 on 2023/5/3 */
+#include "less.h"
+constant char helpdata = {
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','\b','S','U','\b','U','M','\b','M','M','\b','M','A','\b','A','R','\b','R','Y','\b','Y',' ','O','\b','O','F','\b','F',' ','L','\b','L','E','\b','E','S','\b','S','S','\b','S',' ','C','\b','C','O','\b','O','M','\b','M','M','\b','M','A','\b','A','N','\b','N','D','\b','D','S','\b','S','\n',
+'\n',
+' ',' ',' ',' ',' ',' ','C','o','m','m','a','n','d','s',' ','m','a','r','k','e','d',' ','w','i','t','h',' ','*',' ','m','a','y',' ','b','e',' ','p','r','e','c','e','d','e','d',' ','b','y',' ','a',' ','n','u','m','b','e','r',',',' ','_','\b','N','.','\n',
+' ',' ',' ',' ',' ',' ','N','o','t','e','s',' ','i','n',' ','p','a','r','e','n','t','h','e','s','e','s',' ','i','n','d','i','c','a','t','e',' ','t','h','e',' ','b','e','h','a','v','i','o','r',' ','i','f',' ','_','\b','N',' ','i','s',' ','g','i','v','e','n','.','\n',
+' ',' ',' ',' ',' ',' ','A',' ','k','e','y',' ','p','r','e','c','e','d','e','d',' ','b','y',' ','a',' ','c','a','r','e','t',' ','i','n','d','i','c','a','t','e','s',' ','t','h','e',' ','C','t','r','l',' ','k','e','y',';',' ','t','h','u','s',' ','^','K',' ','i','s',' ','c','t','r','l','-','K','.','\n',
+'\n',
+' ',' ','h',' ',' ','H',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','t','h','i','s',' ','h','e','l','p','.','\n',
+' ',' ','q',' ',' ',':','q',' ',' ','Q',' ',' ',':','Q',' ',' ','Z','Z',' ',' ',' ',' ',' ','E','x','i','t','.','\n',
+' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','M','\b','M','O','\b','O','V','\b','V','I','\b','I','N','\b','N','G','\b','G','\n',
+'\n',
+' ',' ','e',' ',' ','^','E',' ',' ','j',' ',' ','^','N',' ',' ','C','R',' ',' ','*',' ',' ','F','o','r','w','a','r','d',' ',' ','o','n','e',' ','l','i','n','e',' ',' ',' ','(','o','r',' ','_','\b','N',' ','l','i','n','e','s',')','.','\n',
+' ',' ','y',' ',' ','^','Y',' ',' ','k',' ',' ','^','K',' ',' ','^','P',' ',' ','*',' ',' ','B','a','c','k','w','a','r','d',' ','o','n','e',' ','l','i','n','e',' ',' ',' ','(','o','r',' ','_','\b','N',' ','l','i','n','e','s',')','.','\n',
+' ',' ','f',' ',' ','^','F',' ',' ','^','V',' ',' ','S','P','A','C','E',' ',' ','*',' ',' ','F','o','r','w','a','r','d',' ',' ','o','n','e',' ','w','i','n','d','o','w',' ','(','o','r',' ','_','\b','N',' ','l','i','n','e','s',')','.','\n',
+' ',' ','b',' ',' ','^','B',' ',' ','E','S','C','-','v',' ',' ',' ',' ',' ',' ','*',' ',' ','B','a','c','k','w','a','r','d',' ','o','n','e',' ','w','i','n','d','o','w',' ','(','o','r',' ','_','\b','N',' ','l','i','n','e','s',')','.','\n',
+' ',' ','z',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','F','o','r','w','a','r','d',' ',' ','o','n','e',' ','w','i','n','d','o','w',' ','(','a','n','d',' ','s','e','t',' ','w','i','n','d','o','w',' ','t','o',' ','_','\b','N',')','.','\n',
+' ',' ','w',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','B','a','c','k','w','a','r','d',' ','o','n','e',' ','w','i','n','d','o','w',' ','(','a','n','d',' ','s','e','t',' ','w','i','n','d','o','w',' ','t','o',' ','_','\b','N',')','.','\n',
+' ',' ','E','S','C','-','S','P','A','C','E',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','F','o','r','w','a','r','d',' ',' ','o','n','e',' ','w','i','n','d','o','w',',',' ','b','u','t',' ','d','o','n','\'','t',' ','s','t','o','p',' ','a','t',' ','e','n','d','-','o','f','-','f','i','l','e','.','\n',
+' ',' ','d',' ',' ','^','D',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','F','o','r','w','a','r','d',' ',' ','o','n','e',' ','h','a','l','f','-','w','i','n','d','o','w',' ','(','a','n','d',' ','s','e','t',' ','h','a','l','f','-','w','i','n','d','o','w',' ','t','o',' ','_','\b','N',')','.','\n',
+' ',' ','u',' ',' ','^','U',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','B','a','c','k','w','a','r','d',' ','o','n','e',' ','h','a','l','f','-','w','i','n','d','o','w',' ','(','a','n','d',' ','s','e','t',' ','h','a','l','f','-','w','i','n','d','o','w',' ','t','o',' ','_','\b','N',')','.','\n',
+' ',' ','E','S','C','-',')',' ',' ','R','i','g','h','t','A','r','r','o','w',' ','*',' ',' ','R','i','g','h','t',' ','o','n','e',' ','h','a','l','f',' ','s','c','r','e','e','n',' ','w','i','d','t','h',' ','(','o','r',' ','_','\b','N',' ','p','o','s','i','t','i','o','n','s',')','.','\n',
+' ',' ','E','S','C','-','(',' ',' ','L','e','f','t','A','r','r','o','w',' ',' ','*',' ',' ','L','e','f','t',' ',' ','o','n','e',' ','h','a','l','f',' ','s','c','r','e','e','n',' ','w','i','d','t','h',' ','(','o','r',' ','_','\b','N',' ','p','o','s','i','t','i','o','n','s',')','.','\n',
+' ',' ','E','S','C','-','}',' ',' ','^','R','i','g','h','t','A','r','r','o','w',' ',' ',' ','R','i','g','h','t',' ','t','o',' ','l','a','s','t',' ','c','o','l','u','m','n',' ','d','i','s','p','l','a','y','e','d','.','\n',
+' ',' ','E','S','C','-','{',' ',' ','^','L','e','f','t','A','r','r','o','w',' ',' ',' ',' ','L','e','f','t',' ',' ','t','o',' ','f','i','r','s','t',' ','c','o','l','u','m','n','.','\n',
+' ',' ','F',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','F','o','r','w','a','r','d',' ','f','o','r','e','v','e','r',';',' ','l','i','k','e',' ','"','t','a','i','l',' ','-','f','"','.','\n',
+' ',' ','E','S','C','-','F',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','L','i','k','e',' ','F',' ','b','u','t',' ','s','t','o','p',' ','w','h','e','n',' ','s','e','a','r','c','h',' ','p','a','t','t','e','r','n',' ','i','s',' ','f','o','u','n','d','.','\n',
+' ',' ','r',' ',' ','^','R',' ',' ','^','L',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','R','e','p','a','i','n','t',' ','s','c','r','e','e','n','.','\n',
+' ',' ','R',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','R','e','p','a','i','n','t',' ','s','c','r','e','e','n',',',' ','d','i','s','c','a','r','d','i','n','g',' ','b','u','f','f','e','r','e','d',' ','i','n','p','u','t','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','D','e','f','a','u','l','t',' ','"','w','i','n','d','o','w','"',' ','i','s',' ','t','h','e',' ','s','c','r','e','e','n',' ','h','e','i','g','h','t','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','D','e','f','a','u','l','t',' ','"','h','a','l','f','-','w','i','n','d','o','w','"',' ','i','s',' ','h','a','l','f',' ','o','f',' ','t','h','e',' ','s','c','r','e','e','n',' ','h','e','i','g','h','t','.','\n',
+' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','\b','S','E','\b','E','A','\b','A','R','\b','R','C','\b','C','H','\b','H','I','\b','I','N','\b','N','G','\b','G','\n',
+'\n',
+' ',' ','/','_','\b','p','_','\b','a','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','n',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','S','e','a','r','c','h',' ','f','o','r','w','a','r','d',' ','f','o','r',' ','(','_','\b','N','-','t','h',')',' ','m','a','t','c','h','i','n','g',' ','l','i','n','e','.','\n',
+' ',' ','?','_','\b','p','_','\b','a','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','n',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','S','e','a','r','c','h',' ','b','a','c','k','w','a','r','d',' ','f','o','r',' ','(','_','\b','N','-','t','h',')',' ','m','a','t','c','h','i','n','g',' ','l','i','n','e','.','\n',
+' ',' ','n',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','R','e','p','e','a','t',' ','p','r','e','v','i','o','u','s',' ','s','e','a','r','c','h',' ','(','f','o','r',' ','_','\b','N','-','t','h',' ','o','c','c','u','r','r','e','n','c','e',')','.','\n',
+' ',' ','N',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','R','e','p','e','a','t',' ','p','r','e','v','i','o','u','s',' ','s','e','a','r','c','h',' ','i','n',' ','r','e','v','e','r','s','e',' ','d','i','r','e','c','t','i','o','n','.','\n',
+' ',' ','E','S','C','-','n',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','R','e','p','e','a','t',' ','p','r','e','v','i','o','u','s',' ','s','e','a','r','c','h',',',' ','s','p','a','n','n','i','n','g',' ','f','i','l','e','s','.','\n',
+' ',' ','E','S','C','-','N',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','R','e','p','e','a','t',' ','p','r','e','v','i','o','u','s',' ','s','e','a','r','c','h',',',' ','r','e','v','e','r','s','e',' ','d','i','r','.',' ','&',' ','s','p','a','n','n','i','n','g',' ','f','i','l','e','s','.','\n',
+' ',' ','E','S','C','-','u',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','U','n','d','o',' ','(','t','o','g','g','l','e',')',' ','s','e','a','r','c','h',' ','h','i','g','h','l','i','g','h','t','i','n','g','.','\n',
+' ',' ','E','S','C','-','U',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','C','l','e','a','r',' ','s','e','a','r','c','h',' ','h','i','g','h','l','i','g','h','t','i','n','g','.','\n',
+' ',' ','&','_','\b','p','_','\b','a','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','n',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','D','i','s','p','l','a','y',' ','o','n','l','y',' ','m','a','t','c','h','i','n','g',' ','l','i','n','e','s','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','A',' ','s','e','a','r','c','h',' ','p','a','t','t','e','r','n',' ','m','a','y',' ','b','e','g','i','n',' ','w','i','t','h',' ','o','n','e',' ','o','r',' ','m','o','r','e',' ','o','f',':','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','N',' ','o','r',' ','!',' ',' ','S','e','a','r','c','h',' ','f','o','r',' ','N','O','N','-','m','a','t','c','h','i','n','g',' ','l','i','n','e','s','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','E',' ','o','r',' ','*',' ',' ','S','e','a','r','c','h',' ','m','u','l','t','i','p','l','e',' ','f','i','l','e','s',' ','(','p','a','s','s',' ','t','h','r','u',' ','E','N','D',' ','O','F',' ','F','I','L','E',')','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','F',' ','o','r',' ','@',' ',' ','S','t','a','r','t',' ','s','e','a','r','c','h',' ','a','t',' ','F','I','R','S','T',' ','f','i','l','e',' ','(','f','o','r',' ','/',')',' ','o','r',' ','l','a','s','t',' ','f','i','l','e',' ','(','f','o','r',' ','?',')','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','K',' ',' ',' ',' ',' ',' ',' ','H','i','g','h','l','i','g','h','t',' ','m','a','t','c','h','e','s',',',' ','b','u','t',' ','d','o','n','\'','t',' ','m','o','v','e',' ','(','K','E','E','P',' ','p','o','s','i','t','i','o','n',')','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','R',' ',' ',' ',' ',' ',' ',' ','D','o','n','\'','t',' ','u','s','e',' ','R','E','G','U','L','A','R',' ','E','X','P','R','E','S','S','I','O','N','S','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','S',' ','_','\b','n',' ',' ',' ',' ',' ','S','e','a','r','c','h',' ','f','o','r',' ','m','a','t','c','h',' ','i','n',' ','_','\b','n','-','t','h',' ','p','a','r','e','n','t','h','e','s','i','z','e','d',' ','s','u','b','p','a','t','t','e','r','n','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','^','W',' ',' ',' ',' ',' ',' ',' ','W','R','A','P',' ','s','e','a','r','c','h',' ','i','f',' ','n','o',' ','m','a','t','c','h',' ','f','o','u','n','d','.','\n',
+' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','J','\b','J','U','\b','U','M','\b','M','P','\b','P','I','\b','I','N','\b','N','G','\b','G','\n',
+'\n',
+' ',' ','g',' ',' ','<',' ',' ','E','S','C','-','<',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','G','o',' ','t','o',' ','f','i','r','s','t',' ','l','i','n','e',' ','i','n',' ','f','i','l','e',' ','(','o','r',' ','l','i','n','e',' ','_','\b','N',')','.','\n',
+' ',' ','G',' ',' ','>',' ',' ','E','S','C','-','>',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','G','o',' ','t','o',' ','l','a','s','t',' ','l','i','n','e',' ','i','n',' ','f','i','l','e',' ','(','o','r',' ','l','i','n','e',' ','_','\b','N',')','.','\n',
+' ',' ','p',' ',' ','%',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','G','o',' ','t','o',' ','b','e','g','i','n','n','i','n','g',' ','o','f',' ','f','i','l','e',' ','(','o','r',' ','_','\b','N',' ','p','e','r','c','e','n','t',' ','i','n','t','o',' ','f','i','l','e',')','.','\n',
+' ',' ','t',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','G','o',' ','t','o',' ','t','h','e',' ','(','_','\b','N','-','t','h',')',' ','n','e','x','t',' ','t','a','g','.','\n',
+' ',' ','T',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','G','o',' ','t','o',' ','t','h','e',' ','(','_','\b','N','-','t','h',')',' ','p','r','e','v','i','o','u','s',' ','t','a','g','.','\n',
+' ',' ','{',' ',' ','(',' ',' ','',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','F','i','n','d',' ','c','l','o','s','e',' ','b','r','a','c','k','e','t',' ','}',' ',')',' ','','.','\n',
+' ',' ','}',' ',' ',')',' ',' ','',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','F','i','n','d',' ','o','p','e','n',' ','b','r','a','c','k','e','t',' ','{',' ','(',' ','','.','\n',
+' ',' ','E','S','C','-','^','F',' ','_','\b','<','_','\b','c','_','\b','1','_','\b','>',' ','_','\b','<','_','\b','c','_','\b','2','_','\b','>',' ',' ','*',' ',' ','F','i','n','d',' ','c','l','o','s','e',' ','b','r','a','c','k','e','t',' ','_','\b','<','_','\b','c','_','\b','2','_','\b','>','.','\n',
+' ',' ','E','S','C','-','^','B',' ','_','\b','<','_','\b','c','_','\b','1','_','\b','>',' ','_','\b','<','_','\b','c','_','\b','2','_','\b','>',' ',' ','*',' ',' ','F','i','n','d',' ','o','p','e','n',' ','b','r','a','c','k','e','t',' ','_','\b','<','_','\b','c','_','\b','1','_','\b','>','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','E','a','c','h',' ','"','f','i','n','d',' ','c','l','o','s','e',' ','b','r','a','c','k','e','t','"',' ','c','o','m','m','a','n','d',' ','g','o','e','s',' ','f','o','r','w','a','r','d',' ','t','o',' ','t','h','e',' ','c','l','o','s','e',' ','b','r','a','c','k','e','t',' ','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','m','a','t','c','h','i','n','g',' ','t','h','e',' ','(','_','\b','N','-','t','h',')',' ','o','p','e','n',' ','b','r','a','c','k','e','t',' ','i','n',' ','t','h','e',' ','t','o','p',' ','l','i','n','e','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','E','a','c','h',' ','"','f','i','n','d',' ','o','p','e','n',' ','b','r','a','c','k','e','t','"',' ','c','o','m','m','a','n','d',' ','g','o','e','s',' ','b','a','c','k','w','a','r','d',' ','t','o',' ','t','h','e',' ','o','p','e','n',' ','b','r','a','c','k','e','t',' ','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','m','a','t','c','h','i','n','g',' ','t','h','e',' ','(','_','\b','N','-','t','h',')',' ','c','l','o','s','e',' ','b','r','a','c','k','e','t',' ','i','n',' ','t','h','e',' ','b','o','t','t','o','m',' ','l','i','n','e','.','\n',
+'\n',
+' ',' ','m','_','\b','<','_','\b','l','_','\b','e','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','M','a','r','k',' ','t','h','e',' ','c','u','r','r','e','n','t',' ','t','o','p',' ','l','i','n','e',' ','w','i','t','h',' ','<','l','e','t','t','e','r','>','.','\n',
+' ',' ','M','_','\b','<','_','\b','l','_','\b','e','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','M','a','r','k',' ','t','h','e',' ','c','u','r','r','e','n','t',' ','b','o','t','t','o','m',' ','l','i','n','e',' ','w','i','t','h',' ','<','l','e','t','t','e','r','>','.','\n',
+' ',' ','\'','_','\b','<','_','\b','l','_','\b','e','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','G','o',' ','t','o',' ','a',' ','p','r','e','v','i','o','u','s','l','y',' ','m','a','r','k','e','d',' ','p','o','s','i','t','i','o','n','.','\n',
+' ',' ','\'','\'',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','G','o',' ','t','o',' ','t','h','e',' ','p','r','e','v','i','o','u','s',' ','p','o','s','i','t','i','o','n','.','\n',
+' ',' ','^','X','^','X',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','a','m','e',' ','a','s',' ','\'','.','\n',
+' ',' ','E','S','C','-','m','_','\b','<','_','\b','l','_','\b','e','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ','C','l','e','a','r',' ','a',' ','m','a','r','k','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','A',' ','m','a','r','k',' ','i','s',' ','a','n','y',' ','u','p','p','e','r','-','c','a','s','e',' ','o','r',' ','l','o','w','e','r','-','c','a','s','e',' ','l','e','t','t','e','r','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','C','e','r','t','a','i','n',' ','m','a','r','k','s',' ','a','r','e',' ','p','r','e','d','e','f','i','n','e','d',':','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','^',' ',' ','m','e','a','n','s',' ',' ','b','e','g','i','n','n','i','n','g',' ','o','f',' ','t','h','e',' ','f','i','l','e','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','$',' ',' ','m','e','a','n','s',' ',' ','e','n','d',' ','o','f',' ','t','h','e',' ','f','i','l','e','\n',
+' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','C','\b','C','H','\b','H','A','\b','A','N','\b','N','G','\b','G','I','\b','I','N','\b','N','G','\b','G',' ','F','\b','F','I','\b','I','L','\b','L','E','\b','E','S','\b','S','\n',
+'\n',
+' ',' ',':','e',' ','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','E','x','a','m','i','n','e',' ','a',' ','n','e','w',' ','f','i','l','e','.','\n',
+' ',' ','^','X','^','V',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','a','m','e',' ','a','s',' ',':','e','.','\n',
+' ',' ',':','n',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','E','x','a','m','i','n','e',' ','t','h','e',' ','(','_','\b','N','-','t','h',')',' ','n','e','x','t',' ','f','i','l','e',' ','f','r','o','m',' ','t','h','e',' ','c','o','m','m','a','n','d',' ','l','i','n','e','.','\n',
+' ',' ',':','p',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','E','x','a','m','i','n','e',' ','t','h','e',' ','(','_','\b','N','-','t','h',')',' ','p','r','e','v','i','o','u','s',' ','f','i','l','e',' ','f','r','o','m',' ','t','h','e',' ','c','o','m','m','a','n','d',' ','l','i','n','e','.','\n',
+' ',' ',':','x',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','*',' ',' ','E','x','a','m','i','n','e',' ','t','h','e',' ','f','i','r','s','t',' ','(','o','r',' ','_','\b','N','-','t','h',')',' ','f','i','l','e',' ','f','r','o','m',' ','t','h','e',' ','c','o','m','m','a','n','d',' ','l','i','n','e','.','\n',
+' ',' ',':','d',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','e','l','e','t','e',' ','t','h','e',' ','c','u','r','r','e','n','t',' ','f','i','l','e',' ','f','r','o','m',' ','t','h','e',' ','c','o','m','m','a','n','d',' ','l','i','n','e',' ','l','i','s','t','.','\n',
+' ',' ','=',' ',' ','^','G',' ',' ',':','f',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','P','r','i','n','t',' ','c','u','r','r','e','n','t',' ','f','i','l','e',' ','n','a','m','e','.','\n',
+' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','M','\b','M','I','\b','I','S','\b','S','C','\b','C','E','\b','E','L','\b','L','L','\b','L','A','\b','A','N','\b','N','E','\b','E','O','\b','O','U','\b','U','S','\b','S',' ','C','\b','C','O','\b','O','M','\b','M','M','\b','M','A','\b','A','N','\b','N','D','\b','D','S','\b','S','\n',
+'\n',
+' ',' ','-','_','\b','<','_','\b','f','_','\b','l','_','\b','a','_','\b','g','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','T','o','g','g','l','e',' ','a',' ','c','o','m','m','a','n','d',' ','l','i','n','e',' ','o','p','t','i','o','n',' ','','s','e','e',' ','O','P','T','I','O','N','S',' ','b','e','l','o','w','','.','\n',
+' ',' ','-','-','_','\b','<','_','\b','n','_','\b','a','_','\b','m','_','\b','e','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','T','o','g','g','l','e',' ','a',' ','c','o','m','m','a','n','d',' ','l','i','n','e',' ','o','p','t','i','o','n',',',' ','b','y',' ','n','a','m','e','.','\n',
+' ',' ','_','_','\b','<','_','\b','f','_','\b','l','_','\b','a','_','\b','g','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','t','h','e',' ','s','e','t','t','i','n','g',' ','o','f',' ','a',' ','c','o','m','m','a','n','d',' ','l','i','n','e',' ','o','p','t','i','o','n','.','\n',
+' ',' ','_','_','_','\b','<','_','\b','n','_','\b','a','_','\b','m','_','\b','e','_','\b','>',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','t','h','e',' ','s','e','t','t','i','n','g',' ','o','f',' ','a','n',' ','o','p','t','i','o','n',',',' ','b','y',' ','n','a','m','e','.','\n',
+' ',' ','+','_','\b','c','_','\b','m','_','\b','d',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','E','x','e','c','u','t','e',' ','t','h','e',' ','l','e','s','s',' ','c','m','d',' ','e','a','c','h',' ','t','i','m','e',' ','a',' ','n','e','w',' ','f','i','l','e',' ','i','s',' ','e','x','a','m','i','n','e','d','.','\n',
+'\n',
+' ',' ','!','_','\b','c','_','\b','o','_','\b','m','_','\b','m','_','\b','a','_','\b','n','_','\b','d',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','E','x','e','c','u','t','e',' ','t','h','e',' ','s','h','e','l','l',' ','c','o','m','m','a','n','d',' ','w','i','t','h',' ','$','S','H','E','L','L','.','\n',
+' ',' ','#','_','\b','c','_','\b','o','_','\b','m','_','\b','m','_','\b','a','_','\b','n','_','\b','d',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','E','x','e','c','u','t','e',' ','t','h','e',' ','s','h','e','l','l',' ','c','o','m','m','a','n','d',',',' ','e','x','p','a','n','d','e','d',' ','l','i','k','e',' ','a',' ','p','r','o','m','p','t','.','\n',
+' ',' ','|','X','\b','X','_','\b','c','_','\b','o','_','\b','m','_','\b','m','_','\b','a','_','\b','n','_','\b','d',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','P','i','p','e',' ','f','i','l','e',' ','b','e','t','w','e','e','n',' ','c','u','r','r','e','n','t',' ','p','o','s',' ','&',' ','m','a','r','k',' ','X','\b','X',' ','t','o',' ','s','h','e','l','l',' ','c','o','m','m','a','n','d','.','\n',
+' ',' ','s',' ','_','\b','f','_','\b','i','_','\b','l','_','\b','e',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','a','v','e',' ','i','n','p','u','t',' ','t','o',' ','a',' ','f','i','l','e','.','\n',
+' ',' ','v',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','E','d','i','t',' ','t','h','e',' ','c','u','r','r','e','n','t',' ','f','i','l','e',' ','w','i','t','h',' ','$','V','I','S','U','A','L',' ','o','r',' ','$','E','D','I','T','O','R','.','\n',
+' ',' ','V',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','P','r','i','n','t',' ','v','e','r','s','i','o','n',' ','n','u','m','b','e','r',' ','o','f',' ','"','l','e','s','s','"','.','\n',
+' ','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','-','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','O','\b','O','P','\b','P','T','\b','T','I','\b','I','O','\b','O','N','\b','N','S','\b','S','\n',
+'\n',
+' ',' ',' ',' ',' ',' ',' ',' ','M','o','s','t',' ','o','p','t','i','o','n','s',' ','m','a','y',' ','b','e',' ','c','h','a','n','g','e','d',' ','e','i','t','h','e','r',' ','o','n',' ','t','h','e',' ','c','o','m','m','a','n','d',' ','l','i','n','e',',','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','o','r',' ','f','r','o','m',' ','w','i','t','h','i','n',' ','l','e','s','s',' ','b','y',' ','u','s','i','n','g',' ','t','h','e',' ','-',' ','o','r',' ','-','-',' ','c','o','m','m','a','n','d','.','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','O','p','t','i','o','n','s',' ','m','a','y',' ','b','e',' ','g','i','v','e','n',' ','i','n',' ','o','n','e',' ','o','f',' ','t','w','o',' ','f','o','r','m','s',':',' ','e','i','t','h','e','r',' ','a',' ','s','i','n','g','l','e','\n',
+' ',' ',' ',' ',' ',' ',' ',' ','c','h','a','r','a','c','t','e','r',' ','p','r','e','c','e','d','e','d',' ','b','y',' ','a',' ','-',',',' ','o','r',' ','a',' ','n','a','m','e',' ','p','r','e','c','e','d','e','d',' ','b','y',' ','-','-','.','\n',
+'\n',
+' ',' ','-','?',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','h','e','l','p','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','h','e','l','p',' ','(','f','r','o','m',' ','c','o','m','m','a','n','d',' ','l','i','n','e',')','.','\n',
+' ',' ','-','a',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','s','e','a','r','c','h','-','s','k','i','p','-','s','c','r','e','e','n','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','e','a','r','c','h',' ','s','k','i','p','s',' ','c','u','r','r','e','n','t',' ','s','c','r','e','e','n','.','\n',
+' ',' ','-','A',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','S','E','A','R','C','H','-','S','K','I','P','-','S','C','R','E','E','N','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','e','a','r','c','h',' ','s','t','a','r','t','s',' ','j','u','s','t',' ','a','f','t','e','r',' ','t','a','r','g','e','t',' ','l','i','n','e','.','\n',
+' ',' ','-','b',' ','','_','\b','N','',' ',' ','.','.','.','.',' ',' ','-','-','b','u','f','f','e','r','s','=','','_','\b','N','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','N','u','m','b','e','r',' ','o','f',' ','b','u','f','f','e','r','s','.','\n',
+' ',' ','-','B',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','a','u','t','o','-','b','u','f','f','e','r','s','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','o','n','\'','t',' ','a','u','t','o','m','a','t','i','c','a','l','l','y',' ','a','l','l','o','c','a','t','e',' ','b','u','f','f','e','r','s',' ','f','o','r',' ','p','i','p','e','s','.','\n',
+' ',' ','-','c',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','c','l','e','a','r','-','s','c','r','e','e','n','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','R','e','p','a','i','n','t',' ','b','y',' ','c','l','e','a','r','i','n','g',' ','r','a','t','h','e','r',' ','t','h','a','n',' ','s','c','r','o','l','l','i','n','g','.','\n',
+' ',' ','-','d',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','d','u','m','b','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','u','m','b',' ','t','e','r','m','i','n','a','l','.','\n',
+' ',' ','-','D',' ','x','\b','x','_','\b','c','_','\b','o','_','\b','l','_','\b','o','_','\b','r',' ',' ','.',' ',' ','-','-','c','o','l','o','r','=','x','\b','x','_','\b','c','_','\b','o','_','\b','l','_','\b','o','_','\b','r','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','e','t',' ','s','c','r','e','e','n',' ','c','o','l','o','r','s','.','\n',
+' ',' ','-','e',' ',' ','-','E',' ',' ','.','.','.','.',' ',' ','-','-','q','u','i','t','-','a','t','-','e','o','f',' ',' ','-','-','Q','U','I','T','-','A','T','-','E','O','F','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','Q','u','i','t',' ','a','t',' ','e','n','d',' ','o','f',' ','f','i','l','e','.','\n',
+' ',' ','-','f',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','f','o','r','c','e','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','F','o','r','c','e',' ','o','p','e','n',' ','n','o','n','-','r','e','g','u','l','a','r',' ','f','i','l','e','s','.','\n',
+' ',' ','-','F',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','q','u','i','t','-','i','f','-','o','n','e','-','s','c','r','e','e','n','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','Q','u','i','t',' ','i','f',' ','e','n','t','i','r','e',' ','f','i','l','e',' ','f','i','t','s',' ','o','n',' ','f','i','r','s','t',' ','s','c','r','e','e','n','.','\n',
+' ',' ','-','g',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','h','i','l','i','t','e','-','s','e','a','r','c','h','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','H','i','g','h','l','i','g','h','t',' ','o','n','l','y',' ','l','a','s','t',' ','m','a','t','c','h',' ','f','o','r',' ','s','e','a','r','c','h','e','s','.','\n',
+' ',' ','-','G',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','H','I','L','I','T','E','-','S','E','A','R','C','H','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','o','n','\'','t',' ','h','i','g','h','l','i','g','h','t',' ','a','n','y',' ','m','a','t','c','h','e','s',' ','f','o','r',' ','s','e','a','r','c','h','e','s','.','\n',
+' ',' ','-','h',' ','','_','\b','N','',' ',' ','.','.','.','.',' ',' ','-','-','m','a','x','-','b','a','c','k','-','s','c','r','o','l','l','=','','_','\b','N','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','B','a','c','k','w','a','r','d',' ','s','c','r','o','l','l',' ','l','i','m','i','t','.','\n',
+' ',' ','-','i',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','i','g','n','o','r','e','-','c','a','s','e','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','I','g','n','o','r','e',' ','c','a','s','e',' ','i','n',' ','s','e','a','r','c','h','e','s',' ','t','h','a','t',' ','d','o',' ','n','o','t',' ','c','o','n','t','a','i','n',' ','u','p','p','e','r','c','a','s','e','.','\n',
+' ',' ','-','I',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','I','G','N','O','R','E','-','C','A','S','E','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','I','g','n','o','r','e',' ','c','a','s','e',' ','i','n',' ','a','l','l',' ','s','e','a','r','c','h','e','s','.','\n',
+' ',' ','-','j',' ','','_','\b','N','',' ',' ','.','.','.','.',' ',' ','-','-','j','u','m','p','-','t','a','r','g','e','t','=','','_','\b','N','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','c','r','e','e','n',' ','p','o','s','i','t','i','o','n',' ','o','f',' ','t','a','r','g','e','t',' ','l','i','n','e','s','.','\n',
+' ',' ','-','J',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','s','t','a','t','u','s','-','c','o','l','u','m','n','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','a',' ','s','t','a','t','u','s',' ','c','o','l','u','m','n',' ','a','t',' ','l','e','f','t',' ','e','d','g','e',' ','o','f',' ','s','c','r','e','e','n','.','\n',
+' ',' ','-','k',' ','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','',' ',' ','.',' ',' ','-','-','l','e','s','s','k','e','y','-','f','i','l','e','=','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','U','s','e',' ','a',' ','l','e','s','s','k','e','y',' ','f','i','l','e','.','\n',
+' ',' ','-','K',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','q','u','i','t','-','o','n','-','i','n','t','r','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','E','x','i','t',' ','l','e','s','s',' ','i','n',' ','r','e','s','p','o','n','s','e',' ','t','o',' ','c','t','r','l','-','C','.','\n',
+' ',' ','-','L',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','n','o','-','l','e','s','s','o','p','e','n','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','I','g','n','o','r','e',' ','t','h','e',' ','L','E','S','S','O','P','E','N',' ','e','n','v','i','r','o','n','m','e','n','t',' ','v','a','r','i','a','b','l','e','.','\n',
+' ',' ','-','m',' ',' ','-','M',' ',' ','.','.','.','.',' ',' ','-','-','l','o','n','g','-','p','r','o','m','p','t',' ',' ','-','-','L','O','N','G','-','P','R','O','M','P','T','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','e','t',' ','p','r','o','m','p','t',' ','s','t','y','l','e','.','\n',
+' ',' ','-','n',' ','.','.','.','.','.','.','.','.','.',' ',' ','-','-','l','i','n','e','-','n','u','m','b','e','r','s','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','u','p','p','r','e','s','s',' ','l','i','n','e',' ','n','u','m','b','e','r','s',' ','i','n',' ','p','r','o','m','p','t','s',' ','a','n','d',' ','m','e','s','s','a','g','e','s','.','\n',
+' ',' ','-','N',' ','.','.','.','.','.','.','.','.','.',' ',' ','-','-','L','I','N','E','-','N','U','M','B','E','R','S','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','l','i','n','e',' ','n','u','m','b','e','r',' ','a','t',' ','s','t','a','r','t',' ','o','f',' ','e','a','c','h',' ','l','i','n','e','.','\n',
+' ',' ','-','o',' ','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','',' ',' ','.',' ',' ','-','-','l','o','g','-','f','i','l','e','=','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','C','o','p','y',' ','t','o',' ','l','o','g',' ','f','i','l','e',' ','(','s','t','a','n','d','a','r','d',' ','i','n','p','u','t',' ','o','n','l','y',')','.','\n',
+' ',' ','-','O',' ','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','',' ',' ','.',' ',' ','-','-','L','O','G','-','F','I','L','E','=','','_','\b','f','_','\b','i','_','\b','l','_','\b','e','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','C','o','p','y',' ','t','o',' ','l','o','g',' ','f','i','l','e',' ','(','u','n','c','o','n','d','i','t','i','o','n','a','l','l','y',' ','o','v','e','r','w','r','i','t','e',')','.','\n',
+' ',' ','-','p',' ','','_','\b','p','_','\b','a','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','n','',' ',' ','-','-','p','a','t','t','e','r','n','=','','_','\b','p','_','\b','a','_','\b','t','_','\b','t','_','\b','e','_','\b','r','_','\b','n','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','t','a','r','t',' ','a','t',' ','p','a','t','t','e','r','n',' ','(','f','r','o','m',' ','c','o','m','m','a','n','d',' ','l','i','n','e',')','.','\n',
+' ',' ','-','P',' ','','_','\b','p','_','\b','r','_','\b','o','_','\b','m','_','\b','p','_','\b','t','',' ',' ',' ','-','-','p','r','o','m','p','t','=','','_','\b','p','_','\b','r','_','\b','o','_','\b','m','_','\b','p','_','\b','t','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','e','f','i','n','e',' ','n','e','w',' ','p','r','o','m','p','t','.','\n',
+' ',' ','-','q',' ',' ','-','Q',' ',' ','.','.','.','.',' ',' ','-','-','q','u','i','e','t',' ',' ','-','-','Q','U','I','E','T',' ',' ','-','-','s','i','l','e','n','t',' ','-','-','S','I','L','E','N','T','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','Q','u','i','e','t',' ','t','h','e',' ','t','e','r','m','i','n','a','l',' ','b','e','l','l','.','\n',
+' ',' ','-','r',' ',' ','-','R',' ',' ','.','.','.','.',' ',' ','-','-','r','a','w','-','c','o','n','t','r','o','l','-','c','h','a','r','s',' ',' ','-','-','R','A','W','-','C','O','N','T','R','O','L','-','C','H','A','R','S','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','O','u','t','p','u','t',' ','"','r','a','w','"',' ','c','o','n','t','r','o','l',' ','c','h','a','r','a','c','t','e','r','s','.','\n',
+' ',' ','-','s',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','s','q','u','e','e','z','e','-','b','l','a','n','k','-','l','i','n','e','s','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','S','q','u','e','e','z','e',' ','m','u','l','t','i','p','l','e',' ','b','l','a','n','k',' ','l','i','n','e','s','.','\n',
+' ',' ','-','S',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','c','h','o','p','-','l','o','n','g','-','l','i','n','e','s','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','C','h','o','p',' ','(','t','r','u','n','c','a','t','e',')',' ','l','o','n','g',' ','l','i','n','e','s',' ','r','a','t','h','e','r',' ','t','h','a','n',' ','w','r','a','p','p','i','n','g','.','\n',
+' ',' ','-','t',' ','','_','\b','t','_','\b','a','_','\b','g','',' ',' ','.','.',' ',' ','-','-','t','a','g','=','','_','\b','t','_','\b','a','_','\b','g','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','F','i','n','d',' ','a',' ','t','a','g','.','\n',
+' ',' ','-','T',' ','','_','\b','t','_','\b','a','_','\b','g','_','\b','s','_','\b','f','_','\b','i','_','\b','l','_','\b','e','',' ','-','-','t','a','g','-','f','i','l','e','=','','_','\b','t','_','\b','a','_','\b','g','_','\b','s','_','\b','f','_','\b','i','_','\b','l','_','\b','e','','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','U','s','e',' ','a','n',' ','a','l','t','e','r','n','a','t','e',' ','t','a','g','s',' ','f','i','l','e','.','\n',
+' ',' ','-','u',' ',' ','-','U',' ',' ','.','.','.','.',' ',' ','-','-','u','n','d','e','r','l','i','n','e','-','s','p','e','c','i','a','l',' ',' ','-','-','U','N','D','E','R','L','I','N','E','-','S','P','E','C','I','A','L','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','C','h','a','n','g','e',' ','h','a','n','d','l','i','n','g',' ','o','f',' ','b','a','c','k','s','p','a','c','e','s',',',' ','t','a','b','s',' ','a','n','d',' ','c','a','r','r','i','a','g','e',' ','r','e','t','u','r','n','s','.','\n',
+' ',' ','-','V',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','v','e','r','s','i','o','n','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','D','i','s','p','l','a','y',' ','t','h','e',' ','v','e','r','s','i','o','n',' ','n','u','m','b','e','r',' ','o','f',' ','"','l','e','s','s','"','.','\n',
+' ',' ','-','w',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','h','i','l','i','t','e','-','u','n','r','e','a','d','\n',
+' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ','H','i','g','h','l','i','g','h','t',' ','f','i','r','s','t',' ','n','e','w',' ','l','i','n','e',' ','a','f','t','e','r',' ','f','o','r','w','a','r','d','-','s','c','r','e','e','n','.','\n',
+' ',' ','-','W',' ',' ','.','.','.','.','.','.','.','.',' ',' ','-','-','H','I','L','I','T','E','-','U','N','R','E','A','D','\n',

_service:tar_scm:less-633.tar.gz/ifile.c Added

@@ -0,0 +1,358 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * An IFILE represents an input file.
+ *
+ * It is actually a pointer to an ifile structure,
+ * but is opaque outside this module.
+ * Ifile structures are kept in a linked list in the order they 
+ * appear on the command line.
+ * Any new file which does not already appear in the list is
+ * inserted after the current file.
+ */
+
+#include "less.h"
+
+extern IFILE    curr_ifile;
+
+struct ifile {
+	struct ifile *h_next;           /* Links for command line list */
+	struct ifile *h_prev;
+	char *h_filename;               /* Name of the file */
+	char *h_rfilename;              /* Canonical name of the file */
+	void *h_filestate;              /* File state (used in ch.c) */
+	int h_index;                    /* Index within command line list */
+	int h_hold;                     /* Hold count */
+	char h_opened;                  /* Has this ifile been opened? */
+	struct scrpos h_scrpos;         /* Saved position within the file */
+	void *h_altpipe;                /* Alt pipe */
+	char *h_altfilename;            /* Alt filename */
+};
+
+/*
+ * Convert an IFILE (external representation)
+ * to a struct file (internal representation), and vice versa.
+ */
+#define int_ifile(h)    ((struct ifile *)(h))
+#define ext_ifile(h)    ((IFILE)(h))
+
+/*
+ * Anchor for linked list.
+ */
+static struct ifile anchor = { &anchor, &anchor, NULL, NULL, NULL, 0, 0, '\0',
+				{ NULL_POSITION, 0 } };
+static int ifiles = 0;
+
+static void incr_index(struct ifile *p, int incr)
+{
+	for (;  p != &anchor;  p = p->h_next)
+		p->h_index += incr;
+}
+
+/*
+ * Link an ifile into the ifile list.
+ */
+static void link_ifile(struct ifile *p, struct ifile *prev)
+{
+	/*
+	 * Link into list.
+	 */
+	if (prev == NULL)
+		prev = &anchor;
+	p->h_next = prev->h_next;
+	p->h_prev = prev;
+	prev->h_next->h_prev = p;
+	prev->h_next = p;
+	/*
+	 * Calculate index for the new one,
+	 * and adjust the indexes for subsequent ifiles in the list.
+	 */
+	p->h_index = prev->h_index + 1;
+	incr_index(p->h_next, 1);
+	ifiles++;
+}
+	
+/*
+ * Unlink an ifile from the ifile list.
+ */
+static void unlink_ifile(struct ifile *p)
+{
+	p->h_next->h_prev = p->h_prev;
+	p->h_prev->h_next = p->h_next;
+	incr_index(p->h_next, -1);
+	ifiles--;
+}
+
+/*
+ * Allocate a new ifile structure and stick a filename in it.
+ * It should go after "prev" in the list
+ * (or at the beginning of the list if "prev" is NULL).
+ * Return a pointer to the new ifile structure.
+ */
+static struct ifile * new_ifile(char *filename, struct ifile *prev)
+{
+	struct ifile *p;
+
+	/*
+	 * Allocate and initialize structure.
+	 */
+	p = (struct ifile *) ecalloc(1, sizeof(struct ifile));
+	p->h_filename = save(filename);
+	p->h_rfilename = lrealpath(filename);
+	p->h_scrpos.pos = NULL_POSITION;
+	p->h_opened = 0;
+	p->h_hold = 0;
+	p->h_filestate = NULL;
+	p->h_altfilename = NULL;
+	p->h_altpipe = NULL;
+	link_ifile(p, prev);
+	/*
+	 * {{ It's dodgy to call mark.c functions from here;
+	 *    there is potentially dangerous recursion.
+	 *    Probably need to revisit this design. }}
+	 */
+	mark_check_ifile(ext_ifile(p));
+	return (p);
+}
+
+/*
+ * Delete an existing ifile structure.
+ */
+public void del_ifile(IFILE h)
+{
+	struct ifile *p;
+
+	if (h == NULL_IFILE)
+		return;
+	/*
+	 * If the ifile we're deleting is the currently open ifile,
+	 * move off it.
+	 */
+	unmark(h);
+	if (h == curr_ifile)
+		curr_ifile = getoff_ifile(curr_ifile);
+	p = int_ifile(h);
+	unlink_ifile(p);
+	free(p->h_rfilename);
+	free(p->h_filename);
+	free(p);
+}
+
+/*
+ * Get the ifile after a given one in the list.
+ */
+public IFILE next_ifile(IFILE h)
+{
+	struct ifile *p;
+
+	p = (h == NULL_IFILE) ? &anchor : int_ifile(h);
+	if (p->h_next == &anchor)
+		return (NULL_IFILE);
+	return (ext_ifile(p->h_next));
+}
+
+/*
+ * Get the ifile before a given one in the list.
+ */
+public IFILE prev_ifile(IFILE h)
+{
+	struct ifile *p;
+
+	p = (h == NULL_IFILE) ? &anchor : int_ifile(h);
+	if (p->h_prev == &anchor)
+		return (NULL_IFILE);
+	return (ext_ifile(p->h_prev));
+}
+
+/*
+ * Return a different ifile from the given one.
+ */
+public IFILE getoff_ifile(IFILE ifile)
+{
+	IFILE newifile;
+	
+	if ((newifile = prev_ifile(ifile)) != NULL_IFILE)
+		return (newifile);
+	if ((newifile = next_ifile(ifile)) != NULL_IFILE)
+		return (newifile);
+	return (NULL_IFILE);
+}
+
+/*
+ * Return the number of ifiles.
+ */
+public int nifile(void)
+{
+	return (ifiles);
+}
+
+/*
+ * Find an ifile structure, given a filename.
+ */

_service:tar_scm:less-633.tar.gz/input.c Added

@@ -0,0 +1,624 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+/*
+ * High level routines dealing with getting lines of input 
+ * from the file being viewed.
+ *
+ * When we speak of "lines" here, we mean PRINTABLE lines;
+ * lines processed with respect to the screen width.
+ * We use the term "raw line" to refer to lines simply
+ * delimited by newlines; not processed with respect to screen width.
+ */
+
+#include "less.h"
+
+extern int squeeze;
+extern int hshift;
+extern int quit_if_one_screen;
+extern int sigs;
+extern int ignore_eoi;
+extern int status_col;
+extern int wordwrap;
+extern POSITION start_attnpos;
+extern POSITION end_attnpos;
+#if HILITE_SEARCH
+extern int hilite_search;
+extern int size_linebuf;
+extern int show_attn;
+#endif
+
+/*
+ * Set the status column.
+ *  base  Position of first char in line.
+ *  disp  First visible char.
+ *        Different than base_pos if line is shifted.
+ *  edisp Last visible char. 
+ *  eol   End of line. Normally the newline.
+ *        Different than edisp if line is chopped.
+ */
+static void init_status_col(POSITION base_pos, POSITION disp_pos, POSITION edisp_pos, POSITION eol_pos)
+{
+	int hl_before = (chop_line() && disp_pos != NULL_POSITION) ?
+	    is_hilited_attr(base_pos, disp_pos, TRUE, NULL) : 0;
+	int hl_after = (chop_line()) ?
+	    is_hilited_attr(edisp_pos, eol_pos, TRUE, NULL) : 0;
+	int attr;
+	char ch;
+
+	if (hl_before && hl_after)
+	{
+		attr = hl_after;
+		ch = '=';
+	} else if (hl_before)
+	{
+		attr = hl_before;
+		ch = '<';
+	} else if (hl_after)
+	{
+		attr = hl_after;
+		ch = '>';
+	} else 
+	{
+		attr = is_hilited_attr(base_pos, eol_pos, TRUE, NULL);
+		ch = '*';
+	}
+	if (attr)
+		set_status_col(ch, attr);
+}
+
+/*
+ * Get the next line.
+ * A "current" position is passed and a "new" position is returned.
+ * The current position is the position of the first character of
+ * a line.  The new position is the position of the first character
+ * of the NEXT line.  The line obtained is the line starting at curr_pos.
+ */
+public POSITION forw_line_seg(POSITION curr_pos, int skipeol, int rscroll, int nochop)
+{
+	POSITION base_pos;
+	POSITION new_pos;
+	POSITION edisp_pos;
+	int c;
+	int blankline;
+	int endline;
+	int chopped;
+	int backchars;
+	POSITION wrap_pos;
+	int skipped_leading;
+
+get_forw_line:
+	if (curr_pos == NULL_POSITION)
+	{
+		null_line();
+		return (NULL_POSITION);
+	}
+#if HILITE_SEARCH
+	if (hilite_search == OPT_ONPLUS || is_filtering() || status_col)
+	{
+		/*
+		 * If we are ignoring EOI (command F), only prepare
+		 * one line ahead, to avoid getting stuck waiting for
+		 * slow data without displaying the data we already have.
+		 * If we're not ignoring EOI, we *could* do the same, but
+		 * for efficiency we prepare several lines ahead at once.
+		 */
+		prep_hilite(curr_pos, curr_pos + 3*size_linebuf, 
+				ignore_eoi ? 1 : -1);
+		curr_pos = next_unfiltered(curr_pos);
+	}
+#endif
+	if (ch_seek(curr_pos))
+	{
+		null_line();
+		return (NULL_POSITION);
+	}
+
+	/*
+	 * Step back to the beginning of the line.
+	 */
+	base_pos = curr_pos;
+	for (;;)
+	{
+		if (ABORT_SIGS())
+		{
+			null_line();
+			return (NULL_POSITION);
+		}
+		c = ch_back_get();
+		if (c == EOI)
+			break;
+		if (c == '\n')
+		{
+			(void) ch_forw_get();
+			break;
+		}
+		--base_pos;
+	}
+
+	/*
+	 * Read forward again to the position we should start at.
+	 */
+	prewind();
+	plinestart(base_pos);
+	(void) ch_seek(base_pos);
+	new_pos = base_pos;
+	while (new_pos < curr_pos)
+	{
+		if (ABORT_SIGS())
+		{
+			null_line();
+			return (NULL_POSITION);
+		}
+		c = ch_forw_get();
+		backchars = pappend(c, new_pos);
+		new_pos++;
+		if (backchars > 0)
+		{
+			pshift_all();
+			if (wordwrap && (c == ' ' || c == '\t'))
+			{
+				do
+				{
+					new_pos++;
+					c = ch_forw_get();
+				} while (c == ' ' || c == '\t');
+				backchars = 1;
+			}
+			new_pos -= backchars;
+			while (--backchars >= 0)
+				(void) ch_back_get();
+		}
+	}
+	(void) pflushmbc();
+	pshift_all();
+
+	/*
+	 * Read the first character to display.
+	 */
+	c = ch_forw_get();
+	if (c == EOI)
+	{
+		null_line();
+		return (NULL_POSITION);
+	}
+	blankline = (c == '\n' || c == '\r');
+	wrap_pos = NULL_POSITION;
+	skipped_leading = FALSE;
+
+	/*
+	 * Read each character in the line and append to the line buffer.
+	 */
+	chopped = FALSE;
+	for (;;)

_service:tar_scm:less-633.tar.gz/install.sh Added

@@ -0,0 +1,119 @@
+#!/bin/sh
+
+#
+# install - install a program, script, or datafile
+# This comes from X11R5; it is not part of GNU.
+#
+# $XConsortium: install.sh,v 1.2 89/12/18 14:47:22 jim Exp $
+#
+# This script is compatible with the BSD install script, but was written
+# from scratch.
+#
+
+
+# set DOITPROG to echo to test this script
+
+# Don't use :- since 4.3BSD and earlier shells don't like it.
+doit="${DOITPROG-}"
+
+
+# put in absolute paths if you don't have them in your path; or use env. vars.
+
+mvprog="${MVPROG-mv}"
+cpprog="${CPPROG-cp}"
+chmodprog="${CHMODPROG-chmod}"
+chownprog="${CHOWNPROG-chown}"
+chgrpprog="${CHGRPPROG-chgrp}"
+stripprog="${STRIPPROG-strip}"
+rmprog="${RMPROG-rm}"
+
+instcmd="$mvprog"
+chmodcmd=""
+chowncmd=""
+chgrpcmd=""
+stripcmd=""
+rmcmd="$rmprog -f"
+mvcmd="$mvprog"
+src=""
+dst=""
+
+while  x"$1" != x ; do
+    case $1 in
+	-c) instcmd="$cpprog"
+	    shift
+	    continue;;
+
+	-m) chmodcmd="$chmodprog $2"
+	    shift
+	    shift
+	    continue;;
+
+	-o) chowncmd="$chownprog $2"
+	    shift
+	    shift
+	    continue;;
+
+	-g) chgrpcmd="$chgrpprog $2"
+	    shift
+	    shift
+	    continue;;
+
+	-s) stripcmd="$stripprog"
+	    shift
+	    continue;;
+
+	*)  if  x"$src" = x 
+	    then
+		src=$1
+	    else
+		dst=$1
+	    fi
+	    shift
+	    continue;;
+    esac
+done
+
+if  x"$src" = x 
+then
+	echo "install:  no input file specified"
+	exit 1
+fi
+
+if  x"$dst" = x 
+then
+	echo "install:  no destination specified"
+	exit 1
+fi
+
+
+# If destination is a directory, append the input filename; if your system
+# does not like double slashes in filenames, you may need to add some logic
+
+if  -d $dst 
+then
+	dst="$dst"/`basename $src`
+fi
+
+# Make a temp file name in the proper directory.
+
+dstdir=`dirname $dst`
+dsttmp=$dstdir/_inst.$$_
+
+# Move or copy the file name to the temp name
+
+$doit $instcmd $src $dsttmp
+
+# and set any options; do chmod last to preserve setuid bits
+
+if  x"$chowncmd" != x ; then $doit $chowncmd $dsttmp; fi
+if  x"$chgrpcmd" != x ; then $doit $chgrpcmd $dsttmp; fi
+if  x"$stripcmd" != x ; then $doit $stripcmd $dsttmp; fi
+if  x"$chmodcmd" != x ; then $doit $chmodcmd $dsttmp; fi
+
+# Now rename the file to the real destination.
+
+$doit $rmcmd $dst
+$doit $mvcmd $dsttmp $dst
+
+
+exit 0

_service:tar_scm:less-633.tar.gz/jump.c Added

@@ -0,0 +1,325 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines which jump to a new location in the file.
+ */
+
+#include "less.h"
+#include "position.h"
+
+extern int jump_sline;
+extern int squished;
+extern int screen_trashed;
+extern int sc_width, sc_height;
+extern int show_attn;
+extern int top_scroll;
+
+/*
+ * Jump to the end of the file.
+ */
+public void jump_forw(void)
+{
+	POSITION pos;
+	POSITION end_pos;
+
+	if (ch_end_seek())
+	{
+		error("Cannot seek to end of file", NULL_PARG);
+		return;
+	}
+	end_pos = ch_tell();
+	if (position(sc_height-1) == end_pos)
+	{
+		eof_bell();
+		return;
+	}
+	/* 
+	 * Note; lastmark will be called later by jump_loc, but it fails
+	 * because the position table has been cleared by pos_clear below.
+	 * So call it here before calling pos_clear.
+	 */
+	lastmark();
+	/*
+	 * Position the last line in the file at the last screen line.
+	 * Go back one line from the end of the file
+	 * to get to the beginning of the last line.
+	 */
+	pos_clear();
+	pos = back_line(end_pos);
+	if (pos == NULL_POSITION)
+		jump_loc(ch_zero(), sc_height-1);
+	else
+	{
+		jump_loc(pos, sc_height-1);
+		if (position(sc_height-1) != end_pos)
+			repaint();
+	}
+}
+
+/*
+ * Jump to the last buffered line in the file.
+ */
+public void jump_forw_buffered(void)
+{
+	POSITION end;
+
+	if (ch_end_buffer_seek())
+	{
+		error("Cannot seek to end of buffers", NULL_PARG);
+		return;
+	}
+	end = ch_tell();
+	if (end != NULL_POSITION && end > 0)
+		jump_line_loc(end-1, sc_height-1);
+}
+
+/*
+ * Jump to line n in the file.
+ */
+public void jump_back(LINENUM linenum)
+{
+	POSITION pos;
+	PARG parg;
+
+	/*
+	 * Find the position of the specified line.
+	 * If we can seek there, just jump to it.
+	 * If we can't seek, but we're trying to go to line number 1,
+	 * use ch_beg_seek() to get as close as we can.
+	 */
+	pos = find_pos(linenum);
+	if (pos != NULL_POSITION && ch_seek(pos) == 0)
+	{
+		if (show_attn)
+			set_attnpos(pos);
+		jump_loc(pos, jump_sline);
+	} else if (linenum <= 1 && ch_beg_seek() == 0)
+	{
+		jump_loc(ch_tell(), jump_sline);
+		error("Cannot seek to beginning of file", NULL_PARG);
+	} else
+	{
+		parg.p_linenum = linenum;
+		error("Cannot seek to line number %n", &parg);
+	}
+}
+
+/*
+ * Repaint the screen.
+ */
+public void repaint(void)
+{
+	struct scrpos scrpos;
+	/*
+	 * Start at the line currently at the top of the screen
+	 * and redisplay the screen.
+	 */
+	get_scrpos(&scrpos, TOP);
+	pos_clear();
+	if (scrpos.pos == NULL_POSITION)
+		/* Screen hasn't been drawn yet. */
+		jump_loc(ch_zero(), 1);
+	else
+		jump_loc(scrpos.pos, scrpos.ln);
+}
+
+/*
+ * Jump to a specified percentage into the file.
+ */
+public void jump_percent(int percent, long fraction)
+{
+	POSITION pos, len;
+
+	/*
+	 * Determine the position in the file
+	 * (the specified percentage of the file's length).
+	 */
+	if ((len = ch_length()) == NULL_POSITION)
+	{
+		ierror("Determining length of file", NULL_PARG);
+		ch_end_seek();
+	}
+	if ((len = ch_length()) == NULL_POSITION)
+	{
+		error("Don't know length of file", NULL_PARG);
+		return;
+	}
+	pos = percent_pos(len, percent, fraction);
+	if (pos >= len)
+		pos = len-1;
+
+	jump_line_loc(pos, jump_sline);
+}
+
+/*
+ * Jump to a specified position in the file.
+ * Like jump_loc, but the position need not be 
+ * the first character in a line.
+ */
+public void jump_line_loc(POSITION pos, int sline)
+{
+	int c;
+
+	if (ch_seek(pos) == 0)
+	{
+		/*
+		 * Back up to the beginning of the line.
+		 */
+		while ((c = ch_back_get()) != '\n' && c != EOI)
+			;
+		if (c == '\n')
+			(void) ch_forw_get();
+		pos = ch_tell();
+	}
+	if (show_attn)
+		set_attnpos(pos);
+	jump_loc(pos, sline);
+}
+
+/*
+ * Jump to a specified position in the file.
+ * The position must be the first character in a line.
+ * Place the target line on a specified line on the screen.
+ */
+public void jump_loc(POSITION pos, int sline)
+{
+	int nline;
+	int sindex;
+	POSITION tpos;
+	POSITION bpos;
+
+	/*

_service:tar_scm:less-633.tar.gz/less.h Added

@@ -0,0 +1,626 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+#define NEWBOT 1
+
+/*
+ * Standard include file for "less".
+ */
+
+/*
+ * Defines for MSDOS_COMPILER.
+ */
+#define MSOFTC          1   /* Microsoft C */
+#define BORLANDC        2   /* Borland C */
+#define WIN32C          3   /* Windows (Borland C or Microsoft C) */
+#define DJGPPC          4   /* DJGPP C */
+
+/*
+ * Include the file of compile-time options.
+ * The <> make cc search for it in -I., not srcdir.
+ */
+#include <defines.h>
+
+#ifdef _SEQUENT_
+/*
+ * Kludge for Sequent Dynix systems that have sigsetmask, but
+ * it's not compatible with the way less calls it.
+ * {{ Do other systems need this? }}
+ */
+#undef HAVE_SIGSETMASK
+#endif
+
+/*
+ * Language details.
+ */
+#if HAVE_CONST
+#define constant        const
+#else
+#define constant
+#endif
+
+#define public          /* PUBLIC FUNCTION */
+
+/* Library function declarations */
+
+#if HAVE_SYS_TYPES_H
+#include <sys/types.h>
+#endif
+#if HAVE_STDIO_H
+#include <stdio.h>
+#endif
+#if HAVE_FCNTL_H
+#include <fcntl.h>
+#endif
+#if HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+#if HAVE_CTYPE_H
+#include <ctype.h>
+#endif
+#if HAVE_WCTYPE_H
+#include <wctype.h>
+#endif
+#if HAVE_LIMITS_H
+#include <limits.h>
+#endif
+#if HAVE_STDINT_H
+#include <stdint.h>
+#endif
+#if HAVE_STDLIB_H
+#include <stdlib.h>
+#endif
+#if HAVE_STRING_H
+#include <string.h>
+#endif
+
+#if HAVE_STDCKDINT_H
+#include <stdckdint.h>
+#else
+/*
+ * These substitutes for C23 stdckdint macros do not set *R on overflow,
+ * and they assume A and B are nonnegative.  That is good enough for us.
+ */
+#define ckd_add(r, a, b) help_ckd_add(r, a, b, sizeof *(r), signed_expr(*(r)))
+#define ckd_mul(r, a, b) help_ckd_mul(r, a, b, sizeof *(r), signed_expr(*(r)))
+/* True if the integer expression E, after promotion, is signed.  */
+#define signed_expr(e) ((TRUE ? 0 : e) - 1 < 0)
+#endif
+
+#if defined UINTMAX_MAX
+typedef uintmax_t uintmax;
+#elif defined ULLONG_MAX
+typedef unsigned long long uintmax;
+#else
+typedef unsigned long uintmax;
+#endif
+
+/* OS-specific includes */
+#ifdef _OSK
+#include <modes.h>
+#include <strings.h>
+#endif
+
+#ifdef __TANDEM
+#include <floss.h>
+#endif
+
+#if MSDOS_COMPILER==WIN32C || OS2
+#include <io.h>
+#endif
+
+#if MSDOS_COMPILER==DJGPPC
+#include <io.h>
+#include <sys/exceptn.h>
+#include <conio.h>
+#include <pc.h>
+#endif
+
+#if !HAVE_STDLIB_H
+char *getenv();
+off_t lseek();
+void *calloc();
+void free();
+#endif
+
+/*
+ * Simple lowercase test which can be used during option processing
+ * (before options are parsed which might tell us what charset to use).
+ */
+#define ASCII_IS_UPPER(c)       ((c) >= 'A' && (c) <= 'Z')
+#define ASCII_IS_LOWER(c)       ((c) >= 'a' && (c) <= 'z')
+#define ASCII_TO_UPPER(c)       ((c) - 'a' + 'A')
+#define ASCII_TO_LOWER(c)       ((c) - 'A' + 'a')
+
+#undef IS_UPPER
+#undef IS_LOWER
+#undef TO_UPPER
+#undef TO_LOWER
+#undef IS_SPACE
+#undef IS_DIGIT
+
+#if HAVE_WCTYPE
+#define IS_UPPER(c)     iswupper(c)
+#define IS_LOWER(c)     iswlower(c)
+#define TO_UPPER(c)     towupper(c)
+#define TO_LOWER(c)     towlower(c)
+#else
+#if HAVE_UPPER_LOWER
+#define IS_UPPER(c)     isupper((unsigned char) (c))
+#define IS_LOWER(c)     islower((unsigned char) (c))
+#define TO_UPPER(c)     toupper((unsigned char) (c))
+#define TO_LOWER(c)     tolower((unsigned char) (c))
+#else
+#define IS_UPPER(c)     ASCII_IS_UPPER(c)
+#define IS_LOWER(c)     ASCII_IS_LOWER(c)
+#define TO_UPPER(c)     ASCII_TO_UPPER(c)
+#define TO_LOWER(c)     ASCII_TO_LOWER(c)
+#endif
+#endif
+
+#ifdef isspace
+#define IS_SPACE(c)     isspace((unsigned char)(c))
+#else
+#define IS_SPACE(c)     ((c) == ' ' || (c) == '\t' || (c) == '\n' || (c) == '\r' || (c) == '\f')
+#endif
+
+#ifdef isdigit
+#define IS_DIGIT(c)     isdigit((unsigned char)(c))
+#else
+#define IS_DIGIT(c)     ((c) >= '0' && (c) <= '9')
+#endif
+
+#define IS_CSI_START(c) (((LWCHAR)(c)) == ESC || (((LWCHAR)(c)) == CSI))
+
+#ifndef NULL
+#define NULL    0
+#endif
+
+#ifndef TRUE
+#define TRUE            1
+#endif
+#ifndef FALSE
+#define FALSE           0
+#endif
+
+#define OPT_OFF         0
+#define OPT_ON          1
+#define OPT_ONPLUS      2
+
+#if !HAVE_MEMCPY
+#ifndef memcpy
+#define memcpy(to,from,len)     bcopy((from),(to),(len))
+#endif

_service:tar_scm:less-633.tar.gz/less.hlp Added

@@ -0,0 +1,298 @@
+
+                   S&#x8;SU&#x8;UM&#x8;MM&#x8;MA&#x8;AR&#x8;RY&#x8;Y O&#x8;OF&#x8;F L&#x8;LE&#x8;ES&#x8;SS&#x8;S C&#x8;CO&#x8;OM&#x8;MM&#x8;MA&#x8;AN&#x8;ND&#x8;DS&#x8;S
+
+      Commands marked with * may be preceded by a number, _&#x8;N.
+      Notes in parentheses indicate the behavior if _&#x8;N is given.
+      A key preceded by a caret indicates the Ctrl key; thus ^K is ctrl-K.
+
+  h  H                 Display this help.
+  q  :q  Q  :Q  ZZ     Exit.
+ ---------------------------------------------------------------------------
+
+                           M&#x8;MO&#x8;OV&#x8;VI&#x8;IN&#x8;NG&#x8;G
+
+  e  ^E  j  ^N  CR  *  Forward  one line   (or _&#x8;N lines).
+  y  ^Y  k  ^K  ^P  *  Backward one line   (or _&#x8;N lines).
+  f  ^F  ^V  SPACE  *  Forward  one window (or _&#x8;N lines).
+  b  ^B  ESC-v      *  Backward one window (or _&#x8;N lines).
+  z                 *  Forward  one window (and set window to _&#x8;N).
+  w                 *  Backward one window (and set window to _&#x8;N).
+  ESC-SPACE         *  Forward  one window, but don't stop at end-of-file.
+  d  ^D             *  Forward  one half-window (and set half-window to _&#x8;N).
+  u  ^U             *  Backward one half-window (and set half-window to _&#x8;N).
+  ESC-)  RightArrow *  Right one half screen width (or _&#x8;N positions).
+  ESC-(  LeftArrow  *  Left  one half screen width (or _&#x8;N positions).
+  ESC-}  ^RightArrow   Right to last column displayed.
+  ESC-{  ^LeftArrow    Left  to first column.
+  F                    Forward forever; like "tail -f".
+  ESC-F                Like F but stop when search pattern is found.
+  r  ^R  ^L            Repaint screen.
+  R                    Repaint screen, discarding buffered input.
+        ---------------------------------------------------
+        Default "window" is the screen height.
+        Default "half-window" is half of the screen height.
+ ---------------------------------------------------------------------------
+
+                          S&#x8;SE&#x8;EA&#x8;AR&#x8;RC&#x8;CH&#x8;HI&#x8;IN&#x8;NG&#x8;G
+
+  /_&#x8;p_&#x8;a_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;n          *  Search forward for (_&#x8;N-th) matching line.
+  ?_&#x8;p_&#x8;a_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;n          *  Search backward for (_&#x8;N-th) matching line.
+  n                 *  Repeat previous search (for _&#x8;N-th occurrence).
+  N                 *  Repeat previous search in reverse direction.
+  ESC-n             *  Repeat previous search, spanning files.
+  ESC-N             *  Repeat previous search, reverse dir. & spanning files.
+  ESC-u                Undo (toggle) search highlighting.
+  ESC-U                Clear search highlighting.
+  &_&#x8;p_&#x8;a_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;n          *  Display only matching lines.
+        ---------------------------------------------------
+        A search pattern may begin with one or more of:
+        ^N or !  Search for NON-matching lines.
+        ^E or *  Search multiple files (pass thru END OF FILE).
+        ^F or @  Start search at FIRST file (for /) or last file (for ?).
+        ^K       Highlight matches, but don't move (KEEP position).
+        ^R       Don't use REGULAR EXPRESSIONS.
+        ^S _&#x8;n     Search for match in _&#x8;n-th parenthesized subpattern.
+        ^W       WRAP search if no match found.
+ ---------------------------------------------------------------------------
+
+                           J&#x8;JU&#x8;UM&#x8;MP&#x8;PI&#x8;IN&#x8;NG&#x8;G
+
+  g  <  ESC-<       *  Go to first line in file (or line _&#x8;N).
+  G  >  ESC->       *  Go to last line in file (or line _&#x8;N).
+  p  %              *  Go to beginning of file (or _&#x8;N percent into file).
+  t                 *  Go to the (_&#x8;N-th) next tag.
+  T                 *  Go to the (_&#x8;N-th) previous tag.
+  {  (             *  Find close bracket } ) .
+  }  )             *  Find open bracket { ( .
+  ESC-^F _&#x8;<_&#x8;c_&#x8;1_&#x8;> _&#x8;<_&#x8;c_&#x8;2_&#x8;>  *  Find close bracket _&#x8;<_&#x8;c_&#x8;2_&#x8;>.
+  ESC-^B _&#x8;<_&#x8;c_&#x8;1_&#x8;> _&#x8;<_&#x8;c_&#x8;2_&#x8;>  *  Find open bracket _&#x8;<_&#x8;c_&#x8;1_&#x8;>.
+        ---------------------------------------------------
+        Each "find close bracket" command goes forward to the close bracket 
+          matching the (_&#x8;N-th) open bracket in the top line.
+        Each "find open bracket" command goes backward to the open bracket 
+          matching the (_&#x8;N-th) close bracket in the bottom line.
+
+  m_&#x8;<_&#x8;l_&#x8;e_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;>            Mark the current top line with <letter>.
+  M_&#x8;<_&#x8;l_&#x8;e_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;>            Mark the current bottom line with <letter>.
+  '_&#x8;<_&#x8;l_&#x8;e_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;>            Go to a previously marked position.
+  ''                   Go to the previous position.
+  ^X^X                 Same as '.
+  ESC-m_&#x8;<_&#x8;l_&#x8;e_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;>        Clear a mark.
+        ---------------------------------------------------
+        A mark is any upper-case or lower-case letter.
+        Certain marks are predefined:
+             ^  means  beginning of the file
+             $  means  end of the file
+ ---------------------------------------------------------------------------
+
+                        C&#x8;CH&#x8;HA&#x8;AN&#x8;NG&#x8;GI&#x8;IN&#x8;NG&#x8;G F&#x8;FI&#x8;IL&#x8;LE&#x8;ES&#x8;S
+
+  :e _&#x8;f_&#x8;i_&#x8;l_&#x8;e            Examine a new file.
+  ^X^V                 Same as :e.
+  :n                *  Examine the (_&#x8;N-th) next file from the command line.
+  :p                *  Examine the (_&#x8;N-th) previous file from the command line.
+  :x                *  Examine the first (or _&#x8;N-th) file from the command line.
+  :d                   Delete the current file from the command line list.
+  =  ^G  :f            Print current file name.
+ ---------------------------------------------------------------------------
+
+                    M&#x8;MI&#x8;IS&#x8;SC&#x8;CE&#x8;EL&#x8;LL&#x8;LA&#x8;AN&#x8;NE&#x8;EO&#x8;OU&#x8;US&#x8;S C&#x8;CO&#x8;OM&#x8;MM&#x8;MA&#x8;AN&#x8;ND&#x8;DS&#x8;S
+
+  -_&#x8;<_&#x8;f_&#x8;l_&#x8;a_&#x8;g_&#x8;>              Toggle a command line option see OPTIONS below.
+  --_&#x8;<_&#x8;n_&#x8;a_&#x8;m_&#x8;e_&#x8;>             Toggle a command line option, by name.
+  __&#x8;<_&#x8;f_&#x8;l_&#x8;a_&#x8;g_&#x8;>              Display the setting of a command line option.
+  ___&#x8;<_&#x8;n_&#x8;a_&#x8;m_&#x8;e_&#x8;>             Display the setting of an option, by name.
+  +_&#x8;c_&#x8;m_&#x8;d                 Execute the less cmd each time a new file is examined.
+
+  !_&#x8;c_&#x8;o_&#x8;m_&#x8;m_&#x8;a_&#x8;n_&#x8;d             Execute the shell command with $SHELL.
+  #_&#x8;c_&#x8;o_&#x8;m_&#x8;m_&#x8;a_&#x8;n_&#x8;d             Execute the shell command, expanded like a prompt.
+  |X&#x8;X_&#x8;c_&#x8;o_&#x8;m_&#x8;m_&#x8;a_&#x8;n_&#x8;d            Pipe file between current pos & mark X&#x8;X to shell command.
+  s _&#x8;f_&#x8;i_&#x8;l_&#x8;e               Save input to a file.
+  v                    Edit the current file with $VISUAL or $EDITOR.
+  V                    Print version number of "less".
+ ---------------------------------------------------------------------------
+
+                           O&#x8;OP&#x8;PT&#x8;TI&#x8;IO&#x8;ON&#x8;NS&#x8;S
+
+        Most options may be changed either on the command line,
+        or from within less by using the - or -- command.
+        Options may be given in one of two forms: either a single
+        character preceded by a -, or a name preceded by --.
+
+  -?  ........  --help
+                  Display help (from command line).
+  -a  ........  --search-skip-screen
+                  Search skips current screen.
+  -A  ........  --SEARCH-SKIP-SCREEN
+                  Search starts just after target line.
+  -b _&#x8;N  ....  --buffers=_&#x8;N
+                  Number of buffers.
+  -B  ........  --auto-buffers
+                  Don't automatically allocate buffers for pipes.
+  -c  ........  --clear-screen
+                  Repaint by clearing rather than scrolling.
+  -d  ........  --dumb
+                  Dumb terminal.
+  -D x&#x8;x_&#x8;c_&#x8;o_&#x8;l_&#x8;o_&#x8;r  .  --color=x&#x8;x_&#x8;c_&#x8;o_&#x8;l_&#x8;o_&#x8;r
+                  Set screen colors.
+  -e  -E  ....  --quit-at-eof  --QUIT-AT-EOF
+                  Quit at end of file.
+  -f  ........  --force
+                  Force open non-regular files.
+  -F  ........  --quit-if-one-screen
+                  Quit if entire file fits on first screen.
+  -g  ........  --hilite-search
+                  Highlight only last match for searches.
+  -G  ........  --HILITE-SEARCH
+                  Don't highlight any matches for searches.
+  -h _&#x8;N  ....  --max-back-scroll=_&#x8;N
+                  Backward scroll limit.
+  -i  ........  --ignore-case
+                  Ignore case in searches that do not contain uppercase.
+  -I  ........  --IGNORE-CASE
+                  Ignore case in all searches.
+  -j _&#x8;N  ....  --jump-target=_&#x8;N
+                  Screen position of target lines.
+  -J  ........  --status-column
+                  Display a status column at left edge of screen.
+  -k _&#x8;f_&#x8;i_&#x8;l_&#x8;e  .  --lesskey-file=_&#x8;f_&#x8;i_&#x8;l_&#x8;e
+                  Use a lesskey file.
+  -K  ........  --quit-on-intr
+                  Exit less in response to ctrl-C.
+  -L  ........  --no-lessopen
+                  Ignore the LESSOPEN environment variable.
+  -m  -M  ....  --long-prompt  --LONG-PROMPT
+                  Set prompt style.
+  -n .........  --line-numbers
+                  Suppress line numbers in prompts and messages.
+  -N .........  --LINE-NUMBERS
+                  Display line number at start of each line.
+  -o _&#x8;f_&#x8;i_&#x8;l_&#x8;e  .  --log-file=_&#x8;f_&#x8;i_&#x8;l_&#x8;e
+                  Copy to log file (standard input only).
+  -O _&#x8;f_&#x8;i_&#x8;l_&#x8;e  .  --LOG-FILE=_&#x8;f_&#x8;i_&#x8;l_&#x8;e
+                  Copy to log file (unconditionally overwrite).
+  -p _&#x8;p_&#x8;a_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;n  --pattern=_&#x8;p_&#x8;a_&#x8;t_&#x8;t_&#x8;e_&#x8;r_&#x8;n
+                  Start at pattern (from command line).
+  -P _&#x8;p_&#x8;r_&#x8;o_&#x8;m_&#x8;p_&#x8;t   --prompt=_&#x8;p_&#x8;r_&#x8;o_&#x8;m_&#x8;p_&#x8;t
+                  Define new prompt.
+  -q  -Q  ....  --quiet  --QUIET  --silent --SILENT
+                  Quiet the terminal bell.
+  -r  -R  ....  --raw-control-chars  --RAW-CONTROL-CHARS
+                  Output "raw" control characters.
+  -s  ........  --squeeze-blank-lines
+                  Squeeze multiple blank lines.
+  -S  ........  --chop-long-lines
+                  Chop (truncate) long lines rather than wrapping.
+  -t _&#x8;t_&#x8;a_&#x8;g  ..  --tag=_&#x8;t_&#x8;a_&#x8;g
+                  Find a tag.
+  -T _&#x8;t_&#x8;a_&#x8;g_&#x8;s_&#x8;f_&#x8;i_&#x8;l_&#x8;e --tag-file=_&#x8;t_&#x8;a_&#x8;g_&#x8;s_&#x8;f_&#x8;i_&#x8;l_&#x8;e
+                  Use an alternate tags file.
+  -u  -U  ....  --underline-special  --UNDERLINE-SPECIAL
+                  Change handling of backspaces, tabs and carriage returns.
+  -V  ........  --version
+                  Display the version number of "less".
+  -w  ........  --hilite-unread
+                  Highlight first new line after forward-screen.
+  -W  ........  --HILITE-UNREAD
+                  Highlight first new line after any forward movement.
+  -x _&#x8;N,...  --tabs=_&#x8;N,...
+                  Set tab stops.

_service:tar_scm:less-633.tar.gz/less.man Added

@@ -0,0 +1,2121 @@
+LESS(1)                     General Commands Manual                    LESS(1)
+
+
+
+&#x1b;1mNAME&#x1b;0m
+       less - opposite of more
+
+&#x1b;1mSYNOPSIS&#x1b;0m
+       &#x1b;1mless -?&#x1b;0m
+       &#x1b;1mless --help&#x1b;0m
+       &#x1b;1mless -V&#x1b;0m
+       &#x1b;1mless --version&#x1b;0m
+       &#x1b;1mless -+aABcCdeEfFgGiIJKLmMnNqQrRsSuUVwWX~&#x1b;0m
+            &#x1b;1m-b &#x1b;4m&#x1b;22mspace&#x1b;24m&#x1b;1m -h &#x1b;4m&#x1b;22mlines&#x1b;24m&#x1b;1m -j &#x1b;4m&#x1b;22mline&#x1b;24m&#x1b;1m -k &#x1b;4m&#x1b;22mkeyfile&#x1b;24m&#x1b;1m&#x1b;0m
+            &#x1b;1m-{oO} &#x1b;4m&#x1b;22mlogfile&#x1b;24m&#x1b;1m -p &#x1b;4m&#x1b;22mpattern&#x1b;24m&#x1b;1m -P &#x1b;4m&#x1b;22mprompt&#x1b;24m&#x1b;1m -t &#x1b;4m&#x1b;22mtag&#x1b;24m&#x1b;1m&#x1b;0m
+            &#x1b;1m-T &#x1b;4m&#x1b;22mtagsfile&#x1b;24m&#x1b;1m -x &#x1b;4m&#x1b;22mtab&#x1b;24m&#x1b;1m,... -y &#x1b;4m&#x1b;22mlines&#x1b;24m&#x1b;1m -z &#x1b;4m&#x1b;22mlines&#x1b;24m&#x1b;1m&#x1b;0m
+            &#x1b;1m-# &#x1b;4m&#x1b;22mshift&#x1b;24m&#x1b;1m ++&#x1b;4m&#x1b;22mcmd&#x1b;24m&#x1b;1m -- &#x1b;4m&#x1b;22mfilename&#x1b;24m&#x1b;1m...&#x1b;0m
+       (See  the  OPTIONS section for alternate option syntax with long option
+       names.)
+
+&#x1b;1mDESCRIPTION&#x1b;0m
+       &#x1b;1mLess &#x1b;22mis a program similar to &#x1b;1mmore&#x1b;22m(1), but which allows  backward  move-
+       ment in the file as well as forward movement.  Also, &#x1b;1mless &#x1b;22mdoes not have
+       to read the entire input file before  starting,  so  with  large  input
+       files  it  starts  up  faster  than text editors like &#x1b;1mvi&#x1b;22m(1).  &#x1b;1mLess &#x1b;22muses
+       termcap (or terminfo on some systems), so it can run on  a  variety  of
+       terminals.   There is even limited support for hardcopy terminals.  (On
+       a hardcopy terminal, lines which should be printed at the  top  of  the
+       screen are prefixed with a caret.)
+
+       Commands  are based on both &#x1b;1mmore &#x1b;22mand &#x1b;1mvi&#x1b;22m.  Commands may be preceded by a
+       decimal number, called N in the descriptions below.  The number is used
+       by some commands, as indicated.
+
+&#x1b;1mCOMMANDS&#x1b;0m
+       In  the following descriptions, ^X means control-X.  ESC stands for the
+       ESCAPE key; for example ESC-v means the  two  character  sequence  "ES-
+       CAPE", then "v".
+
+       h or H Help:  display  a  summary of these commands.  If you forget all
+              the other commands, remember this one.
+
+       SPACE or ^V or f or ^F
+              Scroll forward N lines, default one window (see  option  -z  be-
+              low).  If N is more than the screen size, only the final screen-
+              ful is displayed.  Warning: some systems use  ^V  as  a  special
+              literalization character.
+
+       z      Like  SPACE,  but  if  N is specified, it becomes the new window
+              size.
+
+       ESC-SPACE
+              Like SPACE, but scrolls a full screenful,  even  if  it  reaches
+              end-of-file in the process.
+
+       ENTER or RETURN or ^N or e or ^E or j or ^J
+              Scroll  forward N lines, default 1.  The entire N lines are dis-
+              played, even if N is more than the screen size.
+
+       d or ^D
+              Scroll forward N lines, default one half of the screen size.  If
+              N  is specified, it becomes the new default for subsequent d and
+              u commands.
+
+       b or ^B or ESC-v
+              Scroll backward N lines, default one window (see option  -z  be-
+              low).  If N is more than the screen size, only the final screen-
+              ful is displayed.
+
+       w      Like ESC-v, but if N is specified, it  becomes  the  new  window
+              size.
+
+       y or ^Y or ^P or k or ^K
+              Scroll backward N lines, default 1.  The entire N lines are dis-
+              played, even if N is more than the screen size.   Warning:  some
+              systems use ^Y as a special job control character.
+
+       u or ^U
+              Scroll  backward  N  lines, default one half of the screen size.
+              If N is specified, it becomes the new default for  subsequent  d
+              and u commands.
+
+       J      Like j, but continues to scroll beyond the end of the file.
+
+       K or Y Like  k,  but  continues  to  scroll beyond the beginning of the
+              file.
+
+       ESC-) or RIGHTARROW
+              Scroll horizontally right N characters, default half the  screen
+              width  (see  the -# option).  If a number N is specified, it be-
+              comes the default for future RIGHTARROW and LEFTARROW  commands.
+              While  the  text  is  scrolled,  it acts as though the -S option
+              (chop lines) were in effect.
+
+       ESC-( or LEFTARROW
+              Scroll horizontally left N characters, default half  the  screen
+              width  (see  the -# option).  If a number N is specified, it be-
+              comes the default for future RIGHTARROW and LEFTARROW commands.
+
+       ESC-} or ^RIGHTARROW
+              Scroll horizontally right to show the end of  the  longest  dis-
+              played line.
+
+       ESC-{ or ^LEFTARROW
+              Scroll horizontally left back to the first column.
+
+       r or ^R or ^L
+              Repaint the screen.
+
+       R      Repaint  the  screen,  discarding  any buffered input.  That is,
+              reload the current file.  Useful if the file is  changing  while
+              it is being viewed.
+
+       F      Scroll  forward, and keep trying to read when the end of file is
+              reached.  Normally this command would be used  when  already  at
+              the  end of the file.  It is a way to monitor the tail of a file
+              which is growing while it is being  viewed.   (The  behavior  is
+              similar  to  the  "tail  -f" command.)  To stop waiting for more
+              data, enter the interrupt character (usually  ^C).   On  systems
+              which support &#x1b;1mpoll&#x1b;22m(1) you can also use ^X or the character spec-
+              ified by the --intr option.  If the input  is  a  pipe  and  the
+              --exit-follow-on-close  option is in effect, &#x1b;1mless &#x1b;22mwill automati-
+              cally stop waiting for data when the input side of the  pipe  is
+              closed.
+
+       ESC-F  Like  F,  but  as soon as a line is found which matches the last
+              search pattern, the terminal bell is rung and forward  scrolling
+              stops.
+
+       g or < or ESC-<
+              Go to line N in the file, default 1 (beginning of file).  (Warn-
+              ing: this may be slow if N is large.)
+
+       G or > or ESC->
+              Go to line N in the file, default the end of the  file.   (Warn-
+              ing:  this  may  be slow if N is large, or if N is not specified
+              and standard input, rather than a file, is being read.)
+
+       ESC-G  Same as G, except if no number N is specified and the  input  is
+              standard  input,  goes  to  the  last  line  which  is currently
+              buffered.
+
+       p or % Go to a position N percent into the file.  N should be between 0
+              and 100, and may contain a decimal point.
+
+       P      Go to the line containing byte offset N in the file.
+
+       {      If a left curly bracket appears in the top line displayed on the
+              screen, the { command  will  go  to  the  matching  right  curly
+              bracket.   The matching right curly bracket is positioned on the
+              bottom line of the screen.  If there is more than one left curly
+              bracket  on  the top line, a number N may be used to specify the
+              N-th bracket on the line.
+
+       }      If a right curly bracket appears in the bottom line displayed on
+              the  screen,  the  }  command will go to the matching left curly
+              bracket.  The matching left curly bracket is positioned  on  the
+              top  line  of the screen.  If there is more than one right curly
+              bracket on the bottom line, a number N may be  used  to  specify
+              the N-th bracket on the line.
+
+       (      Like {, but applies to parentheses rather than curly brackets.
+
+       )      Like }, but applies to parentheses rather than curly brackets.
+
+             Like  {, but applies to square brackets rather than curly brack-
+              ets.
+
+             Like }, but applies to square brackets rather than curly  brack-
+              ets.
+
+       ESC-^F Followed  by two characters, acts like {, but uses the two char-
+              acters as open and close brackets, respectively.   For  example,
+              "ESC  ^F < >" could be used to go forward to the > which matches
+              the < in the top displayed line.
+
+       ESC-^B Followed by two characters, acts like }, but uses the two  char-
+              acters  as  open and close brackets, respectively.  For example,
+              "ESC ^B < >" could be used to go backward to the < which matches
+              the > in the bottom displayed line.
+
+       m      Followed  by  any lowercase or uppercase letter, marks the first
+              displayed line with that letter.  If the status  column  is  en-
+              abled  via  the  -J  option,  the status column shows the marked
+              line.
+
+       M      Acts like m, except the last displayed  line  is  marked  rather
+              than the first displayed line.
+
+       '      (Single  quote.)  Followed by any lowercase or uppercase letter,
+              returns to the position which was previously  marked  with  that
+              letter.   Followed by another single quote, returns to the posi-
+              tion at which the last "large" movement  command  was  executed.
+              Followed  by a ^ or $, jumps to the beginning or end of the file
+              respectively.  Marks are preserved when a new file is  examined,
+              so the ' command can be used to switch between input files.
+
+       ^X^X   Same as single quote.
+

_service:tar_scm:less-633.tar.gz/less.nro Added

@@ -0,0 +1,2328 @@
+'\" t
+.TH LESS 1 "Version 633: 03 May 2023"
+.SH NAME
+less \- opposite of more
+.SH SYNOPSIS
+.B "less \-?"
+.br
+.B "less \-\-help"
+.br
+.B "less \-V"
+.br
+.B "less \-\-version"
+.br
+.B "less \-+aABcCdeEfFgGiIJKLmMnNqQrRsSuUVwWX\(ti"
+.br
+.B "     \-b \fIspace\/\fP \-h \fIlines\/\fP \-j \fIline\/\fP \-k \fIkeyfile\/\fP"
+.br
+.B "     \-{oO} \fIlogfile\/\fP \-p \fIpattern\/\fP \-P \fIprompt\/\fP \-t \fItag\/\fP"
+.br
+.B "     \-T \fItagsfile\/\fP \-x \fItab\/\fP,... \-y \fIlines\/\fP \-z \fIlines\/\fP"
+.br
+.B "     \-# \fIshift\/\fP ++\fIcmd\/\fP \-\- \fIfilename\/\fP..."
+.br
+(See the OPTIONS section for alternate option syntax with long option names.)
+.
+.SH DESCRIPTION
+.B Less
+is a program similar to
+.BR more (1),
+but which allows backward movement
+in the file as well as forward movement.
+Also,
+.B less
+does not have to read the entire input file before starting,
+so with large input files it starts up faster than text editors like
+.BR vi (1).
+.B Less
+uses termcap (or terminfo on some systems),
+so it can run on a variety of terminals.
+There is even limited support for hardcopy terminals.
+(On a hardcopy terminal, lines which should be printed at the top
+of the screen are prefixed with a caret.)
+.PP
+Commands are based on both
+.B more
+and
+.BR vi .
+Commands may be preceded by a decimal number,
+called N in the descriptions below.
+The number is used by some commands, as indicated.
+.
+.SH COMMANDS
+In the following descriptions, \(haX means control-X.
+ESC stands for the ESCAPE key; for example ESC-v means the
+two character sequence "ESCAPE", then "v".
+.IP "h or H"
+Help: display a summary of these commands.
+If you forget all the other commands, remember this one.
+.IP "SPACE or \(haV or f or \(haF"
+Scroll forward N lines, default one window (see option \-z below).
+If N is more than the screen size, only the final screenful is displayed.
+Warning: some systems use \(haV as a special literalization character.
+.IP "z"
+Like SPACE, but if N is specified, it becomes the new window size.
+.IP "ESC-SPACE"
+Like SPACE, but scrolls a full screenful, even if it reaches
+end-of-file in the process.
+.IP "ENTER or RETURN or \(haN or e or \(haE or j or \(haJ"
+Scroll forward N lines, default 1.
+The entire N lines are displayed, even if N is more than the screen size.
+.IP "d or \(haD"
+Scroll forward N lines, default one half of the screen size.
+If N is specified, it becomes the new default for
+subsequent d and u commands.
+.IP "b or \(haB or ESC-v"
+Scroll backward N lines, default one window (see option \-z below).
+If N is more than the screen size, only the final screenful is displayed.
+.IP "w"
+Like ESC-v, but if N is specified, it becomes the new window size.
+.IP "y or \(haY or \(haP or k or \(haK"
+Scroll backward N lines, default 1.
+The entire N lines are displayed, even if N is more than the screen size.
+Warning: some systems use \(haY as a special job control character.
+.IP "u or \(haU"
+Scroll backward N lines, default one half of the screen size.
+If N is specified, it becomes the new default for
+subsequent d and u commands.
+.IP "J"
+Like j, but continues to scroll beyond the end of the file.
+.IP "K or Y"
+Like k, but continues to scroll beyond the beginning of the file.
+.IP "ESC-) or RIGHTARROW"
+Scroll horizontally right N characters, default half the screen width
+(see the \-# option).
+If a number N is specified, it becomes the default for future RIGHTARROW
+and LEFTARROW commands.
+While the text is scrolled, it acts as though the \-S option
+(chop lines) were in effect.
+.IP "ESC-( or LEFTARROW"
+Scroll horizontally left N characters, default half the screen width
+(see the \-# option).
+If a number N is specified, it becomes the default for future RIGHTARROW
+and LEFTARROW commands.
+.IP "ESC-} or \(haRIGHTARROW"
+Scroll horizontally right to show the end of the longest displayed line.
+.IP "ESC-{ or \(haLEFTARROW"
+Scroll horizontally left back to the first column.
+.IP "r or \(haR or \(haL"
+Repaint the screen.
+.IP R
+Repaint the screen, discarding any buffered input.
+That is, reload the current file.
+Useful if the file is changing while it is being viewed.
+.IP "F"
+Scroll forward, and keep trying to read when the
+end of file is reached.
+Normally this command would be used when already at the end of the file.
+It is a way to monitor the tail of a file which is growing
+while it is being viewed.
+(The behavior is similar to the "tail \-f" command.)
+To stop waiting for more data, enter the interrupt character (usually \(haC).
+On systems which support
+.BR poll (1)
+you can also use \(haX or the character specified by the \-\-intr option.
+If the input is a pipe and the \-\-exit-follow-on-close option is in effect,
+.B less
+will automatically stop waiting for data when the input side 
+of the pipe is closed.
+.IP "ESC-F"
+Like F, but as soon as a line is found which matches
+the last search pattern, the terminal bell is rung
+and forward scrolling stops.
+.IP "g or < or ESC-<"
+Go to line N in the file, default 1 (beginning of file).
+(Warning: this may be slow if N is large.)
+.IP "G or > or ESC->"
+Go to line N in the file, default the end of the file.
+(Warning: this may be slow if N is large,
+or if N is not specified and
+standard input, rather than a file, is being read.)
+.IP "ESC-G"
+Same as G, except if no number N is specified and the input is standard input,
+goes to the last line which is currently buffered.
+.IP "p or %"
+Go to a position N percent into the file.
+N should be between 0 and 100, and may contain a decimal point.
+.IP "P"
+Go to the line containing byte offset N in the file.
+.IP "{"
+If a left curly bracket appears in the top line displayed
+on the screen,
+the { command will go to the matching right curly bracket.
+The matching right curly bracket is positioned on the bottom
+line of the screen.
+If there is more than one left curly bracket on the top line,
+a number N may be used to specify the N-th bracket on the line.
+.IP "}"
+If a right curly bracket appears in the bottom line displayed
+on the screen,
+the } command will go to the matching left curly bracket.
+The matching left curly bracket is positioned on the top
+line of the screen.
+If there is more than one right curly bracket on the bottom line,
+a number N may be used to specify the N-th bracket on the line.
+.IP "("
+Like {, but applies to parentheses rather than curly brackets.
+.IP ")"
+Like }, but applies to parentheses rather than curly brackets.
+.IP ""
+Like {, but applies to square brackets rather than curly brackets.
+.IP ""
+Like }, but applies to square brackets rather than curly brackets.
+.IP "ESC-\(haF"
+Followed by two characters,
+acts like {, but uses the two characters as open and close brackets,
+respectively.
+For example, "ESC \(haF < >" could be used to
+go forward to the > which matches the < in the top displayed line.
+.IP "ESC-\(haB"
+Followed by two characters,
+acts like }, but uses the two characters as open and close brackets,
+respectively.
+For example, "ESC \(haB < >" could be used to
+go backward to the < which matches the > in the bottom displayed line.
+.IP m
+Followed by any lowercase or uppercase letter,
+marks the first displayed line with that letter.
+If the status column is enabled via the \-J option,
+the status column shows the marked line.
+.IP M
+Acts like m, except the last displayed line is marked
+rather than the first displayed line.
+.IP "\(aq"
+(Single quote.)
+Followed by any lowercase or uppercase letter, returns to the position which
+was previously marked with that letter.
+Followed by another single quote, returns to the position at
+which the last "large" movement command was executed.
+Followed by a \(ha or $, jumps to the beginning or end of the

_service:tar_scm:less-633.tar.gz/lessecho.c Added

@@ -0,0 +1,282 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * lessecho -ox -cx -pn -dn -a file ...
+ * Simply echos its filename arguments on standard output.
+ * But any argument containing spaces is enclosed in quotes.
+ *
+ * -ox  Specifies "x" to be the open quote character.
+ * -cx  Specifies "x" to be the close quote character.
+ * -pn  Specifies "n" to be the open quote character, as an integer.
+ * -dn  Specifies "n" to be the close quote character, as an integer.
+ * -mx  Specifies "x" to be a metachar.
+ * -nn  Specifies "n" to be a metachar, as an integer.
+ * -ex  Specifies "x" to be the escape char for metachars.
+ * -fn  Specifies "x" to be the escape char for metachars, as an integer.
+ * -a   Specifies that all arguments are to be quoted.
+ *      The default is that only arguments containing spaces are quoted.
+ */
+
+#include "less.h"
+
+static char *version = "$Revision: 1.15 $";
+
+static int quote_all = 0;
+static char openquote = '"';
+static char closequote = '"';
+static char *meta_escape = "\\";
+static char meta_escape_buf2;
+static char* metachars = NULL;
+static int num_metachars = 0;
+static int size_metachars = 0;
+
+static void pr_usage(void)
+{
+	fprintf(stderr,
+		"usage: lessecho -ox -cx -pn -dn -mx -nn -ex -fn -a file ...\n");
+}
+
+static void pr_version(void)
+{
+	char *p;
+	char buf10;
+	char *pbuf = buf;
+
+	for (p = version;  *p != ' ';  p++)
+		if (*p == '\0')
+			return;
+	for (p++;  *p != '$' && *p != ' ' && *p != '\0';  p++)
+		*pbuf++ = *p;
+	*pbuf = '\0';
+	printf("%s\n", buf);
+}
+
+static void pr_error(char *s)
+{
+	fprintf(stderr, "%s\n", s);
+	exit(1);
+}
+
+static long lstrtol(char *s, char **pend, int radix)
+{
+	int v;
+	int neg = 0;
+	long n = 0;
+
+	/* Skip leading white space. */
+	while (*s == ' ' || *s == '\t')
+		s++;
+
+	/* Check for a leading + or -. */
+	if (*s == '-')
+	{
+		neg = 1;
+		s++;
+	} else if (*s == '+')
+	{
+		s++;
+	}
+
+	/* Determine radix if caller does not specify. */
+	if (radix == 0)
+	{
+		radix = 10;
+		if (*s == '0')
+		{
+			switch (*++s)
+			{
+			case 'x':
+				radix = 16;
+				s++;
+				break;
+			default:
+				radix = 8;
+				break;
+			}
+		}
+	}
+
+	/* Parse the digits of the number. */
+	for (;;)
+	{
+		if (*s >= '0' && *s <= '9')
+			v = *s - '0';
+		else if (*s >= 'a' && *s <= 'f')
+			v = *s - 'a' + 10;
+		else if (*s >= 'A' && *s <= 'F')
+			v = *s - 'A' + 10;
+		else
+			break;
+		if (v >= radix)
+			break;
+		n = n * radix + v;
+		s++;
+	}
+
+	if (pend != NULL)
+	{
+		/* Skip trailing white space. */
+		while (*s == ' ' || *s == '\t')
+			s++;
+		*pend = s;
+	}
+	if (neg)
+		return (-n);
+	return (n);
+}
+
+static void add_metachar(int ch)
+{
+	if (num_metachars+1 >= size_metachars)
+	{
+		char *p;
+		size_metachars = (size_metachars > 0) ? size_metachars*2 : 16;
+		p = (char *) malloc(size_metachars);
+		if (p == NULL)
+			pr_error("Cannot allocate memory");
+
+		if (metachars != NULL)
+		{
+			strcpy(p, metachars);
+			free(metachars);
+		}
+		metachars = p;
+	}
+	metacharsnum_metachars++ = ch;
+	metacharsnum_metachars = '\0';
+}
+
+static int is_metachar(int ch)
+{
+	return (metachars != NULL && strchr(metachars, ch) != NULL);
+}
+
+#if !HAVE_STRCHR
+char * strchr(char *s, char c)
+{
+	for ( ;  *s != '\0';  s++)
+		if (*s == c)
+			return (s);
+	if (c == '\0')
+		return (s);
+	return (NULL);
+}
+#endif
+
+int main(int argc, char *argv)
+{
+	char *arg;
+	char *s;
+	int no_more_options;
+
+	no_more_options = 0;
+	while (--argc > 0)
+	{
+		arg = *++argv;
+		if (*arg != '-' || no_more_options)
+			break;
+		switch (*++arg)
+		{
+		case 'a':
+			quote_all = 1;
+			break;
+		case 'c':
+			closequote = *++arg;
+			break;
+		case 'd':
+			closequote = lstrtol(++arg, &s, 0);
+			if (s == arg)
+				pr_error("Missing number after -d");
+			break;
+		case 'e':

_service:tar_scm:less-633.tar.gz/lessecho.man Added

_service:tar_scm:less-633.tar.gz/lessecho.nro Added

@@ -0,0 +1,52 @@
+.TH LESSECHO 1 "Version 633: 03 May 2023"
+.SH NAME
+lessecho \- expand metacharacters
+.SH SYNOPSIS
+.B lessecho
+.I "-ox -cx -pn -dn -mx -nn -ex -a file ..."
+.SH "DESCRIPTION"
+.B lessecho
+is a program that simply echos its arguments on standard output.
+But any metacharacter in the output is preceded by an "escape"
+character, which by default is a backslash.
+.SH OPTIONS
+A summary of options is included below.
+.TP
+.B \-e\fIx\fP
+Specifies "\fIx\fP", rather than backslash, to be the escape char for metachars.
+If \fIx\fP is "-", no escape char is used and arguments containing metachars
+are surrounded by quotes instead.
+.TP
+.B \-o\fIx\fP
+Specifies "\fIx\fP", rather than double-quote, to be the open quote character,
+which is used if the \-e- option is specified.
+.TP
+.B \-c\fIx\fP
+Specifies "\fIx\fP" to be the close quote character.
+.TP
+.B \-p\fIn\fP
+Specifies "\fIn\fP" to be the open quote character, as an integer.
+.TP
+.B \-d\fIn\fP
+Specifies "\fIn\fP" to be the close quote character, as an integer.
+.TP
+.B \-m\fIx\fP
+Specifies "\fIx\fP" to be a metachar.
+By default, no characters are considered metachars.
+.TP
+.B \-n\fIn\fP
+Specifies "\fIn\fP" to be a metachar, as an integer.
+.TP
+.B \-f\fIn\fP
+Specifies "\fIn\fP" to be the escape char for metachars, as an integer.
+.TP
+.B \-a
+Specifies that all arguments are to be quoted.
+The default is that only arguments containing metacharacters are quoted.
+.SH "SEE ALSO"
+.BR less (1)
+.SH AUTHOR
+This manual page was written by Thomas Schoepf <schoepf@debian.org>,
+for the Debian GNU/Linux system (but may be used by others).
+.PP
+Report bugs at https://github.com/gwsw/less/issues.

_service:tar_scm:less-633.tar.gz/lesskey.c Added

@@ -0,0 +1,357 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ *  lesskey -o output input
+ *
+ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
+ *
+ *  Make a .less file.
+ *  If no input file is specified, standard input is used.
+ *  If no output file is specified, $HOME/.less is used.
+ *
+ *  The .less file is used to specify (to "less") user-defined
+ *  key bindings.  Basically any sequence of 1 to MAX_CMDLEN
+ *  keystrokes may be bound to an existing less function.
+ *
+ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
+ *
+ *  The input file is an ascii file consisting of a 
+ *  sequence of lines of the form:
+ *          string <whitespace> action chars <newline>
+ *
+ *      "string" is a sequence of command characters which form
+ *              the new user-defined command.  The command
+ *              characters may be:
+ *              1. The actual character itself.
+ *              2. A character preceded by ^ to specify a
+ *                 control character (e.g. ^X means control-X).
+ *              3. A backslash followed by one to three octal digits
+ *                 to specify a character by its octal value.
+ *              4. A backslash followed by b, e, n, r or t
+ *                 to specify \b, ESC, \n, \r or \t, respectively.
+ *              5. Any character (other than those mentioned above) preceded 
+ *                 by a \ to specify the character itself (characters which
+ *                 must be preceded by \ include ^, \, and whitespace.
+ *      "action" is the name of a "less" action, from the table below.
+ *      "chars" is an optional sequence of characters which is treated
+ *              as keyboard input after the command is executed.
+ *
+ *      Blank lines and lines which start with # are ignored, 
+ *      except for the special control lines:
+ *              #command        Signals the beginning of the command
+ *                              keys section.
+ *              #line-edit      Signals the beginning of the line-editing
+ *                              keys section.
+ *              #env            Signals the beginning of the environment
+ *                              variable section.
+ *              #stop           Stops command parsing in less;
+ *                              causes all default keys to be disabled.
+ *
+ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
+ *
+ *      The output file is a non-ascii file, consisting of a header,
+ *      one or more sections, and a trailer.
+ *      Each section begins with a section header, a section length word
+ *      and the section data.  Normally there are three sections:
+ *              CMD_SECTION     Definition of command keys.
+ *              EDIT_SECTION    Definition of editing keys.
+ *              END_SECTION     A special section header, with no 
+ *                              length word or section data.
+ *
+ *      Section data consists of zero or more byte sequences of the form:
+ *              string <0> <action>
+ *      or
+ *              string <0> <action|A_EXTRA> chars <0>
+ *
+ *      "string" is the command string.
+ *      "<0>" is one null byte.
+ *      "<action>" is one byte containing the action code (the A_xxx value).
+ *      If action is ORed with A_EXTRA, the action byte is followed
+ *              by the null-terminated "chars" string.
+ *
+ * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
+ */
+
+#include "defines.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include "lesskey.h"
+#include "cmd.h"
+
+char fileheader = {
+	C0_LESSKEY_MAGIC, 
+	C1_LESSKEY_MAGIC, 
+	C2_LESSKEY_MAGIC, 
+	C3_LESSKEY_MAGIC
+};
+char filetrailer = {
+	C0_END_LESSKEY_MAGIC, 
+	C1_END_LESSKEY_MAGIC, 
+	C2_END_LESSKEY_MAGIC
+};
+char cmdsection1 =    { CMD_SECTION };
+char editsection1 =   { EDIT_SECTION };
+char varsection1 =    { VAR_SECTION };
+char endsection1 =    { END_SECTION };
+
+char *infile = NULL;
+char *outfile = NULL ;
+
+extern char version;
+
+static void usage(void)
+{
+	fprintf(stderr, "usage: lesskey -o output input\n");
+	exit(1);
+}
+
+void lesskey_parse_error(char *s)
+{
+	fprintf(stderr, "%s\n", s);
+}
+
+int lstrtoi(char *buf, char **ebuf, int radix)
+{
+	return (int) strtol(buf, ebuf, radix);
+}
+
+void out_of_memory(void)
+{
+	fprintf(stderr, "lesskey: cannot allocate memory\n");
+	exit(1);
+}
+
+void * ecalloc(int count, unsigned int size)
+{
+	void *p;
+
+	p = calloc(count, size);
+	if (p == NULL)
+		out_of_memory();
+	return (p);
+}
+
+static char * mkpathname(char *dirname, char *filename)
+{
+	char *pathname;
+
+	pathname = ecalloc(strlen(dirname) + strlen(filename) + 2, sizeof(char));
+	strcpy(pathname, dirname);
+	strcat(pathname, PATHNAME_SEP);
+	strcat(pathname, filename);
+	return (pathname);
+}
+
+/*
+ * Figure out the name of a default file (in the user's HOME directory).
+ */
+char * homefile(char *filename)
+{
+	char *p;
+	char *pathname;
+
+	if ((p = getenv("HOME")) != NULL && *p != '\0')
+		pathname = mkpathname(p, filename);
+#if OS2
+	else if ((p = getenv("INIT")) != NULL && *p != '\0')
+		pathname = mkpathname(p, filename);
+#endif
+	else
+	{
+		fprintf(stderr, "cannot find $HOME - using current directory\n");
+		pathname = mkpathname(".", filename);
+	}
+	return (pathname);
+}
+
+/*
+ * Parse command line arguments.
+ */
+static void parse_args(int argc, char **argv)
+{
+	char *arg;
+
+	outfile = NULL;
+	while (--argc > 0)
+	{
+		arg = *++argv;
+		if (arg0 != '-')
+			/* Arg does not start with "-"; it's not an option. */
+			break;
+		if (arg1 == '\0')
+			/* "-" means standard input. */
+			break;
+		if (arg1 == '-' && arg2 == '\0')
+		{
+			/* "--" means end of options. */
+			argc--;
+			argv++;
+			break;
+		}

_service:tar_scm:less-633.tar.gz/lesskey.h Added

@@ -0,0 +1,63 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+#include "xbuf.h"
+
+/*
+ * Format of a lesskey file:
+ *
+ *      LESSKEY_MAGIC (4 bytes)
+ *       sections...
+ *      END_LESSKEY_MAGIC (4 bytes)
+ *
+ * Each section is:
+ *
+ *      section_MAGIC (1 byte)
+ *      section_length (2 bytes)
+ *      key table (section_length bytes)
+ */
+#define C0_LESSKEY_MAGIC        '\0'
+#define C1_LESSKEY_MAGIC        'M'
+#define C2_LESSKEY_MAGIC        '+'
+#define C3_LESSKEY_MAGIC        'G'
+
+#define CMD_SECTION             'c'
+#define EDIT_SECTION            'e'
+#define VAR_SECTION             'v'
+#define END_SECTION             'x'
+
+#define C0_END_LESSKEY_MAGIC    'E'
+#define C1_END_LESSKEY_MAGIC    'n'
+#define C2_END_LESSKEY_MAGIC    'd'
+
+/* */
+#define KRADIX          64
+
+struct lesskey_cmdname
+{
+	char *cn_name;
+	int cn_action;
+};
+
+struct lesskey_table
+{
+	struct lesskey_cmdname *names;
+	struct xbuffer buf;
+	int is_var;
+};
+
+struct lesskey_tables
+{
+	struct lesskey_table *currtable;
+	struct lesskey_table cmdtable;
+	struct lesskey_table edittable;
+	struct lesskey_table vartable;
+};
+
+extern int parse_lesskey(char *infile, struct lesskey_tables *tables);

_service:tar_scm:less-633.tar.gz/lesskey.man Added

@@ -0,0 +1,385 @@
+LESSKEY(1)                  General Commands Manual                 LESSKEY(1)
+
+
+
+&#x1b;1mNAME&#x1b;0m
+       lesskey - customize key bindings for less
+
+&#x1b;1mSYNOPSIS (deprecated)&#x1b;0m
+       &#x1b;1mlesskey -o output -- input&#x1b;0m
+       &#x1b;1mlesskey --output=output -- input&#x1b;0m
+       &#x1b;1mlesskey -V&#x1b;0m
+       &#x1b;1mlesskey --version&#x1b;0m
+
+&#x1b;1mSCOPE&#x1b;0m
+       This document describes the format of the &#x1b;1mlesskey &#x1b;22msource file, which is
+       used by &#x1b;1mless &#x1b;22mversion 582 and later.  In previous versions  of  &#x1b;1mless&#x1b;22m,  a
+       separate  program called &#x1b;1mlesskey &#x1b;22mwas used to compile the &#x1b;1mlesskey &#x1b;22msource
+       file into a format understood by &#x1b;1mless&#x1b;22m.  This  compilation  step  is  no
+       longer  required  and  the &#x1b;1mlesskey &#x1b;22mprogram is therefore deprecated, al-
+       though the file format remains supported by &#x1b;1mless &#x1b;22mitself.
+
+&#x1b;1mDESCRIPTION&#x1b;0m
+       A &#x1b;1mlesskey &#x1b;22mfile specifies a set of key bindings  and  environment  vari-
+       ables to be used by subsequent invocations of &#x1b;1mless&#x1b;22m.
+
+&#x1b;1mFILE FORMAT&#x1b;0m
+       The  input  file consists of one or more &#x1b;4msections&#x1b;24m.  Each section starts
+       with a line that identifies the type  of  section.   Possible  sections
+       are:
+
+       #command
+              Customizes command key bindings.
+
+       #line-edit
+              Customizes line-editing key bindings.
+
+       #env   Defines environment variables.
+
+       Blank  lines  and  lines which start with a pound sign (#) are ignored,
+       except as noted below.
+
+&#x1b;1mCOMMAND SECTION&#x1b;0m
+       The command section begins with the line
+
+       #command
+
+       If the command section is the first section in the file, this line  may
+       be omitted.  The command section consists of lines of the form:
+
+            &#x1b;4mstring&#x1b;24m <whitespace> &#x1b;4maction&#x1b;24m extra-string <newline>
+
+       Whitespace  is  any  sequence  of  one or more spaces and/or tabs.  The
+       &#x1b;4mstring&#x1b;24m is the command key(s) which invoke the action.  The  &#x1b;4mstring&#x1b;24m  may
+       be a single command key, or a sequence of up to 15 keys.  The &#x1b;4maction&#x1b;24m is
+       the name of the less action, from the list below.   The  characters  in
+       the  &#x1b;4mstring&#x1b;24m may appear literally, or be prefixed by a caret to indicate
+       a control key.  A backslash followed by one to three octal  digits  may
+       be  used  to  specify a character by its octal value.  A backslash fol-
+       lowed by certain characters specifies input characters as follows:
+
+            \b   BACKSPACE   (0x08)
+            \e   ESCAPE      (0x1B)
+            \n   NEWLINE     (0x0A)
+            \r   RETURN      (0x0D)
+            \t   TAB         (0x09)
+
+            \k followed by a single character represents the char(s)  produced
+            when one of these keys is pressed:
+
+            \kb   BACKSPACE (the BACKSPACE key)
+            \kB   ctrl-BACKSPACE
+            \kd   DOWN ARROW
+            \kD   PAGE DOWN
+            \ke   END
+            \kh   HOME
+            \ki   INSERT
+            \kl   LEFT ARROW
+            \kL   ctrl-LEFT ARROW
+            \kr   RIGHT ARROW
+            \kR   ctrl-RIGHT ARROW
+            \kt   BACKTAB
+            \ku   UP ARROW
+            \kU   PAGE UP
+            \kx   DELETE
+            \kX   ctrl-DELETE
+            \k1   F1
+
+
+            A backslash followed by any other character indicates that charac-
+            ter is to be taken literally.  Characters which must  be  preceded
+            by backslash include caret, space, tab and the backslash itself.
+
+            An  action may be followed by an "extra" string.  When such a com-
+            mand is entered while running &#x1b;1mless&#x1b;22m, the action is  performed,  and
+            then  the  extra  string is parsed, just as if it were typed in to
+            &#x1b;1mless&#x1b;22m.  This feature can be used in certain  cases  to  extend  the
+            functionality  of  a  command.   For example, see the "{" and ":t"
+            commands in the example below.  The extra  string  has  a  special
+            meaning  for the "quit" action: when &#x1b;1mless &#x1b;22mquits, the first charac-
+            ter of the extra string is used as its exit status.
+
+&#x1b;1mEXAMPLE&#x1b;0m
+       The following input file describes the set of default command keys used
+       by  &#x1b;1mless&#x1b;22m.   Documentation on each command can be found in the man page,
+       under the key sequence which invokes the command.
+
+
+            #command
+            \r         forw-line
+            \n         forw-line
+            e          forw-line
+            j          forw-line
+            \kd        forw-line
+            ^E         forw-line
+            ^N         forw-line
+            k          back-line
+            y          back-line
+            ^Y         back-line
+            ^K         back-line
+            ^P         back-line
+            J          forw-line-force
+            K          back-line-force
+            Y          back-line-force
+            d          forw-scroll
+            ^D         forw-scroll
+            u          back-scroll
+            ^U         back-scroll
+            \40        forw-screen
+            f          forw-screen
+            ^F         forw-screen
+            ^V         forw-screen
+
+            \kD        forw-screen
+            b          back-screen
+            ^B         back-screen
+            \ev        back-screen
+            \kU        back-screen
+            z          forw-window
+            w          back-window
+            \e\40      forw-screen-force
+            F          forw-forever
+            \eF        forw-until-hilite
+            R          repaint-flush
+            r          repaint
+            ^R         repaint
+            ^L         repaint
+            \eu        undo-hilite
+            \eU        clear-search
+            g          goto-line
+            \kh        goto-line
+            <          goto-line
+            \e<        goto-line
+            p          percent
+            %          percent
+            \e        left-scroll
+            \e        right-scroll
+            \e(        left-scroll
+            \e)        right-scroll
+            \kl        left-scroll
+            \kr        right-scroll
+            \e{        no-scroll
+            \e}        end-scroll
+            {          forw-bracket {}
+            }          back-bracket {}
+            (          forw-bracket ()
+            )          back-bracket ()
+                      forw-bracket 
+                      back-bracket 
+            \e^F       forw-bracket
+            \e^B       back-bracket
+            G          goto-end
+            \e>        goto-end
+            >          goto-end
+            \ke        goto-end
+            \eG        goto-end-buffered
+            =          status
+            ^G         status
+            :f         status
+            /          forw-search
+            ?          back-search
+            \e/        forw-search *
+            \e?        back-search *
+            n          repeat-search
+            \en        repeat-search-all
+            N          reverse-search
+            \eN        reverse-search-all
+            &          filter
+            m          set-mark
+            M          set-mark-bottom
+            \em        clear-mark
+            '          goto-mark
+            ^X^X       goto-mark
+            E          examine
+            :e         examine
+            ^X^V       examine
+            :n         next-file
+            :p         prev-file
+
+            t          next-tag

_service:tar_scm:less-633.tar.gz/lesskey.nro Added

@@ -0,0 +1,451 @@
+'\" t
+.TH LESSKEY 1 "Version 633: 03 May 2023"
+.SH NAME
+lesskey \- customize key bindings for less
+.SH "SYNOPSIS (deprecated)"
+.B "lesskey \-o output \-\- input"
+.br
+.B "lesskey \-\-output=output \-\- input"
+.br
+.B "lesskey \-V"
+.br
+.B "lesskey \-\-version"
+.SH SCOPE
+This document describes the format of the 
+.B lesskey
+source file, which is used by
+.B less
+version 582 and later.
+In previous versions of 
+.BR less ,
+a separate program called
+.B lesskey
+was used to compile the 
+.B lesskey 
+source file into a format understood by
+.BR less .
+This compilation step is no longer required and the
+.B lesskey
+program is therefore deprecated, although the file format remains supported by
+.B less
+itself.
+.PP
+.SH DESCRIPTION
+A
+.B lesskey
+file specifies a set of key bindings and environment variables
+to be used by subsequent invocations of
+.BR less .
+.SH FILE FORMAT
+The input file consists of one or more
+.IR sections .
+Each section starts with a line that identifies the type of section.
+Possible sections are:
+.IP #command
+Customizes command key bindings.
+.IP #line-edit
+Customizes line-editing key bindings.
+.IP #env
+Defines environment variables.
+.PP
+Blank lines and lines which start with a pound sign (#) are ignored,
+except as noted below.
+.
+.SH "COMMAND SECTION"
+The command section begins with the line
+.sp
+#command
+.sp
+If the command section is the first section in the file,
+this line may be omitted.
+The command section consists of lines of the form:
+.sp
+	\fIstring\fP <whitespace> \fIaction\fP extra-string <newline>
+.sp
+Whitespace is any sequence of one or more spaces and/or tabs.
+The \fIstring\fP is the command key(s) which invoke the action.
+The \fIstring\fP may be a single command key, or a sequence of up to 15 keys.
+The \fIaction\fP is the name of the less action, from the list below.
+The characters in the \fIstring\fP may appear literally, or be
+prefixed by a caret to indicate a control key.
+A backslash followed by one to three octal digits may be used to
+specify a character by its octal value.
+A backslash followed by certain characters specifies input
+characters as follows:
+.RS 5m
+.TS
+l l l.
+\eb	BACKSPACE	(0x08)
+\ee	ESCAPE	(0x1B)
+\en	NEWLINE	(0x0A)
+\er	RETURN	(0x0D)
+\et	TAB	(0x09)
+.TE
+.sp
+\ek followed by a single character represents the char(s) produced when one of these keys is pressed:
+.TS
+l l.
+\ekb	BACKSPACE (the BACKSPACE key)
+\ekB	ctrl-BACKSPACE
+\ekd	DOWN ARROW
+\ekD	PAGE DOWN
+\eke	END
+\ekh	HOME
+\eki	INSERT
+\ekl	LEFT ARROW
+\ekL	ctrl-LEFT ARROW
+\ekr	RIGHT ARROW
+\ekR	ctrl-RIGHT ARROW
+\ekt	BACKTAB
+\eku	UP ARROW
+\ekU	PAGE UP
+\ekx	DELETE
+\ekX	ctrl-DELETE
+\ek1	F1
+.TE
+
+.PP
+A backslash followed by any other character indicates that character is
+to be taken literally.
+Characters which must be preceded by backslash include
+caret, space, tab and the backslash itself.
+.PP
+An action may be followed by an "extra" string.
+When such a command is entered while running
+.BR less ,
+the action is performed, and then the extra
+string is parsed, just as if it were typed in to
+.BR less .
+This feature can be used in certain cases to extend
+the functionality of a command.
+For example, see the "{" and ":t" commands in the example below.
+The extra string has a special meaning for the "quit" action:
+when
+.B less
+quits, the first character of the extra string is used as its exit status.
+.
+.SH EXAMPLE
+The following input file describes the set of
+default command keys used by 
+.BR less .
+Documentation on each command can be found in the
+.less
+man page, under the key sequence which invokes the command.
+.sp
+.RS 5m
+.TS
+l l.
+#command
+\er	forw-line
+\en	forw-line
+e	forw-line
+j	forw-line
+\ekd	forw-line
+^E	forw-line
+^N	forw-line
+k	back-line
+y	back-line
+^Y	back-line
+^K	back-line
+^P	back-line
+J	forw-line-force
+K	back-line-force
+Y	back-line-force
+d	forw-scroll
+^D	forw-scroll
+u	back-scroll
+^U	back-scroll
+\e40	forw-screen
+f	forw-screen
+^F	forw-screen
+^V	forw-screen
+\ekD	forw-screen
+b	back-screen
+^B	back-screen
+\eev	back-screen
+\ekU	back-screen
+z	forw-window
+w	back-window
+\ee\e40	forw-screen-force
+F	forw-forever
+\eeF	forw-until-hilite
+R	repaint-flush
+r	repaint
+^R	repaint
+^L	repaint
+\eeu	undo-hilite
+\eeU	clear-search
+g	goto-line
+\ekh	goto-line
+<	goto-line
+\ee<	goto-line
+p	percent
+%	percent
+\ee	left-scroll
+\ee	right-scroll
+\ee(	left-scroll
+\ee)	right-scroll
+\ekl	left-scroll
+\ekr	right-scroll
+\ee{	no-scroll
+\ee}	end-scroll
+{	forw-bracket {}
+}	back-bracket {}
+(	forw-bracket ()
+)	back-bracket ()
+	forw-bracket 
+	back-bracket 
+\ee^F	forw-bracket
+\ee^B	back-bracket

_service:tar_scm:less-633.tar.gz/lesskey_parse.c Added

@@ -0,0 +1,651 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+#include "defines.h"
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include "lesskey.h"
+#include "cmd.h"
+#include "xbuf.h"
+
+#define CONTROL(c)      ((c)&037)
+#define ESC             CONTROL('')
+
+extern void lesskey_parse_error(char *msg);
+extern char *homefile(char *filename);
+extern void *ecalloc(int count, unsigned int size);
+extern int lstrtoi(char *str, char **end, int radix);
+extern char version;
+
+static int linenum;
+static int errors;
+static int less_version = 0;
+static char *lesskey_file;
+
+static struct lesskey_cmdname cmdnames = 
+{
+	{ "back-bracket",         A_B_BRACKET },
+	{ "back-line",            A_B_LINE },
+	{ "back-line-force",      A_BF_LINE },
+	{ "back-screen",          A_B_SCREEN },
+	{ "back-scroll",          A_B_SCROLL },
+	{ "back-search",          A_B_SEARCH },
+	{ "back-window",          A_B_WINDOW },
+	{ "clear-mark",           A_CLRMARK },
+	{ "debug",                A_DEBUG },
+	{ "digit",                A_DIGIT },
+	{ "display-flag",         A_DISP_OPTION },
+	{ "display-option",       A_DISP_OPTION },
+	{ "end",                  A_GOEND },
+	{ "end-scroll",           A_RRSHIFT },
+	{ "examine",              A_EXAMINE },
+	{ "filter",               A_FILTER },
+	{ "first-cmd",            A_FIRSTCMD },
+	{ "firstcmd",             A_FIRSTCMD },
+	{ "flush-repaint",        A_FREPAINT },
+	{ "forw-bracket",         A_F_BRACKET },
+	{ "forw-forever",         A_F_FOREVER },
+	{ "forw-until-hilite",    A_F_UNTIL_HILITE },
+	{ "forw-line",            A_F_LINE },
+	{ "forw-line-force",      A_FF_LINE },
+	{ "forw-screen",          A_F_SCREEN },
+	{ "forw-screen-force",    A_FF_SCREEN },
+	{ "forw-scroll",          A_F_SCROLL },
+	{ "forw-search",          A_F_SEARCH },
+	{ "forw-window",          A_F_WINDOW },
+	{ "goto-end",             A_GOEND },
+	{ "goto-end-buffered",    A_GOEND_BUF },
+	{ "goto-line",            A_GOLINE },
+	{ "goto-mark",            A_GOMARK },
+	{ "help",                 A_HELP },
+	{ "index-file",           A_INDEX_FILE },
+	{ "invalid",              A_UINVALID },
+	{ "left-scroll",          A_LSHIFT },
+	{ "next-file",            A_NEXT_FILE },
+	{ "next-tag",             A_NEXT_TAG },
+	{ "noaction",             A_NOACTION },
+	{ "no-scroll",            A_LLSHIFT },
+	{ "percent",              A_PERCENT },
+	{ "pipe",                 A_PIPE },
+	{ "prev-file",            A_PREV_FILE },
+	{ "prev-tag",             A_PREV_TAG },
+	{ "quit",                 A_QUIT },
+	{ "remove-file",          A_REMOVE_FILE },
+	{ "repaint",              A_REPAINT },
+	{ "repaint-flush",        A_FREPAINT },
+	{ "repeat-search",        A_AGAIN_SEARCH },
+	{ "repeat-search-all",    A_T_AGAIN_SEARCH },
+	{ "reverse-search",       A_REVERSE_SEARCH },
+	{ "reverse-search-all",   A_T_REVERSE_SEARCH },
+	{ "right-scroll",         A_RSHIFT },
+	{ "set-mark",             A_SETMARK },
+	{ "set-mark-bottom",      A_SETMARKBOT },
+	{ "shell",                A_SHELL },
+	{ "pshell",               A_PSHELL },
+	{ "status",               A_STAT },
+	{ "toggle-flag",          A_OPT_TOGGLE },
+	{ "toggle-option",        A_OPT_TOGGLE },
+	{ "undo-hilite",          A_UNDO_SEARCH },
+	{ "clear-search",         A_CLR_SEARCH },
+	{ "version",              A_VERSION },
+	{ "visual",               A_VISUAL },
+	{ NULL,   0 }
+};
+
+static struct lesskey_cmdname editnames = 
+{
+	{ "back-complete",      EC_B_COMPLETE },
+	{ "backspace",          EC_BACKSPACE },
+	{ "delete",             EC_DELETE },
+	{ "down",               EC_DOWN },
+	{ "end",                EC_END },
+	{ "expand",             EC_EXPAND },
+	{ "forw-complete",      EC_F_COMPLETE },
+	{ "home",               EC_HOME },
+	{ "insert",             EC_INSERT },
+	{ "invalid",            EC_UINVALID },
+	{ "kill-line",          EC_LINEKILL },
+	{ "abort",              EC_ABORT },
+	{ "left",               EC_LEFT },
+	{ "literal",            EC_LITERAL },
+	{ "right",              EC_RIGHT },
+	{ "up",                 EC_UP },
+	{ "word-backspace",     EC_W_BACKSPACE },
+	{ "word-delete",        EC_W_DELETE },
+	{ "word-left",          EC_W_LEFT },
+	{ "word-right",         EC_W_RIGHT },
+	{ NULL, 0 }
+};
+
+/*
+ * Print a parse error message.
+ */
+static void parse_error(char *fmt, char *arg1)
+{
+	char buf1024;
+	int n = snprintf(buf, sizeof(buf), "%s: line %d: ", lesskey_file, linenum);
+	if (n >= 0 && n < sizeof(buf))
+		snprintf(buf+n, sizeof(buf)-n, fmt, arg1);
+	++errors;
+	lesskey_parse_error(buf);
+}
+
+/*
+ * Initialize lesskey_tables.
+ */
+static void init_tables(struct lesskey_tables *tables)
+{
+	tables->currtable = &tables->cmdtable;
+
+	tables->cmdtable.names = cmdnames;
+	tables->cmdtable.is_var = 0;
+	xbuf_init(&tables->cmdtable.buf);
+
+	tables->edittable.names = editnames;
+	tables->edittable.is_var = 0;
+	xbuf_init(&tables->edittable.buf);
+
+	tables->vartable.names = NULL;
+	tables->vartable.is_var = 1;
+	xbuf_init(&tables->vartable.buf);
+}
+
+#define CHAR_STRING_LEN 8
+
+static char * char_string(char *buf, int ch, int lit)
+{
+	if (lit || (ch >= 0x20 && ch < 0x7f))
+	{
+		buf0 = ch;
+		buf1 = '\0';
+	} else
+	{
+		snprintf(buf, CHAR_STRING_LEN, "\\x%02x", ch);
+	}
+	return buf;
+}
+
+/*
+ * Increment char pointer by one up to terminating nul byte.
+ */
+static char * increment_pointer(char *p)
+{
+	if (*p == '\0')
+		return p;
+	return p+1;
+}
+
+/*
+ * Parse one character of a string.
+ */
+static char * tstr(char **pp, int xlate)
+{
+	char *p;
+	char ch;
+	int i;
+	static char bufCHAR_STRING_LEN;
+	static char tstr_control_k =
+		{ SK_SPECIAL_KEY, SK_CONTROL_K, 6, 1, 1, 1, '\0' };
+
+	p = *pp;
+	switch (*p)
+	{

_service:tar_scm:less-633.tar.gz/lglob.h Added

@@ -0,0 +1,94 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Macros to define the method of doing filename "globbing".
+ * There are three possible mechanisms:
+ *   1. GLOB_LIST
+ *      This defines a function that returns a list of matching filenames.
+ *   2. GLOB_NAME
+ *      This defines a function that steps thru the list of matching
+ *      filenames, returning one name each time it is called.
+ *   3. GLOB_STRING
+ *      This defines a function that returns the complete list of
+ *      matching filenames as a single space-separated string.
+ */
+
+#if OS2
+
+#define DECL_GLOB_LIST(list)            char **list;  char **pp;
+#define GLOB_LIST(filename,list)        list = _fnexplode(filename)
+#define GLOB_LIST_FAILED(list)          list == NULL
+#define SCAN_GLOB_LIST(list,p)          pp = list;  *pp != NULL;  pp++
+#define INIT_GLOB_LIST(list,p)          p = *pp
+#define GLOB_LIST_DONE(list)            _fnexplodefree(list)
+
+#else
+#if MSDOS_COMPILER==DJGPPC
+
+#define DECL_GLOB_LIST(list)            glob_t list;  int i;
+#define GLOB_LIST(filename,list)        glob(filename,GLOB_NOCHECK,0,&list)
+#define GLOB_LIST_FAILED(list)          0
+#define SCAN_GLOB_LIST(list,p)          i = 0;  i < list.gl_pathc;  i++
+#define INIT_GLOB_LIST(list,p)          p = list.gl_pathvi
+#define GLOB_LIST_DONE(list)            globfree(&list)
+
+#else
+#if MSDOS_COMPILER==MSOFTC || MSDOS_COMPILER==BORLANDC
+
+#define GLOB_FIRST_NAME(filename,fndp,h) h = _dos_findfirst(filename, ~_A_VOLID, fndp)
+#define GLOB_FIRST_FAILED(handle)       ((handle) != 0)
+#define GLOB_NEXT_NAME(handle,fndp)             _dos_findnext(fndp)
+#define GLOB_NAME_DONE(handle)
+#define GLOB_NAME                       name
+#define DECL_GLOB_NAME(fnd,drive,dir,fname,ext,handle) \
+                                        struct find_t fnd;      \
+                                        char drive_MAX_DRIVE; \
+                                        char dir_MAX_DIR;     \
+                                        char fname_MAX_FNAME; \
+                                        char ext_MAX_EXT;     \
+                                        int handle;
+#else
+#if MSDOS_COMPILER==WIN32C && (defined(_MSC_VER) || defined(MINGW))
+
+#define GLOB_FIRST_NAME(filename,fndp,h) h = _findfirst(filename, fndp)
+#define GLOB_FIRST_FAILED(handle)       ((handle) == -1)
+#define GLOB_NEXT_NAME(handle,fndp)     _findnext(handle, fndp)
+#define GLOB_NAME_DONE(handle)          _findclose(handle)
+#define GLOB_NAME                       name
+#define DECL_GLOB_NAME(fnd,drive,dir,fname,ext,handle) \
+                                        struct _finddata_t fnd; \
+                                        char drive_MAX_DRIVE; \
+                                        char dir_MAX_DIR;     \
+                                        char fname_MAX_FNAME; \
+                                        char ext_MAX_EXT;     \
+                                        intptr_t handle;
+
+#else
+#if MSDOS_COMPILER==WIN32C && !defined(_MSC_VER) /* Borland C for Windows */
+
+#define GLOB_FIRST_NAME(filename,fndp,h) h = findfirst(filename, fndp, ~FA_LABEL)
+#define GLOB_FIRST_FAILED(handle)       ((handle) != 0)
+#define GLOB_NEXT_NAME(handle,fndp)     findnext(fndp)
+#define GLOB_NAME_DONE(handle)
+#define GLOB_NAME                       ff_name
+#define DECL_GLOB_NAME(fnd,drive,dir,fname,ext,handle) \
+                                        struct ffblk fnd;       \
+                                        char driveMAXDRIVE;   \
+                                        char dirMAXDIR;       \
+                                        char fnameMAXFILE;    \
+                                        char extMAXEXT;       \
+                                        int handle;
+
+#endif
+#endif
+#endif
+#endif
+#endif

_service:tar_scm:less-633.tar.gz/line.c Added

@@ -0,0 +1,1593 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+/*
+ * Routines to manipulate the "line buffer".
+ * The line buffer holds a line of output as it is being built
+ * in preparation for output to the screen.
+ */
+
+#include "less.h"
+#include "charset.h"
+#include "position.h"
+
+#if MSDOS_COMPILER==WIN32C
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#endif
+
+#define MAX_PFX_WIDTH (MAX_LINENUM_WIDTH + MAX_STATUSCOL_WIDTH + 1)
+static struct {
+	char *buf;    /* Buffer which holds the current output line */
+	int *attr;   /* Parallel to buf, to hold attributes */
+	int print;    /* Index in buf of first printable char */
+	int end;      /* Number of chars in buf */
+	char pfxMAX_PFX_WIDTH; /* Holds status column and line number */
+	int pfx_attrMAX_PFX_WIDTH;
+	int pfx_end;  /* Number of chars in pfx */
+} linebuf;
+
+/*
+ * Buffer of ansi sequences which have been shifted off the left edge 
+ * of the screen. 
+ */
+static struct xbuffer shifted_ansi;
+
+/*
+ * Ring buffer of last ansi sequences sent.
+ * While sending a line, these will be resent at the end
+ * of any highlighted string, to restore text modes.
+ * {{ Not ideal, since we don't really know how many to resend. }}
+ */
+#define NUM_LAST_ANSIS 3
+static struct xbuffer last_ansi;
+static struct xbuffer last_ansisNUM_LAST_ANSIS;
+static int curr_last_ansi;
+
+public int size_linebuf = 0; /* Size of line buffer (and attr buffer) */
+static struct ansi_state *line_ansi = NULL;
+static int ansi_in_line;
+static int hlink_in_line;
+static int line_mark_attr;
+static int cshift;   /* Current left-shift of output line buffer */
+public int hshift;   /* Desired left-shift of output line buffer */
+public int tabstopsTABSTOP_MAX = { 0 }; /* Custom tabstops */
+public int ntabstops = 1;        /* Number of tabstops */
+public int tabdefault = 8;       /* Default repeated tabstops */
+public POSITION highest_hilite;  /* Pos of last hilite in file found so far */
+static POSITION line_pos;
+
+static int end_column;  /* Printable length, accounting for backspaces, etc. */
+static int right_curr;
+static int right_column;
+static int overstrike;  /* Next char should overstrike previous char */
+static int last_overstrike = AT_NORMAL;
+static int is_null_line;  /* There is no current line */
+static LWCHAR pendc;
+static POSITION pendpos;
+static char *end_ansi_chars;
+static char *mid_ansi_chars;
+static int in_hilite;
+
+static int attr_swidth(int a);
+static int attr_ewidth(int a);
+static int do_append(LWCHAR ch, char *rep, POSITION pos);
+
+extern int sigs;
+extern int bs_mode;
+extern int proc_backspace;
+extern int proc_tab;
+extern int proc_return;
+extern int linenums;
+extern int ctldisp;
+extern int twiddle;
+extern int binattr;
+extern int status_col;
+extern int status_col_width;
+extern int linenum_width;
+extern int auto_wrap, ignaw;
+extern int bo_s_width, bo_e_width;
+extern int ul_s_width, ul_e_width;
+extern int bl_s_width, bl_e_width;
+extern int so_s_width, so_e_width;
+extern int sc_width, sc_height;
+extern int utf_mode;
+extern POSITION start_attnpos;
+extern POSITION end_attnpos;
+extern char rscroll_char;
+extern int rscroll_attr;
+extern int use_color;
+extern int status_line;
+
+static char mbc_bufMAX_UTF_CHAR_LEN;
+static int mbc_buf_len = 0;
+static int mbc_buf_index = 0;
+static POSITION mbc_pos;
+static int saved_line_end;
+static int saved_end_column;
+
+/* Configurable color map */
+struct color_map { int attr; char color12; };
+static struct color_map color_map = {
+	{ AT_UNDERLINE,            "" },
+	{ AT_BOLD,                 "" },
+	{ AT_BLINK,                "" },
+	{ AT_STANDOUT,             "" },
+	{ AT_COLOR_ATTN,           "Wm" },
+	{ AT_COLOR_BIN,            "kR" },
+	{ AT_COLOR_CTRL,           "kR" },
+	{ AT_COLOR_ERROR,          "kY" },
+	{ AT_COLOR_LINENUM,        "c" },
+	{ AT_COLOR_MARK,           "Wb" },
+	{ AT_COLOR_PROMPT,         "kC" },
+	{ AT_COLOR_RSCROLL,        "kc" },
+	{ AT_COLOR_HEADER,         "" },
+	{ AT_COLOR_SEARCH,         "kG" },
+	{ AT_COLOR_SUBSEARCH(1),   "ky" },
+	{ AT_COLOR_SUBSEARCH(2),   "wb" },
+	{ AT_COLOR_SUBSEARCH(3),   "YM" },
+	{ AT_COLOR_SUBSEARCH(4),   "Yr" },
+	{ AT_COLOR_SUBSEARCH(5),   "Wc" },
+};
+
+/* State while processing an ANSI escape sequence */
+struct ansi_state {
+	int hindex;   /* Index into hyperlink prefix */
+	int hlink;    /* Processing hyperlink address? */
+	int prev_esc; /* Prev char was ESC (to detect ESC-\ seq) */
+};
+
+/*
+ * Initialize from environment variables.
+ */
+public void init_line(void)
+{
+	int ax;
+
+	end_ansi_chars = lgetenv("LESSANSIENDCHARS");
+	if (isnullenv(end_ansi_chars))
+		end_ansi_chars = "m";
+
+	mid_ansi_chars = lgetenv("LESSANSIMIDCHARS");
+	if (isnullenv(mid_ansi_chars))
+		mid_ansi_chars = "0123456789:;?!\"'#%()*+ ";
+
+	linebuf.buf = (char *) ecalloc(LINEBUF_SIZE, sizeof(char));
+	linebuf.attr = (int *) ecalloc(LINEBUF_SIZE, sizeof(int));
+	size_linebuf = LINEBUF_SIZE;
+	xbuf_init(&shifted_ansi);
+	xbuf_init(&last_ansi);
+	for (ax = 0;  ax < NUM_LAST_ANSIS;  ax++)
+		xbuf_init(&last_ansisax);
+	curr_last_ansi = 0;
+}
+
+/*
+ * Expand the line buffer.
+ */
+static int expand_linebuf(void)
+{
+	/* Double the size of the line buffer. */
+	int new_size = size_linebuf * 2;
+	char *new_buf = (char *) calloc(new_size, sizeof(char));
+	int *new_attr = (int *) calloc(new_size, sizeof(int));
+	if (new_buf == NULL || new_attr == NULL)
+	{
+		if (new_attr != NULL)
+			free(new_attr);
+		if (new_buf != NULL)
+			free(new_buf);
+		return 1;
+	}
+	/*
+	 * We just calloc'd the buffers; copy the old contents.
+	 */
+	memcpy(new_buf, linebuf.buf, size_linebuf * sizeof(char));
+	memcpy(new_attr, linebuf.attr, size_linebuf * sizeof(int));
+	free(linebuf.attr);
+	free(linebuf.buf);
+	linebuf.buf = new_buf;
+	linebuf.attr = new_attr;
+	size_linebuf = new_size;
+	return 0;
+}

_service:tar_scm:less-633.tar.gz/linenum.c Added

@@ -0,0 +1,498 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Code to handle displaying line numbers.
+ *
+ * Finding the line number of a given file position is rather tricky.
+ * We don't want to just start at the beginning of the file and
+ * count newlines, because that is slow for large files (and also
+ * wouldn't work if we couldn't get to the start of the file; e.g.
+ * if input is a long pipe).
+ *
+ * So we use the function add_lnum to cache line numbers.
+ * We try to be very clever and keep only the more interesting
+ * line numbers when we run out of space in our table.  A line
+ * number is more interesting than another when it is far from
+ * other line numbers.   For example, we'd rather keep lines
+ * 100,200,300 than 100,101,300.  200 is more interesting than
+ * 101 because 101 can be derived very cheaply from 100, while
+ * 200 is more expensive to derive from 100.
+ *
+ * The function currline() returns the line number of a given
+ * position in the file.  As a side effect, it calls add_lnum
+ * to cache the line number.  Therefore currline is occasionally
+ * called to make sure we cache line numbers often enough.
+ */
+
+#include "less.h"
+
+/*
+ * Structure to keep track of a line number and the associated file position.
+ * A doubly-linked circular list of line numbers is kept ordered by line number.
+ */
+struct linenum_info
+{
+	struct linenum_info *next;      /* Link to next in the list */
+	struct linenum_info *prev;      /* Line to previous in the list */
+	POSITION pos;                   /* File position */
+	POSITION gap;                   /* Gap between prev and next */
+	LINENUM line;                   /* Line number */
+};
+/*
+ * "gap" needs some explanation: the gap of any particular line number
+ * is the distance between the previous one and the next one in the list.
+ * ("Distance" means difference in file position.)  In other words, the
+ * gap of a line number is the gap which would be introduced if this
+ * line number were deleted.  It is used to decide which one to replace
+ * when we have a new one to insert and the table is full.
+ */
+
+#define NPOOL   200                     /* Size of line number pool */
+
+#define LONGTIME        (2)             /* In seconds */
+
+static struct linenum_info anchor;      /* Anchor of the list */
+static struct linenum_info *freelist;   /* Anchor of the unused entries */
+static struct linenum_info poolNPOOL; /* The pool itself */
+static struct linenum_info *spare;      /* We always keep one spare entry */
+public int scanning_eof = FALSE;
+
+extern int linenums;
+extern int sigs;
+extern int sc_height;
+extern int screen_trashed;
+extern int header_lines;
+extern int nonum_headers;
+
+/*
+ * Initialize the line number structures.
+ */
+public void clr_linenum(void)
+{
+	struct linenum_info *p;
+
+	/*
+	 * Put all the entries on the free list.
+	 * Leave one for the "spare".
+	 */
+	for (p = pool;  p < &poolNPOOL-2;  p++)
+		p->next = p+1;
+	poolNPOOL-2.next = NULL;
+	freelist = pool;
+
+	spare = &poolNPOOL-1;
+
+	/*
+	 * Initialize the anchor.
+	 */
+	anchor.next = anchor.prev = &anchor;
+	anchor.gap = 0;
+	anchor.pos = (POSITION)0;
+	anchor.line = 1;
+}
+
+/*
+ * Calculate the gap for an entry.
+ */
+static void calcgap(struct linenum_info *p)
+{
+	/*
+	 * Don't bother to compute a gap for the anchor.
+	 * Also don't compute a gap for the last one in the list.
+	 * The gap for that last one should be considered infinite,
+	 * but we never look at it anyway.
+	 */
+	if (p == &anchor || p->next == &anchor)
+		return;
+	p->gap = p->next->pos - p->prev->pos;
+}
+
+/*
+ * Add a new line number to the cache.
+ * The specified position (pos) should be the file position of the
+ * FIRST character in the specified line.
+ */
+public void add_lnum(LINENUM linenum, POSITION pos)
+{
+	struct linenum_info *p;
+	struct linenum_info *new;
+	struct linenum_info *nextp;
+	struct linenum_info *prevp;
+	POSITION mingap;
+
+	/*
+	 * Find the proper place in the list for the new one.
+	 * The entries are sorted by position.
+	 */
+	for (p = anchor.next;  p != &anchor && p->pos < pos;  p = p->next)
+		if (p->line == linenum)
+			/* We already have this one. */
+			return;
+	nextp = p;
+	prevp = p->prev;
+
+	if (freelist != NULL)
+	{
+		/*
+		 * We still have free (unused) entries.
+		 * Use one of them.
+		 */
+		new = freelist;
+		freelist = freelist->next;
+	} else
+	{
+		/*
+		 * No free entries.
+		 * Use the "spare" entry.
+		 */
+		new = spare;
+		spare = NULL;
+	}
+
+	/*
+	 * Fill in the fields of the new entry,
+	 * and insert it into the proper place in the list.
+	 */
+	new->next = nextp;
+	new->prev = prevp;
+	new->pos = pos;
+	new->line = linenum;
+
+	nextp->prev = new;
+	prevp->next = new;
+
+	/*
+	 * Recalculate gaps for the new entry and the neighboring entries.
+	 */
+	calcgap(new);
+	calcgap(nextp);
+	calcgap(prevp);
+
+	if (spare == NULL)
+	{
+		/*
+		 * We have used the spare entry.
+		 * Scan the list to find the one with the smallest
+		 * gap, take it out and make it the spare.
+		 * We should never remove the last one, so stop when
+		 * we get to p->next == &anchor.  This also avoids
+		 * looking at the gap of the last one, which is
+		 * not computed by calcgap.
+		 */
+		mingap = anchor.next->gap;
+		for (p = anchor.next;  p->next != &anchor;  p = p->next)
+		{
+			if (p->gap <= mingap)
+			{
+				spare = p;
+				mingap = p->gap;
+			}
+		}
+		spare->next->prev = spare->prev;

_service:tar_scm:less-633.tar.gz/lsystem.c Added

@@ -0,0 +1,364 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines to execute other programs.
+ * Necessarily very OS dependent.
+ */
+
+#include "less.h"
+#include <signal.h>
+#include "position.h"
+
+#if MSDOS_COMPILER
+#include <dos.h>
+#if MSDOS_COMPILER==WIN32C && defined(MINGW)
+#include <direct.h>
+#define setdisk(n) _chdrive((n)+1)
+#else
+#ifdef _MSC_VER
+#include <direct.h>
+#define setdisk(n) _chdrive((n)+1)
+#else
+#include <dir.h>
+#endif
+#endif
+#endif
+
+extern int screen_trashed;
+extern IFILE curr_ifile;
+
+
+#if HAVE_SYSTEM
+
+/*
+ * Pass the specified command to a shell to be executed.
+ * Like plain "system()", but handles resetting terminal modes, etc.
+ */
+public void lsystem(char *cmd, char *donemsg)
+{
+	int inp;
+#if HAVE_SHELL
+	char *shell;
+	char *p;
+#endif
+	IFILE save_ifile;
+#if MSDOS_COMPILER && MSDOS_COMPILER!=WIN32C
+	char cwdFILENAME_MAX+1;
+#endif
+
+	/*
+	 * Print the command which is to be executed,
+	 * unless the command starts with a "-".
+	 */
+	if (cmd0 == '-')
+		cmd++;
+	else
+	{
+		clear_bot();
+		putstr("!");
+		putstr(cmd);
+		putstr("\n");
+	}
+
+#if MSDOS_COMPILER
+#if MSDOS_COMPILER==WIN32C
+	if (*cmd == '\0')
+		cmd = getenv("COMSPEC");
+#else
+	/*
+	 * Working directory is global on MSDOS.
+	 * The child might change the working directory, so we
+	 * must save and restore CWD across calls to "system",
+	 * or else we won't find our file when we return and
+	 * try to "reedit_ifile" it.
+	 */
+	getcwd(cwd, FILENAME_MAX);
+#endif
+#endif
+
+	/*
+	 * Close the current input file.
+	 */
+	save_ifile = save_curr_ifile();
+	(void) edit_ifile(NULL_IFILE);
+
+	/*
+	 * De-initialize the terminal and take out of raw mode.
+	 */
+	deinit();
+	flush();         /* Make sure the deinit chars get out */
+	raw_mode(0);
+#if MSDOS_COMPILER==WIN32C
+	close_getchr();
+#endif
+
+	/*
+	 * Restore signals to their defaults.
+	 */
+	init_signals(0);
+
+#if HAVE_DUP
+	/*
+	 * Force standard input to be the user's terminal
+	 * (the normal standard input), even if less's standard input 
+	 * is coming from a pipe.
+	 */
+	inp = dup(0);
+	close(0);
+#if !MSDOS_COMPILER
+	if (open_tty() < 0)
+#endif
+		dup(inp);
+#endif
+
+	/*
+	 * Pass the command to the system to be executed.
+	 * If we have a SHELL environment variable, use
+	 * <$SHELL -c "command"> instead of just <command>.
+	 * If the command is empty, just invoke a shell.
+	 */
+#if HAVE_SHELL
+	p = NULL;
+	if ((shell = lgetenv("SHELL")) != NULL && *shell != '\0')
+	{
+		if (*cmd == '\0')
+			p = save(shell);
+		else
+		{
+			char *esccmd = shell_quote(cmd);
+			if (esccmd != NULL)
+			{
+				int len = (int) (strlen(shell) + strlen(esccmd) + 5);
+				p = (char *) ecalloc(len, sizeof(char));
+				SNPRINTF3(p, len, "%s %s %s", shell, shell_coption(), esccmd);
+				free(esccmd);
+			}
+		}
+	}
+	if (p == NULL)
+	{
+		if (*cmd == '\0')
+			p = save("sh");
+		else
+			p = save(cmd);
+	}
+	system(p);
+	free(p);
+#else
+#if MSDOS_COMPILER==DJGPPC
+	/*
+	 * Make stdin of the child be in cooked mode.
+	 */
+	setmode(0, O_TEXT);
+	/*
+	 * We don't need to catch signals of the child (it
+	 * also makes trouble with some DPMI servers).
+	 */
+	__djgpp_exception_toggle();
+	system(cmd);
+	__djgpp_exception_toggle();
+#else
+	system(cmd);
+#endif
+#endif
+
+#if HAVE_DUP
+	/*
+	 * Restore standard input, reset signals, raw mode, etc.
+	 */
+	close(0);
+	dup(inp);
+	close(inp);
+#endif
+
+#if MSDOS_COMPILER==WIN32C
+	open_getchr();
+#endif
+	init_signals(1);
+	raw_mode(1);
+	if (donemsg != NULL)
+	{
+		putstr(donemsg);
+		putstr("  (press RETURN)");
+		get_return();
+		putchr('\n');
+		flush();
+	}
+	init();
+	screen_trashed = 1;
+
+#if MSDOS_COMPILER && MSDOS_COMPILER!=WIN32C
+	/*

_service:tar_scm:less-633.tar.gz/main.c Added

@@ -0,0 +1,432 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Entry point, initialization, miscellaneous routines.
+ */
+
+#include "less.h"
+#if MSDOS_COMPILER==WIN32C
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#endif
+
+public char *   every_first_cmd = NULL;
+public int      new_file;
+public int      is_tty;
+public IFILE    curr_ifile = NULL_IFILE;
+public IFILE    old_ifile = NULL_IFILE;
+public struct scrpos initial_scrpos;
+public POSITION start_attnpos = NULL_POSITION;
+public POSITION end_attnpos = NULL_POSITION;
+public int      wscroll;
+public char *   progname;
+public int      quitting;
+public int      secure;
+public int      dohelp;
+
+#if LOGFILE
+public int      logfile = -1;
+public int      force_logfile = FALSE;
+public char *   namelogfile = NULL;
+#endif
+
+#if EDITOR
+public char *   editor;
+public char *   editproto;
+#endif
+
+#if TAGS
+extern char *   tags;
+extern char *   tagoption;
+extern int      jump_sline;
+#endif
+
+#ifdef WIN32
+static char consoleTitle256;
+#endif
+
+public int      one_screen;
+extern int      less_is_more;
+extern int      missing_cap;
+extern int      know_dumb;
+extern int      pr_type;
+extern int      quit_if_one_screen;
+extern int      no_init;
+extern int      errmsgs;
+extern int      redraw_on_quit;
+extern int      term_init_done;
+extern int      first_time;
+
+/*
+ * Entry point.
+ */
+int main(int argc, char *argv)
+{
+	IFILE ifile;
+	char *s;
+
+#ifdef __EMX__
+	_response(&argc, &argv);
+	_wildcard(&argc, &argv);
+#endif
+
+	progname = *argv++;
+	argc--;
+
+#if SECURE
+	secure = 1;
+#else
+	secure = 0;
+	s = lgetenv("LESSSECURE");
+	if (!isnullenv(s))
+		secure = 1;
+#endif
+
+#ifdef WIN32
+	if (getenv("HOME") == NULL)
+	{
+		/*
+		 * If there is no HOME environment variable,
+		 * try the concatenation of HOMEDRIVE + HOMEPATH.
+		 */
+		char *drive = getenv("HOMEDRIVE");
+		char *path  = getenv("HOMEPATH");
+		if (drive != NULL && path != NULL)
+		{
+			char *env = (char *) ecalloc(strlen(drive) + 
+					strlen(path) + 6, sizeof(char));
+			strcpy(env, "HOME=");
+			strcat(env, drive);
+			strcat(env, path);
+			putenv(env);
+		}
+	}
+	GetConsoleTitle(consoleTitle, sizeof(consoleTitle)/sizeof(char));
+#endif /* WIN32 */
+
+	/*
+	 * Process command line arguments and LESS environment arguments.
+	 * Command line arguments override environment arguments.
+	 */
+	is_tty = isatty(1);
+	init_mark();
+	init_cmds();
+	init_poll();
+	get_term();
+	init_charset();
+	init_line();
+	init_cmdhist();
+	init_option();
+	init_search();
+
+	/*
+	 * If the name of the executable program is "more",
+	 * act like LESS_IS_MORE is set.
+	 */
+	s = last_component(progname);
+	if (strcmp(s, "more") == 0)
+		less_is_more = 1;
+
+	init_prompt();
+
+	s = lgetenv(less_is_more ? "MORE" : "LESS");
+	if (s != NULL)
+		scan_option(s);
+
+#define isoptstring(s)  (((s)0 == '-' || (s)0 == '+') && (s)1 != '\0')
+	while (argc > 0 && (isoptstring(*argv) || isoptpending()))
+	{
+		s = *argv++;
+		argc--;
+		if (strcmp(s, "--") == 0)
+			break;
+		scan_option(s);
+	}
+#undef isoptstring
+
+	if (isoptpending())
+	{
+		/*
+		 * Last command line option was a flag requiring a
+		 * following string, but there was no following string.
+		 */
+		nopendopt();
+		quit(QUIT_OK);
+	}
+
+	expand_cmd_tables();
+
+#if EDITOR
+	editor = lgetenv("VISUAL");
+	if (editor == NULL || *editor == '\0')
+	{
+		editor = lgetenv("EDITOR");
+		if (isnullenv(editor))
+			editor = EDIT_PGM;
+	}
+	editproto = lgetenv("LESSEDIT");
+	if (isnullenv(editproto))
+		editproto = "%E ?lm+%lm. %g";
+#endif
+
+	/*
+	 * Call get_ifile with all the command line filenames
+	 * to "register" them with the ifile system.
+	 */
+	ifile = NULL_IFILE;
+	if (dohelp)
+		ifile = get_ifile(FAKE_HELPFILE, ifile);
+	while (argc-- > 0)
+	{
+#if (MSDOS_COMPILER && MSDOS_COMPILER != DJGPPC)
+		/*
+		 * Because the "shell" doesn't expand filename patterns,
+		 * treat each argument as a filename pattern rather than
+		 * a single filename.  
+		 * Expand the pattern and iterate over the expanded list.
+		 */
+		struct textlist tlist;
+		char *filename;
+		char *gfilename;
+		char *qfilename;

_service:tar_scm:less-633.tar.gz/mark.c Added

@@ -0,0 +1,427 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+#include "less.h"
+#include "position.h"
+
+extern IFILE curr_ifile;
+extern int sc_height;
+extern int jump_sline;
+extern int perma_marks;
+
+/*
+ * A mark is an ifile (input file) plus a position within the file.
+ */
+struct mark 
+{
+	/*
+	 * Normally m_ifile != IFILE_NULL and m_filename == NULL.
+	 * For restored marks we set m_filename instead of m_ifile
+	 * because we don't want to create an ifile until the 
+	 * user explicitly requests the file (by name or mark).
+	 */
+	char m_letter;           /* Associated character */
+	IFILE m_ifile;           /* Input file being marked */
+	char *m_filename;        /* Name of the input file */
+	struct scrpos m_scrpos;  /* Position of the mark */
+};
+
+/*
+ * The table of marks.
+ * Each mark is identified by a lowercase or uppercase letter.
+ * The final one is lmark, for the "last mark"; addressed by the apostrophe.
+ */
+#define NMARKS          ((2*26)+2)      /* a-z, A-Z, mousemark, lastmark */
+#define NUMARKS         ((2*26)+1)      /* user marks (not lastmark) */
+#define MOUSEMARK       (NMARKS-2)
+#define LASTMARK        (NMARKS-1)
+static struct mark marksNMARKS;
+public int marks_modified = 0;
+
+
+/*
+ * Initialize a mark struct.
+ */
+static void cmark(struct mark *m, IFILE ifile, POSITION pos, int ln)
+{
+	m->m_ifile = ifile;
+	m->m_scrpos.pos = pos;
+	m->m_scrpos.ln = ln;
+	if (m->m_filename != NULL)
+		/* Normally should not happen but a corrupt lesshst file can do it. */
+		free(m->m_filename);
+	m->m_filename = NULL;
+}
+
+/*
+ * Initialize the mark table to show no marks are set.
+ */
+public void init_mark(void)
+{
+	int i;
+
+	for (i = 0;  i < NMARKS;  i++)
+	{
+		char letter;
+		switch (i) {
+		case MOUSEMARK: letter = '#'; break;
+		case LASTMARK: letter = '\''; break;
+		default: letter = (i < 26) ? 'a'+i : 'A'+i-26; break;
+		}
+		marksi.m_letter = letter;
+		cmark(&marksi, NULL_IFILE, NULL_POSITION, -1);
+	}
+}
+
+/*
+ * Set m_ifile and clear m_filename.
+ */
+static void mark_set_ifile(struct mark *m, IFILE ifile)
+{
+	m->m_ifile = ifile;
+	/* With m_ifile set, m_filename is no longer needed. */
+	free(m->m_filename);
+	m->m_filename = NULL;
+}
+
+/*
+ * Populate the m_ifile member of a mark struct from m_filename.
+ */
+static void mark_get_ifile(struct mark *m)
+{
+	if (m->m_ifile != NULL_IFILE)
+		return; /* m_ifile is already set */
+	mark_set_ifile(m, get_ifile(m->m_filename, prev_ifile(NULL_IFILE)));
+}
+
+/*
+ * Return the user mark struct identified by a character.
+ */
+static struct mark * getumark(LWCHAR c)
+{
+	PARG parg;
+	if (c >= 'a' && c <= 'z')
+		return (&marksc-'a');
+	if (c >= 'A' && c <= 'Z')
+		return (&marksc-'A'+26);
+	if (c == '\'')
+		return (&marksLASTMARK);
+	if (c == '#')
+		return (&marksMOUSEMARK);
+	parg.p_char = (char) c;
+	error("Invalid mark letter %c", &parg);
+	return (NULL);
+}
+
+/*
+ * Get the mark structure identified by a character.
+ * The mark struct may either be in the mark table (user mark)
+ * or may be constructed on the fly for certain characters like ^, $.
+ */
+static struct mark * getmark(LWCHAR c)
+{
+	struct mark *m;
+	static struct mark sm;
+
+	switch (c)
+	{
+	case '^':
+		/*
+		 * Beginning of the current file.
+		 */
+		m = &sm;
+		cmark(m, curr_ifile, ch_zero(), 0);
+		break;
+	case '$':
+		/*
+		 * End of the current file.
+		 */
+		if (ch_end_seek())
+		{
+			error("Cannot seek to end of file", NULL_PARG);
+			return (NULL);
+		}
+		m = &sm;
+		cmark(m, curr_ifile, ch_tell(), sc_height);
+		break;
+	case '.':
+		/*
+		 * Current position in the current file.
+		 */
+		m = &sm;
+		get_scrpos(&m->m_scrpos, TOP);
+		cmark(m, curr_ifile, m->m_scrpos.pos, m->m_scrpos.ln);
+		break;
+	case '\'':
+		/*
+		 * The "last mark".
+		 */
+		m = &marksLASTMARK;
+		break;
+	default:
+		/*
+		 * Must be a user-defined mark.
+		 */
+		m = getumark(c);
+		if (m == NULL)
+			break;
+		if (m->m_scrpos.pos == NULL_POSITION)
+		{
+			error("Mark not set", NULL_PARG);
+			return (NULL);
+		}
+		break;
+	}
+	return (m);
+}
+
+/*
+ * Is a mark letter invalid?
+ */
+public int badmark(LWCHAR c)
+{
+	return (getmark(c) == NULL);
+}
+
+/*
+ * Set a user-defined mark.
+ */
+public void setmark(LWCHAR c, int where)
+{
+	struct mark *m;
+	struct scrpos scrpos;

_service:tar_scm:less-633.tar.gz/mkhelp.pl Added

@@ -0,0 +1,44 @@
+#! /usr/bin/env perl
+use strict;
+
+# Silly little program to generate the help.c source file
+# from the less.hlp text file.
+# The output of this script is a C program defining a char array 
+# whose content is the input to this script.
+
+{
+    my ($sec,$min,$hour,$mday,$mon,$year) = gmtime();
+    printf "/* This file was generated by mkhelp.pl from less.hlp at %d:%02d on %d/%d/%d */\n",
+        $hour, $min, $year+1900, $mon+1, $mday;
+    print "#include \"less.h\"\n";
+    print "constant char helpdata = {\n";
+    my $ch = 0;
+    my $prevch;
+    for (;;) {
+        $prevch = $ch;
+        $ch = getc();
+        last if not defined $ch;
+        if ($ch eq "'") {
+            print "'\\'',";
+        } elsif ($ch eq "\\") {
+            print "'\\\\',";
+        } elsif ($ch eq "\b") {
+            print "'\\b',";
+        } elsif ($ch eq "\t") {
+            print "'\\t',";
+        } elsif ($ch eq "\n") {
+            print "'\\n',\n" if $prevch ne "\r";
+        } elsif ($ch eq "\r") {
+            print "'\\n',\n" if $prevch ne "\n";
+        } else {
+            if (ord($ch) >= ord(' ') && ord($ch) < 0x7f) {
+                print "'$ch',";
+            } else {
+                printf "0x%02x,", ord($ch);
+            }
+        }
+    }
+    # Add an extra null char to avoid having a trailing comma.
+    print " 0 };\n";
+    print "constant int size_helpdata = sizeof(helpdata) - 1;\n";
+}

_service:tar_scm:less-633.tar.gz/mkhelp.py Added

@@ -0,0 +1,36 @@
+#!/usr/bin/env python
+
+import time
+import sys
+
+time = time.gmtime()
+print("/* This file was generated by mkhelp.py from less.hlp at "\
+    "%d:%02d GMT on %d/%d/%d */\n" %
+    (time.tm_hour, time.tm_min, time.tm_year, time.tm_mon, time.tm_mday))
+print("#include \"less.h\"")
+print("constant char helpdata = {")
+ch = 0
+while True:
+    prevch = ch
+    ch = sys.stdin.read(1)
+    if ch == '':
+        break
+    if (ch == "'"):
+         print("'\\'',", end='')
+    elif (ch == "\\"):
+        print("'\\\\',", end='')
+    elif (ch == "\b"):
+        print ("'\\b',", end='')
+    elif (ch == "\t"):
+        print ("'\\t',", end='')
+    elif (ch == "\n"):
+        if prevch != "\r": print("'\\n',")
+    elif (ch == "\r"):
+        if prevch != "\n": print("'\\n',")
+    else:
+        if ((ord(ch) >= ord(' ')) and (ord(ch) < 0x7f)):
+            print(f"'{ch}',", end='')
+        else:
+            print("0x%02x," % ord(ch), end='')
+print(" '\\0' };")
+print("constant int size_helpdata = sizeof(helpdata) - 1;")

_service:tar_scm:less-633.tar.gz/mkinstalldirs Added

_service:tar_scm:less-633.tar.gz/mkutable Added

@@ -0,0 +1,125 @@
+#!/usr/bin/env perl
+use strict;
+
+my $USAGE = <<__EOF__;
+   usage: mkutable -n -f# type... -- < UnicodeData.txt
+          -n = take non-matching types
+          -f = zero-based type field (default 2)
+__EOF__
+
+use Getopt::Std;
+use vars qw( $opt_f $opt_n );
+
+my $type_field = 2;
+
+# Override Unicode tables for certain control chars
+# that are expected to be found in normal text files.
+my %force_space = (
+    0x08 => 1, # backspace
+    0x09 => 1, # tab
+    0x0a => 1, # newline
+    0x0c => 1, # form feed
+    0x0d => 1, # carriage return
+);
+
+# Hangul Jamo medial vowels and final consonants should be zero width.
+my @force_compose = (
+    0x1160, 0x11ff,
+    0xd7b0, 0xd7c6,
+    0xd7cb, 0xd7fb
+);
+
+exit (main() ? 0 : 1);
+
+sub main {
+    my $args = join ' ', @ARGV;
+    die $USAGE if not getopts('f:n');
+    $type_field = $opt_f if $opt_f;
+
+    my %types;
+    my $arg;
+    while ($arg = shift @ARGV) {
+        last if $arg eq '--';
+        $types{$arg} = 1;
+    }
+    my %out = ( 'types' => \%types );
+
+    my %force_compose;
+    foreach my $comp (@force_compose) {
+        my ($lo,$hi) = @$comp;
+        for (my $ch = $lo; $ch <= $hi; ++$ch) {
+            $force_compose{$ch} = 1;
+        }
+    }
+
+    my $date = `date`;
+    chomp $date;
+    print "/* Generated by \"$0 $args\" on $date */\n";
+
+    my $last_code = 0;
+    my $start_range = 0;
+    while (<>) {
+        chomp;
+        s/#.*//;
+        my @fields = split /;/;
+        next if not @fields;
+        my ($lo_code, $hi_code);
+        my $codes = $fields0;
+        if ($codes =~ /(\w+)\.\.(\w+)/) {
+            $lo_code = hex $1;
+            $hi_code = hex $2;
+        } else {
+            $lo_code = $hi_code = hex $codes;
+        }
+        if ($fields1 =~ /, First>$/) {
+            die "invalid Unicode data: First with range" if $hi_code != $lo_code;
+            $start_range = $lo_code;
+            next;
+        }
+        if ($fields1 =~ /, Last>$/) {
+            die "invalid Unicode data: Last without First" if not $start_range;
+            $lo_code = $start_range;
+            $start_range = 0;
+        } elsif ($start_range) {
+            die "invalid Unicode data: First without Last";
+        }
+        my $type = $fields$type_field;
+        $type =~ s/\s//g;
+        for ($last_code = $lo_code; $last_code <= $hi_code; ++$last_code) {
+            output(\%out, $last_code,
+                $force_space{$last_code} ? 'Zs' : $force_compose{$last_code} ? 'Mn' : $type);
+        }
+    }
+    output(\%out, $last_code);
+    return 1;
+}
+
+sub output {
+    my ($out, $code, $type) = @_;
+    my $type_ok = ($type and ${${$out}{types}}{$type});
+    $type_ok = not $type_ok if $opt_n;
+    my $prev_code = $$out{prev_code};
+
+    if (not $type_ok) {
+        end_run($out, $prev_code);
+    } elsif (not $$out{in_run} or $type ne $$out{run_type} or $code != $prev_code+1) {
+        end_run($out, $prev_code);
+        start_run($out, $code, $type);
+    }
+    $$out{prev_code} = $code;
+}
+
+sub start_run {
+    my ($out, $code, $type) = @_;
+    $$out{start_code} = $code;
+    $$out{prev_code} = $code;
+    $$out{run_type} = $type;
+    $$out{in_run} = 1;
+}
+
+sub end_run {
+    my ($out, $code) = @_;
+    return if not $$out{in_run};
+    printf "\t{ 0x%04x, 0x%04x }, /* %s */\n", $$out{start_code}, $code, $$out{run_type};
+    $$out{in_run} = 0;
+}

_service:tar_scm:less-633.tar.gz/optfunc.c Added

@@ -0,0 +1,1096 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Handling functions for command line options.
+ *
+ * Most options are handled by the generic code in option.c.
+ * But all string options, and a few non-string options, require
+ * special handling specific to the particular option.
+ * This special processing is done by the "handling functions" in this file.
+ *
+ * Each handling function is passed a "type" and, if it is a string
+ * option, the string which should be "assigned" to the option.
+ * The type may be one of:
+ *      INIT    The option is being initialized from the command line.
+ *      TOGGLE  The option is being changed from within the program.
+ *      QUERY   The setting of the option is merely being queried.
+ */
+
+#include "less.h"
+#include "option.h"
+
+extern int nbufs;
+extern int bufspace;
+extern int pr_type;
+extern int plusoption;
+extern int swindow;
+extern int sc_width;
+extern int sc_height;
+extern int secure;
+extern int dohelp;
+extern int is_tty;
+extern char openquote;
+extern char closequote;
+extern char *prproto;
+extern char *eqproto;
+extern char *hproto;
+extern char *wproto;
+extern char *every_first_cmd;
+extern IFILE curr_ifile;
+extern char version;
+extern int jump_sline;
+extern long jump_sline_fraction;
+extern int shift_count;
+extern long shift_count_fraction;
+extern char rscroll_char;
+extern int rscroll_attr;
+extern int mousecap;
+extern int wheel_lines;
+extern int less_is_more;
+extern int linenum_width;
+extern int status_col_width;
+extern int use_color;
+extern int want_filesize;
+extern int header_lines;
+extern int header_cols;
+extern int def_search_type;
+extern int chopline;
+extern int tabstops;
+extern int ntabstops;
+extern int tabdefault;
+extern char intr_char;
+#if LOGFILE
+extern char *namelogfile;
+extern int force_logfile;
+extern int logfile;
+#endif
+#if TAGS
+public char *tagoption = NULL;
+extern char *tags;
+extern char ztags;
+#endif
+#if LESSTEST
+extern char *ttyin_name;
+#endif /*LESSTEST*/
+#if MSDOS_COMPILER
+extern int nm_fg_color, nm_bg_color;
+extern int bo_fg_color, bo_bg_color;
+extern int ul_fg_color, ul_bg_color;
+extern int so_fg_color, so_bg_color;
+extern int bl_fg_color, bl_bg_color;
+extern int sgr_mode;
+#if MSDOS_COMPILER==WIN32C
+#ifndef COMMON_LVB_UNDERSCORE
+#define COMMON_LVB_UNDERSCORE 0x8000
+#endif
+#endif
+#endif
+
+
+#if LOGFILE
+/*
+ * Handler for -o option.
+ */
+public void opt_o(int type, char *s)
+{
+	PARG parg;
+	char *filename;
+
+	if (secure)
+	{
+		error("log file support is not available", NULL_PARG);
+		return;
+	}
+	switch (type)
+	{
+	case INIT:
+		namelogfile = save(s);
+		break;
+	case TOGGLE:
+		if (ch_getflags() & CH_CANSEEK)
+		{
+			error("Input is not a pipe", NULL_PARG);
+			return;
+		}
+		if (logfile >= 0)
+		{
+			error("Log file is already in use", NULL_PARG);
+			return;
+		}
+		s = skipsp(s);
+		if (namelogfile != NULL)
+			free(namelogfile);
+		filename = lglob(s);
+		namelogfile = shell_unquote(filename);
+		free(filename);
+		use_logfile(namelogfile);
+		sync_logfile();
+		break;
+	case QUERY:
+		if (logfile < 0)
+			error("No log file", NULL_PARG);
+		else
+		{
+			parg.p_string = namelogfile;
+			error("Log file \"%s\"", &parg);
+		}
+		break;
+	}
+}
+
+/*
+ * Handler for -O option.
+ */
+public void opt__O(int type, char *s)
+{
+	force_logfile = TRUE;
+	opt_o(type, s);
+}
+#endif
+
+/*
+ * Handlers for -j option.
+ */
+public void opt_j(int type, char *s)
+{
+	PARG parg;
+	int len;
+	int err;
+
+	switch (type)
+	{
+	case INIT:
+	case TOGGLE:
+		if (*s == '.')
+		{
+			s++;
+			jump_sline_fraction = getfraction(&s, "j", &err);
+			if (err)
+				error("Invalid line fraction", NULL_PARG);
+			else
+				calc_jump_sline();
+		} else
+		{
+			int sline = getnum(&s, "j", &err);
+			if (err)
+				error("Invalid line number", NULL_PARG);
+			else
+			{
+				jump_sline = sline;
+				jump_sline_fraction = -1;
+			}
+		}
+		break;
+	case QUERY:
+		if (jump_sline_fraction < 0)
+		{
+			parg.p_int =  jump_sline;
+			error("Position target at screen line %d", &parg);
+		} else
+		{
+			char buf24;

_service:tar_scm:less-633.tar.gz/option.c Added

@@ -0,0 +1,688 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Process command line options.
+ *
+ * Each option is a single letter which controls a program variable.
+ * The options have defaults which may be changed via
+ * the command line option, toggled via the "-" command, 
+ * or queried via the "_" command.
+ */
+
+#include "less.h"
+#include "option.h"
+
+static struct loption *pendopt;
+public int plusoption = FALSE;
+
+static char *optstring(char *s, char **p_str, char *printopt, char *validchars);
+static int flip_triple(int val, int lc);
+
+extern int screen_trashed;
+extern int less_is_more;
+extern int quit_at_eof;
+extern char *every_first_cmd;
+extern int opt_use_backslash;
+
+/*
+ * Return a printable description of an option.
+ */
+static char * opt_desc(struct loption *o)
+{
+	static char bufOPTNAME_MAX + 10;
+	if (o->oletter == OLETTER_NONE)
+		SNPRINTF1(buf, sizeof(buf), "--%s", o->onames->oname);
+	else
+		SNPRINTF2(buf, sizeof(buf), "-%c (--%s)", o->oletter, o->onames->oname);
+	return (buf);
+}
+
+/*
+ * Return a string suitable for printing as the "name" of an option.
+ * For example, if the option letter is 'x', just return "-x".
+ */
+public char * propt(int c)
+{
+	static char bufMAX_PRCHAR_LEN+2;
+
+	sprintf(buf, "-%s", prchar(c));
+	return (buf);
+}
+
+/* 
+ * Scan an argument (either from the command line or from the 
+ * LESS environment variable) and process it.
+ */
+public void scan_option(char *s)
+{
+	struct loption *o;
+	int optc;
+	char *optname;
+	char *printopt;
+	char *str;
+	int set_default;
+	int lc;
+	int err;
+	PARG parg;
+
+	if (s == NULL)
+		return;
+
+	/*
+	 * If we have a pending option which requires an argument,
+	 * handle it now.
+	 * This happens if the previous option was, for example, "-P"
+	 * without a following string.  In that case, the current
+	 * option is simply the argument for the previous option.
+	 */
+	if (pendopt != NULL)
+	{
+		switch (pendopt->otype & OTYPE)
+		{
+		case STRING:
+			(*pendopt->ofunc)(INIT, s);
+			break;
+		case NUMBER:
+			printopt = opt_desc(pendopt);
+			*(pendopt->ovar) = getnum(&s, printopt, (int*)NULL);
+			break;
+		}
+		pendopt = NULL;
+		return;
+	}
+
+	set_default = FALSE;
+	optname = NULL;
+
+	while (*s != '\0')
+	{
+		/*
+		 * Check some special cases first.
+		 */
+		switch (optc = *s++)
+		{
+		case ' ':
+		case '\t':
+		case END_OPTION_STRING:
+			continue;
+		case '-':
+			/*
+			 * "--" indicates an option name instead of a letter.
+			 */
+			if (*s == '-')
+			{
+				optname = ++s;
+				break;
+			}
+			/*
+			 * "-+" means set these options back to their defaults.
+			 * (They may have been set otherwise by previous 
+			 * options.)
+			 */
+			set_default = (*s == '+');
+			if (set_default)
+				s++;
+			continue;
+		case '+':
+			/*
+			 * An option prefixed by a "+" is ungotten, so 
+			 * that it is interpreted as less commands 
+			 * processed at the start of the first input file.
+			 * "++" means process the commands at the start of
+			 * EVERY input file.
+			 */
+			plusoption = TRUE;
+			s = optstring(s, &str, propt('+'), NULL);
+			if (s == NULL)
+				return;
+			if (*str == '+')
+			{
+				if (every_first_cmd != NULL)
+					free(every_first_cmd);
+				every_first_cmd = save(str+1);
+			} else
+			{
+				ungetsc(str);
+				ungetcc_back(CHAR_END_COMMAND);
+			}
+			free(str);
+			continue;
+		case '0':  case '1':  case '2':  case '3':  case '4':
+		case '5':  case '6':  case '7':  case '8':  case '9':
+			/*
+			 * Special "more" compatibility form "-<number>"
+			 * instead of -z<number> to set the scrolling 
+			 * window size.
+			 */
+			s--;
+			optc = 'z';
+			break;
+		case 'n':
+			if (less_is_more)
+				optc = 'z';
+			break;
+		}
+
+		/*
+		 * Not a special case.
+		 * Look up the option letter in the option table.
+		 */
+		err = 0;
+		if (optname == NULL)
+		{
+			printopt = propt(optc);
+			lc = ASCII_IS_LOWER(optc);
+			o = findopt(optc);
+		} else
+		{
+			printopt = optname;
+			lc = ASCII_IS_LOWER(optname0);
+			o = findopt_name(&optname, NULL, &err);
+			s = optname;
+			optname = NULL;
+			if (*s == '\0' || *s == ' ')
+			{
+				/*
+				 * The option name matches exactly.
+				 */
+				;
+			} else if (*s == '=')
+			{
+				/*

_service:tar_scm:less-633.tar.gz/option.h Added

@@ -0,0 +1,66 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+#define END_OPTION_STRING       ('$')
+
+/*
+ * Types of options.
+ */
+#define BOOL            01      /* Boolean option: 0 or 1 */
+#define TRIPLE          02      /* Triple-valued option: 0, 1 or 2 */
+#define NUMBER          04      /* Numeric option */
+#define STRING          010     /* String-valued option */
+#define NOVAR           020     /* No associated variable */
+#define REPAINT         040     /* Repaint screen after toggling option */
+#define NO_TOGGLE       0100    /* Option cannot be toggled with "-" cmd */
+#define HL_REPAINT      0200    /* Repaint hilites after toggling option */
+#define NO_QUERY        0400    /* Option cannot be queried with "_" cmd */
+#define INIT_HANDLER    01000   /* Call option handler function at startup */
+
+#define OTYPE           (BOOL|TRIPLE|NUMBER|STRING|NOVAR)
+
+#define OLETTER_NONE    '\1'     /* Invalid option letter */
+
+/*
+ * Argument to a handling function tells what type of activity:
+ */
+#define INIT    0       /* Initialization (from command line) */
+#define QUERY   1       /* Query (from _ or - command) */
+#define TOGGLE  2       /* Change value (from - command) */
+
+/* Flag to toggle_option to specify how to "toggle" */
+#define OPT_NO_TOGGLE   0
+#define OPT_TOGGLE      1
+#define OPT_UNSET       2
+#define OPT_SET         3
+#define OPT_NO_PROMPT   0100
+
+/* Error code from findopt_name */
+#define OPT_AMBIG       1
+
+struct optname
+{
+        char *oname;            /* Long (GNU-style) option name */
+        struct optname *onext;  /* List of synonymous option names */
+};
+
+#define OPTNAME_MAX     32      /* Max length of long option name */
+
+struct loption
+{
+        char oletter;           /* The controlling letter (a-z) */
+        struct optname *onames; /* Long (GNU-style) option name */
+        int otype;              /* Type of the option */
+        int odefault;           /* Default value */
+        int *ovar;              /* Pointer to the associated variable */
+        void (*ofunc)(int, char*); /* Pointer to special handling function */
+        char *odesc3;         /* Description of each value */
+};
+

_service:tar_scm:less-633.tar.gz/opttbl.c Added

@@ -0,0 +1,861 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * The option table.
+ */
+
+#include "less.h"
+#include "option.h"
+
+/*
+ * Variables controlled by command line options.
+ */
+public int quiet;               /* Should we suppress the audible bell? */
+public int no_vbell;            /* Should we suppress the visual bell? */
+public int how_search;          /* Where should forward searches start? */
+public int top_scroll;          /* Repaint screen from top?
+                                   (alternative is scroll from bottom) */
+public int pr_type;             /* Type of prompt (short, medium, long) */
+public int bs_mode;             /* How to process backspaces */
+public int know_dumb;           /* Don't complain about dumb terminals */
+public int quit_at_eof;         /* Quit after hitting end of file twice */
+public int quit_if_one_screen;  /* Quit if EOF on first screen */
+public int squeeze;             /* Squeeze multiple blank lines into one */
+public int tabstop;             /* Tab settings */
+public int back_scroll;         /* Repaint screen on backwards movement */
+public int forw_scroll;         /* Repaint screen on forward movement */
+public int caseless;            /* Do "caseless" searches */
+public int linenums;            /* Use line numbers */
+public int autobuf;             /* Automatically allocate buffers as needed */
+public int bufspace;            /* Max buffer space per file (K) */
+public int ctldisp;             /* Send control chars to screen untranslated */
+public int force_open;          /* Open the file even if not regular file */
+public int swindow;             /* Size of scrolling window */
+public int jump_sline;          /* Screen line of "jump target" */
+public long jump_sline_fraction = -1;
+public long shift_count_fraction = -1;
+public int chopline;            /* Truncate displayed lines at screen width */
+public int wordwrap;            /* Wrap lines at space */
+public int no_init;             /* Disable sending ti/te termcap strings */
+public int no_keypad;           /* Disable sending ks/ke termcap strings */
+public int twiddle;             /* Show tildes after EOF */
+public int show_attn;           /* Hilite first unread line */
+public int shift_count;         /* Number of positions to shift horizontally */
+public int status_col;          /* Display a status column */
+public int use_lessopen;        /* Use the LESSOPEN filter */
+public int quit_on_intr;        /* Quit on interrupt */
+public int follow_mode;         /* F cmd Follows file desc or file name? */
+public int oldbot;              /* Old bottom of screen behavior {{REMOVE}} */
+public int opt_use_backslash;   /* Use backslash escaping in option parsing */
+public char rscroll_char;       /* Char which marks chopped lines with -S */
+public int rscroll_attr;        /* Attribute of rscroll_char */
+public int no_hist_dups;        /* Remove dups from history list */
+public int mousecap;            /* Allow mouse for scrolling */
+public int wheel_lines;         /* Number of lines to scroll on mouse wheel scroll */
+public int perma_marks;         /* Save marks in history file */
+public int linenum_width;       /* Width of line numbers */
+public int status_col_width;    /* Width of status column */
+public int incr_search;         /* Incremental search */
+public int use_color;           /* Use UI color */
+public int want_filesize;       /* Scan to EOF if necessary to get file size */
+public int status_line;         /* Highlight entire marked lines */
+public int header_lines;        /* Freeze header lines at top of screen */
+public int header_cols;         /* Freeze header columns at left of screen */
+public int nonum_headers;       /* Don't give headers line numbers */
+public int nosearch_headers;    /* Don't search in header lines or columns */
+public int redraw_on_quit;      /* Redraw last screen after term deinit */
+public int def_search_type;     /* */
+public int exit_F_on_close;     /* Exit F command when input closes */
+public int modelines;           /* Lines to read looking for modelines */
+public int show_preproc_error;  /* Display msg when preproc exits with error */
+public int proc_backspace;      /* Special handling of backspace */
+public int proc_tab;            /* Special handling of tab */
+public int proc_return;         /* Special handling of carriage return */
+public char intr_char = CONTROL('X'); /* Char to interrupt reads */
+#if HILITE_SEARCH
+public int hilite_search;       /* Highlight matched search patterns? */
+#endif
+
+public int less_is_more = 0;    /* Make compatible with POSIX more */
+
+/*
+ * Long option names.
+ */
+static struct optname a_optname      = { "search-skip-screen",   NULL };
+static struct optname b_optname      = { "buffers",              NULL };
+static struct optname B__optname     = { "auto-buffers",         NULL };
+static struct optname c_optname      = { "clear-screen",         NULL };
+static struct optname d_optname      = { "dumb",                 NULL };
+static struct optname D__optname     = { "color",                NULL };
+static struct optname e_optname      = { "quit-at-eof",          NULL };
+static struct optname f_optname      = { "force",                NULL };
+static struct optname F__optname     = { "quit-if-one-screen",   NULL };
+#if HILITE_SEARCH
+static struct optname g_optname      = { "hilite-search",        NULL };
+#endif
+static struct optname h_optname      = { "max-back-scroll",      NULL };
+static struct optname i_optname      = { "ignore-case",          NULL };
+static struct optname j_optname      = { "jump-target",          NULL };
+static struct optname J__optname     = { "status-column",        NULL };
+#if USERFILE
+static struct optname k_optname      = { "lesskey-file",         NULL };
+#if HAVE_LESSKEYSRC 
+static struct optname ks_optname     = { "lesskey-src",          NULL };
+#endif /* HAVE_LESSKEYSRC */
+#endif
+static struct optname K__optname     = { "quit-on-intr",         NULL };
+static struct optname L__optname     = { "no-lessopen",          NULL };
+static struct optname m_optname      = { "long-prompt",          NULL };
+static struct optname n_optname      = { "line-numbers",         NULL };
+#if LOGFILE
+static struct optname o_optname      = { "log-file",             NULL };
+static struct optname O__optname     = { "LOG-FILE",             NULL };
+#endif
+static struct optname p_optname      = { "pattern",              NULL };
+static struct optname P__optname     = { "prompt",               NULL };
+static struct optname q2_optname     = { "silent",               NULL };
+static struct optname q_optname      = { "quiet",                &q2_optname };
+static struct optname r_optname      = { "raw-control-chars",    NULL };
+static struct optname s_optname      = { "squeeze-blank-lines",  NULL };
+static struct optname S__optname     = { "chop-long-lines",      NULL };
+#if TAGS
+static struct optname t_optname      = { "tag",                  NULL };
+static struct optname T__optname     = { "tag-file",             NULL };
+#endif
+static struct optname u_optname      = { "underline-special",    NULL };
+static struct optname V__optname     = { "version",              NULL };
+static struct optname w_optname      = { "hilite-unread",        NULL };
+static struct optname x_optname      = { "tabs",                 NULL };
+static struct optname X__optname     = { "no-init",              NULL };
+static struct optname y_optname      = { "max-forw-scroll",      NULL };
+static struct optname z_optname      = { "window",               NULL };
+static struct optname quote_optname  = { "quotes",               NULL };
+static struct optname tilde_optname  = { "tilde",                NULL };
+static struct optname query_optname  = { "help",                 NULL };
+static struct optname pound_optname  = { "shift",                NULL };
+static struct optname keypad_optname = { "no-keypad",            NULL };
+static struct optname oldbot_optname = { "old-bot",              NULL };
+static struct optname follow_optname = { "follow-name",          NULL };
+static struct optname use_backslash_optname = { "use-backslash", NULL };
+static struct optname rscroll_optname = { "rscroll", NULL };
+static struct optname nohistdups_optname = { "no-histdups",      NULL };
+static struct optname mousecap_optname = { "mouse",              NULL };
+static struct optname wheel_lines_optname = { "wheel-lines",     NULL };
+static struct optname perma_marks_optname = { "save-marks",      NULL };
+static struct optname linenum_width_optname = { "line-num-width", NULL };
+static struct optname status_col_width_optname = { "status-col-width", NULL };
+static struct optname incr_search_optname = { "incsearch",       NULL };
+static struct optname use_color_optname = { "use-color",         NULL };
+static struct optname want_filesize_optname = { "file-size",     NULL };
+static struct optname status_line_optname = { "status-line",     NULL };
+static struct optname header_optname = { "header",               NULL };
+static struct optname nonum_headers_optname = { "no-number-headers", NULL };
+static struct optname nosearch_headers_optname = { "no-search-headers", NULL };
+static struct optname redraw_on_quit_optname = { "redraw-on-quit", NULL };
+static struct optname search_type_optname = { "search-options", NULL };
+static struct optname exit_F_on_close_optname = { "exit-follow-on-close", NULL };
+static struct optname modelines_optname = { "modelines", NULL };
+static struct optname no_vbell_optname = { "no-vbell", NULL };
+static struct optname intr_optname = { "intr", NULL };
+static struct optname wordwrap_optname = { "wordwrap", NULL };
+static struct optname show_preproc_error_optname = { "show-preproc-errors", NULL };
+static struct optname proc_backspace_optname = { "proc-backspace", NULL };
+static struct optname proc_tab_optname = { "proc-tab", NULL };
+static struct optname proc_return_optname = { "proc-return", NULL };
+#if LESSTEST
+static struct optname ttyin_name_optname = { "tty",              NULL };
+#endif /*LESSTEST*/
+
+
+/*
+ * Table of all options and their semantics.
+ *
+ * For BOOL and TRIPLE options, odesc0, odesc1, odesc2 are
+ * the description of the option when set to 0, 1 or 2, respectively.
+ * For NUMBER options, odesc0 is the prompt to use when entering
+ * a new value, and odesc1 is the description, which should contain 
+ * one %d which is replaced by the value of the number.
+ * For STRING options, odesc0 is the prompt to use when entering
+ * a new value, and odesc1, if not NULL, is the set of characters
+ * that are valid in the string.
+ */
+static struct loption option =
+{
+	{ 'a', &a_optname,
+		TRIPLE, OPT_ONPLUS, &how_search, NULL,
+		{
+			"Search includes displayed screen",
+			"Search skips displayed screen",
+			"Search includes all of displayed screen"
+		}
+	},

_service:tar_scm:less-633.tar.gz/os.c Added

@@ -0,0 +1,481 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Operating system dependent routines.
+ *
+ * Most of the stuff in here is based on Unix, but an attempt
+ * has been made to make things work on other operating systems.
+ * This will sometimes result in a loss of functionality, unless
+ * someone rewrites code specifically for the new operating system.
+ *
+ * The makefile provides defines to decide whether various
+ * Unix features are present.
+ */
+
+#include "less.h"
+#include <signal.h>
+#include <setjmp.h>
+#if MSDOS_COMPILER==WIN32C
+#include <windows.h>
+#endif
+#if HAVE_TIME_H
+#include <time.h>
+#endif
+#if HAVE_ERRNO_H
+#include <errno.h>
+#endif
+#if HAVE_VALUES_H
+#include <values.h>
+#endif
+
+#if defined(__APPLE__)
+#include <sys/utsname.h>
+#endif
+
+#if HAVE_POLL && !MSDOS_COMPILER
+#define USE_POLL 1
+static int use_poll = TRUE;
+#else
+#define USE_POLL 0
+#endif
+#if USE_POLL
+#include <poll.h>
+#endif
+
+/*
+ * BSD setjmp() saves (and longjmp() restores) the signal mask.
+ * This costs a system call or two per setjmp(), so if possible we clear the
+ * signal mask with sigsetmask(), and use _setjmp()/_longjmp() instead.
+ * On other systems, setjmp() doesn't affect the signal mask and so
+ * _setjmp() does not exist; we just use setjmp().
+ */
+#if HAVE__SETJMP && HAVE_SIGSETMASK
+#define SET_JUMP        _setjmp
+#define LONG_JUMP       _longjmp
+#else
+#define SET_JUMP        setjmp
+#define LONG_JUMP       longjmp
+#endif
+
+public int reading;
+public int waiting_for_data;
+public int consecutive_nulls = 0;
+
+/* Milliseconds to wait for data before displaying "waiting for data" message. */
+static int waiting_for_data_delay = 4000;
+static jmp_buf read_label;
+
+extern int sigs;
+extern int ignore_eoi;
+extern int exit_F_on_close;
+extern int follow_mode;
+extern int scanning_eof;
+extern char intr_char;
+#if !MSDOS_COMPILER
+extern int tty;
+#endif
+#if LESSTEST
+extern char *ttyin_name;
+#endif /*LESSTEST*/
+
+public void init_poll(void)
+{
+    char *delay = lgetenv("LESS_DATA_DELAY");
+    int idelay = (delay == NULL) ? 0 : atoi(delay);
+    if (idelay > 0)
+        waiting_for_data_delay = idelay;
+#if USE_POLL
+#if defined(__APPLE__)
+	/* In old versions of MacOS, poll() does not work with /dev/tty. */
+	struct utsname uts;
+	if (uname(&uts) < 0 || lstrtoi(uts.release, NULL, 10) < 20)
+		use_poll = FALSE;
+#endif
+#endif
+}
+
+#if USE_POLL
+/*
+ * Check whether data is available, either from a file/pipe or from the tty.
+ * Return READ_AGAIN if no data currently available, but caller should retry later.
+ * Return READ_INTR to abort F command (forw_loop).
+ * Return 0 if safe to read from fd.
+ */
+static int check_poll(int fd, int tty)
+{
+	struct pollfd poller2 = { { fd, POLLIN, 0 }, { tty, POLLIN, 0 } };
+	int timeout = (waiting_for_data && !(scanning_eof && follow_mode == FOLLOW_NAME)) ? -1 : waiting_for_data_delay;
+	poll(poller, 2, timeout);
+#if LESSTEST
+	if (ttyin_name == NULL) /* Check for ^X only on a real tty. */
+#endif /*LESSTEST*/
+	{
+		if (poller1.revents & POLLIN) 
+		{
+			LWCHAR ch = getchr();
+			if (ch == intr_char)
+				/* Break out of "waiting for data". */
+				return (READ_INTR);
+			ungetcc_back(ch);
+		}
+	}
+	if (ignore_eoi && exit_F_on_close && (poller0.revents & (POLLHUP|POLLIN)) == POLLHUP)
+		/* Break out of F loop on HUP due to --exit-follow-on-close. */
+		return (READ_INTR);
+	if ((poller0.revents & (POLLIN|POLLHUP|POLLERR)) == 0)
+		/* No data available; let caller take action, then try again. */
+		return (READ_AGAIN);
+	/* There is data (or HUP/ERR) available. Safe to call read() without blocking. */
+	return (0);
+}
+#endif /* USE_POLL */
+
+public int supports_ctrl_x(void)
+{
+#if USE_POLL
+	return (use_poll);
+#else
+	return (FALSE);
+#endif /* USE_POLL */
+}
+
+/*
+ * Like read() system call, but is deliberately interruptible.
+ * A call to intread() from a signal handler will interrupt
+ * any pending iread().
+ */
+public int iread(int fd, unsigned char *buf, unsigned int len)
+{
+	int n;
+
+start:
+#if MSDOS_COMPILER==WIN32C
+	if (ABORT_SIGS())
+		return (READ_INTR);
+#else
+#if MSDOS_COMPILER && MSDOS_COMPILER != DJGPPC
+	if (kbhit())
+	{
+		int c;
+		
+		c = getch();
+		if (c == '\003')
+			return (READ_INTR);
+		ungetch(c);
+	}
+#endif
+#endif
+	if (!reading && SET_JUMP(read_label))
+	{
+		/*
+		 * We jumped here from intread.
+		 */
+		reading = 0;
+#if HAVE_SIGPROCMASK
+		{
+		  sigset_t mask;
+		  sigemptyset(&mask);
+		  sigprocmask(SIG_SETMASK, &mask, NULL);
+		}
+#else
+#if HAVE_SIGSETMASK
+		sigsetmask(0);
+#else
+#ifdef _OSK
+		sigmask(~0);
+#endif
+#endif
+#endif
+		return (READ_INTR);
+	}
+

_service:tar_scm:less-633.tar.gz/output.c Added

@@ -0,0 +1,719 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * High level routines dealing with the output to the screen.
+ */
+
+#include "less.h"
+#if MSDOS_COMPILER==WIN32C
+#include "windows.h"
+#ifndef COMMON_LVB_UNDERSCORE
+#define COMMON_LVB_UNDERSCORE 0x8000
+#endif
+#endif
+
+public int errmsgs;    /* Count of messages displayed by error() */
+public int need_clr;
+public int final_attr;
+public int at_prompt;
+
+extern int sigs;
+extern int sc_width;
+extern int so_s_width, so_e_width;
+extern int screen_trashed;
+extern int is_tty;
+extern int oldbot;
+extern char intr_char;
+
+#if MSDOS_COMPILER==WIN32C || MSDOS_COMPILER==BORLANDC || MSDOS_COMPILER==DJGPPC
+extern int ctldisp;
+extern int nm_fg_color, nm_bg_color;
+extern int bo_fg_color, bo_bg_color;
+extern int ul_fg_color, ul_bg_color;
+extern int so_fg_color, so_bg_color;
+extern int bl_fg_color, bl_bg_color;
+extern int sgr_mode;
+#if MSDOS_COMPILER==WIN32C
+extern int vt_enabled;
+#endif
+#endif
+
+/*
+ * Display the line which is in the line buffer.
+ */
+public void put_line(void)
+{
+	int c;
+	int i;
+	int a;
+
+	if (ABORT_SIGS())
+	{
+		/*
+		 * Don't output if a signal is pending.
+		 */
+		screen_trashed = 1;
+		return;
+	}
+
+	final_attr = AT_NORMAL;
+
+	for (i = 0;  (c = gline(i, &a)) != '\0';  i++)
+	{
+		at_switch(a);
+		final_attr = a;
+		if (c == '\b')
+			putbs();
+		else
+			putchr(c);
+	}
+
+	at_exit();
+}
+
+static char obufOUTBUF_SIZE;
+static char *ob = obuf;
+static int outfd = 2; /* stderr */
+
+#if MSDOS_COMPILER==WIN32C || MSDOS_COMPILER==BORLANDC || MSDOS_COMPILER==DJGPPC
+static void win_flush(void)
+{
+	if (ctldisp != OPT_ONPLUS || (vt_enabled && sgr_mode))
+		WIN32textout(obuf, ob - obuf);
+	else
+	{
+		/*
+		 * Look for SGR escape sequences, and convert them
+		 * to color commands.  Replace bold, underline,
+		 * and italic escapes into colors specified via
+		 * the -D command-line option.
+		 */
+		char *anchor, *p, *p_next;
+		static int fg, fgi, bg, bgi;
+		static int at;
+		int f, b;
+#if MSDOS_COMPILER==WIN32C
+		/* Screen colors used by 3x and 4x SGR commands. */
+		static unsigned char screen_color = {
+			0, /* BLACK */
+			FOREGROUND_RED,
+			FOREGROUND_GREEN,
+			FOREGROUND_RED|FOREGROUND_GREEN,
+			FOREGROUND_BLUE, 
+			FOREGROUND_BLUE|FOREGROUND_RED,
+			FOREGROUND_BLUE|FOREGROUND_GREEN,
+			FOREGROUND_BLUE|FOREGROUND_GREEN|FOREGROUND_RED
+		};
+#else
+		static enum COLORS screen_color = {
+			BLACK, RED, GREEN, BROWN,
+			BLUE, MAGENTA, CYAN, LIGHTGRAY
+		};
+#endif
+
+		if (fg == 0 && bg == 0)
+		{
+			fg  = nm_fg_color & 7;
+			fgi = nm_fg_color & 8;
+			bg  = nm_bg_color & 7;
+			bgi = nm_bg_color & 8;
+		}
+		for (anchor = p_next = obuf;
+			 (p_next = memchr(p_next, ESC, ob - p_next)) != NULL; )
+		{
+			p = p_next;
+			if (p1 == '')  /* "ESC-" sequence */
+			{
+				if (p > anchor)
+				{
+					/*
+					 * If some chars seen since
+					 * the last escape sequence,
+					 * write them out to the screen.
+					 */
+					WIN32textout(anchor, p-anchor);
+					anchor = p;
+				}
+				p += 2;  /* Skip the "ESC-" */
+				if (is_ansi_end(*p))
+				{
+					/*
+					 * Handle null escape sequence
+					 * "ESCm", which restores
+					 * the normal color.
+					 */
+					p++;
+					anchor = p_next = p;
+					fg  = nm_fg_color & 7;
+					fgi = nm_fg_color & 8;
+					bg  = nm_bg_color & 7;
+					bgi = nm_bg_color & 8;
+					at  = 0;
+					WIN32setcolors(nm_fg_color, nm_bg_color);
+					continue;
+				}
+				p_next = p;
+				at &= ~32;
+
+				/*
+				 * Select foreground/background colors
+				 * based on the escape sequence. 
+				 */
+				while (!is_ansi_end(*p))
+				{
+					char *q;
+					long code = strtol(p, &q, 10);
+
+					if (*q == '\0')
+					{
+						/*
+						 * Incomplete sequence.
+						 * Leave it unprocessed
+						 * in the buffer.
+						 */
+						int slop = (int) (q - anchor);
+						/* {{ strcpy args overlap! }} */
+						strcpy(obuf, anchor);
+						ob = &obufslop;
+						return;
+					}
+
+					if (q == p ||
+						code > 49 || code < 0 ||
+						(!is_ansi_end(*q) && *q != ';'))
+					{
+						p_next = q;
+						break;
+					}
+					if (*q == ';')
+					{
+						q++;
+						at |= 32;

_service:tar_scm:less-633.tar.gz/pattern.c Added

@@ -0,0 +1,491 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+/*
+ * Routines to do pattern matching.
+ */
+
+#include "less.h"
+
+extern int caseless;
+extern int is_caseless;
+extern int utf_mode;
+
+/*
+ * Compile a search pattern, for future use by match_pattern.
+ */
+static int compile_pattern2(char *pattern, int search_type, PATTERN_TYPE *comp_pattern, int show_error)
+{
+	if (search_type & SRCH_NO_REGEX)
+		return (0);
+  {
+#if HAVE_GNU_REGEX
+	struct re_pattern_buffer *comp = (struct re_pattern_buffer *)
+		ecalloc(1, sizeof(struct re_pattern_buffer));
+	re_set_syntax(RE_SYNTAX_POSIX_EXTENDED);
+	if (re_compile_pattern(pattern, strlen(pattern), comp))
+	{
+		free(comp);
+		if (show_error)
+			error("Invalid pattern", NULL_PARG);
+		return (-1);
+	}
+	if (*comp_pattern != NULL)
+	{
+		regfree(*comp_pattern);
+		free(*comp_pattern);
+	}
+	*comp_pattern = comp;
+#endif
+#if HAVE_POSIX_REGCOMP
+	regex_t *comp = (regex_t *) ecalloc(1, sizeof(regex_t));
+	if (regcomp(comp, pattern, REGCOMP_FLAG | (is_caseless ? REG_ICASE : 0)))
+	{
+		free(comp);
+		if (show_error)
+			error("Invalid pattern", NULL_PARG);
+		return (-1);
+	}
+	if (*comp_pattern != NULL)
+	{
+		regfree(*comp_pattern);
+		free(*comp_pattern);
+	}
+	*comp_pattern = comp;
+#endif
+#if HAVE_PCRE
+	constant char *errstring;
+	int erroffset;
+	PARG parg;
+	pcre *comp = pcre_compile(pattern,
+			((utf_mode) ? PCRE_UTF8 | PCRE_NO_UTF8_CHECK : 0) |
+			(is_caseless ? PCRE_CASELESS : 0),
+			&errstring, &erroffset, NULL);
+	if (comp == NULL)
+	{
+		parg.p_string = (char *) errstring;
+		if (show_error)
+			error("%s", &parg);
+		return (-1);
+	}
+	*comp_pattern = comp;
+#endif
+#if HAVE_PCRE2
+	int errcode;
+	PCRE2_SIZE erroffset;
+	PARG parg;
+	pcre2_code *comp = pcre2_compile((PCRE2_SPTR)pattern, strlen(pattern),
+			(is_caseless ? PCRE2_CASELESS : 0),
+			&errcode, &erroffset, NULL);
+	if (comp == NULL)
+	{
+		if (show_error)
+		{
+			char msg160;
+			pcre2_get_error_message(errcode, (PCRE2_UCHAR*)msg, sizeof(msg));
+			parg.p_string = msg;
+			error("%s", &parg);
+		}
+		return (-1);
+	}
+	*comp_pattern = comp;
+#endif
+#if HAVE_RE_COMP
+	PARG parg;
+	if ((parg.p_string = re_comp(pattern)) != NULL)
+	{
+		if (show_error)
+			error("%s", &parg);
+		return (-1);
+	}
+	*comp_pattern = 1;
+#endif
+#if HAVE_REGCMP
+	char *comp;
+	if ((comp = regcmp(pattern, 0)) == NULL)
+	{
+		if (show_error)
+			error("Invalid pattern", NULL_PARG);
+		return (-1);
+	}
+	if (comp_pattern != NULL)
+		free(*comp_pattern);
+	*comp_pattern = comp;
+#endif
+#if HAVE_V8_REGCOMP
+	struct regexp *comp;
+	reg_show_error = show_error;
+	comp = regcomp(pattern);
+	reg_show_error = 1;
+	if (comp == NULL)
+	{
+		/*
+		 * regcomp has already printed an error message 
+		 * via regerror().
+		 */
+		return (-1);
+	}
+	if (*comp_pattern != NULL)
+		free(*comp_pattern);
+	*comp_pattern = comp;
+#endif
+  }
+	return (0);
+}
+
+/*
+ * Like compile_pattern2, but convert the pattern to lowercase if necessary.
+ */
+public int compile_pattern(char *pattern, int search_type, int show_error, PATTERN_TYPE *comp_pattern)
+{
+	char *cvt_pattern;
+	int result;
+
+	if (caseless != OPT_ONPLUS || (re_handles_caseless && !(search_type & SRCH_NO_REGEX)))
+		cvt_pattern = pattern;
+	else
+	{
+		cvt_pattern = (char*) ecalloc(1, cvt_length(strlen(pattern), CVT_TO_LC));
+		cvt_text(cvt_pattern, pattern, (int *)NULL, (int *)NULL, CVT_TO_LC);
+	}
+	result = compile_pattern2(cvt_pattern, search_type, comp_pattern, show_error);
+	if (cvt_pattern != pattern)
+		free(cvt_pattern);
+	return (result);
+}
+
+/*
+ * Forget that we have a compiled pattern.
+ */
+public void uncompile_pattern(PATTERN_TYPE *pattern)
+{
+#if HAVE_GNU_REGEX
+	if (*pattern != NULL)
+	{
+		regfree(*pattern);
+		free(*pattern);
+	}
+	*pattern = NULL;
+#endif
+#if HAVE_POSIX_REGCOMP
+	if (*pattern != NULL)
+	{
+		regfree(*pattern);
+		free(*pattern);
+	}
+	*pattern = NULL;
+#endif
+#if HAVE_PCRE
+	if (*pattern != NULL)
+		pcre_free(*pattern);
+	*pattern = NULL;
+#endif
+#if HAVE_PCRE2
+	if (*pattern != NULL)
+		pcre2_code_free(*pattern);
+	*pattern = NULL;
+#endif
+#if HAVE_RE_COMP
+	*pattern = 0;
+#endif
+#if HAVE_REGCMP
+	if (*pattern != NULL)
+		free(*pattern);

_service:tar_scm:less-633.tar.gz/pattern.h Added

@@ -0,0 +1,80 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+#if HAVE_GNU_REGEX
+#define __USE_GNU 1
+#include <regex.h>
+#define PATTERN_TYPE             struct re_pattern_buffer *
+#define SET_NULL_PATTERN(name)   name = NULL
+#endif
+
+/* ---- POSIX ---- */
+#if HAVE_POSIX_REGCOMP
+#include <regex.h>
+#ifdef REG_EXTENDED
+#define REGCOMP_FLAG             REG_EXTENDED
+#else
+#define REGCOMP_FLAG             0
+#endif
+#define PATTERN_TYPE             regex_t *
+#define SET_NULL_PATTERN(name)   name = NULL
+#define re_handles_caseless      TRUE
+#endif
+
+/* ---- PCRE ---- */
+#if HAVE_PCRE
+#include <pcre.h>
+#define PATTERN_TYPE             pcre *
+#define SET_NULL_PATTERN(name)   name = NULL
+#define re_handles_caseless      TRUE
+#endif
+
+/* ---- PCRE2 ---- */
+#if HAVE_PCRE2
+#define PCRE2_CODE_UNIT_WIDTH 8
+#include <pcre2.h>
+#define PATTERN_TYPE             pcre2_code *
+#define SET_NULL_PATTERN(name)   name = NULL
+#define re_handles_caseless      TRUE
+#endif
+
+/* ---- RE_COMP  ---- */
+#if HAVE_RE_COMP
+char *re_comp(char*);
+int re_exec(char*);
+#define PATTERN_TYPE             int
+#define SET_NULL_PATTERN(name)   name = 0
+#endif
+
+/* ---- REGCMP  ---- */
+#if HAVE_REGCMP
+char *regcmp(char*);
+char *regex(char**, char*);
+extern char *__loc1;
+#define PATTERN_TYPE             char **
+#define SET_NULL_PATTERN(name)   name = NULL
+#endif
+
+/* ---- REGCOMP  ---- */
+#if HAVE_V8_REGCOMP
+#include "regexp.h"
+extern int reg_show_error;
+#define PATTERN_TYPE             struct regexp *
+#define SET_NULL_PATTERN(name)   name = NULL
+#endif
+
+/* ---- NONE  ---- */
+#if NO_REGEX
+#define PATTERN_TYPE             void *
+#define SET_NULL_PATTERN(name)   
+#endif
+
+#ifndef re_handles_caseless
+#define re_handles_caseless      FALSE
+#endif

_service:tar_scm:less-633.tar.gz/pckeys.h Added

@@ -0,0 +1,33 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Definitions of keys on the PC.
+ * Special (non-ASCII) keys on the PC send a two-byte sequence,
+ * where the first byte is 0 and the second is as defined below.
+ */
+#define PCK_SHIFT_TAB           '\017'
+#define PCK_ALT_E               '\022'
+#define PCK_CAPS_LOCK           '\072'
+#define PCK_F1                  '\073'
+#define PCK_NUM_LOCK            '\105'
+#define PCK_HOME                '\107'
+#define PCK_UP                  '\110'
+#define PCK_PAGEUP              '\111'
+#define PCK_LEFT                '\113'
+#define PCK_RIGHT               '\115'
+#define PCK_END                 '\117'
+#define PCK_DOWN                '\120'
+#define PCK_PAGEDOWN            '\121'
+#define PCK_INSERT              '\122'
+#define PCK_DELETE              '\123'
+#define PCK_CTL_LEFT            '\163'
+#define PCK_CTL_RIGHT           '\164'
+#define PCK_CTL_DELETE          '\223'

_service:tar_scm:less-633.tar.gz/position.c Added

@@ -0,0 +1,238 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines dealing with the "position" table.
+ * This is a table which tells the position (in the input file) of the
+ * first char on each currently displayed line.
+ *
+ * {{ The position table is scrolled by moving all the entries.
+ *    Would be better to have a circular table 
+ *    and just change a couple of pointers. }}
+ */
+
+#include "less.h"
+#include "position.h"
+
+static POSITION *table = NULL;  /* The position table */
+static int table_size = 0;
+
+extern int sc_width, sc_height;
+extern int header_lines;
+
+/*
+ * Return the starting file position of a line displayed on the screen.
+ * The line may be specified as a line number relative to the top
+ * of the screen, but is usually one of these special cases:
+ *      the top (first) line on the screen
+ *      the second line on the screen
+ *      the bottom line on the screen
+ *      the line after the bottom line on the screen
+ */
+public POSITION position(int sindex)
+{
+	switch (sindex)
+	{
+	case BOTTOM:
+		sindex = sc_height - 2;
+		break;
+	case BOTTOM_PLUS_ONE:
+		sindex = sc_height - 1;
+		break;
+	case MIDDLE:
+		sindex = (sc_height - 1) / 2;
+		break;
+	}
+	return (tablesindex);
+}
+
+/*
+ * Add a new file position to the bottom of the position table.
+ */
+public void add_forw_pos(POSITION pos)
+{
+	int i;
+
+	/*
+	 * Scroll the position table up.
+	 */
+	for (i = 1;  i < sc_height;  i++)
+		tablei-1 = tablei;
+	tablesc_height - 1 = pos;
+}
+
+/*
+ * Add a new file position to the top of the position table.
+ */
+public void add_back_pos(POSITION pos)
+{
+	int i;
+
+	/*
+	 * Scroll the position table down.
+	 */
+	for (i = sc_height - 1;  i > 0;  i--)
+		tablei = tablei-1;
+	table0 = pos;
+}
+
+/*
+ * Initialize the position table, done whenever we clear the screen.
+ */
+public void pos_clear(void)
+{
+	int i;
+
+	for (i = 0;  i < sc_height;  i++)
+		tablei = NULL_POSITION;
+}
+
+/*
+ * Allocate or reallocate the position table.
+ */
+public void pos_init(void)
+{
+	struct scrpos scrpos;
+
+	if (sc_height <= table_size)
+		return;
+	/*
+	 * If we already have a table, remember the first line in it
+	 * before we free it, so we can copy that line to the new table.
+	 */
+	if (table != NULL)
+	{
+		get_scrpos(&scrpos, TOP);
+		free((char*)table);
+	} else
+		scrpos.pos = NULL_POSITION;
+	table = (POSITION *) ecalloc(sc_height, sizeof(POSITION));
+	table_size = sc_height;
+	pos_clear();
+	if (scrpos.pos != NULL_POSITION)
+		tablescrpos.ln-1 = scrpos.pos;
+}
+
+/*
+ * See if the byte at a specified position is currently on the screen.
+ * Check the position table to see if the position falls within its range.
+ * Return the position table entry if found, -1 if not.
+ */
+public int onscreen(POSITION pos)
+{
+	int i;
+
+	if (pos < table0)
+		return (-1);
+	for (i = 1;  i < sc_height;  i++)
+		if (pos < tablei)
+			return (i-1);
+	return (-1);
+}
+
+/*
+ * See if the entire screen is empty.
+ */
+public int empty_screen(void)
+{
+	return (empty_lines(0, sc_height-1));
+}
+
+public int empty_lines(int s, int e)
+{
+	int i;
+
+	for (i = s;  i <= e;  i++)
+		if (tablei != NULL_POSITION && tablei != 0)
+			return (0);
+	return (1);
+}
+
+/*
+ * Get the current screen position.
+ * The screen position consists of both a file position and
+ * a screen line number where the file position is placed on the screen.
+ * Normally the screen line number is 0, but if we are positioned
+ * such that the top few lines are empty, we may have to set
+ * the screen line to a number > 0.
+ */
+public void get_scrpos(struct scrpos *scrpos, int where)
+{
+	int i;
+	int dir;
+	int last;
+
+	switch (where)
+	{
+	case TOP:
+		i = 0; dir = +1; last = sc_height-2;
+		break;
+	case BOTTOM: case BOTTOM_PLUS_ONE:
+		i = sc_height-2; dir = -1; last = 0;
+		break;
+	default:
+		i = where;
+		if (tablei == NULL_POSITION) {
+			scrpos->pos = NULL_POSITION;
+			return;
+		}
+		/* Values of dir and last don't matter after this. */
+		break;
+	}
+
+	/*
+	 * Find the first line on the screen which has something on it,
+	 * and return the screen line number and the file position.
+	 */
+	for (;; i += dir)
+	{
+		if (tablei != NULL_POSITION)
+		{
+			scrpos->ln = i+1;
+			scrpos->pos = tablei;

_service:tar_scm:less-633.tar.gz/position.h Added

_service:tar_scm:less-633.tar.gz/prompt.c Added

@@ -0,0 +1,556 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Prompting and other messages.
+ * There are three flavors of prompts, SHORT, MEDIUM and LONG,
+ * selected by the -m/-M options.
+ * There is also the "equals message", printed by the = command.
+ * A prompt is a message composed of various pieces, such as the 
+ * name of the file being viewed, the percentage into the file, etc.
+ */
+
+#include "less.h"
+#include "position.h"
+
+extern int pr_type;
+extern int new_file;
+extern int sc_width;
+extern int so_s_width, so_e_width;
+extern int linenums;
+extern int hshift;
+extern int sc_height;
+extern int jump_sline;
+extern int less_is_more;
+extern int header_lines;
+extern IFILE curr_ifile;
+#if EDITOR
+extern char *editor;
+extern char *editproto;
+#endif
+
+/*
+ * Prototypes for the three flavors of prompts.
+ * These strings are expanded by pr_expand().
+ */
+static constant char s_proto =
+  "?n?f%f .?m(%T %i of %m) ..?e(END) ?x- Next\\: %x..%t";
+static constant char m_proto =
+  "?n?f%f .?m(%T %i of %m) ..?e(END) ?x- Next\\: %x.:?pB%pB\\%:byte %bB?s/%s...%t";
+static constant char M_proto =
+  "?f%f .?n?m(%T %i of %m) ..?ltlines %lt-%lb?L/%L. :byte %bB?s/%s. .?e(END) ?x- Next\\: %x.:?pB%pB\\%..%t";
+static constant char e_proto =
+  "?f%f .?m(%T %i of %m) .?ltlines %lt-%lb?L/%L. .byte %bB?s/%s. ?e(END) :?pB%pB\\%..%t";
+static constant char h_proto =
+  "HELP -- ?eEND -- Press g to see it again:Press RETURN for more., or q when done";
+static constant char w_proto =
+  "Waiting for data";
+static constant char more_proto =
+  "--More--(?eEND ?x- Next\\: %x.:?pB%pB\\%:byte %bB?s/%s...%t)";
+
+public char *prproto3;
+public char constant *eqproto = e_proto;
+public char constant *hproto = h_proto;
+public char constant *wproto = w_proto;
+
+static char messagePROMPT_SIZE;
+static char *mp;
+
+/*
+ * Initialize the prompt prototype strings.
+ */
+public void init_prompt(void)
+{
+	prproto0 = save(s_proto);
+	prproto1 = save(less_is_more ? more_proto : m_proto);
+	prproto2 = save(M_proto);
+	eqproto = save(e_proto);
+	hproto = save(h_proto);
+	wproto = save(w_proto);
+}
+
+/*
+ * Append a string to the end of the message.
+ */
+static void ap_str(char *s)
+{
+	int len;
+
+	len = (int) strlen(s);
+	if (mp + len >= message + PROMPT_SIZE)
+		len = (int) (message + PROMPT_SIZE - mp - 1);
+	strncpy(mp, s, len);
+	mp += len;
+	*mp = '\0';
+}
+
+/*
+ * Append a character to the end of the message.
+ */
+static void ap_char(char c)
+{
+	char buf2;
+
+	buf0 = c;
+	buf1 = '\0';
+	ap_str(buf);
+}
+
+/*
+ * Append a POSITION (as a decimal integer) to the end of the message.
+ */
+static void ap_pos(POSITION pos)
+{
+	char bufINT_STRLEN_BOUND(pos) + 2;
+
+	postoa(pos, buf, 10);
+	ap_str(buf);
+}
+
+/*
+ * Append a line number to the end of the message.
+ */
+static void ap_linenum(LINENUM linenum)
+{
+	char bufINT_STRLEN_BOUND(linenum) + 2;
+
+	linenumtoa(linenum, buf, 10);
+	ap_str(buf);
+}
+
+/*
+ * Append an integer to the end of the message.
+ */
+static void ap_int(int num)
+{
+	char bufINT_STRLEN_BOUND(num) + 2;
+
+	inttoa(num, buf, 10);
+	ap_str(buf);
+}
+
+/*
+ * Append a question mark to the end of the message.
+ */
+static void ap_quest(void)
+{
+	ap_str("?");
+}
+
+/*
+ * Return the "current" byte offset in the file.
+ */
+static POSITION curr_byte(int where)
+{
+	POSITION pos;
+
+	pos = position(where);
+	while (pos == NULL_POSITION && where >= 0 && where < sc_height-1)
+		pos = position(++where);
+	if (pos == NULL_POSITION)
+		pos = ch_length();
+	return (pos);
+}
+
+/*
+ * Return the value of a prototype conditional.
+ * A prototype string may include conditionals which consist of a 
+ * question mark followed by a single letter.
+ * Here we decode that letter and return the appropriate boolean value.
+ */
+static int cond(char c, int where)
+{
+	POSITION len;
+
+	switch (c)
+	{
+	case 'a': /* Anything in the message yet? */
+		return (mp > message);
+	case 'b': /* Current byte offset known? */
+		return (curr_byte(where) != NULL_POSITION);
+	case 'c':
+		return (hshift != 0);
+	case 'e': /* At end of file? */
+		return (eof_displayed());
+	case 'f': /* Filename known? */
+	case 'g':
+		return (strcmp(get_filename(curr_ifile), "-") != 0);
+	case 'l': /* Line number known? */
+	case 'd': /* Same as l */
+		if (!linenums)
+			return 0;
+		return (currline(where) != 0);
+	case 'L': /* Final line number known? */
+	case 'D': /* Final page number known? */
+		return (linenums && ch_length() != NULL_POSITION);
+	case 'm': /* More than one file? */
+#if TAGS
+		return (ntags() ? (ntags() > 1) : (nifile() > 1));
+#else
+		return (nifile() > 1);
+#endif
+	case 'n': /* First prompt in a new file? */

_service:tar_scm:less-633.tar.gz/regexp.c Added

@@ -0,0 +1,1253 @@
+/*
+ * regcomp and regexec -- regsub and regerror are elsewhere
+ *
+ *	Copyright (c) 1986 by University of Toronto.
+ *	Written by Henry Spencer.  Not derived from licensed software.
+ *
+ *	Permission is granted to anyone to use this software for any
+ *	purpose on any computer system, and to redistribute it freely,
+ *	subject to the following restrictions:
+ *
+ *	1. The author is not responsible for the consequences of use of
+ *		this software, no matter how awful, even if they arise
+ *		from defects in it.
+ *
+ *	2. The origin of this software must not be misrepresented, either
+ *		by explicit claim or by omission.
+ *
+ *	3. Altered versions must be plainly marked as such, and must not
+ *		be misrepresented as being the original software.
+ *
+ * Beware that some of this code is subtly aware of the way operator
+ * precedence is structured in regular expressions.  Serious changes in
+ * regular-expression syntax might require a total rethink.
+ *
+ * *** NOTE: this code has been altered slightly for use in Tcl. ***
+ * Slightly modified by David MacKenzie to undo most of the changes for TCL.
+ * Added regexec2 with notbol parameter. -- 4/19/99 Mark Nudelman
+ */
+
+#include "less.h"
+#if HAVE_STDIO_H
+#include <stdio.h>
+#endif
+#if HAVE_STDLIB_H
+#include <stdlib.h>
+#endif
+#if HAVE_STRING_H
+#include <string.h>
+#endif
+#include "regexp.h"
+
+/*
+ * The "internal use only" fields in regexp.h are present to pass info from
+ * compile to execute that permits the execute phase to run lots faster on
+ * simple cases.  They are:
+ *
+ * regstart	char that must begin a match; '\0' if none obvious
+ * reganch	is the match anchored (at beginning-of-line only)?
+ * regmust	string (pointer into program) that match must include, or NULL
+ * regmlen	length of regmust string
+ *
+ * Regstart and reganch permit very fast decisions on suitable starting points
+ * for a match, cutting down the work a lot.  Regmust permits fast rejection
+ * of lines that cannot possibly match.  The regmust tests are costly enough
+ * that regcomp() supplies a regmust only if the r.e. contains something
+ * potentially expensive (at present, the only such thing detected is * or +
+ * at the start of the r.e., which can involve a lot of backup).  Regmlen is
+ * supplied because the test in regexec() needs it and regcomp() is
+ * computing it anyway.
+ */
+
+/*
+ * Structure for regexp "program".  This is essentially a linear encoding
+ * of a nondeterministic finite-state machine (aka syntax charts or
+ * "railroad normal form" in parsing technology).  Each node is an opcode
+ * plus a "next" pointer, possibly plus an operand.  "Next" pointers of
+ * all nodes except BRANCH implement concatenation; a "next" pointer with
+ * a BRANCH on both ends of it is connecting two alternatives.  (Here we
+ * have one of the subtle syntax dependencies:  an individual BRANCH (as
+ * opposed to a collection of them) is never concatenated with anything
+ * because of operator precedence.)  The operand of some types of node is
+ * a literal string; for others, it is a node leading into a sub-FSM.  In
+ * particular, the operand of a BRANCH node is the first node of the branch.
+ * (NB this is *not* a tree structure:  the tail of the branch connects
+ * to the thing following the set of BRANCHes.)  The opcodes are:
+ */
+
+/* definition	number	opnd?	meaning */
+#undef EOL
+#define	END	0	/* no	End of program. */
+#define	BOL	1	/* no	Match "" at beginning of line. */
+#define	EOL	2	/* no	Match "" at end of line. */
+#define	ANY	3	/* no	Match any one character. */
+#define	ANYOF	4	/* str	Match any character in this string. */
+#define	ANYBUT	5	/* str	Match any character not in this string. */
+#define	BRANCH	6	/* node	Match this alternative, or the next... */
+#define	BACK	7	/* no	Match "", "next" ptr points backward. */
+#define	EXACTLY	8	/* str	Match this string. */
+#define	NOTHING	9	/* no	Match empty string. */
+#define	STAR	10	/* node	Match this (simple) thing 0 or more times. */
+#define	PLUS	11	/* node	Match this (simple) thing 1 or more times. */
+#define	OPEN	20	/* no	Mark this point in input as start of #n. */
+			/*	OPEN+1 is number 1, etc. */
+#define	CLOSE	30	/* no	Analogous to OPEN. */
+
+/*
+ * Opcode notes:
+ *
+ * BRANCH	The set of branches constituting a single choice are hooked
+ *		together with their "next" pointers, since precedence prevents
+ *		anything being concatenated to any individual branch.  The
+ *		"next" pointer of the last BRANCH in a choice points to the
+ *		thing following the whole choice.  This is also where the
+ *		final "next" pointer of each individual branch points; each
+ *		branch starts with the operand node of a BRANCH node.
+ *
+ * BACK		Normal "next" pointers all implicitly point forward; BACK
+ *		exists to make loop structures possible.
+ *
+ * STAR,PLUS	'?', and complex '*' and '+', are implemented as circular
+ *		BRANCH structures using BACK.  Simple cases (one character
+ *		per match) are implemented with STAR and PLUS for speed
+ *		and to minimize recursive plunges.
+ *
+ * OPEN,CLOSE	...are numbered at compile time.
+ */
+
+/*
+ * A node is one char of opcode followed by two chars of "next" pointer.
+ * "Next" pointers are stored as two 8-bit pieces, high order first.  The
+ * value is a positive offset from the opcode of the node containing it.
+ * An operand, if any, simply follows the node.  (Note that much of the
+ * code generation knows about this implicit relationship.)
+ *
+ * Using two bytes for the "next" pointer is vast overkill for most things,
+ * but allows patterns to get big without disasters.
+ */
+#define	OP(p)	(*(p))
+#define	NEXT(p)	(((*((p)+1)&0377)<<8) + (*((p)+2)&0377))
+#define	OPERAND(p)	((p) + 3)
+
+/*
+ * See regmagic.h for one further detail of program structure.
+ */
+
+
+/*
+ * Utility definitions.
+ */
+#ifndef CHARBITS
+#define	UCHARAT(p)	((int)*(unsigned char *)(p))
+#else
+#define	UCHARAT(p)	((int)*(p)&CHARBITS)
+#endif
+
+#define	FAIL(m)	{ regerror(m); return(NULL); }
+#define	ISMULT(c)	((c) == '*' || (c) == '+' || (c) == '?')
+#define	META	"^$.()|?+*\\"
+
+/*
+ * Flags to be passed up and down.
+ */
+#define	HASWIDTH	01	/* Known never to match null string. */
+#define	SIMPLE		02	/* Simple enough to be STAR/PLUS operand. */
+#define	SPSTART		04	/* Starts with * or +. */
+#define	WORST		0	/* Worst case. */
+
+/*
+ * Global work variables for regcomp().
+ */
+static char *regparse;		/* Input-scan pointer. */
+static int regnpar;		/* () count. */
+static char regdummy;
+static char *regcode;		/* Code-emit pointer; &regdummy = don't. */
+static long regsize;		/* Code size. */
+
+/*
+ * The first byte of the regexp internal "program" is actually this magic
+ * number; the start node begins in the second byte.
+ */
+#define	MAGIC	0234
+
+
+/*
+ * Forward declarations for regcomp()'s friends.
+ */
+#ifndef STATIC
+#define	STATIC	static
+#endif
+STATIC char *reg();
+STATIC char *regbranch();
+STATIC char *regpiece();
+STATIC char *regatom();
+STATIC char *regnode();
+STATIC char *regnext();
+STATIC void regc();
+STATIC void reginsert();
+STATIC void regtail();
+STATIC void regoptail();
+#ifdef STRCSPN
+STATIC int strcspn();
+#endif
+
+/*
+ - regcomp - compile a regular expression into internal code
+ *
+ * We can't allocate space until we know how big the compiled form will be,
+ * but we can't compile it (and thus know how big it is) until we've got a
+ * place to put the code.  So we cheat:  we compile it twice, once with code

_service:tar_scm:less-633.tar.gz/regexp.h Added

@@ -0,0 +1,34 @@
+/*
+ * Definitions etc. for regexp(3) routines.
+ *
+ * Caveat:  this is V8 regexp(3) actually, a reimplementation thereof,
+ * not the System V one.
+ */
+
+#ifndef _REGEXP
+#define _REGEXP 1
+
+#define NSUBEXP  10
+typedef struct regexp {
+        char *startpNSUBEXP;
+        char *endpNSUBEXP;
+        char regstart;          /* Internal use only. */
+        char reganch;           /* Internal use only. */
+        char *regmust;          /* Internal use only. */
+        int regmlen;            /* Internal use only. */
+        char program1;        /* Unwarranted chumminess with compiler. */
+} regexp;
+
+#if defined(__STDC__) || defined(__cplusplus)
+#   define _ANSI_ARGS_(x)       x
+#else
+#   define _ANSI_ARGS_(x)       ()
+#endif
+
+extern regexp *regcomp _ANSI_ARGS_((char *exp));
+extern int regexec _ANSI_ARGS_((regexp *prog, char *string));
+extern int regexec2 _ANSI_ARGS_((regexp *prog, char *string, int notbol));
+extern void regsub _ANSI_ARGS_((regexp *prog, char *source, char *dest));
+extern void regerror _ANSI_ARGS_((char *msg));
+
+#endif /* REGEXP */

_service:tar_scm:less-633.tar.gz/screen.c Added

@@ -0,0 +1,2995 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines which deal with the characteristics of the terminal.
+ * Uses termcap to be as terminal-independent as possible.
+ */
+
+#include "less.h"
+#include "cmd.h"
+
+#if MSDOS_COMPILER
+#include "pckeys.h"
+#if MSDOS_COMPILER==MSOFTC
+#include <graph.h>
+#else
+#if MSDOS_COMPILER==BORLANDC || MSDOS_COMPILER==DJGPPC
+#include <conio.h>
+#if MSDOS_COMPILER==DJGPPC
+#include <pc.h>
+extern int fd0;
+#endif
+#else
+#if MSDOS_COMPILER==WIN32C
+#include <windows.h>
+#endif
+#endif
+#endif
+#include <time.h>
+
+#ifndef FOREGROUND_BLUE
+#define FOREGROUND_BLUE      0x0001	
+#endif
+#ifndef FOREGROUND_GREEN
+#define FOREGROUND_GREEN     0x0002	
+#endif
+#ifndef FOREGROUND_RED
+#define FOREGROUND_RED       0x0004	
+#endif
+#ifndef FOREGROUND_INTENSITY
+#define FOREGROUND_INTENSITY 0x0008
+#endif
+
+#else
+
+#if HAVE_SYS_IOCTL_H
+#include <sys/ioctl.h>
+#endif
+
+#if HAVE_TERMIOS_H && HAVE_TERMIOS_FUNCS
+#include <termios.h>
+#else
+#if HAVE_TERMIO_H
+#include <termio.h>
+#else
+#if HAVE_SGSTAT_H
+#include <sgstat.h>
+#else
+#include <sgtty.h>
+#endif
+#endif
+#endif
+
+#if HAVE_NCURSESW_TERMCAP_H
+#include <ncursesw/termcap.h>
+#else
+#if HAVE_NCURSES_TERMCAP_H
+#include <ncurses/termcap.h>
+#else
+#if HAVE_TERMCAP_H
+#include <termcap.h>
+#endif
+#endif
+#endif
+#ifdef _OSK
+#include <signal.h>
+#endif
+#if OS2
+#include <sys/signal.h>
+#include "pckeys.h"
+#endif
+#if HAVE_SYS_STREAM_H
+#include <sys/stream.h>
+#endif
+#if HAVE_SYS_PTEM_H
+#include <sys/ptem.h>
+#endif
+
+#endif /* MSDOS_COMPILER */
+
+/*
+ * Check for broken termios package that forces you to manually
+ * set the line discipline.
+ */
+#ifdef __ultrix__
+#define MUST_SET_LINE_DISCIPLINE 1
+#else
+#define MUST_SET_LINE_DISCIPLINE 0
+#endif
+
+#if OS2
+#define DEFAULT_TERM            "ansi"
+static char *windowid;
+#else
+#define DEFAULT_TERM            "unknown"
+#endif
+
+#if MSDOS_COMPILER==MSOFTC
+static int videopages;
+static long msec_loops;
+static int flash_created = 0;
+#define SET_FG_COLOR(fg)        _settextcolor(fg)
+#define SET_BG_COLOR(bg)        _setbkcolor(bg)
+#define SETCOLORS(fg,bg)        { SET_FG_COLOR(fg); SET_BG_COLOR(bg); }
+#endif
+
+#if MSDOS_COMPILER==BORLANDC
+static unsigned short *whitescreen;
+static int flash_created = 0;
+#endif
+#if MSDOS_COMPILER==BORLANDC || MSDOS_COMPILER==DJGPPC
+#define _settextposition(y,x)   gotoxy(x,y)
+#define _clearscreen(m)         clrscr()
+#define _outtext(s)             cputs(s)
+#define SET_FG_COLOR(fg)        textcolor(fg)
+#define SET_BG_COLOR(bg)        textbackground(bg)
+#define SETCOLORS(fg,bg)        { SET_FG_COLOR(fg); SET_BG_COLOR(bg); }
+extern int sc_height;
+#endif
+
+#if MSDOS_COMPILER==WIN32C
+#define UTF8_MAX_LENGTH 4
+struct keyRecord
+{
+	WCHAR unicode;
+	int ascii;
+	int scan;
+} currentKey;
+
+static int keyCount = 0;
+static WORD curr_attr;
+static int pending_scancode = 0;
+static char x11mousebuf = "M???";    /* Mouse report, after ESC */
+static int x11mousePos, x11mouseCount;
+
+static HANDLE con_out_save = INVALID_HANDLE_VALUE; /* previous console */
+static HANDLE con_out_ours = INVALID_HANDLE_VALUE; /* our own */
+HANDLE con_out = INVALID_HANDLE_VALUE;             /* current console */
+
+extern int utf_mode;
+extern int quitting;
+static void win32_init_term();
+static void win32_deinit_term();
+
+#ifndef ENABLE_VIRTUAL_TERMINAL_PROCESSING
+#define ENABLE_VIRTUAL_TERMINAL_PROCESSING 4
+#endif
+
+#define FG_COLORS       (FOREGROUND_RED | FOREGROUND_GREEN | FOREGROUND_BLUE | FOREGROUND_INTENSITY)
+#define BG_COLORS       (BACKGROUND_RED | BACKGROUND_GREEN | BACKGROUND_BLUE | BACKGROUND_INTENSITY)
+#define MAKEATTR(fg,bg)         ((WORD)((fg)|((bg)<<4)))
+#define APPLY_COLORS()          { if (SetConsoleTextAttribute(con_out, curr_attr) == 0) \
+                                  error("SETCOLORS failed", NULL_PARG); }
+#define SET_FG_COLOR(fg)        { curr_attr |= (fg); APPLY_COLORS(); }
+#define SET_BG_COLOR(bg)        { curr_attr |= ((bg)<<4); APPLY_COLORS(); }
+#define SETCOLORS(fg,bg)        { curr_attr = MAKEATTR(fg,bg); APPLY_COLORS(); }
+#endif
+
+#if MSDOS_COMPILER
+public int nm_fg_color;         /* Color of normal text */
+public int nm_bg_color;
+public int bo_fg_color;         /* Color of bold text */
+public int bo_bg_color;
+public int ul_fg_color;         /* Color of underlined text */
+public int ul_bg_color;
+public int so_fg_color;         /* Color of standout text */
+public int so_bg_color;
+public int bl_fg_color;         /* Color of blinking text */
+public int bl_bg_color;
+static int sy_fg_color;         /* Color of system text (before less) */
+static int sy_bg_color;
+public int sgr_mode;            /* Honor ANSI sequences rather than using above */
+#if MSDOS_COMPILER==WIN32C
+static DWORD init_output_mode;  /* The initial console output mode */
+public int vt_enabled = -1;     /* Is virtual terminal processing available? */
+#endif
+#else
+
+/*
+ * Strings passed to tputs() to do various terminal functions.
+ */
+static char

_service:tar_scm:less-633.tar.gz/scrsize.c Added

@@ -0,0 +1,103 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+/*
+ * This program is used to determine the screen dimensions on OS/2 systems.
+ * Adapted from code written by Kyosuke Tokoro (NBG01720@nifty.ne.jp).
+ */
+
+/*
+ * When I wrote this routine, I consulted some part of the source code 
+ * of the xwininfo utility by X Consortium.
+ *
+ * Copyright (c) 1987, X Consortium
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to
+ * deal in the Software without restriction, including without limitation the
+ * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
+ * sell copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+ * X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
+ * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+ * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ *
+ * Except as contained in this notice, the name of the X Consortium shall not
+ * be used in advertising or otherwise to promote the sale, use or other
+ * dealings in this Software without prior written authorization from the X
+ * Consortium.
+ */
+#include <X11/Xlib.h>
+#include <X11/Xutil.h>
+#include <stdlib.h>
+#include <stdio.h>
+
+static int get_winsize(dpy, window, p_width, p_height)
+	Display *dpy;
+	Window window;
+	int *p_width;
+	int *p_height;
+{
+	XWindowAttributes win_attributes;
+	XSizeHints hints;
+	long longjunk;
+
+	if (!XGetWindowAttributes(dpy, window, &win_attributes))
+		return 1;
+	if (!XGetWMNormalHints(dpy, window, &hints, &longjunk))
+		return 1;
+	if (!(hints.flags & PResizeInc))
+		return 1;
+	if (hints.width_inc == 0 || hints.height_inc == 0)
+		return 1;
+	if (!(hints.flags & (PBaseSize|PMinSize)))
+		return 1;
+	if (hints.flags & PBaseSize)
+	{
+		win_attributes.width -= hints.base_width;
+		win_attributes.height -= hints.base_height;
+	} else
+	{
+		win_attributes.width -= hints.min_width;
+		win_attributes.height -= hints.min_height;
+	}
+	*p_width = win_attributes.width / hints.width_inc;
+	*p_height = win_attributes.height / hints.height_inc;
+	return 0;
+}
+
+int main(argc, argv)
+	int argc;
+	char *argv;
+{
+	char *cp;
+	Display *dpy;
+	int size2;
+
+	_scrsize(size);
+	cp = getenv("WINDOWID");
+	if (cp != NULL)
+	{
+		dpy = XOpenDisplay(NULL);
+		if (dpy != NULL)
+		{
+			get_winsize(dpy, (Window) atol(cp), &size0, &size1);
+			XCloseDisplay(dpy);
+		}
+	}
+	printf("%i %i\n", size0, size1);
+	return (0);
+}

_service:tar_scm:less-633.tar.gz/search.c Added

@@ -0,0 +1,1866 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines to search a file for a pattern.
+ */
+
+#include "less.h"
+#include "position.h"
+#include "charset.h"
+
+#define MINPOS(a,b)     (((a) < (b)) ? (a) : (b))
+#define MAXPOS(a,b)     (((a) > (b)) ? (a) : (b))
+
+extern int sigs;
+extern int how_search;
+extern int caseless;
+extern int linenums;
+extern int sc_height;
+extern int jump_sline;
+extern int bs_mode;
+extern int proc_backspace;
+extern int proc_return;
+extern int ctldisp;
+extern int status_col;
+extern void *ml_search;
+extern POSITION start_attnpos;
+extern POSITION end_attnpos;
+extern int utf_mode;
+extern int screen_trashed;
+extern int sc_width;
+extern int sc_height;
+extern int hshift;
+extern int nosearch_headers;
+extern int header_lines;
+extern int header_cols;
+#if HILITE_SEARCH
+extern int hilite_search;
+extern int size_linebuf;
+extern int squished;
+extern int can_goto_line;
+static int hide_hilite;
+static POSITION prep_startpos;
+static POSITION prep_endpos;
+extern POSITION xxpos;
+
+/*
+ * Structures for maintaining a set of ranges for hilites and filtered-out
+ * lines. Each range is stored as a node within a red-black tree, and we
+ * try to extend existing ranges (without creating overlaps) rather than
+ * create new nodes if possible. We remember the last node found by a
+ * search for constant-time lookup if the next search is near enough to
+ * the previous. To aid that, we overlay a secondary doubly-linked list
+ * on top of the red-black tree so we can find the preceding/succeeding
+ * nodes also in constant time.
+ *
+ * Each node is allocated from a series of pools, each pool double the size
+ * of the previous (for amortised constant time allocation). Since our only
+ * tree operations are clear and node insertion, not node removal, we don't
+ * need to maintain a usage bitmap or freelist and can just return nodes
+ * from the pool in-order until capacity is reached.
+ */
+struct hilite
+{
+	POSITION hl_startpos;
+	POSITION hl_endpos;
+	int hl_attr;
+};
+struct hilite_node
+{
+	struct hilite_node *parent;
+	struct hilite_node *left;
+	struct hilite_node *right;
+	struct hilite_node *prev;
+	struct hilite_node *next;
+	int red;
+	struct hilite r;
+};
+struct hilite_storage
+{
+	int capacity;
+	int used;
+	struct hilite_storage *next;
+	struct hilite_node *nodes;
+};
+struct hilite_tree
+{
+	struct hilite_storage *first;
+	struct hilite_storage *current;
+	struct hilite_node *root;
+	struct hilite_node *lookaside;
+};
+#define HILITE_INITIALIZER() { NULL, NULL, NULL, NULL }
+#define HILITE_LOOKASIDE_STEPS 2
+
+static struct hilite_tree hilite_anchor = HILITE_INITIALIZER();
+static struct hilite_tree filter_anchor = HILITE_INITIALIZER();
+static struct pattern_info *filter_infos = NULL;
+
+#endif
+
+/*
+ * These are the static variables that represent the "remembered"
+ * search pattern and filter pattern.
+ */
+struct pattern_info {
+	PATTERN_TYPE compiled;
+	char* text;
+	int search_type;
+	int is_ucase_pattern;
+	struct pattern_info *next;
+};
+
+#if NO_REGEX
+#define info_compiled(info) ((void*)0)
+#else
+#define info_compiled(info) ((info)->compiled)
+#endif
+	
+static struct pattern_info search_info;
+public int is_caseless;
+
+/*
+ * Are there any uppercase letters in this string?
+ */
+static int is_ucase(char *str)
+{
+	char *str_end = str + strlen(str);
+	LWCHAR ch;
+
+	while (str < str_end)
+	{
+		ch = step_char(&str, +1, str_end);
+		if (IS_UPPER(ch))
+			return (1);
+	}
+	return (0);
+}
+
+/*
+ * Discard a saved pattern.
+ */
+static void clear_pattern(struct pattern_info *info)
+{
+	if (info->text != NULL)
+		free(info->text);
+	info->text = NULL;
+#if !NO_REGEX
+	uncompile_pattern(&info->compiled);
+#endif
+}
+
+/*
+ * Compile and save a search pattern.
+ */
+static int set_pattern(struct pattern_info *info, char *pattern, int search_type, int show_error)
+{
+	/*
+	 * Ignore case if -I is set OR
+	 * -i is set AND the pattern is all lowercase.
+	 */
+	info->is_ucase_pattern = (pattern == NULL) ? FALSE : is_ucase(pattern);
+	is_caseless = (info->is_ucase_pattern && caseless != OPT_ONPLUS) ? 0 : caseless;
+#if !NO_REGEX
+	if (pattern == NULL)
+		SET_NULL_PATTERN(info->compiled);
+	else if (compile_pattern(pattern, search_type, show_error, &info->compiled) < 0)
+		return -1;
+#endif
+	/* Pattern compiled successfully; save the text too. */
+	if (info->text != NULL)
+		free(info->text);
+	info->text = NULL;
+	if (pattern != NULL)
+	{
+		info->text = (char *) ecalloc(1, strlen(pattern)+1);
+		strcpy(info->text, pattern);
+	}
+	info->search_type = search_type;
+	return 0;
+}
+
+/*
+ * Initialize saved pattern to nothing.
+ */
+static void init_pattern(struct pattern_info *info)
+{
+	SET_NULL_PATTERN(info->compiled);
+	info->text = NULL;
+	info->search_type = 0;
+	info->next = NULL;
+}

_service:tar_scm:less-633.tar.gz/signal.c Added

@@ -0,0 +1,261 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines dealing with signals.
+ *
+ * A signal usually merely causes a bit to be set in the "signals" word.
+ * At some convenient time, the mainline code checks to see if any
+ * signals need processing by calling psignal().
+ * If we happen to be reading from a file in iread() at the time
+ * the signal is received, we call intread to interrupt the iread.
+ */
+
+#include "less.h"
+#include <signal.h>
+
+/*
+ * "sigs" contains bits indicating signals which need to be processed.
+ */
+public int sigs;
+
+extern int sc_width, sc_height;
+extern int screen_trashed;
+extern int lnloop;
+extern int linenums;
+extern int wscroll;
+extern int reading;
+extern int quit_on_intr;
+extern int secure;
+extern long jump_sline_fraction;
+
+/*
+ * Interrupt signal handler.
+ */
+#if MSDOS_COMPILER!=WIN32C
+	/* ARGSUSED*/
+static RETSIGTYPE u_interrupt(int type)
+{
+	bell();
+#if OS2
+	LSIGNAL(SIGINT, SIG_ACK);
+#endif
+	LSIGNAL(SIGINT, u_interrupt);
+	sigs |= S_INTERRUPT;
+#if MSDOS_COMPILER==DJGPPC
+	/*
+	 * If a keyboard has been hit, it must be Ctrl-C
+	 * (as opposed to Ctrl-Break), so consume it.
+	 * (Otherwise, Less will beep when it sees Ctrl-C from keyboard.)
+	 */
+	if (kbhit())
+		getkey();
+#endif
+#if HILITE_SEARCH
+	set_filter_pattern(NULL, 0);
+#endif
+	if (reading)
+		intread(); /* May longjmp */
+}
+#endif
+
+#ifdef SIGTSTP
+/*
+ * "Stop" (^Z) signal handler.
+ */
+	/* ARGSUSED*/
+static RETSIGTYPE stop(int type)
+{
+	LSIGNAL(SIGTSTP, stop);
+	sigs |= S_STOP;
+	if (reading)
+		intread();
+}
+#endif
+
+#undef SIG_LESSWINDOW
+#ifdef SIGWINCH
+#define SIG_LESSWINDOW SIGWINCH
+#else
+#ifdef SIGWIND
+#define SIG_LESSWINDOW SIGWIND
+#endif
+#endif
+
+#ifdef SIG_LESSWINDOW
+/*
+ * "Window" change handler
+ */
+	/* ARGSUSED*/
+public RETSIGTYPE winch(int type)
+{
+	LSIGNAL(SIG_LESSWINDOW, winch);
+	sigs |= S_WINCH;
+	if (reading)
+		intread();
+}
+#endif
+
+#if MSDOS_COMPILER==WIN32C
+/*
+ * Handle CTRL-C and CTRL-BREAK keys.
+ */
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+
+static BOOL WINAPI wbreak_handler(DWORD dwCtrlType)
+{
+	switch (dwCtrlType)
+	{
+	case CTRL_C_EVENT:
+	case CTRL_BREAK_EVENT:
+		sigs |= S_INTERRUPT;
+#if HILITE_SEARCH
+		set_filter_pattern(NULL, 0);
+#endif
+		return (TRUE);
+	default:
+		break;
+	}
+	return (FALSE);
+}
+#endif
+
+static RETSIGTYPE terminate(int type)
+{
+	quit(15);
+}
+
+/*
+ * Set up the signal handlers.
+ */
+public void init_signals(int on)
+{
+	if (on)
+	{
+		/*
+		 * Set signal handlers.
+		 */
+#if MSDOS_COMPILER==WIN32C
+		SetConsoleCtrlHandler(wbreak_handler, TRUE);
+#else
+		(void) LSIGNAL(SIGINT, u_interrupt);
+#endif
+#ifdef SIGTSTP
+		(void) LSIGNAL(SIGTSTP, secure ? SIG_IGN : stop);
+#endif
+#ifdef SIGWINCH
+		(void) LSIGNAL(SIGWINCH, winch);
+#endif
+#ifdef SIGWIND
+		(void) LSIGNAL(SIGWIND, winch);
+#endif
+#ifdef SIGQUIT
+		(void) LSIGNAL(SIGQUIT, SIG_IGN);
+#endif
+#ifdef SIGTERM
+		(void) LSIGNAL(SIGTERM, terminate);
+#endif
+	} else
+	{
+		/*
+		 * Restore signals to defaults.
+		 */
+#if MSDOS_COMPILER==WIN32C
+		SetConsoleCtrlHandler(wbreak_handler, FALSE);
+#else
+		(void) LSIGNAL(SIGINT, SIG_DFL);
+#endif
+#ifdef SIGTSTP
+		(void) LSIGNAL(SIGTSTP, SIG_DFL);
+#endif
+#ifdef SIGWINCH
+		(void) LSIGNAL(SIGWINCH, SIG_IGN);
+#endif
+#ifdef SIGWIND
+		(void) LSIGNAL(SIGWIND, SIG_IGN);
+#endif
+#ifdef SIGQUIT
+		(void) LSIGNAL(SIGQUIT, SIG_DFL);
+#endif
+#ifdef SIGTERM
+		(void) LSIGNAL(SIGTERM, SIG_DFL);
+#endif
+	}
+}
+
+/*
+ * Process any signals we have received.
+ * A received signal cause a bit to be set in "sigs".
+ */
+public void psignals(void)
+{

_service:tar_scm:less-633.tar.gz/tags.c Added

@@ -0,0 +1,758 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+#include "less.h"
+
+#define WHITESP(c)      ((c)==' ' || (c)=='\t')
+
+#if TAGS
+
+public char ztags = "tags";
+public char *tags = ztags;
+
+static int total;
+static int curseq;
+
+extern int linenums;
+extern int sigs;
+extern int ctldisp;
+
+enum tag_result {
+	TAG_FOUND,
+	TAG_NOFILE,
+	TAG_NOTAG,
+	TAG_NOTYPE,
+	TAG_INTR
+};
+
+/*
+ * Tag type
+ */
+enum {
+	T_CTAGS,        /* 'tags': standard and extended format (ctags) */
+	T_CTAGS_X,      /* stdin: cross reference format (ctags) */
+	T_GTAGS,        /* 'GTAGS': function definition (global) */
+	T_GRTAGS,       /* 'GRTAGS': function reference (global) */
+	T_GSYMS,        /* 'GSYMS': other symbols (global) */
+	T_GPATH         /* 'GPATH': path name (global) */
+};
+
+static enum tag_result findctag(char *tag);
+static enum tag_result findgtag(char *tag, int type);
+static char *nextgtag(void);
+static char *prevgtag(void);
+static POSITION ctagsearch(void);
+static POSITION gtagsearch(void);
+static int getentry(char *buf, char **tag, char **file, char **line);
+
+/*
+ * The list of tags generated by the last findgtag() call.
+ *
+ * Use either pattern or line number.
+ * findgtag() always uses line number, so pattern is always NULL.
+ * findctag() uses either pattern (in which case line number is 0),
+ * or line number (in which case pattern is NULL).
+ */
+struct taglist {
+	struct tag *tl_first;
+	struct tag *tl_last;
+};
+struct tag {
+	struct tag *next, *prev; /* List links */
+	char *tag_file;         /* Source file containing the tag */
+	LINENUM tag_linenum;    /* Appropriate line number in source file */
+	char *tag_pattern;      /* Pattern used to find the tag */
+	char tag_endline;       /* True if the pattern includes '$' */
+};
+#define TAG_END  ((struct tag *) &taglist)
+static struct taglist taglist = { TAG_END, TAG_END };
+static struct tag *curtag;
+
+#define TAG_INS(tp) \
+	(tp)->next = TAG_END; \
+	(tp)->prev = taglist.tl_last; \
+	taglist.tl_last->next = (tp); \
+	taglist.tl_last = (tp);
+
+#define TAG_RM(tp) \
+	(tp)->next->prev = (tp)->prev; \
+	(tp)->prev->next = (tp)->next;
+
+/*
+ * Delete tag structures.
+ */
+public void cleantags(void)
+{
+	struct tag *tp;
+
+	/*
+	 * Delete any existing tag list.
+	 * {{ Ideally, we wouldn't do this until after we know that we
+	 *    can load some other tag information. }}
+	 */
+	while ((tp = taglist.tl_first) != TAG_END)
+	{
+		TAG_RM(tp);
+		free(tp->tag_file);
+		free(tp->tag_pattern);
+		free(tp);
+	}
+	curtag = NULL;
+	total = curseq = 0;
+}
+
+/*
+ * Create a new tag entry.
+ */
+static struct tag * maketagent(char *name, char *file, LINENUM linenum, char *pattern, int endline)
+{
+	struct tag *tp;
+
+	tp = (struct tag *) ecalloc(sizeof(struct tag), 1);
+	tp->tag_file = (char *) ecalloc(strlen(file) + 1, sizeof(char));
+	strcpy(tp->tag_file, file);
+	tp->tag_linenum = linenum;
+	tp->tag_endline = endline;
+	if (pattern == NULL)
+		tp->tag_pattern = NULL;
+	else
+	{
+		tp->tag_pattern = (char *) ecalloc(strlen(pattern) + 1, sizeof(char));
+		strcpy(tp->tag_pattern, pattern);
+	}
+	return (tp);
+}
+
+/*
+ * Get tag mode.
+ */
+public int gettagtype(void)
+{
+	int f;
+
+	if (strcmp(tags, "GTAGS") == 0)
+		return T_GTAGS;
+	if (strcmp(tags, "GRTAGS") == 0)
+		return T_GRTAGS;
+	if (strcmp(tags, "GSYMS") == 0)
+		return T_GSYMS;
+	if (strcmp(tags, "GPATH") == 0)
+		return T_GPATH;
+	if (strcmp(tags, "-") == 0)
+		return T_CTAGS_X;
+	f = open(tags, OPEN_READ);
+	if (f >= 0)
+	{
+		close(f);
+		return T_CTAGS;
+	}
+	return T_GTAGS;
+}
+
+/*
+ * Find tags in tag file.
+ * Find a tag in the "tags" file.
+ * Sets "tag_file" to the name of the file containing the tag,
+ * and "tagpattern" to the search pattern which should be used
+ * to find the tag.
+ */
+public void findtag(char *tag)
+{
+	int type = gettagtype();
+	enum tag_result result;
+
+	if (type == T_CTAGS)
+		result = findctag(tag);
+	else
+		result = findgtag(tag, type);
+	switch (result)
+	{
+	case TAG_FOUND:
+	case TAG_INTR:
+		break;
+	case TAG_NOFILE:
+		error("No tags file", NULL_PARG);
+		break;
+	case TAG_NOTAG:
+		error("No such tag in tags file", NULL_PARG);
+		break;
+	case TAG_NOTYPE:
+		error("unknown tag type", NULL_PARG);
+		break;
+	}
+}
+
+/*
+ * Search for a tag.
+ */
+public POSITION tagsearch(void)
+{
+	if (curtag == NULL)
+		return (NULL_POSITION);  /* No gtags loaded! */
+	if (curtag->tag_linenum != 0)

_service:tar_scm:less-633.tar.gz/ttyin.c Added

@@ -0,0 +1,251 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+ * Routines dealing with getting input from the keyboard (i.e. from the user).
+ */
+
+#include "less.h"
+#if OS2
+#include "cmd.h"
+#include "pckeys.h"
+#endif
+#if MSDOS_COMPILER==WIN32C
+#define WIN32_LEAN_AND_MEAN
+#ifndef _WIN32_WINNT
+#define _WIN32_WINNT 0x400
+#endif
+#include <windows.h>
+public DWORD console_mode;
+public HANDLE tty;
+#else
+public int tty;
+#endif
+#if LESSTEST
+public char *ttyin_name = NULL;
+#endif /*LESSTEST*/
+extern int sigs;
+extern int utf_mode;
+extern int wheel_lines;
+
+#if !MSDOS_COMPILER
+static int open_tty_device(constant char* dev)
+{
+#if OS2
+	/* The __open() system call translates "/dev/tty" to "con". */
+	return __open(dev, OPEN_READ);
+#else
+	return open(dev, OPEN_READ);
+#endif
+}
+
+/*
+ * Open the tty device.
+ * Try ttyname(), then try /dev/tty, then use file descriptor 2.
+ * In Unix, file descriptor 2 is usually attached to the screen,
+ * but also usually lets you read from the keyboard.
+ */
+public int open_tty(void)
+{
+	int fd = -1;
+#if LESSTEST
+	if (ttyin_name != NULL)
+		fd = open_tty_device(ttyin_name);
+#endif /*LESSTEST*/
+#if HAVE_TTYNAME
+	if (fd < 0)
+	{
+		constant char *dev = ttyname(2);
+		if (dev != NULL)
+			fd = open_tty_device(dev);
+	}
+#endif
+	if (fd < 0)
+		fd = open_tty_device("/dev/tty");
+	if (fd < 0)
+		fd = 2;
+	return fd;
+}
+#endif /* MSDOS_COMPILER */
+
+/*
+ * Open keyboard for input.
+ */
+public void open_getchr(void)
+{
+#if MSDOS_COMPILER==WIN32C
+	/* Need this to let child processes inherit our console handle */
+	SECURITY_ATTRIBUTES sa;
+	memset(&sa, 0, sizeof(SECURITY_ATTRIBUTES));
+	sa.nLength = sizeof(SECURITY_ATTRIBUTES);
+	sa.bInheritHandle = TRUE;
+	tty = CreateFile("CONIN$", GENERIC_READ | GENERIC_WRITE,
+			FILE_SHARE_READ, &sa, 
+			OPEN_EXISTING, 0L, NULL);
+	GetConsoleMode(tty, &console_mode);
+	/* Make sure we get Ctrl+C events. */
+	SetConsoleMode(tty, ENABLE_PROCESSED_INPUT | ENABLE_MOUSE_INPUT);
+#else
+#if MSDOS_COMPILER
+	extern int fd0;
+	/*
+	 * Open a new handle to CON: in binary mode 
+	 * for unbuffered keyboard read.
+	 */
+	 fd0 = dup(0);
+	 close(0);
+	 tty = open("CON", OPEN_READ);
+#if MSDOS_COMPILER==DJGPPC
+	/*
+	 * Setting stdin to binary causes Ctrl-C to not
+	 * raise SIGINT.  We must undo that side-effect.
+	 */
+	(void) __djgpp_set_ctrl_c(1);
+#endif
+#else
+	tty = open_tty();
+#endif
+#endif
+}
+
+/*
+ * Close the keyboard.
+ */
+public void close_getchr(void)
+{
+#if MSDOS_COMPILER==WIN32C
+	SetConsoleMode(tty, console_mode);
+	CloseHandle(tty);
+#endif
+}
+
+#if MSDOS_COMPILER==WIN32C
+/*
+ * Close the pipe, restoring the keyboard (CMD resets it, losing the mouse).
+ */
+public int pclose(FILE *f)
+{
+	int result;
+
+	result = _pclose(f);
+	SetConsoleMode(tty, ENABLE_PROCESSED_INPUT | ENABLE_MOUSE_INPUT);
+	return result;
+}
+#endif
+
+/*
+ * Get the number of lines to scroll when mouse wheel is moved.
+ */
+public int default_wheel_lines(void)
+{
+	int lines = 1;
+#if MSDOS_COMPILER==WIN32C
+	if (SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0, &lines, 0))
+	{
+		if (lines == WHEEL_PAGESCROLL)
+			lines = 3;
+	}
+#endif
+	return lines;
+}
+
+/*
+ * Get a character from the keyboard.
+ */
+public int getchr(void)
+{
+	char c;
+	int result;
+
+	do
+	{
+		flush();
+#if MSDOS_COMPILER && MSDOS_COMPILER != DJGPPC
+		/*
+		 * In raw read, we don't see ^C so look here for it.
+		 */
+#if MSDOS_COMPILER==WIN32C
+		if (ABORT_SIGS())
+			return (READ_INTR);
+		c = WIN32getch();
+#else
+		c = getch();
+#endif
+		result = 1;
+		if (c == '\003')
+			return (READ_INTR);
+#else
+		{
+			unsigned char uc;
+			result = iread(tty, &uc, sizeof(char));
+			c = (char) uc;
+		}
+		if (result == READ_INTR)
+			return (READ_INTR);
+		if (result < 0)
+		{
+			/*
+			 * Don't call error() here,
+			 * because error calls getchr!
+			 */
+			quit(QUIT_ERROR);
+		}

_service:tar_scm:less-633.tar.gz/ubin.uni Added

_service:tar_scm:less-633.tar.gz/version.c Added

@@ -0,0 +1,987 @@
+/*
+ * Copyright (C) 1984-2023  Mark Nudelman
+ *
+ * You may distribute under the terms of either the GNU General Public
+ * License or the Less License, as specified in the README file.
+ *
+ * For more information, see the README file.
+ */
+
+
+/*
+----------------------- CHANGE HISTORY --------------------------
+
+       1/29/84  Allowed use on standard input
+       2/1/84   Added E, N, P commands
+       4/17/84  Added '=' command, 'stop' signal handling
+       4/20/84  Added line folding
+v2     4/27/84  Fixed '=' command to use BOTTOM_PLUS_ONE,
+                instead of TOP, added 'p' & 'v' commands
+v3     5/3/84   Added -m and -t options, '-' command
+v4     5/3/84   Added LESS environment variable
+v5     5/3/84   New comments, fixed '-' command slightly
+v6     5/15/84  Added -Q, visual bell
+v7     5/24/84  Fixed jump_back(n) bug: n should count real
+                lines, not folded lines.  Also allow number on G command.
+v8     5/30/84  Re-do -q and -Q commands
+v9     9/25/84  Added "+<cmd>" argument
+v10    10/10/84 Fixed bug in -b<n> argument processing
+v11    10/18/84 Made error() ring bell if \n not entered.
+-----------------------------------------------------------------
+v12    2/13/85  Reorganized signal handling and made portable to 4.2bsd.
+v13    2/16/85  Reword error message for '-' command.
+v14    2/22/85  Added -bf and -bp variants of -b.
+v15    2/25/85  Miscellaneous changes.
+v16    3/13/85  Added -u flag for backspace processing.
+v17    4/13/85  Added j and k commands, changed -t default.
+v18    4/20/85  Rewrote signal handling code.
+v19    5/2/85   Got rid of "verbose" eq_message().
+                Made search() scroll in some cases.
+v20    5/21/85  Fixed screen.c ioctls for System V.
+v21    5/23/85  Fixed some first_cmd bugs.
+v22    5/24/85  Added support for no RECOMP nor REGCMP.
+v23    5/25/85  Miscellanous changes and prettying up.
+                Posted to USENET.
+-----------------------------------------------------------------
+v24    6/3/85   Added ti,te terminal init & de-init.       
+                (Thanks to Mike Kersenbrock)
+v25    6/8/85   Added -U flag, standout mode underlining.
+v26    6/9/85   Added -M flag.
+                Use underline termcap (us) if it exists.
+v27    6/15/85  Renamed some variables to make unique in
+                6 chars.  Minor fix to -m.
+v28    6/28/85  Fixed right margin bug.
+v29    6/28/85  Incorporated M.Rose's changes to signal.c
+v30    6/29/85  Fixed stupid bug in argument processing.
+v31    7/15/85  Added -p flag, changed repaint algorithm.  
+                Added kludge for magic cookie terminals.
+v32    7/16/85  Added cat_file if output not a tty.
+v33    7/23/85  Added -e flag and EDITOR.
+v34    7/26/85  Added -s flag.
+v35    7/27/85  Rewrote option handling; added option.c.
+v36    7/29/85  Fixed -e flag to work if not last file.
+v37    8/10/85  Added -x flag.
+v38    8/19/85  Changed prompting; created prompt.c.
+v39    8/24/85  (Not -p) does not initially clear screen.
+v40    8/26/85  Added "skipping" indicator in forw().
+                Posted to USENET.
+-----------------------------------------------------------------
+v41    9/17/85  ONLY_RETURN, control char commands,
+                faster search, other minor fixes.
+v42    9/25/85  Added ++ command line syntax;
+                ch_fsize for pipes.
+v43    10/15/85 Added -h flag, changed prim.c algorithms.
+v44    10/16/85 Made END print in all cases of eof;
+                ignore SIGTTOU after receiv ing SIGTSTP.
+v45    10/16/85 Never print backspaces unless -u.
+v46    10/24/85 Backwards scroll in jump_loc.
+v47    10/30/85 Fixed bug in edit(): *first_cmd==0
+v48    11/16/85 Use TIOCSETN instead of TIOCSETP.
+                Added marks (m and ' commands).
+                Posted to USENET.
+-----------------------------------------------------------------
+v49    1/9/86   Fixed bug: signal didn't clear mcc.
+v50    1/15/86  Added ' (quote) to gomark.
+v51    1/16/86  Added + cmd, fixed problem if first_cmd
+                fails, made g cmd sort of "work" on pipes
+                ev en if bof is no longer buffered.
+v52    1/17/86  Made short files work better.
+v53    1/20/86  Added -P option.
+v54    1/20/86  Changed help to use HELPFILE.
+v55    1/23/86  Messages work better if not tty output.
+v56    1/24/86  Added -l option.
+v57    1/31/86  Fixed -l to get confirmation before
+                ov erwriting an existing file.
+v58    8/28/86  Added filename globbing.
+v59    9/15/86  Fixed some bugs with very long filenames.
+v60    9/26/86  Incorporated changes from Leith (Casey)
+                Leedom for boldface and -z option.
+v61    9/26/86  Got rid of annoying repaints after ! cmd.
+                Posted to USENET.
+-----------------------------------------------------------------
+v62    12/23/86 Added is_directory(); change -z default to
+                -1 instead of 24; cat-and-exit if -e and
+                file is less than a screenful.
+v63    1/8/87   Fixed bug in cat-and-exit if > 1 file.
+v64    1/12/87  Changed puts/putstr, putc/putchr,
+                getc/getchr to av oid name conflict with
+                stdio functions.
+v65    1/26/87  Allowed '-' command to change NUMBER
+                v alued options (thanks to Gary Puckering)
+v66    2/13/87  Fixed bug: prepaint should use force=1.
+v67    2/24/87  Added !! and % expansion to ! command.
+v68    2/25/87  Added SIGWINCH and TIOCGWINSZ support;
+                changed is_directory to bad_file.
+                (thanks to J. Robert Ward)
+v69    2/25/87  Added SIGWIND and WIOCGETD (for Unix PC).
+v70    3/13/87  Changed help cmd from 'h' to 'H'; better
+                error msgs in bad_file, errno_message.
+v71    5/11/87  Changed -p to -c, made triple -c/-C
+                for clear-eol like more's -c.
+v72    6/26/87  Added -E, -L, use $SHELL in lsystem().
+                (thanks to Stev e Spearman)
+v73    6/26/87  Allow Examine "#" for previous file.
+                Posted to USENET 8/25/87.
+-----------------------------------------------------------------
+v74    9/18/87  Fix conflict in EOF symbol with stdio.h,
+                Make os.c more portable to BSD.
+v75    9/23/87  Fix problems in get_term (thanks to 
+                Paul Eggert); new backwards scrolling in
+                jump_loc (thanks to Marion Hakanson).
+v76    9/23/87  Added -i flag; allow single "!" to
+                inv oke a shell (thanks to Franco Barber).
+v77    9/24/87  Added -n flag and line number support.
+v78    9/25/87  Fixed problem with prompts longer than
+                the screen width.
+v79    9/29/87  Added the _ command.
+v80    10/6/87  Allow signal to break out of linenum scan.
+v81    10/6/87  Allow -b to be changed from within less.
+v82    10/7/87  Add cmd_decode to use a table for key
+                binding (thanks to Dav id Nason).
+v83    10/9/87  Allow .less file for user-defined keys.
+v84    10/11/87 Fix -e/-E problems (thanks to Felix Lee).
+v85    10/15/87 Search now keeps track of line numbers.
+v86    10/20/87 Added -B option and autobuf; fixed
+                "pipe error" bug.
+v87    3/1/88   Fix bug re BSD signals while reading file.
+v88    3/12/88  Use new format for -P option (thanks to
+                der Mouse), allow "+-c" without message,
+                fix bug re BSD hangup.
+v89    3/18/88  Turn off line numbers if linenum scan
+                is interrupted.
+v90    3/30/88  Allow -P from within less.
+v91    3/30/88  Added tags file support (new -t option)
+                (thanks to Brian Campbell).
+v92    4/4/88   Added -+option syntax.
+v93    4/11/88  Add support for slow input (thanks to
+                Joe Orost & apologies for taking almost
+                3 years to get this in!)
+v94    4/11/88  Redo reading/signal stuff.
+v95    4/20/88  Repaint screen better after signal.
+v96    4/21/88  Add /! and ?! commands.
+v97    5/17/88  Allow -l/-L from within less.
+                Eliminate some static arrays (use calloc).
+                Posted to USENET.
+-----------------------------------------------------------------
+v98    10/14/88 Fix incorrect calloc call; uninitialized
+                var in exec_mca; core dump on unknown TERM.
+                Make v cmd work if past last line of file.
+                Fix some signal bugs.
+v99    10/29/88 Allow space between -X and string,
+                when X is a string-valued option.
+v100   1/5/89   Fix globbing bug when $SHELL not set;
+                allow spaces after -t command.
+v101   1/6/89   Fix problem with long (truncated) lines
+                in tags file (thanks to Neil Dixon).
+v102   1/6/89   Fix bug with E# when no prev file;
+                allow spaces after -l command.
+v103   3/14/89  Add -N, -f and -? options.  Add z and w
+                commands.  Add %L for prompt strings.
+v104   3/16/89  Added EDITPROTO.
+v105   3/20/89  Fix bug in find_linenum which cached
+                incorrectly on long lines.
+v106   3/31/89  Added -k option and multiple lesskey      
+                files.
+v107   4/27/89  Add 8-bit char support and -g option.
+                Split option code into 3 files.
+v108   5/5/89   Allocate position table dynamically       
+                (thanks to Paul Eggert); change % command
+                from "percent" to vi-style brace finder.
+v109   5/10/89  Added ESC-% command, split prim.c.
+v110   5/24/89  Fixed bug in + option; fixed repaint bug
+                under Sun windows (thanks to Paul Eggert).
+v111   5/25/89  Generalized # and % expansion; use 
+                calloc for some error messages.
+v112   5/30/89  Get rid of ESC-%, add {}() commands.
+v113   5/31/89  Optimize lseeks (thanks to Paul Eggert).
+v114   7/25/89  Added ESC-/ and ESC-/! commands.
+v115   7/26/89  Added ESC-n command.
+v116   7/31/89  Added find_pos to optimize g command.

_service:tar_scm:less-633.tar.gz/wide.uni Added

@@ -0,0 +1,123 @@
+/* Generated by "./mkutable -f1 W F -- unicode/EastAsianWidth.txt" on Mon Nov 14 18:19:24 PST 2022 */
+	{ 0x1100, 0x115f }, /* W */
+	{ 0x231a, 0x231b }, /* W */
+	{ 0x2329, 0x232a }, /* W */
+	{ 0x23e9, 0x23ec }, /* W */
+	{ 0x23f0, 0x23f0 }, /* W */
+	{ 0x23f3, 0x23f3 }, /* W */
+	{ 0x25fd, 0x25fe }, /* W */
+	{ 0x2614, 0x2615 }, /* W */
+	{ 0x2648, 0x2653 }, /* W */
+	{ 0x267f, 0x267f }, /* W */
+	{ 0x2693, 0x2693 }, /* W */
+	{ 0x26a1, 0x26a1 }, /* W */
+	{ 0x26aa, 0x26ab }, /* W */
+	{ 0x26bd, 0x26be }, /* W */
+	{ 0x26c4, 0x26c5 }, /* W */
+	{ 0x26ce, 0x26ce }, /* W */
+	{ 0x26d4, 0x26d4 }, /* W */
+	{ 0x26ea, 0x26ea }, /* W */
+	{ 0x26f2, 0x26f3 }, /* W */
+	{ 0x26f5, 0x26f5 }, /* W */
+	{ 0x26fa, 0x26fa }, /* W */
+	{ 0x26fd, 0x26fd }, /* W */
+	{ 0x2705, 0x2705 }, /* W */
+	{ 0x270a, 0x270b }, /* W */
+	{ 0x2728, 0x2728 }, /* W */
+	{ 0x274c, 0x274c }, /* W */
+	{ 0x274e, 0x274e }, /* W */
+	{ 0x2753, 0x2755 }, /* W */
+	{ 0x2757, 0x2757 }, /* W */
+	{ 0x2795, 0x2797 }, /* W */
+	{ 0x27b0, 0x27b0 }, /* W */
+	{ 0x27bf, 0x27bf }, /* W */
+	{ 0x2b1b, 0x2b1c }, /* W */
+	{ 0x2b50, 0x2b50 }, /* W */
+	{ 0x2b55, 0x2b55 }, /* W */
+	{ 0x2e80, 0x2e99 }, /* W */
+	{ 0x2e9b, 0x2ef3 }, /* W */
+	{ 0x2f00, 0x2fd5 }, /* W */
+	{ 0x2ff0, 0x2ffb }, /* W */
+	{ 0x3000, 0x3000 }, /* F */
+	{ 0x3001, 0x303e }, /* W */
+	{ 0x3041, 0x3096 }, /* W */
+	{ 0x3099, 0x30ff }, /* W */
+	{ 0x3105, 0x312f }, /* W */
+	{ 0x3131, 0x318e }, /* W */
+	{ 0x3190, 0x31e3 }, /* W */
+	{ 0x31f0, 0x321e }, /* W */
+	{ 0x3220, 0x3247 }, /* W */
+	{ 0x3250, 0x4dbf }, /* W */
+	{ 0x4e00, 0xa48c }, /* W */
+	{ 0xa490, 0xa4c6 }, /* W */
+	{ 0xa960, 0xa97c }, /* W */
+	{ 0xac00, 0xd7a3 }, /* W */
+	{ 0xf900, 0xfaff }, /* W */
+	{ 0xfe10, 0xfe19 }, /* W */
+	{ 0xfe30, 0xfe52 }, /* W */
+	{ 0xfe54, 0xfe66 }, /* W */
+	{ 0xfe68, 0xfe6b }, /* W */
+	{ 0xff01, 0xff60 }, /* F */
+	{ 0xffe0, 0xffe6 }, /* F */
+	{ 0x16fe0, 0x16fe4 }, /* W */
+	{ 0x16ff0, 0x16ff1 }, /* W */
+	{ 0x17000, 0x187f7 }, /* W */
+	{ 0x18800, 0x18cd5 }, /* W */
+	{ 0x18d00, 0x18d08 }, /* W */
+	{ 0x1aff0, 0x1aff3 }, /* W */
+	{ 0x1aff5, 0x1affb }, /* W */
+	{ 0x1affd, 0x1affe }, /* W */
+	{ 0x1b000, 0x1b122 }, /* W */
+	{ 0x1b132, 0x1b132 }, /* W */
+	{ 0x1b150, 0x1b152 }, /* W */
+	{ 0x1b155, 0x1b155 }, /* W */
+	{ 0x1b164, 0x1b167 }, /* W */
+	{ 0x1b170, 0x1b2fb }, /* W */
+	{ 0x1f004, 0x1f004 }, /* W */
+	{ 0x1f0cf, 0x1f0cf }, /* W */
+	{ 0x1f18e, 0x1f18e }, /* W */
+	{ 0x1f191, 0x1f19a }, /* W */
+	{ 0x1f200, 0x1f202 }, /* W */
+	{ 0x1f210, 0x1f23b }, /* W */
+	{ 0x1f240, 0x1f248 }, /* W */
+	{ 0x1f250, 0x1f251 }, /* W */
+	{ 0x1f260, 0x1f265 }, /* W */
+	{ 0x1f300, 0x1f320 }, /* W */
+	{ 0x1f32d, 0x1f335 }, /* W */
+	{ 0x1f337, 0x1f37c }, /* W */
+	{ 0x1f37e, 0x1f393 }, /* W */
+	{ 0x1f3a0, 0x1f3ca }, /* W */
+	{ 0x1f3cf, 0x1f3d3 }, /* W */
+	{ 0x1f3e0, 0x1f3f0 }, /* W */
+	{ 0x1f3f4, 0x1f3f4 }, /* W */
+	{ 0x1f3f8, 0x1f43e }, /* W */
+	{ 0x1f440, 0x1f440 }, /* W */
+	{ 0x1f442, 0x1f4fc }, /* W */
+	{ 0x1f4ff, 0x1f53d }, /* W */
+	{ 0x1f54b, 0x1f54e }, /* W */
+	{ 0x1f550, 0x1f567 }, /* W */
+	{ 0x1f57a, 0x1f57a }, /* W */
+	{ 0x1f595, 0x1f596 }, /* W */
+	{ 0x1f5a4, 0x1f5a4 }, /* W */
+	{ 0x1f5fb, 0x1f64f }, /* W */
+	{ 0x1f680, 0x1f6c5 }, /* W */
+	{ 0x1f6cc, 0x1f6cc }, /* W */
+	{ 0x1f6d0, 0x1f6d2 }, /* W */
+	{ 0x1f6d5, 0x1f6d7 }, /* W */
+	{ 0x1f6dc, 0x1f6df }, /* W */
+	{ 0x1f6eb, 0x1f6ec }, /* W */
+	{ 0x1f6f4, 0x1f6fc }, /* W */
+	{ 0x1f7e0, 0x1f7eb }, /* W */
+	{ 0x1f7f0, 0x1f7f0 }, /* W */
+	{ 0x1f90c, 0x1f93a }, /* W */
+	{ 0x1f93c, 0x1f945 }, /* W */
+	{ 0x1f947, 0x1f9ff }, /* W */
+	{ 0x1fa70, 0x1fa7c }, /* W */
+	{ 0x1fa80, 0x1fa88 }, /* W */
+	{ 0x1fa90, 0x1fabd }, /* W */
+	{ 0x1fabf, 0x1fac5 }, /* W */
+	{ 0x1face, 0x1fadb }, /* W */
+	{ 0x1fae0, 0x1fae8 }, /* W */
+	{ 0x1faf0, 0x1faf8 }, /* W */
+	{ 0x20000, 0x2fffd }, /* W */
+	{ 0x30000, 0x3fffd }, /* W */

_service:tar_scm:less-633.tar.gz/xbuf.c Added

@@ -0,0 +1,163 @@
+#include "less.h"
+#include "xbuf.h"
+
+/*
+ * Initialize an expandable text buffer.
+ */
+public void xbuf_init(struct xbuffer *xbuf)
+{
+	xbuf->data = NULL;
+	xbuf->size = xbuf->end = 0;
+}
+
+public void xbuf_deinit(struct xbuffer *xbuf)
+{
+	if (xbuf->data != NULL)
+		free(xbuf->data);
+	xbuf_init(xbuf);
+}
+
+public void xbuf_reset(struct xbuffer *xbuf)
+{
+	xbuf->end = 0;
+}
+
+/*
+ * Add a byte to an expandable text buffer.
+ */
+public void xbuf_add_byte(struct xbuffer *xbuf, unsigned char b)
+{
+	if (xbuf->end >= xbuf->size)
+	{
+		unsigned char *data;
+		if (ckd_add(&xbuf->size, xbuf->size, xbuf->size ? xbuf->size : 16))
+			out_of_memory();
+		data = (unsigned char *) ecalloc(xbuf->size, sizeof(unsigned char));
+		if (xbuf->data != NULL)
+		{
+			memcpy(data, xbuf->data, xbuf->end);
+			free(xbuf->data);
+		}
+		xbuf->data = data;
+	}
+	xbuf->dataxbuf->end++ = (unsigned char) b;
+}
+
+public void xbuf_add_data(struct xbuffer *xbuf, unsigned char *data, int len)
+{
+	int i;
+	for (i = 0;  i < len;  i++)
+		xbuf_add_byte(xbuf, datai);
+}
+
+public int xbuf_pop(struct xbuffer *buf)
+{
+	if (buf->end == 0)
+		return -1;
+	return (int) buf->data--(buf->end);
+}
+
+public void xbuf_set(struct xbuffer *dst, struct xbuffer *src)
+{
+	xbuf_reset(dst);
+	xbuf_add_data(dst, src->data, src->end);
+}
+
+public char * xbuf_char_data(struct xbuffer *xbuf)
+{
+	return (char *)(xbuf->data);
+}
+
+
+/*
+ * Helper functions for the ckd_add and ckd_mul macro substitutes.
+ * These helper functions do not set *R on overflow, and assume that
+ * arguments are nonnegative, that INTMAX_MAX <= UINTMAX_MAX, and that
+ * sizeof is a reliable way to distinguish integer representations.
+ * Despite these limitations they are good enough for 'less' on all
+ * known practical platforms.  For more-complicated substitutes
+ * without most of these limitations, see Gnulib's stdckdint module.
+ */
+#if !HAVE_STDCKDINT_H
+/*
+ * If the integer *R can represent VAL, store the value and return FALSE.
+ * Otherwise, possibly set *R to an indeterminate value and return TRUE.
+ * R has size RSIZE, and is signed if and only if RSIGNED is nonzero.
+ */
+static int help_fixup(void *r, uintmax val, int rsize, int rsigned)
+{
+	if (rsigned)
+	{
+		if (rsize == sizeof (int))
+		{
+			int *pr = r;
+			if (INT_MAX < val)
+				return TRUE;
+			*pr = val;
+#ifdef LLONG_MAX
+		} else if (rsize == sizeof (long long))
+		{
+			long long *pr = r;
+			if (LLONG_MAX < val)
+				return TRUE;
+			*pr = val;
+#endif
+#ifdef INTMAX_MAX
+		} else if (rsize == sizeof (intmax_t)) {
+			intmax_t *pr = r;
+			if (INTMAX_MAX < val)
+				return TRUE;
+			*pr = val;
+#endif
+		} else /* rsize == sizeof (long) */
+		{
+			long *pr = r;
+			if (LONG_MAX < val)
+				return TRUE;
+			*pr = val;
+		}
+	} else {
+		if (rsize == sizeof (unsigned)) {
+			unsigned *pr = r;
+			if (UINT_MAX < val)
+				return TRUE;
+			*pr = val;
+		} else if (rsize == sizeof (unsigned long)) {
+			unsigned long *pr = r;
+			if (ULONG_MAX < val)
+				return TRUE;
+			*pr = val;
+#ifdef ULLONG_MAX
+		} else if (rsize == sizeof (unsigned long long)) {
+			long long *pr = r;
+			if (ULLONG_MAX < val)
+				return TRUE;
+			*pr = val;
+#endif
+		} else /* rsize == sizeof (uintmax) */
+		{
+			uintmax *pr = r;
+			*pr = val;
+		}
+	}
+	return FALSE;
+}
+/*
+ * If *R can represent the mathematical sum of A and B, store the sum
+ * and return FALSE.  Otherwise, possibly set *R to an indeterminate
+ * value and return TRUE.  R has size RSIZE, and is signed if and only
+ * if RSIGNED is nonzero.
+ */
+public int help_ckd_add(void *r, uintmax a, uintmax b, int rsize, int rsigned)
+{
+	uintmax sum = a + b;
+	return sum < a || help_fixup(r, sum, rsize, rsigned);
+}
+/* Likewise, but for the product of A and B.  */
+public int help_ckd_mul(void *r, uintmax a, uintmax b, int rsize, int rsigned)
+{
+	uintmax product = a * b;
+	return ((b != 0 && a != product / b)
+		|| help_fixup(r, product, rsize, rsigned));
+}
+#endif

_service:tar_scm:less-633.tar.gz/xbuf.h Added