diff options
| author | Thomas Quinot <quinot@adacore.com> | 2008-03-26 08:34:57 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-03-26 08:34:57 +0100 |
| commit | 4e0ede3df752962d473249716152e00d779eec66 (patch) | |
| tree | 468353a8f7fe1902433ae7f2395131578ba89eea /gcc/ada/g-socket.ads | |
| parent | 939759fcc993f08e734ed2942a64a8f406335b07 (diff) | |
| download | gcc-4e0ede3df752962d473249716152e00d779eec66.tar.gz | |
re PR ada/33688 (Ada package Gnat.Sockets missing constant for IP_PKTINFO (patch))
2008-03-26 Thomas Quinot <quinot@adacore.com>
PR ada/33688
* g-socket.ads, g-socket.adb (Options, Set_Socket_Option,
Get_Socket_Option): Add support for Receive_Packet_Info.
* g-soccon.ads, g-soccon-tru64.ads, g-soccon-aix.ads,
g-soccon-irix.ads, g-soccon-hpux.ads, g-soccon-solaris.ads,
g-soccon-vms.ads, g-soccon-mingw.ads, g-soccon-freebsd.ads,
g-soccon-hpux-ia64.ads, g-soccon-solaris-64.ads, g-soccon-darwin.ads,
g-soccon-lynxos.ads, g-soccon-linux-64.ads, g-soccon-linux-x86.ads: Add
new constants SO_REUSEPORT and IP_PKTINFO
From-SVN: r133545
Diffstat (limited to 'gcc/ada/g-socket.ads')
| -rw-r--r-- | gcc/ada/g-socket.ads | 46 |
1 files changed, 24 insertions, 22 deletions
diff --git a/gcc/ada/g-socket.ads b/gcc/ada/g-socket.ads index cbbb1331af0..105f285a8b4 100644 --- a/gcc/ada/g-socket.ads +++ b/gcc/ada/g-socket.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 2001-2007, AdaCore -- +-- Copyright (C) 2001-2008, AdaCore -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -623,30 +623,32 @@ package GNAT.Sockets is -- a boolean to enable or disable this option. type Option_Name is ( - Keep_Alive, -- Enable sending of keep-alive messages - Reuse_Address, -- Allow bind to reuse local address - Broadcast, -- Enable datagram sockets to recv/send broadcasts - Send_Buffer, -- Set/get the maximum socket send buffer in bytes - Receive_Buffer, -- Set/get the maximum socket recv buffer in bytes - Linger, -- Shutdown wait for msg to be sent or timeout occur - Error, -- Get and clear the pending socket error - No_Delay, -- Do not delay send to coalesce packets (TCP_NODELAY) - Add_Membership, -- Join a multicast group - Drop_Membership, -- Leave a multicast group - Multicast_If, -- Set default outgoing interface for multicast packets - Multicast_TTL, -- Indicate the time-to-live of sent multicast packets - Multicast_Loop, -- Sent multicast packets are looped to local socket - Send_Timeout, -- Set timeout value for output - Receive_Timeout); -- Set timeout value for input + Keep_Alive, -- Enable sending of keep-alive messages + Reuse_Address, -- Allow bind to reuse local address + Broadcast, -- Enable datagram sockets to recv/send broadcasts + Send_Buffer, -- Set/get the maximum socket send buffer in bytes + Receive_Buffer, -- Set/get the maximum socket recv buffer in bytes + Linger, -- Shutdown wait for msg to be sent or timeout occur + Error, -- Get and clear the pending socket error + No_Delay, -- Do not delay send to coalesce data (TCP_NODELAY) + Add_Membership, -- Join a multicast group + Drop_Membership, -- Leave a multicast group + Multicast_If, -- Set default out interface for multicast packets + Multicast_TTL, -- Set the time-to-live of sent multicast packets + Multicast_Loop, -- Sent multicast packets are looped to local socket + Receive_Packet_Info, -- Receive low level packet info as ancillary data + Send_Timeout, -- Set timeout value for output + Receive_Timeout); -- Set timeout value for input type Option_Type (Name : Option_Name := Keep_Alive) is record case Name is - when Keep_Alive | - Reuse_Address | - Broadcast | - Linger | - No_Delay | - Multicast_Loop => + when Keep_Alive | + Reuse_Address | + Broadcast | + Linger | + No_Delay | + Receive_Packet_Info | + Multicast_Loop => Enabled : Boolean; case Name is |