netbsd32_core.c revision 1.1 
1/*	$NetBSD: netbsd32_core.c,v 1.1 2001/12/08 00:35:27 thorpej Exp $	*/
2
3/*
4 * Copyright (c) 1997 Charles D. Cranor and Washington University.
5 * Copyright (c) 1991, 1993 The Regents of the University of California.
6 * Copyright (c) 1988 University of Utah.
7 *
8 * All rights reserved.
9 *
10 * This code is derived from software contributed to Berkeley by
11 * the Systems Programming Group of the University of Utah Computer
12 * Science Department.
13 *
14 * Redistribution and use in source and binary forms, with or without
15 * modification, are permitted provided that the following conditions
16 * are met:
17 * 1. Redistributions of source code must retain the above copyright
18 *    notice, this list of conditions and the following disclaimer.
19 * 2. Redistributions in binary form must reproduce the above copyright
20 *    notice, this list of conditions and the following disclaimer in the
21 *    documentation and/or other materials provided with the distribution.
22 * 3. All advertising materials mentioning features or use of this software
23 *    must display the following acknowledgement:
24 *      This product includes software developed by Charles D. Cranor,
25 *	Washington University, the University of California, Berkeley and
26 *	its contributors.
27 * 4. Neither the name of the University nor the names of its contributors
28 *    may be used to endorse or promote products derived from this software
29 *    without specific prior written permission.
30 *
31 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
32 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
33 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
34 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
35 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
39 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
40 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 * SUCH DAMAGE.
42 *
43 * from: Utah $Hdr: vm_unix.c 1.1 89/11/07$
44 *      @(#)vm_unix.c   8.1 (Berkeley) 6/11/93
45 * from: NetBSD: uvm_unix.c,v 1.25 2001/11/10 07:37:01 lukem Exp
46 */
47
48/*
49 * netbsd32_core.c: Support for the historic NetBSD core file format,
50 * 32-bit version.
51 */
52
53#include <sys/cdefs.h>
54__KERNEL_RCSID(0, "$NetBSD: netbsd32_core.c,v 1.1 2001/12/08 00:35:27 thorpej Exp $");
55
56#include <sys/param.h>
57#include <sys/systm.h>
58#include <sys/proc.h>
59#include <sys/vnode.h>
60#include <sys/core.h>
61
62#include <uvm/uvm.h>
63
64int
65coredump_netbsd32(struct proc *p, struct vnode *vp, struct ucred *cred)
66{
67	struct core32 core;
68	struct coreseg32 cseg;
69	struct vmspace *vm = p->p_vmspace;
70	struct vm_map *map = &vm->vm_map;
71	struct vm_map_entry *entry;
72	vaddr_t start, end, maxstack;
73	off_t offset;
74	int flag, error;
75
76	core.c_midmag = 0;
77	strncpy(core.c_name, p->p_comm, MAXCOMLEN);
78	core.c_nseg = 0;
79	core.c_signo = p->p_sigctx.ps_sig;
80	core.c_ucode = p->p_sigctx.ps_code;
81	core.c_cpusize = 0;
82	core.c_tsize = (u_long)ctob(vm->vm_tsize);
83	core.c_dsize = (u_long)ctob(vm->vm_dsize);
84	core.c_ssize = (u_long)round_page(ctob(vm->vm_ssize));
85	error = cpu_coredump(p, vp, cred, &core);
86	if (error)
87		return (error);
88
89#if 0
90	/*
91	 * XXX
92	 * It would be nice if we at least dumped the signal state (and made it
93	 * available at run time to the debugger, as well), but this code
94	 * hasn't actually had any effect for a long time, since we don't dump
95	 * the user area.  For now, it's dead.
96	 */
97#endif
98
99	offset = core.c_hdrsize + core.c_seghdrsize + core.c_cpusize;
100	maxstack = trunc_page(USRSTACK - ctob(vm->vm_ssize));
101
102	for (entry = map->header.next; entry != &map->header;
103	     entry = entry->next) {
104		/* Should never happen for a user process. */
105		if (UVM_ET_ISSUBMAP(entry))
106			panic("coredump_netbsd: user process with submap?");
107
108		if ((entry->protection & VM_PROT_WRITE) == 0)
109			continue;
110
111		start = entry->start;
112		end = entry->end;
113
114		if (start >= VM_MAXUSER_ADDRESS)
115			continue;
116
117		if (end > VM_MAXUSER_ADDRESS)
118			end = VM_MAXUSER_ADDRESS;
119
120		if (start >= (vaddr_t)vm->vm_maxsaddr) {
121			if (end <= maxstack)
122				continue;
123			if (start < maxstack)
124				start = maxstack;
125			flag = CORE_STACK;
126		} else
127			flag = CORE_DATA;
128
129		/*
130		 * Set up a new core file segment.
131		 */
132		CORE_SETMAGIC(cseg, CORESEGMAGIC, CORE_GETMID(core), flag);
133		cseg.c_addr = start;
134		cseg.c_size = end - start;
135
136		error = vn_rdwr(UIO_WRITE, vp,
137		    (caddr_t)&cseg, core.c_seghdrsize,
138		    offset, UIO_SYSSPACE,
139		    IO_NODELOCKED|IO_UNIT, cred, NULL, p);
140		if (error)
141			return (error);
142
143		offset += core.c_seghdrsize;
144		error = vn_rdwr(UIO_WRITE, vp,
145		    (caddr_t)cseg.c_addr, (int)cseg.c_size,
146		    offset, UIO_USERSPACE,
147		    IO_NODELOCKED|IO_UNIT, cred, NULL, p);
148		if (error)
149			return (error);
150
151		offset += cseg.c_size;
152		core.c_nseg++;
153	}
154
155	/* Now write out the core header. */
156	error = vn_rdwr(UIO_WRITE, vp, (caddr_t)&core,
157	    (int)core.c_hdrsize, (off_t)0,
158	    UIO_SYSSPACE, IO_NODELOCKED|IO_UNIT, cred, NULL, p);
159
160	return (error);
161}
162