Hi all,
I have old sco server forwards print job to lprng-3.7.4-1 running on
linux-2.2.18. Then lprng forwards that job to Epson-570 text printer
attached to NT-4.0 workstation. On NT workstation I share printer as
EPSON570. The print job has 132 charcters on line. prints to 8.5 width
page. I want enhance mode on on the printer to get this print out to
look good. But lprng over rides that printer seetting and prints big
type. I tried to set up printer as generic text printer, lprng does not
overrides the enhace mode but at 80 columns (3/4 of page) it changes to
next line. On the printer auto line feed is off.
I guess my problem is that I cannot reset the printer and set it to
enhace mode just before the print job.
This worked fine on older version of LPRng. I have been using LPRng for
few years.
any help is greatly appriciated.
regards <[:-)]>
anil
this is my printcap
printer8:
:bk:sh:fq:pw=132:px=2880:mx=0
:server
:if=/usr/libexec/filters/wesF1
:sd=/var/spool/lpd/lp5
:lp=printer17@localhost
:lpd_bounce
Printer17:
:sd=/var/spool/lpd/lp1
:[EMAIL PROTECTED]
=========my filter=======================
#!/usr/bin/perl
#
#print"\033\@"; # Reset printer to default settings <=== does
not work this prints as text
do { # Create random filename for tempfile
$tempfile = "/var/spool/lpd/lp5/txtfilter" . (int(rand(4000)) + 1000);
} while (-e $tempfile);
open (TEMP, "+>$tempfile") || die "Could not create $tempfile : $!\n";
#seek (TEMP,0,0);
#print TEMP "\033\@\15"; <======does not work, this prints on the
document
while (defined($_ = <STDIN>)) {
print TEMP $_;
}
seek (TEMP,0,0);
print TEMP "\27\64\15"; <======does not work, this prints on the
document
while (defined($_ = <TEMP>)) {
print;
$lastline = $_;
}
close (TEMP);
#unlink ($tempfile) || die "Unable to delete $tempfile : $!\n";
Kind of interpretation of hexdump of print job from printer. I am not
sure about this. I assume that every print command starts with ==>1B<==.
1B 40 initialize printer
IB 28 47 01 00 01 set graphics mode
1B 28 55 01 00 0A define unit spacing
1B 72 00 do not have clue
IB 19 30 set 1/8 line spacing
IB 28 43 02 00 78 0F set page length
1B 28 63 04 00 00 00 78 0F do have clue
IB 28 56 02 00 00 00 0D 00 00 set absolute vertical print position
1B 2E 01 14 14 18 58 00+lots of hex - print raster graphics
1B 28 56 02 00 30 00 set absolute vertical print position
then print job data, I guess. These lines are generated from lprng.
-----------------------------------------------------------------------------
YOU MUST BE A LIST MEMBER IN ORDER TO POST TO THE LPRNG MAILING LIST
The address you post from MUST be your subscription address
If you need help, send email to [EMAIL PROTECTED] (or lprng-requests
or lprng-digest-requests) with the word 'help' in the body. For the impatient,
to subscribe to a list with name LIST, send mail to [EMAIL PROTECTED]
with: | example:
subscribe LIST <mailaddr> | subscribe lprng-digest [EMAIL PROTECTED]
unsubscribe LIST <mailaddr> | unsubscribe lprng [EMAIL PROTECTED]
If you have major problems, send email to [EMAIL PROTECTED] with the word
LPRNGLIST in the SUBJECT line.
-----------------------------------------------------------------------------
