2014-06-25 19 views
2

部分读Range头对我的作品罚款:从READ/PART或URL部分读通过HTTP READ/SEEK

rebol [] 
client: open tcp://www.apache.org/ 

client/awake: func [event /local port] [ 
    port: event/port 
    switch event/type [ 
     lookup [open port] 
     connect [ 
      write port rejoin [ 
       {GET/HTTP/1.1} crlf 
       {User-Agent: curl/7.26.0} crlf 
       {Host: www.apache.org} crlf 
       {Accept: */*} crlf 
       {Range: bytes=0-9} crlf 
       crlf 
      ] 
     ] 
     wrote [read port] 
     read [ 
      probe to-string port/data 
      probe length? port/data 
      clear port/data 
     ]   
    ] 
    false 
] 

wait [client 3] 
close client 
print "Done" 

我想我可以使用READ /一部分做同样的事情:

length? read/part http://www.apache.org/ 10 ;40195 
length? read http://www.apache.org/   ;40195 

但它没有工作,仍然获得所有的字节。与READ/SEEK相同。 这是为什么? (顺便说一下,它在Rebol2中有效。)

回答

2

您可以从源头看

https://github.com/rebol/rebol/blob/master/src/mezz/prot-http.r#L424 

read演员没有定义任何的改进。这并不意味着他们不能被定义,但目前还没有做出决定是否应该通过使用改进或使用查询方言来完成。

你可以通过设置trace/net on看到,它的伪装它Rebol2

>> trace/net on 
>> read/part http://www.apache.org 10 
URL Parse: none none www.apache.org none none none 
Net-log: ["Opening" "tcp" "for" "HTTP"] 
connecting to: www.apache.org 
Net-log: {GET/HTTP/1.0 
Accept: */* 
Connection: close 
User-Agent: REBOL View 2.7.8.3.1 
Host: www.apache.org 
} 
Net-log: "HTTP/1.1 200 OK" 
Net-log: ["low level read of " 2048 "bytes"] 
Net-log: ["low level read of " 2048 "bytes"] 
.. many lines removed 
Net-log: ["low level read of " 2048 "bytes"] 
Net-log: ["low level read of " 2048 "bytes"] 
Net-log: ["low level read of " 2048 "bytes"] 
== "<!DOCTYPE " 
+0

所以在Rebol2,READ/PART只是获取的所有数据,并返回它的一部分? “痕迹”很酷! –

+0

是的。这不是在协议方面完成的。 –

0

这是一个安全的猜测,它只是在当前版本的HTTP方案中没有实现。还有其他缺失的部分,如重定向,所以我会认为它还不支持。