[Bug 313] Generalize cover page

The original faxcover.ps, with SGI logo, is now an example file, while the
default faxcover.ps is now 100% generic. I messed with the makefile on this
one and someone should check my work. Thanks Aidan, Matthew & Lee!

diff --git a/faxcover/Makefile.in b/faxcover/Makefile.in
index f29cc8d324301fcaad961903a34064fd3e3ef62f..548cd2a39c6962a18662926bd65c3918be173a34 100644 (file)
--- a/faxcover/Makefile.in
+++ b/faxcover/Makefile.in
@@ -61,3 +61,6 @@ install: default ${SRCDIR}/faxcover.ps
        ${INSTALL} -F ${LIBDATA} -m 644 \
            -idb "${PRODUCT}.sw.client config(suggest)" \
            -src ${SRCDIR}/faxcover.ps -O faxcover.ps
+       ${INSTALL} -F ${LIBDATA} -m 644 \
+           -idb "${PRODUCT}.sw.client config(suggest)" \
+           -src ${SRCDIR}/faxcover_example_sgi.ps -O faxcover_example_sgi.ps

diff --git a/faxcover/faxcover.ps b/faxcover/faxcover.ps
index e8a80b6bca1ae51c1ff75262bd70fda38fa2a30b..f9d1fc94be34e470061bb4daa85280e7366fb8c8 100644 (file)
--- a/faxcover/faxcover.ps
+++ b/faxcover/faxcover.ps
@@ -158,87 +158,6 @@ newpath
 closepath clip newpath
 /Helvetica-SHOWISO findfont 14 scalefont setfont
 
-% tom-baby's logo stuff:
-
-/inch {72 mul} def
-/width {.375 inch} def
-/r {.3 inch} def
-/d {r 30 cos mul neg} def
-/R {2 inch} def
-1 setlinejoin
-
-/pnta { r 30 cos mul r 30 sin mul } def
-/pntb { R 90 cos mul d 90 sin mul sub R 90 sin mul d 90 cos mul add } def
-/pntc { R 30 cos mul d 30 sin mul add R 30 sin mul d 30 cos mul sub } def
-/pntd { r 90 cos mul r 90 sin mul } def
-/pnte { R 150 cos mul d 150 sin mul sub R 150 sin mul d 150 cos mul add } def
-/pntf { R 90 cos mul d 90 sin mul add R 90 sin mul d 90 cos mul sub } def
-/pntg { r 150 cos mul r 150 sin mul } def
-/pnth { R 210 cos mul d 210 sin mul sub R 210 sin mul d 210 cos mul add } def
-/pnti { R 150 cos mul d 150 sin mul add R 150 sin mul d 150 cos mul sub } def
-/pntj { r 210 cos mul r 210 sin mul } def
-/pntk { R 270 cos mul d 270 sin mul sub R 270 sin mul d 270 cos mul add } def
-/pntl { R 210 cos mul d 210 sin mul add R 210 sin mul d 210 cos mul sub } def
-/pntm { r 270 cos mul r 270 sin mul } def
-/pntn { R 330 cos mul d 330 sin mul sub R 330 sin mul d 330 cos mul add } def
-/pnto { R 270 cos mul d 270 sin mul add R 270 sin mul d 270 cos mul sub } def
-/pntp { r 330 cos mul r 330 sin mul } def
-/pntq { R 30 cos mul d 30 sin mul sub R 30 sin mul d 30 cos mul add } def
-/pntr { R 330 cos mul d 330 sin mul add R 330 sin mul d 330 cos mul sub } def
-
-/logo { newpath
-     pnta moveto pntb lineto pntc lineto pntd lineto pnte lineto
-     pntf lineto pntg lineto pnth lineto pnti lineto pntj lineto
-     pntk lineto pntl lineto pntm lineto pntn lineto pnto lineto
-     pntp lineto pntq lineto pntr lineto
-     closepath
-} def
-
-/drawlogo {
-gsave
- .8 inch 10.2 inch translate
- .2 .2 scale
- width setlinewidth
-
- logo stroke
-
- width 1.13 mul setlinewidth
- 1 setgray
- newpath
- pntc moveto pntd lineto pnte lineto stroke
- newpath
- pnti moveto pntj lineto pntk lineto stroke
- newpath
- pnto moveto pntp lineto pntq lineto stroke
-
- width setlinewidth
- 0 setgray
- newpath
- pntb moveto pntc lineto pntd lineto pnte lineto pntf lineto stroke
- newpath
- pnth moveto pnti lineto pntj lineto pntk lineto pntl lineto stroke
- newpath
- pntn moveto pnto lineto pntp lineto pntq lineto pntr lineto stroke
-
-grestore
-} def
-
-/drawtext {
-gsave
-
- 1.4 inch 10.2 inch moveto
- /Helvetica-BoldOblique findfont 23 scalefont setfont
- (SiliconGraphics) show
- 1.42 inch 9.95 inch moveto
- /Helvetica-Bold findfont 14 scalefont setfont
- (Computer Systems) show
-
-grestore
-} def
-
-drawlogo
-drawtext
-
 0 0 0 setrgbcolor
 /Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
 %164.063 644 M 168.356 644 M (Applications Consulting) S

diff --git a/faxcover/faxcover_example_sgi.ps b/faxcover/faxcover_example_sgi.ps
new file mode 100644 (file)
index 0000000..e8a80b6
--- /dev/null
+++ b/faxcover/faxcover_example_sgi.ps
@@ -0,0 +1,273 @@
+%!PS-Adobe-2.0 EPSF-2.0
+%%BoundingBox: 21 3 588 788
+%%Title: 
+%%CreationDate: 11:05 AM January  4, 1993
+%%Pages: 1 +1
+%%EndComments
+%      $Id$
+%
+% HylaFAX Facsimile Software
+%
+% Copyright (c) 1990-1996 Sam Leffler
+% Copyright (c) 1991-1996 Silicon Graphics, Inc.
+% HylaFAX is a trademark of Silicon Graphics
+% 
+% Permission to use, copy, modify, distribute, and sell this software and 
+% its documentation for any purpose is hereby granted without fee, provided
+% that (i) the above copyright notices and this permission notice appear in
+% all copies of the software and related documentation, and (ii) the names of
+% Sam Leffler and Silicon Graphics may not be used in any advertising or
+% publicity relating to the software without the specific, prior written
+% permission of Sam Leffler and Silicon Graphics.
+% 
+% THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
+% EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
+% WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
+% 
+% IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
+% ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
+% OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
+% WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
+% LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
+% OF THIS SOFTWARE.
+%
+1 setlinejoin
+/nullstring () def
+/IS {
+    dup where {
+       pop
+       load dup nullstring ne {S} {pop} ifelse
+    } {pop} ifelse
+} bind def
+/M  { moveto } bind def /S { show  } bind def
+/R { rmoveto } bind def /L { lineto } bind def
+/B { newpath 0 0 M 0 1 L 1 1 L 1 0 L closepath } bind def
+/CS { closepath stroke } bind def
+
+/showcaseisoencoding [
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/.notdef /.notdef /.notdef /.notdef
+/space /exclam /quotedbl /numbersign
+/dollar /percent /ampersand /quoteright
+/parenleft /parenright /asterisk /plus
+/comma /minus /period /slash
+/zero /one /two /three /four /five /six /seven
+/eight /nine /colon /semicolon
+/less /equal /greater /question
+/at /A /B /C /D /E /F /G
+/H /I /J /K /L /M /N /O
+/P /Q /R /S /T /U /V /W
+/X /Y /Z /bracketleft
+/backslash /bracketright /asciicircum /underscore
+/quoteleft /a /b /c /d /e /f /g
+/h /i /j /k /l /m /n /o
+/p /q /r /s /t /u /v /w
+/x /y /z /braceleft
+/bar /braceright /asciitilde /guilsinglright
+/fraction /florin /quotesingle /quotedblleft
+/guilsinglleft /fi /fl /endash
+/dagger /daggerdbl /bullet /quotesinglbase
+/quotedblbase /quotedblright /ellipsis /trademark
+/dotlessi /grave /acute /circumflex
+/tilde /macron /breve /dotaccent
+/dieresis /perthousand /ring /cedilla
+/Ydieresis /hungarumlaut /ogonek /caron
+/emdash /exclamdown /cent /sterling
+/currency /yen /brokenbar /section
+/dieresis /copyright /ordfeminine /guillemotleft
+/logicalnot /hyphen /registered /macron
+/degree /plusminus /twosuperior /threesuperior
+/acute /mu /paragraph /periodcentered
+/cedilla /onesuperior /ordmasculine /guillemotright
+/onequarter /onehalf /threequarters /questiondown
+/Agrave /Aacute /Acircumflex /Atilde
+/Adieresis /Aring /AE /Ccedilla
+/Egrave /Eacute /Ecircumflex /Edieresis
+/Igrave /Iacute /Icircumflex /Idieresis
+/Eth /Ntilde /Ograve /Oacute
+/Ocircumflex /Otilde /Odieresis /multiply
+/Oslash /Ugrave /Uacute /Ucircumflex
+/Udieresis /Yacute /Thorn /germandbls
+/agrave /aacute /acircumflex /atilde
+/adieresis /aring /ae /ccedilla
+/egrave /eacute /ecircumflex /edieresis
+/igrave /iacute /icircumflex /idieresis
+/eth /ntilde /ograve /oacute
+/ocircumflex /otilde /odieresis /divide
+/oslash /ugrave /uacute /ucircumflex
+/udieresis /yacute /thorn /ydieresis ] def
+/Helvetica-Bold findfont
+dup length dict begin
+  {1 index /FID ne {def} {pop pop} ifelse} forall
+  /Encoding showcaseisoencoding def
+  currentdict
+end
+/Helvetica-Bold-SHOWISO exch definefont pop
+/Helvetica findfont
+dup length dict begin
+  {1 index /FID ne {def} {pop pop} ifelse} forall
+  /Encoding showcaseisoencoding def
+  currentdict
+end
+/Helvetica-SHOWISO exch definefont pop
+/Courier findfont
+dup length dict begin
+  {1 index /FID ne {def} {pop pop} ifelse} forall
+  /Encoding showcaseisoencoding def
+  currentdict
+end
+/Courier-SHOWISO exch definefont pop
+/Times-Bold findfont
+dup length dict begin
+  {1 index /FID ne {def} {pop pop} ifelse} forall
+  /Encoding showcaseisoencoding def
+  currentdict
+end
+/Times-Bold-SHOWISO exch definefont pop
+%%EndProlog
+%%Page: label 1
+newpath clippath pathbbox
+/URy exch def
+/URx exch def
+/LLy exch def
+/LLx exch def
+/Width  URx LLx sub 0.005 sub def
+/Height URy LLy sub 0.005 sub def
+LLx LLy translate
+Width 612 div Height 792 div gt
+    { /Y_size Height def
+      /X_size 612 792 div Y_size mul def
+      /Scale Height 792 div def }
+    { /X_size Width def
+      /Y_size 792 612 div X_size mul def
+      /Scale Width 612 div def } ifelse
+Width  X_size sub 2 div
+Height Y_size sub 2 div translate
+Scale Scale scale
+gsave
+0 0 0 setrgbcolor
+gsave
+newpath
+11.9999 3.00039 M -8.00007 787 L 618 787 L 618 3.00039 L
+closepath clip newpath
+/Helvetica-SHOWISO findfont 14 scalefont setfont
+
+% tom-baby's logo stuff:
+
+/inch {72 mul} def
+/width {.375 inch} def
+/r {.3 inch} def
+/d {r 30 cos mul neg} def
+/R {2 inch} def
+1 setlinejoin
+
+/pnta { r 30 cos mul r 30 sin mul } def
+/pntb { R 90 cos mul d 90 sin mul sub R 90 sin mul d 90 cos mul add } def
+/pntc { R 30 cos mul d 30 sin mul add R 30 sin mul d 30 cos mul sub } def
+/pntd { r 90 cos mul r 90 sin mul } def
+/pnte { R 150 cos mul d 150 sin mul sub R 150 sin mul d 150 cos mul add } def
+/pntf { R 90 cos mul d 90 sin mul add R 90 sin mul d 90 cos mul sub } def
+/pntg { r 150 cos mul r 150 sin mul } def
+/pnth { R 210 cos mul d 210 sin mul sub R 210 sin mul d 210 cos mul add } def
+/pnti { R 150 cos mul d 150 sin mul add R 150 sin mul d 150 cos mul sub } def
+/pntj { r 210 cos mul r 210 sin mul } def
+/pntk { R 270 cos mul d 270 sin mul sub R 270 sin mul d 270 cos mul add } def
+/pntl { R 210 cos mul d 210 sin mul add R 210 sin mul d 210 cos mul sub } def
+/pntm { r 270 cos mul r 270 sin mul } def
+/pntn { R 330 cos mul d 330 sin mul sub R 330 sin mul d 330 cos mul add } def
+/pnto { R 270 cos mul d 270 sin mul add R 270 sin mul d 270 cos mul sub } def
+/pntp { r 330 cos mul r 330 sin mul } def
+/pntq { R 30 cos mul d 30 sin mul sub R 30 sin mul d 30 cos mul add } def
+/pntr { R 330 cos mul d 330 sin mul add R 330 sin mul d 330 cos mul sub } def
+
+/logo { newpath
+     pnta moveto pntb lineto pntc lineto pntd lineto pnte lineto
+     pntf lineto pntg lineto pnth lineto pnti lineto pntj lineto
+     pntk lineto pntl lineto pntm lineto pntn lineto pnto lineto
+     pntp lineto pntq lineto pntr lineto
+     closepath
+} def
+
+/drawlogo {
+gsave
+ .8 inch 10.2 inch translate
+ .2 .2 scale
+ width setlinewidth
+
+ logo stroke
+
+ width 1.13 mul setlinewidth
+ 1 setgray
+ newpath
+ pntc moveto pntd lineto pnte lineto stroke
+ newpath
+ pnti moveto pntj lineto pntk lineto stroke
+ newpath
+ pnto moveto pntp lineto pntq lineto stroke
+
+ width setlinewidth
+ 0 setgray
+ newpath
+ pntb moveto pntc lineto pntd lineto pnte lineto pntf lineto stroke
+ newpath
+ pnth moveto pnti lineto pntj lineto pntk lineto pntl lineto stroke
+ newpath
+ pntn moveto pnto lineto pntp lineto pntq lineto pntr lineto stroke
+
+grestore
+} def
+
+/drawtext {
+gsave
+
+ 1.4 inch 10.2 inch moveto
+ /Helvetica-BoldOblique findfont 23 scalefont setfont
+ (SiliconGraphics) show
+ 1.42 inch 9.95 inch moveto
+ /Helvetica-Bold findfont 14 scalefont setfont
+ (Computer Systems) show
+
+grestore
+} def
+
+drawlogo
+drawtext
+
+0 0 0 setrgbcolor
+/Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
+%164.063 644 M 168.356 644 M (Applications Consulting) S
+%gsave 164.063 642 M 442 642 L stroke grestore
+210.875 586 M (Fax Cover Sheet) S
+176.222 499 M (To:) S
+226.744 499 M (________________________) S 226.744 499 M /to IS
+58.3641 457 M (Fax Number:) S
+%108.837 457 M (Number:) S
+225.744 457 M (________________________) S 225.744 457 M /to-fax-number IS
+/Times-Bold-SHOWISO findfont 10 scalefont setfont
+/Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
+95.5068 415 M (Company:) S
+225.744 415 M (________________________) S 225.744 415 M /to-company IS
+146.199 373 M (From:) S
+227.744 373 M (________________________) S 227.744 373 M /from IS
+176.823 331 M (Re:) S
+228.744 331 M (________________________) S 228.744 331 M /regarding IS
+59.3601 289 M (Today's Date:) S
+231.744 289 M (________________________) S 231.744 289 M /todays-date IS
+31 247 M (# of pages to follow this sheet:) S
+403.216 247 M (___________) S 403.216 247 M /page-count IS
+/Helvetica-Bold-SHOWISO findfont 14 scalefont setfont
+31 189 M (Comments:) S
+/Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
+/rule (_______________________________) def
+/y 189 def /x 141.336 def
+y -29 73 { x exch M rule S } for
+rule stringwidth pop 29 x y comments BreakIntoLines
+grestore
+grestore
+showpage