diff --git a/rc/bin/hpost b/rc/bin/hpost index cbea99f32..6d97f49b8 100755 --- a/rc/bin/hpost +++ b/rc/bin/hpost @@ -1,12 +1,15 @@ #!/bin/rc rfork e url=() +headers=() +action=() +method=() at=() # text fields af=() # file fields l=() fn usage { - echo 'usage: hpost [ -l ] [ -[gpm] action ] [ -u ] url [ field:value | field@file ... ]' >[1=2] + echo 'usage: hpost [ -l ] [ -[gpm] action ] [ -r ] header [ -u ] url [ field:value | field@file ... ]' >[1=2] exit usage } @@ -14,6 +17,7 @@ while(~ $1 -*){ switch($1){ case -l; l=($l $1) case -u; shift; url=$1 + case -r; shift; headers=($headers -r $1) case -g; shift; action=$1; method=mget case -p; shift; action=$1; method=mpost case -m; shift; action=$1; method=multi @@ -94,8 +98,9 @@ fn multi { menc $"f | $hget -r 'Content-Type: multipart/form-data; boundary='$"f -b $url -P $action } + if(! ~ $action ''){ - hget=(hget $l) + hget=(hget $headers $l) $method exit } diff --git a/sys/man/1/hget b/sys/man/1/hget index c4238344a..64147e8c3 100644 --- a/sys/man/1/hget +++ b/sys/man/1/hget @@ -38,6 +38,9 @@ hget, hpost, webpaste, urlencode \- retrieve, post to a web page corresponding t .B -m .I action ] [ +.B -r +.I header +] [ .B -u ] .I url @@ -119,6 +122,9 @@ Option .B -r sends an arbitrary HTTP .IR header . +The +.B -r +flag can be repeated to send multiple headers. .PP Option .B -m