| Server IP : 127.0.0.2 / Your IP : 18.220.167.202 Web Server : Apache/2.4.18 (Ubuntu) System : User : www-data ( ) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : disk_free_space,disk_total_space,diskfreespace,dl,exec,fpaththru,getmyuid,getmypid,highlight_file,ignore_user_abord,leak,listen,link,opcache_get_configuration,opcache_get_status,passthru,pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,php_uname,phpinfo,posix_ctermid,posix_getcwd,posix_getegid,posix_geteuid,posix_getgid,posix_getgrgid,posix_getgrnam,posix_getgroups,posix_getlogin,posix_getpgid,posix_getpgrp,posix_getpid,posix,_getppid,posix_getpwnam,posix_getpwuid,posix_getrlimit,posix_getsid,posix_getuid,posix_isatty,posix_kill,posix_mkfifo,posix_setegid,posix_seteuid,posix_setgid,posix_setpgid,posix_setsid,posix_setuid,posix_times,posix_ttyname,posix_uname,pclose,popen,proc_open,proc_close,proc_get_status,proc_nice,proc_terminate,shell_exec,source,show_source,system,virtual MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /etc/alternatives/ghostscript-current/Resource/Init/ |
Upload File : |
% Copyright (C) 2001-2018 Artifex Software, Inc.
% All Rights Reserved.
%
% This software is provided AS-IS with no warranty, either express or
% implied.
%
% This software is distributed under license and may not be copied,
% modified or distributed except as expressly authorized under the terms
% of the license contained in the file LICENSE in this distribution.
%
% Refer to licensing information at http://www.artifex.com or contact
% Artifex Software, Inc., 1305 Grant Avenue - Suite 200, Novato,
% CA 94945, U.S.A., +1(415)492-9861, for further information.
%
% Initialization file for most of the Display PostScript functions
% that are also included in Level 2.
level2dict begin
% ------ Virtual memory ------ %
/currentshared /.currentglobal load def
/scheck {.gcheck} bind odef
%****** FOLLOWING IS WRONG ******
/shareddict currentdict /globaldict .knownget not { 20 dict } if def
% Global and LocalFontDirectory must remain in systemdict
% even if we temporarily exit Level 2 mode.
end % level2dict
systemdict begin
/SharedFontDirectory .FontDirectory .gcheck
{ .currentglobal //false .setglobal
/LocalFontDirectory .FontDirectory dup maxlength dict copy
.forcedef % LocalFontDirectory is local, systemdict is global
.setglobal .FontDirectory
}
{ /LocalFontDirectory .FontDirectory
.forcedef % LocalFontDirectory is local, systemdict is global
50 dict
}
ifelse def
end % systemdict
level2dict begin
% setshared must rebind FontDirectory to the appropriate one of
% Local or SharedFontDirectory.
/.setglobal % <bool> .setglobal -
{ dup .setglobal
//systemdict /FontDirectory .currentglobal
{ //SharedFontDirectory }
{ /LocalFontDirectory .systemvar } % can't embed ref to local VM
ifelse .forceput pop % LocalFontDirectory is local, systemdict is global
} .bind odef
% Don't just copy (load) the definition of .setglobal:
% it gets redefined for LL3.
/setshared { /.setglobal .systemvar exec } odef
.currentglobal setshared
% See below for changes in save and restore.
% ------ Fonts ------ %
/selectfont % <fontname> <size> selectfont -
{
{ 1 .argindex findfont
1 index dup type /arraytype eq { makefont } { scalefont } ifelse
setfont pop pop
} stopped { /selectfont .systemvar $error /errorname get signalerror } if
} odef
% undefinefont has to take local/global VM into account.
/undefinefont % <fontname> undefinefont -
{ //.FontDirectory 1 .argindex .forceundef % FontDirectory is readonly
.currentglobal
{ % Current mode is global; delete from local directory too.
//systemdict /LocalFontDirectory .knownget
{ 1 index .forceundef } executeonly % LocalFontDirectory is readonly
if
}
{ % Current mode is local; if there was a shadowed global
% definition, copy it into the local directory.
//systemdict /SharedFontDirectory .knownget
{ 1 index .knownget
{ //.FontDirectory 2 index 3 -1 roll .forceput } % readonly
if
}
if
}
ifelse pop
} odef
% If we load a font into global VM within an inner save, the restore
% will delete it from FontDirectory but not from SharedFontDirectory.
% We have to handle this by making restore copy missing entries from
% SharedFontDirectory to FontDirectory. Since this could slow down restore
% considerably, we define a new operator .forcecopynew for this purpose.
% Furthermore, if FAKEFONTS is in effect, we want global real fonts to
% override fake local ones. We handle this by brute force.
/restore % <save> restore -
{ dup //restore
/LocalFontDirectory .systemvar
FAKEFONTS
{ mark
% We want to delete a fake font from the local directory
% iff the global directory now has no definition for it,
% or a non-fake definition.
1 index dup
{ % Stack: lfd mark lfd key ... lfd key value
length 1 gt
{ % This is a real local definition; don't do anything.
pop
}
{ % This is a fake local definition, check for global.
//SharedFontDirectory 1 index .knownget
{ % A global definition exists, check for fake.
length 1 eq { pop } { 1 index } ifelse
}
{ % No global definition, delete the local one.
1 index
}
ifelse
}
ifelse
} forall
pop counttomark 2 idiv { .forceundef } executeonly repeat pop % readonly
}
if
//SharedFontDirectory exch .forcecopynew pop
.currentglobal .setglobal % Rebind FontDirectory according to current VM.
pop
} .bind odef
end % level2dict