xref: /kvmtool/builtin-run.c (revision 8d2ff5da21a87617d8c0646914293b47f333cbc4)
1 #include "kvm/builtin-run.h"
2 
3 #include "kvm/builtin-setup.h"
4 #include "kvm/virtio-balloon.h"
5 #include "kvm/virtio-console.h"
6 #include "kvm/parse-options.h"
7 #include "kvm/8250-serial.h"
8 #include "kvm/framebuffer.h"
9 #include "kvm/disk-image.h"
10 #include "kvm/threadpool.h"
11 #include "kvm/virtio-blk.h"
12 #include "kvm/virtio-net.h"
13 #include "kvm/virtio-rng.h"
14 #include "kvm/ioeventfd.h"
15 #include "kvm/virtio-9p.h"
16 #include "kvm/barrier.h"
17 #include "kvm/kvm-cpu.h"
18 #include "kvm/ioport.h"
19 #include "kvm/symbol.h"
20 #include "kvm/i8042.h"
21 #include "kvm/mutex.h"
22 #include "kvm/term.h"
23 #include "kvm/util.h"
24 #include "kvm/strbuf.h"
25 #include "kvm/vesa.h"
26 #include "kvm/irq.h"
27 #include "kvm/kvm.h"
28 #include "kvm/pci.h"
29 #include "kvm/rtc.h"
30 #include "kvm/sdl.h"
31 #include "kvm/vnc.h"
32 #include "kvm/guest_compat.h"
33 #include "kvm/pci-shmem.h"
34 #include "kvm/kvm-ipc.h"
35 #include "kvm/builtin-debug.h"
36 
37 #include <linux/types.h>
38 
39 #include <sys/utsname.h>
40 #include <sys/types.h>
41 #include <sys/stat.h>
42 #include <termios.h>
43 #include <signal.h>
44 #include <stdlib.h>
45 #include <string.h>
46 #include <unistd.h>
47 #include <ctype.h>
48 #include <stdio.h>
49 
50 #define DEFAULT_KVM_DEV		"/dev/kvm"
51 #define DEFAULT_CONSOLE		"serial"
52 #define DEFAULT_NETWORK		"user"
53 #define DEFAULT_HOST_ADDR	"192.168.33.1"
54 #define DEFAULT_GUEST_ADDR	"192.168.33.15"
55 #define DEFAULT_GUEST_MAC	"02:15:15:15:15:15"
56 #define DEFAULT_HOST_MAC	"02:01:01:01:01:01"
57 #define DEFAULT_SCRIPT		"none"
58 const char *DEFAULT_SANDBOX_FILENAME = "guest/sandbox.sh";
59 
60 #define MB_SHIFT		(20)
61 #define KB_SHIFT		(10)
62 #define GB_SHIFT		(30)
63 #define MIN_RAM_SIZE_MB		(64ULL)
64 #define MIN_RAM_SIZE_BYTE	(MIN_RAM_SIZE_MB << MB_SHIFT)
65 
66 struct kvm *kvm;
67 struct kvm_cpu **kvm_cpus;
68 __thread struct kvm_cpu *current_kvm_cpu;
69 
70 static u64 ram_size;
71 static u8  image_count;
72 static u8 num_net_devices;
73 static bool virtio_rng;
74 static const char *kernel_cmdline;
75 static const char *kernel_filename;
76 static const char *vmlinux_filename;
77 static const char *initrd_filename;
78 static const char *image_filename[MAX_DISK_IMAGES];
79 static const char *console;
80 static const char *dev;
81 static const char *network;
82 static const char *host_ip;
83 static const char *guest_ip;
84 static const char *guest_mac;
85 static const char *host_mac;
86 static const char *script;
87 static const char *guest_name;
88 static const char *sandbox;
89 static const char *hugetlbfs_path;
90 static const char *custom_rootfs_name = "default";
91 static struct virtio_net_params *net_params;
92 static bool single_step;
93 static bool readonly_image[MAX_DISK_IMAGES];
94 static bool vnc;
95 static bool sdl;
96 static bool balloon;
97 static bool using_rootfs;
98 static bool custom_rootfs;
99 static bool no_net;
100 static bool no_dhcp;
101 extern bool ioport_debug;
102 static int  kvm_run_wrapper;
103 extern int  active_console;
104 extern int  debug_iodelay;
105 
106 bool do_debug_print = false;
107 
108 static int nrcpus;
109 static int vidmode = -1;
110 
111 static const char * const run_usage[] = {
112 	"lkvm run [<options>] [<kernel image>]",
113 	NULL
114 };
115 
116 enum {
117 	KVM_RUN_SANDBOX,
118 };
119 
120 void kvm_run_set_wrapper_sandbox(void)
121 {
122 	kvm_run_wrapper = KVM_RUN_SANDBOX;
123 }
124 
125 static int img_name_parser(const struct option *opt, const char *arg, int unset)
126 {
127 	char *sep;
128 	struct stat st;
129 	char path[PATH_MAX];
130 
131 	if (stat(arg, &st) == 0 &&
132 	    S_ISDIR(st.st_mode)) {
133 		char tmp[PATH_MAX];
134 
135 		if (using_rootfs)
136 			die("Please use only one rootfs directory atmost");
137 
138 		if (realpath(arg, tmp) == 0 ||
139 		    virtio_9p__register(kvm, tmp, "/dev/root") < 0)
140 			die("Unable to initialize virtio 9p");
141 		using_rootfs = 1;
142 		return 0;
143 	}
144 
145 	snprintf(path, PATH_MAX, "%s%s", kvm__get_dir(), arg);
146 
147 	if (stat(path, &st) == 0 &&
148 	    S_ISDIR(st.st_mode)) {
149 		char tmp[PATH_MAX];
150 
151 		if (using_rootfs)
152 			die("Please use only one rootfs directory atmost");
153 
154 		if (realpath(path, tmp) == 0 ||
155 		    virtio_9p__register(kvm, tmp, "/dev/root") < 0)
156 			die("Unable to initialize virtio 9p");
157 		if (virtio_9p__register(kvm, "/", "hostfs") < 0)
158 			die("Unable to initialize virtio 9p");
159 		kvm_setup_resolv(arg);
160 		using_rootfs = custom_rootfs = 1;
161 		custom_rootfs_name = arg;
162 		return 0;
163 	}
164 
165 	if (image_count >= MAX_DISK_IMAGES)
166 		die("Currently only 4 images are supported");
167 
168 	image_filename[image_count] = arg;
169 	sep = strstr(arg, ",");
170 	if (sep) {
171 		if (strcmp(sep + 1, "ro") == 0)
172 			readonly_image[image_count] = 1;
173 		*sep = 0;
174 	}
175 
176 	image_count++;
177 
178 	return 0;
179 }
180 
181 static int virtio_9p_rootdir_parser(const struct option *opt, const char *arg, int unset)
182 {
183 	char *tag_name;
184 	char tmp[PATH_MAX];
185 
186 	/*
187 	 * 9p dir can be of the form dirname,tag_name or
188 	 * just dirname. In the later case we use the
189 	 * default tag name
190 	 */
191 	tag_name = strstr(arg, ",");
192 	if (tag_name) {
193 		*tag_name = '\0';
194 		tag_name++;
195 	}
196 	if (realpath(arg, tmp)) {
197 		if (virtio_9p__register(kvm, tmp, tag_name) < 0)
198 			die("Unable to initialize virtio 9p");
199 	} else
200 		die("Failed resolving 9p path");
201 	return 0;
202 }
203 
204 static int tty_parser(const struct option *opt, const char *arg, int unset)
205 {
206 	int tty = atoi(arg);
207 
208 	term_set_tty(tty);
209 
210 	return 0;
211 }
212 
213 static inline void str_to_mac(const char *str, char *mac)
214 {
215 	sscanf(str, "%hhx:%hhx:%hhx:%hhx:%hhx:%hhx",
216 		mac, mac+1, mac+2, mac+3, mac+4, mac+5);
217 }
218 static int set_net_param(struct virtio_net_params *p, const char *param,
219 				const char *val)
220 {
221 	if (strcmp(param, "guest_mac") == 0) {
222 		str_to_mac(val, p->guest_mac);
223 	} else if (strcmp(param, "mode") == 0) {
224 		if (!strncmp(val, "user", 4)) {
225 			int i;
226 
227 			for (i = 0; i < num_net_devices; i++)
228 				if (net_params[i].mode == NET_MODE_USER)
229 					die("Only one usermode network device allowed at a time");
230 			p->mode = NET_MODE_USER;
231 		} else if (!strncmp(val, "tap", 3)) {
232 			p->mode = NET_MODE_TAP;
233 		} else if (!strncmp(val, "none", 4)) {
234 			no_net = 1;
235 			return -1;
236 		} else
237 			die("Unkown network mode %s, please use user, tap or none", network);
238 	} else if (strcmp(param, "script") == 0) {
239 		p->script = strdup(val);
240 	} else if (strcmp(param, "guest_ip") == 0) {
241 		p->guest_ip = strdup(val);
242 	} else if (strcmp(param, "host_ip") == 0) {
243 		p->host_ip = strdup(val);
244 	} else if (strcmp(param, "vhost") == 0) {
245 		p->vhost = atoi(val);
246 	} else if (strcmp(param, "fd") == 0) {
247 		p->fd = atoi(val);
248 	}
249 
250 	return 0;
251 }
252 
253 static int netdev_parser(const struct option *opt, const char *arg, int unset)
254 {
255 	struct virtio_net_params p;
256 	char *buf = NULL, *cmd = NULL, *cur = NULL;
257 	bool on_cmd = true;
258 
259 	if (arg) {
260 		buf = strdup(arg);
261 		if (buf == NULL)
262 			die("Failed allocating new net buffer");
263 		cur = strtok(buf, ",=");
264 	}
265 
266 	p = (struct virtio_net_params) {
267 		.guest_ip	= DEFAULT_GUEST_ADDR,
268 		.host_ip	= DEFAULT_HOST_ADDR,
269 		.script		= DEFAULT_SCRIPT,
270 		.mode		= NET_MODE_TAP,
271 	};
272 
273 	str_to_mac(DEFAULT_GUEST_MAC, p.guest_mac);
274 	p.guest_mac[5] += num_net_devices;
275 
276 	while (cur) {
277 		if (on_cmd) {
278 			cmd = cur;
279 		} else {
280 			if (set_net_param(&p, cmd, cur) < 0)
281 				goto done;
282 		}
283 		on_cmd = !on_cmd;
284 
285 		cur = strtok(NULL, ",=");
286 	};
287 
288 	num_net_devices++;
289 
290 	net_params = realloc(net_params, num_net_devices * sizeof(*net_params));
291 	if (net_params == NULL)
292 		die("Failed adding new network device");
293 
294 	net_params[num_net_devices - 1] = p;
295 
296 done:
297 	free(buf);
298 	return 0;
299 }
300 
301 static int shmem_parser(const struct option *opt, const char *arg, int unset)
302 {
303 	const u64 default_size = SHMEM_DEFAULT_SIZE;
304 	const u64 default_phys_addr = SHMEM_DEFAULT_ADDR;
305 	const char *default_handle = SHMEM_DEFAULT_HANDLE;
306 	struct shmem_info *si = malloc(sizeof(struct shmem_info));
307 	u64 phys_addr;
308 	u64 size;
309 	char *handle = NULL;
310 	int create = 0;
311 	const char *p = arg;
312 	char *next;
313 	int base = 10;
314 	int verbose = 0;
315 
316 	const int skip_pci = strlen("pci:");
317 	if (verbose)
318 		pr_info("shmem_parser(%p,%s,%d)", opt, arg, unset);
319 	/* parse out optional addr family */
320 	if (strcasestr(p, "pci:")) {
321 		p += skip_pci;
322 	} else if (strcasestr(p, "mem:")) {
323 		die("I can't add to E820 map yet.\n");
324 	}
325 	/* parse out physical addr */
326 	base = 10;
327 	if (strcasestr(p, "0x"))
328 		base = 16;
329 	phys_addr = strtoll(p, &next, base);
330 	if (next == p && phys_addr == 0) {
331 		pr_info("shmem: no physical addr specified, using default.");
332 		phys_addr = default_phys_addr;
333 	}
334 	if (*next != ':' && *next != '\0')
335 		die("shmem: unexpected chars after phys addr.\n");
336 	if (*next == '\0')
337 		p = next;
338 	else
339 		p = next + 1;
340 	/* parse out size */
341 	base = 10;
342 	if (strcasestr(p, "0x"))
343 		base = 16;
344 	size = strtoll(p, &next, base);
345 	if (next == p && size == 0) {
346 		pr_info("shmem: no size specified, using default.");
347 		size = default_size;
348 	}
349 	/* look for [KMGkmg][Bb]*  uses base 2. */
350 	int skip_B = 0;
351 	if (strspn(next, "KMGkmg")) {	/* might have a prefix */
352 		if (*(next + 1) == 'B' || *(next + 1) == 'b')
353 			skip_B = 1;
354 		switch (*next) {
355 		case 'K':
356 		case 'k':
357 			size = size << KB_SHIFT;
358 			break;
359 		case 'M':
360 		case 'm':
361 			size = size << MB_SHIFT;
362 			break;
363 		case 'G':
364 		case 'g':
365 			size = size << GB_SHIFT;
366 			break;
367 		default:
368 			die("shmem: bug in detecting size prefix.");
369 			break;
370 		}
371 		next += 1 + skip_B;
372 	}
373 	if (*next != ':' && *next != '\0') {
374 		die("shmem: unexpected chars after phys size. <%c><%c>\n",
375 		    *next, *p);
376 	}
377 	if (*next == '\0')
378 		p = next;
379 	else
380 		p = next + 1;
381 	/* parse out optional shmem handle */
382 	const int skip_handle = strlen("handle=");
383 	next = strcasestr(p, "handle=");
384 	if (*p && next) {
385 		if (p != next)
386 			die("unexpected chars before handle\n");
387 		p += skip_handle;
388 		next = strchrnul(p, ':');
389 		if (next - p) {
390 			handle = malloc(next - p + 1);
391 			strncpy(handle, p, next - p);
392 			handle[next - p] = '\0';	/* just in case. */
393 		}
394 		if (*next == '\0')
395 			p = next;
396 		else
397 			p = next + 1;
398 	}
399 	/* parse optional create flag to see if we should create shm seg. */
400 	if (*p && strcasestr(p, "create")) {
401 		create = 1;
402 		p += strlen("create");
403 	}
404 	if (*p != '\0')
405 		die("shmem: unexpected trailing chars\n");
406 	if (handle == NULL) {
407 		handle = malloc(strlen(default_handle) + 1);
408 		strcpy(handle, default_handle);
409 	}
410 	if (verbose) {
411 		pr_info("shmem: phys_addr = %llx", phys_addr);
412 		pr_info("shmem: size      = %llx", size);
413 		pr_info("shmem: handle    = %s", handle);
414 		pr_info("shmem: create    = %d", create);
415 	}
416 
417 	si->phys_addr = phys_addr;
418 	si->size = size;
419 	si->handle = handle;
420 	si->create = create;
421 	pci_shmem__register_mem(si);	/* ownership of si, etc. passed on. */
422 	return 0;
423 }
424 
425 static const struct option options[] = {
426 	OPT_GROUP("Basic options:"),
427 	OPT_STRING('\0', "name", &guest_name, "guest name",
428 			"A name for the guest"),
429 	OPT_INTEGER('c', "cpus", &nrcpus, "Number of CPUs"),
430 	OPT_U64('m', "mem", &ram_size, "Virtual machine memory size in MiB."),
431 	OPT_CALLBACK('\0', "shmem", NULL,
432 		     "[pci:]<addr>:<size>[:handle=<handle>][:create]",
433 		     "Share host shmem with guest via pci device",
434 		     shmem_parser),
435 	OPT_CALLBACK('d', "disk", NULL, "image or rootfs_dir", "Disk image or rootfs directory", img_name_parser),
436 	OPT_BOOLEAN('\0', "balloon", &balloon, "Enable virtio balloon"),
437 	OPT_BOOLEAN('\0', "vnc", &vnc, "Enable VNC framebuffer"),
438 	OPT_BOOLEAN('\0', "sdl", &sdl, "Enable SDL framebuffer"),
439 	OPT_BOOLEAN('\0', "rng", &virtio_rng, "Enable virtio Random Number Generator"),
440 	OPT_CALLBACK('\0', "9p", NULL, "dir_to_share,tag_name",
441 		     "Enable virtio 9p to share files between host and guest", virtio_9p_rootdir_parser),
442 	OPT_STRING('\0', "console", &console, "serial, virtio or hv",
443 			"Console to use"),
444 	OPT_STRING('\0', "dev", &dev, "device_file", "KVM device file"),
445 	OPT_CALLBACK('\0', "tty", NULL, "tty id",
446 		     "Remap guest TTY into a pty on the host",
447 		     tty_parser),
448 	OPT_STRING('\0', "sandbox", &sandbox, "script",
449 			"Run this script when booting into custom rootfs"),
450 	OPT_STRING('\0', "hugetlbfs", &hugetlbfs_path, "path", "Hugetlbfs path"),
451 
452 	OPT_GROUP("Kernel options:"),
453 	OPT_STRING('k', "kernel", &kernel_filename, "kernel",
454 			"Kernel to boot in virtual machine"),
455 	OPT_STRING('i', "initrd", &initrd_filename, "initrd",
456 			"Initial RAM disk image"),
457 	OPT_STRING('p', "params", &kernel_cmdline, "params",
458 			"Kernel command line arguments"),
459 
460 	OPT_GROUP("Networking options:"),
461 	OPT_CALLBACK_DEFAULT('n', "network", NULL, "network params",
462 		     "Create a new guest NIC",
463 		     netdev_parser, NULL),
464 	OPT_BOOLEAN('\0', "no-dhcp", &no_dhcp, "Disable kernel DHCP in rootfs mode"),
465 
466 	OPT_GROUP("BIOS options:"),
467 	OPT_INTEGER('\0', "vidmode", &vidmode,
468 		    "Video mode"),
469 
470 	OPT_GROUP("Debug options:"),
471 	OPT_BOOLEAN('\0', "debug", &do_debug_print,
472 			"Enable debug messages"),
473 	OPT_BOOLEAN('\0', "debug-single-step", &single_step,
474 			"Enable single stepping"),
475 	OPT_BOOLEAN('\0', "debug-ioport", &ioport_debug,
476 			"Enable ioport debugging"),
477 	OPT_INTEGER('\0', "debug-iodelay", &debug_iodelay,
478 			"Delay IO by millisecond"),
479 	OPT_END()
480 };
481 
482 /*
483  * Serialize debug printout so that the output of multiple vcpus does not
484  * get mixed up:
485  */
486 static int printout_done;
487 
488 static void handle_sigusr1(int sig)
489 {
490 	struct kvm_cpu *cpu = current_kvm_cpu;
491 	int fd = kvm_cpu__get_debug_fd();
492 
493 	if (!cpu || cpu->needs_nmi)
494 		return;
495 
496 	dprintf(fd, "\n #\n # vCPU #%ld's dump:\n #\n", cpu->cpu_id);
497 	kvm_cpu__show_registers(cpu);
498 	kvm_cpu__show_code(cpu);
499 	kvm_cpu__show_page_tables(cpu);
500 	fflush(stdout);
501 	printout_done = 1;
502 	mb();
503 }
504 
505 /* Pause/resume the guest using SIGUSR2 */
506 static int is_paused;
507 
508 static void handle_pause(int fd, u32 type, u32 len, u8 *msg)
509 {
510 	if (type == KVM_IPC_RESUME && is_paused)
511 		kvm__continue();
512 	else if (type == KVM_IPC_PAUSE && !is_paused)
513 		kvm__pause();
514 	else
515 		return;
516 
517 	is_paused = !is_paused;
518 	pr_info("Guest %s\n", is_paused ? "paused" : "resumed");
519 }
520 
521 static void handle_debug(int fd, u32 type, u32 len, u8 *msg)
522 {
523 	int i;
524 	struct debug_cmd_params *params = (void *)msg;
525 	u32 dbg_type = params->dbg_type;
526 	u32 vcpu = params->cpu;
527 
528 	if (dbg_type & KVM_DEBUG_CMD_TYPE_NMI) {
529 		if ((int)vcpu >= kvm->nrcpus)
530 			return;
531 
532 		kvm_cpus[vcpu]->needs_nmi = 1;
533 		pthread_kill(kvm_cpus[vcpu]->thread, SIGUSR1);
534 	}
535 
536 	if (!(dbg_type & KVM_DEBUG_CMD_TYPE_DUMP))
537 		return;
538 
539 	for (i = 0; i < nrcpus; i++) {
540 		struct kvm_cpu *cpu = kvm_cpus[i];
541 
542 		if (!cpu)
543 			continue;
544 
545 		printout_done = 0;
546 
547 		kvm_cpu__set_debug_fd(fd);
548 		pthread_kill(cpu->thread, SIGUSR1);
549 		/*
550 		 * Wait for the vCPU to dump state before signalling
551 		 * the next thread. Since this is debug code it does
552 		 * not matter that we are burning CPU time a bit:
553 		 */
554 		while (!printout_done)
555 			mb();
556 	}
557 
558 	close(fd);
559 
560 	serial8250__inject_sysrq(kvm);
561 }
562 
563 static void handle_sigalrm(int sig)
564 {
565 	kvm__arch_periodic_poll(kvm);
566 }
567 
568 static void handle_stop(int fd, u32 type, u32 len, u8 *msg)
569 {
570 	kvm_cpu__reboot();
571 }
572 
573 static void *kvm_cpu_thread(void *arg)
574 {
575 	current_kvm_cpu		= arg;
576 
577 	if (kvm_cpu__start(current_kvm_cpu))
578 		goto panic_kvm;
579 
580 	kvm_cpu__delete(current_kvm_cpu);
581 
582 	return (void *) (intptr_t) 0;
583 
584 panic_kvm:
585 	fprintf(stderr, "KVM exit reason: %u (\"%s\")\n",
586 		current_kvm_cpu->kvm_run->exit_reason,
587 		kvm_exit_reasons[current_kvm_cpu->kvm_run->exit_reason]);
588 	if (current_kvm_cpu->kvm_run->exit_reason == KVM_EXIT_UNKNOWN)
589 		fprintf(stderr, "KVM exit code: 0x%Lu\n",
590 			current_kvm_cpu->kvm_run->hw.hardware_exit_reason);
591 
592 	kvm_cpu__set_debug_fd(STDOUT_FILENO);
593 	kvm_cpu__show_registers(current_kvm_cpu);
594 	kvm_cpu__show_code(current_kvm_cpu);
595 	kvm_cpu__show_page_tables(current_kvm_cpu);
596 
597 	kvm_cpu__delete(current_kvm_cpu);
598 
599 	return (void *) (intptr_t) 1;
600 }
601 
602 static char kernel[PATH_MAX];
603 
604 static const char *host_kernels[] = {
605 	"/boot/vmlinuz",
606 	"/boot/bzImage",
607 	NULL
608 };
609 
610 static const char *default_kernels[] = {
611 	"./bzImage",
612 	"../../arch/" BUILD_ARCH "/boot/bzImage",
613 	NULL
614 };
615 
616 static const char *default_vmlinux[] = {
617 	"../../../vmlinux",
618 	"../../vmlinux",
619 	NULL
620 };
621 
622 static void kernel_usage_with_options(void)
623 {
624 	const char **k;
625 	struct utsname uts;
626 
627 	fprintf(stderr, "Fatal: could not find default kernel image in:\n");
628 	k = &default_kernels[0];
629 	while (*k) {
630 		fprintf(stderr, "\t%s\n", *k);
631 		k++;
632 	}
633 
634 	if (uname(&uts) < 0)
635 		return;
636 
637 	k = &host_kernels[0];
638 	while (*k) {
639 		if (snprintf(kernel, PATH_MAX, "%s-%s", *k, uts.release) < 0)
640 			return;
641 		fprintf(stderr, "\t%s\n", kernel);
642 		k++;
643 	}
644 	fprintf(stderr, "\nPlease see 'kvm run --help' for more options.\n\n");
645 }
646 
647 static u64 host_ram_size(void)
648 {
649 	long page_size;
650 	long nr_pages;
651 
652 	nr_pages	= sysconf(_SC_PHYS_PAGES);
653 	if (nr_pages < 0) {
654 		pr_warning("sysconf(_SC_PHYS_PAGES) failed");
655 		return 0;
656 	}
657 
658 	page_size	= sysconf(_SC_PAGE_SIZE);
659 	if (page_size < 0) {
660 		pr_warning("sysconf(_SC_PAGE_SIZE) failed");
661 		return 0;
662 	}
663 
664 	return (nr_pages * page_size) >> MB_SHIFT;
665 }
666 
667 /*
668  * If user didn't specify how much memory it wants to allocate for the guest,
669  * avoid filling the whole host RAM.
670  */
671 #define RAM_SIZE_RATIO		0.8
672 
673 static u64 get_ram_size(int nr_cpus)
674 {
675 	u64 available;
676 	u64 ram_size;
677 
678 	ram_size	= 64 * (nr_cpus + 3);
679 
680 	available	= host_ram_size() * RAM_SIZE_RATIO;
681 	if (!available)
682 		available = MIN_RAM_SIZE_MB;
683 
684 	if (ram_size > available)
685 		ram_size	= available;
686 
687 	return ram_size;
688 }
689 
690 static const char *find_kernel(void)
691 {
692 	const char **k;
693 	struct stat st;
694 	struct utsname uts;
695 
696 	k = &default_kernels[0];
697 	while (*k) {
698 		if (stat(*k, &st) < 0 || !S_ISREG(st.st_mode)) {
699 			k++;
700 			continue;
701 		}
702 		strncpy(kernel, *k, PATH_MAX);
703 		return kernel;
704 	}
705 
706 	if (uname(&uts) < 0)
707 		return NULL;
708 
709 	k = &host_kernels[0];
710 	while (*k) {
711 		if (snprintf(kernel, PATH_MAX, "%s-%s", *k, uts.release) < 0)
712 			return NULL;
713 
714 		if (stat(kernel, &st) < 0 || !S_ISREG(st.st_mode)) {
715 			k++;
716 			continue;
717 		}
718 		return kernel;
719 
720 	}
721 	return NULL;
722 }
723 
724 static const char *find_vmlinux(void)
725 {
726 	const char **vmlinux;
727 
728 	vmlinux = &default_vmlinux[0];
729 	while (*vmlinux) {
730 		struct stat st;
731 
732 		if (stat(*vmlinux, &st) < 0 || !S_ISREG(st.st_mode)) {
733 			vmlinux++;
734 			continue;
735 		}
736 		return *vmlinux;
737 	}
738 	return NULL;
739 }
740 
741 void kvm_run_help(void)
742 {
743 	usage_with_options(run_usage, options);
744 }
745 
746 static int kvm_custom_stage2(void)
747 {
748 	char tmp[PATH_MAX], dst[PATH_MAX], *src;
749 	const char *rootfs = custom_rootfs_name;
750 	int r;
751 
752 	src = realpath("guest/init_stage2", NULL);
753 	if (src == NULL)
754 		return -ENOMEM;
755 
756 	snprintf(tmp, PATH_MAX, "%s%s/virt/init_stage2", kvm__get_dir(), rootfs);
757 	remove(tmp);
758 
759 	snprintf(dst, PATH_MAX, "/host/%s", src);
760 	r = symlink(dst, tmp);
761 	free(src);
762 
763 	return r;
764 }
765 
766 static int kvm_run_set_sandbox(void)
767 {
768 	const char *guestfs_name = custom_rootfs_name;
769 	char path[PATH_MAX], script[PATH_MAX], *tmp;
770 
771 	snprintf(path, PATH_MAX, "%s%s/virt/sandbox.sh", kvm__get_dir(), guestfs_name);
772 
773 	remove(path);
774 
775 	if (sandbox == NULL)
776 		return 0;
777 
778 	tmp = realpath(sandbox, NULL);
779 	if (tmp == NULL)
780 		return -ENOMEM;
781 
782 	snprintf(script, PATH_MAX, "/host/%s", tmp);
783 	free(tmp);
784 
785 	return symlink(script, path);
786 }
787 
788 static void kvm_write_sandbox_cmd_exactly(int fd, const char *arg)
789 {
790 	const char *single_quote;
791 
792 	if (!*arg) { /* zero length string */
793 		if (write(fd, "''", 2) <= 0)
794 			die("Failed writing sandbox script");
795 		return;
796 	}
797 
798 	while (*arg) {
799 		single_quote = strchrnul(arg, '\'');
800 
801 		/* write non-single-quote string as #('string') */
802 		if (arg != single_quote) {
803 			if (write(fd, "'", 1) <= 0 ||
804 			    write(fd, arg, single_quote - arg) <= 0 ||
805 			    write(fd, "'", 1) <= 0)
806 				die("Failed writing sandbox script");
807 		}
808 
809 		/* write single quote as #("'") */
810 		if (*single_quote) {
811 			if (write(fd, "\"'\"", 3) <= 0)
812 				die("Failed writing sandbox script");
813 		} else
814 			break;
815 
816 		arg = single_quote + 1;
817 	}
818 }
819 
820 static void kvm_run_write_sandbox_cmd(const char **argv, int argc)
821 {
822 	const char script_hdr[] = "#! /bin/bash\n\n";
823 	int fd;
824 
825 	remove(sandbox);
826 
827 	fd = open(sandbox, O_RDWR | O_CREAT, 0777);
828 	if (fd < 0)
829 		die("Failed creating sandbox script");
830 
831 	if (write(fd, script_hdr, sizeof(script_hdr) - 1) <= 0)
832 		die("Failed writing sandbox script");
833 
834 	while (argc) {
835 		kvm_write_sandbox_cmd_exactly(fd, argv[0]);
836 		if (argc - 1)
837 			if (write(fd, " ", 1) <= 0)
838 				die("Failed writing sandbox script");
839 		argv++;
840 		argc--;
841 	}
842 	if (write(fd, "\n", 1) <= 0)
843 		die("Failed writing sandbox script");
844 
845 	close(fd);
846 }
847 
848 int kvm_cmd_run(int argc, const char **argv, const char *prefix)
849 {
850 	static char real_cmdline[2048], default_name[20];
851 	struct framebuffer *fb = NULL;
852 	unsigned int nr_online_cpus;
853 	int exit_code = 0;
854 	int max_cpus, recommended_cpus;
855 	int i;
856 	void *ret;
857 
858 	signal(SIGALRM, handle_sigalrm);
859 	kvm_ipc__register_handler(KVM_IPC_DEBUG, handle_debug);
860 	signal(SIGUSR1, handle_sigusr1);
861 	kvm_ipc__register_handler(KVM_IPC_PAUSE, handle_pause);
862 	kvm_ipc__register_handler(KVM_IPC_RESUME, handle_pause);
863 	kvm_ipc__register_handler(KVM_IPC_STOP, handle_stop);
864 
865 	nr_online_cpus = sysconf(_SC_NPROCESSORS_ONLN);
866 
867 	while (argc != 0) {
868 		argc = parse_options(argc, argv, options, run_usage,
869 				PARSE_OPT_STOP_AT_NON_OPTION |
870 				PARSE_OPT_KEEP_DASHDASH);
871 		if (argc != 0) {
872 			/* Cusrom options, should have been handled elsewhere */
873 			if (strcmp(argv[0], "--") == 0) {
874 				if (kvm_run_wrapper == KVM_RUN_SANDBOX) {
875 					sandbox = DEFAULT_SANDBOX_FILENAME;
876 					kvm_run_write_sandbox_cmd(argv+1, argc-1);
877 					break;
878 				}
879 			}
880 
881 			if (kernel_filename) {
882 				fprintf(stderr, "Cannot handle parameter: "
883 						"%s\n", argv[0]);
884 				usage_with_options(run_usage, options);
885 				return EINVAL;
886 			}
887 			/* first unhandled parameter is treated as a kernel
888 			   image
889 			 */
890 			kernel_filename = argv[0];
891 			argv++;
892 			argc--;
893 		}
894 
895 	}
896 
897 	if (!kernel_filename)
898 		kernel_filename = find_kernel();
899 
900 	if (!kernel_filename) {
901 		kernel_usage_with_options();
902 		return EINVAL;
903 	}
904 
905 	vmlinux_filename = find_vmlinux();
906 
907 	if (nrcpus == 0)
908 		nrcpus = nr_online_cpus;
909 
910 	if (!ram_size)
911 		ram_size	= get_ram_size(nrcpus);
912 
913 	if (ram_size < MIN_RAM_SIZE_MB)
914 		die("Not enough memory specified: %lluMB (min %lluMB)", ram_size, MIN_RAM_SIZE_MB);
915 
916 	if (ram_size > host_ram_size())
917 		pr_warning("Guest memory size %lluMB exceeds host physical RAM size %lluMB", ram_size, host_ram_size());
918 
919 	ram_size <<= MB_SHIFT;
920 
921 	if (!dev)
922 		dev = DEFAULT_KVM_DEV;
923 
924 	if (!console)
925 		console = DEFAULT_CONSOLE;
926 
927 	if (!strncmp(console, "virtio", 6))
928 		active_console  = CONSOLE_VIRTIO;
929 	else if (!strncmp(console, "serial", 6))
930 		active_console  = CONSOLE_8250;
931 	else if (!strncmp(console, "hv", 2))
932 		active_console = CONSOLE_HV;
933 	else
934 		pr_warning("No console!");
935 
936 	if (!host_ip)
937 		host_ip = DEFAULT_HOST_ADDR;
938 
939 	if (!guest_ip)
940 		guest_ip = DEFAULT_GUEST_ADDR;
941 
942 	if (!guest_mac)
943 		guest_mac = DEFAULT_GUEST_MAC;
944 
945 	if (!host_mac)
946 		host_mac = DEFAULT_HOST_MAC;
947 
948 	if (!script)
949 		script = DEFAULT_SCRIPT;
950 
951 	symbol__init(vmlinux_filename);
952 
953 	term_init();
954 
955 	if (!guest_name) {
956 		sprintf(default_name, "guest-%u", getpid());
957 		guest_name = default_name;
958 	}
959 
960 	kvm = kvm__init(dev, hugetlbfs_path, ram_size, guest_name);
961 
962 	kvm->single_step = single_step;
963 
964 	ioeventfd__init(kvm);
965 
966 	max_cpus = kvm__max_cpus(kvm);
967 	recommended_cpus = kvm__recommended_cpus(kvm);
968 
969 	if (nrcpus > max_cpus) {
970 		printf("  # Limit the number of CPUs to %d\n", max_cpus);
971 		nrcpus = max_cpus;
972 	} else if (nrcpus > recommended_cpus) {
973 		printf("  # Warning: The maximum recommended amount of VCPUs"
974 			" is %d\n", recommended_cpus);
975 	}
976 
977 	kvm->nrcpus = nrcpus;
978 
979 	/* Alloc one pointer too many, so array ends up 0-terminated */
980 	kvm_cpus = calloc(nrcpus + 1, sizeof(void *));
981 	if (!kvm_cpus)
982 		die("Couldn't allocate array for %d CPUs", nrcpus);
983 
984 	irq__init(kvm);
985 
986 	pci__init();
987 
988 	/*
989 	 * vidmode should be either specified
990 	 * either set by default
991 	 */
992 	if (vnc || sdl) {
993 		if (vidmode == -1)
994 			vidmode = 0x312;
995 	} else
996 		vidmode = 0;
997 
998 	memset(real_cmdline, 0, sizeof(real_cmdline));
999 	kvm__arch_set_cmdline(real_cmdline, vnc || sdl);
1000 
1001 	if (strlen(real_cmdline) > 0)
1002 		strcat(real_cmdline, " ");
1003 
1004 	if (kernel_cmdline)
1005 		strlcat(real_cmdline, kernel_cmdline, sizeof(real_cmdline));
1006 
1007 	if (!using_rootfs && !image_filename[0] && !initrd_filename) {
1008 		char tmp[PATH_MAX];
1009 
1010 		kvm_setup_create_new(custom_rootfs_name);
1011 		kvm_setup_resolv(custom_rootfs_name);
1012 
1013 		snprintf(tmp, PATH_MAX, "%s%s", kvm__get_dir(), "default");
1014 		if (virtio_9p__register(kvm, tmp, "/dev/root") < 0)
1015 			die("Unable to initialize virtio 9p");
1016 		if (virtio_9p__register(kvm, "/", "hostfs") < 0)
1017 			die("Unable to initialize virtio 9p");
1018 		using_rootfs = custom_rootfs = 1;
1019 	}
1020 
1021 	if (using_rootfs) {
1022 		strcat(real_cmdline, " root=/dev/root rw rootflags=rw,trans=virtio,version=9p2000.L rootfstype=9p");
1023 		if (custom_rootfs) {
1024 			kvm_run_set_sandbox();
1025 
1026 			strcat(real_cmdline, " init=/virt/init");
1027 
1028 			if (!no_dhcp)
1029 				strcat(real_cmdline, "  ip=dhcp");
1030 			if (kvm_custom_stage2())
1031 				die("Failed linking stage 2 of init.");
1032 		}
1033 	} else if (!strstr(real_cmdline, "root=")) {
1034 		strlcat(real_cmdline, " root=/dev/vda rw ", sizeof(real_cmdline));
1035 	}
1036 
1037 	if (image_count) {
1038 		kvm->nr_disks = image_count;
1039 		kvm->disks    = disk_image__open_all(image_filename, readonly_image, image_count);
1040 		if (!kvm->disks)
1041 			die("Unable to load all disk images.");
1042 
1043 		virtio_blk__init_all(kvm);
1044 	}
1045 
1046 	printf("  # kvm run -k %s -m %Lu -c %d --name %s\n", kernel_filename, ram_size / 1024 / 1024, nrcpus, guest_name);
1047 
1048 	if (!kvm__load_kernel(kvm, kernel_filename, initrd_filename,
1049 				real_cmdline, vidmode))
1050 		die("unable to load kernel %s", kernel_filename);
1051 
1052 	kvm->vmlinux		= vmlinux_filename;
1053 
1054 	ioport__setup_arch();
1055 
1056 	rtc__init();
1057 
1058 	serial8250__init(kvm);
1059 
1060 	if (active_console == CONSOLE_VIRTIO)
1061 		virtio_console__init(kvm);
1062 
1063 	if (virtio_rng)
1064 		virtio_rng__init(kvm);
1065 
1066 	if (balloon)
1067 		virtio_bln__init(kvm);
1068 
1069 	if (!network)
1070 		network = DEFAULT_NETWORK;
1071 
1072 	virtio_9p__init(kvm);
1073 
1074 	for (i = 0; i < num_net_devices; i++) {
1075 		net_params[i].kvm = kvm;
1076 		virtio_net__init(&net_params[i]);
1077 	}
1078 
1079 	if (num_net_devices == 0 && no_net == 0) {
1080 		struct virtio_net_params net_params;
1081 
1082 		net_params = (struct virtio_net_params) {
1083 			.guest_ip	= guest_ip,
1084 			.host_ip	= host_ip,
1085 			.kvm		= kvm,
1086 			.script		= script,
1087 			.mode		= NET_MODE_USER,
1088 		};
1089 		str_to_mac(guest_mac, net_params.guest_mac);
1090 		str_to_mac(host_mac, net_params.host_mac);
1091 
1092 		virtio_net__init(&net_params);
1093 	}
1094 
1095 	kvm__init_ram(kvm);
1096 
1097 #ifdef CONFIG_X86
1098 	kbd__init(kvm);
1099 #endif
1100 
1101 	pci_shmem__init(kvm);
1102 
1103 	if (vnc || sdl)
1104 		fb = vesa__init(kvm);
1105 
1106 	if (vnc) {
1107 		if (fb)
1108 			vnc__init(fb);
1109 	}
1110 
1111 	if (sdl) {
1112 		if (fb)
1113 			sdl__init(fb);
1114 	}
1115 
1116 	fb__start();
1117 
1118 	/* Device init all done; firmware init must
1119 	 * come after this (it may set up device trees etc.)
1120 	 */
1121 
1122 	kvm__start_timer(kvm);
1123 
1124 	kvm__arch_setup_firmware(kvm);
1125 
1126 	for (i = 0; i < nrcpus; i++) {
1127 		kvm_cpus[i] = kvm_cpu__init(kvm, i);
1128 		if (!kvm_cpus[i])
1129 			die("unable to initialize KVM VCPU");
1130 	}
1131 
1132 	thread_pool__init(nr_online_cpus);
1133 	ioeventfd__start();
1134 
1135 	for (i = 0; i < nrcpus; i++) {
1136 		if (pthread_create(&kvm_cpus[i]->thread, NULL, kvm_cpu_thread, kvm_cpus[i]) != 0)
1137 			die("unable to create KVM VCPU thread");
1138 	}
1139 
1140 	/* Only VCPU #0 is going to exit by itself when shutting down */
1141 	if (pthread_join(kvm_cpus[0]->thread, &ret) != 0)
1142 		exit_code = 1;
1143 
1144 	for (i = 1; i < nrcpus; i++) {
1145 		if (kvm_cpus[i]->is_running) {
1146 			pthread_kill(kvm_cpus[i]->thread, SIGKVMEXIT);
1147 			if (pthread_join(kvm_cpus[i]->thread, &ret) != 0)
1148 				die("pthread_join");
1149 		}
1150 		if (ret != NULL)
1151 			exit_code = 1;
1152 	}
1153 
1154 	compat__print_all_messages();
1155 
1156 	fb__stop();
1157 
1158 	virtio_blk__delete_all(kvm);
1159 	virtio_rng__delete_all(kvm);
1160 
1161 	disk_image__close_all(kvm->disks, image_count);
1162 	kvm__delete(kvm);
1163 
1164 	if (!exit_code)
1165 		printf("\n  # KVM session ended normally.\n");
1166 
1167 	return exit_code;
1168 }
1169