ovl/lspci; added

Author: Lars Ekman

ovl/lspci/README.md

@@ -0,0 +1,22 @@
+# Xcluster/ovl - lspci
+
+Adds `lspci` and the hw database.
+
+Example;
+```
+vm-002 ~ # lspci
+00:00.0 Host bridge: Intel Corporation 440FX - 82441FX PMC [Natoma] (rev 02)
+00:01.0 ISA bridge: Intel Corporation 82371SB PIIX3 ISA [Natoma/Triton II]
+00:01.1 IDE interface: Intel Corporation 82371SB PIIX3 IDE [Natoma/Triton II]
+00:01.3 Bridge: Intel Corporation 82371AB/EB/MB PIIX4 ACPI (rev 03)
+00:02.0 VGA compatible controller: Device 1234:1111 (rev 02)
+00:03.0 Ethernet controller: Red Hat, Inc. Virtio network device
+00:04.0 Ethernet controller: Red Hat, Inc. Virtio network device
+00:05.0 Ethernet controller: Red Hat, Inc. Virtio network device
+00:06.0 Ethernet controller: Red Hat, Inc. Virtio network device
+00:07.0 Ethernet controller: Red Hat, Inc. Virtio network device
+00:08.0 Unclassified device [00ff]: Red Hat, Inc. Virtio RNG
+00:09.0 SCSI storage controller: Red Hat, Inc. Virtio block device
+00:0a.0 SCSI storage controller: Red Hat, Inc. Virtio block device
+```
+

ovl/lspci/lspci.sh

@@ -0,0 +1,126 @@
+#! /bin/sh
+##
+## lspci.sh --
+##
+##   Help script for the xcluster ovl/lspci.
+##
+## Commands;
+##
+
+prg=$(basename $0)
+dir=$(dirname $0); dir=$(readlink -f $dir)
+me=$dir/$prg
+tmp=/tmp/${prg}_$$
+
+die() {
+    echo "ERROR: $*" >&2
+    rm -rf $tmp
+    exit 1
+}
+help() {
+    grep '^##' $0 | cut -c3-
+    rm -rf $tmp
+    exit 0
+}
+test -n "$1" || help
+echo "$1" | grep -qi "^help\|-h" && help
+
+log() {
+	echo "$prg: $*" >&2
+}
+dbg() {
+	test -n "$__verbose" && echo "$prg: $*" >&2
+}
+
+##  env
+##    Print environment.
+##
+cmd_env() {
+
+	if test "$cmd" = "env"; then
+		set | grep -E '^(__.*)='
+		retrun 0
+	fi
+
+	test -n "$XCLUSTER" || die 'Not set [$XCLUSTER]'
+	test -x "$XCLUSTER" || die "Not executable [$XCLUSTER]"
+	eval $($XCLUSTER env)
+}
+
+##   test --list
+##   test [--xterm] [test...] > logfile
+##     Exec tests
+##
+cmd_test() {
+	if test "$__list" = "yes"; then
+        grep '^test_' $me | cut -d'(' -f1 | sed -e 's,test_,,'
+        return 0
+    fi
+
+	cmd_env
+    start=starts
+    test "$__xterm" = "yes" && start=start
+    rm -f $XCLUSTER_TMP/cdrom.iso
+
+    if test -n "$1"; then
+        for t in $@; do
+            test_$t
+        done
+    else
+        for t in basic; do
+            test_$t
+        done
+    fi      
+
+    now=$(date +%s)
+    tlog "Xcluster test ended. Total time $((now-begin)) sec"
+
+}
+
+test_start() {
+	export __image=$XCLUSTER_HOME/hd.img
+	echo "$XOVLS" | grep -q private-reg && unset XOVLS
+	test -n "$TOPOLOGY" && \
+		. $($XCLUSTER ovld network-topology)/$TOPOLOGY/Envsettings
+	xcluster_start network-topology iptools lspci
+}
+
+test_basic() {
+	tlog "=== lspci: Basic test"
+	test_start
+	xcluster_stop
+}
+
+cmd_otc() {
+	test -n "$__vm" || __vm=2
+	otc $__vm $@
+}
+
+. $($XCLUSTER ovld test)/default/usr/lib/xctest
+indent=''
+
+# Get the command
+cmd=$1
+shift
+grep -q "^cmd_$cmd()" $0 $hook || die "Invalid command [$cmd]"
+
+while echo "$1" | grep -q '^--'; do
+    if echo $1 | grep -q =; then
+	o=$(echo "$1" | cut -d= -f1 | sed -e 's,-,_,g')
+	v=$(echo "$1" | cut -d= -f2-)
+	eval "$o=\"$v\""
+    else
+	o=$(echo "$1" | sed -e 's,-,_,g')
+	eval "$o=yes"
+    fi
+    shift
+done
+unset o v
+long_opts=`set | grep '^__' | cut -d= -f1`
+
+# Execute command
+trap "die Interrupted" INT TERM
+cmd_$cmd "$@"
+status=$?
+rm -rf $tmp
+exit $status

ovl/lspci/tar

@@ -0,0 +1,25 @@
+#! /bin/sh
+# NOTE: A common pattern is to specify "-" (stdout) as out-file,
+#  so there must be NO log printouts to stdout!
+
+dir=$(dirname $0); dir=$(readlink -f $dir)
+tmp=/tmp/$USER/xcluster_$$
+die() {
+	echo "ERROR: $*" >&2
+	rm -rf $tmp
+	exit 1
+}
+log() {
+	echo "INFO: $*" >&2
+}
+
+test -n "$1" || die "No out-file"
+
+mkdir -p $tmp/usr/share/misc
+gzip -c /usr/share/misc/pci.ids > $tmp//usr/share/misc/pci.ids.gz
+$XCLUSTER install_prog --dest=$tmp lspci
+
+cd $tmp
+tar cf "$1" *
+cd - > /dev/null
+rm -rf $tmp