Erlang Port 小心换行

(金庆的专栏)

Erlang的Port接口使用cin, cout与外部Port进程通信。

一般open_port()用binary模式打开。

Port = open_port({spawn, PortExe},
                     [{packet, 4}, binary, use_stdio]),

此时须小心Port进程在Windows上输出 \n 前会自动添加 \r。
PortExe发送:
   <<10,11,84,101,115,116,77,101,115,115,97,103,101,18,10,10,8,98,98,98,98,98,98,98,98>>
Erlang接收成为：   
<<13,10,11,84,101,115,116,77,101,115,115,97,103,101,18,13,10,13,10,8,98,98,98,98,98>>

需要将Port进程的stdin, stdout设为二进制模式：

void set_binary_mode()
{
#if defined(WIN32)
    int result;
    result = _setmode(_fileno(stdin), _O_BINARY);
    if (-1 == result)
    {
        perror("set mode");
        exit(1);
    }
    result = _setmode(_fileno(stdout), _O_BINARY);
    if (-1 == result)
    {
        perror("set mode");
        exit(1);
    }
#endif
}