diff options
author | cinap_lenrek <cinap_lenrek@gmx.de> | 2012-10-18 14:38:07 +0200 |
---|---|---|
committer | cinap_lenrek <cinap_lenrek@gmx.de> | 2012-10-18 14:38:07 +0200 |
commit | 7c3ea4360b64579ce63d85337fdefdbba565f312 (patch) | |
tree | 012b0991bf79576d170ff1aae4264ebaa8c273d4 /rc/bin/hget | |
parent | 909efb22c516c3c685159a954f164469a064e5a7 (diff) |
hpost: add -l flag to get location url after POST
Diffstat (limited to 'rc/bin/hget')
-rwxr-xr-x | rc/bin/hget | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/rc/bin/hget b/rc/bin/hget index 191646a97..bb50a899b 100755 --- a/rc/bin/hget +++ b/rc/bin/hget @@ -2,7 +2,7 @@ rfork e argv0=$0 fn usage { - echo 'usage: '$"argv0' [ -o file ] [ -p body | -P ] [ -r header ] [ -m method ] [ -b baseurl ] url' >[1=2] + echo usage: $argv0 '[ -l | -o file] [ -p body | -P ] [ -r header ] [ -m method ] [ -b baseurl ] url' >[1=2] exit usage } s=0 @@ -12,6 +12,7 @@ P=() r=() m=() b=() +l=() while(~ $1 -*){ switch($1){ case -o @@ -25,6 +26,8 @@ while(~ $1 -*){ case -r r=($r $2) shift + case -l + l=1 case -m m=$2 shift @@ -64,6 +67,10 @@ if(! ~ $s 0) } } <$d/body { + if(~ $#l 1){ + echo `{cat $d/parsed/url} + exit + } if(~ $#o 1){ l=`{cat $d/contentlength >[2]/dev/null} x=`{awk 'BEGIN{FS=" |-"}/^bytes ([0-9]+)\-/{print $2}' \ |