120 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			120 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			C
		
	
	
	
/*
 | 
						|
 * QEMU Management Protocol
 | 
						|
 *
 | 
						|
 * Copyright IBM, Corp. 2011
 | 
						|
 *
 | 
						|
 * Authors:
 | 
						|
 *  Anthony Liguori   <aliguori@us.ibm.com>
 | 
						|
 *
 | 
						|
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 | 
						|
 * the COPYING file in the top-level directory.
 | 
						|
 *
 | 
						|
 */
 | 
						|
 | 
						|
#include "qemu-common.h"
 | 
						|
#include "sysemu.h"
 | 
						|
#include "qmp-commands.h"
 | 
						|
#include "kvm.h"
 | 
						|
#include "arch_init.h"
 | 
						|
 | 
						|
NameInfo *qmp_query_name(Error **errp)
 | 
						|
{
 | 
						|
    NameInfo *info = g_malloc0(sizeof(*info));
 | 
						|
 | 
						|
    if (qemu_name) {
 | 
						|
        info->has_name = true;
 | 
						|
        info->name = g_strdup(qemu_name);
 | 
						|
    }
 | 
						|
 | 
						|
    return info;
 | 
						|
}
 | 
						|
 | 
						|
VersionInfo *qmp_query_version(Error **err)
 | 
						|
{
 | 
						|
    VersionInfo *info = g_malloc0(sizeof(*info));
 | 
						|
    const char *version = QEMU_VERSION;
 | 
						|
    char *tmp;
 | 
						|
 | 
						|
    info->qemu.major = strtol(version, &tmp, 10);
 | 
						|
    tmp++;
 | 
						|
    info->qemu.minor = strtol(tmp, &tmp, 10);
 | 
						|
    tmp++;
 | 
						|
    info->qemu.micro = strtol(tmp, &tmp, 10);
 | 
						|
    info->package = g_strdup(QEMU_PKGVERSION);
 | 
						|
 | 
						|
    return info;
 | 
						|
}
 | 
						|
 | 
						|
KvmInfo *qmp_query_kvm(Error **errp)
 | 
						|
{
 | 
						|
    KvmInfo *info = g_malloc0(sizeof(*info));
 | 
						|
 | 
						|
    info->enabled = kvm_enabled();
 | 
						|
    info->present = kvm_available();
 | 
						|
 | 
						|
    return info;
 | 
						|
}
 | 
						|
 | 
						|
UuidInfo *qmp_query_uuid(Error **errp)
 | 
						|
{
 | 
						|
    UuidInfo *info = g_malloc0(sizeof(*info));
 | 
						|
    char uuid[64];
 | 
						|
 | 
						|
    snprintf(uuid, sizeof(uuid), UUID_FMT, qemu_uuid[0], qemu_uuid[1],
 | 
						|
                   qemu_uuid[2], qemu_uuid[3], qemu_uuid[4], qemu_uuid[5],
 | 
						|
                   qemu_uuid[6], qemu_uuid[7], qemu_uuid[8], qemu_uuid[9],
 | 
						|
                   qemu_uuid[10], qemu_uuid[11], qemu_uuid[12], qemu_uuid[13],
 | 
						|
                   qemu_uuid[14], qemu_uuid[15]);
 | 
						|
 | 
						|
    info->UUID = g_strdup(uuid);
 | 
						|
    return info;
 | 
						|
}
 | 
						|
 | 
						|
void qmp_quit(Error **err)
 | 
						|
{
 | 
						|
    no_shutdown = 0;
 | 
						|
    qemu_system_shutdown_request();
 | 
						|
}
 | 
						|
 | 
						|
void qmp_stop(Error **errp)
 | 
						|
{
 | 
						|
    vm_stop(RUN_STATE_PAUSED);
 | 
						|
}
 | 
						|
 | 
						|
void qmp_system_reset(Error **errp)
 | 
						|
{
 | 
						|
    qemu_system_reset_request();
 | 
						|
}
 | 
						|
 | 
						|
void qmp_system_powerdown(Error **erp)
 | 
						|
{
 | 
						|
    qemu_system_powerdown_request();
 | 
						|
}
 | 
						|
 | 
						|
void qmp_cpu(int64_t index, Error **errp)
 | 
						|
{
 | 
						|
    /* Just do nothing */
 | 
						|
}
 | 
						|
 | 
						|
#ifndef CONFIG_VNC
 | 
						|
/* If VNC support is enabled, the "true" query-vnc command is
 | 
						|
   defined in the VNC subsystem */
 | 
						|
VncInfo *qmp_query_vnc(Error **errp)
 | 
						|
{
 | 
						|
    error_set(errp, QERR_FEATURE_DISABLED, "vnc");
 | 
						|
    return NULL;
 | 
						|
};
 | 
						|
#endif
 | 
						|
 | 
						|
#ifndef CONFIG_SPICE
 | 
						|
/* If SPICE support is enabled, the "true" query-spice command is
 | 
						|
   defined in the SPICE subsystem. Also note that we use a small
 | 
						|
   trick to maintain query-spice's original behavior, which is not
 | 
						|
   to be available in the namespace if SPICE is not compiled in */
 | 
						|
SpiceInfo *qmp_query_spice(Error **errp)
 | 
						|
{
 | 
						|
    error_set(errp, QERR_COMMAND_NOT_FOUND, "query-spice");
 | 
						|
    return NULL;
 | 
						|
};
 | 
						|
#endif
 |