omf_ec 6.0.0.pre.2
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- data/.gitignore +4 -0
- data/Gemfile +4 -0
- data/Rakefile +7 -0
- data/bin/omf_test +161 -0
- data/config/ec.yml +164 -0
- data/exp_repo/system/exp/eventlib.rb +96 -0
- data/exp_repo/system/exp/imageNode.rb +283 -0
- data/exp_repo/system/exp/reset.rb +21 -0
- data/exp_repo/system/exp/saveNode.rb +99 -0
- data/exp_repo/system/exp/stat.rb +49 -0
- data/exp_repo/system/exp/stdlib.rb +122 -0
- data/exp_repo/system/exp/tell.rb +53 -0
- data/exp_repo/system/exp/testlib.rb +12 -0
- data/exp_repo/system/exp/winlib.rb +154 -0
- data/exp_repo/system/topo/active.rb +9 -0
- data/exp_repo/system/topo/all.rb +10 -0
- data/exp_repo/system/topo/circle.rb +23 -0
- data/exp_repo/test/app/aodvd.rb +73 -0
- data/exp_repo/test/app/appDef1.rb +102 -0
- data/exp_repo/test/app/athstats.rb +76 -0
- data/exp_repo/test/app/echo.rb +36 -0
- data/exp_repo/test/app/gennyReceiverAppDef.rb +100 -0
- data/exp_repo/test/app/gennySenderAppDef.rb +106 -0
- data/exp_repo/test/app/itgdec.rb +79 -0
- data/exp_repo/test/app/itgr.rb +77 -0
- data/exp_repo/test/app/itgs.rb +105 -0
- data/exp_repo/test/app/nop.rb +36 -0
- data/exp_repo/test/app/otg2.rb +68 -0
- data/exp_repo/test/app/otg2_mp.rb +56 -0
- data/exp_repo/test/app/otr2.rb +56 -0
- data/exp_repo/test/app/otr2_mp.rb +51 -0
- data/exp_repo/test/app/trace_oml2.rb +62 -0
- data/exp_repo/test/app/wlanconfig_oml2.rb +42 -0
- data/exp_repo/test/exp/conf-room-demo.rb +118 -0
- data/exp_repo/test/exp/planetlab.rb +82 -0
- data/exp_repo/test/exp/test01.rb +42 -0
- data/exp_repo/test/exp/test02.rb +60 -0
- data/exp_repo/test/exp/test03.rb +95 -0
- data/exp_repo/test/exp/test04.rb +105 -0
- data/exp_repo/test/exp/test05.rb +87 -0
- data/exp_repo/test/exp/test06.rb +71 -0
- data/exp_repo/test/exp/tutorial/hello-world-wired.rb +79 -0
- data/exp_repo/test/exp/tutorial/hello-world-wireless.rb +87 -0
- data/exp_repo/test/exp/tutorial/using-filters.rb +69 -0
- data/exp_repo/test/exp/tutorial/using-groups.rb +64 -0
- data/exp_repo/test/exp/tutorial/using-properties.rb +93 -0
- data/exp_repo/test/exp/tutorial/using-prototypes.rb +111 -0
- data/exp_repo/test/proto/aodvrouter.rb +55 -0
- data/exp_repo/test/proto/driverqueryapp.rb +59 -0
- data/exp_repo/test/proto/forwarder.rb +73 -0
- data/exp_repo/test/proto/itgcbrsender.rb +70 -0
- data/exp_repo/test/proto/itgdecoder.rb +64 -0
- data/exp_repo/test/proto/itgreceiver.rb +55 -0
- data/exp_repo/test/proto/itgvoipsender.rb +64 -0
- data/exp_repo/test/proto/listener2.rb +62 -0
- data/exp_repo/test/proto/nop.rb +47 -0
- data/exp_repo/test/proto/probelink.rb +48 -0
- data/exp_repo/test/proto/raw_receiver.rb +64 -0
- data/exp_repo/test/proto/receiver2_mp.rb +48 -0
- data/exp_repo/test/proto/sender2_mp.rb +54 -0
- data/exp_repo/test/proto/udp_receiver.rb +55 -0
- data/exp_repo/test/proto/udp_sender.rb +61 -0
- data/lib/omf_ec/version.rb +3 -0
- data/lib/omf_ec.rb +5 -0
- data/omf_ec.gemspec +24 -0
- metadata +145 -0
@@ -0,0 +1,79 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2010 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
5
|
+
# of this software and associated documentation files (the "Software"), to deal
|
6
|
+
# in the Software without restriction, including without limitation the rights
|
7
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
8
|
+
# copies of the Software, and to permit persons to whom the Software is
|
9
|
+
# furnished to do so, subject to the following conditions:
|
10
|
+
#
|
11
|
+
# The above copyright notice and this permission notice shall be included in
|
12
|
+
# all copies or substantial portions of the Software.
|
13
|
+
#
|
14
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
15
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
16
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
17
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
18
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
19
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
20
|
+
# THE SOFTWARE.
|
21
|
+
#
|
22
|
+
# Tutorial experiment
|
23
|
+
#
|
24
|
+
defProperty('res1', 'omf.nicta.node1', "ID of sender node")
|
25
|
+
defProperty('res2', 'omf.nicta.node2', "ID of receiver node")
|
26
|
+
defProperty('duration', 60, "Duration of the experiment")
|
27
|
+
defProperty('graph', false, "Display graph or not")
|
28
|
+
|
29
|
+
defGroup('Sender', property.res1) do |node|
|
30
|
+
node.addApplication("test:app:otg2") do |app|
|
31
|
+
app.setProperty('udp:local_host', '192.168.0.2')
|
32
|
+
app.setProperty('udp:dst_host', '192.168.0.3')
|
33
|
+
app.setProperty('udp:dst_port', 3000)
|
34
|
+
app.measure('udp_out', :samples => 1)
|
35
|
+
end
|
36
|
+
node.net.e0.ip = "192.168.0.2"
|
37
|
+
end
|
38
|
+
|
39
|
+
defGroup('Receiver', property.res2) do |node|
|
40
|
+
node.addApplication("test:app:otr2") do |app|
|
41
|
+
app.setProperty('udp:local_host', '192.168.0.3')
|
42
|
+
app.setProperty('udp:local_port', 3000)
|
43
|
+
app.measure('udp_in', :samples => 1)
|
44
|
+
end
|
45
|
+
node.net.e0.ip = "192.168.0.3"
|
46
|
+
end
|
47
|
+
|
48
|
+
onEvent(:ALL_UP_AND_INSTALLED) do |event|
|
49
|
+
info "This is my first OMF experiment"
|
50
|
+
wait 10
|
51
|
+
allGroups.startApplications
|
52
|
+
info "All my Applications are started now..."
|
53
|
+
wait property.duration
|
54
|
+
allGroups.stopApplications
|
55
|
+
info "All my Applications are stopped now."
|
56
|
+
Experiment.done
|
57
|
+
end
|
58
|
+
|
59
|
+
if property.graph.value
|
60
|
+
addTab(:defaults)
|
61
|
+
addTab(:graph2) do |tab|
|
62
|
+
opts = { :postfix => %{This graph shows the Sequence Number from the UDP traffic.}, :updateEvery => 1 }
|
63
|
+
tab.addGraph("Sequence_Number", opts) do |g|
|
64
|
+
dataOut = Array.new
|
65
|
+
dataIn = Array.new
|
66
|
+
mpOut = ms('udp_out')
|
67
|
+
mpIn = ms('udp_in')
|
68
|
+
mpOut.project(:oml_ts_server, :seq_no).each do |sample|
|
69
|
+
dataOut << sample.tuple
|
70
|
+
end
|
71
|
+
mpIn.project(:oml_ts_server, :seq_no).each do |sample|
|
72
|
+
dataIn << sample.tuple
|
73
|
+
end
|
74
|
+
g.addLine(dataOut, :label => "Sender (outgoing UDP)")
|
75
|
+
g.addLine(dataIn, :label => "Receiver (incoming UDP)")
|
76
|
+
end
|
77
|
+
end
|
78
|
+
end
|
79
|
+
|
@@ -0,0 +1,87 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2010 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
5
|
+
# of this software and associated documentation files (the "Software"), to deal
|
6
|
+
# in the Software without restriction, including without limitation the rights
|
7
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
8
|
+
# copies of the Software, and to permit persons to whom the Software is
|
9
|
+
# furnished to do so, subject to the following conditions:
|
10
|
+
#
|
11
|
+
# The above copyright notice and this permission notice shall be included in
|
12
|
+
# all copies or substantial portions of the Software.
|
13
|
+
#
|
14
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
15
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
16
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
17
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
18
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
19
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
20
|
+
# THE SOFTWARE.
|
21
|
+
#
|
22
|
+
# Tutorial experiment
|
23
|
+
#
|
24
|
+
defProperty('res1', 'omf.nicta.node1', "ID of sender node")
|
25
|
+
defProperty('res2', 'omf.nicta.node2', "ID of receiver node")
|
26
|
+
defProperty('duration', 60, "Duration of the experiment")
|
27
|
+
defProperty('graph', false, "Display graph or not")
|
28
|
+
|
29
|
+
defGroup('Sender', property.res1) do |node|
|
30
|
+
node.addApplication("test:app:otg2") do |app|
|
31
|
+
app.setProperty('udp:local_host', '192.168.0.2')
|
32
|
+
app.setProperty('udp:dst_host', '192.168.0.3')
|
33
|
+
app.setProperty('udp:dst_port', 3000)
|
34
|
+
app.measure('udp_out', :samples => 1)
|
35
|
+
end
|
36
|
+
node.net.w0.mode = "adhoc"
|
37
|
+
node.net.w0.type = 'g'
|
38
|
+
node.net.w0.channel = "6"
|
39
|
+
node.net.w0.essid = "helloworld"
|
40
|
+
node.net.w0.ip = "192.168.0.2"
|
41
|
+
end
|
42
|
+
|
43
|
+
defGroup('Receiver', property.res2) do |node|
|
44
|
+
node.addApplication("test:app:otr2") do |app|
|
45
|
+
app.setProperty('udp:local_host', '192.168.0.3')
|
46
|
+
app.setProperty('udp:local_port', 3000)
|
47
|
+
app.measure('udp_in', :samples => 1)
|
48
|
+
end
|
49
|
+
node.net.w0.mode = "adhoc"
|
50
|
+
node.net.w0.type = 'g'
|
51
|
+
node.net.w0.channel = "6"
|
52
|
+
node.net.w0.essid = "helloworld"
|
53
|
+
node.net.w0.ip = "192.168.0.3"
|
54
|
+
end
|
55
|
+
|
56
|
+
onEvent(:ALL_UP_AND_INSTALLED) do |event|
|
57
|
+
info "This is my first OMF experiment"
|
58
|
+
wait 10
|
59
|
+
allGroups.startApplications
|
60
|
+
info "All my Applications are started now..."
|
61
|
+
wait property.duration
|
62
|
+
allGroups.stopApplications
|
63
|
+
info "All my Applications are stopped now."
|
64
|
+
Experiment.done
|
65
|
+
end
|
66
|
+
|
67
|
+
if property.graph.value
|
68
|
+
addTab(:defaults)
|
69
|
+
addTab(:graph2) do |tab|
|
70
|
+
opts = { :postfix => %{This graph shows the Sequence Number from the UDP traffic.}, :updateEvery => 1 }
|
71
|
+
tab.addGraph("Sequence_Number", opts) do |g|
|
72
|
+
dataOut = Array.new
|
73
|
+
dataIn = Array.new
|
74
|
+
mpOut = ms('udp_out')
|
75
|
+
mpIn = ms('udp_in')
|
76
|
+
mpOut.project(:oml_ts_server, :seq_no).each do |sample|
|
77
|
+
dataOut << sample.tuple
|
78
|
+
end
|
79
|
+
mpIn.project(:oml_ts_server, :seq_no).each do |sample|
|
80
|
+
dataIn << sample.tuple
|
81
|
+
end
|
82
|
+
g.addLine(dataOut, :label => "Sender (outgoing UDP)")
|
83
|
+
g.addLine(dataIn, :label => "Receiver (incoming UDP)")
|
84
|
+
end
|
85
|
+
end
|
86
|
+
end
|
87
|
+
|
@@ -0,0 +1,69 @@
|
|
1
|
+
# Copyright (c) 2006-2010 National ICT Australia (NICTA), Australia
|
2
|
+
#
|
3
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
4
|
+
# of this software and associated documentation files (the "Software"), to deal
|
5
|
+
# in the Software without restriction, including without limitation the rights
|
6
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
7
|
+
# copies of the Software, and to permit persons to whom the Software is
|
8
|
+
# furnished to do so, subject to the following conditions:
|
9
|
+
#
|
10
|
+
# The above copyright notice and this permission notice shall be included in
|
11
|
+
# all copies or substantial portions of the Software.
|
12
|
+
#
|
13
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
14
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
15
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
16
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
17
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
18
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
19
|
+
# THE SOFTWARE.
|
20
|
+
#
|
21
|
+
# Tutorial experiment
|
22
|
+
#
|
23
|
+
defProperty('res1', 'omf.nicta.node1', "ID of sender node")
|
24
|
+
defProperty('res2', 'omf.nicta.node2', "ID of receiver node")
|
25
|
+
defProperty('packetsize', 256, "Packet size (byte) from the sender node")
|
26
|
+
defProperty('runtime', 60, "Time in second for the experiment is to run")
|
27
|
+
|
28
|
+
defGroup('Sender',property.res1) do |node|
|
29
|
+
node.addApplication("test:app:otg2") do |app|
|
30
|
+
app.setProperty('udp:local_host', '192.168.0.2')
|
31
|
+
app.setProperty('udp:dst_host', '192.168.0.3')
|
32
|
+
app.setProperty('udp:dst_port', 3000)
|
33
|
+
app.setProperty('cbr:size', property.packetsize)
|
34
|
+
app.measure('udp_out', :samples => 3) do |mp|
|
35
|
+
mp.filter('seq_no', 'avg')
|
36
|
+
end
|
37
|
+
end
|
38
|
+
node.net.w0.mode = "adhoc"
|
39
|
+
node.net.w0.type = 'g'
|
40
|
+
node.net.w0.channel = "6"
|
41
|
+
node.net.w0.essid = "helloworld"
|
42
|
+
node.net.w0.ip = "192.168.0.2"
|
43
|
+
end
|
44
|
+
|
45
|
+
defGroup('Receiver',property.res2) do |node|
|
46
|
+
node.addApplication("test:app:otr2") do |app|
|
47
|
+
app.setProperty('udp:local_host', '192.168.0.3')
|
48
|
+
app.setProperty('udp:local_port', 3000)
|
49
|
+
app.measure('udp_in', :samples => 2) do |mp|
|
50
|
+
mp.filter('pkt_length', 'sum')
|
51
|
+
mp.filter('seq_no', 'avg')
|
52
|
+
end
|
53
|
+
end
|
54
|
+
node.net.w0.mode = "adhoc"
|
55
|
+
node.net.w0.type = 'g'
|
56
|
+
node.net.w0.channel = "6"
|
57
|
+
node.net.w0.essid = "helloworld"
|
58
|
+
node.net.w0.ip = "192.168.0.3"
|
59
|
+
end
|
60
|
+
|
61
|
+
onEvent(:ALL_UP_AND_INSTALLED) do |event|
|
62
|
+
wait 10
|
63
|
+
allGroups.startApplications
|
64
|
+
wait property.runtime / 2
|
65
|
+
property.packetsize = 512
|
66
|
+
wait property.runtime / 2
|
67
|
+
allGroups.stopApplications
|
68
|
+
Experiment.done
|
69
|
+
end
|
@@ -0,0 +1,64 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2010 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
5
|
+
# of this software and associated documentation files (the "Software"), to deal
|
6
|
+
# in the Software without restriction, including without limitation the rights
|
7
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
8
|
+
# copies of the Software, and to permit persons to whom the Software is
|
9
|
+
# furnished to do so, subject to the following conditions:
|
10
|
+
#
|
11
|
+
# The above copyright notice and this permission notice shall be included in
|
12
|
+
# all copies or substantial portions of the Software.
|
13
|
+
#
|
14
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
15
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
16
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
17
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
18
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
19
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
20
|
+
# THE SOFTWARE.
|
21
|
+
#
|
22
|
+
# Tutorial experiment
|
23
|
+
#
|
24
|
+
defProperty('res1', 'omf.nicta.node1', "ID of sender node")
|
25
|
+
defProperty('res2', 'omf.nicta.node2', "ID of receiver node")
|
26
|
+
defProperty('duration', 60, "Duration of the experiment")
|
27
|
+
|
28
|
+
defGroup('Sender', property.res1) do |node|
|
29
|
+
node.addApplication("test:app:otg2") do |app|
|
30
|
+
app.setProperty('udp:local_host', '%net.w0.ip%')
|
31
|
+
app.setProperty('udp:dst_host', '192.168.255.255')
|
32
|
+
app.setProperty('udp:broadcast', 1)
|
33
|
+
app.setProperty('udp:dst_port', 3000)
|
34
|
+
app.measure('udp_out', :samples => 1)
|
35
|
+
end
|
36
|
+
end
|
37
|
+
|
38
|
+
defGroup('Receiver', property.res2) do |node|
|
39
|
+
node.addApplication("test:app:otr2") do |app|
|
40
|
+
app.setProperty('udp:local_host', '192.168.255.255')
|
41
|
+
app.setProperty('udp:local_port', 3000)
|
42
|
+
app.measure('udp_in', :samples => 1)
|
43
|
+
end
|
44
|
+
end
|
45
|
+
|
46
|
+
allGroups.net.w0 do |interface|
|
47
|
+
interface.mode = "adhoc"
|
48
|
+
interface.type = 'g'
|
49
|
+
interface.channel = "6"
|
50
|
+
interface.essid = "helloworld"
|
51
|
+
interface.ip = "192.168.0.%index%"
|
52
|
+
end
|
53
|
+
|
54
|
+
onEvent(:ALL_UP_AND_INSTALLED) do |event|
|
55
|
+
wait 10
|
56
|
+
group("Receiver").startApplications
|
57
|
+
wait 5
|
58
|
+
group("Sender").startApplications
|
59
|
+
wait property.duration
|
60
|
+
group("Sender").stopApplications
|
61
|
+
wait 5
|
62
|
+
group("Receiver").stopApplications
|
63
|
+
Experiment.done
|
64
|
+
end
|
@@ -0,0 +1,93 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2010 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
5
|
+
# of this software and associated documentation files (the "Software"), to deal
|
6
|
+
# in the Software without restriction, including without limitation the rights
|
7
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
8
|
+
# copies of the Software, and to permit persons to whom the Software is
|
9
|
+
# furnished to do so, subject to the following conditions:
|
10
|
+
#
|
11
|
+
# The above copyright notice and this permission notice shall be included in
|
12
|
+
# all copies or substantial portions of the Software.
|
13
|
+
#
|
14
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
15
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
16
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
17
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
18
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
19
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
20
|
+
# THE SOFTWARE.
|
21
|
+
#
|
22
|
+
# Tutorial experiment
|
23
|
+
#
|
24
|
+
defProperty('res1', 'omf.nicta.node1', "ID of sender node")
|
25
|
+
defProperty('res2', 'omf.nicta.node2', "ID of receiver node")
|
26
|
+
defProperty('packetsize', 128, "Packet size (byte) from the sender node")
|
27
|
+
defProperty('bitrate', 2048, "Bitrate (bit/s) from the sender node")
|
28
|
+
defProperty('runtime', 40, "Time in second for the experiment is to run")
|
29
|
+
defProperty('wifiType', "g", "The type of WIFI to use in this experiment")
|
30
|
+
defProperty('channel', '6', "The WIFI channel to use in this experiment")
|
31
|
+
defProperty('netid', "example2", "The ESSID to use in this experiment")
|
32
|
+
defProperty('graph', false, "Display graph or not")
|
33
|
+
|
34
|
+
defGroup('Sender',property.res1) do |node|
|
35
|
+
node.addApplication("test:app:otg2") do |app|
|
36
|
+
app.setProperty('udp:local_host', '192.168.0.2')
|
37
|
+
app.setProperty('udp:dst_host', '192.168.0.3')
|
38
|
+
app.setProperty('udp:dst_port', 3000)
|
39
|
+
app.setProperty('cbr:size', property.packetsize)
|
40
|
+
app.setProperty('cbr:rate', property.bitrate * 2)
|
41
|
+
app.measure('udp_out', :samples => 1)
|
42
|
+
end
|
43
|
+
node.net.w0.mode = "adhoc"
|
44
|
+
node.net.w0.type = property.wifiType
|
45
|
+
node.net.w0.channel = property.channel
|
46
|
+
node.net.w0.essid = property.netid
|
47
|
+
node.net.w0.ip = "192.168.0.2"
|
48
|
+
end
|
49
|
+
|
50
|
+
defGroup('Receiver',property.res2) do |node|
|
51
|
+
node.addApplication("test:app:otr2") do |app|
|
52
|
+
app.setProperty('udp:local_host', '192.168.0.3')
|
53
|
+
app.setProperty('udp:local_port', 3000)
|
54
|
+
app.measure('udp_in', :samples => 1)
|
55
|
+
end
|
56
|
+
node.net.w0.mode = "adhoc"
|
57
|
+
node.net.w0.type = property.wifiType
|
58
|
+
node.net.w0.channel = property.channel
|
59
|
+
node.net.w0.essid = property.netid
|
60
|
+
node.net.w0.ip = "192.168.0.3"
|
61
|
+
end
|
62
|
+
|
63
|
+
onEvent(:ALL_UP_AND_INSTALLED) do |event|
|
64
|
+
info "This is my first OMF experiment"
|
65
|
+
wait 10
|
66
|
+
allGroups.startApplications
|
67
|
+
info "All my Applications are started now..."
|
68
|
+
wait property.runtime / 4
|
69
|
+
property.packetsize = 256
|
70
|
+
wait property.runtime / 4
|
71
|
+
property.packetsize = 512
|
72
|
+
wait property.runtime / 4
|
73
|
+
property.packetsize = 1024
|
74
|
+
wait property.runtime / 4
|
75
|
+
allGroups.stopApplications
|
76
|
+
info "All my Applications are stopped now."
|
77
|
+
Experiment.done
|
78
|
+
end
|
79
|
+
|
80
|
+
if property.graph.value
|
81
|
+
addTab(:defaults)
|
82
|
+
addTab(:graph2) do |tab|
|
83
|
+
opts = { :postfix => %{This graph shows the Packet Size of the incoming UDP traffic (byte).}, :updateEvery => 1 }
|
84
|
+
tab.addGraph("Incoming UDP Packet Size", opts) do |g|
|
85
|
+
dataIn = Array.new
|
86
|
+
mpIn = ms('udp_in')
|
87
|
+
mpIn.project(:oml_ts_server, :pkt_length).each do |sample|
|
88
|
+
dataIn << sample.tuple
|
89
|
+
end
|
90
|
+
g.addLine(dataIn, :label => "Incoming UDP (byte)")
|
91
|
+
end
|
92
|
+
end
|
93
|
+
end
|
@@ -0,0 +1,111 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2010 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
5
|
+
# of this software and associated documentation files (the "Software"), to deal
|
6
|
+
# in the Software without restriction, including without limitation the rights
|
7
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
8
|
+
# copies of the Software, and to permit persons to whom the Software is
|
9
|
+
# furnished to do so, subject to the following conditions:
|
10
|
+
#
|
11
|
+
# The above copyright notice and this permission notice shall be included in
|
12
|
+
# all copies or substantial portions of the Software.
|
13
|
+
#
|
14
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
15
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
16
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
17
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
18
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
19
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
20
|
+
# THE SOFTWARE.
|
21
|
+
#
|
22
|
+
# Tutorial experiment
|
23
|
+
#
|
24
|
+
defProperty('res1', 'omf.nicta.node1', "ID of sender node")
|
25
|
+
defProperty('res2', 'omf.nicta.node2', "ID of receiver node")
|
26
|
+
defProperty('duration', 30, "Duration of the experiment")
|
27
|
+
defProperty('graph', false, "Display graph or not")
|
28
|
+
|
29
|
+
defGroup('CBR_Sender', property.res1) do |node|
|
30
|
+
options = { 'localHost' => '%net.w0.ip%',
|
31
|
+
'destinationHost' => '192.168.255.255',
|
32
|
+
'packetSize' => 256 }
|
33
|
+
node.addPrototype("test:proto:cbr_generator", options)
|
34
|
+
end
|
35
|
+
|
36
|
+
defGroup('EXPO_Sender', property.res1) do |node|
|
37
|
+
options = { 'localHost' => '%net.w0.ip%',
|
38
|
+
'destinationHost' => '192.168.255.255',
|
39
|
+
'packetSize' => 1024 }
|
40
|
+
node.addPrototype("test:proto:expo_generator", options)
|
41
|
+
end
|
42
|
+
|
43
|
+
defGroup('Receiver', property.res2) do |node|
|
44
|
+
node.addApplication("test:app:otr2") do |app|
|
45
|
+
app.setProperty('udp:local_host', '192.168.255.255')
|
46
|
+
app.setProperty('udp:local_port', 3000)
|
47
|
+
app.measure('udp_in', :samples => 1)
|
48
|
+
end
|
49
|
+
end
|
50
|
+
|
51
|
+
allGroups.net.w0 do |interface|
|
52
|
+
interface.mode = "adhoc"
|
53
|
+
interface.type = 'g'
|
54
|
+
interface.channel = "6"
|
55
|
+
interface.essid = "helloworld"
|
56
|
+
interface.ip = "192.168.0.%index%"
|
57
|
+
end
|
58
|
+
|
59
|
+
onEvent(:ALL_UP_AND_INSTALLED) do |event|
|
60
|
+
wait 10
|
61
|
+
info "Starting the Receiver"
|
62
|
+
group("Receiver").startApplications
|
63
|
+
info "Starting the EXPO-traffic Sender"
|
64
|
+
group("EXPO_Sender").startApplications
|
65
|
+
wait property.duration
|
66
|
+
info "Stopping the EXPO-traffic Sender"
|
67
|
+
group("EXPO_Sender").stopApplications
|
68
|
+
wait 5
|
69
|
+
info "Starting the CBR-traffic Sender"
|
70
|
+
group("CBR_Sender").startApplications
|
71
|
+
wait property.duration
|
72
|
+
info "Now stopping all everything"
|
73
|
+
#allGroups.stopApplications
|
74
|
+
group("CBR_Sender").stopApplications
|
75
|
+
group("Receiver").stopApplications
|
76
|
+
Experiment.done
|
77
|
+
end
|
78
|
+
|
79
|
+
|
80
|
+
if property.graph.value
|
81
|
+
addTab(:defaults)
|
82
|
+
addTab(:graph2) do |tab|
|
83
|
+
opts1 = { :postfix => %{This graph shows the Sequence Number from CBR and EXP UDP traffic.}, :updateEvery => 1 }
|
84
|
+
tab.addGraph("Sequence Number", opts1) do |g|
|
85
|
+
dataOut = Hash.new
|
86
|
+
mpOut = ms('udp_out')
|
87
|
+
mpOut.project(:oml_sender_id, :oml_ts_server, :seq_no).each do |sample|
|
88
|
+
sender, time, seq = sample.tuple
|
89
|
+
dataOut[sender] = [] if dataOut[sender] == nil
|
90
|
+
dataOut[sender] << [time,seq]
|
91
|
+
end
|
92
|
+
dataOut.each do |source, data|
|
93
|
+
g.addLine(data, :label => "#{msSenderName[source]}")
|
94
|
+
end
|
95
|
+
end
|
96
|
+
opts2 = { :postfix => %{This graph shows the Packet Size (bytes)from CBR and EXP UDP traffic.}, :updateEvery => 1 }
|
97
|
+
tab.addGraph("Packet Size", opts2) do |g|
|
98
|
+
dataOut = Hash.new
|
99
|
+
mpOut = ms('udp_out')
|
100
|
+
mpOut.project(:oml_sender_id, :oml_ts_server, :pkt_length).each do |sample|
|
101
|
+
sender, time, plength = sample.tuple
|
102
|
+
dataOut[sender] = [] if dataOut[sender] == nil
|
103
|
+
dataOut[sender] << [time,plength]
|
104
|
+
end
|
105
|
+
dataOut.each do |source, data|
|
106
|
+
g.addLine(data, :label => "#{msSenderName[source]}")
|
107
|
+
end
|
108
|
+
end
|
109
|
+
end
|
110
|
+
end
|
111
|
+
|
@@ -0,0 +1,55 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2009 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Copyright (c) 2004-2009 WINLAB, Rutgers University, USA
|
5
|
+
#
|
6
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
7
|
+
# of this software and associated documentation files (the "Software"), to deal
|
8
|
+
# in the Software without restriction, including without limitation the rights
|
9
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
10
|
+
# copies of the Software, and to permit persons to whom the Software is
|
11
|
+
# furnished to do so, subject to the following conditions:
|
12
|
+
#
|
13
|
+
# The above copyright notice and this permission notice shall be included in
|
14
|
+
# all copies or substantial portions of the Software.
|
15
|
+
#
|
16
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
19
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
21
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
22
|
+
# THE SOFTWARE.
|
23
|
+
#
|
24
|
+
#
|
25
|
+
#
|
26
|
+
# Define a prototype
|
27
|
+
#
|
28
|
+
|
29
|
+
p = Prototype.create("test:proto:aodvrouter")
|
30
|
+
p.name = "AODV daemon"
|
31
|
+
p.description = "Nodes which receive packets"
|
32
|
+
p.defProperty('interface', 'Interface to listen on')
|
33
|
+
p.defProperty('log', 'Enable logging')
|
34
|
+
p.defProperty('routelog', 'Enable logging')
|
35
|
+
|
36
|
+
aodvd = p.addApplication('aodvd', "test:app:aodvd")
|
37
|
+
aodvd.bindProperty('interface')
|
38
|
+
aodvd.bindProperty('log')
|
39
|
+
aodvd.bindProperty('rttable','routelog')
|
40
|
+
|
41
|
+
aodvd.addMeasurement('receiverport', Filter::SAMPLE,
|
42
|
+
{Filter::SAMPLE_SIZE => 1},
|
43
|
+
[
|
44
|
+
['flow_no'],
|
45
|
+
['throughput'],
|
46
|
+
['jitter'],
|
47
|
+
['packet_loss']
|
48
|
+
]
|
49
|
+
)
|
50
|
+
|
51
|
+
if $0 == __FILE__
|
52
|
+
p.to_xml.write($stdout, 2)
|
53
|
+
puts
|
54
|
+
end
|
55
|
+
|
@@ -0,0 +1,59 @@
|
|
1
|
+
#
|
2
|
+
# Copyright (c) 2006-2009 National ICT Australia (NICTA), Australia
|
3
|
+
#
|
4
|
+
# Copyright (c) 2004-2009 WINLAB, Rutgers University, USA
|
5
|
+
#
|
6
|
+
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
7
|
+
# of this software and associated documentation files (the "Software"), to deal
|
8
|
+
# in the Software without restriction, including without limitation the rights
|
9
|
+
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
10
|
+
# copies of the Software, and to permit persons to whom the Software is
|
11
|
+
# furnished to do so, subject to the following conditions:
|
12
|
+
#
|
13
|
+
# The above copyright notice and this permission notice shall be included in
|
14
|
+
# all copies or substantial portions of the Software.
|
15
|
+
#
|
16
|
+
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
17
|
+
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
18
|
+
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
19
|
+
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
20
|
+
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
21
|
+
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
22
|
+
# THE SOFTWARE.
|
23
|
+
#
|
24
|
+
#
|
25
|
+
#
|
26
|
+
# Define a prototype
|
27
|
+
#
|
28
|
+
|
29
|
+
p = Prototype.create("test:proto:driverqueryapp")
|
30
|
+
p.name = "Wireless Driver Stats"
|
31
|
+
p.description = "Statistics obtained by querying the driver periodically"
|
32
|
+
p.defProperty('interface', 'interface to gather stats from')
|
33
|
+
p.defProperty('interval', 'How often to query the driver')
|
34
|
+
|
35
|
+
athstats = p.addApplication(:athstats, "test:app:athstats")
|
36
|
+
athstats.bindProperty('interface')
|
37
|
+
athstats.bindProperty('interval')
|
38
|
+
|
39
|
+
athstats.addMeasurement('queryport', Filter::SAMPLE,
|
40
|
+
{Filter::SAMPLE_SIZE => 1},
|
41
|
+
[
|
42
|
+
['succ_tx_attempts'],
|
43
|
+
['fail_xretries'],
|
44
|
+
['fail_fifoerr'],
|
45
|
+
['fail_filtered'],
|
46
|
+
['short_retries'],
|
47
|
+
['long_retries'],
|
48
|
+
['total_frames_rcvd'],
|
49
|
+
['crc_errors'],
|
50
|
+
['fifo_errors'],
|
51
|
+
['phy_errors']
|
52
|
+
]
|
53
|
+
)
|
54
|
+
|
55
|
+
if $0 == __FILE__
|
56
|
+
p.to_xml.write($stdout, 2)
|
57
|
+
puts
|
58
|
+
end
|
59
|
+
|