3 # QEMU Object Model test tools
5 # Copyright IBM, Corp. 2011
6 # Copyright (c) 2013 SUSE LINUX Products GmbH
9 # Anthony Liguori <aliguori@amazon.com>
10 # Andreas Faerber <afaerber@suse.de>
12 # This work is licensed under the terms of the GNU GPL, version 2 or later. See
13 # the COPYING file in the top-level directory.
18 from qmp
import QEMUMonitorProtocol
20 cmd
, args
= sys
.argv
[0], sys
.argv
[1:]
26 return '''environment variables:
27 QMP_SOCKET=<path | addr:port>
29 %s [-h] [-s <QMP socket path | addr:port>] [<path>]
32 def usage_error(error_msg
= "unspecified error"):
33 sys
.stderr
.write('%s\nERROR: %s\n' % (usage(), error_msg
))
44 usage_error("missing argument: QMP socket path or address");
48 if os
.environ
.has_key('QMP_SOCKET'):
49 socket_path
= os
.environ
['QMP_SOCKET']
51 usage_error("no QMP socket path or address given");
53 srv
= QEMUMonitorProtocol(socket_path
)
58 items
= srv
.command('qom-list', path
=path
)
60 if not item
['type'].startswith('child<'):
62 print ' %s: %s (%s)' % (item
['name'], srv
.command('qom-get', path
=path
, property=item
['name']), item
['type'])
64 print ' %s: <EXCEPTION> (%s)' % (item
['name'], item
['type'])
67 if item
['type'].startswith('child<'):
68 list_node((path
if (path
!= '/') else '') + '/' + item
['name'])