19 lines
588 B
Text
19 lines
588 B
Text
|
#!/bin/sh
|
||
|
#
|
||
|
# This script is expected to run on the ONE server (i.e.
|
||
|
# opennebula.ungleich.ch).
|
||
|
|
||
|
set -e
|
||
|
|
||
|
# Fetch instance list from STDIN.
|
||
|
instances=$(cat -)
|
||
|
|
||
|
# For every instance, extract relevant information:
|
||
|
for id in $instances; do
|
||
|
nics_raw="$(onevm show --xml $id | xml_grep 'NIC')"
|
||
|
networks="$(echo $nics_raw | xml_grep --text_only 'NETWORK' | tr '\n' ',' | sed 's/,$//')"
|
||
|
ip="$(echo $nics_raw | xml_grep --text_only 'IP' | tr '\n' ',' | sed 's/,$//')"
|
||
|
ip6="$(echo $nics_raw | xml_grep --text_only 'IP6_GLOBAL' | tr '\n' ',' | sed 's/,$//')"
|
||
|
echo "$id,$networks,$ip,$ip6"
|
||
|
done
|