xref: /netbsd-src/sys/arch/arm/arm32/stubs.c (revision 8b0f9554ff8762542c4defc4f70e1eb76fb508fa)
1 /*	$NetBSD: stubs.c,v 1.17 2007/03/04 05:59:37 christos Exp $	*/
2 
3 /*
4  * Copyright (c) 1994-1998 Mark Brinicombe.
5  * Copyright (c) 1994 Brini.
6  * All rights reserved.
7  *
8  * This code is derived from software written for Brini by Mark Brinicombe
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *	This product includes software developed by Mark Brinicombe
21  *	for the NetBSD Project.
22  * 4. The name of the company nor the name of the author may be used to
23  *    endorse or promote products derived from this software without specific
24  *    prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
27  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
28  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
29  * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
30  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
31  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
32  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36  * SUCH DAMAGE.
37  *
38  * Routines that are temporary or do not have a home yet.
39  *
40  * Created      : 17/09/94
41  */
42 
43 #include <sys/cdefs.h>
44 __KERNEL_RCSID(0, "$NetBSD: stubs.c,v 1.17 2007/03/04 05:59:37 christos Exp $");
45 
46 #include <sys/param.h>
47 #include <sys/systm.h>
48 #include <sys/errno.h>
49 #include <sys/proc.h>
50 #include <sys/conf.h>
51 #include <sys/msgbuf.h>
52 #include <uvm/uvm_extern.h>
53 #include <machine/cpu.h>
54 #include <machine/intr.h>
55 #include <machine/bootconfig.h>
56 #include <machine/pcb.h>
57 #include <arm/arm32/machdep.h>
58 
59 extern dev_t dumpdev;
60 
61 /*
62  * These variables are needed by /sbin/savecore
63  */
64 u_int32_t dumpmag = 0x8fca0101;	/* magic number */
65 int 	dumpsize = 0;		/* pages */
66 long	dumplo = 0; 		/* blocks */
67 
68 struct pcb dumppcb;
69 
70 /*
71  * This is called by main to set dumplo and dumpsize.
72  * Dumps always skip the first CLBYTES of disk space
73  * in case there might be a disk label stored there.
74  * If there is extra space, put dump at the end to
75  * reduce the chance that swapping trashes it.
76  */
77 
78 void
79 cpu_dumpconf()
80 {
81 	const struct bdevsw *bdev;
82 	int nblks;	/* size of dump area */
83 
84 	if (dumpdev == NODEV)
85 		return;
86 	bdev = bdevsw_lookup(dumpdev);
87 	if (bdev == NULL) {
88 		dumpdev = NODEV;
89 		return;
90 	}
91 	if (bdev->d_psize == NULL)
92 		return;
93 	nblks = (*bdev->d_psize)(dumpdev);
94 	if (nblks <= ctod(1))
95 		return;
96 
97 	dumpsize = physmem;
98 
99 	/* Always skip the first CLBYTES, in case there is a label there. */
100 	if (dumplo < ctod(1))
101 		dumplo = ctod(1);
102 
103 	/* Put dump at end of partition, and make it fit. */
104 	if (dumpsize > dtoc(nblks - dumplo))
105 		dumpsize = dtoc(nblks - dumplo);
106 	if (dumplo < nblks - ctod(dumpsize))
107 		dumplo = nblks - ctod(dumpsize);
108 }
109 
110 /* This should be moved to machdep.c */
111 
112 extern char *memhook;		/* XXX */
113 
114 /*
115  * Doadump comes here after turning off memory management and
116  * getting on the dump stack, either when called above, or by
117  * the auto-restart code.
118  */
119 
120 void
121 dumpsys()
122 {
123 	const struct bdevsw *bdev;
124 	daddr_t blkno;
125 	int psize;
126 	int error;
127 	int addr;
128 	int block;
129 	int len;
130 	vaddr_t dumpspace;
131 
132 	/* Save registers. */
133 	savectx(&dumppcb);
134 	/* flush everything out of caches */
135 	cpu_dcache_wbinv_all();
136 
137 	if (dumpdev == NODEV)
138 		return;
139 	if (dumpsize == 0) {
140 		cpu_dumpconf();
141 		if (dumpsize == 0)
142 			return;
143 	}
144 	if (dumplo <= 0) {
145 		printf("\ndump to dev %u,%u not possible\n", major(dumpdev),
146 		    minor(dumpdev));
147 		return;
148 	}
149 	printf("\ndumping to dev %u,%u offset %ld\n", major(dumpdev),
150 	    minor(dumpdev), dumplo);
151 
152 	blkno = dumplo;
153 	dumpspace = (vaddr_t) memhook;
154 
155 	bdev = bdevsw_lookup(dumpdev);
156 	if (bdev == NULL || bdev->d_psize == NULL)
157 		return;
158 	psize = (*bdev->d_psize)(dumpdev);
159 	printf("dump ");
160 	if (psize == -1) {
161 		printf("area unavailable\n");
162 		return;
163 	}
164 
165 	error = 0;
166 	len = 0;
167 
168 	for (block = 0; block < bootconfig.dramblocks && error == 0; ++block) {
169 		addr = bootconfig.dram[block].address;
170 		for (;addr < (bootconfig.dram[block].address
171 		    + (bootconfig.dram[block].pages * PAGE_SIZE));
172 		     addr += PAGE_SIZE) {
173 		    	if ((len % (1024*1024)) == 0)
174 		    		printf("%d ", len / (1024*1024));
175 			pmap_kenter_pa(dumpspace, addr, VM_PROT_READ);
176 			pmap_update(pmap_kernel());
177 
178 			error = (*bdev->d_dump)(dumpdev,
179 			    blkno, (void *) dumpspace, PAGE_SIZE);
180 			pmap_kremove(dumpspace, PAGE_SIZE);
181 			pmap_update(pmap_kernel());
182 			if (error) break;
183 			blkno += btodb(PAGE_SIZE);
184 			len += PAGE_SIZE;
185 		}
186 	}
187 
188 	switch (error) {
189 	case ENXIO:
190 		printf("device bad\n");
191 		break;
192 
193 	case EFAULT:
194 		printf("device not ready\n");
195 		break;
196 
197 	case EINVAL:
198 		printf("area improper\n");
199 		break;
200 
201 	case EIO:
202 		printf("i/o error\n");
203 		break;
204 
205 	case EINTR:
206 		printf("aborted from console\n");
207 		break;
208 
209 	default:
210 		printf("succeeded\n");
211 		break;
212 	}
213 	printf("\n\n");
214 	delay(1000000);
215 }
216 
217 /* End of stubs.c */
218