栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验 > 面试问答

将Erlang-C端口示例转换为Erlang-Golang

面试问答 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

将Erlang-C端口示例转换为Erlang-Golang

根据@Justin发布此答案,该问题包含略有不同但有效的答案。

echo.go

package mainimport (    "bufio"    "os")func main() {    for{        reader := bufio.NewReader(os.Stdin)        bytes, _ := reader.ReadBytes('n')        os.Stdout.Write(bytes)    }}

complex1.erl

-module(complex1).-export([start/1, stop/0, init/1]).-export([send/1]).start(ExtPrg) ->    spawn_link(?MODULE, init, [ExtPrg]).stop() ->    complex ! stop.send(Y) -> call_port({msg, Y}).call_port({msg, 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}, []),    loop(Port).loop(Port) ->    receive    {call, Caller, Msg} ->        Port ! {self(), {command, Msg++[10]}},        Data = receive_all(Port, 100),        Caller ! {complex, Data},        loop(Port);    stop ->        Port ! {self(), close},        receive {Port, closed} -> exit(normal)        end;    {'EXIT', Port, Reason} ->        exit({port_terminated, Reason})    end.receive_all(Port, Timeout) -> receive_all(Port, Timeout, []).receive_all(Port, Timeout, Buffer) ->    receive        {Port, {data, Data}} -> receive_all(Port, Timeout, [Data | Buffer])        after Timeout -> lists:flatten(lists:reverse(Buffer))    end.

$ erl

Erlang R16B02_basho8 (erts-5.10.3) [source] [64-bit] [smp:4:4] [async-threads:10] [hipe] [kernel-poll:false]Eshell V5.10.3  (abort with ^G)1> c(complex1).{ok,complex1}2> complex1:start("go run echo.go").<0.40.0>3> complex1:send("asdhadlsjahdslahjdlhd")."asdhadlsjahdslahjdlhd"4> complex1:send("aksdghjakdsgalkdgaldsagdlkagdlkadg")."aksdghjakdsgalkdgaldsagdlkagdlkadg"


转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/568958.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号