go.dedis.ch/onet/v3@v3.2.11-0.20210930124529-e36530bca7ef/simul/platform/deterlab_users/cothority.ns (about)

     1  set ns [new Simulator]
     2  source tb_compat.tcl
     3  
     4  # Set you number of servers here, as well s the delay.
     5  # The bandwidth can be set below.
     6  
     7  set server_count 30
     8  set server_delay 100ms
     9  set lanstr ""
    10  
    11  # There is no real benefit for modifying this for a special case of 1 client
    12  
    13  for {set i 0} {$i < $server_count} {incr i} {
    14          set server($i) [$ns node]
    15              # Uncomment the server hardware you're using here, or add your own
    16              #tb-set-hardware $server($i) dl380g3
    17              #tb-set-hardware $server($i) MicroCloud
    18              tb-set-hardware $server($i) pc2133
    19          tb-set-node-os $server($i) Ubuntu1404-64-STD
    20          append server_lanstr "$server($i) "
    21  }
    22  
    23  # Here you can set your bandwidth restrictions by replacing the 144Mb with the
    24  # expected bandwidth
    25  tb-use-endnodeshaping 1
    26  set serverlan [$ns make-lan "$server_lanstr" 144Mb $server_delay]
    27  
    28  for {set i 0} {$i < $server_count} {incr i} {
    29          tb-set-ip-lan $server($i) $serverlan 10.255.0.[expr {$i + 1}]
    30  }
    31  
    32  $ns rtproto Static
    33  $ns run