如何使用套接字将node.js与ada连接起来?

问题描述:

我正尝试使用套接字将我的Ada应用程序与node.js服务器连接起来。 我已经设法从Ada发送数据到node.js,但仍然有接收数据的问题。如何使用套接字将node.js与ada连接起来?

这里是我的Ada任务:

task body Send_Task is 

    use Ada.Numerics.Float_Random; 
    Next : Ada.Real_Time.Time; 
    Period : constant Ada.Real_Time.Time_Span := Ada.Real_Time.Milliseconds(5000); 
    Interval : constant Ada.Real_Time.Time_Span := Ada.Real_Time.Milliseconds(30); 
    Gen : Generator; 

    Address : Sock_Addr_Type; 
    Socket : Socket_Type; 
    Channel : Stream_Access; 

    begin 
    Reset(Gen); 
    Next := Ada.Real_Time.Clock + Interval; 
    Address.Addr := Addresses (Get_Host_By_Name (Host_Name), 1); 
    Address.Port := 9000; 
    Create_Socket (Socket); 
    Set_Socket_Option (Socket, Socket_Level, (Reuse_Address, True)); 
    Connect_Socket (Socket, Address); 
    loop 
     delay until Next; 
     Channel := Stream (Socket); 
     String'Output(Channel, Message'Img); 

     Put_Line("Input " & String'Input(Channel)); 
     Next := Next + Period; 
     end loop; 

    exception 
     when E:others => Put_Line("Error: Task Errors"); 
     Put_Line(Exception_Name (E) & ": " & Exception_Message (E)); 
    end Send_Task; 

这是我的node.js服务器:

require('net').createServer(function (socket) { 
    console.log("connected"); 

    socket.on('data', function (data) { 
     console.log(data.toString()); 

    }); 
    socket.on('connection', function(){ 
     console.log("test2"); 
     socket.write("900.0"); 
    }); 
    console.log("test1"); 
     socket.write("900.0"); 

}).listen(9000); 

我对Node.js的服务器控制台输出:

connected 
test1 
0.00 //value of Message'Img 

有没有输出在Ada的任务中。似乎循环任务已停止并等待来自node.js的消息。没有行Put_Line("Input " & String'Input(Channel));一切工作正常(除了从node.js获得消息)。 感谢您的帮助!

您的问题是您的服务器没有正确发送格式化的数据。参考手册中的13.13.2(26/3)指定String'Input首先读取字符串的边界,然后读取其内容。

您可能希望使用String'Write发送并使用Character'Read接收(除非您有明确定义的消息长度)。