Gecko [ v3.cesa.co.za ]

Name	Size	Permission	Date
array.ps	10.34 KB	-rw-r--r--	2013-05-22 07:56
background.image.ps	7.77 KB	-rw-r--r--	2013-05-22 07:56
background.ps	1.33 KB	-rw-r--r--	2013-05-22 07:56
border.ps	6.04 KB	-rw-r--r--	2013-05-22 07:56
box.block.inline.ps	1.45 KB	-rw-r--r--	2013-05-22 07:56
box.block.ps	8.46 KB	-rw-r--r--	2013-05-22 07:56
box.break.ps	2.77 KB	-rw-r--r--	2013-05-22 07:56
box.button.ps	3.44 KB	-rw-r--r--	2013-05-22 07:56
box.checkbutton.ps	2.45 KB	-rw-r--r--	2013-05-22 07:56
box.container.ps	36.76 KB	-rw-r--r--	2013-05-22 07:56
box.frame.ps	7.71 KB	-rw-r--r--	2013-05-22 07:56
box.generic.inline.ps	3.27 KB	-rw-r--r--	2013-05-22 07:56
box.generic.ps	31.94 KB	-rw-r--r--	2013-05-22 07:56
box.iframe.ps	79 B	-rw-r--r--	2013-05-22 07:56
box.image.ps	4.84 KB	-rw-r--r--	2013-05-22 07:56
box.inline.ps	10.88 KB	-rw-r--r--	2013-05-22 07:56
box.inline.whitespace.ps	2.3 KB	-rw-r--r--	2013-05-22 07:56
box.input.check.ps	1.4 KB	-rw-r--r--	2013-05-22 07:56
box.input.radio.ps	884 B	-rw-r--r--	2013-05-22 07:56
box.input.text.ps	1.56 KB	-rw-r--r--	2013-05-22 07:56
box.list-item.ps	6.71 KB	-rw-r--r--	2013-05-22 07:56
box.ps	92 B	-rw-r--r--	2013-05-22 07:56
box.radiobutton.ps	2.15 KB	-rw-r--r--	2013-05-22 07:57
box.select.ps	2.76 KB	-rw-r--r--	2013-05-22 07:57
box.span.ps	97 B	-rw-r--r--	2013-05-22 07:57
box.table.cell.fake.ps	322 B	-rw-r--r--	2013-05-22 07:57
box.table.cell.ps	4.55 KB	-rw-r--r--	2013-05-22 07:57
box.table.ps	51.69 KB	-rw-r--r--	2013-05-22 07:57
box.table.row.ps	5.22 KB	-rw-r--r--	2013-05-22 07:57
box.text.ps	10.5 KB	-rw-r--r--	2013-05-22 07:57
box.whitespace.ps	2.39 KB	-rw-r--r--	2013-05-22 07:57
cellspan.ps	294 B	-rw-r--r--	2013-05-22 07:57
class.ps	826 B	-rw-r--r--	2013-05-22 07:57
color.ps	747 B	-rw-r--r--	2013-05-22 07:57
containing_block.ps	167 B	-rw-r--r--	2013-05-22 07:57
context.ps	15.66 KB	-rw-r--r--	2013-05-22 07:57
encoding.dingbats.ps	2.13 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-10.ps	2.86 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-11.ps	2.82 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-13.ps	2.93 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-14.ps	2.88 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-15.ps	2.87 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-2.ps	150 B	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-3.ps	2.92 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-4.ps	2.87 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-5.ps	3 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-7.ps	2.84 KB	-rw-r--r--	2013-05-22 07:57
encoding.iso-8859-9.ps	2.91 KB	-rw-r--r--	2013-05-22 07:57
encoding.koi8-r.ps	3.01 KB	-rw-r--r--	2013-05-22 07:57
encoding.symbol.ps	3.08 KB	-rw-r--r--	2013-05-22 07:57
encoding.windows-1250.ps	6.17 KB	-rw-r--r--	2013-05-22 07:57
encoding.windows-1251.ps	8.39 KB	-rw-r--r--	2013-05-22 07:57
encoding.windows-1252.ps	8.5 KB	-rw-r--r--	2013-05-22 07:57
fastps.footer.ps	24 B	-rw-r--r--	2013-05-22 07:57
fastps.header.ps	11 KB	-rw-r--r--	2013-05-22 07:57
flow.block.ps	2.89 KB	-rw-r--r--	2013-05-22 07:57
flow.box.ps	1.47 KB	-rw-r--r--	2013-05-22 07:57
flow.float.ps	1.47 KB	-rw-r--r--	2013-05-22 07:57
flow.inline.block.ps	1.57 KB	-rw-r--r--	2013-05-22 07:57
flow.inline.ps	3.31 KB	-rw-r--r--	2013-05-22 07:57
flow.legend.ps	1.79 KB	-rw-r--r--	2013-05-22 07:57
flow.table.ps	4.85 KB	-rw-r--r--	2013-05-22 07:57
flow_viewport.ps	594 B	-rw-r--r--	2013-05-22 07:57
font.ps	1.66 KB	-rw-r--r--	2013-05-22 07:57
footer.ps	4.92 KB	-rw-r--r--	2013-05-22 07:57
geometry.ps	1.34 KB	-rw-r--r--	2013-05-22 07:57
header.ps	22.95 KB	-rw-r--r--	2013-05-22 07:57
height.ps	7.47 KB	-rw-r--r--	2013-05-22 07:57
image.ps	10.34 KB	-rw-r--r--	2013-05-22 07:57
init.ps	211 B	-rw-r--r--	2013-05-22 07:57
position.ps	153 B	-rw-r--r--	2013-05-22 07:57
predicates.ps	618 B	-rw-r--r--	2013-05-22 07:57
table.ps	52.42 KB	-rw-r--r--	2013-05-22 07:57
table.row.ps	422 B	-rw-r--r--	2013-05-22 07:57
text-align.ps	3.71 KB	-rw-r--r--	2013-05-22 07:57
vertical-align.ps	1.86 KB	-rw-r--r--	2013-05-22 07:57
viewport.ps	2.99 KB	-rw-r--r--	2013-05-22 07:57
width.ps	1.15 KB	-rw-r--r--	2013-05-22 07:57

Rename

/box-image-broken-create {         % => 
  box-image-generic-create
  dup box-image-broken-setup-methods
  dup /box-image-broken add-type
} def

/box-image-broken-setup-methods {
  dup /Methods get
  dup /show {box-image-broken-show} put
  pop pop
} def

/box-image-broken-show {           % => Viewport This
  gsave
  
  0.1 setlinewidth
  
  dup get-left  1 index get-top    moveto
  dup get-right 1 index get-top    lineto
  dup get-right 1 index get-bottom lineto
  dup get-left  1 index get-bottom lineto
  closepath
  stroke
  
  dup get-left  1 index get-top    moveto
  dup get-right 1 index get-top    lineto
  dup get-right 1 index get-bottom lineto
  dup get-left  1 index get-bottom lineto
  closepath
  clip

% TODO: output ALT attribute
  
  grestore
  pop pop
} def

/box-image-create {                % => Mask Image Init SY SX
  image-create
  box-image-generic-create
  dup box-image-setup-methods
  dup /box-image add-type          % => Image Box

dup /Image 3 index put
  exch pop
} def

/box-image-setup-methods {         % => 
  dup /Methods get
  dup /show {box-image-show} put
  pop pop
} def

/box-image-show {                  % => Viewport Box
  2 copy box-generic-show
    
% Check if "designer" set the height or width of this image to zero; in this there will be no reason 
% in drawing the image at all
  dup /get-width call-method 1 lt
  1 index get-height 1 lt or {
  } {
    dup /Image get                 % => Viewport Box Image
    1 index get-left
    2 index get-bottom moveto      % => Viewport Box Image
    1 index /get-width call-method
    2 index get-height             % => Viewport Box Image W H
    3 2 roll
    image-show                     % => Viewport Box 
  } ifelse                         % => Viewport Box
  pop pop
} def

/box-image-generic-create {        % => 
  box-generic-inline-create
  dup box-image-generic-setup-methods
  dup /box-image-generic add-type

dup /scale /none put
  dup /src-width  1 put
  dup /src-height 1 put
} def

/box-image-generic-get-max-width { % => Context This
  dup get-full-width
  exch pop
  exch pop
} def

/box-image-generic-get-min-width { % => Context This
  dup get-full-width
  exch pop
  exch pop
} def

/box-image-generic-get-scale {     % => This
  /scale get
} def

/box-image-generic-get-src-height {
  /src-height get
} def

/box-image-generic-get-src-width {
  /src-width get
} def

/box-image-generic-pre-reflow-images { % => This
  dup box-image-generic-get-scale  % => This Scale
  
  dup /width eq {                  % => This Scale
    1 index box-image-generic-get-src-width
    2 index box-image-generic-get-src-height div
    2 index /get-width
    call-method mul                % => This Scale Size

dup 3 index put-height         % => This Scale Size
    2 index put-default-baseline   % => This Scale                           
  } if

dup /height eq {                 % => This Scale
    1 index box-image-generic-get-src-height
    2 index box-image-generic-get-src-width div
    2 index get-height mul         % => This Scale Size

dup 3 index put-width          % => This Scale Size
    
    dup wc-create-constant
    3 index put-width-constraint   % => This Scale Size

2 index put-default-baseline   % => This Scale
  } if

pop pop
} def

/box-image-generic-put-scale {     % => Scale This
  exch                             % => This Scale
  /scale exch                      % => This /scale Scale
  put
} def

/box-image-generic-put-src-height {% => Scale This
  exch                             % => This Scale
  /src-height exch                 % => This /src-height Scale
  put
} def

/box-image-generic-put-src-width { % => Scale This
  exch                             % => This Scale
  /src-width exch                  % => This /src-width Scale
  put
} def

/box-image-generic-reflow {        % => Context Parent This
  dup box-image-generic-pre-reflow-images
                                   % => Context Parent This
    
% Check if we need a line break here
  2 index
  2 index
  2 index
  /maybe-line-break call-method
  pop

% set default baseline
  dup get-default-baseline
  1 index put-baseline

% append to parent line box
  dup 2 index
  box-container-append-line

% Move box to the parent current point
  1 index
  1 index
  box-generic-guess-corner         % => Context Parent This

% Move parent's X coordinate
  1 index get-current-x
  1 index get-full-width
  add
  2 index put-current-x            % => Context Parent This

% Extend parent height
  dup get-bottom-margin
  2 index
  box-generic-extend-height        % => Context Parent This

pop pop pop
} def

/box-image-generic-setup-methods {
  dup /Methods get
  dup /get-max-width     { box-image-generic-get-max-width } put
  dup /get-min-width     { box-image-generic-get-min-width } put
  dup /pre-reflow-images { box-image-generic-pre-reflow-images } put
  dup /reflow            { box-image-generic-reflow } put
  pop pop
} def