在打开的连接中将消息从Elixir中的TCP服务器发送到TCP客户端

Question

我通过使用Erlang ：gen_tcp模块的实现在Phoenixframwork中开发了一个TCP服务器。

我可以通过调用:gen_tcp.listen(port)来启动服务器，然后监听该端口上的新连接。

一个客户是药房的自动拣选系统（基本上是自动配药机器人）。

因此，作为TCP客户端，机器人可以打开与我的TCP服务器的连接。 服务器通过机械手通过handle_info -callback方法侦听新消息，并且还可以在此请求（ :gen_tcp.send ）中响应客户端。

我面临的问题是我不知道如何使用此连接并将数据发送回机器人而没有客户端请求。

由于机械手是tcp客户端（机械手背后的公司表示，目前无法将机械手用作服务器），因此我无法向其发送消息的开放端口/机械手服务器地址。 因此，我必须使用由客户端初始化的已建立的连接。

设定

pharmacy_ui> pharmacy_api（Phoenix）>机器人（供应商软件）

工作流程 ：

1. 机器人通过TCP初始化与api的连接
2. 机器人将状态信息发送到api并获得响应
3. 在某个时刻（请参阅更新1） ，api必须向机器人发送分配请求（通过使用＃1中初始化的连接）

步骤1和2有效，第3部分没有。

在Elixir / Phoenix中，这看起来像一个关于tcp连接的相当简单的问题，但是正确方向的任何提示都值得高度赞赏:)

到目前为止，我想出了这个实现（基于此博客文章 ）：

defmodule MyApi.TcpServerClean do
  use GenServer

  defmodule State do
    defstruct port: nil, lsock: nil, request_count: 0
  end

  def start_link(port) do
    :gen_server.start_link({ :local, :my_api }, __MODULE__, port, [])
  end

  def start_link() do
    start_link 9876 # Default Port if non provided at startup
  end

  def get_count() do # test call from my_frontend
    :gen_server.call(:my_api, :get_count)
  end

  def stop() do
    :gen_server.cast(:my_api, :stop)
  end

  def init (port) do
    { :ok, lsock } = :gen_tcp.listen(port, [{ :active, true }])
    { :ok, %State{lsock: lsock, port: port}, 0 }
  end

  def handle_call(:get_count, _from, state) do
    { :reply, { :ok, state.request_count }, state }
  end

  def handle_cast(:stop , state) do
    { :noreply, state }
  end

  # handles client tcp requests
  def handle_info({ :tcp, socket, raw_data}, state) do
    do_rpc(socket, raw_data) # raw_data = data from robot
    { :noreply, %{ state | request_count: state.request_count + 1 } } # count for testing states
  end

  def handle_info(:timeout, state) do
    { :ok, _sock } = :gen_tcp.accept state.lsock
    { :noreply, state }
  end

  def handle_info(:tcp_closed, state) do
    # do something
    { :noreply, state }
  end

  def do_rpc(socket, raw_data) do
    try do
      # process data from robot and do something with it
      resp = "My tcp server response ..." # test
      :gen_tcp.send(socket, :io_lib.fwrite(resp, []))
    catch
      error -> :gen_tcp.send(socket, :io_lib.fwrite("~p~n", [error]))
    end
  end
end

更新1 ：

在某个时刻=用户（例如药剂师）在ui前端下订单。 前端触发到api的帖子，而api在OrderController中处理该帖子。 OrderController必须转换订单（以便机械手理解），并将其传递到TcpServer，后者保留与机械手的连接。 该工作流程每天将发生多次。

Answer 1

{ :ok, _sock } = :gen_tcp.accept state.lsock

_sock是您不使用的套接字。 但实际上是可以在其上发送数据的套接字。 即：gen_tcp.send（_sock， data ）将数据推送到您的机器人。 您将需要确保正在监视此套接字是否断开连接，并确保可以访问它以供以后使用。 这意味着您需要创建一个拥有该套接字并包含对该套接字的引用的进程，以便您的服务器代码可以在以后的某个时间点将数据发送到该套接字。 即最简单的方法是创建gen_server。

但是，您正在做的是创建自己的接受者代码。 有一个已经广泛使用的接受者池实现。 它被称为牧场（ https://github.com/ninenines/ranch ）。 您可以使用它，而不用自己动手。 它提供了比您现有的方法更优化的方法。 例如，它创建了一个接受者池。 它还将使gen_server更好地抽象，后者仅负责与机器人进行通信，而完全不必担心侦听器套接字。