[comp.sources.misc] v08i033: JetRoff DWB troff to HP postprocessor - Patch04

allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc) (09/10/89)

Posting-number: Volume 8, Issue 33
Submitted-by: jetroff@pcrat.UUCP (JetRoff Mail)
Archive-name: jetroff/patch04

JetRoff Usenet version 1.1 Patch 04. 09/01/89.

This patch adds a new shell script for people with DWB1.0.
It also kludges "djet/device.c" to ignore the \| and \^
special characters which DWB1.0 tries to print even though
they aren't printable.

People with DWB2.0 need just apply this patch to keep
the Shareware version of JetRoff source code current,
in case I release more patches (doubtful, since the
commercial version of JetRoff is much better than the
Shareware version, and supports the HP LJ+, clones,
and the HP Deskjet).

People with DWB1.0 will know that they need this patch if
the manual pages come out looking like troff ignored some
formatting commands. After applying this patch, DWB1.0
people should read and follow the instructions in file
"font/devjet/dbw1fix.sh".

	cd root_of_JetRoff_source
	cat >font/devjet/dwb1fix.sh </dev/null
	chmod +x font/devjet/dwb1fix.sh
	patch -p <Patch04

Here are the diffs:

*** /dev/null	Fri Sep  1 08:40:11 1989
--- font/devjet/dwb1fix.sh	Fri Sep  1 08:57:07 1989
***************
*** 1,0

--- 1,56 -----
+ #
+ #	Fix makeDESC output for DWB 1.0 which requires that the
+ #	psuedo chars '\|' and '\^' be in the font tables
+ #
+ #	$Id: dwb1fix.sh,v 1.2 89/09/01 09:03:06 rick Exp $
+ #
+ #	this file gets installed as "/usr/lib/font/devjet/dwb1fix"
+ #
+ 
+ #
+ #	If you have DWB 1.0, you should call this script from
+ #	the script "/usr/lib/font/fontcfg".  Your "fontcfg"
+ #	script should look something like this when you
+ #	get done adding the call:
+ #		...
+ #		./makeDESC $*
+ #		./dwb1fix
+ #		echo "Making standard fonts:  \c"
+ #		...
+ #
+ #	Then, run "fontcfg" again.
+ #
+ #	NOTE:
+ #		DWB 1.0's troff is likely to core dump if a large
+ #	number of special characters or fonts are configured.
+ #	If you have this trouble, trim out some special characters
+ #	that you don't need from the *.code tables, then re-run "fontcfg".
+ #	With JetRoff 2.6, you can knock out all of the "combo" characters
+ #	by running "fontcfg -C".  This is a quick way to determine if
+ #	you need to trim the *.code tables yourself.
+ #
+ 
+ EM_SIXTH=6	# 1/6 em in dots at 10 point (roughly)
+ EM_TWELFTH=3	# 1/12 em in dots at 10 point (roughly)
+ 
+ echo "Adding psuedo chars '\|' and '\^' for DWB 1.0's pleasure"
+ for i in [A-Z] [A-Za-z][A-Za-z] 
+ do
+ 	if [ ! -f $i ]; then continue; fi
+ 	echo $i
+ 	ed - $i <<-EOF
+ 	/charset/a
+ 	\|	$EM_SIXTH 0	0
+ 	\^	$EM_TWELFTH 0	0
+ 	.
+ 	w
+ 	q
+ 	EOF
+ done
+ ed - DESC <<-EOF
+ /charset/a
+ \| \^
+ .
+ w
+ q
+ EOF
*** font/devjet/makefile.old	Fri Sep  1 09:07:21 1989
--- font/devjet/makefile	Fri Sep  1 09:07:48 1989
***************
*** 52,57
  	if [ ! -d $(FONTDIR) ]; then mkdir $(FONTDIR); fi
  	cp fontlist *.code *.out *.SZ $(FONTDIR)
  	cp fontcfg.sh $(FONTDIR)/fontcfg
  	cp makeDESC sfp2pk $(FONTDIR)
  	if [ -d ../mf ]; \
  		then cd pk; make install; else cd pk; make just_install;fi

--- 52,58 -----
  	if [ ! -d $(FONTDIR) ]; then mkdir $(FONTDIR); fi
  	cp fontlist *.code *.out *.SZ $(FONTDIR)
  	cp fontcfg.sh $(FONTDIR)/fontcfg
+ 	cp dwb1fix.sh $(FONTDIR)/dwb1fix
  	cp makeDESC sfp2pk $(FONTDIR)
  	if [ -d ../mf ]; \
  		then cd pk; make install; else cd pk; make just_install;fi
***************
*** 60,65
  	if [ ! -d $(FONTDIR) ]; then mkdir $(FONTDIR); fi
  	cp fontlist *.code *.out *.SZ $(FONTDIR)
  	cp fontcfg.sh $(FONTDIR)/fontcfg
  	cp makeDESC sfp2pk $(FONTDIR)
  
  lint:

--- 61,67 -----
  	if [ ! -d $(FONTDIR) ]; then mkdir $(FONTDIR); fi
  	cp fontlist *.code *.out *.SZ $(FONTDIR)
  	cp fontcfg.sh $(FONTDIR)/fontcfg
+ 	cp dwb1fix.sh $(FONTDIR)/dwb1fix
  	cp makeDESC sfp2pk $(FONTDIR)
  
  lint:
*** djet/Odevice.c	Fri Sep  1 21:37:25 1989
--- djet/device.c	Fri Sep  1 21:41:03 1989
***************
*** 228,233
  		Fprintf(stderr,"Special \"%s\", Font %d, Size %d, at (%d,%d)\n",
  			s, FontNumber, PointSize, TroffX, TroffY);
  	}
  	for (i = 0; i < DESC_dev.nchtab; ++i)
  		if (strcmp(&DESC_funny_names[DESC_funny_index[i]], s) == 0)
  		{

--- 228,238 -----
  		Fprintf(stderr,"Special \"%s\", Font %d, Size %d, at (%d,%d)\n",
  			s, FontNumber, PointSize, TroffX, TroffY);
  	}
+ 	if (s[0] == '\\' && (s[1] == '|' || s[1] == '^') )
+ 	{	/* Kludge for DWB 1.0, ignore \| and \^ */
+ 		if (debug) Fprintf(stderr,"Special \"%s\" ignored\n", s);
+ 		return;
+ 	}
  	for (i = 0; i < DESC_dev.nchtab; ++i)
  		if (strcmp(&DESC_funny_names[DESC_funny_index[i]], s) == 0)
  		{
*** OREADME	Fri Sep  1 21:51:31 1989
--- README	Fri Sep  1 21:57:29 1989
***************
*** 55,76
  
  	  - Can	print in landscape or portrait orientations.
  
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
  	  - Can	print multiple logical pages per physical page.
  
  	  - Can	print manual pages on both sides of legal paper	for

--- 55,60 -----
  
  	  - Can	print in landscape or portrait orientations.
  
  	  - Can	print multiple logical pages per physical page.
  
  	  - Can	print manual pages on both sides of legal paper	for
***************
*** 98,103
  	     path for the font libraries ``/usr/lib/font/devjet'',
  	     since troff itself	uses some of this information.
  
  	 3.  Edit ``djet/jetroff.sh'' and set the correct options
  	     so	that your ``lp'' spooler sends its output to your
  	     printer without converting	NL to CR/NL.  On our

--- 82,90 -----
  	     path for the font libraries ``/usr/lib/font/devjet'',
  	     since troff itself	uses some of this information.
  
+ 	 2a. If you are using a DWB 1.0 troff, read the comments
+ 	     in ``font/devjet/dwb1fix.sh''.
+ 
  	 3.  Edit ``djet/jetroff.sh'' and set the correct options
  	     so	that your ``lp'' spooler sends its output to your
  	     printer without converting	NL to CR/NL.  On our
***************
*** 107,113
  
  	 4.  If	you do not have	the extended font set for JetRoff,
  	     you must also edit	``font/devjet/fontlist'' and
! 	     comment out the H,	HI, HB,	and HD lines.
  
  	 5.  If	you are	a BSD site, go to the root of the source
  	     tree and type ``make bsd''.  This attempts	to build

--- 94,102 -----
  
  	 4.  If	you do not have	the extended font set for JetRoff,
  	     you must also edit	``font/devjet/fontlist'' and
! 	     comment out the H,	HI, HB,	and HD lines.  This will
! 	     cause troff to emit warnings about missing fonts on
! 	     some documents, and will instead choose the R font.
  
  	 5.  If	you are	a BSD site, go to the root of the source
  	     tree and type ``make bsd''.  This attempts	to build
***************
*** 123,142
  	 7.  cd	to ``doc'', and	type ``make man''.  If your shell
  	     is	too old	to grok	the ``jetroff''	script,	do this:
  
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
  		  tbl *.1 *.5 |	troff -mjetroff	-man -Tjet | djet | lp -otroff
  
  	     (Remember,	the ``-otroff''	depends	on your	local

--- 112,117 -----
  	 7.  cd	to ``doc'', and	type ``make man''.  If your shell
  	     is	too old	to grok	the ``jetroff''	script,	do this:
  
  		  tbl *.1 *.5 |	troff -mjetroff	-man -Tjet | djet | lp -otroff
  
  	     (Remember,	the ``-otroff''	depends	on your	local
***************
*** 153,158
  		  JetRoff Shareware
  		  94 Apple Orchard Drive
  		  Tinton Falls,	NJ   07724
  
  	10.  Remember that if you give someone a copy of the
  	     JetRoff source code, you must give	it to them without

--- 128,134 -----
  		  JetRoff Shareware
  		  94 Apple Orchard Drive
  		  Tinton Falls,	NJ   07724
+ 		  (201) 389-8963
  
  	10.  Remember that if you give someone a copy of the
  	     JetRoff source code, you must give	it to them without
***************
*** 177,198
  	 4.  Edit fontlist, and	add the	info about your	font.
  
  	 5.  Run ``fontcfg''.  That's it.
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
- 
  

--- 153,156 -----
  	 4.  Edit fontlist, and	add the	info about your	font.
  
  	 5.  Run ``fontcfg''.  That's it.
  
*** ORegister.mm	Fri Sep  1 21:57:51 1989
--- Register.mm	Fri Sep  1 22:01:41 1989
***************
*** 20,25
  JetRoff Shareware
  94 Apple Orchard Drive
  Tinton Falls, NJ   07724
  .DE
  
  

--- 20,26 -----
  JetRoff Shareware
  94 Apple Orchard Drive
  Tinton Falls, NJ   07724
+ (201) 389-8963
  .DE
  
  
***************
*** 23,30
  .DE
  
  
! If you would like to contribute and register your copy of JetRoff,
! please complete this form.  The suggested contribution, per computer
  on which you use JetRoff, is $50.00 for an individual and $100.00
  for a business (US Dollars).  Write to us for site licensing or
  resale information.

--- 24,31 -----
  .DE
  
  
! To license and register your copy of JetRoff,
! please complete this form.  The license fee, per computer
  on which you use JetRoff, is $50.00 for an individual and $100.00
  for a business (US Dollars).  Write to us for site licensing or
  resale information.
***************
*** 30,36
  resale information.
  
  I have read the JetRoff Licensing agreement and agree to the terms
! and conditions stated in it.
  
  
  '\"	This looks better if B is HD

--- 31,38 -----
  resale information.
  
  I have read the JetRoff Licensing agreement and agree to the terms
! and conditions stated in it.  I also understand that the licensed
! version 2.6 of JetRoff which I will receive is not shareware.
  
  
  '\"	This looks better if B is HD
***************
*** 50,55
  
  Phone	\l'4i'
  
  
  
  .ta 1.5i

--- 52,58 -----
  
  Phone	\l'4i'
  
+ E-Mail	\l'4i'
  
  
  .ta 1.5i
***************
*** 53,59
  
  
  .ta 1.5i
! Computer	\l'3.25i'
  
  Operating system	\l'3.25i'
  

--- 56,62 -----
  
  
  .ta 1.5i
! Computer/OS	\l'3.25i'
  
  Printer Model	\l'3.25i'
  
***************
*** 55,61
  .ta 1.5i
  Computer	\l'3.25i'
  
! Operating system	\l'3.25i'
  
  I got my copy from	\l'3.25i'
  

--- 58,64 -----
  .ta 1.5i
  Computer/OS	\l'3.25i'
  
! Printer Model	\l'3.25i'
  
  I got my copy from	\l'3.25i'
  
***************
*** 58,65
  Operating system	\l'3.25i'
  
  I got my copy from	\l'3.25i'
- 
- 
  
  
  .ta 3i

--- 61,66 -----
  Printer Model	\l'3.25i'
  
  I got my copy from	\l'3.25i'
  
  
  .ta 3i
*** OLicense	Fri Sep  1 22:06:30 1989
--- License	Fri Sep  1 22:08:20 1989
***************
*** 1,7
  	       tm
  	JetRoff   - HP LaserJet Series II postprocessor for DWB 2.0
  
! 	(c) Copyright 1988 PC Research, Inc.  All Rights Reserved.
  
  
  			SHAREWARE LICENSE

--- 1,7 -----
  	       tm
  	JetRoff   - HP LaserJet Series II postprocessor for DWB 2.0
  
! 	(c) Copyright 1988,1989 PC Research, Inc.  All Rights Reserved.
  
  
  			SHAREWARE LICENSE
***************
*** 17,22
  			JetRoff Shareware
  			94 Apple Orchard Drive
  			Tinton Falls, NJ   07724
  
  Smaller contributions will be accepted; send what you can afford.
  However, we believe that JetRoff is worth this token amount

--- 17,23 -----
  			JetRoff Shareware
  			94 Apple Orchard Drive
  			Tinton Falls, NJ   07724
+ 			(201) 389-8963
  
  When you consider the effort I've gone through to provide this
  package to you, the effort you may have to go through to get
***************
*** 18,27
  			94 Apple Orchard Drive
  			Tinton Falls, NJ   07724
  
- Smaller contributions will be accepted; send what you can afford.
- However, we believe that JetRoff is worth this token amount
- when compared to other commercial alternatives.
- 
  When you consider the effort I've gone through to provide this
  package to you, the effort you may have to go through to get
  your company or spouse to agree to write out a check is minimal.

--- 19,24 -----
  			Tinton Falls, NJ   07724
  			(201) 389-8963
  
  When you consider the effort I've gone through to provide this
  package to you, the effort you may have to go through to get
  your company or spouse to agree to write out a check is minimal.
***************
*** 26,34
  package to you, the effort you may have to go through to get
  your company or spouse to agree to write out a check is minimal.
  
! In return for your contribution, you will be placed on the list of
! registered users and notified of enhancements, bug fixes, and
! additional fonts for JetRoff.  All correspondence concerning
  JetRoff should be directed to the above address or to the
  USENET address: ..!uunet!pcrat!jetroff.
  

--- 23,31 -----
  package to you, the effort you may have to go through to get
  your company or spouse to agree to write out a check is minimal.
  
! In return for your license fee, you will be placed on the list of
! registered users and will receive the full version 2.6 source
! code and font sets.  All correspondence concerning
  JetRoff should be directed to the above address or to the
  USENET address: ..!uunet!pcrat!jetroff.
  
***************
*** 78,80
  	possession.
  
  August, 1988

--- 75,78 -----
  	possession.
  
  August, 1988
+ August, 1989
-- 
Rick Richardson | JetRoff "di"-troff to LaserJet Postprocessor|uunet!pcrat!dry2
PC Research,Inc.| Mail: uunet!pcrat!jetroff; For anon uucp do:|for Dhrystone 2
uunet!pcrat!rick| uucp jetroff!~jetuucp/file_list ~nuucp/.    |submission forms.
jetroff Wk2200-0300,Sa,Su ACU {2400,PEP} 12013898963 "" \d\r\d ogin: jetuucp