libkvm/common/kvm.c

65 fail(kvm_t *kd, const char *err, const char *message, ...)
70 	if (err || (kd && kd->kvm_debug)) {
76 	if (kd != NULL)
77 		(void) kvm_close(kd);
86 	kvm_t *kd;
90 	if ((kd = calloc(1, sizeof (kvm_t))) == NULL)
93 	kd->kvm_corefd = kd->kvm_kmemfd = kd->kvm_memfd = -1;
94 	kd->kvm_debug = getenv("KVM_DEBUG");
96 	if ((kd->kvm_openflag = flag) != O_RDONLY && flag != O_RDWR)
97 		return (fail(kd, err, "illegal flag 0x%x to kvm_open()", flag));
103 		return (fail(kd, err, "cannot stat %s", corefile));
107 			return (fail(kd, err, "cannot stat /dev/mem"));
110 			return (fail(kd, err, "cannot stat /dev/kmem"));
113 			return (fail(kd, err, "cannot stat /dev/allkmem"));
120 			if ((kd->kvm_kmemfd = open64(kmem, flag)) == -1)
121 				return (fail(kd, err, "cannot open %s", kmem));
122 			if ((kd->kvm_memfd = open64("/dev/mem", flag)) == -1)
123 				return (fail(kd, err, "cannot open /dev/mem"));
126 		if ((kd->kvm_corefd = open64(corefile, flag)) == -1)
127 			return (fail(kd, err, "cannot open %s", corefile));
128 		if (pread64(kd->kvm_corefd, &kd->kvm_dump,
129 		    sizeof (kd->kvm_dump), 0) != sizeof (kd->kvm_dump))
130 			return (fail(kd, err, "cannot read dump header"));
131 		if (kd->kvm_dump.dump_magic != DUMP_MAGIC)
132 			return (fail(kd, err, "%s is not a kernel core file "
134 			    kd->kvm_dump.dump_magic));
135 		if (kd->kvm_dump.dump_version != DUMP_VERSION)
136 			return (fail(kd, err,
138 			    DUMP_VERSION, kd->kvm_dump.dump_version));
139 		if (kd->kvm_dump.dump_wordsize != DUMP_WORDSIZE)
140 			return (fail(kd, err, "%s is a %d-bit core file - "
142 			    kd->kvm_dump.dump_wordsize, DUMP_WORDSIZE));
148 		kd->kvm_coremapsize = (size_t)corestat.st_size;
150 		    (kd->kvm_core = mmap64(0, kd->kvm_coremapsize,
151 		    PROT_READ, MAP_SHARED, kd->kvm_corefd, 0)) == MAP_FAILED) {
152 			kd->kvm_coremapsize = kd->kvm_dump.dump_data;
153 			if ((kd->kvm_core = mmap64(0, kd->kvm_coremapsize,
154 			    PROT_READ, MAP_SHARED, kd->kvm_corefd, 0)) ==
156 				return (fail(kd, err, "cannot mmap corefile"));
158 		kd->kvm_map = (void *)(kd->kvm_core + kd->kvm_dump.dump_map);
159 		kd->kvm_pfn = (void *)(kd->kvm_core + kd->kvm_dump.dump_pfn);
165 	(void) strncpy(kd->kvm_namelist, namelist, MAXNAMELEN);
167 	if (kvm_nlist(kd, nl) == -1)
168 		return (fail(kd, err, "%s is not a %d-bit kernel namelist",
171 	kd->kvm_kas = (struct as *)nl[0].n_value;
172 	kd->kvm_practive = (proc_t *)nl[1].n_value;
174 	(void) kvm_setproc(kd);
175 	return (kd);
179 kvm_close(kvm_t *kd)
181 	if (kd->kvm_core != NULL && kd->kvm_core != MAP_FAILED)
182 		(void) munmap(kd->kvm_core, kd->kvm_coremapsize);
183 	if (kd->kvm_corefd != -1)
184 		(void) close(kd->kvm_corefd);
185 	if (kd->kvm_kmemfd != -1)
186 		(void) close(kd->kvm_kmemfd);
187 	if (kd->kvm_memfd != -1)
188 		(void) close(kd->kvm_memfd);
189 	free(kd);
194 kvm_nlist(kvm_t *kd, struct nlist nl[])
196 	return (nlist(kd->kvm_namelist, nl));
200 kvm_lookup(kvm_t *kd, struct as *as, uint64_t addr)
202 	uintptr_t pageoff = addr & (kd->kvm_dump.dump_pagesize - 1);
206 	if (kd->kvm_debug)
211 		long last = kd->kvm_dump.dump_npages - 1;
212 		pfn_t target = (pfn_t)(page >> kd->kvm_dump.dump_pageshift);
215 			pfn_t pfn = kd->kvm_pfn[middle];
216 			if (kd->kvm_debug)
219 				off = kd->kvm_dump.dump_data + pageoff +
221 				    kd->kvm_dump.dump_pageshift);
230 		long hash = DUMP_HASH(&kd->kvm_dump, as, page);
231 		off = kd->kvm_map[hash].dm_first;
233 			dump_map_t *dmp = (void *)(kd->kvm_core + off);
234 			if (kd->kvm_debug)
236 			if (dmp < kd->kvm_map ||
237 			    dmp > kd->kvm_map + kd->kvm_dump.dump_hashmask ||
239 			    DUMP_HASH(&kd->kvm_dump, dmp->dm_as, dmp->dm_va) !=
241 				if (kd->kvm_debug)
252 	if (kd->kvm_debug)
258 kvm_rw(kvm_t *kd, uint64_t addr, void *buf, size_t size,
270 	if (kd->kvm_core == NULL) {
275 		if (as == kd->kvm_kas)
276 			return (prw(kd->kvm_kmemfd, buf, size, addr));
278 			return (prw(kd->kvm_memfd, buf, size, addr));
280 		(void) sprintf(procbuf, "/proc/%ld/as", kd->kvm_pid);
281 		if ((procfd = open64(procbuf, kd->kvm_openflag)) == -1)
289 		uintptr_t pageoff = addr & (kd->kvm_dump.dump_pagesize - 1);
290 		ssize_t len = MIN(resid, kd->kvm_dump.dump_pagesize - pageoff);
292 		if ((off = kvm_lookup(kd, as, addr)) == 0)
295 		if (prw == PREAD && off < kd->kvm_coremapsize)
296 			bcopy(kd->kvm_core + off, buf, len);
297 		else if ((len = prw(kd->kvm_corefd, buf, len, off)) <= 0)
307 kvm_read(kvm_t *kd, uintptr_t addr, void *buf, size_t size)
309 	return (kvm_rw(kd, addr, buf, size, kd->kvm_kas, PREAD));
313 kvm_kread(kvm_t *kd, uintptr_t addr, void *buf, size_t size)
315 	return (kvm_rw(kd, addr, buf, size, kd->kvm_kas, PREAD));
319 kvm_uread(kvm_t *kd, uintptr_t addr, void *buf, size_t size)
321 	return (kvm_rw(kd, addr, buf, size, kd->kvm_proc.p_as, PREAD));
325 kvm_aread(kvm_t *kd, uintptr_t addr, void *buf, size_t size, struct as *as)
327 	return (kvm_rw(kd, addr, buf, size, as, PREAD));
331 kvm_pread(kvm_t *kd, uint64_t addr, void *buf, size_t size)
333 	return (kvm_rw(kd, addr, buf, size, NULL, PREAD));
337 kvm_write(kvm_t *kd, uintptr_t addr, const void *buf, size_t size)
339 	return (kvm_rw(kd, addr, (void *)buf, size, kd->kvm_kas, PWRITE));
343 kvm_kwrite(kvm_t *kd, uintptr_t addr, const void *buf, size_t size)
345 	return (kvm_rw(kd, addr, (void *)buf, size, kd->kvm_kas, PWRITE));
349 kvm_uwrite(kvm_t *kd, uintptr_t addr, const void *buf, size_t size)
351 	return (kvm_rw(kd, addr, (void *)buf, size, kd->kvm_proc.p_as, PWRITE));
355 kvm_awrite(kvm_t *kd, uintptr_t addr, const void *buf, size_t size,
358 	return (kvm_rw(kd, addr, (void *)buf, size, as, PWRITE));
362 kvm_pwrite(kvm_t *kd, uint64_t addr, const void *buf, size_t size)
364 	return (kvm_rw(kd, addr, (void *)buf, size, NULL, PWRITE));
368 kvm_physaddr(kvm_t *kd, struct as *as, uintptr_t addr)
373 	if (kd->kvm_core == NULL) {
376 		if (ioctl(kd->kvm_kmemfd, MEM_VTOP, &mem_vtop) == 0)
380 		if ((off = kvm_lookup(kd, as, addr)) != 0) {
382 			    (u_offset_t)(off - kd->kvm_dump.dump_data) >>
383 			    kd->kvm_dump.dump_pageshift;
384 			return (((uint64_t)kd->kvm_pfn[pfn_index] <<
385 			    kd->kvm_dump.dump_pageshift) +
386 			    (addr & (kd->kvm_dump.dump_pagesize - 1)));
393 kvm_getproc(kvm_t *kd, pid_t pid)
395 	(void) kvm_setproc(kd);
396 	while (kvm_nextproc(kd) != NULL)
397 		if (kd->kvm_pid == pid)
398 			return (&kd->kvm_proc);
403 kvm_nextproc(kvm_t *kd)
405 	if (kd->kvm_proc.p_next == NULL ||
406 	    kvm_kread(kd, (uintptr_t)kd->kvm_proc.p_next,
407 	    &kd->kvm_proc, sizeof (proc_t)) != sizeof (proc_t) ||
408 	    kvm_kread(kd, (uintptr_t)&kd->kvm_proc.p_pidp->pid_id,
409 	    &kd->kvm_pid, sizeof (pid_t)) != sizeof (pid_t))
412 	return (&kd->kvm_proc);
416 kvm_setproc(kvm_t *kd)
418 	(void) kvm_kread(kd, (uintptr_t)kd->kvm_practive,
419 	    &kd->kvm_proc.p_next, sizeof (proc_t *));
420 	kd->kvm_pid = -1;
426 kvm_getu(kvm_t *kd, struct proc *p)