golden hour

/usr/share/ghostscript/lib

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

Edit: pdf_info.ps

%!PS
% Copyright (C) 2001-2021 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.
%
%
% $Id: pdf_info.ps 6300 2005-12-28 19:56:24Z alexcher $

% Dump some info from a PDF file

% usage: gs -dNODISPLAY -q -sFile=____.pdf [-dDumpMediaSizes=false] [-dDumpFontsNeeded=false] [-dDumpXML]
%                                          [-dDumpFontsUsed [-dShowEmbeddedFonts] ] lib/pdf_info.ps

128 dict begin

/QUIET true def		% in case they forgot

/showoptions {
  (           where "options" are:) =
  (           -dDumpMediaSizes=false    (default true) MediaBox and CropBox for each page) =
  (           -dDumpFontsNeeded=false   (default true)Fonts used, but not embedded) =
  (           -dDumpXML                 print the XML Metadata from the PDF, if present) =
  (           -dDumpFontsUsed           List all fonts used) =
  (           -dShowEmbeddedFonts       only meaningful with -dDumpFontsUsed) =
  (\n          If no options are given, the default is -dDumpMediaSizes -dDumpFontsNeeded) =
  () =
  flush
} bind def

/DumpMediaSizes where { pop } { /DumpMediaSizes true def } ifelse
/DumpFontsNeeded where { pop } { /DumpFontsNeeded true def } ifelse

[ {.shellarguments} stopped not
  {
    { counttomark 1 eq {
        dup 0 get (-) 0 get ne {
          % File specified on the command line using:  -- lib/pdf_info.ps infile.pdf
          /File exch def
          false   % don't show usage
        } {
          true    % show usage and quit
        } ifelse
      } { true } ifelse
      {
        (\n*** Usage: gs [options] -- lib/pdf_info.ps infile.pdf  ***\n\n) print
        showoptions
        quit
      } if
    } if
  } if
/File where not {
  (\n   *** Missing input file name $use -sFile=____.pdf$\n) =
  (    usage: gs -dNODISPLAY -q -sFile=____.pdf [ options ] lib/pdf_info.ps\n) =
  showoptions
  quit
} if
cleartomark		% discard the dict from --where--

% ---- No more executable code on the top level after this line -----
% ---- except 2 lines at the very end                           -----

% Write a character to the standard output.
/putchar [ % int -> -
  (%stdout) (w) file
  /exch cvx /write cvx
] cvx bind def

% Write U+xxxx to the standard output as UTF-8.
/put-ucode { % int -> -
  dup 16#80 ge {
    dup 16#800 ge {
      dup 16#10000 ge {
        dup -18 bitshift 16#f0 or putchar
        dup -12 bitshift 16#3f and 16#80 or putchar
      } {
        dup -12 bitshift 16#e0 or putchar
      } ifelse
      dup -6  bitshift 16#3f and 16#80 or putchar
    } {
      dup -6 bitshift 16#C0 or putchar
    } ifelse
    16#3f and 16#80 or
  } if
  putchar
} bind def

% PDFDocEncoding to U+xxxx decoding table.
/doc-to-ucode [
  0 1 23 {} for
  16#2d8 16#2c7 16#2c6 16#2d9 16#2dd 16#2db 16#2da 16#2dc
  32 1 127 {} for
  16#2022 16#2020 16#2021 16#2026 16#2014 16#2013 16#192
  16#2044 16#2039 16#203a 16#2212 16#2030 16#201e 16#201c 
  16#201d 16#2018 16#2019 16#201a 16#2122 16#fb01 16#fb02
  16#141 16#152 16#160 16#178 16#17d 16#131 16#142 16#153
  16#161 16#17e 0 16#20ac
  161 1 255 {} for
] readonly def

% Convert a doc string from PDFDocEncoding or UTF-16BE to UTF-8
% and write it to standard output. 
/write-doc-string { % (string) -> -
  1024 string cvs <feff> anchorsearch {
    pop
    0 exch                 % hi16 (str) 
    0 2 2 index length 2 sub {
      2 copy 2 copy        % hi16 (str) i (str) i (str) i
      get 256 mul 3 1 roll % hi16 (str) i hi*256 (str) i
      1 add get add        % hi16 (str) i 256*hi+lo
      dup 16#fc00 and dup  % hi16 (str) i 256*hi+lo tag tag
      16#d800 eq { % High surrogate
        pop
        16#3ff and
        10 bitshift
        16#10000 add       % hi16  (str) i hi16'
        4 1 roll           % hi16' hi16 (str) i
        pop exch pop       % hi16' (str)
      } {
        16#dc00 eq { % Low surrogate
          16#3ff and       % hi16 (str) i (256*hi+lo)&0x3ff
          4 -1 roll add    % (str) i (256*hi+lo)&0x3ff+hi16
          put-ucode        % (str) i
          pop 0 exch       % 0 (str)
        } { % BMP plane
          put-ucode        % hi16 (str) i
          pop              % hi16 (str)
        } ifelse
      } ifelse
    } for
    pop pop                % -
  } {
    { //doc-to-ucode exch get put-ucode 
    } forall
  } ifelse
} bind def

%% When checking Resources for Font objects, we must ensure that we don't end
%% up following a circular reference. Circular references in Resources should
%% not, of course, be present but we've seen a number of cases. If we do detect
%% a circular reference, then stop checking that chain.

/oforce_no_circular {
  dup type /packedarraytype eq {
    dup 0 get
    currentdict /ProcessedResources known {
      dup ProcessedResources exch known {
        pop pop //null
      } {
        dup ProcessedResources 3 1 roll put
        oforce
      } ifelse
    } {
      oforce
    } ifelse
  } {
    oforce
  } ifelse
} bind def

/dump-pdf-info {    % (fname) -> -
  () = (        ) print print ( has ) print
  PDFPageCount dup =print 10 mod 1 eq { ( page.\n) } { ( pages\n) } ifelse = flush

Trailer /Root oget /AcroForm knownoget {
    /XFA knownoget {
      (File uses XFA forms.\n\n) print
      pop
    } if
  } if

/DumpXML where {
    pop
    Trailer /Root oget /Metadata knownoget {
      //false resolvestream
      { dup 256 string readstring exch print not { exit } if } loop
      pop		% done with the stream
      (\n_____________________________________________________________) =
      flush
    } if
  } if

% Print out the "Info" dictionary if present
  Trailer /Info knownoget {
     dup /Title knownoget { (Title: ) print write-doc-string () = flush } if
     dup /Author knownoget { (Author: ) print write-doc-string () = flush } if
     dup /Subject knownoget { (Subject: ) print write-doc-string () = flush } if
     dup /Keywords knownoget { (Keywords: ) print write-doc-string () = flush } if
     dup /Creator knownoget { (Creator: ) print write-doc-string () = flush } if
     dup /Producer knownoget { (Producer: ) print write-doc-string () = flush } if
     dup /CreationDate knownoget { (CreationDate: ) print write-doc-string () = flush } if
     dup /ModDate knownoget { (ModDate: ) print write-doc-string () = flush } if
     dup /Trapped knownoget { (Trapped: ) print write-doc-string () = flush } if
     pop
  } if

} bind def

% <page index> <page dict> dump-media-sizes -
/dump-media-sizes {
  DumpMediaSizes {
    () =
    % Print out the Page Size info for each page.
    (Page ) print =print
    dup /UserUnit pget {
      ( UserUnit: ) print =print
    } if
    dup /MediaBox pget {
      ( MediaBox: ) print oforce_array ==only
    } if
    dup /CropBox pget {
      ( CropBox: ) print oforce_array ==only
    } if
    dup /BleedBox pget {
      ( BleedBox: ) print oforce_array ==only
    } if
    dup /TrimBox pget {
      ( TrimBox: ) print oforce_array ==only
    } if
    dup /ArtBox pget {
      ( ArtBox: ) print oforce_array ==only
    } if
    dup /Rotate pget {
       (    Rotate = ) print =print
    } if
    dup /Annots pget {
       pop
        (     Page contains Annotations) print
    } if
    dup pageusestransparency {
        (     Page uses transparency features) print
    } if
    dup pagespotcolors
    dup length 0 gt {
      (\n    Page Spot colors: ) =
      << /Black 0 /Cyan 0 /Magenta 0 /Yellow 0 >> exch
      {
        pop	% discard the value
        1 index 1 index known not {	% check if colorant is a standard one
          (        ) print
          (') print =print (') =
        } {
          pop	% ignore this standard colorant
        } ifelse
      } forall
      pop	% discard dict of standard colorants
    } {
      pop
    } ifelse
    pop		% done with pagedict
    () = flush
  }
  {
    pop pop
  } ifelse
} bind def

% List of standard font names for use when we are showing the FontsNeeded
/StdFontNames [
 /Times-Roman /Helvetica /Courier /Symbol
 /Times-Bold /Helvetica-Bold /Courier-Bold /ZapfDingbats
 /Times-Italic /Helvetica-Oblique /Courier-Oblique
 /Times-BoldItalic /Helvetica-BoldOblique /Courier-BoldOblique
] def

/res-type-dict 10 dict begin

/Font {
    {
      exch pop oforce_no_circular
      dup //null ne {
        dup /DescendantFonts knownoget {
           exch pop 0 get oforce_no_circular
           %% Check to see if a potentail circular reference was detected. This could be a
           %% false positive caused by other fonts using the same DescendantFont(s), but if
           %% so then we've already cehcked them anyway.
           dup //null eq { pop << >>} if
        } if
        dup /FontDescriptor knownoget {
          dup /FontFile known 1 index /FontFile2 known or exch /FontFile3 known or
          /ShowEmbeddedFonts where { pop pop //false } if {
            pop			% skip embedded fonts
          } {
            /BaseFont knownoget { %  not embedded
              2 index exch //null put
            } if
          } ifelse
        } {
          /BaseFont knownoget { % no FontDescriptor, not embedded
            2 index exch //null put
          } if
        } ifelse
      } {
        pop
      } ifelse
    } forall	% traverse the dictionary
  } bind def

/XObject {
    {
      exch pop oforce_no_circular
      dup //null ne {
        dup /Subtype knownoget {
          /Form eq {
            /Resources knownoget {
              get-fonts-from-res
            } if
          } {
            pop
          } ifelse
        } {
          pop
        } ifelse
      } {
        pop
      } ifelse
    } forall
  } bind def

/Pattern {
    {
      exch pop oforce_no_circular
      dup //null ne {
        /Resources knownoget {
          get-fonts-from-res
        } if
      } {
        pop
      } ifelse
    } forall
  } bind def
currentdict end readonly def

% <dict for fonts> <<res-dict>> get-fonts-from-res -
/get-fonts-from-res {
  oforce_no_circular
  dup //null ne {
    {
      oforce_no_circular
      dup //null ne {
        //res-type-dict 3 -1 roll
        .knownget {
          exec
        } {
          pop
        } ifelse
      } {
        pop pop
      } ifelse
    } forall
  } {
    pop
  } ifelse
} bind def

currentdict /res-type-dict undef

/getPDFfonts {	%	<dict for fonts> <page dict> getPDFfonts -
  /ProcessedResources 10 dict def
  dup /Resources pget { get-fonts-from-res } if
  /Annots knownoget {
    { oforce_no_circular
      dup //null ne {
        /AP knownoget {
          { exch pop oforce_no_circular
            dup //null ne {
              dup /Resources knownoget {
                get-fonts-from-res
              } if
              { exch pop oforce_no_circular
                dup type /dicttype eq {
                  /Resources knownoget {
                    get-fonts-from-res
                  } if
                } {
                  pop
                } ifelse
              } forall
            } {
              pop
            } ifelse
          } forall
        } if
      } {
        pop
      } ifelse
    } forall
  } if
  pop
  currentdict /ProcessedResources undef
} bind def

% If running with -dSAFER, .sort may not be present. Define a (slower) PS alternative
systemdict /.sort known not {
% <array> <lt-proc> .sort <array>
 /.sort
   { 1 index length 1 sub -1 1
       { 2 index exch 2 copy get 3 copy % arr proc arr i arr[i] arr i arr[i]
         0 1 3 index 1 sub
           { 3 index 1 index get        % arr proc arr i arr[i] arr imax amax j arr[j]
             2 index 1 index 10 index exec
               {                        % ... amax < arr[j]
                 4 2 roll
               }
             if pop pop
           }
         for                            % arr proc arr i arr[i] arr imax amax
         4 -1 roll exch 4 1 roll put put
       }
     for
     pop
   } bind def
} if

/dump-fonts-used { % <dict for fonts> dump-fonts-used -
  % If DumpFontsUsed is not true, then remove the 'standard' fonts from the list
  systemdict /DumpFontsUsed known not {
    StdFontNames {
      1 index 1 index known { 1 index 1 index undef } if
      pop
    } forall
  } if

% Now dump the FontsUsed dict into an array so we can sort it.
  [ 1 index { pop } forall ]
  { 100 string cvs exch 100 string cvs exch lt } .sort

systemdict /DumpFontsUsed known
  {
    (\nFont or CIDFont resources used (plain name and ASCIIHEX string representation):) =
    { 128 string cvs dup print (    ) print (<) print 128 string cvs {16 8 string cvrs print} forall (>) print (\n) print} forall
  } {
    DumpFontsNeeded {
      dup length 0 gt {
        (\nFonts Needed that are not embedded $system fonts required$:) =
        { (    ) print 128 string cvs dup print (    ) print (<) print {16 8 string cvrs print} forall (>) print (\n) print} forall
      } {
        pop
        (\nNo system fonts are needed.) =
      } ifelse
    } {
      pop
    } ifelse
  } ifelse
  pop
} bind def

% Copy selected subfiles to temporary files and return the file names
% as a PostScript names to protect them from restore.
% Currently, all PDF files in the Portfolio are extracted and returned.
%
% - pdf_collection_files [ /temp_file_name ... /temp_file_name
/pdf_collection_files {
  mark
  Trailer /Root oget
  dup /Collection oknown {
    /Names knownoget {
      /EmbeddedFiles knownoget {
        pdf_collection_names
      } if
    } if
  } {
    pop
  } ifelse
} bind def

% Output all the info about the file
/dump {  % (title) -> -
  /PDFPageCount pdfpagecount def
  dump-pdf-info
  % dict will be populated with fonts through a call to 'getPDFfonts'
  % per page, then the contents dumped out in 'dump-fonts-used'
  1000 dict

1 1 PDFPageCount
  {
    dup pdfgetpage dup 3 -1 roll
    dump-media-sizes
    1 index exch getPDFfonts
  } for

dump-fonts-used

} bind def

% Choose between collection vs plain file.
% Enumerate collections and apply the dump procedure.
/enum-pdfs {		% - -> -
  File (r) file runpdfbegin
  pdf_collection_files
  dup mark eq {
    pop
    File dump
    runpdfend
  } {
    runpdfend
    ] 0 1 2 index length 1 sub {
        2 copy get exch           %  [file ... ] file i
        1 add (0123456789) cvs    %  [file ... ] file (i+1)
        File exch ( part ) exch concatstrings concatstrings
        exch                      %  [file ... ] (fname part i+1) file
        dup type /filetype eq {
          runpdfbegin
          dump
          runpdfend
          closefile
        } {
          1024 string cvs % .namestring is deprecated
%          .namestring
          dup (r) file
          runpdfbegin
          exch dump
          runpdfend
          deletefile
        } ifelse
    } for
    pop
  } ifelse
} bind def

enum-pdfs
end
quit