[ SYSTEM ]: Linux srv.persadacompanies.com 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
[ SERVER ]: Apache | PHP: 8.4.19
[ USER ]: persadamedika | IP: 45.64.1.108
GEFORCE FILE MANAGER
/
usr
/
share
/
ghostscript
/
Resource
/
Init
/
UPLOAD:
NAME
SIZE
QUICK PERMS
ACTIONS
📄 FAPIcidfmap
1,483 B
SET
[ EDIT ]
|
[ DEL ]
📄 FAPIconfig
815 B
SET
[ EDIT ]
|
[ DEL ]
📄 FAPIfontmap
1,468 B
SET
[ EDIT ]
|
[ DEL ]
📄 FCOfontmap-PCLPS2
2,857 B
SET
[ EDIT ]
|
[ DEL ]
📄 Fontmap
109 B
SET
[ EDIT ]
|
[ DEL ]
📄 Fontmap.GS
12,929 B
SET
[ EDIT ]
|
[ DEL ]
📄 cidfmap
2,156 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_agl.ps
218,021 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_btokn.ps
12,464 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cet.ps
4,962 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cff.ps
6,961 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cidcm.ps
16,827 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_ciddc.ps
8,505 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cidfm.ps
7,323 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cidfn.ps
14,553 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cidtt.ps
5,847 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cmap.ps
18,444 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_cspace.ps
4,059 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_dbt_e.ps
2,134 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_diskn.ps
6,867 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_dps1.ps
4,756 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_dps2.ps
8,768 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_dscp.ps
3,938 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_epsf.ps
9,421 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_fapi.ps
15,628 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_fntem.ps
11,303 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_fonts.ps
46,829 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_frsd.ps
3,151 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_icc.ps
3,104 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_il1_e.ps
2,722 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_img.ps
23,999 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_init.ps
91,586 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_lev2.ps
43,820 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_ll3.ps
19,584 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_mex_e.ps
3,843 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_mgl_e.ps
2,181 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_mro_e.ps
2,506 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_pdf_e.ps
1,556 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_pdfwr.ps
32,454 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_res.ps
42,416 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_resmp.ps
22,478 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_setpd.ps
38,440 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_statd.ps
17,851 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_std_e.ps
3,143 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_sym_e.ps
3,104 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_trap.ps
2,946 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_ttf.ps
64,755 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_typ32.ps
4,560 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_typ42.ps
2,096 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_type1.ps
12,543 B
SET
[ EDIT ]
|
[ DEL ]
📄 gs_wan_e.ps
1,563 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_base.ps
52,540 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_draw.ps
173,395 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_font.ps
91,715 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_main.ps
127,338 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_ops.ps
73,726 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_rbld.ps
19,421 B
SET
[ EDIT ]
|
[ DEL ]
📄 pdf_sec.ps
24,801 B
SET
[ EDIT ]
|
[ DEL ]
📄 xlatmap
1,767 B
SET
[ EDIT ]
|
[ DEL ]
DELETE SELECTED
[ CLOSE ]
EDIT: gs_diskn.ps
% Copyright (C) 2001-2019 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 %disk device modifications % When this is run, systemdict is still writable, systemdict begin % Collect the list of searchable IODevices in SearchOrder % Efficiency here doesn't matter since we run this at the end % of gs_init and convert it to a static array. /.getsearchabledevs { % - .getsearchabledevs [ list_of_strings ] //systemdict /.searchabledevs .knownget not { .currentglobal //true .setglobal mark (*) { dup length string copy dup currentdevparams /Searchable .knownget { not { pop } if } { pop } ifelse } 8192 string /IODevice resourceforall ] % now process the array into correct SearchOrder 0 1 2 { mark exch 2 index { dup currentdevparams /SearchOrder get 2 index eq { exch } { pop } ifelse } forall % devices on the old list pop % make the array and sort it by name ] { lt } bind .sort exch } for % collect all devices with SearchOrder > 2 mark 2 index { dup currentdevparams /SearchOrder get 2 gt { exch } { pop } ifelse } forall ] exch pop % We now have 4 arrays on the stack, SO=0 SO=1 SO=2 SO>2 % make them into a single array mark 5 1 roll ] mark exch { { } forall } forall ] //systemdict /.searchabledevs 2 index .forceput exch .setglobal } executeonly if } .bind executeonly odef % must be bound and hidden for .forceput % Modify .putdevparams to force regeneration of .searchabledevs list /.putdevparams { % We could be smarter and check for %disk* device, but this % doesn't get run enough to justify the complication //.putdevparams //systemdict /.searchabledevs .forceundef } .bind executeonly odef % must be bound and hidden for .forceundef % ------ extend filenameforall to handle wildcards in %dev% part of pattern -------% /filenameforall { count 3 ge { 2 index (%) search { pop pop } { % no device specified, so search them all pop (*%) 3 index concatstrings % we need to suppress the device when we return the string % in order to match Adobe's behaviour with %disk devices. 4 -2 roll % the callers procedure [ { (%) search { pop pop (%) search { pop pop } if } if } /exec load 4 -1 roll % the callers procedure /exec load ] cvx 4 2 roll % put the modified procedure where it belongs } ifelse % extract device portion (up to end of string or next %) (%) search { exch pop } if % stack: opat proc scratch npat device dup (*) search { pop pop pop //true } { pop //false } ifelse 1 index (?) search { pop pop pop //true } { pop //false } ifelse or not { pop pop //filenameforall % device with no wildcard } { (%) concatstrings (%) exch concatstrings .getsearchabledevs % find all matching devices and add the rest of the search string mark exch { dup counttomark 1 add index .stringmatch { counttomark 2 add index concatstrings } { pop } ifelse } forall ] 3 1 roll pop pop 4 -1 roll pop % now we need to invoke filenameforall for each of the strings % in the array. We do this by building a procedure that is like % an unrolled 'forall' loop. We do this to get the parameters % for each filenameforall, since each execution will pop its % parameters, but we can't use the operand stack for storage % since each invocation must have the same operand stack. mark exch { counttomark dup 3 add index exch 2 add index /filenameforall load } forall ] cvx 3 1 roll pop pop exec % run our unrolled loop } ifelse } { //filenameforall % not enough parameters -- just let it fail } ifelse } odef % redefine file to search all devices in order /file { dup 0 get (r) 0 get eq dup { pop //false % success code 2 index 0 get 37 eq { [ () ] } { .getsearchabledevs } ifelse { 3 index concatstrings % prepend the device { 2 index //file } //.internalstopped exec not { 4 1 roll pop pop pop //true exit % exit with success } { pop pop } ifelse } forall } if not { % just let standard file operator handle things //file } if } bind odef % redefine deletefile to search all devices in order /deletefile { //false % success code 1 index 0 get 37 eq { [ () ] } { .getsearchabledevs } ifelse { 2 index concatstrings % prepend the device { //deletefile } //.internalstopped exec exch pop not { pop //true exit % exit with success } if } forall not { $error /errorname get /deletefile .systemvar exch signalerror } if } bind odef % redefine status to search all devices in order /status { dup type /stringtype eq { //false % success code 1 index 0 get 37 eq { [ () ] } { .getsearchabledevs } ifelse { 2 index concatstrings % prepend the device { //status } //.internalstopped exec not { { //true 7 -2 roll pop pop //true exit } % exit with success if } if } forall % If we made it this far, no devices were found to status the file % clean up to return 'false' exch pop } { //status } ifelse } bind odef % Also redefine renamefile to search all devices in order /renamefile { //false % success code 2 index 0 get 37 eq { [ () ] } { .getsearchabledevs } ifelse { dup 4 index concatstrings % prepend the device { (r) //file } //.internalstopped exec not { closefile exch pop //true exit % exit with success } { pop pop } ifelse } forall not { $error /errorname get /renamefile .systemvar exch signalerror } if 3 -1 roll concatstrings exch //renamefile } bind odef % redefine devforall to process devices in numeric order % Spec's for 'devforall' are unclear, but font downloaders may expect this /devforall { % <proc> <scratch> devforall - [ { dup length string copy } 2 index //devforall ] % stack: proc scratch array_of_device_names { lt } .sort % We don't really invoke the procedure with the scratch string % but rather with the strings from our array exch pop exch forall } odef end % systemdict