xref: /netbsd-src/sys/arch/arm/arm32/stubs.c (revision d710132b4b8ce7f7cccaaf660cb16aa16b4077a0)
1 /*	$NetBSD: stubs.c,v 1.13 2003/04/01 23:19:09 thorpej 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/param.h>
44 #include <sys/systm.h>
45 #include <sys/errno.h>
46 #include <sys/proc.h>
47 #include <sys/conf.h>
48 #include <sys/msgbuf.h>
49 #include <uvm/uvm_extern.h>
50 #include <machine/cpu.h>
51 #include <machine/intr.h>
52 #include <machine/bootconfig.h>
53 #include <machine/pcb.h>
54 #include <arm/arm32/machdep.h>
55 
56 extern dev_t dumpdev;
57 
58 /*
59  * These variables are needed by /sbin/savecore
60  */
61 u_int32_t dumpmag = 0x8fca0101;	/* magic number */
62 int 	dumpsize = 0;		/* pages */
63 long	dumplo = 0; 		/* blocks */
64 
65 struct pcb dumppcb;
66 
67 /*
68  * This is called by main to set dumplo and dumpsize.
69  * Dumps always skip the first CLBYTES of disk space
70  * in case there might be a disk label stored there.
71  * If there is extra space, put dump at the end to
72  * reduce the chance that swapping trashes it.
73  */
74 
75 void
76 cpu_dumpconf()
77 {
78 	const struct bdevsw *bdev;
79 	int nblks;	/* size of dump area */
80 
81 	if (dumpdev == NODEV)
82 		return;
83 	bdev = bdevsw_lookup(dumpdev);
84 	if (bdev == NULL)
85 		panic("dumpconf: bad dumpdev=0x%x", dumpdev);
86 	if (bdev->d_psize == NULL)
87 		return;
88 	nblks = (*bdev->d_psize)(dumpdev);
89 	if (nblks <= ctod(1))
90 		return;
91 
92 	dumpsize = physmem;
93 
94 	/* Always skip the first CLBYTES, in case there is a label there. */
95 	if (dumplo < ctod(1))
96 		dumplo = ctod(1);
97 
98 	/* Put dump at end of partition, and make it fit. */
99 	if (dumpsize > dtoc(nblks - dumplo))
100 		dumpsize = dtoc(nblks - dumplo);
101 	if (dumplo < nblks - ctod(dumpsize))
102 		dumplo = nblks - ctod(dumpsize);
103 }
104 
105 /* This should be moved to machdep.c */
106 
107 extern char *memhook;		/* XXX */
108 
109 /*
110  * Doadump comes here after turning off memory management and
111  * getting on the dump stack, either when called above, or by
112  * the auto-restart code.
113  */
114 
115 void
116 dumpsys()
117 {
118 	const struct bdevsw *bdev;
119 	daddr_t blkno;
120 	int psize;
121 	int error;
122 	int addr;
123 	int block;
124 	int len;
125 	vaddr_t dumpspace;
126 
127 	/* Save registers. */
128 	savectx(&dumppcb);
129 	/* flush everything out of caches */
130 	cpu_dcache_wbinv_all();
131 
132 	if (dumpdev == NODEV)
133 		return;
134 	if (dumpsize == 0) {
135 		cpu_dumpconf();
136 		if (dumpsize == 0)
137 			return;
138 	}
139 	if (dumplo <= 0) {
140 		printf("\ndump to dev %u,%u not possible\n", major(dumpdev),
141 		    minor(dumpdev));
142 		return;
143 	}
144 	printf("\ndumping to dev %u,%u offset %ld\n", major(dumpdev),
145 	    minor(dumpdev), dumplo);
146 
147 	blkno = dumplo;
148 	dumpspace = (vaddr_t) memhook;
149 
150 	bdev = bdevsw_lookup(dumpdev);
151 	if (bdev == NULL || bdev->d_psize == NULL)
152 		return;
153 	psize = (*bdev->d_psize)(dumpdev);
154 	printf("dump ");
155 	if (psize == -1) {
156 		printf("area unavailable\n");
157 		return;
158 	}
159 
160 	error = 0;
161 	len = 0;
162 
163 	for (block = 0; block < bootconfig.dramblocks && error == 0; ++block) {
164 		addr = bootconfig.dram[block].address;
165 		for (;addr < (bootconfig.dram[block].address
166 		    + (bootconfig.dram[block].pages * PAGE_SIZE));
167 		     addr += PAGE_SIZE) {
168 		    	if ((len % (1024*1024)) == 0)
169 		    		printf("%d ", len / (1024*1024));
170 			pmap_kenter_pa(dumpspace, addr, VM_PROT_READ);
171 			pmap_update(pmap_kernel());
172 
173 			error = (*bdev->d_dump)(dumpdev,
174 			    blkno, (caddr_t) dumpspace, PAGE_SIZE);
175 			pmap_kremove(dumpspace, PAGE_SIZE);
176 			pmap_update(pmap_kernel());
177 			if (error) break;
178 			blkno += btodb(PAGE_SIZE);
179 			len += PAGE_SIZE;
180 		}
181 	}
182 
183 	switch (error) {
184 	case ENXIO:
185 		printf("device bad\n");
186 		break;
187 
188 	case EFAULT:
189 		printf("device not ready\n");
190 		break;
191 
192 	case EINVAL:
193 		printf("area improper\n");
194 		break;
195 
196 	case EIO:
197 		printf("i/o error\n");
198 		break;
199 
200 	case EINTR:
201 		printf("aborted from console\n");
202 		break;
203 
204 	default:
205 		printf("succeeded\n");
206 		break;
207 	}
208 	printf("\n\n");
209 	delay(1000000);
210 }
211 
212 /* End of stubs.c */
213