Compare commits
No commits in common. "2defbc140b63b3a3617eb9fae68d115a91a15587" and "8fccf7343f349a73552320975bf1bb44b2a0d178" have entirely different histories.
2defbc140b
...
8fccf7343f
7 changed files with 41 additions and 107 deletions
11
Makefile
11
Makefile
|
@ -13,12 +13,10 @@ SRCD := src
|
|||
SRC_QEMU_HOME := qemu
|
||||
SRC_QEMU_BIN := $(SRC_QEMU_HOME)/bin
|
||||
SRC_LAUNCHERSD := $(SRC_QEMU_HOME)/launchers
|
||||
SRC_TMUX_CONF := $(SRC_QEMU_HOME)/tmux.conf
|
||||
# Actual qemu Unix user home
|
||||
QEMU_HOME := $(shell echo ~$(QEMU_USER))
|
||||
QEMU_BIN := $(QEMU_HOME)/bin
|
||||
LAUNCHERSD := $(QEMU_HOME)/launchers
|
||||
TMUX_CONF := $(QEMU_HOME)/.tmux.conf
|
||||
|
||||
# Names of all qemush modules
|
||||
SRC_MODULES_NAMES := $(notdir $(wildcard $(SRC_QEMU_BIN)/*))
|
||||
|
@ -33,7 +31,7 @@ BINS_MODE := 740
|
|||
|
||||
# Compiler options
|
||||
CC := cc
|
||||
CC_OPTIONS = -O2
|
||||
CC_OPTIONS = -O3
|
||||
# C sources file format
|
||||
SRC_FMT := .c
|
||||
# Names of C programs to compile
|
||||
|
@ -42,10 +40,10 @@ SRC_C_SOURCES_NAMES := $(notdir $(basename $(wildcard $(SRCD)/*$(SRC_FMT))))
|
|||
C_BINARIES := $(addprefix $(QEMU_BIN)/,$(SRC_C_SOURCES_NAMES))
|
||||
|
||||
# Directories in ~qemu necessary for qemush to work
|
||||
QEMUSH_DIRS_NAMES := bin launchers disks
|
||||
QEMUSH_DIRS_NAMES := bin launchers images
|
||||
QEMUSH_DIRS := $(addprefix $(QEMU_HOME)/,$(QEMUSH_DIRS_NAMES))
|
||||
|
||||
install: $(QEMUSH_DIRS) $(MODULES) $(C_BINARIES) $(QEMUSH) $(LAUNCHERS) $(TMUX_CONF)
|
||||
install: $(QEMUSH_DIRS) $(MODULES) $(C_BINARIES) $(QEMUSH) $(LAUNCHERS)
|
||||
|
||||
$(QEMUSH_DIRS):
|
||||
$(SUDO_QEMU) mkdir -p $@
|
||||
|
@ -63,6 +61,3 @@ $(C_BINARIES): $(QEMU_BIN)%: $(SRCD)%$(SRC_FMT)
|
|||
|
||||
$(LAUNCHERS): $(LAUNCHERSD)%: $(SRC_LAUNCHERSD)%
|
||||
$(SUDO_QEMU) install -m $(BINS_MODE) $^ $@
|
||||
|
||||
$(TMUX_CONF): $(SRC_TMUX_CONF)
|
||||
$(SUDO_QEMU) install -m 640 $^ $@
|
||||
|
|
15
README.md
15
README.md
|
@ -33,27 +33,30 @@ the same virtual machines
|
|||
- **Modularization**: `qemush` launching scripts are intended to be
|
||||
stackable to reuse common `qemu` parameters in all virtual machines
|
||||
needing them
|
||||
- **Process supervision**: `qemush` uses `tmux` to supervise processes and
|
||||
keep track of them
|
||||
- **Process supervision**: `qemush` uses `screen` to supervise processes
|
||||
and keep track of them
|
||||
- **Copy-on-write**: images are formatted using `qcow2` to use less space
|
||||
on disk
|
||||
|
||||
## Dependencies
|
||||
|
||||
All dependencies are common packages for a distribution, you'll be able to
|
||||
grab them from your favorite packages sources.
|
||||
grab them from your packages sources.
|
||||
|
||||
- `qemu` - this is literally a QEMU wrapper so there's a chance you'll
|
||||
need it
|
||||
- `bash` - the `qemush` interpreter
|
||||
- `coreutils` - used for basic OS operations
|
||||
- `sudo` - execute commands as `qemu`
|
||||
- `tmux` - for process supervision
|
||||
- `screen` - for process supervision
|
||||
- `source-highlight` - for syntax highlighting when displaying launching
|
||||
scripts
|
||||
- `pathof` - see [Installation instructions](#installation-instructions)
|
||||
- `diskpath` - see [Add `qemush` modules in
|
||||
`~qemu/bin`](#add-qemush-modules-in-qemubin)
|
||||
- any text editor - used for builtin function to edit launching scripts
|
||||
|
||||
You can run `qemush depcheck` to check if all dependencies are met.
|
||||
|
||||
## Installation instructions
|
||||
|
||||
### QEMU user and group
|
||||
|
@ -88,7 +91,7 @@ by the `Makefile` for the installation process.
|
|||
|
||||
### Manual installation (what does the `Makefile` do)
|
||||
|
||||
- Create `disks`, `launchers` and `bin` directories in `~qemu`
|
||||
- Create `images`, `launchers` and `bin` directories in `~qemu`
|
||||
- Copy `qemush` scripts parts from `qemu/bin` in `~qemu/bin` with mode
|
||||
`740`
|
||||
- Compile C programs from `src` in `~qemu/bin` with mode `740`
|
||||
|
|
78
bin/qemush
78
bin/qemush
|
@ -1,7 +1,5 @@
|
|||
#!/bin/bash
|
||||
# version=0.2.0
|
||||
|
||||
# Function to re-exec the script as another user via sudo (only if needed)
|
||||
exec_as() {
|
||||
local user
|
||||
user="$1"
|
||||
|
@ -12,19 +10,12 @@ exec_as() {
|
|||
fi
|
||||
}
|
||||
|
||||
# Exec the script as qemu
|
||||
exec_as qemu "$@"
|
||||
|
||||
# Directories used in the program
|
||||
bin="${HOME}/launchers"
|
||||
images="${HOME}/disks"
|
||||
|
||||
# Environment
|
||||
images="${HOME}/images"
|
||||
PATH="${bin}:${HOME}/bin:${PATH}"
|
||||
EDITOR="${EDITOR:-nvim}"
|
||||
export QEMUSH_NAME
|
||||
|
||||
# Aliases
|
||||
alias ls='ls --color=auto'
|
||||
alias exec='exec '
|
||||
if [ -t 1 ]; then
|
||||
|
@ -33,20 +24,15 @@ else
|
|||
alias pretty_cat=cat
|
||||
fi
|
||||
shopt -s expand_aliases
|
||||
|
||||
# Set a restrictive umask to make sure qemu user files are private
|
||||
umask 027
|
||||
|
||||
# Function to print a colored error
|
||||
perror() {
|
||||
>&2 printf '\033[1;31mERROR:\033[0m \033[1m%s\033[0m\n' "$*"
|
||||
}
|
||||
|
||||
# Function to show the usage
|
||||
public_help() {
|
||||
local name
|
||||
name="$(basename "$0")"
|
||||
|
||||
exec cat << EOF
|
||||
${name}: usage:
|
||||
${name} active - (default behaviour) list active VMs
|
||||
|
@ -66,115 +52,95 @@ ${name}: usage:
|
|||
EOF
|
||||
}
|
||||
|
||||
# Function to throw an invalid usage error (skill issue)
|
||||
error_usage() {
|
||||
perror "Invalid usage"
|
||||
>&2 public_help
|
||||
return 1
|
||||
}
|
||||
|
||||
# Function to start a virtual machine ; fails if the virtual machine is
|
||||
# already started thanks to tmux
|
||||
public_start() {
|
||||
QEMUSH_NAME="$1"
|
||||
local vm_name="$1"
|
||||
shift
|
||||
|
||||
exec tmux new-session \
|
||||
-s "$QEMUSH_NAME" \
|
||||
"$QEMUSH_NAME" \
|
||||
"$@"
|
||||
exec screen -S "$vm_name" "$vm_name" "$@"
|
||||
}
|
||||
|
||||
# Attach to a running virtual machine output, the latest opened if no
|
||||
# argument is provided
|
||||
public_watch() {
|
||||
[ -n "$1" ] && set -- -t "$1"
|
||||
|
||||
exec tmux attach "$@"
|
||||
exec screen -dr "$1"
|
||||
}
|
||||
|
||||
# List running virtual machines
|
||||
public_active() {
|
||||
exec tmux list-sessions
|
||||
exec screen -ls
|
||||
}
|
||||
|
||||
# List available virtual machines entrypoints
|
||||
public_ls() {
|
||||
echo "Available machines:"
|
||||
exec ls "$bin"
|
||||
}
|
||||
|
||||
# Create a copy-on-write disk for a virtual machine
|
||||
public_diskadd() {
|
||||
QEMUSH_NAME="$1"
|
||||
shift
|
||||
|
||||
exec qemu-img create -f qcow2 "$(pathof disk)" "$1"
|
||||
exec qemu-img create -f qcow2 "$(diskpath "$1")" "$2"
|
||||
}
|
||||
|
||||
# Delete a disk
|
||||
public_diskrm() {
|
||||
QEMUSH_NAME="$1"
|
||||
shift
|
||||
|
||||
exec rm -vi -- "$(pathof disk)"
|
||||
exec rm -vi -- "$(diskpath "$1")"
|
||||
}
|
||||
|
||||
# List available disks
|
||||
public_diskls() {
|
||||
echo "Available disks:"
|
||||
exec ls "$images"
|
||||
}
|
||||
|
||||
# Edit a virtual machine entrypoint with a text editor
|
||||
public_edit() {
|
||||
local file="${bin}/${1}"
|
||||
"$EDITOR" "$file"
|
||||
[ -f "$file" ] && exec chmod u+x "$file"
|
||||
}
|
||||
|
||||
# Delete a virtual machine entrypoint
|
||||
public_rm() {
|
||||
exec rm -vi -- "${bin}/${1}"
|
||||
}
|
||||
|
||||
# Invoke bash as qemu user in its home directory
|
||||
public_shell() {
|
||||
cd || return
|
||||
exec bash -i
|
||||
}
|
||||
|
||||
# Output the content of an entrypoint, with coloration if on a virtual
|
||||
# terminal
|
||||
public_cat() {
|
||||
pretty_cat "${bin}/${1}"
|
||||
}
|
||||
|
||||
# Copy a file in entrypoints folder
|
||||
public_add() {
|
||||
trap return EXIT
|
||||
set -e
|
||||
|
||||
local name
|
||||
name="${2:-$(basename "$1")}"
|
||||
local name="${2:-$(basename "$1")}"
|
||||
cp -v -i -- "$1" "${bin}/${2}"
|
||||
chmod 740 "${bin}/${name}"
|
||||
|
||||
set +e
|
||||
trap - EXIT
|
||||
}
|
||||
|
||||
# Run shell commands as qemu
|
||||
public_do() {
|
||||
exec sh -c "$*"
|
||||
}
|
||||
|
||||
# Retrieve user requested function
|
||||
bold_print() {
|
||||
printf '\033['"${1}m${2}"'\033[0m: %s\n' "$3"
|
||||
}
|
||||
|
||||
public_depcheck() {
|
||||
for i in diskpath screen source-highlight ls rm cp chmod cat; do
|
||||
if command -v "$i" > /dev/null; then
|
||||
bold_print '1;32' OK "$i"
|
||||
else
|
||||
bold_print '1;31' KO "$i"
|
||||
fi
|
||||
done
|
||||
}
|
||||
|
||||
function="$1"
|
||||
shift
|
||||
|
||||
# Defauts to `active` if no function is supplied; else checks for a public
|
||||
# function named after the argument; else fails
|
||||
if [ -z "$function" ]; then
|
||||
public_active
|
||||
elif declare -F | cut -d \ -f 3- | grep '^public_' | sed 's/^public_//' | grep -q "^${function}$"; then
|
||||
|
|
2
qemu/bin/diskpath
Executable file
2
qemu/bin/diskpath
Executable file
|
@ -0,0 +1,2 @@
|
|||
#!/bin/sh
|
||||
printf '%s/%s.qcow2\n' ~/images "$1"
|
|
@ -1,22 +0,0 @@
|
|||
#!/bin/sh -e
|
||||
|
||||
# Check if QEMUSH_NAME variable is initialized, abort if not
|
||||
[ -n "$QEMUSH_NAME" ]
|
||||
|
||||
# Choose the base dir to print according to argv[1]
|
||||
case "$1" in
|
||||
socket)
|
||||
path="${HOME}/sockets"
|
||||
;;
|
||||
disk)
|
||||
path="${HOME}/disks"
|
||||
;;
|
||||
*)
|
||||
false
|
||||
;;
|
||||
esac
|
||||
|
||||
# Create the base dir if it doesn't exist and print the path of the
|
||||
# ressource
|
||||
mkdir -p -- "$path"
|
||||
printf %s/%s\\n "$path" "$QEMUSH_NAME"
|
|
@ -1,14 +1,9 @@
|
|||
#!/bin/sh -x
|
||||
|
||||
# Store VM name in environment variable
|
||||
export QEMUSH_NAME
|
||||
[ -z "$QEMUSH_NAME" ] && QEMUSH_NAME=$(basename "$0")
|
||||
|
||||
# Launch the virtual machine
|
||||
name="$(basename "$0")"
|
||||
exec kvm-spice \
|
||||
-monitor "unix:$(pathof socket)" \
|
||||
-drive file="$(pathof disk)",if=virtio \
|
||||
-net user,hostname="${QEMUSH_NAME}" \
|
||||
-monitor stdio \
|
||||
-drive file="$(diskpath "$name")",if=virtio \
|
||||
-net user,hostname="${name}" \
|
||||
-usbdevice tablet \
|
||||
-name "$QEMUSH_NAME" \
|
||||
-name "$name" \
|
||||
"$@"
|
||||
|
|
|
@ -1,5 +0,0 @@
|
|||
# Keep tmux sessions visible after exit
|
||||
set -g remain-on-exit on
|
||||
|
||||
# Override the nologin directive
|
||||
set -g default-shell /bin/sh
|
Loading…
Reference in a new issue