more files
This commit is contained in:
rsc
parent
173302913e
commit
61f5c35c94
37 changed files with 5947 additions and 1 deletions
218
src/cmd/postscript/tr2post/tr2post.c
Normal file
218
src/cmd/postscript/tr2post/tr2post.c
Normal file
|
|
@ -0,0 +1,218 @@
|
|||
#include <u.h>
|
||||
#include <libc.h>
|
||||
#include <bio.h>
|
||||
#include <stdio.h>
|
||||
#include "common.h"
|
||||
#include "tr2post.h"
|
||||
#include "comments.h"
|
||||
#include "path.h"
|
||||
|
||||
int formsperpage = 1;
|
||||
int picflag = 1;
|
||||
double aspectratio = 1.0;
|
||||
int copies = 1;
|
||||
int landscape = 0;
|
||||
double magnification = 1.0;
|
||||
int linesperpage = 66;
|
||||
int pointsize = 10;
|
||||
double xoffset = .25;
|
||||
double yoffset = .25;
|
||||
char *passthrough = 0;
|
||||
|
||||
Biobuf binp, *bstdout, bstderr;
|
||||
Biobuf *Bstdin, *Bstdout, *Bstderr;
|
||||
int debug = 0;
|
||||
|
||||
char tmpfilename[MAXTOKENSIZE];
|
||||
char copybuf[BUFSIZ];
|
||||
|
||||
|
||||
struct charent **build_char_list = 0;
|
||||
int build_char_cnt = 0;
|
||||
|
||||
void
|
||||
prologues(void) {
|
||||
int i;
|
||||
char charlibname[MAXTOKENSIZE];
|
||||
|
||||
Bprint(Bstdout, "%s", CONFORMING);
|
||||
Bprint(Bstdout, "%s %s\n", VERSION, PROGRAMVERSION);
|
||||
Bprint(Bstdout, "%s %s\n", DOCUMENTFONTS, ATEND);
|
||||
Bprint(Bstdout, "%s %s\n", PAGES, ATEND);
|
||||
Bprint(Bstdout, "%s", ENDCOMMENTS);
|
||||
|
||||
if (cat(unsharp(DPOST))) {
|
||||
Bprint(Bstderr, "can't read %s\n", DPOST);
|
||||
exits("dpost prologue");
|
||||
}
|
||||
|
||||
if (drawflag) {
|
||||
if (cat(unsharp(DRAW))) {
|
||||
Bprint(Bstderr, "can't read %s\n", DRAW);
|
||||
exits("draw prologue");
|
||||
}
|
||||
}
|
||||
|
||||
if (DOROUND)
|
||||
cat(unsharp(ROUNDPAGE));
|
||||
|
||||
Bprint(Bstdout, "%s", ENDPROLOG);
|
||||
Bprint(Bstdout, "%s", BEGINSETUP);
|
||||
Bprint(Bstdout, "mark\n");
|
||||
if (formsperpage > 1) {
|
||||
Bprint(Bstdout, "%s %d\n", FORMSPERPAGE, formsperpage);
|
||||
Bprint(Bstdout, "/formsperpage %d def\n", formsperpage);
|
||||
}
|
||||
if (aspectratio != 1) Bprint(Bstdout, "/aspectratio %g def\n", aspectratio);
|
||||
if (copies != 1) Bprint(Bstdout, "/#copies %d store\n", copies);
|
||||
if (landscape) Bprint(Bstdout, "/landscape true def\n");
|
||||
if (magnification != 1) Bprint(Bstdout, "/magnification %g def\n", magnification);
|
||||
if (pointsize != 10) Bprint(Bstdout, "/pointsize %d def\n", pointsize);
|
||||
if (xoffset != .25) Bprint(Bstdout, "/xoffset %g def\n", xoffset);
|
||||
if (yoffset != .25) Bprint(Bstdout, "/yoffset %g def\n", yoffset);
|
||||
cat(unsharp(ENCODINGDIR"/Latin1.enc"));
|
||||
if (passthrough != 0) Bprint(Bstdout, "%s\n", passthrough);
|
||||
|
||||
Bprint(Bstdout, "setup\n");
|
||||
if (formsperpage > 1) {
|
||||
cat(unsharp(FORMFILE));
|
||||
Bprint(Bstdout, "%d setupforms \n", formsperpage);
|
||||
}
|
||||
/* output Build character info from charlib if necessary. */
|
||||
|
||||
for (i=0; i<build_char_cnt; i++) {
|
||||
sprint(charlibname, "%s/%s", CHARLIB, build_char_list[i]->name);
|
||||
if (cat(unsharp(charlibname)))
|
||||
Bprint(Bstderr, "cannot open %s\n", charlibname);
|
||||
}
|
||||
|
||||
Bprint(Bstdout, "%s", ENDSETUP);
|
||||
}
|
||||
|
||||
void
|
||||
cleanup(void) {
|
||||
remove(tmpfilename);
|
||||
}
|
||||
|
||||
main(int argc, char *argv[]) {
|
||||
Biobuf *binp;
|
||||
Biobuf *Binp;
|
||||
int i, tot, ifd;
|
||||
char *t;
|
||||
|
||||
programname = argv[0];
|
||||
if (Binit(&bstderr, 2, OWRITE) == Beof) {
|
||||
exits("Binit");
|
||||
}
|
||||
Bstderr = &bstderr;
|
||||
|
||||
tmpnam(tmpfilename);
|
||||
if ((bstdout=Bopen(tmpfilename, OWRITE)) == 0) {
|
||||
Bprint(Bstderr, "cannot open temporary file %s\n", tmpfilename);
|
||||
exits("Bopen");
|
||||
}
|
||||
atexit(cleanup);
|
||||
Bstdout = bstdout;
|
||||
|
||||
ARGBEGIN{
|
||||
case 'a': /* aspect ratio */
|
||||
aspectratio = atof(ARGF());
|
||||
break;
|
||||
case 'c': /* copies */
|
||||
copies = atoi(ARGF());
|
||||
break;
|
||||
case 'd':
|
||||
debug = 1;
|
||||
break;
|
||||
case 'm': /* magnification */
|
||||
magnification = atof(ARGF());
|
||||
break;
|
||||
case 'n': /* forms per page */
|
||||
formsperpage = atoi(ARGF());
|
||||
break;
|
||||
case 'o': /* output page list */
|
||||
pagelist(ARGF());
|
||||
break;
|
||||
case 'p': /* landscape or portrait mode */
|
||||
if ( ARGF()[0] == 'l' )
|
||||
landscape = 1;
|
||||
else
|
||||
landscape = 0;
|
||||
break;
|
||||
case 'x': /* shift things horizontally */
|
||||
xoffset = atof(ARGF());
|
||||
break;
|
||||
case 'y': /* and vertically on the page */
|
||||
yoffset = atof(ARGF());
|
||||
break;
|
||||
case 'P': /* PostScript pass through */
|
||||
t = ARGF();
|
||||
i = strlen(t) + 1;
|
||||
passthrough = malloc(i);
|
||||
if (passthrough == 0) {
|
||||
Bprint(Bstderr, "cannot allocate memory for argument string\n");
|
||||
exits("malloc");
|
||||
}
|
||||
strncpy(passthrough, t, i);
|
||||
break;
|
||||
default: /* don't know what to do for ch */
|
||||
Bprint(Bstderr, "unknown option %C\n", ARGC());
|
||||
break;
|
||||
}ARGEND;
|
||||
readDESC();
|
||||
if (argc == 0) {
|
||||
if ((binp = (Biobuf *)malloc(sizeof(Biobuf))) < (Biobuf *)0) {
|
||||
Bprint(Bstderr, "malloc failed.\n");
|
||||
exits("malloc");
|
||||
}
|
||||
if (Binit(binp, 0, OREAD) == Beof) {
|
||||
Bprint(Bstderr, "Binit of <stdin> failed.\n");
|
||||
exits("Binit");
|
||||
}
|
||||
Binp = binp;
|
||||
if (debug) Bprint(Bstderr, "using standard input\n");
|
||||
conv(Binp);
|
||||
Bterm(Binp);
|
||||
}
|
||||
for (i=0; i<argc; i++) {
|
||||
if ((binp=Bopen(argv[i], OREAD)) == 0) {
|
||||
Bprint(Bstderr, "cannot open file %s\n", argv[i]);
|
||||
continue;
|
||||
}
|
||||
Binp = binp;
|
||||
inputfilename = argv[i];
|
||||
conv(Binp);
|
||||
Bterm(Binp);
|
||||
}
|
||||
Bterm(Bstdout);
|
||||
|
||||
if ((ifd=open(tmpfilename, OREAD)) < 0) {
|
||||
Bprint(Bstderr, "open of %s failed.\n", tmpfilename);
|
||||
exits("open");
|
||||
}
|
||||
|
||||
bstdout = galloc(0, sizeof(Biobuf), "bstdout");
|
||||
if (Binit(bstdout, 1, OWRITE) == Beof) {
|
||||
Bprint(Bstderr, "Binit of <stdout> failed.\n");
|
||||
exits("Binit");
|
||||
}
|
||||
Bstdout = bstdout;
|
||||
prologues();
|
||||
Bflush(Bstdout);
|
||||
tot = 0; i = 0;
|
||||
while ((i=read(ifd, copybuf, BUFSIZ)) > 0) {
|
||||
if (write(1, copybuf, i) != i) {
|
||||
Bprint(Bstderr, "write error on copying from temp file.\n");
|
||||
exits("write");
|
||||
}
|
||||
tot += i;
|
||||
}
|
||||
if (debug) Bprint(Bstderr, "copied %d bytes to final output i=%d\n", tot, i);
|
||||
if (i < 0) {
|
||||
Bprint(Bstderr, "read error on copying from temp file.\n");
|
||||
exits("read");
|
||||
}
|
||||
finish();
|
||||
|
||||
exits("");
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue