Commit af33bbe0 authored by Robert Ricci's avatar Robert Ricci
Browse files

Template for making a 'plab-in-a-box'.

parent e6583883
<?xml version="1.0" encoding="ISO-8859-1" standalone="no"?>
<!DOCTYPE nstemplate SYSTEM "nstemplate.dtd">
XML NS template for making a single-node PlanetLab DevBox experiment
<nstemplate name="PlanetLab In A Box" author="Robert Ricci"
authormail="" authoruid="ricci">
This template is for creating a private PlanetLab using the
"PlanetLab in a Box" code. The only thing you may want to edit
is the number of nodes.
<variable name="Count" default="2" descr="Number of nodes (not including PLC)" />
<variable name="PLCHWType" default="pc3000" descr="Hardware Type for PLC" />
<variable name="HWType" default="pc" descr="Hardware Type for nodes" />
<!-- This hard-codes the image name, but it seems like we have to do
that somewhere... -->
<variable name="ImageName" default="PLAB-PLBOX" descr = "Disk Image for PLC" />
# plinabox.ns - NS script to make a private PlanetLab on Emulab
# May 24, 2006
# Questions and comments to
# Boilerplate
source tb_compat.tcl
set ns [new Simulator]
set num_pcs <Count />
# Create the PLC
set plc [$ns node]
tb-set-node-os $plc <ImageName />
tb-set-node-plab-role $plc plc
tb-set-hardware $plc <PLCHWType />
# Create the nodes
set lan_string ""
for {set i 1} {$i <= $num_pcs} {incr i} {
set node($i) [$ns node]
tb-set-node-plab-role $node($i) node
append lan_string "$node($i) "
set lan [$ns make-lan $lan_string 100Mb 0ms]
# Boilerplate
$ns rtproto Static
$ns run
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment