# basic4c.dml
#
# topology
#  client            ...           server
#              800kb  100ms
#  0(0)  ---------------------------1(0)
#                                    |
#                                  tcpdump
#  

_schema [ _find .schemas.Net ]

dictionary [
    item1[
	tcpinit[
        	ISS 10000 
        	MSS 960
        	RcvWndSize  8
        	SendWndSize 8
     		SendBufferSize 16
     		MaxRexmitTimes  12
     		TCP_SLOW_INTERVAL 0.5
     		MSL 60.0
     		MaxIdleTime 600.0
	]
    ]
    item2[
        tcpinit[
                ISS 5000
                MSS 960
                RcvWndSize  8
                SendWndSize 8
                SendBufferSize 16
                MaxRexmitTimes  12
                TCP_SLOW_INTERVAL 0.5
                MSL 60.0
                MaxIdleTime 600.0
        ]
    ]

	client[
            graph [
        	ProtocolSession [
          	name client use SSF.OS.TCP.simClient
          	no_of_connections 1
	        doc_size [constant 300000] 
          	servers [connect [nhi_range [from 1(0) to 1(0)]] port 10]]

        	ProtocolSession [name socket use SSF.OS.Socket.socketSession]
        	ProtocolSession [name tcp use SSF.OS.TCP.tcpSessionMaster
                         _find .dictionary.item1.tcpinit]
        	ProtocolSession [name ip use SSF.OS.minIP]
			
       	    ]
	]
	server[
     	    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.item2.tcpinit 
				 rttdump "basic4c.rtt"
				 rtodump "basic4c.rto"
				 cwnddump "basic4c.wnd"]
        	ProtocolSession [name ip use SSF.OS.testIP
                        testinit[ fake_protocol 6
                                  fake_type 0 # drop message
                                  drop[ packet 3] 
                                  drop[ packet 5] 
                        ]
                ]

     	    ]
	]
]

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

 link [attach 0(0) attach 1(0) delay 0.1]

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

 host [ id 0 
        interface [id 0 bitrate 800000 ] 
	_find .dictionary.client.graph
 ]

# ------------------------------------------------------------- SERVERS

 host [ id 1 
        interface [id 0 bitrate 800000 tcpdump "basic4c.tcpdump"] 
	_find .dictionary.server.graph
 ]