1 | #-------------------------------------- |
---|
2 | # This experiment consists of 3 clouds with 5 nodes as resources. |
---|
3 | # Firth cloud roles as a set of brokers that runs benchmark applications such as webstone |
---|
4 | #-------------------------------------- |
---|
5 | |
---|
6 | set ns [new Simulator] |
---|
7 | source tb_compat.tcl |
---|
8 | |
---|
9 | tb-set-delay-capacity 1 |
---|
10 | |
---|
11 | #-------------------------------------- |
---|
12 | # First Cloud |
---|
13 | # Resource type 2 (bpc2133) : Xeon CPU, 4096 memory |
---|
14 | #-------------------------------------- |
---|
15 | |
---|
16 | set node11 [$ns node] |
---|
17 | tb-set-node-os $node11 Ubuntu-Xen-904 |
---|
18 | tb-set-hardware $node11 pc3000 |
---|
19 | |
---|
20 | set node12 [$ns node] |
---|
21 | tb-set-node-os $node12 Ubuntu-Xen-904 |
---|
22 | tb-set-hardware $node12 pc3000 |
---|
23 | |
---|
24 | set node13 [$ns node] |
---|
25 | tb-set-node-os $node13 Ubuntu-Xen-904 |
---|
26 | tb-set-hardware $node13 pc3000 |
---|
27 | |
---|
28 | |
---|
29 | set ctl1 [$ns node] |
---|
30 | tb-set-node-os $ctl1 Ubuntu904-unsup |
---|
31 | tb-set-hardware $ctl1 pc3000 |
---|
32 | |
---|
33 | set cli1 [$ns node] |
---|
34 | tb-set-node-os $cli1 Ubuntu904-unsup |
---|
35 | tb-set-hardware $cli1 pc3000 |
---|
36 | |
---|
37 | set lan1 [$ns make-lan "$ctl1 $node11 $node12 $node13 $cli1" 1000Mb 0ms] |
---|
38 | $ns rtproto Static |
---|
39 | |
---|
40 | tb-set-sync-server $ctl1 |
---|
41 | tb-set-node-startcmd $ctl1 "bash /proj/Virtual/script/eucalyptus_setup/install_ctl.sh node11 node12 node13 >& /tmp/ctl1.log" |
---|
42 | tb-set-node-startcmd $node11 "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node11.log" |
---|
43 | tb-set-node-startcmd $node12 "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node12.log" |
---|
44 | tb-set-node-startcmd $node13 "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node13.log" |
---|
45 | tb-set-node-startcmd $cli1 "bash /proj/Virtual/script/eucalyptus_setup/install_cli.sh >& /tmp/cli1.log" |
---|
46 | |
---|
47 | #-------------------------------------- |
---|
48 | # Second Cloud |
---|
49 | # Resource type 3 (pc3000) : Dual Xeon, 2048 memory |
---|
50 | #-------------------------------------- |
---|
51 | |
---|
52 | set node21 [$ns node] |
---|
53 | tb-set-node-os $node21 Ubuntu-Xen-904 |
---|
54 | tb-set-hardware $node21 pc3000 |
---|
55 | |
---|
56 | set node22 [$ns node] |
---|
57 | tb-set-node-os $node22 Ubuntu-Xen-904 |
---|
58 | tb-set-hardware $node22 pc3000 |
---|
59 | |
---|
60 | set node23 [$ns node] |
---|
61 | tb-set-node-os $node23 Ubuntu-Xen-904 |
---|
62 | tb-set-hardware $node23 pc3000 |
---|
63 | |
---|
64 | |
---|
65 | set ctl2 [$ns node] |
---|
66 | tb-set-node-os $ctl2 Ubuntu904-unsup |
---|
67 | tb-set-hardware $ctl2 pc3000 |
---|
68 | |
---|
69 | set cli2 [$ns node] |
---|
70 | tb-set-node-os $cli2 Ubuntu904-unsup |
---|
71 | tb-set-hardware $cli2 pc3000 |
---|
72 | |
---|
73 | set lan2 [$ns make-lan "$ctl2 $node21 $node22 $node23 $cli2" 1000Mb 0ms] |
---|
74 | $ns rtproto Static |
---|
75 | |
---|
76 | tb-set-sync-server $ctl2 |
---|
77 | tb-set-node-startcmd $ctl2 "bash /proj/Virtual/script/eucalyptus_setup/install_ctl.sh node21 node22 node23 >& /tmp/ctl2.log" |
---|
78 | tb-set-node-startcmd $node21 "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node21.log" |
---|
79 | tb-set-node-startcmd $node22 "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node22.log" |
---|
80 | tb-set-node-startcmd $node23 "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node23.log" |
---|
81 | |
---|
82 | tb-set-node-startcmd $cli2 "bash /proj/Virtual/script/eucalyptus_setup/install_cli.sh >& /tmp/cli2.log" |
---|
83 | |
---|
84 | #-------------------------------------- |
---|
85 | # Fourth Cloud - Brokers |
---|
86 | # Resource type 3 (pc3060) : Dual Xeon CPU, 2048 memory |
---|
87 | #-------------------------------------- |
---|
88 | |
---|
89 | set node41b [$ns node] |
---|
90 | tb-set-node-os $node41b Ubuntu-Xen-904 |
---|
91 | tb-set-hardware $node41b pc3000 |
---|
92 | |
---|
93 | set node42b [$ns node] |
---|
94 | tb-set-node-os $node42b Ubuntu-Xen-904 |
---|
95 | tb-set-hardware $node42b pc3000 |
---|
96 | |
---|
97 | set node43b [$ns node] |
---|
98 | tb-set-node-os $node43b Ubuntu-Xen-904 |
---|
99 | tb-set-hardware $node43b pc3000 |
---|
100 | |
---|
101 | set ctl4b [$ns node] |
---|
102 | tb-set-node-os $ctl4b Ubuntu904-unsup |
---|
103 | tb-set-hardware $ctl4b pc3000 |
---|
104 | |
---|
105 | set cli4b [$ns node] |
---|
106 | tb-set-node-os $cli4b Ubuntu904-unsup |
---|
107 | tb-set-hardware $cli4b pc3000 |
---|
108 | |
---|
109 | set lan4b [$ns make-lan "$ctl4b $node41b $node42b $node43b $cli4b" 1000Mb 0ms] |
---|
110 | $ns rtproto Static |
---|
111 | |
---|
112 | tb-set-sync-server $ctl4b |
---|
113 | tb-set-node-startcmd $ctl4b "bash /proj/Virtual/script/eucalyptus_setup/install_ctl.sh node41b node42b node43b >& /tmp/ctl4b.log" |
---|
114 | tb-set-node-startcmd $node41b "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node41b.log" |
---|
115 | tb-set-node-startcmd $node42b "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node42b.log" |
---|
116 | tb-set-node-startcmd $node43b "bash /proj/Virtual/script/eucalyptus_setup/install_node.sh >& /tmp/node43b.log" |
---|
117 | tb-set-node-startcmd $cli4b "bash /proj/Virtual/script/eucalyptus_setup/install_cli.sh >& /tmp/cli4b.log" |
---|
118 | |
---|
119 | |
---|
120 | #======================================== |
---|
121 | # controller |
---|
122 | #======================================== |
---|
123 | |
---|
124 | set controller [$ns node] |
---|
125 | tb-set-node-os $controller Ubuntu904-unsup |
---|
126 | set mainlan [$ns make-lan "$cli1 $cli2 $cli4b $controller" 1000Mb 0ms] |
---|
127 | $ns rtproto Static |
---|
128 | |
---|
129 | |
---|
130 | $ns run |
---|
131 | |
---|