xref: /kvmtool/builtin-run.c (revision a9e28b5813a19ac2729bd456e5460f3f1308ade3)
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 (WARN_ON(len))
511 		return;
512 
513 	if (type == KVM_IPC_RESUME && is_paused) {
514 		kvm->vm_state = KVM_VMSTATE_RUNNING;
515 		kvm__continue();
516 	} else if (type == KVM_IPC_PAUSE && !is_paused) {
517 		kvm->vm_state = KVM_VMSTATE_PAUSED;
518 		kvm__pause();
519 	} else {
520 		return;
521 	}
522 
523 	is_paused = !is_paused;
524 }
525 
526 static void handle_vmstate(int fd, u32 type, u32 len, u8 *msg)
527 {
528 	int r = 0;
529 
530 	if (type == KVM_IPC_VMSTATE)
531 		r = write(fd, &kvm->vm_state, sizeof(kvm->vm_state));
532 
533 	if (r < 0)
534 		pr_warning("Failed sending VMSTATE");
535 }
536 
537 static void handle_debug(int fd, u32 type, u32 len, u8 *msg)
538 {
539 	int i;
540 	struct debug_cmd_params *params;
541 	u32 dbg_type;
542 	u32 vcpu;
543 
544 	if (WARN_ON(type != KVM_IPC_DEBUG || len != sizeof(*params)))
545 		return;
546 
547 	params = (void *)msg;
548 	dbg_type = params->dbg_type;
549 	vcpu = params->cpu;
550 
551 	if (dbg_type & KVM_DEBUG_CMD_TYPE_NMI) {
552 		if ((int)vcpu >= kvm->nrcpus)
553 			return;
554 
555 		kvm_cpus[vcpu]->needs_nmi = 1;
556 		pthread_kill(kvm_cpus[vcpu]->thread, SIGUSR1);
557 	}
558 
559 	if (!(dbg_type & KVM_DEBUG_CMD_TYPE_DUMP))
560 		return;
561 
562 	for (i = 0; i < nrcpus; i++) {
563 		struct kvm_cpu *cpu = kvm_cpus[i];
564 
565 		if (!cpu)
566 			continue;
567 
568 		printout_done = 0;
569 
570 		kvm_cpu__set_debug_fd(fd);
571 		pthread_kill(cpu->thread, SIGUSR1);
572 		/*
573 		 * Wait for the vCPU to dump state before signalling
574 		 * the next thread. Since this is debug code it does
575 		 * not matter that we are burning CPU time a bit:
576 		 */
577 		while (!printout_done)
578 			mb();
579 	}
580 
581 	close(fd);
582 
583 	serial8250__inject_sysrq(kvm);
584 }
585 
586 static void handle_sigalrm(int sig)
587 {
588 	kvm__arch_periodic_poll(kvm);
589 }
590 
591 static void handle_stop(int fd, u32 type, u32 len, u8 *msg)
592 {
593 	if (WARN_ON(type != KVM_IPC_STOP || len))
594 		return;
595 
596 	kvm_cpu__reboot();
597 }
598 
599 static void *kvm_cpu_thread(void *arg)
600 {
601 	current_kvm_cpu		= arg;
602 
603 	if (kvm_cpu__start(current_kvm_cpu))
604 		goto panic_kvm;
605 
606 	kvm_cpu__delete(current_kvm_cpu);
607 
608 	return (void *) (intptr_t) 0;
609 
610 panic_kvm:
611 	fprintf(stderr, "KVM exit reason: %u (\"%s\")\n",
612 		current_kvm_cpu->kvm_run->exit_reason,
613 		kvm_exit_reasons[current_kvm_cpu->kvm_run->exit_reason]);
614 	if (current_kvm_cpu->kvm_run->exit_reason == KVM_EXIT_UNKNOWN)
615 		fprintf(stderr, "KVM exit code: 0x%Lu\n",
616 			current_kvm_cpu->kvm_run->hw.hardware_exit_reason);
617 
618 	kvm_cpu__set_debug_fd(STDOUT_FILENO);
619 	kvm_cpu__show_registers(current_kvm_cpu);
620 	kvm_cpu__show_code(current_kvm_cpu);
621 	kvm_cpu__show_page_tables(current_kvm_cpu);
622 
623 	kvm_cpu__delete(current_kvm_cpu);
624 
625 	return (void *) (intptr_t) 1;
626 }
627 
628 static char kernel[PATH_MAX];
629 
630 static const char *host_kernels[] = {
631 	"/boot/vmlinuz",
632 	"/boot/bzImage",
633 	NULL
634 };
635 
636 static const char *default_kernels[] = {
637 	"./bzImage",
638 	"../../arch/" BUILD_ARCH "/boot/bzImage",
639 	NULL
640 };
641 
642 static const char *default_vmlinux[] = {
643 	"../../../vmlinux",
644 	"../../vmlinux",
645 	NULL
646 };
647 
648 static void kernel_usage_with_options(void)
649 {
650 	const char **k;
651 	struct utsname uts;
652 
653 	fprintf(stderr, "Fatal: could not find default kernel image in:\n");
654 	k = &default_kernels[0];
655 	while (*k) {
656 		fprintf(stderr, "\t%s\n", *k);
657 		k++;
658 	}
659 
660 	if (uname(&uts) < 0)
661 		return;
662 
663 	k = &host_kernels[0];
664 	while (*k) {
665 		if (snprintf(kernel, PATH_MAX, "%s-%s", *k, uts.release) < 0)
666 			return;
667 		fprintf(stderr, "\t%s\n", kernel);
668 		k++;
669 	}
670 	fprintf(stderr, "\nPlease see '%s run --help' for more options.\n\n",
671 		KVM_BINARY_NAME);
672 }
673 
674 static u64 host_ram_size(void)
675 {
676 	long page_size;
677 	long nr_pages;
678 
679 	nr_pages	= sysconf(_SC_PHYS_PAGES);
680 	if (nr_pages < 0) {
681 		pr_warning("sysconf(_SC_PHYS_PAGES) failed");
682 		return 0;
683 	}
684 
685 	page_size	= sysconf(_SC_PAGE_SIZE);
686 	if (page_size < 0) {
687 		pr_warning("sysconf(_SC_PAGE_SIZE) failed");
688 		return 0;
689 	}
690 
691 	return (nr_pages * page_size) >> MB_SHIFT;
692 }
693 
694 /*
695  * If user didn't specify how much memory it wants to allocate for the guest,
696  * avoid filling the whole host RAM.
697  */
698 #define RAM_SIZE_RATIO		0.8
699 
700 static u64 get_ram_size(int nr_cpus)
701 {
702 	u64 available;
703 	u64 ram_size;
704 
705 	ram_size	= 64 * (nr_cpus + 3);
706 
707 	available	= host_ram_size() * RAM_SIZE_RATIO;
708 	if (!available)
709 		available = MIN_RAM_SIZE_MB;
710 
711 	if (ram_size > available)
712 		ram_size	= available;
713 
714 	return ram_size;
715 }
716 
717 static const char *find_kernel(void)
718 {
719 	const char **k;
720 	struct stat st;
721 	struct utsname uts;
722 
723 	k = &default_kernels[0];
724 	while (*k) {
725 		if (stat(*k, &st) < 0 || !S_ISREG(st.st_mode)) {
726 			k++;
727 			continue;
728 		}
729 		strncpy(kernel, *k, PATH_MAX);
730 		return kernel;
731 	}
732 
733 	if (uname(&uts) < 0)
734 		return NULL;
735 
736 	k = &host_kernels[0];
737 	while (*k) {
738 		if (snprintf(kernel, PATH_MAX, "%s-%s", *k, uts.release) < 0)
739 			return NULL;
740 
741 		if (stat(kernel, &st) < 0 || !S_ISREG(st.st_mode)) {
742 			k++;
743 			continue;
744 		}
745 		return kernel;
746 
747 	}
748 	return NULL;
749 }
750 
751 static const char *find_vmlinux(void)
752 {
753 	const char **vmlinux;
754 
755 	vmlinux = &default_vmlinux[0];
756 	while (*vmlinux) {
757 		struct stat st;
758 
759 		if (stat(*vmlinux, &st) < 0 || !S_ISREG(st.st_mode)) {
760 			vmlinux++;
761 			continue;
762 		}
763 		return *vmlinux;
764 	}
765 	return NULL;
766 }
767 
768 void kvm_run_help(void)
769 {
770 	usage_with_options(run_usage, options);
771 }
772 
773 static int kvm_custom_stage2(void)
774 {
775 	char tmp[PATH_MAX], dst[PATH_MAX], *src;
776 	const char *rootfs = custom_rootfs_name;
777 	int r;
778 
779 	src = realpath("guest/init_stage2", NULL);
780 	if (src == NULL)
781 		return -ENOMEM;
782 
783 	snprintf(tmp, PATH_MAX, "%s%s/virt/init_stage2", kvm__get_dir(), rootfs);
784 	remove(tmp);
785 
786 	snprintf(dst, PATH_MAX, "/host/%s", src);
787 	r = symlink(dst, tmp);
788 	free(src);
789 
790 	return r;
791 }
792 
793 static int kvm_run_set_sandbox(void)
794 {
795 	const char *guestfs_name = custom_rootfs_name;
796 	char path[PATH_MAX], script[PATH_MAX], *tmp;
797 
798 	snprintf(path, PATH_MAX, "%s%s/virt/sandbox.sh", kvm__get_dir(), guestfs_name);
799 
800 	remove(path);
801 
802 	if (sandbox == NULL)
803 		return 0;
804 
805 	tmp = realpath(sandbox, NULL);
806 	if (tmp == NULL)
807 		return -ENOMEM;
808 
809 	snprintf(script, PATH_MAX, "/host/%s", tmp);
810 	free(tmp);
811 
812 	return symlink(script, path);
813 }
814 
815 static void kvm_write_sandbox_cmd_exactly(int fd, const char *arg)
816 {
817 	const char *single_quote;
818 
819 	if (!*arg) { /* zero length string */
820 		if (write(fd, "''", 2) <= 0)
821 			die("Failed writing sandbox script");
822 		return;
823 	}
824 
825 	while (*arg) {
826 		single_quote = strchrnul(arg, '\'');
827 
828 		/* write non-single-quote string as #('string') */
829 		if (arg != single_quote) {
830 			if (write(fd, "'", 1) <= 0 ||
831 			    write(fd, arg, single_quote - arg) <= 0 ||
832 			    write(fd, "'", 1) <= 0)
833 				die("Failed writing sandbox script");
834 		}
835 
836 		/* write single quote as #("'") */
837 		if (*single_quote) {
838 			if (write(fd, "\"'\"", 3) <= 0)
839 				die("Failed writing sandbox script");
840 		} else
841 			break;
842 
843 		arg = single_quote + 1;
844 	}
845 }
846 
847 static void kvm_run_write_sandbox_cmd(const char **argv, int argc)
848 {
849 	const char script_hdr[] = "#! /bin/bash\n\n";
850 	int fd;
851 
852 	remove(sandbox);
853 
854 	fd = open(sandbox, O_RDWR | O_CREAT, 0777);
855 	if (fd < 0)
856 		die("Failed creating sandbox script");
857 
858 	if (write(fd, script_hdr, sizeof(script_hdr) - 1) <= 0)
859 		die("Failed writing sandbox script");
860 
861 	while (argc) {
862 		kvm_write_sandbox_cmd_exactly(fd, argv[0]);
863 		if (argc - 1)
864 			if (write(fd, " ", 1) <= 0)
865 				die("Failed writing sandbox script");
866 		argv++;
867 		argc--;
868 	}
869 	if (write(fd, "\n", 1) <= 0)
870 		die("Failed writing sandbox script");
871 
872 	close(fd);
873 }
874 
875 int kvm_cmd_run(int argc, const char **argv, const char *prefix)
876 {
877 	static char real_cmdline[2048], default_name[20];
878 	struct framebuffer *fb = NULL;
879 	unsigned int nr_online_cpus;
880 	int exit_code = 0;
881 	int max_cpus, recommended_cpus;
882 	int i;
883 	void *ret;
884 
885 	signal(SIGALRM, handle_sigalrm);
886 	kvm_ipc__register_handler(KVM_IPC_DEBUG, handle_debug);
887 	signal(SIGUSR1, handle_sigusr1);
888 	kvm_ipc__register_handler(KVM_IPC_PAUSE, handle_pause);
889 	kvm_ipc__register_handler(KVM_IPC_RESUME, handle_pause);
890 	kvm_ipc__register_handler(KVM_IPC_STOP, handle_stop);
891 	kvm_ipc__register_handler(KVM_IPC_VMSTATE, handle_vmstate);
892 
893 	nr_online_cpus = sysconf(_SC_NPROCESSORS_ONLN);
894 
895 	while (argc != 0) {
896 		argc = parse_options(argc, argv, options, run_usage,
897 				PARSE_OPT_STOP_AT_NON_OPTION |
898 				PARSE_OPT_KEEP_DASHDASH);
899 		if (argc != 0) {
900 			/* Cusrom options, should have been handled elsewhere */
901 			if (strcmp(argv[0], "--") == 0) {
902 				if (kvm_run_wrapper == KVM_RUN_SANDBOX) {
903 					sandbox = DEFAULT_SANDBOX_FILENAME;
904 					kvm_run_write_sandbox_cmd(argv+1, argc-1);
905 					break;
906 				}
907 			}
908 
909 			if (kernel_filename) {
910 				fprintf(stderr, "Cannot handle parameter: "
911 						"%s\n", argv[0]);
912 				usage_with_options(run_usage, options);
913 				return EINVAL;
914 			}
915 			/* first unhandled parameter is treated as a kernel
916 			   image
917 			 */
918 			kernel_filename = argv[0];
919 			argv++;
920 			argc--;
921 		}
922 
923 	}
924 
925 	if (!kernel_filename)
926 		kernel_filename = find_kernel();
927 
928 	if (!kernel_filename) {
929 		kernel_usage_with_options();
930 		return EINVAL;
931 	}
932 
933 	vmlinux_filename = find_vmlinux();
934 
935 	if (nrcpus == 0)
936 		nrcpus = nr_online_cpus;
937 
938 	if (!ram_size)
939 		ram_size	= get_ram_size(nrcpus);
940 
941 	if (ram_size < MIN_RAM_SIZE_MB)
942 		die("Not enough memory specified: %lluMB (min %lluMB)", ram_size, MIN_RAM_SIZE_MB);
943 
944 	if (ram_size > host_ram_size())
945 		pr_warning("Guest memory size %lluMB exceeds host physical RAM size %lluMB", ram_size, host_ram_size());
946 
947 	ram_size <<= MB_SHIFT;
948 
949 	if (!dev)
950 		dev = DEFAULT_KVM_DEV;
951 
952 	if (!console)
953 		console = DEFAULT_CONSOLE;
954 
955 	if (!strncmp(console, "virtio", 6))
956 		active_console  = CONSOLE_VIRTIO;
957 	else if (!strncmp(console, "serial", 6))
958 		active_console  = CONSOLE_8250;
959 	else if (!strncmp(console, "hv", 2))
960 		active_console = CONSOLE_HV;
961 	else
962 		pr_warning("No console!");
963 
964 	if (!host_ip)
965 		host_ip = DEFAULT_HOST_ADDR;
966 
967 	if (!guest_ip)
968 		guest_ip = DEFAULT_GUEST_ADDR;
969 
970 	if (!guest_mac)
971 		guest_mac = DEFAULT_GUEST_MAC;
972 
973 	if (!host_mac)
974 		host_mac = DEFAULT_HOST_MAC;
975 
976 	if (!script)
977 		script = DEFAULT_SCRIPT;
978 
979 	symbol__init(vmlinux_filename);
980 
981 	term_init();
982 
983 	if (!guest_name) {
984 		sprintf(default_name, "guest-%u", getpid());
985 		guest_name = default_name;
986 	}
987 
988 	kvm = kvm__init(dev, hugetlbfs_path, ram_size, guest_name);
989 
990 	kvm->single_step = single_step;
991 
992 	ioeventfd__init(kvm);
993 
994 	max_cpus = kvm__max_cpus(kvm);
995 	recommended_cpus = kvm__recommended_cpus(kvm);
996 
997 	if (nrcpus > max_cpus) {
998 		printf("  # Limit the number of CPUs to %d\n", max_cpus);
999 		nrcpus = max_cpus;
1000 	} else if (nrcpus > recommended_cpus) {
1001 		printf("  # Warning: The maximum recommended amount of VCPUs"
1002 			" is %d\n", recommended_cpus);
1003 	}
1004 
1005 	kvm->nrcpus = nrcpus;
1006 
1007 	/* Alloc one pointer too many, so array ends up 0-terminated */
1008 	kvm_cpus = calloc(nrcpus + 1, sizeof(void *));
1009 	if (!kvm_cpus)
1010 		die("Couldn't allocate array for %d CPUs", nrcpus);
1011 
1012 	irq__init(kvm);
1013 
1014 	pci__init();
1015 
1016 	/*
1017 	 * vidmode should be either specified
1018 	 * either set by default
1019 	 */
1020 	if (vnc || sdl) {
1021 		if (vidmode == -1)
1022 			vidmode = 0x312;
1023 	} else
1024 		vidmode = 0;
1025 
1026 	memset(real_cmdline, 0, sizeof(real_cmdline));
1027 	kvm__arch_set_cmdline(real_cmdline, vnc || sdl);
1028 
1029 	if (strlen(real_cmdline) > 0)
1030 		strcat(real_cmdline, " ");
1031 
1032 	if (kernel_cmdline)
1033 		strlcat(real_cmdline, kernel_cmdline, sizeof(real_cmdline));
1034 
1035 	if (!using_rootfs && !image_filename[0] && !initrd_filename) {
1036 		char tmp[PATH_MAX];
1037 
1038 		kvm_setup_create_new(custom_rootfs_name);
1039 		kvm_setup_resolv(custom_rootfs_name);
1040 
1041 		snprintf(tmp, PATH_MAX, "%s%s", kvm__get_dir(), "default");
1042 		if (virtio_9p__register(kvm, tmp, "/dev/root") < 0)
1043 			die("Unable to initialize virtio 9p");
1044 		if (virtio_9p__register(kvm, "/", "hostfs") < 0)
1045 			die("Unable to initialize virtio 9p");
1046 		using_rootfs = custom_rootfs = 1;
1047 	}
1048 
1049 	if (using_rootfs) {
1050 		strcat(real_cmdline, " root=/dev/root rw rootflags=rw,trans=virtio,version=9p2000.L rootfstype=9p");
1051 		if (custom_rootfs) {
1052 			kvm_run_set_sandbox();
1053 
1054 			strcat(real_cmdline, " init=/virt/init");
1055 
1056 			if (!no_dhcp)
1057 				strcat(real_cmdline, "  ip=dhcp");
1058 			if (kvm_custom_stage2())
1059 				die("Failed linking stage 2 of init.");
1060 		}
1061 	} else if (!strstr(real_cmdline, "root=")) {
1062 		strlcat(real_cmdline, " root=/dev/vda rw ", sizeof(real_cmdline));
1063 	}
1064 
1065 	if (image_count) {
1066 		kvm->nr_disks = image_count;
1067 		kvm->disks    = disk_image__open_all(image_filename, readonly_image, image_count);
1068 		if (!kvm->disks)
1069 			die("Unable to load all disk images.");
1070 
1071 		virtio_blk__init_all(kvm);
1072 	}
1073 
1074 	printf("  # %s run -k %s -m %Lu -c %d --name %s\n", KVM_BINARY_NAME,
1075 		kernel_filename, ram_size / 1024 / 1024, nrcpus, guest_name);
1076 
1077 	if (!kvm__load_kernel(kvm, kernel_filename, initrd_filename,
1078 				real_cmdline, vidmode))
1079 		die("unable to load kernel %s", kernel_filename);
1080 
1081 	kvm->vmlinux		= vmlinux_filename;
1082 
1083 	ioport__setup_arch();
1084 
1085 	rtc__init();
1086 
1087 	serial8250__init(kvm);
1088 
1089 	if (active_console == CONSOLE_VIRTIO)
1090 		virtio_console__init(kvm);
1091 
1092 	if (virtio_rng)
1093 		virtio_rng__init(kvm);
1094 
1095 	if (balloon)
1096 		virtio_bln__init(kvm);
1097 
1098 	if (!network)
1099 		network = DEFAULT_NETWORK;
1100 
1101 	virtio_9p__init(kvm);
1102 
1103 	for (i = 0; i < num_net_devices; i++) {
1104 		net_params[i].kvm = kvm;
1105 		virtio_net__init(&net_params[i]);
1106 	}
1107 
1108 	if (num_net_devices == 0 && no_net == 0) {
1109 		struct virtio_net_params net_params;
1110 
1111 		net_params = (struct virtio_net_params) {
1112 			.guest_ip	= guest_ip,
1113 			.host_ip	= host_ip,
1114 			.kvm		= kvm,
1115 			.script		= script,
1116 			.mode		= NET_MODE_USER,
1117 		};
1118 		str_to_mac(guest_mac, net_params.guest_mac);
1119 		str_to_mac(host_mac, net_params.host_mac);
1120 
1121 		virtio_net__init(&net_params);
1122 	}
1123 
1124 	kvm__init_ram(kvm);
1125 
1126 #ifdef CONFIG_X86
1127 	kbd__init(kvm);
1128 #endif
1129 
1130 	pci_shmem__init(kvm);
1131 
1132 	if (vnc || sdl)
1133 		fb = vesa__init(kvm);
1134 
1135 	if (vnc) {
1136 		if (fb)
1137 			vnc__init(fb);
1138 	}
1139 
1140 	if (sdl) {
1141 		if (fb)
1142 			sdl__init(fb);
1143 	}
1144 
1145 	fb__start();
1146 
1147 	/* Device init all done; firmware init must
1148 	 * come after this (it may set up device trees etc.)
1149 	 */
1150 
1151 	kvm__start_timer(kvm);
1152 
1153 	exit_code = kvm__arch_setup_firmware(kvm);
1154 	if (exit_code)
1155 		goto err;
1156 
1157 	for (i = 0; i < nrcpus; i++) {
1158 		kvm_cpus[i] = kvm_cpu__init(kvm, i);
1159 		if (!kvm_cpus[i])
1160 			die("unable to initialize KVM VCPU");
1161 	}
1162 
1163 	thread_pool__init(nr_online_cpus);
1164 	ioeventfd__start();
1165 
1166 	for (i = 0; i < nrcpus; i++) {
1167 		if (pthread_create(&kvm_cpus[i]->thread, NULL, kvm_cpu_thread, kvm_cpus[i]) != 0)
1168 			die("unable to create KVM VCPU thread");
1169 	}
1170 
1171 	/* Only VCPU #0 is going to exit by itself when shutting down */
1172 	if (pthread_join(kvm_cpus[0]->thread, &ret) != 0)
1173 		exit_code = 1;
1174 
1175 	for (i = 1; i < nrcpus; i++) {
1176 		if (kvm_cpus[i]->is_running) {
1177 			pthread_kill(kvm_cpus[i]->thread, SIGKVMEXIT);
1178 			if (pthread_join(kvm_cpus[i]->thread, &ret) != 0)
1179 				die("pthread_join");
1180 		}
1181 		if (ret != NULL)
1182 			exit_code = 1;
1183 	}
1184 
1185 err:
1186 	compat__print_all_messages();
1187 
1188 	fb__stop();
1189 
1190 	virtio_blk__delete_all(kvm);
1191 	virtio_rng__delete_all(kvm);
1192 
1193 	disk_image__close_all(kvm->disks, image_count);
1194 	kvm__delete(kvm);
1195 
1196 	if (!exit_code)
1197 		printf("\n  # KVM session ended normally.\n");
1198 
1199 	return exit_code;
1200 }
1201