15
我想为Erlang编写Golang驱动程序,通过Erlang端口访问。将Erlang-C端口示例转换为Erlang-Golang
我已经开始与二郎I2C端口例如,工作正常:
http://www.erlang.org/doc/tutorial/c_port.html
现在我试图端口C代码Golang;试图用'\ n'作为分隔符来回显一个简单的'Hello World \ n'消息。
所以我Golang代码如下:
package main
import (
"bufio"
"fmt"
"os"
)
func main() {
reader := bufio.NewReader(os.Stdin)
fmt.Print("Enter text: ")
bytes, _ := reader.ReadBytes('\n')
os.Stdout.Write(bytes)
}
而且我可以编译它,并在命令行中运行它,如下所示:
[email protected]:~/work/erlang_golang_port$ go build -o tmp/echo echo.go
[email protected]:~/work/erlang_golang_port$ ./tmp/echo
Enter text: hello
hello
然而,当我尝试调用从驱动程序在Erlang方面(Erlang代码如下)我得到以下内容:
[email protected]:~/work/erlang_golang_port$ erl
Erlang R16B03 (erts-5.10.4) [source] [64-bit] [smp:4:4] [async-threads:10] [kernel-poll:false]
Eshell V5.10.4 (abort with ^G)
1> c(complex1).
{ok,complex1}
2> complex1:start("./tmp/echo").
<0.41.0>
3> complex1:ping().
=ERROR REPORT==== 23-Apr-2015::08:56:47 ===
Bad value on output port './tmp/echo'
我有这样的感觉, e被传递给驱动程序,但是我不知何故错误地返回了响应。
TIA。
二郎口代码:
-module(complex1).
-export([start/1, stop/0, init/1]).
-export([ping/0]).
-define(HELLO_WORLD, [72, 101, 108, 108, 111, 44, 32, 119, 111, 114, 108, 100, 46]).
start(ExtPrg) ->
spawn(?MODULE, init, [ExtPrg]).
stop() ->
complex ! stop.
ping() ->
call_port({ping, ?HELLO_WORLD++[10]}).
call_port(Msg) ->
complex ! {call, self(), Msg},
receive
{complex, Result} ->
Result
end.
init(ExtPrg) ->
register(complex, self()),
process_flag(trap_exit, true),
Port = open_port({spawn, ExtPrg}, [{packet, 2}]),
loop(Port).
loop(Port) ->
receive
{call, Caller, Msg} ->
Port ! {self(), {command, Msg}},
receive
{Port, {data, Data}} ->
Caller ! {complex, Data}
end,
loop(Port);
stop ->
Port ! {self(), close},
receive
{Port, closed} ->
exit(normal)
end;
{'EXIT', Port, _Reason} ->
exit(port_terminated)
end.
'平/ 0'使用'call_port/1'到元组发送到所述端口过程为消息然后发送到端口。发送到端口的实际数据只能是一个字节列表。 – rvirding
也'fmt.Print(“输入文本:”)''写入标准输出。 erlang过程中写入的文本是意料之外的。 – wldsvc
@rvirding应该已经发现,错误地调换了C示例。作品。谢谢。 – Justin