Working first version.

scripts/disk.sh

@@ -0,0 +1,52 @@
+#!/bin/bash
+
+id="$1"
+found=0
+device=""
+
+while read line; do
+	if [[ $line == "["* ]]; then
+		if [ $found = 1 ]; then
+			echo -n '{"device":"'$device'", "name":"'$name'", "status":"'$status'", "temp":'$temp', "size":'$size', "num_reads":'$num_reads', '
+			echo -n '"num_writes":'$num_writes', "num_errors":'$num_errors', "type":"'$type'", "fs_size":'$fsSize', "fs_free":'$fsFree', '
+			break
+		else
+			device=''
+			name=''
+			status=''
+			temp=-1
+			size=-1
+			num_reads=-1
+			num_writes=-1
+			num_errors=-1
+			type=""
+			fsSize=-1
+			fsFree=-1
+		fi
+	else
+		while IFS="=" read key value; do
+			value="${value%\"}"
+			value="${value#\"}"
+			[ $key = "id" ] && [ "$value" = "$id" ] && found=1
+			[ $key = "device" ] && device="$value"
+			[ $key = "name" ] && name="$value"
+			[ $key = "status" ] && status="$value"
+			[ $key = "temp" ] && [ "$value" != "*" ] && temp="$value"
+			[ $key = "size" ] && size=$(( $value * 1024 ))
+			[ $key = "numReads" ] && num_reads="$value"
+			[ $key = "numWrites" ] && num_writes="$value"
+			[ $key = "numErrors" ] && num_errors="$value"
+			[ $key = "type" ] && type="$value"
+			[ $key = "fsSize" ] && fsSize=$(( $value * 1024 ))
+			[ $key = "fsFree" ] && fsFree=$(( $value * 1024 ))
+		done <<< "$line"
+	fi
+done < <(cat /var/local/emhttp/disks.ini ; echo "[empty]")
+
+if [ $found = 0 ]; then
+	echo "UNSUPPORTED"
+	exit 1
+fi
+
+read bytes_read bytes_written _ < <(grep $device"=" /var/local/emhttp/diskload.ini | cut -d"=" -f2)
+echo '"bytes_reading":'$bytes_read', "bytes_writing":'$bytes_written'}'

scripts/disks.discovery.sh

@@ -0,0 +1,16 @@
+#!/bin/bash
+id='""'
+device='""'
+first=1
+
+echo -n '['
+
+while IFS="=" read key value; do
+	if [ "$key" = "id" ] && [ -n "$value" ] && [ "$value" != '""' ]; then
+		[ $first = 0 ] && echo -n ","
+		first=0
+		echo -n '{"{#ID}":'$value'}'
+	fi
+done < /var/local/emhttp/disks.ini
+
+echo ']'

scripts/qemu.discovery.sh

@@ -0,0 +1,11 @@
+#!/bin/bash
+first=1
+
+echo -n "["
+while read name; do
+	[ "$name" = "" ] && continue
+	[ $first = 0 ] && echo -n ","
+	first=0
+	echo -n '{"{#VM}":"'$name'"}'
+done < <(virsh list --name --all)
+echo "]"

scripts/qemu.sh

@@ -0,0 +1,24 @@
+#!/bin/bash
+VM="$1"
+
+echo -n '{'
+state=`virsh domstate "$VM"`
+echo -n '"state":"'$state'"'
+if [ "$state" != "running" ]; then
+	echo -n '}'
+	exit
+fi
+
+while IFS=":" read key value; do
+	[ "$key" = "CPU(s)" ] && echo -n ', "cpus":'$value
+	[ "$key" = "CPU time" ] && echo -n ', "cpu_time":'${value%s}
+	[ "$key" = "Max memory" ] && echo -n ', "memory_max":'$((${value%KiB} * 1024))
+	[ "$key" = "Used memory" ] && echo -n ', "memory_used":'$((${value%KiB} * 1024))
+done < <(virsh dominfo "$VM")
+
+while read if key value; do
+	[ "$key" = "rx_bytes" ] && echo -n ', "network_bytes_in":'$value
+	[ "$key" = "tx_bytes" ] && echo -n ', "network_bytes_out":'$value
+done < <(virsh domifstat "$VM" vnet0)
+
+echo "}"