#acupoftea - accounting.gulfstore-gcc.com

System	:	Linux server1.ontime-gulf.com 4.18.0-553.5.1.el8_10.x86_64 #1 SMP Wed Jun 5 09:12:13 EDT 2024 x86_64
Software	:	Apache
Server	:	162.0.230.206
Domains	:	40 Domain
Permission	:	[ drwxr-xr-x ]
	:	/ usr / share / ghostscript / lib /

216.73.216.5

Home

File viewjpeg.ps

%! viewjpeg.ps   Copyright (C) 1994 Thomas Merz <tm@pdflib.com>
%
% 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.
%
% For more information about licensing, please refer to
% http://www.ghostscript.com/licensing/. For information on
% commercial licensing, go to http://www.artifex.com/licensing/ or
% contact Artifex Software, Inc., 1305 Grant Avenue - Suite 200,
% Novato, CA 94945, U.S.A., +1(415)492-9861.

% View JPEG files with Ghostscript
%
% This PostScript code relies on level 2 features.
%
% Only JPEG baseline, extended sequential, and progressive files
% are supported.  Note that Adobe PostScript level 2 does not include
% progressive-JPEG support.  Ghostscript with IJG JPEG v6 or later
% will decode progressive JPEG, but only if you edit gsjmorec.h to
% enable that feature.
%
% Author's address:
% ------------------------------+
% {(pstack exec quit) = flush } |    Thomas Merz, Munich
% pstack exec quit              |    voice +49/89/29160728
% ------------------------------+    tm@muc.de  http://www.muc.de/~tm/
%
% Updated by L. Peter Deutsch 20-May-1997:
%   move the usage example to the beginning
% Updates by Tom Lane 6-Sep-1995

% Usage example:
%	(jpeg-6/testimg.jpg) viewJPEG

/languagelevel where {pop languagelevel 2 lt}{true} ifelse {
  (JPEG needs PostScript Level 2!\n) print flush stop
} if

/JPEGdict 20 dict def
JPEGdict begin

/NoParamMarkers [	% JPEG markers without additional parameters
    16#D0 16#D1 16#D2 16#D3 16#D4 16#D5 16#D6 16#D7 16#D8 16#01
] def

/NotSupportedMarkers [ 	% JPEG markers not supported by PostScript level 2
    16#C3 16#C5 16#C6 16#C7 16#C8 16#C9 16#CA 16#CB 16#CD 16#CE 16#CF
] def

% Names of color spaces
/ColorSpaceNames << /1 /DeviceGray /3 /DeviceRGB /4 /DeviceCMYK >> def

% read one byte from file F
% - ==> int --or-- stop context
/NextByte {
    F read not { (Read error in ViewJPEG!\n) print flush stop } if
} bind def

/SkipSegment {	% read two bytes and skip that much data
    NextByte 8 bitshift NextByte add 2 sub { NextByte pop } repeat
} bind def

% read width, height, and # of components from JPEG markers
% and store in dict
/readJPEGmarkers {	% - ==> dict --or-- stop context
    5 dict begin

{ % loop: read JPEG marker segments until we find SOFn marker or EOF
        NextByte
        16#FF eq {				% found marker
            /markertype NextByte def
            % Is it S0F0=baseline, SOF1=extended sequential, SOF2=progressive ?
            markertype dup 16#C0 ge exch 16#C2 le and {
                NextByte pop NextByte pop	% segment length
                % Ghostscript and Adobe PS accept only data precision 8
                NextByte 8 ne {
                    (Error: not 8 bits per component!\n) print flush stop
                } if

% Read crucial image parameters
                /height NextByte 8 bitshift NextByte add def
                /width NextByte 8 bitshift NextByte add def
                /colors NextByte def

VJPGDEBUG { currentdict { exch == == } forall flush } if
                exit
            } if

% detect several segment types which are not compatible with PS
            NotSupportedMarkers {
                markertype eq {
                    (Marker ) print markertype ==
                    (not supported!\n) print flush stop
                } if
            } forall

% Skip segment if marker has parameters associated with it
            true NoParamMarkers { markertype eq {pop false exit} if } forall
            { SkipSegment } if
        } if
    } loop

currentdict dup /markertype undef
    end
} bind def

end	% JPEGdict

% read image parameters from JPEG file and display the image
/viewJPEG {		% <file|string> ==> -
    save
    JPEGdict begin
    /saved exch def
    /scratch 1 string def
    dup type /stringtype eq { (r) file } if
    /F exch def

readJPEGmarkers begin
    F 0 setfileposition		% reset file pointer

% We use the whole clipping area for the image (at least in one dimension)
    gsave clippath pathbbox grestore
    /ury exch def /urx exch def
    /lly exch def /llx exch def

llx lly translate
    width height scale

% use whole width or height, whichever is appropriate
    urx llx sub width div ury lly sub height div
    2 copy gt { exch } if pop		% min
    dup scale
    ColorSpaceNames colors scratch cvs get setcolorspace

% prepare image dictionary
    << /ImageType 1
       /Width width
       /Height height
       /ImageMatrix [ width 0 0 height neg 0 height ]
       /BitsPerComponent 8
       % If 4-component (CMYK), assume data is inverted per Adobe Photoshop
       colors 4 eq {
         /Decode [ colors { 1 0 } repeat ]
       } {
         /Decode [ colors { 0 1 } repeat ]
       } ifelse
       /DataSource F /DCTDecode filter
    >> image

end		% image parameter dictionary

saved end restore
} bind def

% This lets you do stuff on the command line like:
% gs -sDEVICE=pdfwrite -o stuff%03d.pdf viewjpeg.ps -c "(image.jpg) << /PageSize 2 index viewJPEGgetsize 2 array astore  >> setpagedevice viewJPEG"
% so the output size matches the original image.
/viewJPEGgetsize {		% <file|string> ==> width height
    save
    JPEGdict begin
    /saved exch def
    /scratch 1 string def
    dup type /stringtype eq { (r) file } if
    /F exch def
    readJPEGmarkers begin
    F 0 setfileposition		% reset file pointer
    width height
    saved end restore
} bind def

Name	Type	Size	Permission	Last Modified	Actions
.	DIR	-	drwxr-xr-x	2025-06-03 10:58:50
..	DIR	-	drwxr-xr-x	2025-06-03 02:48:16
PDFA_def.ps	application/postscript	1.25 KB	-rw-r--r--	2025-06-03 02:48:11
PDFX_def.ps	application/postscript	1.77 KB	-rw-r--r--	2025-06-03 02:48:11
PM760p.upp	text/plain	1.13 KB	-rw-r--r--	2025-06-03 02:48:15
PM760pl.upp	text/plain	1.1 KB	-rw-r--r--	2025-06-03 02:48:15
PM820p.upp	text/plain	1.12 KB	-rw-r--r--	2025-06-03 02:48:15
PM820pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
Stc670p.upp	text/plain	1.13 KB	-rw-r--r--	2025-06-03 02:48:15
Stc670pl.upp	text/plain	1.1 KB	-rw-r--r--	2025-06-03 02:48:15
Stc680p.upp	text/plain	1.11 KB	-rw-r--r--	2025-06-03 02:48:15
Stc680pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
Stc740p.upp	text/plain	1.01 KB	-rw-r--r--	2025-06-03 02:48:15
Stc740pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
Stc760p.upp	text/plain	1.11 KB	-rw-r--r--	2025-06-03 02:48:15
Stc760pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
Stc777p.upp	text/plain	1.11 KB	-rw-r--r--	2025-06-03 02:48:15
Stc777pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
Stp720p.upp	text/plain	1.13 KB	-rw-r--r--	2025-06-03 02:48:15
Stp720pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
Stp870p.upp	text/plain	1.11 KB	-rw-r--r--	2025-06-03 02:48:15
Stp870pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:15
acctest.ps	application/postscript	4.17 KB	-rw-r--r--	2025-06-03 02:48:11
align.ps	text/plain	2.11 KB	-rw-r--r--	2025-06-03 02:48:11
bj8.rpd	text/plain	639 B	-rw-r--r--	2025-06-03 02:48:12
bj8gc12f.upp	text/plain	1.5 KB	-rw-r--r--	2025-06-03 02:48:12
bj8hg12f.upp	text/plain	1.5 KB	-rw-r--r--	2025-06-03 02:48:12
bj8oh06n.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bj8pa06n.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bj8pp12f.upp	text/plain	1.51 KB	-rw-r--r--	2025-06-03 02:48:12
bj8ts06n.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc6000a1.upp	text/plain	1.62 KB	-rw-r--r--	2025-06-03 02:48:15
bjc6000b1.upp	text/plain	1.62 KB	-rw-r--r--	2025-06-03 02:48:15
bjc610a0.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a1.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a2.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a3.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a4.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a5.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a6.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a7.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610a8.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b1.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b2.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b3.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b4.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b6.upp	text/plain	1.48 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b7.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
bjc610b8.upp	text/plain	1.49 KB	-rw-r--r--	2025-06-03 02:48:12
caption.ps	application/postscript	1.72 KB	-rw-r--r--	2025-06-03 02:48:11
cbjc600.ppd	text/plain	10.89 KB	-rw-r--r--	2025-06-03 02:48:11
cbjc800.ppd	text/plain	11.22 KB	-rw-r--r--	2025-06-03 02:48:12
cdj550.upp	text/plain	1.65 KB	-rw-r--r--	2025-06-03 02:48:12
cdj690.upp	text/plain	1.95 KB	-rw-r--r--	2025-06-03 02:48:12
cdj690ec.upp	text/plain	2.01 KB	-rw-r--r--	2025-06-03 02:48:12
cid2code.ps	text/plain	4.39 KB	-rw-r--r--	2025-06-03 02:48:11
dmp_init.ps	application/postscript	7.08 KB	-rw-r--r--	2025-06-03 02:48:15
dmp_site.ps	application/postscript	459 B	-rw-r--r--	2025-06-03 02:48:15
dnj750c.upp	text/plain	2.74 KB	-rw-r--r--	2025-06-03 02:48:12
dnj750m.upp	text/plain	1.93 KB	-rw-r--r--	2025-06-03 02:48:12
docie.ps	text/plain	7.32 KB	-rw-r--r--	2025-06-03 02:48:11
escp_24.src	text/plain	350 B	-rw-r--r--	2025-06-03 02:48:15
font2pcl.ps	text/plain	18.01 KB	-rw-r--r--	2025-06-03 02:48:11
ghostpdf.ppd	text/plain	25.04 KB	-rw-r--r--	2025-06-03 02:48:12
gs_ce_e.ps	text/plain	2.17 KB	-rw-r--r--	2025-06-03 02:48:11
gs_il2_e.ps	text/plain	2.57 KB	-rw-r--r--	2025-06-03 02:48:11
gs_kanji.ps	text/plain	3.91 KB	-rw-r--r--	2025-06-03 02:48:11
gs_ksb_e.ps	text/plain	3.07 KB	-rw-r--r--	2025-06-03 02:48:11
gs_l.xbm	text/plain	1.9 KB	-rw-r--r--	2025-06-03 02:48:12
gs_l.xpm	image/x-xpixmap	2.69 KB	-rw-r--r--	2025-06-03 02:48:12
gs_l_m.xbm	text/plain	1.91 KB	-rw-r--r--	2025-06-03 02:48:12
gs_lgo_e.ps	text/plain	2.67 KB	-rw-r--r--	2025-06-03 02:48:11
gs_lgx_e.ps	text/plain	1.72 KB	-rw-r--r--	2025-06-03 02:48:11
gs_m.xbm	text/plain	945 B	-rw-r--r--	2025-06-03 02:48:12
gs_m.xpm	image/x-xpixmap	1.4 KB	-rw-r--r--	2025-06-03 02:48:12
gs_m_m.xbm	text/plain	955 B	-rw-r--r--	2025-06-03 02:48:12
gs_s.xbm	text/plain	594 B	-rw-r--r--	2025-06-03 02:48:12
gs_s.xpm	image/x-xpixmap	957 B	-rw-r--r--	2025-06-03 02:48:12
gs_s_m.xbm	text/plain	604 B	-rw-r--r--	2025-06-03 02:48:12
gs_t.xbm	text/plain	345 B	-rw-r--r--	2025-06-03 02:48:12
gs_t.xpm	image/x-xpixmap	605 B	-rw-r--r--	2025-06-03 02:48:12
gs_t_m.xbm	text/plain	355 B	-rw-r--r--	2025-06-03 02:48:12
gs_wl1_e.ps	text/plain	2.44 KB	-rw-r--r--	2025-06-03 02:48:11
gs_wl2_e.ps	text/plain	2.44 KB	-rw-r--r--	2025-06-03 02:48:11
gs_wl5_e.ps	text/plain	2.45 KB	-rw-r--r--	2025-06-03 02:48:11
gslp.ps	text/plain	20.24 KB	-rw-r--r--	2025-06-03 02:48:11
gsnup.ps	application/postscript	2.57 KB	-rw-r--r--	2025-06-03 02:48:11
ht_ccsto.ps	application/postscript	222.8 KB	-rw-r--r--	2025-06-03 02:48:11
image-qa.ps	application/postscript	71.34 KB	-rw-r--r--	2025-06-03 02:48:11
jispaper.ps	text/plain	784 B	-rw-r--r--	2025-06-03 02:48:11
landscap.ps	application/postscript	1.43 KB	-rw-r--r--	2025-06-03 02:48:11
lines.ps	application/postscript	3.65 KB	-rw-r--r--	2025-06-03 02:48:11
mkcidfm.ps	text/plain	21.8 KB	-rw-r--r--	2025-06-03 02:48:11
necp2x.upp	text/plain	1.02 KB	-rw-r--r--	2025-06-03 02:48:12
necp2x6.upp	text/plain	1.04 KB	-rw-r--r--	2025-06-03 02:48:12
pdf2dsc.ps	text/plain	7.87 KB	-rw-r--r--	2025-06-03 02:48:11
pf2afm.ps	application/postscript	14.94 KB	-rw-r--r--	2025-06-03 02:48:11
pfbtopfa.ps	text/plain	996 B	-rw-r--r--	2025-06-03 02:48:11
ppath.ps	text/plain	1.78 KB	-rw-r--r--	2025-06-03 02:48:11
pphs.ps	text/plain	6.68 KB	-rw-r--r--	2025-06-03 02:48:11
prfont.ps	application/postscript	7.04 KB	-rw-r--r--	2025-06-03 02:48:11
printafm.ps	application/postscript	4.78 KB	-rw-r--r--	2025-06-03 02:48:11
ps2ai.ps	application/postscript	21.78 KB	-rw-r--r--	2025-06-03 02:48:11
ps2epsi.ps	text/plain	8.34 KB	-rw-r--r--	2025-06-03 02:48:11
ras1.upp	text/plain	215 B	-rw-r--r--	2025-06-03 02:48:12
ras24.upp	text/plain	219 B	-rw-r--r--	2025-06-03 02:48:12
ras3.upp	text/plain	214 B	-rw-r--r--	2025-06-03 02:48:12
ras32.upp	text/plain	196 B	-rw-r--r--	2025-06-03 02:48:12
ras4.upp	text/plain	220 B	-rw-r--r--	2025-06-03 02:48:12
ras8m.upp	text/plain	209 B	-rw-r--r--	2025-06-03 02:48:12
rollconv.ps	application/postscript	12.23 KB	-rw-r--r--	2025-06-03 02:48:11
s400a1.upp	text/plain	1.42 KB	-rw-r--r--	2025-06-03 02:48:15
s400b1.upp	text/plain	1.57 KB	-rw-r--r--	2025-06-03 02:48:15
sharp.upp	text/plain	1.89 KB	-rw-r--r--	2025-06-03 02:48:15
sipixa6.upp	text/plain	529 B	-rw-r--r--	2025-06-03 02:48:15
st640ih.upp	text/plain	2.23 KB	-rw-r--r--	2025-06-03 02:48:12
st640ihg.upp	text/plain	1.47 KB	-rw-r--r--	2025-06-03 02:48:12
st640p.upp	text/plain	1.87 KB	-rw-r--r--	2025-06-03 02:48:12
st640pg.upp	text/plain	1.11 KB	-rw-r--r--	2025-06-03 02:48:12
st640pl.upp	text/plain	1.83 KB	-rw-r--r--	2025-06-03 02:48:12
st640plg.upp	text/plain	1.08 KB	-rw-r--r--	2025-06-03 02:48:12
stc.upp	text/plain	1.88 KB	-rw-r--r--	2025-06-03 02:48:12
stc1520h.upp	text/plain	2.1 KB	-rw-r--r--	2025-06-03 02:48:12
stc2.upp	text/plain	1.86 KB	-rw-r--r--	2025-06-03 02:48:12
stc200_h.upp	text/plain	1.8 KB	-rw-r--r--	2025-06-03 02:48:12
stc2_h.upp	text/plain	1.83 KB	-rw-r--r--	2025-06-03 02:48:12
stc2s_h.upp	text/plain	2.22 KB	-rw-r--r--	2025-06-03 02:48:12
stc300.upp	text/plain	2.09 KB	-rw-r--r--	2025-06-03 02:48:12
stc300bl.upp	text/plain	1.31 KB	-rw-r--r--	2025-06-03 02:48:12
stc300bm.upp	text/plain	1.4 KB	-rw-r--r--	2025-06-03 02:48:12
stc500p.upp	text/plain	1.86 KB	-rw-r--r--	2025-06-03 02:48:12
stc500ph.upp	text/plain	1.86 KB	-rw-r--r--	2025-06-03 02:48:12
stc600ih.upp	text/plain	2.23 KB	-rw-r--r--	2025-06-03 02:48:12
stc600p.upp	text/plain	1.12 KB	-rw-r--r--	2025-06-03 02:48:12
stc600pl.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:12
stc640p.upp	text/plain	1.07 KB	-rw-r--r--	2025-06-03 02:48:12
stc740ih.upp	text/plain	2.07 KB	-rw-r--r--	2025-06-03 02:48:15
stc800ih.upp	text/plain	2.11 KB	-rw-r--r--	2025-06-03 02:48:12
stc800p.upp	text/plain	1.09 KB	-rw-r--r--	2025-06-03 02:48:12
stc800pl.upp	text/plain	1.07 KB	-rw-r--r--	2025-06-03 02:48:12
stc_h.upp	text/plain	1.87 KB	-rw-r--r--	2025-06-03 02:48:12
stc_l.upp	text/plain	734 B	-rw-r--r--	2025-06-03 02:48:12
stcany.upp	text/plain	673 B	-rw-r--r--	2025-06-03 02:48:12
stcany_h.upp	text/plain	681 B	-rw-r--r--	2025-06-03 02:48:12
stcinfo.ps	text/plain	24.92 KB	-rw-r--r--	2025-06-03 02:48:11
stcolor.ps	text/plain	4.95 KB	-rw-r--r--	2025-06-03 02:48:11
stocht.ps	text/plain	2.44 KB	-rw-r--r--	2025-06-03 02:48:11
traceimg.ps	text/plain	1.35 KB	-rw-r--r--	2025-06-03 02:48:11
traceop.ps	text/plain	2.51 KB	-rw-r--r--	2025-06-03 02:48:11
uninfo.ps	application/postscript	5.85 KB	-rw-r--r--	2025-06-03 02:48:11
viewcmyk.ps	text/plain	1.94 KB	-rw-r--r--	2025-06-03 02:48:11
viewgif.ps	text/plain	5.27 KB	-rw-r--r--	2025-06-03 02:48:11
viewjpeg.ps	application/postscript	5.56 KB	-rw-r--r--	2025-06-03 02:48:11
viewmiff.ps	text/plain	4.15 KB	-rw-r--r--	2025-06-03 02:48:11
viewpbm.ps	text/plain	10.04 KB	-rw-r--r--	2025-06-03 02:48:11
viewpcx.ps	text/plain	5.11 KB	-rw-r--r--	2025-06-03 02:48:11
viewps2a.ps	text/plain	1.11 KB	-rw-r--r--	2025-06-03 02:48:11
winmaps.ps	text/plain	3.52 KB	-rw-r--r--	2025-06-03 02:48:11
zeroline.ps	application/postscript	2.26 KB	-rw-r--r--	2025-06-03 02:48:11

~ ACUPOFTEA - accounting.gulfstore-gcc.com