get-content-data ( header -- content )

Vocabulary

fastcgi

Inputs

header

an object

Outputs

content

an object

Definition

USING: accessors io kernel math ;

IN: fastcgi

: get-content-data ( header -- content )
    dup [ content-length>> ] [ padding-length>> ] bi or 0 > [
        [ content-length>> read ] [ padding-length>> read drop ]
        bi
    ] [ drop f ] if ;