# f9.dml
#
# traffic source:
#               size: 3000,000bytes
#
# server..........router.........router........clients
#  
#                                               
#       8Mb                800kb      
#  5(0)--------0(1) 
#       9.5ms       0(0)---------------7(0)
#  6(0)--------0(2)
#        5ms                100ms          


_schema [ _find .schemas.Net ]

dictionary [
    tcpinit[
            ISS 0 
            MSS 960
            RcvWndSize 32 
            SendWndSize  32
            SendBufferSize 32
            MaxRexmitTimes  12
            TCP_SLOW_INTERVAL 0.5
            MSL 60.0
            MaxIdleTime 600.0
            fast_recovery false
    ]
    client[
            graph [
            ProtocolSession [
            name client use SSF.OS.TCP.testClient
            no_of_connections 2
            start_time_1 5.0 
            start_time_2 1.0
            doc_size [constant 3000000] 
            servers [connect [nhi_range [from 5(0) to 6(0)]] port 10]]

            ProtocolSession [name socket use SSF.OS.Socket.socketSession]
            ProtocolSession [name tcp use SSF.OS.TCP.tcpSessionMaster
                tcpinit[
                     ISS 0
                     MSS 960
                         RcvWndSize 32
                     SendWndSize  32
                     SendBufferSize 32
                     MaxRexmitTimes  12
                     TCP_SLOW_INTERVAL 0.5
                     MSL 60.0
                     MaxIdleTime 600.0
             fast_recovery false
                ]
        ]
            ProtocolSession [name ip use SSF.OS.minIP]
            
            ]
    ]

        8Mb [
            bitrate 8000000 # 8 million bits per second
        ]
    800kb [
        bitrate 800000 # 0.8 million bits per second
    ]

]


Net [
 
# ------------------------------------------------------------- LINKS

 link [attach 5(0) attach 0(1) delay 0.0095]
 link [attach 6(0) attach 0(2) delay 0.005]
 link [attach 0(0) attach 7(0) delay 0.1]


# ------------------------------------------------------------- ROUTERS

 router [ 
   id 0
   graph [ProtocolSession [name ip use SSF.OS.minIP]]
   interface [ id 0 _extends .dictionary.800kb tcpdump "f9.tcpdump"
            buffer 16000 queue droptail]
   interface [ id 1 _extends .dictionary.8Mb tcpdump "f9_1.tcpdump"]
   interface [ id 2 _extends .dictionary.8Mb tcpdump "f9_2.tcpdump"]
   route [dest default interface 0]
 ]


# ------------------------------------------------------------- CLIENTS

 host [ id 7 
        interface [id 0 _extends .dictionary.800kb ] 
    route [dest default interface 0]
    _find .dictionary.client.graph
 ]

# ------------------------------------------------------------- SERVERS
 host [ id 5
        interface [id 0 _extends .dictionary.8Mb]
        route [dest default interface 0]
        graph [
                ProtocolSession [name server use SSF.OS.TCP.simServer
                                port 10 interval 0.1]
                ProtocolSession [name socket use SSF.OS.Socket.socketSession]
                ProtocolSession [name tcp use SSF.OS.TCP.tcpSessionMaster
                         _find .dictionary.tcpinit]
                ProtocolSession [name ip use SSF.OS.testIP
                        testinit[ fake_protocol 6
                                  fake_type 0 # drop message
                        ]
                ]
        ]
 ]

 host [ id 6 
        interface [id 0 _extends .dictionary.8Mb] 
    route [dest default interface 0]
        graph [
                ProtocolSession [name server use SSF.OS.TCP.simServer
                                port 10 interval 0.1]
                ProtocolSession [name socket use SSF.OS.Socket.socketSession]
                ProtocolSession [name tcp use SSF.OS.TCP.tcpSessionMaster
                         _find .dictionary.tcpinit]
                ProtocolSession [name ip use SSF.OS.testIP
                        testinit[ fake_protocol 6
                                  fake_type 0 # drop message
                        ]
                ]
        ]

 ]