tcp - 如何获取连接到基于 Rebol3 的服务器的客户端的远程 IP 地址？

Question

我正在玩 these basic TCP test scripts并想知道:“如何获取连接到服务器的客户端的 IP 地址？”

有什么想法吗？我试图在服务器端探测客户端子端口，但它没有显示远程 ip。

有人可以给我一些收集信息的提示吗？我知道它在 Rebol2 中是如何工作的，但我不熟悉 Rebol3 端口模型。

Answer 1

您可以通过在客户端 port! 上调用 QUERY 来获取该信息，这将返回一个包含 remote-ip 和 remote-port 的对象> 字段。

这里有一个简单的例子来说明这一点，它有一个简单的服务，它监听端口 9090 上的连接并打印连接到该服务的客户端的地址:

rebol []

awake-server: func [event /local client info] [
    if event/type = 'accept [
        client: first event/port
        info: query client
        print ajoin ["Client connected: " info/remote-ip ":" info/remote-port]
        close client
    ]
]

serve: func [endpoint /local listen-port] [
    listen-port: open endpoint
    listen-port/awake: :awake-server
    wait listen-port
]

serve tcp://:9090