diff --git a/README.md b/README.md
index ddfb1ab..228c001 100644
--- a/README.md
+++ b/README.md
@@ -55,6 +55,8 @@ COMMANDS
     remove  - delete a guest domain
 ```
 
+#### Creating Guest VMs
+
 ```
 $ kvm-install-vm help create
 NAME
@@ -104,6 +106,50 @@ EXAMPLES
         Create a default VM with UTC timezone.
 ```
 
+#### Deleting a Guest Domain
+
+```
+NAME
+    kvm-install-vm remove [COMMANDS] VMNAME
+
+DESCRIPTION
+    Destroys (stops) and undefines a guest domain.  This also remove the
+    associated storage pool.
+
+COMMANDS
+    help - show this help
+
+EXAMPLE
+    kvm-install-vm remove foo
+        Remove (destroy and undefine) a guest domain.  WARNING: This will
+        delete the guest domain and any changes made inside it!
+```
+
+#### Attaching a new disk
+
+```
+$ kvm-install-vm attach-disk
+NAME
+    kvm-install-vm attach-disk [OPTIONS] [COMMANDS] VMNAME
+
+DESCRIPTION
+    Destroys (stops) and undefines a guest domain.  This also remove the
+    associated storage pool.
+
+COMMANDS
+    help - show this help
+
+OPTIONS
+    -d SIZE     Disk size (GB)
+    -f FORMAT   Disk image format       (default: qcow2)
+    -s IMAGE    Source of disk device
+    -t TARGET   Disk device target
+
+EXAMPLE
+    kvm-install-vm attach-disk -d 10 -s example-5g.qcow2 -t vdb foo
+        Attach a 10GB disk device named example-5g.qcow2 to the foo guest
+        domain.
+
 ### Notes
 
 1. This script will download a qcow2 cloud image from the respective
@@ -114,6 +160,7 @@ EXAMPLES
    same name in a short period of time, there will be two DHCP leases for the
    same host and its hostname will likely not resolve until the old lease
    expires.
+```
 
 ### Testing
 
diff --git a/kvm-install-vm b/kvm-install-vm
index b4174b1..6a4f6ab 100755
--- a/kvm-install-vm
+++ b/kvm-install-vm
@@ -19,10 +19,12 @@ DESCRIPTION
     to connect locally to your KVM domains.
 
 COMMANDS
-    help    - show this help or help for a subcommand
-    create  - create a new guest domain
-    list    - list all domains, running and stopped
-    remove  - delete a guest domain
+    help        - show this help or help for a subcommand
+    attach-disk - create and attach a disk device to guest domain
+    create      - create a new guest domain
+    detach-disk - detach a disk device from a guest domain
+    list        - list all domains, running and stopped
+    remove      - delete a guest domain
 
 EOF
 }
@@ -99,6 +101,30 @@ EXAMPLE
     $prog remove foo
         Remove (destroy and undefine) a guest domain.  WARNING: This will
         delete the guest domain and any changes made inside it!
+EOF
+            ;;
+        attach-disk)
+            cat << EOF
+NAME
+    $prog attach-disk [OPTIONS] [COMMANDS] VMNAME
+
+DESCRIPTION
+    Destroys (stops) and undefines a guest domain.  This also remove the
+    associated storage pool.
+
+COMMANDS
+    help - show this help
+
+OPTIONS
+    -d SIZE     Disk size (GB)
+    -f FORMAT   Disk image format       (default: qcow2)
+    -s IMAGE    Source of disk device
+    -t TARGET   Disk device target
+
+EXAMPLE
+    $prog attach-disk -d 10 -s example-5g.qcow2 -t vdb foo
+        Attach a 10GB disk device named example-5g.qcow2 to the foo guest
+        domain.
 EOF
             ;;
         list)
@@ -117,6 +143,22 @@ EOF
     esac
 }
 
+# Console output colors
+bold() { echo -e "\e[1m$@\e[0m" ; }
+red() { echo -e "\e[31m$@\e[0m" ; }
+green() { echo -e "\e[32m$@\e[0m" ; }
+
+die() { red "ERR: $@" >&2 ; exit 2 ; }
+silent() { "$@" > /dev/null 2>&1 ; }
+has_bin() { silent which $1 ; }
+title() { bold "$@" ; }
+par() { echo -e "- $@" ; }
+parn() { echo -en "- $@ ... " ; }
+ok() { green "${@:-OK}" ; }
+
+pushd() { command pushd "$@" >/dev/null ; }
+popd() { command popd "$@" >/dev/null ; }
+
 # Detect OS and set wget parameters
 function set_wget ()
 {
@@ -302,7 +344,7 @@ function create_vm ()
     [ -d "${IMAGEDIR}/${VMNAME}" ] && rm -rf ${IMAGEDIR}/${VMNAME}
     mkdir -p ${IMAGEDIR}/${VMNAME}
 
-    pushd ${IMAGEDIR}/${VMNAME} > /dev/null
+    pushd ${IMAGEDIR}/${VMNAME}
 
     # Create log file
     touch ${VMNAME}.log
@@ -443,7 +485,7 @@ _EOF_
     echo "[$(date +%r)]----> SSH to ${VMNAME}: 'ssh ${LOGIN_USER}@${IP}' or 'ssh ${LOGIN_USER}@${VMNAME}'"
     echo "[$(date +%r)]----> DONE."
 
-    popd > /dev/null
+    popd
 }
 
 # Delete VM
@@ -465,11 +507,6 @@ function remove ()
     fi
 }
 
-function help_func ()
-{
-    :
-}
-
 function set_defaults ()
 {
     # Defaults are set here. Override using command line arguments.
@@ -574,6 +611,64 @@ function create ()
     create_vm
 }
 
+function attach-disk ()
+{
+    # Set default variables
+    FORMAT=qcow2
+
+    # Parse command line arguments
+    while getopts ":d:f:ps:t:h" opt
+    do
+        case "$opt" in
+            d   ) DISKSIZE="${OPTARG}G" ;;
+            f   ) FORMAT="${OPTARG}" ;;
+            p   ) PERSISTENT="${OPTARG}" ;;
+            s   ) SOURCE="${OPTARG}" ;;
+            t   ) TARGET="${OPTARG}" ;;
+            h|* ) usage; exit 1 ;;
+        esac
+    done
+
+    shift $((OPTIND - 1))
+
+    [ ! -z ${TARGET} ] || die "You must specify a target device, for e.g. '-t vdb'"
+    [ ! -z ${DISKSIZE} ] || die "You must specify a size (in GB) for the new device, for e.g. '-d 5'"
+
+    if [ "$#" != 1 ]
+    then
+        printf "Please specify a single host to attach a disk to.\n"
+        printf "Run 'kvm-install-vm help attach-disk' for usage.\n"
+        exit 1
+    else
+        # Set variables
+        VMNAME=$1
+        DISKDIR=${HOME}/virt/images/${VMNAME}    # Directory to create attached disk
+        DISKNAME=${VMNAME}-${TARGET}-${DISKSIZE}.${FORMAT}
+
+        if [ ! -f "${DISKDIR}/${DISKNAME}" ]
+        then
+            echo "[$(date +%r)]----> Creating new '${TARGET}' disk image for domain ${VMNAME}."
+            qemu-img create -f ${FORMAT} -o size=$DISKSIZE,preallocation=metadata \
+                ${DISKDIR}/${DISKNAME} >> ${DISKDIR}/${VMNAME}.log  && \
+
+            echo "[$(date +%r)]----> Attaching ${DISKNAME} to domain ${VMNAME}." && \
+            virsh attach-disk ${VMNAME} \
+                --source $DISKDIR/${DISKNAME} \
+                --target ${TARGET} \
+                --subdriver ${FORMAT} \
+                --cache none \
+                --persistent >> ${DISKDIR}/${VMNAME}.log && \
+
+            exit "$?"
+        else
+            printf "Target ${TARGET} is already created or in use.\n"
+            exit 1
+        fi
+
+    fi
+
+}
+
 #--------------------------------------------------
 # Main
 #--------------------------------------------------
@@ -602,7 +697,7 @@ case "${subcommand}" in
         virsh list --all
         exit 0
         ;;
-    create|remove)
+    create|remove|attach-disk|remove-disk)
         if [[ "${1:-none}" == "none" ]]; then
             usage_subcommand "${subcommand}"
             exit 1
diff --git a/tests/check_script.bats b/tests/check_script.bats
index f72e46a..e06909e 100644
--- a/tests/check_script.bats
+++ b/tests/check_script.bats
@@ -48,6 +48,28 @@ VMNAME=batstestvm
     [[ "$output" =~ "package cloud-init is not installed" ]]
 }
 
+@test "Attach disk to VM without specifying target" {
+    run bash -c "kvm-install-vm attach-disk -d 1 $VMNAME"
+    [ "$status" -eq 2 ]
+    [[ "${lines[0]}" =~ "You must specify a target device" ]]
+}
+
+@test "Attach disk to VM without specifying disk size" {
+    run bash -c "kvm-install-vm attach-disk -t vdb $VMNAME"
+    [ "$status" -eq 2 ]
+    [[ "${lines[0]}" =~ "You must specify a size" ]]
+}
+
+@test "Attach disk to VM" {
+    run bash -c "kvm-install-vm attach-disk -d 1 -t vdb $VMNAME"
+    [ "$status" -eq 0 ]
+}
+
+@test "Check block list for VM" {
+    run bash -c "grep ^vdb <(virsh domblklist foobar)"
+    [ "$status" -eq 0 ]
+}
+
 @test "Delete VM - $VMNAME" {
     run bash -c "kvm-install-vm remove $VMNAME"
     [ "$status" -eq 0 ]