如何测试 msg 是否发送到 GenServer 进程

Question

我将 GenServer 作为后台作业运行，每个 interval 由 Process.send_after(self(), :work, @interval) 重新安排。

此作业由主管在应用程序启动时启动。

它工作得很好，但现在我想测试我的 GenServer 模块是否真的在每个interval 产生新进程。

如何测试它？

编辑

我发现:sys.get_status(pid) 可用于获取有关进程的一些数据，但我真的很想使用receive do ... end 之类的东西

编辑 2

handle_info/2函数：

@impl true
def handle_info(:work, state) do
  do_smt()

  schedule_worker()

  {:noreply, state}
end

schedule_worker/0函数：

defp schedule_worker do
  Process.send_after(self(), :work, @interval)
end

Answer 1

我将使用Mock library 测试do_smt() 并编写一个如下断言的测试：

with_mock(MyModule, [do_stm_else: fn -> :ok]) do
   do_smt()

   assert_called MyModule.do_stm_else()
end

这样，您已经调用了任务应该执行的函数，因此您可以假设正在调用任务创建。

如果您想让do_stm_else 函数与您的测试通信（在这种情况下它看起来有点过度设计），您应该：

1. 通过调用self()获取测试的pid
2. 将 pid 传递给模拟函数以使用它
3. 使用assert_receive 验证通信是否发生

pid = self()

with_mock(MyModule, [do_stm_else: fn -> 
      Process.send(pid, :msg)
   ]) do
   do_smt()

   assert_called MyModule.do_stm_else()
end

assert_receive(:msg)

请注意，我没有时间检查这个，你应该花点时间调查一下。

Answer 2

您的消息中缺少某些内容。从您发布的内容中，我们可以了解到每@interval 毫秒都会发送一条:work 消息。您没有告诉我们发送消息时handle_info/2 应该做什么。

一旦定义了这一点，您绝对可以编写一个测试，通过使用assert_received 断言来断言已收到消息。