From 3d42f36946a78f0e2ec71b6d3b46b008ef1642ce Mon Sep 17 00:00:00 2001
From: Florent Flament <florent.flament-ext@cloudwatt.com>
Date: Sat, 8 Nov 2014 23:06:38 +0100
Subject: [PATCH] Add ospopulate.bash tool - create resources to test ospurge

ospopulate.bash creates a bunch of resources in the project set by the
OS_TENANT_NAME environment variable. Credentials have to be set in the
environment as usual. The goal of ospopulate.bash is to ease testing
of ospurge.

Change-Id: I14da32cbc690f3fd21706dd808ac25563d48a689
---
 tools/ospopulate.bash | 192 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 192 insertions(+)
 create mode 100755 tools/ospopulate.bash

diff --git a/tools/ospopulate.bash b/tools/ospopulate.bash
new file mode 100755
index 0000000..f9bde59
--- /dev/null
+++ b/tools/ospopulate.bash
@@ -0,0 +1,192 @@
+#!/usr/bin/env bash
+
+# This script populates the project set in the environment variable
+# OS_TENANT_NAME with various resources. The purpose is to test
+# ospurge.
+
+UUID=$(cat /proc/sys/kernel/random/uuid)
+
+EXTNET_NAME="public"  # Name of external network
+FLAVOR="m1.small"  # Name of flavor used to spawn a VM
+VMIMG_NAME="cirros-0.3.2-x86_64-uec"  # Image used for the VM
+
+KEY_NAME="test_key_$UUID"
+NET_NAME="test_net_$UUID"
+SUBNET_NAME="test_subnet_$UUID"
+ROUT_NAME="test_rout_$UUID"
+VM_NAME="test_vm_$UUID"
+VMSNAP_NAME="test_vmsnap_$UUID"
+VOL_NAME="test_vol_$UUID"
+VOLSNAP_NAME="test_volsnap_$UUID"
+VOLBACK_NAME="test_volback_$UUID"
+IMG_NAME="test_image_$UUID"
+SECGRP_NAME="test_secgroup_$UUID"
+CONT_NAME="test_container_$UUID"
+FLAV_NAME="test_flavor_$UUID"
+
+function exit_on_failure {
+  RET_CODE=$?
+  ERR_MSG=$1
+  if [ $RET_CODE -ne 0 ]; then
+      echo $ERR_MSG
+      exit 1
+  fi
+}
+
+function exit_if_empty {
+  STRING=$1
+  ERR_MSG=$2
+  if [ -z $STRING ]; then
+      echo $ERR_MSG
+      exit 1
+  fi
+}
+
+# Create a file that will be used to populate Glance and Swift
+dd if="/dev/zero" of="zero_disk.raw" bs=1M count=5
+
+
+### Create Swift resources
+swift upload $CONT_NAME zero_disk.raw
+exit_on_failure "Unable to upload file in container $CONT_NAME"
+
+
+### Creating Cinder resources
+
+# Create a volume
+cinder create --display-name $VOL_NAME 5
+exit_on_failure "Unable to create volume"
+
+# Getting ID of volume
+VOL_ID=$(cinder show $VOL_NAME | awk '/ id /{print $4}')
+exit_if_empty $VOL_ID "Unable to retrieve ID of volume $VOL_NAME"
+
+# Snapshotting volume (note that it has to be detached, unless using --force)
+cinder snapshot-create --display-name $VOLSNAP_NAME $VOL_ID
+exit_on_failure "Unable to snapshot volume $VOL_NAME"
+
+# Backuping volume
+cinder backup-create --display-name $VOLBACK_NAME $VOL_ID
+# Don't exit if this fails - as we may test platforms that don't
+# provide this feature
+
+
+### Creating neutron resources
+
+# Create a private network and check it exists
+neutron net-create $NET_NAME
+exit_on_failure "Creation of network $NET_NAME failed"
+
+# Getting ID of private network
+NET_ID=$(neutron net-show $NET_NAME | awk '/ id /{print $4}')
+exit_if_empty $NET_ID "Unable to retrieve ID of network $NET_NAME"
+
+# Add network's subnet
+neutron subnet-create --name $SUBNET_NAME $NET_ID 192.168.0.0/24
+exit_on_failure "Unable to create subnet $SUBNET_NAME for network $NET_ID"
+
+# Create an unused port
+neutron port-create $NET_ID
+
+# retrieving subnet ID
+SUBNET_ID=$(neutron subnet-show $SUBNET_NAME | awk '/ id /{print $4}')
+exit_if_empty $SUBNET_ID "Unable to retrieve ID of subnet $SUBNET_NAME"
+
+# Creating a router
+neutron router-create $ROUT_NAME
+exit_on_failure "Unable to create router $ROUT_NAME"
+
+# Retrieving router ID
+ROUT_ID=$(neutron router-show $ROUT_NAME | awk '/ id /{print $4}')
+exit_if_empty $ROUT_ID "Unable to retrieve ID of router $ROUT_NAME"
+
+# Retrieving external network ID
+EXTNET_ID=$(neutron net-show $EXTNET_NAME | awk '/ id /{print $4}')
+exit_if_empty $EXTNET_ID "Unable to retrieve ID of external network $EXTNET_NAME"
+
+# Setting router's gateway
+neutron router-gateway-set $ROUT_ID $EXTNET_ID
+exit_on_failure "Unable to set gateway to router $ROUT_NAME"
+
+# Plugging router on internal network
+neutron router-interface-add $ROUT_ID $SUBNET_ID
+exit_on_failure "Unable to add interface on subnet $SUBNET_NAME to router $ROUT_NAME"
+
+# Creating a floating IP and retrieving its IP Address
+
+FIP_ADD=$(neutron floatingip-create $EXTNET_NAME \
+          | awk '/ floating_ip_address /{print $4}')
+
+exit_if_empty $FIP_ADD "Unable to create or retrieve floating IP"
+
+# Creating a security group
+neutron security-group-create $SECGRP_NAME
+exit_on_failure "Unable to create security group $SECGRP_NAME"
+
+# Getting security group ID
+SECGRP_ID=$(neutron security-group-show $SECGRP_NAME | awk '/ id /{print $4}')
+exit_if_empty $SECGRP_ID "Unable to retrieve ID of security group $SECGRP_NAME"
+
+# Adding a rule to previously created security group
+
+neutron security-group-rule-create --direction ingress --protocol TCP \
+--port-range-min 22 --port-range-max 22 --remote-ip-prefix 0.0.0.0/0 \
+$SECGRP_ID
+
+
+### Creating Nova resources
+
+# Create a flavor (Only admins can do this by default)
+#nova flavor-create $FLAV_NAME auto 128 2 1
+#exit_on_failure "Unable to create flavor $FLAV_NAME"
+
+# Looking for the $VMIMG_NAME image and getting its ID
+IMAGE_ID=$(nova image-list | awk "/ $VMIMG_NAME /{print \$2}")
+exit_if_empty $IMAGE_ID "Image $VMIMG_NAME could not be found"
+
+# Launch a VM
+nova boot --flavor $FLAVOR --image $IMAGE_ID --nic net-id=$NET_ID $VM_NAME
+exit_on_failure "Unable to boot VM $VM_NAME"
+
+# Getting ID of VM
+VM_ID=$(nova show $VM_NAME | awk '/ id /{print $4}')
+exit_if_empty $VM_ID "Unable to retrieve ID of VM $VM_NAME"
+
+
+### Create Glance resources
+
+# Upload glance image
+glance image-create --name $IMG_NAME --disk-format raw \
+--container-format bare --file zero_disk.raw
+
+exit_on_failure "Unable to create Glance iamge $IMG_NAME"
+
+# Wait for VM to be spawned before snapshotting the VM
+VM_STATUS=$(nova show $VM_ID | awk '/ status /{print $4}')
+while [ $VM_STATUS != "ACTIVE" ]; do
+    echo "Status of VM $VM_NAME is $VM_STATUS. Waiting 1 sec"
+    sleep 1
+    VM_STATUS=$(nova show $VM_ID | awk '/ status /{print $4}')
+done
+
+nova image-create $VM_ID $VMSNAP_NAME
+exit_on_failure "Unable to create VM Snapshot of $VM_NAME"
+
+
+### Link resources
+
+# Associate floating IP
+nova floating-ip-associate $VM_ID $FIP_ADD
+exit_on_failure "Unable to associate floating IP $FIP_ADD to VM $VM_NAME"
+
+# Wait for volume to be available
+VOL_STATUS=$(cinder show $VOL_ID | awk '/ status /{print $4}')
+while [ $VOL_STATUS != "available" ]; do
+    echo "Status of volume $VOL_NAME is $VOL_STATUS. Waiting 1 sec"
+    sleep 1
+    VOL_STATUS=$(cinder show $VOL_ID | awk '/ status /{print $4}')
+done
+
+# Attach volume
+nova volume-attach $VM_ID $VOL_ID
+exit_on_failure "Unable to attach volume $VOL_ID to VM $VM_ID"