problem with protocol number fixed

src/internet-stack/icmpv4-l4-protocol.cc

@@ -86,6 +86,7 @@ Icmpv4L4Protocol::SendMessage (Ptr<Packet> packet, Ipv4Address dest, uint8_t typ
   NS_ASSERT (ipv4 != 0 && ipv4->GetRoutingProtocol () != 0);
   Ipv4Header header;
   header.SetDestination (dest);
+  header.SetProtocol (PROT_NUMBER);
   Socket::SocketErrno errno_;
   Ptr<Ipv4Route> route;
   uint32_t oif = 0; //specify non-zero if bound to a source address

src/internet-stack/ipv4-raw-socket-impl.cc

@@ -174,6 +174,7 @@ Ipv4RawSocketImpl::SendTo (Ptr<Packet> p, uint32_t flags,
     {
       Ipv4Header header;
       header.SetDestination (dst);
+      header.SetProtocol (m_protocol);
       SocketErrno errno_ = ERROR_NOTERROR;//do not use errno as it is the standard C last error number 
       Ptr<Ipv4Route> route;
       uint32_t oif = 0; //specify non-zero if bound to a source address

src/internet-stack/tcp-l4-protocol.cc

@@ -549,6 +549,7 @@ TcpL4Protocol::Send (Ptr<Packet> packet,
       // should be cached.
       Ipv4Header header;
       header.SetDestination (daddr);
+      header.SetProtocol (PROT_NUMBER);
       Socket::SocketErrno errno_;
       Ptr<Ipv4Route> route;
       uint32_t oif = 0; //specify non-zero if bound to a source address
@@ -587,6 +588,7 @@ TcpL4Protocol::SendPacket (Ptr<Packet> packet, TcpHeader outgoingHeader,
       // should be cached.
       Ipv4Header header;
       header.SetDestination (daddr);
+      header.SetProtocol (PROT_NUMBER);
       Socket::SocketErrno errno_;
       Ptr<Ipv4Route> route;
       uint32_t oif = 0; //specify non-zero if bound to a source address

src/internet-stack/udp-socket-impl.cc

@@ -403,6 +403,7 @@ UdpSocketImpl::DoSendTo (Ptr<Packet> p, Ipv4Address dest, uint16_t port)
     {
       Ipv4Header header;
       header.SetDestination (dest);
+      header.SetProtocol (UdpL4Protocol::PROT_NUMBER);
       Socket::SocketErrno errno_;
       Ptr<Ipv4Route> route;
       uint32_t oif = 0; //specify non-zero if bound to a source address