分离并附加RServe连接：无法连接

Question

我正在尝试从Java分离并附加一个RServe会话。连接到RServe可以完美地工作，但连接会导致异常。

package com.company.korana.r_interface;

import org.rosuda.REngine.Rserve.RConnection;

import com.company.korana.config.Config$;;

public class RToast {
    public static void main(String[] args) throws Exception {
        RConnection rConnection = new RConnection(Config$.MODULE$.rserveHost(), Config$.MODULE$.rservePort());

        rConnection.assign("testVariable", "hello from java");
        rConnection.eval("print('Hi R console from java')"); // <--- this is visible in the R console

        org.rosuda.REngine.Rserve.RSession sessionHandle = rConnection.detach();

        rConnection = sessionHandle.attach(); // <---- this throws

        System.out.println(rConnection.eval("testVariable").asString());
    }
}

线程“main”org.rosuda.REngine.Rserve.Rserve异常：无法连接：连接被拒绝：连接到org.rosuda.REngine.Rserve.RConnection。（RConnection.java:90）org.rosuda.REngine.Rserve.RConnection。（RConnection.java:66）org.rosuda.REngine.Rserve.RSession.attach（RSession.java:36）com.company.korana.r\u interface.RToast.main（RToast.java:16）原因：java.net.ConnectException:连接被拒绝：java.net.DualStackPlainSocketImpl.connect0（本机方法）处的java.net.DualStackPlainSocketImpl.socketConnect（未知源）处的java.net.AbstractPlainSocketImpl.doConnect（未知源）处的java.net.AbstractPlainSocketImpl.connectToAddress（未知源）java.net.socksocketipl.connect（未知源）java.net.plainsocketipl.connect（未知源）java.net.socksocketipl.connect（未知源）java.net.Socket.connect（未知源）java.net.Socket.connect（未知源）java.net.Socket.（未知源）java.net.Socket.（未知源）在org.rosuda.REngine.Rserve.RConnection.（RConnection.java:85）…还有3个

Rserve使用默认端口在本地主机上运行。

编辑：我正在使用以下maven工件：

<dependency>
    <groupId>org.rosuda.REngine</groupId>
    <artifactId>Rserve</artifactId>
    <version>1.8.1</version>
</dependency>

Answer 1

在对源进行检查后，发现当分离时，Rserver会话会监听随机分配的端口。

Rserv.c，第1781行

while ((port = (((int) random()) & 0x7fff)+32768)>65000) {};

因此，客户端和服务器之间需要访问的端口介于32768和65000之间。在我的例子中，这不起作用，因为我在使用docker。

编辑：我构建了一个解决方案，可以在docker中使用Rserver，而无需打开大量端口（这与docker不太兼容）。下面的狙击手取代了我的install.packages（“雷瑟”）：

RUN wget https://www.rforge.net/src/contrib/Rserve_1.8-5.tar.gz
RUN tar -xf Rserve_1.8-5.tar.gz
RUN rm Rserve_1.8-5.tar.gz
RUN sed -i '1763s/.*/\t\tint port = 53000;/' /Rserve/src/Rserv.c
RUN sed -i '1781s/.*//' /Rserve/src/Rserv.c
RUN sed -i '1793s/.*/\t\tif (port>53100) {/' /Rserve/src/Rserv.c
RUN tar -czvf Rserve_1.8-5.tar.gz /Rserve
RUN R CMD INSTALL Rserve_1.8-5.tar.gz

这修改了Rserver源，使端口位于[53000, 53100[范围内，这在我的情况下就足够了。