AdaSockets

码农软件 · 软件分类 · 网络工具包 · 2019-08-31 10:59:12

软件介绍

AdaSockets 是一个 Ada 95 的 socket 编程开发包,支持单播和多播套接字,使用面向对象结构来简化套接字操作。

示例代码:

with Ada.Command_Line; use Ada.Command_Line;
with Ada.Exceptions; use Ada.Exceptions;
with Ada.Text_IO; use Ada.Text_IO;
with Sockets.Stream_IO; use Sockets, Sockets.Stream_IO;

procedure Stream_Sender is

   -- Usage: stream_sender remotehost remoteport
   -- Example: stream_sender localhost 5000

   Outgoing_Socket : Socket_FD;
   Stream : aliased Socket_Stream_Type;
   Line : String (1 .. 200);
   Last : Natural;

begin
   if Argument_Count /= 2 then
      Raise_Exception
        (Constraint_Error'Identity,
         "Usage: " & Command_Name & " remotehost remoteport");
   end if;

   Socket (Outgoing_Socket, PF_INET, SOCK_STREAM);
   Connect (Outgoing_Socket, Argument (1), Positive'Value (Argument (2)));
   Initialize (Stream, Outgoing_Socket);

   loop
      Put ("Type a string> ");
      Flush;
      Get_Line (Line, Last);
      String'Output (Stream'Access, Line (Line'First .. Last));
   end loop;

exception
   when End_Error => null;
end Stream_Sender;

本文地址:https://codercto.com/soft/d/13560.html

Web Data Mining

Web Data Mining

Bing Liu / Springer / 2011-6-26 / CAD 61.50

Web mining aims to discover useful information and knowledge from Web hyperlinks, page contents, and usage data. Although Web mining uses many conventional data mining techniques, it is not purely an ......一起来看看 《Web Data Mining》 这本书的介绍吧!

html转js在线工具
html转js在线工具

html转js在线工具

UNIX 时间戳转换
UNIX 时间戳转换

UNIX 时间戳转换

HEX CMYK 转换工具
HEX CMYK 转换工具

HEX CMYK 互转工具