read-request-line-string ( -- string/f )

Vocabulary

http.server.requests.private

Inputs

None

Outputs

string/f

an object

Definition

USING: ascii combinators http.server.requests io io.crlf kernel
sequences strings ;

IN: http.server.requests.private

: read-request-line-string ( -- string/f )
    read1 {
        { f [ f ] }
        { 13 [ read1 10 assert= "" ] }
        { 10 [ "" ] }
        [
            dup control? over 9 = not and
            [ dup 1string parse-request-line-safe drop ] when
            read-?crlf "" or swap prefix
        ]
    } case ;