10  * the COPYING file in the top-level directory.
12  * Contributions after 2012-01-13 are licensed under the terms of the
21 #include "monitor/monitor-internal.h"
23 #include "qapi/qapi-commands-ui.h"
31 void hmp_mouse_move(Monitor *mon, const QDict *qdict)  in hmp_mouse_move()  argument
38     dx = strtol(dx_str, NULL, 0);  in hmp_mouse_move()
39     dy = strtol(dy_str, NULL, 0);  in hmp_mouse_move()
44         dz = strtol(dz_str, NULL, 0);  in hmp_mouse_move()
45         if (dz != 0) {  in hmp_mouse_move()
46             button = (dz > 0) ? INPUT_BUTTON_WHEEL_UP : INPUT_BUTTON_WHEEL_DOWN;  in hmp_mouse_move()
55 void hmp_mouse_button(Monitor *mon, const QDict *qdict)  in hmp_mouse_button()  argument
72 void hmp_mouse_set(Monitor *mon, const QDict *qdict)  in hmp_mouse_set()  argument
77     hmp_handle_error(mon, err);  in hmp_mouse_set()
80 void hmp_info_mice(Monitor *mon, const QDict *qdict)  in hmp_info_mice()  argument
86         monitor_printf(mon, "No mouse devices connected\n");  in hmp_info_mice()
90     for (mouse = mice_list; mouse; mouse = mouse->next) {  in hmp_info_mice()
91         monitor_printf(mon, "%c Mouse #%" PRId64 ": %s%s\n",  in hmp_info_mice()
92                        mouse->value->current ? '*' : ' ',  in hmp_info_mice()
93                        mouse->value->index, mouse->value->name,  in hmp_info_mice()
94                        mouse->value->absolute ? " (absolute)" : "");  in hmp_info_mice()
102 static void hmp_info_VncBasicInfo(Monitor *mon, VncBasicInfo *info,  in hmp_info_VncBasicInfo()  argument
105     monitor_printf(mon, "  %s: %s:%s (%s%s)\n",  in hmp_info_VncBasicInfo()
107                    info->host,  in hmp_info_VncBasicInfo()
108                    info->service,  in hmp_info_VncBasicInfo()
109                    NetworkAddressFamily_str(info->family),  in hmp_info_VncBasicInfo()
110                    info->websocket ? " (Websocket)" : "");  in hmp_info_VncBasicInfo()
114 static void hmp_info_vnc_authcrypt(Monitor *mon, const char *indent,  in hmp_info_vnc_authcrypt()  argument
118     monitor_printf(mon, "%sAuth: %s (Sub: %s)\n", indent,  in hmp_info_vnc_authcrypt()
123 static void hmp_info_vnc_clients(Monitor *mon, VncClientInfoList *client)  in hmp_info_vnc_clients()  argument
126         VncClientInfo *cinfo = client->value;  in hmp_info_vnc_clients()
128         hmp_info_VncBasicInfo(mon, qapi_VncClientInfo_base(cinfo), "Client");  in hmp_info_vnc_clients()
129         monitor_printf(mon, "    x509_dname: %s\n",  in hmp_info_vnc_clients()
130                        cinfo->x509_dname ?: "none");  in hmp_info_vnc_clients()
131         monitor_printf(mon, "    sasl_username: %s\n",  in hmp_info_vnc_clients()
132                        cinfo->sasl_username ?: "none");  in hmp_info_vnc_clients()
134         client = client->next;  in hmp_info_vnc_clients()
138 static void hmp_info_vnc_servers(Monitor *mon, VncServerInfo2List *server)  in hmp_info_vnc_servers()  argument
141         VncServerInfo2 *sinfo = server->value;  in hmp_info_vnc_servers()
142         hmp_info_VncBasicInfo(mon, qapi_VncServerInfo2_base(sinfo), "Server");  in hmp_info_vnc_servers()
143         hmp_info_vnc_authcrypt(mon, "    ", sinfo->auth,  in hmp_info_vnc_servers()
144                                sinfo->has_vencrypt ? &sinfo->vencrypt : NULL);  in hmp_info_vnc_servers()
145         server = server->next;  in hmp_info_vnc_servers()
149 void hmp_info_vnc(Monitor *mon, const QDict *qdict)  in hmp_info_vnc()  argument
156     if (hmp_handle_error(mon, err)) {  in hmp_info_vnc()
160         monitor_printf(mon, "None\n");  in hmp_info_vnc()
165         VncInfo2 *info = info2l->value;  in hmp_info_vnc()
166         monitor_printf(mon, "%s:\n", info->id);  in hmp_info_vnc()
167         hmp_info_vnc_servers(mon, info->server);  in hmp_info_vnc()
168         hmp_info_vnc_clients(mon, info->clients);  in hmp_info_vnc()
169         if (!info->server) {  in hmp_info_vnc()
175             hmp_info_vnc_authcrypt(mon, "  ", info->auth,  in hmp_info_vnc()
176                                info->has_vencrypt ? &info->vencrypt : NULL);  in hmp_info_vnc()
178         if (info->display) {  in hmp_info_vnc()
179             monitor_printf(mon, "  Display: %s\n", info->display);  in hmp_info_vnc()
181         info2l = info2l->next;  in hmp_info_vnc()
190 void hmp_info_spice(Monitor *mon, const QDict *qdict)  in hmp_info_spice()  argument
211     if (!info->enabled) {  in hmp_info_spice()
212         monitor_printf(mon, "Server: disabled\n");  in hmp_info_spice()
216     monitor_printf(mon, "Server:\n");  in hmp_info_spice()
217     if (info->has_port) {  in hmp_info_spice()
218         monitor_printf(mon, "     address: %s:%" PRId64 "\n",  in hmp_info_spice()
219                        info->host, info->port);  in hmp_info_spice()
221     if (info->has_tls_port) {  in hmp_info_spice()
222         monitor_printf(mon, "     address: %s:%" PRId64 " [tls]\n",  in hmp_info_spice()
223                        info->host, info->tls_port);  in hmp_info_spice()
225     monitor_printf(mon, "    migrated: %s\n",  in hmp_info_spice()
226                    info->migrated ? "true" : "false");  in hmp_info_spice()
227     monitor_printf(mon, "        auth: %s\n", info->auth);  in hmp_info_spice()
228     monitor_printf(mon, "    compiled: %s\n", info->compiled_version);  in hmp_info_spice()
229     monitor_printf(mon, "  mouse-mode: %s\n",  in hmp_info_spice()
230                    SpiceQueryMouseMode_str(info->mouse_mode));  in hmp_info_spice()
232     if (!info->has_channels || info->channels == NULL) {  in hmp_info_spice()
233         monitor_printf(mon, "Channels: none\n");  in hmp_info_spice()
235         for (chan = info->channels; chan; chan = chan->next) {  in hmp_info_spice()
236             monitor_printf(mon, "Channel:\n");  in hmp_info_spice()
237             monitor_printf(mon, "     address: %s:%s%s\n",  in hmp_info_spice()
238                            chan->value->host, chan->value->port,  in hmp_info_spice()
239                            chan->value->tls ? " [tls]" : "");  in hmp_info_spice()
240             monitor_printf(mon, "     session: %" PRId64 "\n",  in hmp_info_spice()
241                            chan->value->connection_id);  in hmp_info_spice()
242             monitor_printf(mon, "     channel: %" PRId64 ":%" PRId64 "\n",  in hmp_info_spice()
243                            chan->value->channel_type, chan->value->channel_id);  in hmp_info_spice()
246             if (chan->value->channel_type > 0 &&  in hmp_info_spice()
247                 chan->value->channel_type < ARRAY_SIZE(channel_names) &&  in hmp_info_spice()
248                 channel_names[chan->value->channel_type]) {  in hmp_info_spice()
249                 channel_name = channel_names[chan->value->channel_type];  in hmp_info_spice()
252             monitor_printf(mon, "     channel name: %s\n", channel_name);  in hmp_info_spice()
261 void hmp_set_password(Monitor *mon, const QDict *qdict)  in hmp_set_password()  argument
293     hmp_handle_error(mon, err);  in hmp_set_password()
296 void hmp_expire_password(Monitor *mon, const QDict *qdict)  in hmp_expire_password()  argument
320     hmp_handle_error(mon, err);  in hmp_expire_password()
331 void hmp_change_vnc(Monitor *mon, const char *device, const char *target,  in hmp_change_vnc()  argument
336         error_setg(errp, "Parameter 'read-only-mode' is invalid for VNC");  in hmp_change_vnc()
344         MonitorHMP *hmp_mon = container_of(mon, MonitorHMP, common);  in hmp_change_vnc()
352 void hmp_sendkey(Monitor *mon, const QDict *qdict)  in hmp_sendkey()  argument
357     int has_hold_time = qdict_haskey(qdict, "hold-time");  in hmp_sendkey()
358     int hold_time = qdict_get_try_int(qdict, "hold-time", -1);  in hmp_sendkey()
364         separator = qemu_strchrnul(keys, '-');  in hmp_sendkey()
365         keyname_len = separator - keys;  in hmp_sendkey()
368         if (keys[0] == '<' && keyname_len == 1) {  in hmp_sendkey()
375         if (strstart(keys, "0x", NULL)) {  in hmp_sendkey()
379             if (qemu_strtoi(keys, &endp, 0, &value) < 0) {  in hmp_sendkey()
386             v->type = KEY_VALUE_KIND_NUMBER;  in hmp_sendkey()
387             v->u.number.data = value;  in hmp_sendkey()
393             v->type = KEY_VALUE_KIND_QCODE;  in hmp_sendkey()
394             v->u.qcode.data = idx;  in hmp_sendkey()
406     hmp_handle_error(mon, err);  in hmp_sendkey()
414     monitor_printf(mon, "invalid parameter: %.*s\n", keyname_len, keys);  in hmp_sendkey()
427     sep = strrchr(str, '-');  in sendkey_completion()
433     for (i = 0; i < Q_KEY_CODE__MAX; i++) {  in sendkey_completion()
442 hmp_screendump(Monitor *mon, const QDict *qdict)  in hmp_screendump()  argument
446     int64_t head = qdict_get_try_int(qdict, "head", 0);  in hmp_screendump()
460     hmp_handle_error(mon, err);  in hmp_screendump()
464 void hmp_client_migrate_info(Monitor *mon, const QDict *qdict)  in hmp_client_migrate_info()  argument
470     int port             = qdict_get_try_int(qdict, "port", -1);  in hmp_client_migrate_info()
471     bool has_tls_port    = qdict_haskey(qdict, "tls-port");  in hmp_client_migrate_info()
472     int tls_port         = qdict_get_try_int(qdict, "tls-port", -1);  in hmp_client_migrate_info()
473     const char *cert_subject = qdict_get_try_str(qdict, "cert-subject");  in hmp_client_migrate_info()
478     hmp_handle_error(mon, err);  in hmp_client_migrate_info()