From 9e34d600e3d8f8e50b8b87779c76c62924f41d2f Mon Sep 17 00:00:00 2001
From: Marc Vertes <mvertes@free.fr>
Date: Sun, 28 Feb 2021 14:05:43 +0100
Subject: update

---
 bin/vm | 65 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 65 insertions(+)
 create mode 100755 bin/vm

(limited to 'bin/vm')

diff --git a/bin/vm b/bin/vm
new file mode 100755
index 0000000..22886d8
--- /dev/null
+++ b/bin/vm
@@ -0,0 +1,65 @@
+#!/bin/sh
+
+# vm is a tool to manage virtual machines.
+
+vm_version='vm-0.1'
+unset CDPATH
+export LC_ALL=C IFS=' 	
+'
+
+add() {
+	usage 'add name' 'Add a new VM' && return
+	echo 'not implemented yet'
+}
+
+del() {
+	usage 'del name' 'Delete a VM' && return
+	echo 'not implemented yet'
+}
+
+die() { echo "$0: fatal: $@" >&2; exit 1; }
+
+help() {
+	usage 'help' 'Print this help text' && return
+        printf "$vm_version\nUsage: vm command [options] [args]\n"
+        Opth=1; for c in $Cmdlist; do $c; done
+}
+
+info() {
+	usage 'info name' 'Print informations on a VM' && return
+	echo 'not implemented yet'
+}
+
+list() {
+	usage 'list' 'list VMs' && return
+	echo 'not implemented yet'
+}
+
+start() {
+	usage 'start name' 'Start a VM' && return
+	echo 'not implemented yet'
+}
+
+stop() {
+	usage 'stop name' 'Stop a VM' && return
+	echo 'not implemented yet'
+}
+
+usage() { [ "$Opth" ] && printf " %-34s %s\n" "$1" "$2"; }
+
+version() {
+	usage 'version' 'Print version' && return
+	echo "$vm_version"
+}
+
+# Main starts here.
+Cmdlist='add del info help list start stop version'
+[ "$1" ] && C=$1 && shift 1 || { help; exit 1; }
+for c in $Cmdlist
+do
+	case $c in
+	($C)  cmd=$c; break;;
+	($C*) [ "$cmd" ] && die "ambiguous command $C" || cmd=$c;;
+	esac
+done
+[ "$cmd" ] || die "no command \"$C\"" && $cmd "$@"
-- 
cgit v1.2.3