Problemy s PS produkovanem z Win na Linuxu

[Petr Skoda]

Vazeni mam problem, ktery neumim rozresit - Uz se stalo nekolikrat kolegum
u ruznych ps dokumentu a nyni i me , ze PS dokument vytvoreny na Windows -
prikladam jeho zacatek na konci zpravy - se bez problemu zobrazi pres
Ghostsscript (testovan 3.33 i 5.10) resp pres Ghostview, ktere jej vola
ci gv, ale kdyz jej chci vytisknout, udela jen prvni stranu a pak nic -
nakonec se objevi hlaska (ktera je obsazena v PS hlavicce toho dokumentu) 

ERROR: undefined
OFFENDING COMMAND: mF

STACK:

/Times-Roman
true
/Type1
/Times-Roman
0.905
/F0

nebo jina defince fontu.

Zajimave, ze to nesezere ani original PS karta v HPLJ5M - chova se stejne

Rekl jsem si dobre chyba v PS RIPu, ale pak jsem to tisknul pres gs
(device ruzne - ljet, cdj, deskjet, ruzne tiskarny) ale vysledek je vzdy
tyz, pritom ale device=xwindows to zobrazi v pohode.

V cem muze byt zakopany pes ? Proc GS umi zobrazovat, ale tisknout nikoli
- myslel jsem si , ze obrazovka a tiskarna jsou jen ruzne vystupni drivery
interpretujici jiz spolecnym jadrem vygenerovanou bitmapu. Tak proc to
zabrazuje a netiskne ?

Prikladam hlavicku jednoho z dokumentu :
Velmi se omlouvam, za dlouhy text , ale netusim, ktera ta cast muze byt
kriticka - setkal se uz nekdo s necim podobnym ? Jak donutit GS aby to
vytiskl, resp co kde vymazat aby to bral treba i original RIP ?
DIky moc za rady




%!PS-Adobe-3.0
%%Title: PowerPoint -Attck
%%Creator: mjr
%%CreationDate: 11/14/96 01:19:35
%%BoundingBox: 19 9 593 784 
%%Pages: (atend)
%%PageOrder: Special
%%Requirements: 
%%DocumentNeededFonts: (atend)
%%DocumentSuppliedFonts: (atend)
%%DocumentData: Clean7Bit
%%LanguageLevel: 1
%%EndComments

[{
%%BeginFeature: *JobPatchFile 1

save 
/version23-manualfeedpatch where { pop false } { true }ifelse
 % we don't do an explicit 'get' since product and version MAY
 % be in systemdict or statusdict - this technique gets the lookup
 % without failure
statusdict begin
  product (LaserWriter) eq        % true if LaserWriter
  version cvr 23.0 eq             % true if version 23
end

and  % only install this patch if both are true
and  % true only if patch is not installed and is for this printer
     % save object and boolean on stack
dup { exch restore }if
% either true OR saveobject false
dup
{
  /version23-manualfeedpatch true def
  /oldversion23-showpage /showpage load def
  /showpage       % this showpage will wait extra time if manualfeed is
true
  {%
     statusdict /manualfeed known
     {% manualfeed known in statusdict
        statusdict /manualfeed get
        {% if true then we loop for 5 seconds
           usertime 5000 add       % target usertime
           { % loop
             dup usertime sub 0 lt
             { exit }if
           }loop
           pop             % pop the usertime off the stac
        }if
     }if
     oldversion23-showpage
  }bind def
}if
not{ restore }if

%%EndFeature
d\} stopped cleartomark
%%BeginProlog 
%%BeginProcSet: Pscript_Win_ErrorHandler 1.0 1
/currentpacking where{pop/oldpack currentpacking def/setpacking where{pop
false setpacking}if}if/$brkpage 64 dict def $brkpage begin/prnt{dup type
/stringtype ne{=string cvs}if dup length 6 mul/tx exch def/ty 10 def
currentpoint/toy exch def/tox exch def 1 setgray newpath tox toy 2 sub
moveto
0 ty rlineto tx 0 rlineto 0 ty neg rlineto closepath fill tox toy moveto 0
setgray show}bind def/nl{currentpoint exch pop lmargin exch moveto 0 -10
rmoveto}def/=={/cp 0 def typeprint nl}def/typeprint{dup type exec}readonly
def
/lmargin 72 def/rmargin 72 def/tprint{dup length cp add rmargin gt{nl/cp 0
def
}if dup length cp add/cp exch def prnt}readonly def/cvsprint{=string cvs
tprint( )tprint}readonly def/integertype{cvsprint}readonly def/realtype{
cvsprint}readonly def/booleantype{cvsprint}readonly def/operatortype{(--)
tprint =string cvs tprint(-- )tprint}readonly def/marktype{pop(-mark-
)tprint}
readonly def/dicttype{pop(-dictionary- )tprint}readonly def/nulltype{pop
(-null- )tprint}readonly def/filetype{pop(-filestream- )tprint}readonly
def
/savetype{pop(-savelevel- )tprint}readonly def/fonttype{pop(-fontid-
)tprint}
readonly def/nametype{dup xcheck not{(/)tprint}if cvsprint}readonly def
/stringtype{dup rcheck{(\()tprint tprint(\))tprint}{pop(-string- )tprint}
ifelse}readonly def/arraytype{dup rcheck{dup
xcheck{({)tprint{typeprint}forall
(})tprint}{([)tprint{typeprint}forall(])tprint}ifelse}{pop(-array-
)tprint}
ifelse}readonly def/packedarraytype{dup rcheck{dup
xcheck{({)tprint{typeprint}
forall(})tprint}{([)tprint{typeprint}forall(])tprint}ifelse}{pop
(-packedarray- )tprint}ifelse}readonly def/courier/Courier findfont 10
scalefont def end errordict/handleerror{systemdict begin $error begin
$brkpage
begin newerror{/newerror false store vmstatus pop pop 0 ne{grestoreall}if
showpage initgraphics courier setfont lmargin 720 moveto(ERROR: )prnt
errorname prnt nl(OFFENDING COMMAND: )prnt/command load prnt $error/ostack
known{nl nl(STACK:)prnt nl nl $error/ostack get aload length{==}repeat}if
systemdict/showpage get exec(%%[ Error: )print errorname =print
(; OffendingCommand: )print/command load =print( ]%%)= flush}if end end
end}
dup 0 systemdict put dup 4 $brkpage put bind readonly put/currentpacking
where
{pop/setpacking where{pop oldpack setpacking}if}if
%%EndProcSet



A tak dale - na konci je videt ta hlaska, co to vyhazuje 






************************************************************************* 
*  Petr Skoda                         Tel   : (0204) 649201, l. 361     * 
*  Stelarni oddeleni                          (0204) 620361, 620136     *
*  Astronomicky ustav AVCR            Fax   : (0204) 620250             *
*  251 65 Ondrejov                    e-mail: skoda na sunstel.asu.cas.cz  *
*  Ceska republika                            pskoda na mbox.cesnet.cz     *
*************************************************************************