planetlab/scripts/sliver-ovs.in

   1 #!/bin/bash
   2 # -*-shell-mode-*-
   3
   4 ### expected to be run as root
   5
   6 COMMAND=$0
   7
   8 #################### global vars
   9 RUN_DIR=@RUNDIR@
  10 DB_CONF_FILE=@DBDIR@/conf.db
  11 DB_SCHEMA=@pkgdatadir@/vswitch.ovsschema
  12 DB_LOG=@LOGDIR@/ovs-db.log
  13 ##
  14 DB_SOCKET=$RUN_DIR/db.sock
  15 ##
  16 SWITCH_LOG=@LOGDIR@/ovs-switch.log
  17
  18 #################### helper functions
  19
  20 function kill_pltap_ovs () {
  21     killall pltap-ovs 2>/dev/null || :
  22 }
  23
  24 function error {
  25     echo "$@" >&2
  26     exit 1
  27 }
  28
  29 function get_params {
  30     params=$1; shift
  31     err_msg="$COMMAND $SUBCOMMAND $(echo $params | perl -pe 's/\S+/<$&>/g')"
  32     for p in $(echo $params); do
  33         [[ -z "$@" ]] && error "$err_msg"
  34         pname=$(echo -n $p|perl -pe 's/\W/_/g')
  35         eval $pname="$1"; shift
  36     done
  37     [[ -n "$@" ]] && error "$err_msg"
  38 }
  39
  40 function is_switch_running {
  41     ovs-appctl --target=ovs-vswitchd version >& /dev/null
  42 }
  43
  44 function is_db_running {
  45     ovs-appctl --target=ovsdb-server version >& /dev/null
  46 }
  47
  48 function tapname () {
  49     IP=$1; shift
  50     echo $(ip addr show to "$IP/32" | perl -ne '/^\s*\d+:\s*([\w-]+):/ && print $1')
  51 }
  52
  53 function wait_server () {
  54     pid_file=$1; shift
  55     server_name=$1; shift
  56     timeout=$1; shift
  57
  58     expire=$(($(date +%s) + $timeout))
  59
  60     ## wait for it to be up - xxx todo - could use a timeout of some kind
  61     while [ ! -f "$pid_file" ]; do
  62         echo "Waiting for $server_name to start... $(($expire - $(date +%s)))s left" >&2
  63         sleep 1;
  64         [ $(date +%s) -ge $expire ] && return 1
  65     done
  66     cat "$pid_file"
  67 }
  68
  69 function wait_device () {
  70     tapname=$1; shift
  71     timeout=$1; shift
  72
  73     expire=$(($(date +%s) + $timeout))
  74
  75     while ! ip link show up | egrep -q "^[0-9]+: +$tapname:"; do
  76         echo "Waiting for $tapname to come UP...$(($expire - $(date +%s)))s left" >&2
  77         sleep 1
  78         [ $(date +%s) -ge $expire ] && return 1
  79     done
  80     return 0
  81 }
  82
  83 ######################################## startup
  84 function start_db () {
  85     get_params "" "$@"
  86
  87     ## init conf
  88     conf_dir=$(dirname $DB_CONF_FILE)
  89     [ -d $conf_dir ] || mkdir -p $conf_dir
  90     [ -f $DB_CONF_FILE ] || ovsdb-tool create $DB_CONF_FILE $DB_SCHEMA
  91
  92     ## init run
  93     [ -d $RUN_DIR ] || mkdir -p $RUN_DIR
  94
  95     ## check
  96     [ -f $DB_CONF_FILE ] || { echo "Could not initialize $DB_CONF_FILE - exiting" ; exit 1 ; }
  97     [ -d $RUN_DIR ] || { echo "Could not initialize $RUN_DIR - exiting" ; exit 1 ; }
  98
  99     ## run the stuff
 100     if [ ! -f "$RUN_DIR/ovsdb-server.pid" ]; then
 101         ovsdb-server $DB_CONF_FILE \
 102             --remote=punix:$DB_SOCKET \
 103             --remote=db:Open_vSwitch,manager_options \
 104             --private-key=db:SSL,private_key \
 105             --certificate=db:SSL,certificate \
 106             --bootstrap-ca-cert=db:SSL,ca_cert \
 107             --pidfile \
 108             --log-file=$DB_LOG \
 109             --detach >& /dev/null
 110     else
 111         echo 'ovsdb-server appears to be running already, *not* starting'
 112     fi
 113     wait_server $RUN_DIR/ovsdb-server.pid ovsdb-server 30
 114 }
 115
 116 function start_switch () {
 117     get_params "" "$@"
 118
 119     # ensure ovsdb-server is running
 120     is_db_running || { echo "ovsdb-server not running" >&2 ; exit 1 ; }
 121
 122     if [ ! -f "$RUN_DIR/ovs-vswitchd.pid" ] ; then
 123         ovs-vswitchd \
 124             --pidfile \
 125             --log-file=$SWITCH_LOG \
 126             --detach \
 127             unix:$DB_SOCKET >& /dev/null
 128     else
 129         echo 'ovs-vswitchd appears to be running already, *not* starting'
 130     fi
 131     wait_server $RUN_DIR/ovs-vswitchd.pid ovs-vswitchd 30
 132 }
 133
 134 function stop_db () {
 135     ovs-appctl --target=ovsdb-server exit || :
 136 }
 137
 138 function stop_switch () {
 139     ovs-appctl --target=ovs-vswitchd exit || :
 140 }
 141
 142 function status () {
 143     pids=$(pgrep '^ovs')
 144     [ -n "$pids" ] && ps $pids
 145 }
 146
 147 function start () {
 148     start_db
 149     start_switch
 150 }
 151
 152 function stop () {
 153     stop_switch
 154     stop_db
 155 }
 156
 157 #################### create functions
 158 function create_bridge () {
 159
 160     get_params "bridge IP/PREFIX" "$@"
 161
 162     IP=${IP_PREFIX%/*}
 163     PREFIX=${IP_PREFIX#*/}
 164
 165     W=
 166     if ! is_switch_running; then
 167         # we can create the bridge even if ovs-vswitchd is not running,
 168         # but we need a running ovsdb-server
 169         is_db_running || { echo "ovsdb-server not running" >&2; exit 1; }
 170         W="--no-wait"
 171     fi
 172
 173
 174     set -e
 175     ovs-vsctl --db=unix:$DB_SOCKET $W -- --may-exist add-br "$bridge" \
 176         -- set bridge "$bridge" datapath_type=planetlab \
 177         -- set interface "$bridge" options:local_ip="$IP" option:local_netmask="$PREFIX"
 178 }
 179
 180 function create_port () {
 181
 182     get_params "bridge port" "$@"
 183
 184     # ensure ovs-vswitchd is running
 185     is_switch_running || { echo "ovs-vswitchd not running" >&2 ; exit 1 ; }
 186
 187     set -e
 188     ovs-vsctl --db=unix:$DB_SOCKET -- --may-exist add-port "$bridge" "$port" -- set interface "$port" type=tunnel
 189     ovs-appctl --target=ovs-vswitchd netdev-tunnel/get-port "$port"
 190 }
 191
 192 function set_remote_endpoint () {
 193
 194     get_params "local_port remote_ip remote_UDP_port" "$@"
 195
 196     # ensure ovs-vswitchd is running
 197     is_switch_running || { echo "ovs-vswitchd not running" >&2 ; exit 1 ; }
 198
 199     set -e
 200     ovs-vsctl --db=unix:$DB_SOCKET set interface $local_port \
 201         options:remote_ip=$remote_ip \
 202         options:remote_port=$remote_UDP_port
 203 }
 204
 205 function set_controller () {
 206
 207     get_params "bridge_name controller" "$@"
 208
 209     # ensure ovs-vswitchd is running
 210     is_switch_running || { echo "ovs-vswitchd not running" >&2 ; exit 1 ; }
 211
 212     set -e
 213     ovs-vsctl --db=unix:$DB_SOCKET set-controller "$bridge_name" "$controller"
 214 }
 215
 216 function del_controller () {
 217
 218     get_params "bridge_name" "$@"
 219
 220     # ensure ovs-vswitchd is running
 221     is_switch_running || { echo "ovs-vswitchd not running" >&2 ; exit 1 ; }
 222
 223     set -e
 224     ovs-vsctl --db=unix:$DB_SOCKET del-controller "$bridge_name"
 225 }
 226
 227 #################### del functions
 228 function del_bridge () {
 229
 230     get_params "bridge_name" "$@"
 231
 232     W=
 233     if ! is_switch_running; then
 234         # we can delete the bridge even if ovs-vswitchd is not running,
 235         # but we need a running ovsdb-server
 236         is_db_running || { echo "ovsdb-server not running" >&2; exit 1; }
 237         W="--no-wait"
 238     fi
 239
 240     ovs-vsctl --db=unix:$DB_SOCKET $W -- --if-exists del-br $bridge_name
 241 }
 242
 243 function del_port () {
 244
 245     get_params "port" "$@"
 246
 247     W=
 248     if ! is_switch_running; then
 249         # we can delete the port even if ovs-vswitchd is not running,
 250         # but we need a running ovsdb-server
 251         is_db_running || { echo "ovsdb-server not running" >&2; exit 1; }
 252         W="--no-wait"
 253     fi
 254
 255     ovs-vsctl --db=unix:$DB_SOCKET $W -- --if-exists del-port "$port"
 256 }
 257
 258 function show () {
 259
 260     get_params "" "$@"
 261
 262     is_db_running || { echo "ovsdb-server not running" >&2; exit 1; }
 263
 264     ovs-vsctl --db=unix:$DB_SOCKET show
 265 }
 266
 267 ### for demos - connect to an ndnmap deployment to visualize links bandwidth
 268 # this expects 3 arguments
 269 # an interface name, L<id1>-<id2> based on your ids in conf.mk
 270 # the hostname for a ndnmap deployment
 271 # a linkid, this is the id that this link has in your ndnmap scenario (hard-coded in some json file)
 272 # this one-shot function writes the current statistics onto the ndnmap site
 273 # it needs to be called regularly so that ndnmap can do the bw computations
 274 # would make sense for the caller to redirect stderr onto some relevant location
 275 function gmap_report_once () {
 276     iface=$1; shift
 277     hostname=$1; shift
 278     linkid=$1; shift
 279     rx_bytes=$(ovs-appctl netdev-tunnel/get-rx-bytes $iface)
 280     tx_bytes=$(ovs-appctl netdev-tunnel/get-tx-bytes $iface)
 281     rx_bits=$(($rx_bytes*8))
 282     tx_bits=$(($tx_bytes*8))
 283     now=$(date +%s).$(date +%N)
 284     trigger=http://${hostname}/bw/${linkid}/${now}/${rx_bits}/${tx_bits}
 285 #    curl -s -L $trigger | grep -q "Got it" || echo Missed event with $trigger
 286 #    echo $trigger
 287     curl -s -L $trigger >& /dev/null
 288 }
 289
 290 ### the front end, manages pid and so on
 291 function gmap_report () {
 292     iface=$1; shift
 293     hostname=$1; shift
 294     linkid=$1; shift
 295     looptime=$1; shift
 296     [ -z "$looptime" ] && looptime=1
 297     pid_file=/var/run/openvswitch/gmap-$iface.pid
 298     if [ -f $pid_file ] ; then
 299         pid=$(cat $pid_file)
 300         [ -n "$pid" ] && kill $pid >& /dev/null
 301         rm $pid_file
 302     fi
 303     while true; do
 304         gmap_report_once $iface $hostname $linkid
 305         sleep $looptime
 306     done &
 307     # this is the pid for the background process
 308     echo $! > $pid_file
 309 }
 310
 311 ####################
 312 SUPPORTED_SUBCOMMANDS="start stop status
 313 start_db stop_db start_switch stop_switch
 314 create_bridge create_port del_bridge del_port
 315 show set_remote_endpoint set_controller del_controller gmap_report"
 316
 317 function main () {
 318         message="Usage: $COMMAND <subcommand> ...
 319 Supported subcommands are (dash or underscore is the same):
 320 $SUPPORTED_SUBCOMMANDS"
 321         [[ -z "$@" ]] && error "$message"
 322
 323         SUBCOMMAND=$1; shift
 324         # support dashes instead of underscores
 325         SUBCOMMAND=$(echo $SUBCOMMAND | sed -e s,-,_,g)
 326         found=""
 327         for supported in $SUPPORTED_SUBCOMMANDS; do [ "$SUBCOMMAND" = "$supported" ] && found=yes; done
 328
 329         [ -z "$found" ] && error $message
 330
 331         $SUBCOMMAND "$@"
 332 }
 333
 334 main "$@"