Official Patch 7 for Psroff 2.0
Chris Lewis
clewis at ecicrl.UUCP
Mon Jan 21 18:18:17 AEST 1991
Archive-name: psroff2.0/patch.07
Submitted-by: clewis at ferret.ocunix.on.ca (Chris Lewis)
This is official patch 07 for Psroff 2.0.
Please apply it by:
cd <psroff source directory>
patch -N -p < <this file>
The important changes are:
- The mailing list has been discontinued due to lack of interest.
Patches will go out cross-posted to alt.sources, comp.sources.bugs,
comp.text and comp.lang.postscript. If you do not get ANY of these
newsgroups, drop me a line, and I'll put you in an informal mailing
list for patch notices. The README has been altered to reflect
this.
- Some mention is made regarding installing as root on systems
where you've arranged a restrictive umask in the README.
"make fixperms" will repair these problems on the places where
the makefiles aren't careful enough with file creation.
If, after an install, psroff fails with can't find file
errors, it's worth while doing a fixperms and see if it
fixes it.
- The support for page length settings was a little off, so I
implemented a bit more, and made sure that the manual page
was consistent with it.
- Since I've moved, FAXing the test page won't do you any good.
testtab.m.S has been updated to tell you where to surface-mail
test sheets. README's contact information has been updated.
Note: I'm a bit stalled because I have no direct access to a printer
that psroff can drive, so development on new stuff is suspended.
I do have a printer, but doing a psroff driver for a Diablo 1550 doesn't
seem like a really good idea or a lot of fun.
./makeincl.S LIBDIR stuff
./utils.c stdio.h's missing popen defn
./man/troff2ps.1.S page length stuff corrected
./README future directions/contact info changed/fixperm
./Makefile permissions (fixperms) stuff
./widths/Makefile permissions
./utils/Makefile permissions
./utils/pktype.c slight output format improvement
./tests/testtab.m.S address for mailing tests.
./defs.h PL7
./lj.c stdio.h's missing popen defn
./pk.c stdio.h's missing popen defn
./troff2.c stdio.h's missing popen defn/page length stuff
*** /tmp/PATCHold/./makeincl.S Mon Jan 21 01:42:28 1991
--- ./makeincl.S Mon Jan 21 01:42:29 1991
***************
*** 1,6 ****
! # Makefile overrides 2.1 90/07/18
CC = %%CC%%
! CFLAGS = %%CCFLAGS%% '-DLIBDIR="%%LIBDIR%%"' -I../
FONTDIR = %%FONTDIR%%
LIBDIR = %%LIBDIR%%
LIBFLAGS = %%LIBFLAGS%%
--- 1,6 ----
! # Makefile overrides 2.2 90/12/15
CC = %%CC%%
! CFLAGS = %%CCFLAGS%% -I../
FONTDIR = %%FONTDIR%%
LIBDIR = %%LIBDIR%%
LIBFLAGS = %%LIBFLAGS%%
*** /tmp/PATCHold/./utils.c Mon Jan 21 01:42:41 1991
--- ./utils.c Mon Jan 21 01:42:45 1991
***************
*** 15,21 ****
#ifndef lint
static char SCCSid[] =
! "@(#)utils.c: 2.5 Copyright 90/12/14 23:47:08 Chris Lewis";
#endif
#ifndef HEADERSIZE
--- 15,21 ----
#ifndef lint
static char SCCSid[] =
! "@(#)utils.c: 2.6 Copyright 91/01/18 03:44:58 Chris Lewis";
#endif
#ifndef HEADERSIZE
***************
*** 101,106 ****
--- 101,107 ----
char nodename[25];
getnodename() {
+ FILE *popen();
FILE *uuname;
if ((uuname = popen(NODECMD, "r")) == NULL)
strcpy(nodename, "<noname>");
*** /tmp/PATCHold/./man/troff2ps.1.S Mon Jan 21 01:43:05 1991
--- ./man/troff2ps.1.S Mon Jan 21 01:43:07 1991
***************
*** 1,4 ****
! .\"Copyright 1988 by Chris Lewis 2.4 90/12/04
.TH TROFF2PS 1 local
.SH NAME
troff2ps, troff2lj, troff2xx \- convert troff output to Postscript, HP etc.
--- 1,4 ----
! .\"Copyright 1988 by Chris Lewis 2.5 91/01/18
.TH TROFF2PS 1 local
.SH NAME
troff2ps, troff2lj, troff2xx \- convert troff output to Postscript, HP etc.
***************
*** 41,53 ****
.BI -l length
option is used to tell the software how long the pages are on the printer.
The default value is 11 inches.
! Length should be written as if you were issuing a ".pl"
.I troff
command; eg: troff scaling should be used.
! For example: "-l11i", "-l4752u", "-l792p" specify a page length of
11 inches in inches,
.I troff
! units and points respectively.
.P
The
.BI -T xx
--- 41,55 ----
.BI -l length
option is used to tell the software how long the pages are on the printer.
The default value is 11 inches.
! Length should be written as if you were issuing a ``.pl''
.I troff
command; eg: troff scaling should be used.
! For example: ``-l11i'', ``-l4752u'', ``-l792p'' and ``-l66P''
! specify a page length of
11 inches in inches,
.I troff
! units, points and Picas respectively.
! Centimetres (``c'') are also supported, but ``v'', ``m'' and ``n'' are not.
.P
The
.BI -T xx
*** /tmp/PATCHold/./README Mon Jan 21 01:43:28 1991
--- ./README Mon Jan 21 01:43:36 1991
***************
*** 1,4 ****
! PSROFF RELEASE 2.0 PL5 README 2.4 90/12/14
May 14, 1990
Chris Lewis
--- 1,4 ----
! PSROFF RELEASE 2.0 PL5 README 2.6 91/01/21
May 14, 1990
Chris Lewis
***************
*** 11,18 ****
or, you can simply patch yours to this level - contact me for
patch 5.
! Please see the end of this file for my contact information
! and for enrollment in the psroff mailing list.
Please read this document, especially any new patches (if any) near
the end before reconfiguring. If you have difficulties, read the
--- 11,17 ----
or, you can simply patch yours to this level - contact me for
patch 5.
! Please see the end of this file for my contact information.
Please read this document, especially any new patches (if any) near
the end before reconfiguring. If you have difficulties, read the
***************
*** 65,75 ****
psroff (version 1.0) was posted in comp.sources.unix in October 1989.
This version is a lot better.
! If you send me your name and e-mail address, I'll put you on the psroff
! mailing list, and you'll get express delivery of any small patches (see
! CONTACT INFO at end of this README). Patches are also shipped out through
! comp.sources.unix and/or comp.sources.bugs, but the latency can be rather
! high at times. A current list of FTP-access sites can be obtained by
sending me mail.
Credit/copyright where credit's due:
--- 64,74 ----
psroff (version 1.0) was posted in comp.sources.unix in October 1989.
This version is a lot better.
! Please note: I have discontinued the mailing list, because nothing
! ever went out on it.
!
! Patches are shipped out through comp.sources.bugs and alt.sources.
! A current list of FTP and UUCP access sites can be obtained by
sending me mail.
Credit/copyright where credit's due:
***************
*** 377,382 ****
--- 376,392 ----
says something nasty about non-numeric character in file,
"may be non-ASCII".
+ - NOTE: during installs as root, the makefiles attempt to be
+ carefull about the modes of the files it creats. HOWEVER,
+ some people do insist on "umask 077" for root, and I've
+ probably not fixed everything. If psroff doesn't work
+ after an install, I suggest that you check root's umask,
+ and ensure that it's 002 or 022 before invoking any
+ of the makefile install entries. If you forget, you
+ can invoke:
+ make fixperms
+ on the upper level makefile.
+
- type "make unpackljfonts" This will uudecode the font
files I've supplied and remove the .UU files. This
step is unneccessary if you're not using Laserjets,
***************
*** 452,458 ****
- edit lib/psrofflib.S according to the instructions you find.
Take special note of -T/-F handling for troff (trofftype) -
check out your troff manual page! Suns and Ultrix want
! trofftype='-F/usr/lib/font/$width/ftXX'.
- If you're going to be driving HP Laserjets without a Postscript
cartridge:
--- 462,470 ----
- edit lib/psrofflib.S according to the instructions you find.
Take special note of -T/-F handling for troff (trofftype) -
check out your troff manual page! Suns and Ultrix want
! trofftype='-F/usr/lib/font/$width/ftXX'. If you're running
! postscript, you may want to eventually add the -Z option
! to the entry to make your printer REALLY run fast.
- If you're going to be driving HP Laserjets without a Postscript
cartridge:
***************
*** 530,536 ****
"TEST" is generated via make to include some information about
your configuration to help me diagnose your problems.
!
- If you have problems, read the TROUBLE file which describes
some trouble-shooting.
--- 542,548 ----
"TEST" is generated via make to include some information about
your configuration to help me diagnose your problems.
!
- If you have problems, read the TROUBLE file which describes
some trouble-shooting.
***************
*** 646,682 ****
Future directions:
You may have noticed a compile flag called "OPT" which is defined in
the distributed version of defs.h. If enabled (via -Z/W), this enables the
! experimental optimizer that I'm working on. It works well with Postscript
! output, but not with laserjet unless the fonts you use are VERY good.
! It's disabled by default. The optimizer does two things: it emits as many
! characters as it can as one print directive, rather than one CAT code
! per print. On postscript and HPLJ's this is a BIG win (printer execution
! speeds 3 or more times faster), but it won't work with ditroff. The
! optimizer requires access to the CAT troff width tables, and if troff2ps
! can't find them, it simply doesn't optimize. The other thing the optimizer
! does is enable a new backend transmission feature (\(bs\(bs<directive>\(bs)
! which will ultimately *replace* the ".tm M<directive>" feature. Once
! this occurs, troff stderr can unmerged with stdout, psfig will work better,
! and special directives will no longer require breaks. And, I might
! be able to emulate \X better, and maybe even (gasp) \D and friends.
!
! The intent is, that when I'm satisfied with the optimizer, possibly after
! some patching), I can either ship a patch that explicitly makes it default,
! or tell you to do it manually in the patch preamble. Stay tuned.
! CONTACT INFO:
Chris Lewis
Elegant Communications Inc.
! 481 University Avenue, Suite 602
! Toronto, Ontario, Canada
! Voice Phone: Canada (416)-595-5425
! FAX: Canada (416)-595-5439
Userid's for e-mail contact:
! Psroff enquiries/help/mailing list enrollment: psroff-request
Non-psroff mail only: clewis
! UUCP routing: {uunet!attcan,utzoo}!lsuc!eci386!<userid>
! Possible internet routing: lsuc!eci386!<userid>@uunet.uu.net
Alternates: <user>@eci386.uucp
--- 658,692 ----
Future directions:
+ They are two-fold: replacing the ".tm/.sR" mechanism for communication
+ with the backend. There is a new method, using a FSA to recognize
+ a special sequence of bell symbols (see catconv). I haven't converted
+ over to it, because under some not-yet-understood situations, it
+ doesn't work. Once this works PROPERLY, a number of enhancements
+ will be made to make CAT troff behave more like ditroff, support
+ for psfig, pic etc.
+
You may have noticed a compile flag called "OPT" which is defined in
the distributed version of defs.h. If enabled (via -Z/W), this enables the
! optimizer. It works well with Postscript output, but not with laserjet
! unless the fonts you use are VERY good. It's disabled by default. The
! optimizer does two things: it emits as many characters as it can as one
! print directive, rather than one CAT code per print. On postscript and
! HPLJ's this is a BIG win (printer execution speeds 3 or more times faster),
! but it won't work with ditroff. The optimizer requires access to the CAT
! troff width tables, and if troff2ps can't find them, it simply doesn't
! optimize.
! CONTACT INFO (note that I've moved):
Chris Lewis
Elegant Communications Inc.
! Box 13215, Kanata PO
! Kanata, Ontario, K2K 1X4
! Voice Phone: Canada (613) 832-0541
Userid's for e-mail contact:
! Psroff enquiries/help: psroff-request
Non-psroff mail only: clewis
! UUCP routing: uunet!mitel!cunews!latour!ecicrl!<userid>
! Possible internet routing: <userid>@ferret.ocunix.on.ca
Alternates: <user>@eci386.uucp
*** /tmp/PATCHold/./Makefile Mon Jan 21 01:44:06 1991
--- ./Makefile Mon Jan 21 01:44:09 1991
***************
*** 16,28 ****
# Note: This is a System V Makefile, so you may
# have some problems making a few of the items.
#
! #ident "@(#)Makefile: 2.2 Copyright 90/08/10 15:22:08 Chris Lewis"
# Use s5make on Ultrix and Sun!
# Set to where you want the user-interfaces to go
! BINDIR = /usr/lbin
! #BINDIR = /usr/tmp/bin
# Testing type (default postscript (ps)):
# Use lj for laserjet.
--- 16,27 ----
# Note: This is a System V Makefile, so you may
# have some problems making a few of the items.
#
! #ident "@(#)Makefile: 2.4 Copyright 91/01/18 03:44:18 Chris Lewis"
# Use s5make on Ultrix and Sun!
# Set to where you want the user-interfaces to go
! BINDIR = /usr/local/bin
# Testing type (default postscript (ps)):
# Use lj for laserjet.
***************
*** 32,38 ****
# This *must* be a directory all by itself with no other stuff
# in it.
LIBDIR = /usr/lib/troff2
- #LIBDIR = /usr/tmp/troff2
# Directory for Laserjet fonts.
LJF = $(LIBDIR)/lib/lj
--- 31,36 ----
***************
*** 42,61 ****
# Where your real macros are
RTMACDIR = /usr/lib/tmac
- #RTMACDIR = /usr/tmp/tmac
# upper level man directory, with subdirectories man1, man2 etc.
MANDIR = /usr/man/l_man
- #MANDIR = /usr/tmp/man
# Change this at your peril - your troff *must* support -F!
# (font width files (ft??) are placed under FONTDIR/<width>/ft??)
# (see lib/psrofflib.S)
FONTDIR = /usr/lib/font
- #FONTDIR = /usr/tmp/font
! # Comment this out if you don't have shared libraries ala 386/ix
! LIBFLAGS = -lc_s
# Bourne shell. *All* Bourne shells with the exception of extremely
# braindamaged ones (such as Ultrix or vanilla BSD) will work fine.
--- 40,56 ----
# Where your real macros are
RTMACDIR = /usr/lib/tmac
# upper level man directory, with subdirectories man1, man2 etc.
MANDIR = /usr/man/l_man
# Change this at your peril - your troff *must* support -F!
# (font width files (ft??) are placed under FONTDIR/<width>/ft??)
# (see lib/psrofflib.S)
FONTDIR = /usr/lib/font
! # Set this to -lc_s if you have 386/ix style shared libraries
! LIBFLAGS =
# Bourne shell. *All* Bourne shells with the exception of extremely
# braindamaged ones (such as Ultrix or vanilla BSD) will work fine.
***************
*** 166,171 ****
--- 161,169 ----
BACKENDS = lj.o pk.o pkc.o ps.o dt.o
+ DEFINES = '-DLIBDIR="$(LIBDIR)/lib"' '-DFONTDIR="$(FONTDIR)"'\
+ '-DLJF="$(LJF)"' $(CCFLAGS)
+
# Creation of sedscript for parameterization.
SEDSCRIPT = "sed -e 's;%%LIBDIR%%;$(LIBDIR);g' \
***************
*** 183,193 ****
-e 's^%%IGNORESH%%^$(IGNORESH)^' \
-e 's;%%RTMACDIR%%;$(RTMACDIR);g'"
- DEFINES = '-DLIBDIR="$(LIBDIR)/lib"' '-DFONTDIR="$(FONTDIR)"'\
- '-DLJF="$(LJF)"' $(CCFLAGS)
CFLAGS = $(DEFINES)
-
all: troff2ps subst.done makeincl psroff README TROUBLE LASERFONTS submakes
subst.done: sedscript
--- 181,188 ----
***************
*** 250,260 ****
--- 245,257 ----
if [ "$$files" != 'fonts.lj/*.pk' ] ; \
then \
cp fonts.lj/*.pk $(LJF) ; \
+ chmod 644 $(LJF)/* ; \
fi
$(IGNORESH) files=`echo fonts.lj/*.sfp` ; \
if [ "$$files" != 'fonts.lj/*.sfp' ] ; \
then \
cp fonts.lj/*.sfp $(LJF) ; \
+ chmod 644 $(LJF)/* ; \
fi
$(IGNORESH) test -z "$(PKFONTS)" -o ! -d "$(NEWFONTS)" \
|| cp $(NEWFONTS)/* $(LJF)
***************
*** 282,287 ****
--- 279,285 ----
rm -f $(LIBDIR)/troff2ps.old
-cp $(LIBDIR)/troff2ps $(LIBDIR)/troff2ps.old
cp troff2ps $(LIBDIR)/troff2ps
+ chmod 755 $(LIBDIR)/troff2ps $(BINDIR)/psroff
cd lib ; $(MAKE) install
cd adapters ; $(MAKE) install
cd man ; $(MAKE) install
***************
*** 415,417 ****
--- 413,419 ----
else \
echo "IGNORESH set correctly" ; \
fi
+
+ fixperms:
+ find $(LIBDIR) -type f -exec chmod +r '{}' ';'
+ find $(LIBDIR) $(FONTDIR) -type d -exec chmod +rx '{}' ';'
*** /tmp/PATCHold/./widths/Makefile Mon Jan 21 01:44:32 1991
--- ./widths/Makefile Mon Jan 21 01:44:35 1991
***************
*** 1,4 ****
! #2.6 90/12/13
SCRIPTS = gfnttab
TD = testdir
PSW = \
--- 1,4 ----
! #2.8 91/01/18
SCRIPTS = gfnttab
TD = testdir
PSW = \
***************
*** 26,31 ****
--- 26,32 ----
do \
echo "Processing $$i" ; \
./gfnttab $$i >> gfnttab.log ; \
+ chmod 644 $$i/* ; \
done
subst.done: ../makeincl ../sedscript
***************
*** 194,200 ****
continue ; \
fi ; \
echo "Installing $$base widths" ; \
! mv width$$base/ft* $(FONTDIR)/$$base ; \
done
cmp:
--- 195,201 ----
continue ; \
fi ; \
echo "Installing $$base widths" ; \
! cp width$$base/ft* $(FONTDIR)/$$base ; \
done
cmp:
***************
*** 237,243 ****
rm -f gfnttab.log pk2dit.log pk2sep.log pk2dit.err pk2sep.err
dit2catwid.o: ../defs.h
- $(CC) -c $(CFLAGS) '-DFONTDIR="$(FONTDIR)"' dit2catwid.c
../cattab.o: ../defs.h
@echo "cattab.o is out of date, please run make troff2ps in top level first"
--- 238,243 ----
*** /tmp/PATCHold/./utils/Makefile Mon Jan 21 01:44:56 1991
--- ./utils/Makefile Mon Jan 21 01:44:58 1991
***************
*** 1,4 ****
! # Copyright 14:22:49 Chris Lewis
SCRIPTS = psdtwd showfont mkenctab calcfonts catconv
PROGRAMS = hpinterp psxlate pk2sfp pk2ditwid pktype dumpft pk2ps lj2ps
MAPS = maps/S.cmtrf \
--- 1,4 ----
! # Copyright 03:46:16 Chris Lewis
SCRIPTS = psdtwd showfont mkenctab calcfonts catconv
PROGRAMS = hpinterp psxlate pk2sfp pk2ditwid pktype dumpft pk2ps lj2ps
MAPS = maps/S.cmtrf \
***************
*** 62,68 ****
$(LIBFLAGS)
dumpft: dumpft.o ../cattab.o
! $(CC) -o dumpft dumpft.o ../cattab.o $(LIBFLAGS)
clean:
rm -f *.o $(SCRIPTS) $(PROGRAMS) ljtab.c *.D *.sfp diagnostics
--- 62,68 ----
$(LIBFLAGS)
dumpft: dumpft.o ../cattab.o
! $(CC) $(CFLAGS) -o dumpft dumpft.o ../cattab.o $(LIBFLAGS)
clean:
rm -f *.o $(SCRIPTS) $(PROGRAMS) ljtab.c *.D *.sfp diagnostics
*** /tmp/PATCHold/./utils/pktype.c Mon Jan 21 01:45:17 1991
--- ./utils/pktype.c Mon Jan 21 01:45:20 1991
***************
*** 1,4 ****
! /* Copyright 1985, 1986, 1987, 1988 16:49:49 Chris Lewis
All Rights Reserved
Permission to copy and further distribute is freely given provided
--- 1,4 ----
! /* Copyright 1985, 1986, 1987, 1988 01:41:15 Chris Lewis
All Rights Reserved
Permission to copy and further distribute is freely given provided
***************
*** 13,19 ****
#ifndef lint
static char SCCSID[] =
! "@(#)pk2sfp.c 2.1 Copyright 90/07/18 16:49:49 Chris Lewis";
#endif
#include "defs.h"
#include "pk.h"
--- 13,19 ----
#ifndef lint
static char SCCSID[] =
! "@(#)pk2sfp.c 2.2 Copyright 91/01/21 01:41:15 Chris Lewis";
#endif
#include "defs.h"
#include "pk.h"
***************
*** 161,167 ****
pc->pkc_char, pc->pkc_pl);
fprintf(diagFile, " Flag byte: %d\n", pc->pkc_flag);
fprintf(diagFile, " Dynamic packing variable: %d\n", pc->pkc_dyn_f);
! fprintf(diagFile, " TFM width: %d, dx: %d", pc->pkc_tfm, pc->pkc_dx);
if (pc->pkc_dy)
fprintf(diagFile, " dy: %d\n", pc->pkc_dy);
else
--- 161,168 ----
pc->pkc_char, pc->pkc_pl);
fprintf(diagFile, " Flag byte: %d\n", pc->pkc_flag);
fprintf(diagFile, " Dynamic packing variable: %d\n", pc->pkc_dyn_f);
! fprintf(diagFile, " TFM width: %d, dx: %d, delta x: %d", pc->pkc_tfm,
! pc->pkc_dx, pc->pkc_dx * 4 / pow2(16));
if (pc->pkc_dy)
fprintf(diagFile, " dy: %d\n", pc->pkc_dy);
else
*** /tmp/PATCHold/./tests/testtab.m.S Mon Jan 21 01:45:36 1991
--- ./tests/testtab.m.S Mon Jan 21 01:45:38 1991
***************
*** 1,4 ****
! .\" 2.1 90/07/18
.po .25i
.in 0
.fp 1 R
--- 1,4 ----
! .\" 2.2 91/01/01
.po .25i
.in 0
.fp 1 R
***************
*** 8,17 ****
.ps 12
.vs 14
.sp |.3i
! .ce 3
! PSROFF TEST SHEET (2.1)
.br
! Please fill out and FAX to (416) 595-5439
.br
\*(2d
.ps 10
--- 8,19 ----
.ps 12
.vs 14
.sp |.3i
! .ce 4
! PSROFF TEST SHEET (2.2)
.br
! Please fill out and mail to: BOX 13215
! .br
! Kanata PO, Kanata, Ontario, Canada K2K 1X4
.br
\*(2d
.ps 10
*** /tmp/PATCHold/./defs.h Mon Jan 21 01:45:48 1991
--- ./defs.h Mon Jan 21 01:45:50 1991
***************
*** 1,4 ****
! /* Copyright 1988, 1989 23:46:55 Chris Lewis
All Rights Reserved
Permission to copy and further distribute is freely given provided
--- 1,4 ----
! /* Copyright 1988, 1989 03:44:30 Chris Lewis
All Rights Reserved
Permission to copy and further distribute is freely given provided
***************
*** 6,18 ****
sold for profit.
Project: Generic Troff drivers
! Module: defs.h 2.12 90/12/14 23:46:55
Author: Chris Lewis
Specs: Main header file - contains some customization
*/
/* Official Release and Patch level: */
! #define T2VERSION "@(#)PSROFF Copyright 90/12/14 Chris Lewis - R2 P6"
#ifndef LIBDIR
/* Don't touch this */
--- 6,18 ----
sold for profit.
Project: Generic Troff drivers
! Module: defs.h 2.13 91/01/18 03:44:30
Author: Chris Lewis
Specs: Main header file - contains some customization
*/
/* Official Release and Patch level: */
! #define T2VERSION "@(#)PSROFF Copyright 91/01/18 Chris Lewis - R2 P7"
#ifndef LIBDIR
/* Don't touch this */
***************
*** 55,64 ****
- If HEADERSIZE defined, use that many bytes as a prefix to the
compiled font width table. HEADERSIZE 0 is the correct definition
! for Xenix and most System V Troffs. HEADERSIZE=32 works for Ultrix.
! HEADERSIZE=0 works properly for Suns (I think).
- If COFF is defined instead, use a COFF header on the beginning of
! the file. I personally know of no machine that supports these.
- If neither are defined, use a BSD/V7 style a.out.h header, this
is appropriate for V7 and BSD troffs
- If you are running RISC/Ultrix (Mips box? from DEC) define
--- 55,65 ----
- If HEADERSIZE defined, use that many bytes as a prefix to the
compiled font width table. HEADERSIZE 0 is the correct definition
! for Xenix and most System V [o]troffs. HEADERSIZE=32 works for Ultrix
! (except RISC, see below). HEADERSIZE=32 works properly for most Suns.
- If COFF is defined instead, use a COFF header on the beginning of
! the file. I personally know of no machine that supports these, tho,
! there's unconfirmed rumours that Apollo systems might.
- If neither are defined, use a BSD/V7 style a.out.h header, this
is appropriate for V7 and BSD troffs
- If you are running RISC/Ultrix (Mips box? from DEC) define
*** /tmp/PATCHold/./lj.c Mon Jan 21 01:46:02 1991
--- ./lj.c Mon Jan 21 01:46:05 1991
***************
*** 35,41 ****
#ifndef lint
static char SCCSid[] =
! "@(#)lj.c: 2.1 Copyright 90/07/18 16:51:32 Chris Lewis";
#endif
struct troff2befont ljStdFont[108] = {
--- 35,41 ----
#ifndef lint
static char SCCSid[] =
! "@(#)lj.c: 2.2 Copyright 91/01/18 03:45:38 Chris Lewis";
#endif
struct troff2befont ljStdFont[108] = {
***************
*** 431,436 ****
--- 431,437 ----
int font, selpoints, fontcode;
char *sequence; {
int points, pointidx;
+ extern FILE *popen();
register char *pf, *p;
register struct pkp *pk;
#if !defined(INCR) && defined(PK)
*** /tmp/PATCHold/./pk.c Mon Jan 21 01:46:31 1991
--- ./pk.c Mon Jan 21 01:46:36 1991
***************
*** 7,13 ****
#ifdef PK
#ifndef lint
! static char SCCSid[] = "@(#)pk.c 2.1 Copyright 90/07/18 16:51:38 Chris Lewis";
#endif
#define DRAW
--- 7,13 ----
#ifdef PK
#ifndef lint
! static char SCCSid[] = "@(#)pk.c 2.2 Copyright 91/01/18 03:45:54 Chris Lewis";
#endif
#define DRAW
***************
*** 742,747 ****
--- 742,748 ----
pk_read(file, fontcode)
char *file; int fontcode; {
register struct pkp *p;
+ extern FILE *popen();
register struct pkc *pc, **pcp;
#ifdef COMPRESS
int compressed = 0;
*** /tmp/PATCHold/./troff2.c Mon Jan 21 01:47:07 1991
--- ./troff2.c Mon Jan 21 01:47:10 1991
***************
*** 15,21 ****
#ifndef lint
static char SCCSid[] =
! "@(#)troff2.c: 2.3 Copyright 90/12/13 14:55:19 Chris Lewis";
#endif
#define ESC 0x80
--- 15,21 ----
#ifndef lint
static char SCCSid[] =
! "@(#)troff2.c: 2.4 Copyright 91/01/18 03:44:48 Chris Lewis";
#endif
#define ESC 0x80
***************
*** 611,618 ****
case 'c':
retval *= TROFFRESOLUTION * 50. / 127.;
break;
case 'P':
! retval *= 72.;
break;
}
break;
--- 611,621 ----
case 'c':
retval *= TROFFRESOLUTION * 50. / 127.;
break;
+ case 'p':
+ retval *= 6.; /* points */
+ break;
case 'P':
! retval *= 72.; /* Picas */
break;
}
break;
***************
*** 657,662 ****
--- 660,666 ----
case 'S': {
register FILE *fin;
+ extern FILE *popen();
register int rc, n;
char buf[BUFSIZ];
DBP((D_SPEC,"SYSTEM: %s\n", string+1));
--
Chris Lewis, Phone: (613) 832-0541, Internet: clewis at ferret.ocunix.on.ca
UUCP: uunet!mitel!cunews!latour!ecicrl!clewis
Moderator of the Ferret Mailing List (ferret-request at eci386)
Psroff mailing list (psroff-request at eci386)
More information about the Alt.sources
mailing list