xref: /freebsd/sys/dev/agp/agp_amd.c (revision 6990ffd8a95caaba6858ad44ff1b3157d1efba8f)
1 /*-
2  * Copyright (c) 2000 Doug Rabson
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  *	$FreeBSD$
27  */
28 
29 #include "opt_bus.h"
30 #include "opt_pci.h"
31 
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/malloc.h>
35 #include <sys/kernel.h>
36 #include <sys/bus.h>
37 #include <sys/lock.h>
38 #include <sys/mutex.h>
39 #include <sys/proc.h>
40 
41 #include <pci/pcivar.h>
42 #include <pci/pcireg.h>
43 #include <pci/agppriv.h>
44 #include <pci/agpreg.h>
45 
46 #include <vm/vm.h>
47 #include <vm/vm_object.h>
48 #include <vm/pmap.h>
49 #include <machine/bus.h>
50 #include <machine/resource.h>
51 #include <sys/rman.h>
52 
53 MALLOC_DECLARE(M_AGP);
54 
55 #define READ2(off)	bus_space_read_2(sc->bst, sc->bsh, off)
56 #define READ4(off)	bus_space_read_4(sc->bst, sc->bsh, off)
57 #define WRITE2(off,v)	bus_space_write_2(sc->bst, sc->bsh, off, v)
58 #define WRITE4(off,v)	bus_space_write_4(sc->bst, sc->bsh, off, v)
59 
60 struct agp_amd_gatt {
61 	u_int32_t	ag_entries;
62 	u_int32_t      *ag_vdir;	/* virtual address of page dir */
63 	vm_offset_t	ag_pdir;	/* physical address of page dir */
64 	u_int32_t      *ag_virtual;	/* virtual address of gatt */
65 };
66 
67 struct agp_amd_softc {
68 	struct agp_softc agp;
69 	struct resource *regs;	/* memory mapped control registers */
70 	bus_space_tag_t bst;	/* bus_space tag */
71 	bus_space_handle_t bsh;	/* bus_space handle */
72 	u_int32_t	initial_aperture; /* aperture size at startup */
73 	struct agp_amd_gatt *gatt;
74 };
75 
76 static struct agp_amd_gatt *
77 agp_amd_alloc_gatt(device_t dev)
78 {
79 	u_int32_t apsize = AGP_GET_APERTURE(dev);
80 	u_int32_t entries = apsize >> AGP_PAGE_SHIFT;
81 	struct agp_amd_gatt *gatt;
82 	int i, npages;
83 
84 	if (bootverbose)
85 		device_printf(dev,
86 			      "allocating GATT for aperture of size %dM\n",
87 			      apsize / (1024*1024));
88 
89 	gatt = malloc(sizeof(struct agp_amd_gatt), M_AGP, M_NOWAIT);
90 	if (!gatt)
91 		return 0;
92 
93 	/*
94 	 * The AMD751 uses a page directory to map a non-contiguous
95 	 * gatt so we don't need to use contigmalloc.
96 	 */
97 	gatt->ag_entries = entries;
98 	gatt->ag_virtual = malloc(entries * sizeof(u_int32_t),
99 				  M_AGP, M_NOWAIT);
100 	if (!gatt->ag_virtual) {
101 		if (bootverbose)
102 			device_printf(dev, "allocation failed\n");
103 		free(gatt, M_AGP);
104 		return 0;
105 	}
106 	bzero(gatt->ag_virtual, entries * sizeof(u_int32_t));
107 
108 	/*
109 	 * Allocate the page directory.
110 	 */
111 	gatt->ag_vdir = malloc(AGP_PAGE_SIZE, M_AGP, M_NOWAIT);
112 	if (!gatt->ag_vdir) {
113 		if (bootverbose)
114 			device_printf(dev,
115 				      "failed to allocate page directory\n");
116 		free(gatt->ag_virtual, M_AGP);
117 		free(gatt, M_AGP);
118 		return 0;
119 	}
120 	bzero(gatt->ag_vdir, AGP_PAGE_SIZE);
121 	gatt->ag_pdir = vtophys((vm_offset_t) gatt->ag_vdir);
122 	gatt->ag_pdir = vtophys(gatt->ag_virtual);
123 
124 	/*
125 	 * Map the pages of the GATT into the page directory.
126 	 */
127 	npages = ((entries * sizeof(u_int32_t) + AGP_PAGE_SIZE - 1)
128 		  >> AGP_PAGE_SHIFT);
129 	for (i = 0; i < npages; i++) {
130 		vm_offset_t va;
131 		vm_offset_t pa;
132 
133 		va = ((vm_offset_t) gatt->ag_virtual) + i * AGP_PAGE_SIZE;
134 		pa = vtophys(va);
135 		gatt->ag_vdir[i] = pa | 1;
136 	}
137 
138 	/*
139 	 * Make sure the chipset can see everything.
140 	 */
141 	agp_flush_cache();
142 
143 	return gatt;
144 }
145 
146 static void
147 agp_amd_free_gatt(struct agp_amd_gatt *gatt)
148 {
149 	free(gatt->ag_virtual, M_AGP);
150 	free(gatt->ag_vdir, M_AGP);
151 	free(gatt, M_AGP);
152 }
153 
154 static const char*
155 agp_amd_match(device_t dev)
156 {
157 	if (pci_get_class(dev) != PCIC_BRIDGE
158 	    || pci_get_subclass(dev) != PCIS_BRIDGE_HOST)
159 		return NULL;
160 
161 	if (agp_find_caps(dev) == 0)
162 		return NULL;
163 
164 	switch (pci_get_devid(dev)) {
165 	case 0x70061022:
166 		return ("AMD 751 host to AGP bridge");
167 	};
168 
169 	return NULL;
170 }
171 
172 static int
173 agp_amd_probe(device_t dev)
174 {
175 	const char *desc;
176 
177 	desc = agp_amd_match(dev);
178 	if (desc) {
179 		device_verbose(dev);
180 		device_set_desc(dev, desc);
181 		return 0;
182 	}
183 
184 	return ENXIO;
185 }
186 
187 static int
188 agp_amd_attach(device_t dev)
189 {
190 	struct agp_amd_softc *sc = device_get_softc(dev);
191 	struct agp_amd_gatt *gatt;
192 	int error, rid;
193 
194 	error = agp_generic_attach(dev);
195 	if (error)
196 		return error;
197 
198 	rid = AGP_AMD751_REGISTERS;
199 	sc->regs = bus_alloc_resource(dev, SYS_RES_MEMORY, &rid,
200 				      0, ~0, 1, RF_ACTIVE);
201 	if (!sc->regs) {
202 		agp_generic_detach(dev);
203 		return ENOMEM;
204 	}
205 
206 	sc->bst = rman_get_bustag(sc->regs);
207 	sc->bsh = rman_get_bushandle(sc->regs);
208 
209 	sc->initial_aperture = AGP_GET_APERTURE(dev);
210 
211 	for (;;) {
212 		gatt = agp_amd_alloc_gatt(dev);
213 		if (gatt)
214 			break;
215 
216 		/*
217 		 * Probably contigmalloc failure. Try reducing the
218 		 * aperture so that the gatt size reduces.
219 		 */
220 		if (AGP_SET_APERTURE(dev, AGP_GET_APERTURE(dev) / 2))
221 			return ENOMEM;
222 	}
223 	sc->gatt = gatt;
224 
225 	/* Install the gatt. */
226 	WRITE4(AGP_AMD751_ATTBASE, gatt->ag_pdir);
227 
228 	/* Enable synchronisation between host and agp. */
229 	pci_write_config(dev,
230 			 AGP_AMD751_MODECTRL,
231 			 AGP_AMD751_MODECTRL_SYNEN, 1);
232 
233 	/* Set indexing mode for two-level and enable page dir cache */
234 	pci_write_config(dev,
235 			 AGP_AMD751_MODECTRL2,
236 			 AGP_AMD751_MODECTRL2_GPDCE, 1);
237 
238 	/* Enable the TLB and flush */
239 	WRITE2(AGP_AMD751_STATUS,
240 	       READ2(AGP_AMD751_STATUS) | AGP_AMD751_STATUS_GCE);
241 	AGP_FLUSH_TLB(dev);
242 
243 	return 0;
244 }
245 
246 static int
247 agp_amd_detach(device_t dev)
248 {
249 	struct agp_amd_softc *sc = device_get_softc(dev);
250 	int error;
251 
252 	error = agp_generic_detach(dev);
253 	if (error)
254 		return error;
255 
256 	/* Disable the TLB.. */
257 	WRITE2(AGP_AMD751_STATUS,
258 	       READ2(AGP_AMD751_STATUS) & ~AGP_AMD751_STATUS_GCE);
259 
260 	/* Disable host-agp sync */
261 	pci_write_config(dev, AGP_AMD751_MODECTRL, 0x00, 1);
262 
263 	/* Clear the GATT base */
264 	WRITE4(AGP_AMD751_ATTBASE, 0);
265 
266 	/* Put the aperture back the way it started. */
267 	AGP_SET_APERTURE(dev, sc->initial_aperture);
268 
269 	agp_amd_free_gatt(sc->gatt);
270 
271 	bus_release_resource(dev, SYS_RES_MEMORY,
272 			     AGP_AMD751_REGISTERS, sc->regs);
273 
274 	return 0;
275 }
276 
277 static u_int32_t
278 agp_amd_get_aperture(device_t dev)
279 {
280 	int vas;
281 
282 	/*
283 	 * The aperture size is equal to 32M<<vas.
284 	 */
285 	vas = (pci_read_config(dev, AGP_AMD751_APCTRL, 1) & 0x06) >> 1;
286 	return (32*1024*1024) << vas;
287 }
288 
289 static int
290 agp_amd_set_aperture(device_t dev, u_int32_t aperture)
291 {
292 	int vas;
293 
294 	/*
295 	 * Check for a power of two and make sure its within the
296 	 * programmable range.
297 	 */
298 	if (aperture & (aperture - 1)
299 	    || aperture < 32*1024*1024
300 	    || aperture > 2U*1024*1024*1024)
301 		return EINVAL;
302 
303 	vas = ffs(aperture / 32*1024*1024) - 1;
304 
305 	pci_write_config(dev, AGP_AMD751_APCTRL,
306 			 ((pci_read_config(dev, AGP_AMD751_APCTRL, 1) & ~0x06)
307 			  | vas << 1), 1);
308 
309 	return 0;
310 }
311 
312 static int
313 agp_amd_bind_page(device_t dev, int offset, vm_offset_t physical)
314 {
315 	struct agp_amd_softc *sc = device_get_softc(dev);
316 
317 	if (offset < 0 || offset >= (sc->gatt->ag_entries << AGP_PAGE_SHIFT))
318 		return EINVAL;
319 
320 	sc->gatt->ag_virtual[offset >> AGP_PAGE_SHIFT] = physical | 1;
321 	return 0;
322 }
323 
324 static int
325 agp_amd_unbind_page(device_t dev, int offset)
326 {
327 	struct agp_amd_softc *sc = device_get_softc(dev);
328 
329 	if (offset < 0 || offset >= (sc->gatt->ag_entries << AGP_PAGE_SHIFT))
330 		return EINVAL;
331 
332 	sc->gatt->ag_virtual[offset >> AGP_PAGE_SHIFT] = 0;
333 	return 0;
334 }
335 
336 static void
337 agp_amd_flush_tlb(device_t dev)
338 {
339 	struct agp_amd_softc *sc = device_get_softc(dev);
340 
341 	/* Set the cache invalidate bit and wait for the chipset to clear */
342 	WRITE4(AGP_AMD751_TLBCTRL, 1);
343 	do {
344 		DELAY(1);
345 	} while (READ4(AGP_AMD751_TLBCTRL));
346 }
347 
348 static device_method_t agp_amd_methods[] = {
349 	/* Device interface */
350 	DEVMETHOD(device_probe,		agp_amd_probe),
351 	DEVMETHOD(device_attach,	agp_amd_attach),
352 	DEVMETHOD(device_detach,	agp_amd_detach),
353 	DEVMETHOD(device_shutdown,	bus_generic_shutdown),
354 	DEVMETHOD(device_suspend,	bus_generic_suspend),
355 	DEVMETHOD(device_resume,	bus_generic_resume),
356 
357 	/* AGP interface */
358 	DEVMETHOD(agp_get_aperture,	agp_amd_get_aperture),
359 	DEVMETHOD(agp_set_aperture,	agp_amd_set_aperture),
360 	DEVMETHOD(agp_bind_page,	agp_amd_bind_page),
361 	DEVMETHOD(agp_unbind_page,	agp_amd_unbind_page),
362 	DEVMETHOD(agp_flush_tlb,	agp_amd_flush_tlb),
363 	DEVMETHOD(agp_enable,		agp_generic_enable),
364 	DEVMETHOD(agp_alloc_memory,	agp_generic_alloc_memory),
365 	DEVMETHOD(agp_free_memory,	agp_generic_free_memory),
366 	DEVMETHOD(agp_bind_memory,	agp_generic_bind_memory),
367 	DEVMETHOD(agp_unbind_memory,	agp_generic_unbind_memory),
368 
369 	{ 0, 0 }
370 };
371 
372 static driver_t agp_amd_driver = {
373 	"agp",
374 	agp_amd_methods,
375 	sizeof(struct agp_amd_softc),
376 };
377 
378 static devclass_t agp_devclass;
379 
380 DRIVER_MODULE(agp_amd, pci, agp_amd_driver, agp_devclass, 0, 0);
381