Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!mips!apple!agate!ucbvax!pioneer.arc.nasa.gov!woo From: woo@pioneer.arc.nasa.gov (Alex Woo RAA) Newsgroups: comp.laser-printers Subject: PostScript Benchmark requested Summary: Simple test file Keywords: PostScript, Benchmark Message-ID: <9104231655.AA11055@crayola.cs.UMD.EDU> Date: 21 Apr 91 15:57:27 GMT References: <9104191549.AA03450@crayola.cs.UMD.EDU> Sender: daemon@ucbvax.BERKELEY.EDU Organization: NASA Ames Res. Ctr. Mtn Vw CA 94035 Lines: 169 Approved: laser-lovers@brillig.umd.edu A few days ago, Ralph Carmichael asked if any summaries of PostScript performance were available. The response was underwhelming. Here is a very simple test file which Jim Sullivan posted to comp.lang.postscript years ago. We have a limited variety of PostScript printers and we are most interested in the performance of the newer models, such as the HP LJ IIIsi, Kodak 716PS, etc. We would also be interested if a particular PostScript clone fails on this page. This includes PostScript previewers. We have run this file on Apple LaserWriters, NeXT '030 printer, and DEC LPS40. If you decide to print this file, please email the timing number to carmicha@pioneer.arc.nasa.gov or mail the output page to the address on the sheet. Thanks. ======================================================================== Alex Woo, MS 227-6 woo@ames.arc.nasa.gov NASA Ames Research Center __o NASAMAIL ACWOO Moffett Field, CA 94035-1000 -\<, SPANET 24644::WOO (415) 604-6010 (FAX) 604-4357 .....O/ O {hplabs,decwrl,uunet}!ames!woo ======================================================================== %! PS-Adobe %% Laser Doctor, Version 1.0.0 %% Written by Jim Sullivan, January, 1989. %% This was written out of a need to display as much information %% about various Postscript Laserprinters onto one page. More %% can be added and anyone is free to modify it for their own %% needs. gsave %% Beginning of definitions ******************************** /HB {/Helvetica-Bold} def /CBO {/Courier-BoldOblique} def /C {/Courier} def /FF {findfont} def /SS {scalefont setfont} def /mt {moveto} def /s {show} def /fontname 30 string def /getfont {pop fntnm cvs /fontname exch def} def /fntnm 30 string def /str 20 string def /BOLD {CBO FF 10 SS} def /NORMAL {C FF 10 SS} def /cnt 0 def /btime 0 def /circleofbench { 15 15 345 {gsave rotate 0 0 mt (Benchmark) oshow grestore } for } def /oshow {true charpath stroke} def %% End of definitions ***************************************** BOLD 200 756 mt (Analysis by Doctor Laser, Version 1.0.0) s %Print title 20 720 mt NORMAL (This printer is a ) s BOLD statusdict/product get str cvs s %Gets the name of the NORMAL ( running version ) s %printer from BOLD version str cvs s %statusdict/product NORMAL ( of Postscript.) s %and the version number 20 700 translate %of Postscript from the %'version' command 0 0 mt (Available Fonts : (PaintType)FontName:Example of font) s %Heading 0 -10 mt (PaintType = 0\(filled\), 1\(stroked\), 2\(outlined\),) s 0 -20 mt ( 3\(mixed\), ?\(unknown\)) s 0 -30 translate BOLD FontDirectory {BOLD 0 0 mt %Push directory of fonts and getfont %get the fonts one at a time. (\() s {fontname cvn FF /PaintType get str cvs s} stopped {%ifelse (?) s } {} ifelse %Get the font's PaintType and print its value, (\)) s %or if it is not supplied, print a '?'. fontname s %Print the name of the font. mark fontname length 1 30 {(-) s} for %Print dashes out to the font sample column. (:) s %Print a colon. {fontname cvn FF 10 SS ( ABCDEFGH abcdefgh) s } stopped {%ifelse NORMAL (Error implementing font) s } {} ifelse %Show a sample of each cleartomark %font. If an error is cnt 10 add %trapped, print message /cnt exch def %indicating an error 0 -10 translate} forall %occurred. Use the NORMAL %variable 'cnt' to count cnt 30 add /cnt exch def %the number of fonts. 350 cnt mt %Move back up the page 'cnt' points. (Virtual Memory Status:) s %Print the Virtual Memory Status 0 0 translate %using 'vmstatus'. 370 cnt 20 sub mt (Maximum Available Bytes = ) s BOLD vmstatus str cvs s NORMAL 370 cnt 30 sub mt (Bytes currently in use = ) s BOLD str cvs s NORMAL 370 cnt 40 sub mt (Level of Save Nesting = ) s BOLD str cvs s NORMAL 350 cnt 60 sub mt (Cache status \(Red book p126\):) s %Print out the cache status. cachestatus 370 cnt 80 sub mt NORMAL (blimit = ) s BOLD str cvs s 370 cnt 90 sub mt NORMAL ( cmax = ) s BOLD str cvs s 370 cnt 100 sub mt NORMAL ( csize = ) s BOLD str cvs s 370 cnt 110 sub mt NORMAL ( mmax = ) s BOLD str cvs s 370 cnt 120 sub mt NORMAL ( msize = ) s BOLD str cvs s 370 cnt 130 sub mt NORMAL ( bmax = ) s BOLD str cvs s 370 cnt 140 sub mt NORMAL ( bsize = ) s BOLD str cvs s usertime /btime exch def %Print a graphic (circleofbench) HB FF 12 SS %and time how long it takes for 430 cnt 230 sub translate %the printer to interpret it. .5 setlinewidth circleofbench 0 0 moveto (Benchmark Testing) true charpath gsave 1 setgray fill grestore stroke -40 -80 mt NORMAL (Time to print) s -40 -90 mt (the above graphic) s -40 -100 mt (was ) s BOLD usertime btime sub 0.001 mul str cvs s %Print out the time in seconds. NORMAL ( seconds.) s -40 -210 mt ( Please mail this page to)s -40 -220 mt ( Ralph Carmichael ) s -40 -230 mt ( MS 227-2) s -40 -240 mt ( NASA Ames Research Center) s -40 -250 mt ( Moffett Field, CA 94035-1000) s -40 -260 mt ( carmicha@pioneer.arc.nasa.gov) s grestore showpage ======================================================================== Alex Woo, MS 227-6 woo@ames.arc.nasa.gov NASA Ames Research Center __o NASAMAIL ACWOO Moffett Field, CA 94035-1000 -\<, SPANET 24644::WOO (415) 604-6010 (FAX) 604-4357 .....O/ O {hplabs,decwrl,uunet}!ames!woo ========================================================================