Date: Fri, 3 Jul 92 13:08:55 PDT From: edmoy@violet.berkeley.edu Subject: macps/prepfix v. 2.3 Well, here is the long-overdue System 7 compatible version of macps and prepfix, version 2.3, in shar format. Following are some excerpts from the included ReadMe file. Edward Moy Principal Programmer - Macintosh & Unix Workstation Support Services Workstation Software Support Group University of California Berkeley, CA 94720 -------------------------------------------------------------------------------- WHAT IS MACPS? Macps is a Unix program that takes an uploaded PostScript file created on a Macintosh (see macps.1 for more details) and includes an appropriately modified LaserPrep file so that the result can be sent to a PostScript printer from Unix. The LaserPrep file contains macros used by the PostScript generator on the Macintosh. HOW ARE THE LASERPREP FILES GENERATED? Since the Apple LaserPrep files are copyrighted, I've included a program, prepfix, that reads version 4.0 and up LaserPrep files, and edits them so that they are (mostly) compatible with Unix (See prepfix.1 for more details). CHANGES IN VERSION 2.3 Version 2.3 of prepfix now support LaserPrep 7.x (System 7). Resulting LaserPrep files are slightly smaller, since some extraneous comments have been removed. Version 2.3 of macps works with System 7-generated PostScript files, replacing the included LaserPrep with the modified version. Because of the way this change was made, macps can now work on either a Command-F or Command-K (pre-System 7) PostScript file. Creating a PostScript file under System 7 will cause all fonts used in a document to be downloaded. Downloaded fonts, especially TrueType fonts, tend to make the resulting PostScript file very large. Both the size of the PostScript file and the complexity of a downloadable TrueType font can cause some printers to fail to print, even when the printer already contains the requested fonts. Software like H.M. Ayala's Trimmer CDEV (available from most Macintosh ftp sites and bulletin board systems) can prevents selected fonts (those already resident in the printer) from being downloaded. ----------- cut ------------------- cut -------------------- cut ------------ #! /bin/sh # This is a shell archive, meaning: # 1. Remove everything above the #! /bin/sh line. # 2. Save the resulting text in a file. # 3. Execute the file with /bin/sh (not csh) to create the files: # Installation # Makefile # ReadMe # macaux.c # macps.1 # macps.c # macps.config # prepfix.1 # prepfix.c # str.h # ucbwhich.c # ucbwhich.h # macps/prepfix v 2.3 - archive created: Fri Jul 3 12:35:19 PDT 1992 if test -f Installation then echo shar: will not overwrite existing file "'Installation'" else echo 'x - Installation' cat << \RAZZLE!DAZZLE > Installation Installation Instructions (SCCSid = "@(#)Installation 2.3 7/1/92") 1) Look at the Makefile. There are three CFLAGS options that you can use. Setting SYSV should allow macps and prepfix to compile on System V machines (I've only tried it under A/UX). Setting CONFIGDIR will cause macps to look for macps.config in that directory. Setting SAVE will cause macps to enclose the entire print job is a PostScript save/restore context. Normally you don't need SAVE, since most spooling software will automatically do an EOF between print jobs, which effectively does a restore of memory for you, but some spooling software does require the save/restore. Note that defining SAVE will cause printing to fail on a NeXT laser printer, while it is harmless on most other systems. The options will look something like: CFLAGS = -O -DSYSV -DCONFIGDIR=\"/usr/new/lib\" -DSAVE if you defined all the options. 2) Type "make". If all goes well, macps and prepfix will be created. 3) For pre-System 7 systems, to create the unprocessed LaserPrep file on the Mac, as well as creating the raw PostScript files that you want to print, make sure that either you're not running MultiFinder, or if you are, go to the Chooser under the Apple menu, click on the LaserWriter icon and then turn off Background Printing. (No special setting need to be made under System 7.) 4a) Under a pre-System 7 system, for each version of LaserPrep on the Mac that you want to include, install that version in the System Folder. Then, open an empty document in some simple application (one that doesn't have its own ProcSet to download). Choose Print from the File menu and the LaserWriter print dialog will appear. Click on the OK button and IMMEDIATELY press and hold Command-K. When a dialog box appears telling you that it is creating a PostScript file, you can release Command-K. The unprocessed LaserPrep file will usually be found in one of three places, in the System Folder, in the same folder as the application or at the top level of the disk. 4b) Under a System 7 system, make sure that the LaserWriter driver is installed in the System Folder. Then, open an empty document in some simple application (one that doesn't have its own ProcSet to download). Choose Print from the File menu and the LaserWriter print dialog will appear. Click on the PostScript File radio button, and then click on the Save button. When the standard file dialog box appears, specify a name and folder for the PostScript file, and click on the Save button. 5) Upload the PostScript file(s) to Unix, using some file transfer program like MacTerminal, Versaterm, Red Ryder, MacKermit or ftp. 6) Run prepfix on each unprocessed file, diverting the standard output to an appropriataly named file (like LaserPrep5.2). If you want to allow bit smoothing on a non-Apple PostScript printer, specify the -l option to prepfix (you can specify as many printer names as you want, each with a separate -l flag). If you aren't sure the your printer can do smoothing, you can try it and see if it works (if it doesn't, you can always re-run prepfix on the unprocessed file(s), leaving off the printer that doesn't work). If you don't know the product name for you printer, you can use the following PostScript code to print it: %! /in {72 mul} def /Courier findfont 18 scalefont setfont 1 in 8 in moveto statusdict /product get show showpage 7) Put the modified LaserPrep file(s) in some directory and modify the macps.config file to point to these LaserPrep files. Then put the macps.config file in a "lib" subdirectory to where you install macps (or in the directory CONFIGDIR if you used that option). 8) Now when you want to print something, do the same thing as in step 4 above with the LaserWriter print dialog, except for pre-System 7 system, press and hold Command-F (this cause LaserPrep not to be included in the PostScript file). 9) Upload the PostScript file and run macps on it, sending the output to your printer, as in: % macps psfile | lpr RAZZLE!DAZZLE fi # End Installation if test -f Makefile then echo shar: will not overwrite existing file "'Makefile'" else echo 'x - Makefile' cat << \RAZZLE!DAZZLE > Makefile # Copyright (c) 1988, 1992, The Regents of the University of California. # Edward Moy, Workstation Software Support Group, Workstation Support Serices, # Information Systems and Technology. # # Permission is granted to any individual or institution to use, copy, # or redistribute this software so long as it is not sold for profit, # provided that this notice and the original copyright notices are # retained. The University of California makes no representations about the # suitability of this software for any purpose. It is provided "as is" # without express or implied warranty. # # SCCSid = "@(#)Makefile 2.3 7/1/92" # # For System V, include -DSYSV in CFLAGS below. # To specify a fixed path for macps.config, include -DCONFIGDIR=\"path\" # in CFLAGS below (path is the full pathname of the directory). # To do save/restore context, include -DSAVE in CFLAGS below. # CFLAGS = -O MACPS = macps.o macaux.o ucbwhich.o PREPFIX = prepfix.o macaux.o all : macps prepfix macps : $(MACPS) cc -o macps $(CFLAGS) $(MACPS) prepfix : $(PREPFIX) cc -o prepfix $(CFLAGS) $(PREPFIX) macps.o : macps.c str.h ucbwhich.h macaux.o : macaux.c str.h prepfix.o : prepfix.c str.h ucbwhich.o : ucbwhich.c ucbwhich.h clean : /bin/rm -f *.o macps prepfix RAZZLE!DAZZLE fi # End Makefile if test -f ReadMe then echo shar: will not overwrite existing file "'ReadMe'" else echo 'x - ReadMe' cat << \RAZZLE!DAZZLE > ReadMe COPYRIGHT NOTICE (SCCSid = "@(#)ReadMe 2.3 7/3/92") Copyright (C) 1988, 1992, The Regents of the University of California. Edward Moy, Workstation Software Support Group, Workstation Support Serices, Information Systems and Technology. Permission is granted to any individual or institution to use, copy, or redistribute this software so long as it is not sold for profit, provided that this notice and the original copyright notices are retained. The University of California makes no representations about the suitability of this software for any purpose. It is provided "as is" without express or implied warranty. WHAT IS MACPS? Macps is a Unix program that takes an uploaded PostScript file created on a Macintosh (see macps.1 for more details) and includes an appropriately modified LaserPrep file so that the result can be sent to a PostScript printer from Unix. The LaserPrep file contains macros used by the PostScript generator on the Macintosh. WHY IS MACPS NEEDED? This is how Mac printing works. When a Mac talks to a LaserWriter, it asks if the LaserWriter has had a LaserPrep file downloaded to it. A LaserWriter that is first powered up, has no such LaserPrep file, and so the Mac downloads it and makes the LaserPrep file resident in memory. Then the actual print file is sent to the LaserWriter. Subsequent print requests need not download the LaserPrep file, unless it is a different version. Since a LaserWriter connected to a Unix system usually does things other than Mac printing, it is unwise to make LaserPrep files resident in memory so that other PostScript jobs have less memory to work with. What prepfix does is to modify a LaserPrep file so that, among other things, it does not make itself resident in memory. Thus, the LaserPrep file must be downloaded for each Mac print job. This is the function of macps, to automatically append the appropriate LaserPrep file. Since System 7, the LaserPrep is no longer downloaded to the printer. Some people have had success printing a System 7-generated PostScript file directly, but using macps should make printing more reliable and available to non-Apple PostScript printers. WHICH VERSION OF THE LASERPREP WILL BE USED? Macps interprets the %%IncludeProcSet directive found in the PostScript generated by LaserWriter driver 4.0 and greater. It takes the ProcSet id and looks it up in a file "macps.config", to get the pathname of the prep file, and thus macps can convert PostScript generated by different versions of the LaserWriter driver. HOW ARE THE LASERPREP FILES GENERATED? Since the Apple LaserPrep files are copyrighted, I've included a program, prepfix, that reads version 4.0 and up LaserPrep files, and edits them so that they are (mostly) compatible with Unix (See prepfix.1 for more details). WHERE IS THE MACPS.CONFIG FILE LOCATED? Macps has some special code that is able to figure out from which directory it was called from. It will then look in a "lib" subdiretory for the macps.config file. WHAT ABOUT BIT-SMOOTHING ON NON-LASERWRITER PRINTERS? For PostScript printers using Motorola 680x0 processors and Adobe PostScript firmware other than LaserWriters, there is an option that will allow these printers to do bit-smoothing, just like LaserWriters. CHANGES IN VERSION 2.3 Version 2.3 of prepfix now support LaserPrep 7.x (System 7). Resulting LaserPrep files are slightly smaller, since some extraneous comments have been removed. Version 2.3 of macps works with System 7-generated PostScript files, replacing the included LaserPrep with the modified version. Because of the way this change was made, macps can now work on either a Command-F or Command-K (pre-System 7) PostScript file. Creating a PostScript file under System 7 will cause all fonts used in a document to be downloaded. Downloaded fonts, especially TrueType fonts, tend to make the resulting PostScript file very large. Both the size of the PostScript file and the complexity of a downloadable TrueType font can cause some printers to fail to print, even when the printer already contains the requested fonts. Software like H.M. Ayala's Trimmer CDEV (available from most Macintosh ftp sites and bulletin board systems) can prevents selected fonts (those already resident in the printer) from being downloaded. CHANGES IN VERSION 2.2 Version 2.2 of prepfix now supports LaserPrep 6.0. The PostScript save/restore context is now a compile-time option, since it caused printing to fail on a NeXT printer (though it was harmless on most other printers). This save/restore is now more intelligent about clearing the stacks. CHANGES IN VERSION 2.1 Version 2.1 of prepfix uses a safer method for turning on bit-smoothing for non-Apple printers. This should get around some of the problems people have been having with specialized macros in the LaserPreps that are Apple printer specific. The -l and -p options in version 1.1 have been replaced with the single -l option, and the limit on the number of printers you can specify has been removed. Also, prepfix removes some other various macros that cause unpredictable problems, and a problem with Apple LaserWriter II/NTs (but not other Apple printers). Version 2.1 macps has several new options. The -c option allow you to specify the number of copies to generate (overriding any multiple copy option that was specified on the Macintosh). The -d option allows an alternate directory to look for the macps.config file. Finally, the -r (raw) option suppresses the conversion of 8-bit binary into ASCII, and is useful for some graphics programs that manipulate gray-scale images, and produce 8-bit binary PostScript output. Macps will even work with a NeXT laser printer, but (at least the 0.8 version of the operating system) will not do bit smoothing. Beware, though, that if you print Macintosh patterns at 400 dpi, they will look funny. RAZZLE!DAZZLE fi # End ReadMe if test -f macaux.c then echo shar: will not overwrite existing file "'macaux.c'" else echo 'x - macaux.c' cat << \RAZZLE!DAZZLE > macaux.c /* * Copyright (c) 1988, 1992, The Regents of the University of California. * Edward Moy, Workstation Software Support Group, Workstation Support Serices, * Information Systems and Technology. * * Permission is granted to any individual or institution to use, copy, * or redistribute this software so long as it is not sold for profit, * provided that this notice and the original copyright notices are * retained. The University of California makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. */ #ifndef lint static char *SCCSid = "@(#)macaux.c 2.3 7/1/92"; #endif lint #include #include #include "str.h" #define FALSE 0 #define TRUE 1 extern char *myname; int rawmode = FALSE; STR * STRalloc() { register STR *str; char *malloc(); if((str = (STR *)malloc(sizeof(STR))) == NULL || (str->bufptr = (byte *)malloc(STRSIZE)) == NULL) { fprintf(stderr, "%s: STRalloc: Out of memory\n", myname); exit(1); } str->curendptr = str->bufptr; str->realendptr = str->bufptr + STRSIZE; return(str); } STRfree(str) STR *str; { free((char *)str->bufptr); free((char *)str); } STRexpand(str) register STR *str; { register int curend, realend; char *realloc(); curend = str->curendptr - str->bufptr; realend = (str->realendptr - str->bufptr) + STRSIZEDELTA; if((str->bufptr = (byte *)realloc((char *)str->bufptr, realend)) == NULL) { fprintf(stderr, "%s: STRexpand: Out of memory\n", myname); exit(1); } str->curendptr = str->bufptr + curend; str->realendptr = str->bufptr + realend; } STRgets(str, fp) register STR *str; register FILE *fp; { register int c; str->curendptr = str->bufptr; for( ; ; ) { if((c = getc(fp)) == EOF) return(str->curendptr > str->bufptr); if(str->curendptr >= str->realendptr) STRexpand(str); *str->curendptr++ = c; if(c == '\n' || c == '\r') { if(str->curendptr >= str->realendptr) STRexpand(str); *str->curendptr = 0; return(TRUE); } } } STRputsptr(str, cp, fp) register STR *str; register byte *cp; register FILE *fp; { if(rawmode) { for( ; cp < str->curendptr ; cp++) putc(*cp, fp); return; } for( ; cp < str->curendptr ; cp++) { if(!isascii(*cp)) fprintf(fp, "\\%03o", *cp); else if(isprint(*cp)) putc(*cp, fp); else { switch(*cp) { case '\n': case '\r': putc('\n', fp); continue; case '\t': putc('\t', fp); continue; default: fprintf(fp, "\\%03o", *str); continue; } } } } STRcompareptr(str, cp, sp) register STR *str; register byte *cp, *sp; { register int comp; for( ; ; ) { if(*sp == 0) return(cp >= str->curendptr ? 0 : 1); if(cp >= str->curendptr) return(-1); if(*sp == '\n') { if(*cp != '\n' && *cp != '\r') return((int)*cp - (int)*sp); } else if((comp = (int)*cp - (int)*sp) != 0) return(comp); cp++; sp++; } } STRheadcmpptr(str, cp, sp) register STR *str; register byte *cp, *sp; { register int comp; for( ; ; ) { if(*sp == 0) return(0); if(cp >= str->curendptr) return(-1); if(*sp == '\n') { if(*cp != '\n' && *cp != '\r') return((int)*cp - (int)*sp); } else if((comp = (int)*cp - (int)*sp) != 0) return(comp); cp++; sp++; } } byte * STRmatch(str, sp) register STR *str; register byte *sp; { register byte *mp, *last; register int firstchar; firstchar = *sp; last = str->curendptr - strlen(sp); mp = str->bufptr; while(mp <= last) { if(*mp == firstchar && STRheadcmpptr(str, mp, sp) == 0) return(mp); mp++; } return(NULL); } RAZZLE!DAZZLE fi # End macaux.c if test -f macps.1 then echo shar: will not overwrite existing file "'macps.1'" else echo 'x - macps.1' cat << \RAZZLE!DAZZLE > macps.1 .\" SCCSid = "@(#)macps.1 2.3 7/3/92" .TH MACPS 1 "1 July 1992" .UC 4 .SH NAME macps \- print Macintosh-created PostScript file on Unix .SH SYNOPSIS .B macps [ \-c copies ] [ \-d directory ] [ \-r ] [ file ] .SH DESCRIPTION .I Macps takes the command-line file (or the standard input if no filename is given), and prepends the appropriate Macintosh LaserPrep file (e.g., those generated by .IR prepfix (1)). The standard output can then be directed to a PostScript printer, via .IR lpr (1), for example. .PP The input PostScript file is generated on a Macintosh in one of two ways. On pre-System 7 systems, this PostScript file is created by typing (and holding) Command-F immediately after clicking the OK button of the LaserWriter Print dialog box. Another dialog will appear, confirming that a file named ``PostScript'' is being created (the Command-F keys can be released now). Depending on the application, the created PostScript file can be found in the System Folder, the application folder or the top level of the disk. .PP On System 7 systems, the Print dialog box allows the selection of the destination of the output. Clicking on the PostScript File radio button and then clicking the Save button will cause a standard file dialog box to appear, allowing the user to specify the name and location of the resultant PostScript file. .PP The PostScript file can then be uploaded via some file transfer program, such as MacTerminal/VersaTerm and .IR macget (1), MacKermit/Red Ryder and .IR kermit (1) or .IR ftp (1). .PP Normally, you would specify the number of copies in the LaserWriter Print dialog box on the Macintosh. However, you can override that after uploading the PostScript file by specifying the .B \-c option, followed by the number of copies. .PP In a Macintosh PostScript file, the line beginning with ``%%IncludeProcSet:'' is a request to include a LaserPrep with the internal name that follows on the same line as the ``%%IncludeProcSet:'' directive. This internal name corresponds to the name in a LaserPrep file that follows on the same line as the ``%%BeginProcSet:'' directive. .PP To specify where a LaserPrep file with a certain internal name is stored, a file named .B macps.config is used. This file is composed of one of more lines; one for each LaserPrep file. Each line contains the internal name followed a tab character followed by the name of file containing the corresponding LaserPrep. The file name can be either a full pathname or a pathname relative to the directory that .B macps.config resides. .PP The .B macps.config file is normally located in a `lib' subdirectory of the directory .I macps is located. The .B \-d option allow you to specify an alternate directory in which the .B macps.config file can be found. .PP Most Macintosh applications produce normal ASCII PostScript files. However, some graphics programs that manipulate gray-scale images will produce PostScript files that contain 8-bit binary data. Since .I macps normally converts this binary data, these PostScript files will not work properly. The .B \-r (raw) option suppresses this binary conversion. (Note: Depending on how the printer is physically connected, it may not be able to handle 8-bit binary data properly, and results may be disappointing.) .SH FILES .TP "\w'lib/macps.config 'u" lib/macps.config Maps ProcSet internal names to LaserPrep filenames .SH "SEE ALSO" lpr(1), macget(1), kermit(1), prepfix(1) .SH BUGS .I Macps only works with version 4.0 and up of the Macintosh LaserPrep files. .PP Because of the way bit smoothing is implemented by the LaserWriter driver, some PostScript printers other than the Apple LaserWriters may not be able to bit smooth. .PP Creating a PostScript file under System 7 will cause all fonts used in a document to be downloaded. Downloaded fonts, especially TrueType fonts, tend to make the resulting PostScript file very large. Both the size of the PostScript file and the complexity of a downloadable TrueType font can cause some printers to fail to print, even when the printer already contains the requested fonts. Software like H.M. Ayala's Trimmer CDEV (available from most Macintosh ftp sites and bulletin board systems) can prevents selected fonts (those already resident in the printer) from being downloaded. RAZZLE!DAZZLE fi # End macps.1 if test -f macps.c then echo shar: will not overwrite existing file "'macps.c'" else echo 'x - macps.c' cat << \RAZZLE!DAZZLE > macps.c /* * Copyright (c) 1988, 1992, The Regents of the University of California. * Edward Moy, Workstation Software Support Group, Workstation Support Serices, * Information Systems and Technology. * * Permission is granted to any individual or institution to use, copy, * or redistribute this software so long as it is not sold for profit, * provided that this notice and the original copyright notices are * retained. The University of California makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. */ #ifndef lint static char *SCCSid = "@(#)macps.c 2.3 7/1/92"; #endif lint #include #include #ifdef SYSV #include #else SYSV #include #endif SYSV #include #include #include "str.h" #include "ucbwhich.h" #define BEGINPROC 1 #define CONFIG "macps.config" #define INCLUDEPROC 0 #define PS_INCLUDED 0x1 #ifdef SYSV #define index strchr #define rindex strrchr #endif SYSV typedef struct procset_str { struct procset_str *next; char *procset; char *path; short flags; } ProcSet; ProcSet *firstprocset; #ifdef SAVE char *finale = "clear countdictstack 2 sub{end}repeat macps restore\n"; char intro[] = "\ %%! *** Created by macps: %s\ /macps save def\n\ "; #else SAVE char intro[] = "\ %%! *** Created by macps: %s\ "; #endif SAVE ProcSet *lastprocset; char *myname; int ncopies = 0; #ifdef CONFIGDIR char ucblib[UCBMAXPATHLEN] = CONFIGDIR; #else CONFIGDIR int ucbalternate; char ucbpath[UCBMAXPATHLEN]; char ucblib[UCBMAXPATHLEN]; #endif CONFIGDIR void copyproc(); ProcSet *findprocset(); void insertproc(); char *newstring(); void newprocset(); void readprocfile(); void Usage(); main(argc, argv) int argc; char **argv; { register STR *str; register char *cp; long ltime; char *ctime(); #ifndef CONFIGDIR ucbwhich(*argv); #endif CONFIGDIR strcat(ucblib, "/"); if(myname = rindex(*argv, '/')) myname++; else myname = *argv; cp = NULL; for(argc--, argv++ ; argc > 0 && **argv == '-' ; argc--, argv++) { switch((*argv)[1]) { case 'c': /* multiple copies */ if((*argv)[2]) ncopies = atoi(&(*argv[2])); else { if(argc < 2) Usage(); /* never returns */ argc--; ncopies = atoi(*++argv); } if(ncopies <= 0) Usage(); /* never returns */ break; case 'd': /* alternate directory for config file */ if((*argv)[2]) cp = &(*argv[2]); else { if(argc < 2) Usage(); /* never returns */ argc--; cp = *++argv; } strcpy(ucblib, cp); break; case 'r': /* raw mode */ rawmode++; break; default: Usage(); /* never returns */ } } if(argc > 1) Usage(); /* never returns */ if(argc == 1 && freopen(*argv, "r", stdin) == NULL) { fprintf(stderr, "%s: can't open %s\n", myname, *argv); exit(1); } readprocfile(); str = STRalloc(); if(!STRgets(str, stdin)) { fprintf(stderr, "%s: Null input\n", myname); exit(1); } time(<ime); printf(intro, ctime(<ime)); do { if(ncopies != 0 && STRheadcompare(str, "userdict /#copies ") == 0) continue; if(STRcompare(str, "%%EOF\n") == 0) { #ifdef SAVE if(finale) { fputs(finale, stdout); finale = NULL; } #endif SAVE STRputs(str, stdout); continue; } if(STRheadcompare(str, "%%IncludeProcSet:") == 0) { insertproc(str, INCLUDEPROC); continue; } if(STRheadcompare(str, "%%BeginProcSet:") == 0) { insertproc(str, BEGINPROC); continue; } STRputs(str, stdout); if(ncopies > 1 && isascii(*str->bufptr) && isdigit(*str->bufptr)) { cp = (char *)str->bufptr; while(cp < (char *)str->curendptr && isascii(*cp) && isdigit(*cp)) cp++; if((char *)str->curendptr - cp == 4 && STRcompareptr(str, cp, " mf\n") == 0) { printf("userdict /#copies %d put\n", ncopies); ncopies = -1; } } } while(STRgets(str, stdin)); #ifdef SAVE if(finale) fputs(finale, stdout); #endif SAVE exit(0); } void insertproc(str, beginproc) register STR *str; int beginproc; { register char *cp, *pp; register int i, n, fd; register ProcSet *ps; char buf[BUFSIZ]; cp = index((char *)str->bufptr, ':') + 1; strcpy(buf, cp); cp = buf; for( ; ; cp++) { if(!*cp) { fprintf(stderr, "%s: Syntax error on IncludeProcSet/BeginProcSet line\n", myname); exit(1); } if(!isascii(*cp) || !isspace(*cp)) break; } pp = cp + strlen(cp); while(--pp >= cp) { if(!isascii(*pp) || !isspace(*pp)) break; *pp = 0; } if((ps = findprocset(cp)) == NULL) { if(beginproc) { STRputs(str, stdout); copyproc(str, stdout); return; } fprintf(stderr, "%s: Unknown IncludeProcSet %s\n", myname, cp); exit(1); } if(ps->flags & PS_INCLUDED) return; ps->flags |= PS_INCLUDED; if(*(ps->path) == '/') strcpy(buf, ps->path); else { strcpy(buf, ucblib); strcat(buf, ps->path); } fflush(stdout); if((fd = open(buf, O_RDONLY, 0)) < 0) { fprintf(stderr, "%s: Can't open %s\n", myname, buf); exit(1); } if(beginproc) copyproc(str, NULL); while((i = read(fd, buf, BUFSIZ)) > 0) { do { if((n = write(1, buf, i)) < 0) { fprintf(stderr, "%s: Write error\n", myname); exit(1); } } while((i -= n) > 0); } close(fd); } void readprocfile() { register FILE *fp; register char *pp; register int linenum; char buf[BUFSIZ]; strcpy(buf, ucblib); strcat(buf, CONFIG); if((fp = fopen(buf, "r")) == NULL) { fprintf(stderr, "%s: Can't open %s\n", myname, buf); exit(1); } linenum = 0; while(fgets(buf, BUFSIZ, fp)) { linenum++; if(*buf == '#') continue; if(pp = index(buf, '\n')) { if(pp == buf) continue; *pp = 0; } if(!(pp = index(buf, '\t'))) { fprintf(stderr, "%s: Syntax error in macps.config, line %d\n", myname, linenum); exit(1); } *pp++ = 0; newprocset(buf, pp); } fclose(fp); } void copyproc(str, fp) register STR *str; register FILE *fp; { for( ; ; ) { if(!STRgets(str, stdin)) { fprintf(stderr, "%s: End of file copying ProcSet\n", myname); exit(1); } if(fp) STRputs(str, fp); if(STRheadcompare(str, "%%EndProcSet") == 0) return; } } void newprocset(procset, path) char *procset, *path; { register ProcSet *ps; char *calloc(); if((ps = (ProcSet *)calloc(1, sizeof(ProcSet))) == NULL) { fprintf(stderr, "%s: Out of memory allocating ProcSet\n", myname); exit(1); } if(firstprocset) { lastprocset->next = ps; lastprocset = ps; } else firstprocset = lastprocset = ps; ps->procset = newstring(procset); ps->path = newstring(path); } ProcSet * findprocset(procset) register char *procset; { register ProcSet *ps; for(ps = firstprocset ; ps ; ps = ps->next) { if(strcmp(procset, ps->procset) == 0) return(ps); } return(NULL); } char * newstring(str) register char *str; { register char *cp; char *malloc(); if((cp = malloc(strlen(str) + 1)) == NULL) { fprintf(stderr, "%s: Out of memory allocating string\n", myname); exit(1); } strcpy(cp, str); return(cp); } void Usage() { fputs("Usage: macps [-c #] [-d directory] [-r] [file]\n", stderr); exit(1); } RAZZLE!DAZZLE fi # End macps.c if test -f macps.config then echo shar: will not overwrite existing file "'macps.config'" else echo 'x - macps.config' cat << \RAZZLE!DAZZLE > macps.config # This is the config file read by macps. # SCCSid = "@(#)macps.config 2.3 7/1/92" # # Each line is composed of the %%IncludeProcSet id, a tab and the file # containing the ProcSet. If the file doesn't begin with a slash, the # the name is taken to be relative to the directory in which this config file # resides. "(AppleDict md)" 65 0 ProcSets/LaserPrep4.0 "(AppleDict md)" 66 ProcSets/LaserPrep5.0 "(AppleDict md)" 67 0 ProcSets/LaserPrep5.1 "(AppleDict md)" 68 0 ProcSets/LaserPrep5.2 "(AppleDict md)" 70 0 ProcSets/LaserPrep6.0 "(AppleDict md)" 71 0 ProcSets/LaserPrep7.0 RAZZLE!DAZZLE fi # End macps.config if test -f prepfix.1 then echo shar: will not overwrite existing file "'prepfix.1'" else echo 'x - prepfix.1' cat << \RAZZLE!DAZZLE > prepfix.1 .\" SCCSid = "@(#)prepfix.1 2.3 7/1/92" .TH PREPFIX 1 "1 Jul 1992" .UC 4 .SH NAME prepfix \- converts Apple LaserPrep files to form useable on Unix .SH SYNOPSIS .B prepfix [ \-l printer_name1 [ \-l printer_name2 ]... ] [ file ] .SH DESCRIPTION .I Prepfix takes the command-line LaserPrep file (or the standard input if no filename is given), and converts it into a form that is useable on Unix with the .IR macps (1). .PP To use .IR prepfix , create the input LaserPrep file on a Macintosh by opening an empty document in some application, and selecting .B Print from the .B File menu. On a pre-System 7 system, typing (and holding) Command-K immediately after clicking the .B OK button in the LaserWriter print dialog box will cause another dialog to appear, confirming that a file named ``PostScript'' is being created (the Command-K keys can be released now). Depending on the application, the created PostScript file can be found in the System Folder, the application folder or the top level of the disk. .PP On a System 7 system, clicking on the .B "PostScript File" radio button and then clicking on the .B Save button will cause a standard file dialog to appear, requesting the name and location to save the PostScript file. .PP This PostScript file can then be uploaded via some file transfer program, such as MacTerminal/VersaTerm and .IR macget (1), MacKermit/Red Ryder and .IR kermit (1) or .IR ftp (1). .PP Normally, only Apple LaserWriters can take advantage of the bit smoothing feature of the LaserPrep file. However, other PostScript laser printer using the Motorola 680x0 processor and the Adobe PostScript firmware can be made to do bit smoothing by specifying for each printer the .B \-l option and the printer's name, as returned by the PostScript .B product command in .B statusdict (remember to quote the printer name if it contains blanks). The resulting LaserPrep file will be modified so that for LaserWriters and for printers specified in the .B \-l option, bit smoothing will be allowed (smoothing must still be selected in the Print Dialog box when saving the PostScript to disk). More than one printer name can be specified using additional .B \-l and printer name pairs. .SH "SEE ALSO" ftp(1), macps(1), macget(1), kermit(1) .SH BUGS .I Prepfix only works with version 4.0 and up of the Macintosh LaserPrep files. RAZZLE!DAZZLE fi # End prepfix.1 if test -f prepfix.c then echo shar: will not overwrite existing file "'prepfix.c'" else echo 'x - prepfix.c' cat << \RAZZLE!DAZZLE > prepfix.c /* * Copyright (c) 1988, 1992, The Regents of the University of California. * Edward Moy, Workstation Software Support Group, Workstation Support Serices, * Information Systems and Technology. * * Permission is granted to any individual or institution to use, copy, * or redistribute this software so long as it is not sold for profit, * provided that this notice and the original copyright notices are * retained. The University of California makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. */ #ifndef lint static char *SCCSid = "@(#)prepfix.c 2.3 7/1/92"; #endif lint #include #include #ifdef SYSV #include #else SYSV #include #endif SYSV #include "str.h" #define CLEARTOMARK 12 #define EEXECLEN 80 #define EXTRA (NZEROLINE * ZEROLINE + CLEARTOMARK) #define LINELEN 256 #define NPRODUCTS 32 #define NZEROLINE 7 #define ZEROLINE 65 #ifdef SYSV #define index strchr #define rindex strrchr #endif SYSV char exstr[] = "\ %ck userdict/%s known not and{currentfile eexec}{%d{currentfile read\n\ pop pop}repeat}ifelse\n\ "; char *match(); char *myname; int maxproducts = NPRODUCTS; int nproducts = 0; char Ok[] = "\ /Ok{ok{true}{save /Pd statusdict /product get def false 0 1 ProdArr length\n\ 1 sub{Pd exch ProdArr exch get anchorsearch exch pop{pop pop true exit}if}for\n\ exch restore}ifelse}bind def\n\ "; char ProdArr0[] = "/ProdArr [\n"; char ProdArr1[] = "] def\n"; char **products; char tempname[] = "/tmp/prepfixXXXXXX"; main(argc, argv) int argc; char **argv; { register STR *str; register FILE *tp; register int i; register byte *lp; char buf[BUFSIZ]; char *malloc(), *realloc(); if(myname = rindex(*argv, '/')) myname++; else myname = *argv; for(argc--, argv++ ; argc > 0 && **argv == '-' ; argc--, argv++) { switch((*argv)[1]) { case 'h': usage(); case 'l': if(nproducts <= 0 && (products = (char **)malloc(maxproducts*sizeof(char *))) == NULL) { fprintf(stderr, "%s: Out of memory creating products array\n", myname); exit(1); } else if(nproducts >= maxproducts - 1 && (products = (char **)realloc(products, (maxproducts += NPRODUCTS) * sizeof(char *))) == NULL) { fprintf(stderr, "%s: Out of memory expanding products array\n", myname); exit(1); } if((*argv)[2]) products[nproducts++] = &(*argv)[2]; else { if(argc < 2) { fprintf(stderr, "%s: No argument for -l\n", myname); exit(1); } argc--; argv++; products[nproducts++] = *argv; } break; } } if(argc > 1) usage(); if(argc > 0 && freopen(*argv, "r", stdin) == NULL) { fprintf(stderr, "%s: Can't open %s\n", myname, *argv); exit(1); } mktemp(tempname); if((tp = fopen(tempname, "w+")) == NULL) { fprintf(stderr, "%s: Can't create temp file %s\n", myname, tempname); exit(1); } unlink(tempname); str = STRalloc(); if(!STRgets(str, stdin)) { fprintf(stderr, "%s: Null input\n", myname); exit(1); } for( ; ; ) { if(STRheadcompare(str, "% \251") == 0) { fputs("% ", tp); str->bufptr[0] = '('; str->bufptr[1] = 'C'; str->bufptr[2] = ')'; STRputs(str, tp); } else if(STRheadcompare(str, "%% \251") == 0) { fputs("%%", tp); str->bufptr[0] = ' '; str->bufptr[1] = '('; str->bufptr[2] = 'C'; str->bufptr[3] = ')'; STRputs(str, tp); } else if(STRheadcompare(str, "%%BeginProcSet:") == 0) { STRputs(str, stdout); rewind(tp); while((i = fread(buf, 1, BUFSIZ, tp)) > 0) fwrite(buf, 1, i, stdout); fclose(tp); break; } else if(STRheadcompare(str, "%{appledict") == 0) STRputs(str, tp); if(!STRgets(str, stdin)) { fprintf(stderr, "%s: No BeginProcSet\n", myname); exit(1); } } while(STRgets(str, stdin)) { if(nproducts > 0 && STRmatch(str, "/ok{")) { STRputs(str, stdout); fputs(ProdArr0, stdout); for(i = 0 ; i < nproducts ; i++) printf("(%s)\n", products[i]); fputs(ProdArr1, stdout); fputs(Ok, stdout); continue; } else if(STRmatch(str, "setdefaulttimeouts") || STRmatch(str, "setsccinteractive")) continue; else if(STRmatch(str, " checkload")) { checkload(str); continue; } else if(STRmatch(str, "/stretch") && STRmatch(str, "eexec")) { eexec("stretch", str); continue; } else if(STRmatch(str, "/smooth4") && STRmatch(str, "eexec")) { eexec("smooth4", str); continue; } else if(STRmatch(str, "(LaserWriter II NT)")) { while(STRgets(str, stdin) && STRheadcompare(str, "35de") != 0) { /* ignore line */ } while(STRgets(str, stdin) && isxdigit(*str->bufptr)) { /* ignore line */ } } else if(lp = STRmatch(str, "scaleby96{ppr")) { STRputsptr(str, lp, stdout); continue; } else if(STRmatch(str, "waittimeout")) continue; else if(STRheadcompare(str, "%%EndProcSet") == 0) { STRputs(str, stdout); break; } STRputs(str, stdout); } exit(0); } eexec(name, str) char *name; register STR *str; { register int len; if(!STRgets(str, stdin)) { fprintf(stderr, "%s: EOF during reading eexec\n", myname); exit(1); } len = (str->curendptr - str->bufptr) - 1; printf(exstr, nproducts > 0 ? 'O' : 'o', name, len + (len / EEXECLEN) + (len % EEXECLEN ? 1 : 0) + EXTRA); spliteexec(str); } checkload(str) register STR *str; { register byte *cp; if(nproducts > 0 && (cp = STRmatch(str, "ok "))) *cp = 'O'; STRputs(str, stdout); if(!STRgets(str, stdin)) { fprintf(stderr, "%s: EOF during reading eexec\n", myname); exit(1); } spliteexec(str); } spliteexec(str) register STR *str; { register int len; register byte *bp; bp = str->bufptr; len = (str->curendptr - bp) - 1; while(len >= 80) { fwrite(bp, 80, 1, stdout); putchar('\n'); bp += 80; len -= 80; } if(len > 0) { fwrite(bp, len, 1, stdout); putchar('\n'); } for( ; ; ) { if(!STRgets(str, stdin)) { fprintf(stderr, "%s: EOF reached before cleartomark\n", myname); exit(1); } STRputs(str, stdout); if(STRheadcompare(str, "cleartomark") == 0) return; } } usage() { fprintf(stderr, "Usage: %s [-l product_name1 [-l product_name2]...] [file]\n", myname); fprintf(stderr, " %s -help\n", myname); exit(1); } RAZZLE!DAZZLE fi # End prepfix.c if test -f str.h then echo shar: will not overwrite existing file "'str.h'" else echo 'x - str.h' cat << \RAZZLE!DAZZLE > str.h /* * Copyright (c) 1988, 1992, The Regents of the University of California. * Edward Moy, Workstation Software Support Group, Workstation Support Serices, * Information Systems and Technology. * * Permission is granted to any individual or institution to use, copy, * or redistribute this software so long as it is not sold for profit, * provided that this notice and the original copyright notices are * retained. The University of California makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. */ /* * SCCSid = "@(#)str.h 2.3 7/1/92" */ #define STRSIZEDELTA 1024 #define STRSIZE 1024 #define STRcompare(str,fp) STRcompareptr((str), (str)->bufptr, (fp)) #define STRheadcompare(str,fp) STRheadcmpptr((str), (str)->bufptr, (fp)) #define STRputs(str,fp) STRputsptr((str), (str)->bufptr, (fp)) typedef unsigned char byte; typedef struct { byte *bufptr; byte *curendptr; byte *realendptr; } STR; extern int rawmode; STR *STRalloc(); int STRcompareptr(); int STRfree(); int STRgets(); int STRheadcmpptr(); byte *STRmatch(); int STRputsptr(); RAZZLE!DAZZLE fi # End str.h if test -f ucbwhich.c then echo shar: will not overwrite existing file "'ucbwhich.c'" else echo 'x - ucbwhich.c' cat << \RAZZLE!DAZZLE > ucbwhich.c /* * Copyright (c) 1988, 1992, The Regents of the University of California. * Edward Moy, Workstation Software Support Group, Workstation Support Serices, * Information Systems and Technology. * * Permission is granted to any individual or institution to use, copy, * or redistribute this software so long as it is not sold for profit, * provided that this notice and the original copyright notices are * retained. The University of California makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. */ #ifndef CONFIGDIR #ifndef lint static char *SCCSid = "@(#)ucbwhich.c 2.3 7/1/92"; #endif lint #include #include #include #include "ucbwhich.h" #define F_OK 0 /* does file exist */ #define X_OK 1 /* is it executable by caller */ #define W_OK 2 /* writable by caller */ #define R_OK 4 /* readable by caller */ #define LIBLEN 4 #ifdef SYSV #define index strchr #define rindex strrchr #endif SYSV static char lib[] = "/lib"; char ucblib[UCBMAXPATHLEN]; int ucbalternate = 0; char ucbpath[UCBMAXPATHLEN]; ucbwhich(str) char *str; { register char *dir, *name, *cp, *tp; register int len; char dirbuf[UCBMAXPATHLEN], namebuf[UCBMAXPATHLEN]; struct stat sbuf; char *index(), *rindex(), *getwd(), *getenv(); strcpy(name = namebuf, str); if(*name == '/') /* absolute pathname */ *(rindex(dir = name, '/')) = 0 ; /* remove tail */ else { if(cp = index(name, '/')) { /* relative pathname */ if((dir = getwd(dirbuf)) == NULL) return(0); /* if any errors occurs assume standard version */ *cp++ = 0; for( ; ; ) { if(*name != 0) { /* multiple slashes */ if(strcmp(name, "..") == 0) { /* parent directory */ if((tp = rindex(dir, '/')) == NULL) return(0); if(tp == dir) tp++; /* root directory */ *tp = 0; /* remove last component */ } else if(strcmp(name, ".") != 0) { /* subdirectory */ strcat(dir, "/"); strcat(dir, name); } } name = cp; if((cp = index(name, '/')) == NULL) break; /* ignore last component */ *cp++ = 0; } } else { /* look through $PATH variable */ if((tp = getenv("PATH")) == NULL) return(0); for(name = namebuf ; ; ) { if(*tp == 0) return(0); else if(*tp == ':') tp++; if((cp = index(tp, ':')) == NULL) cp = tp + strlen(tp); /* positioned on null */ for(dir = dirbuf ; tp < cp ; ) *dir++ = *tp++; *dir = 0; strcpy(name, dir = dirbuf); strcat(name, "/"); strcat(name, str); if(stat(name, &sbuf) < 0 || (sbuf.st_mode & S_IFMT) != S_IFREG) continue; if(access(name, X_OK) == 0) { if(strcmp(dir, ".") == 0 && (dir = getwd(dirbuf)) == NULL) return(0); break; } } } } strcpy(ucbpath, dir); strcpy(ucblib, dir); if((len = strlen(dir)) < LIBLEN || strcmp(&dir[len - LIBLEN], lib) != 0) strcat(ucblib, lib); else ucbpath[len - LIBLEN] = 0; ucbalternate = (strcmp(ucbpath, UCBSTANDARD) != 0); #ifdef EBUG fprintf(stderr, "ucbwhich: alt=%d path=%s lib=%s\n", ucbalternate, ucbpath, ucblib); #endif EBUG return(ucbalternate); } #endif CONFIGDIR RAZZLE!DAZZLE fi # End ucbwhich.c if test -f ucbwhich.h then echo shar: will not overwrite existing file "'ucbwhich.h'" else echo 'x - ucbwhich.h' cat << \RAZZLE!DAZZLE > ucbwhich.h /* * Copyright (c) 1988, 1992, The Regents of the University of California. * Edward Moy, Workstation Software Support Group, Workstation Support Serices, * Information Systems and Technology. * * Permission is granted to any individual or institution to use, copy, * or redistribute this software so long as it is not sold for profit, * provided that this notice and the original copyright notices are * retained. The University of California makes no representations about the * suitability of this software for any purpose. It is provided "as is" * without express or implied warranty. */ /* * SCCSid = "@(#)ucbwhich.h 2.3 7/1/92" */ #define UCBMAXPATHLEN 128 #define UCBSTANDARD "/usr/ucb" extern char ucblib[]; extern int ucbalternate; extern char ucbpath[]; RAZZLE!DAZZLE fi # End ucbwhich.h echo '***** End of' macps/prepfix v 2.3 '*****' exit .