[PATCH] fix MGA DRM regression before 2.6.14
[safe/jmp/linux-2.6] / drivers / char / drm / mga_dma.c
1 /* mga_dma.c -- DMA support for mga g200/g400 -*- linux-c -*-
2  * Created: Mon Dec 13 01:50:01 1999 by jhartmann@precisioninsight.com
3  *
4  * Copyright 1999 Precision Insight, Inc., Cedar Park, Texas.
5  * Copyright 2000 VA Linux Systems, Inc., Sunnyvale, California.
6  * All Rights Reserved.
7  *
8  * Permission is hereby granted, free of charge, to any person obtaining a
9  * copy of this software and associated documentation files (the "Software"),
10  * to deal in the Software without restriction, including without limitation
11  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
12  * and/or sell copies of the Software, and to permit persons to whom the
13  * Software is furnished to do so, subject to the following conditions:
14  *
15  * The above copyright notice and this permission notice (including the next
16  * paragraph) shall be included in all copies or substantial portions of the
17  * Software.
18  *
19  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
20  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
22  * PRECISION INSIGHT AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
23  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
24  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
25  * DEALINGS IN THE SOFTWARE.
26  */
27
28 /**
29  * \file mga_dma.c
30  * DMA support for MGA G200 / G400.
31  * 
32  * \author Rickard E. (Rik) Faith <faith@valinux.com>
33  * \author Jeff Hartmann <jhartmann@valinux.com>
34  * \author Keith Whitwell <keith@tungstengraphics.com>
35  * \author Gareth Hughes <gareth@valinux.com>
36  */
37
38 #include "drmP.h"
39 #include "drm.h"
40 #include "drm_sarea.h"
41 #include "mga_drm.h"
42 #include "mga_drv.h"
43
44 #define MGA_DEFAULT_USEC_TIMEOUT        10000
45 #define MGA_FREELIST_DEBUG              0
46
47 static int mga_do_cleanup_dma( drm_device_t *dev );
48
49 /* ================================================================
50  * Engine control
51  */
52
53 int mga_do_wait_for_idle( drm_mga_private_t *dev_priv )
54 {
55         u32 status = 0;
56         int i;
57         DRM_DEBUG( "\n" );
58
59         for ( i = 0 ; i < dev_priv->usec_timeout ; i++ ) {
60                 status = MGA_READ( MGA_STATUS ) & MGA_ENGINE_IDLE_MASK;
61                 if ( status == MGA_ENDPRDMASTS ) {
62                         MGA_WRITE8( MGA_CRTC_INDEX, 0 );
63                         return 0;
64                 }
65                 DRM_UDELAY( 1 );
66         }
67
68 #if MGA_DMA_DEBUG
69         DRM_ERROR( "failed!\n" );
70         DRM_INFO( "   status=0x%08x\n", status );
71 #endif
72         return DRM_ERR(EBUSY);
73 }
74
75 static int mga_do_dma_reset( drm_mga_private_t *dev_priv )
76 {
77         drm_mga_sarea_t *sarea_priv = dev_priv->sarea_priv;
78         drm_mga_primary_buffer_t *primary = &dev_priv->prim;
79
80         DRM_DEBUG( "\n" );
81
82         /* The primary DMA stream should look like new right about now.
83          */
84         primary->tail = 0;
85         primary->space = primary->size;
86         primary->last_flush = 0;
87
88         sarea_priv->last_wrap = 0;
89
90         /* FIXME: Reset counters, buffer ages etc...
91          */
92
93         /* FIXME: What else do we need to reinitialize?  WARP stuff?
94          */
95
96         return 0;
97 }
98
99 /* ================================================================
100  * Primary DMA stream
101  */
102
103 void mga_do_dma_flush( drm_mga_private_t *dev_priv )
104 {
105         drm_mga_primary_buffer_t *primary = &dev_priv->prim;
106         u32 head, tail;
107         u32 status = 0;
108         int i;
109         DMA_LOCALS;
110         DRM_DEBUG( "\n" );
111
112         /* We need to wait so that we can do an safe flush */
113         for ( i = 0 ; i < dev_priv->usec_timeout ; i++ ) {
114                 status = MGA_READ( MGA_STATUS ) & MGA_ENGINE_IDLE_MASK;
115                 if ( status == MGA_ENDPRDMASTS ) break;
116                 DRM_UDELAY( 1 );
117         }
118
119         if ( primary->tail == primary->last_flush ) {
120                 DRM_DEBUG( "   bailing out...\n" );
121                 return;
122         }
123
124         tail = primary->tail + dev_priv->primary->offset;
125
126         /* We need to pad the stream between flushes, as the card
127          * actually (partially?) reads the first of these commands.
128          * See page 4-16 in the G400 manual, middle of the page or so.
129          */
130         BEGIN_DMA( 1 );
131
132         DMA_BLOCK( MGA_DMAPAD,  0x00000000,
133                    MGA_DMAPAD,  0x00000000,
134                    MGA_DMAPAD,  0x00000000,
135                    MGA_DMAPAD,  0x00000000 );
136
137         ADVANCE_DMA();
138
139         primary->last_flush = primary->tail;
140
141         head = MGA_READ( MGA_PRIMADDRESS );
142
143         if ( head <= tail ) {
144                 primary->space = primary->size - primary->tail;
145         } else {
146                 primary->space = head - tail;
147         }
148
149         DRM_DEBUG( "   head = 0x%06lx\n", head - dev_priv->primary->offset );
150         DRM_DEBUG( "   tail = 0x%06lx\n", tail - dev_priv->primary->offset );
151         DRM_DEBUG( "  space = 0x%06x\n", primary->space );
152
153         mga_flush_write_combine();
154         MGA_WRITE(MGA_PRIMEND, tail | dev_priv->dma_access);
155
156         DRM_DEBUG( "done.\n" );
157 }
158
159 void mga_do_dma_wrap_start( drm_mga_private_t *dev_priv )
160 {
161         drm_mga_primary_buffer_t *primary = &dev_priv->prim;
162         u32 head, tail;
163         DMA_LOCALS;
164         DRM_DEBUG( "\n" );
165
166         BEGIN_DMA_WRAP();
167
168         DMA_BLOCK( MGA_DMAPAD,  0x00000000,
169                    MGA_DMAPAD,  0x00000000,
170                    MGA_DMAPAD,  0x00000000,
171                    MGA_DMAPAD,  0x00000000 );
172
173         ADVANCE_DMA();
174
175         tail = primary->tail + dev_priv->primary->offset;
176
177         primary->tail = 0;
178         primary->last_flush = 0;
179         primary->last_wrap++;
180
181         head = MGA_READ( MGA_PRIMADDRESS );
182
183         if ( head == dev_priv->primary->offset ) {
184                 primary->space = primary->size;
185         } else {
186                 primary->space = head - dev_priv->primary->offset;
187         }
188
189         DRM_DEBUG( "   head = 0x%06lx\n",
190                   head - dev_priv->primary->offset );
191         DRM_DEBUG( "   tail = 0x%06x\n", primary->tail );
192         DRM_DEBUG( "   wrap = %d\n", primary->last_wrap );
193         DRM_DEBUG( "  space = 0x%06x\n", primary->space );
194
195         mga_flush_write_combine();
196         MGA_WRITE(MGA_PRIMEND, tail | dev_priv->dma_access);
197
198         set_bit( 0, &primary->wrapped );
199         DRM_DEBUG( "done.\n" );
200 }
201
202 void mga_do_dma_wrap_end( drm_mga_private_t *dev_priv )
203 {
204         drm_mga_primary_buffer_t *primary = &dev_priv->prim;
205         drm_mga_sarea_t *sarea_priv = dev_priv->sarea_priv;
206         u32 head = dev_priv->primary->offset;
207         DRM_DEBUG( "\n" );
208
209         sarea_priv->last_wrap++;
210         DRM_DEBUG( "   wrap = %d\n", sarea_priv->last_wrap );
211
212         mga_flush_write_combine();
213         MGA_WRITE( MGA_PRIMADDRESS, head | MGA_DMA_GENERAL );
214
215         clear_bit( 0, &primary->wrapped );
216         DRM_DEBUG( "done.\n" );
217 }
218
219
220 /* ================================================================
221  * Freelist management
222  */
223
224 #define MGA_BUFFER_USED         ~0
225 #define MGA_BUFFER_FREE         0
226
227 #if MGA_FREELIST_DEBUG
228 static void mga_freelist_print( drm_device_t *dev )
229 {
230         drm_mga_private_t *dev_priv = dev->dev_private;
231         drm_mga_freelist_t *entry;
232
233         DRM_INFO( "\n" );
234         DRM_INFO( "current dispatch: last=0x%x done=0x%x\n",
235                   dev_priv->sarea_priv->last_dispatch,
236                   (unsigned int)(MGA_READ( MGA_PRIMADDRESS ) -
237                                  dev_priv->primary->offset) );
238         DRM_INFO( "current freelist:\n" );
239
240         for ( entry = dev_priv->head->next ; entry ; entry = entry->next ) {
241                 DRM_INFO( "   %p   idx=%2d  age=0x%x 0x%06lx\n",
242                           entry, entry->buf->idx, entry->age.head,
243                           entry->age.head - dev_priv->primary->offset );
244         }
245         DRM_INFO( "\n" );
246 }
247 #endif
248
249 static int mga_freelist_init( drm_device_t *dev, drm_mga_private_t *dev_priv )
250 {
251         drm_device_dma_t *dma = dev->dma;
252         drm_buf_t *buf;
253         drm_mga_buf_priv_t *buf_priv;
254         drm_mga_freelist_t *entry;
255         int i;
256         DRM_DEBUG( "count=%d\n", dma->buf_count );
257
258         dev_priv->head = drm_alloc( sizeof(drm_mga_freelist_t),
259                                      DRM_MEM_DRIVER );
260         if ( dev_priv->head == NULL )
261                 return DRM_ERR(ENOMEM);
262
263         memset( dev_priv->head, 0, sizeof(drm_mga_freelist_t) );
264         SET_AGE( &dev_priv->head->age, MGA_BUFFER_USED, 0 );
265
266         for ( i = 0 ; i < dma->buf_count ; i++ ) {
267                 buf = dma->buflist[i];
268                 buf_priv = buf->dev_private;
269
270                 entry = drm_alloc( sizeof(drm_mga_freelist_t),
271                                     DRM_MEM_DRIVER );
272                 if ( entry == NULL )
273                         return DRM_ERR(ENOMEM);
274
275                 memset( entry, 0, sizeof(drm_mga_freelist_t) );
276
277                 entry->next = dev_priv->head->next;
278                 entry->prev = dev_priv->head;
279                 SET_AGE( &entry->age, MGA_BUFFER_FREE, 0 );
280                 entry->buf = buf;
281
282                 if ( dev_priv->head->next != NULL )
283                         dev_priv->head->next->prev = entry;
284                 if ( entry->next == NULL )
285                         dev_priv->tail = entry;
286
287                 buf_priv->list_entry = entry;
288                 buf_priv->discard = 0;
289                 buf_priv->dispatched = 0;
290
291                 dev_priv->head->next = entry;
292         }
293
294         return 0;
295 }
296
297 static void mga_freelist_cleanup( drm_device_t *dev )
298 {
299         drm_mga_private_t *dev_priv = dev->dev_private;
300         drm_mga_freelist_t *entry;
301         drm_mga_freelist_t *next;
302         DRM_DEBUG( "\n" );
303
304         entry = dev_priv->head;
305         while ( entry ) {
306                 next = entry->next;
307                 drm_free( entry, sizeof(drm_mga_freelist_t), DRM_MEM_DRIVER );
308                 entry = next;
309         }
310
311         dev_priv->head = dev_priv->tail = NULL;
312 }
313
314 #if 0
315 /* FIXME: Still needed?
316  */
317 static void mga_freelist_reset( drm_device_t *dev )
318 {
319         drm_device_dma_t *dma = dev->dma;
320         drm_buf_t *buf;
321         drm_mga_buf_priv_t *buf_priv;
322         int i;
323
324         for ( i = 0 ; i < dma->buf_count ; i++ ) {
325                 buf = dma->buflist[i];
326                 buf_priv = buf->dev_private;
327                 SET_AGE( &buf_priv->list_entry->age,
328                          MGA_BUFFER_FREE, 0 );
329         }
330 }
331 #endif
332
333 static drm_buf_t *mga_freelist_get( drm_device_t *dev )
334 {
335         drm_mga_private_t *dev_priv = dev->dev_private;
336         drm_mga_freelist_t *next;
337         drm_mga_freelist_t *prev;
338         drm_mga_freelist_t *tail = dev_priv->tail;
339         u32 head, wrap;
340         DRM_DEBUG( "\n" );
341
342         head = MGA_READ( MGA_PRIMADDRESS );
343         wrap = dev_priv->sarea_priv->last_wrap;
344
345         DRM_DEBUG( "   tail=0x%06lx %d\n",
346                    tail->age.head ?
347                    tail->age.head - dev_priv->primary->offset : 0,
348                    tail->age.wrap );
349         DRM_DEBUG( "   head=0x%06lx %d\n",
350                    head - dev_priv->primary->offset, wrap );
351
352         if ( TEST_AGE( &tail->age, head, wrap ) ) {
353                 prev = dev_priv->tail->prev;
354                 next = dev_priv->tail;
355                 prev->next = NULL;
356                 next->prev = next->next = NULL;
357                 dev_priv->tail = prev;
358                 SET_AGE( &next->age, MGA_BUFFER_USED, 0 );
359                 return next->buf;
360         }
361
362         DRM_DEBUG( "returning NULL!\n" );
363         return NULL;
364 }
365
366 int mga_freelist_put( drm_device_t *dev, drm_buf_t *buf )
367 {
368         drm_mga_private_t *dev_priv = dev->dev_private;
369         drm_mga_buf_priv_t *buf_priv = buf->dev_private;
370         drm_mga_freelist_t *head, *entry, *prev;
371
372         DRM_DEBUG( "age=0x%06lx wrap=%d\n",
373                    buf_priv->list_entry->age.head -
374                    dev_priv->primary->offset,
375                    buf_priv->list_entry->age.wrap );
376
377         entry = buf_priv->list_entry;
378         head = dev_priv->head;
379
380         if ( buf_priv->list_entry->age.head == MGA_BUFFER_USED ) {
381                 SET_AGE( &entry->age, MGA_BUFFER_FREE, 0 );
382                 prev = dev_priv->tail;
383                 prev->next = entry;
384                 entry->prev = prev;
385                 entry->next = NULL;
386         } else {
387                 prev = head->next;
388                 head->next = entry;
389                 prev->prev = entry;
390                 entry->prev = head;
391                 entry->next = prev;
392         }
393
394         return 0;
395 }
396
397
398 /* ================================================================
399  * DMA initialization, cleanup
400  */
401
402
403 int mga_driver_preinit(drm_device_t *dev, unsigned long flags)
404 {
405         drm_mga_private_t * dev_priv;
406
407         dev_priv = drm_alloc(sizeof(drm_mga_private_t), DRM_MEM_DRIVER);
408         if (!dev_priv)
409                 return DRM_ERR(ENOMEM);
410
411         dev->dev_private = (void *)dev_priv;
412         memset(dev_priv, 0, sizeof(drm_mga_private_t));
413
414         dev_priv->usec_timeout = MGA_DEFAULT_USEC_TIMEOUT;
415         dev_priv->chipset = flags;
416
417         return 0;
418 }
419
420 #if __OS_HAS_AGP
421 /**
422  * Bootstrap the driver for AGP DMA.
423  * 
424  * \todo
425  * Investigate whether there is any benifit to storing the WARP microcode in
426  * AGP memory.  If not, the microcode may as well always be put in PCI
427  * memory.
428  *
429  * \todo
430  * This routine needs to set dma_bs->agp_mode to the mode actually configured
431  * in the hardware.  Looking just at the Linux AGP driver code, I don't see
432  * an easy way to determine this.
433  *
434  * \sa mga_do_dma_bootstrap, mga_do_pci_dma_bootstrap
435  */
436 static int mga_do_agp_dma_bootstrap(drm_device_t * dev,
437                                     drm_mga_dma_bootstrap_t * dma_bs)
438 {
439         drm_mga_private_t * const dev_priv = (drm_mga_private_t *) dev->dev_private;
440         unsigned int warp_size = mga_warp_microcode_size(dev_priv);
441         int err;
442         unsigned  offset;
443         const unsigned secondary_size = dma_bs->secondary_bin_count
444                 * dma_bs->secondary_bin_size;
445         const unsigned agp_size = (dma_bs->agp_size << 20);
446         drm_buf_desc_t req;
447         drm_agp_mode_t mode;
448         drm_agp_info_t info;
449
450         
451         /* Acquire AGP. */
452         err = drm_agp_acquire(dev);
453         if (err) {
454                 DRM_ERROR("Unable to acquire AGP\n");
455                 return err;
456         }
457
458         err = drm_agp_info(dev, &info);
459         if (err) {
460                 DRM_ERROR("Unable to get AGP info\n");
461                 return err;
462         }
463
464         mode.mode = (info.mode & ~0x07) | dma_bs->agp_mode;
465         err = drm_agp_enable(dev, mode);
466         if (err) {
467                 DRM_ERROR("Unable to enable AGP (mode = 0x%lx)\n", mode.mode);
468                 return err;
469         }
470
471
472         /* In addition to the usual AGP mode configuration, the G200 AGP cards
473          * need to have the AGP mode "manually" set.
474          */
475
476         if (dev_priv->chipset == MGA_CARD_TYPE_G200) {
477                 if (mode.mode & 0x02) {
478                         MGA_WRITE(MGA_AGP_PLL, MGA_AGP2XPLL_ENABLE);
479                 }
480                 else {
481                         MGA_WRITE(MGA_AGP_PLL, MGA_AGP2XPLL_DISABLE);
482                 }
483         }
484
485
486         /* Allocate and bind AGP memory. */
487         dev_priv->agp_pages = agp_size / PAGE_SIZE;
488         dev_priv->agp_mem = drm_alloc_agp( dev, dev_priv->agp_pages, 0 );
489         if (dev_priv->agp_mem == NULL) {
490                 dev_priv->agp_pages = 0;
491                 DRM_ERROR("Unable to allocate %uMB AGP memory\n",
492                           dma_bs->agp_size);
493                 return DRM_ERR(ENOMEM);
494         }
495                 
496         err = drm_bind_agp( dev_priv->agp_mem, 0 );
497         if (err) {
498                 DRM_ERROR("Unable to bind AGP memory\n");
499                 return err;
500         }
501
502         /* Make drm_addbufs happy by not trying to create a mapping for less
503          * than a page.
504          */
505         if (warp_size < PAGE_SIZE)
506                 warp_size = PAGE_SIZE;
507
508         offset = 0;
509         err = drm_addmap( dev, offset, warp_size,
510                           _DRM_AGP, _DRM_READ_ONLY, & dev_priv->warp );
511         if (err) {
512                 DRM_ERROR("Unable to map WARP microcode\n");
513                 return err;
514         }
515
516         offset += warp_size;
517         err = drm_addmap( dev, offset, dma_bs->primary_size,
518                           _DRM_AGP, _DRM_READ_ONLY, & dev_priv->primary );
519         if (err) {
520                 DRM_ERROR("Unable to map primary DMA region\n");
521                 return err;
522         }
523
524         offset += dma_bs->primary_size;
525         err = drm_addmap( dev, offset, secondary_size,
526                           _DRM_AGP, 0, & dev->agp_buffer_map );
527         if (err) {
528                 DRM_ERROR("Unable to map secondary DMA region\n");
529                 return err;
530         }
531
532         (void) memset( &req, 0, sizeof(req) );
533         req.count = dma_bs->secondary_bin_count;
534         req.size = dma_bs->secondary_bin_size;
535         req.flags = _DRM_AGP_BUFFER;
536         req.agp_start = offset;
537
538         err = drm_addbufs_agp( dev, & req );
539         if (err) {
540                 DRM_ERROR("Unable to add secondary DMA buffers\n");
541                 return err;
542         }
543
544         offset += secondary_size;
545         err = drm_addmap( dev, offset, agp_size - offset,
546                           _DRM_AGP, 0, & dev_priv->agp_textures );
547         if (err) {
548                 DRM_ERROR("Unable to map AGP texture region\n");
549                 return err;
550         }
551
552         drm_core_ioremap(dev_priv->warp, dev);
553         drm_core_ioremap(dev_priv->primary, dev);
554         drm_core_ioremap(dev->agp_buffer_map, dev);
555
556         if (!dev_priv->warp->handle ||
557             !dev_priv->primary->handle || !dev->agp_buffer_map->handle) {
558                 DRM_ERROR("failed to ioremap agp regions! (%p, %p, %p)\n",
559                           dev_priv->warp->handle, dev_priv->primary->handle,
560                           dev->agp_buffer_map->handle);
561                 return DRM_ERR(ENOMEM);
562         }
563
564         dev_priv->dma_access = MGA_PAGPXFER;
565         dev_priv->wagp_enable = MGA_WAGP_ENABLE;
566
567         DRM_INFO("Initialized card for AGP DMA.\n");
568         return 0;
569 }
570 #else
571 static int mga_do_agp_dma_bootstrap(drm_device_t * dev,
572                                     drm_mga_dma_bootstrap_t * dma_bs)
573 {
574         return -EINVAL;
575 }
576 #endif
577
578 /**
579  * Bootstrap the driver for PCI DMA.
580  * 
581  * \todo
582  * The algorithm for decreasing the size of the primary DMA buffer could be
583  * better.  The size should be rounded up to the nearest page size, then
584  * decrease the request size by a single page each pass through the loop.
585  *
586  * \todo
587  * Determine whether the maximum address passed to drm_pci_alloc is correct.
588  * The same goes for drm_addbufs_pci.
589  * 
590  * \sa mga_do_dma_bootstrap, mga_do_agp_dma_bootstrap
591  */
592 static int mga_do_pci_dma_bootstrap(drm_device_t * dev,
593                                     drm_mga_dma_bootstrap_t * dma_bs)
594 {
595         drm_mga_private_t * const dev_priv = (drm_mga_private_t *) dev->dev_private;
596         unsigned int warp_size = mga_warp_microcode_size(dev_priv);
597         unsigned int primary_size;
598         unsigned int bin_count;
599         int err;
600         drm_buf_desc_t req;
601
602         
603         if (dev->dma == NULL) {
604                 DRM_ERROR("dev->dma is NULL\n");
605                 return DRM_ERR(EFAULT);
606         }
607
608         /* Make drm_addbufs happy by not trying to create a mapping for less
609          * than a page.
610          */
611         if (warp_size < PAGE_SIZE)
612                 warp_size = PAGE_SIZE;
613
614         /* The proper alignment is 0x100 for this mapping */
615         err = drm_addmap(dev, 0, warp_size, _DRM_CONSISTENT,
616                          _DRM_READ_ONLY, &dev_priv->warp);
617         if (err != 0) {
618                 DRM_ERROR("Unable to create mapping for WARP microcode\n");
619                 return err;
620         }
621
622         /* Other than the bottom two bits being used to encode other
623          * information, there don't appear to be any restrictions on the
624          * alignment of the primary or secondary DMA buffers.
625          */
626
627         for ( primary_size = dma_bs->primary_size
628               ; primary_size != 0
629               ; primary_size >>= 1 ) {
630                 /* The proper alignment for this mapping is 0x04 */
631                 err = drm_addmap(dev, 0, primary_size, _DRM_CONSISTENT,
632                                  _DRM_READ_ONLY, &dev_priv->primary);
633                 if (!err)
634                         break;
635         }
636
637         if (err != 0) {
638                 DRM_ERROR("Unable to allocate primary DMA region\n");
639                 return DRM_ERR(ENOMEM);
640         }
641
642         if (dev_priv->primary->size != dma_bs->primary_size) {
643                 DRM_INFO("Primary DMA buffer size reduced from %u to %u.\n",
644                          dma_bs->primary_size, 
645                          (unsigned) dev_priv->primary->size);
646                 dma_bs->primary_size = dev_priv->primary->size;
647         }
648
649         for ( bin_count = dma_bs->secondary_bin_count
650               ; bin_count > 0 
651               ; bin_count-- ) {
652                 (void) memset( &req, 0, sizeof(req) );
653                 req.count = bin_count;
654                 req.size = dma_bs->secondary_bin_size;
655
656                 err = drm_addbufs_pci( dev, & req );
657                 if (!err) {
658                         break;
659                 }
660         }
661         
662         if (bin_count == 0) {
663                 DRM_ERROR("Unable to add secondary DMA buffers\n");
664                 return err;
665         }
666
667         if (bin_count != dma_bs->secondary_bin_count) {
668                 DRM_INFO("Secondary PCI DMA buffer bin count reduced from %u "
669                          "to %u.\n", dma_bs->secondary_bin_count, bin_count);
670
671                 dma_bs->secondary_bin_count = bin_count;
672         }
673
674         dev_priv->dma_access = 0;
675         dev_priv->wagp_enable = 0;
676
677         dma_bs->agp_mode = 0;
678
679         DRM_INFO("Initialized card for PCI DMA.\n");
680         return 0;
681 }
682
683
684 static int mga_do_dma_bootstrap(drm_device_t * dev,
685                                 drm_mga_dma_bootstrap_t * dma_bs)
686 {
687         const int is_agp = (dma_bs->agp_mode != 0) && drm_device_is_agp(dev);
688         int err;
689         drm_mga_private_t * const dev_priv =
690                 (drm_mga_private_t *) dev->dev_private;
691
692
693         dev_priv->used_new_dma_init = 1;
694
695         /* The first steps are the same for both PCI and AGP based DMA.  Map
696          * the cards MMIO registers and map a status page.
697          */
698         err = drm_addmap( dev, dev_priv->mmio_base, dev_priv->mmio_size,
699                           _DRM_REGISTERS, _DRM_READ_ONLY, & dev_priv->mmio );
700         if (err) {
701                 DRM_ERROR("Unable to map MMIO region\n");
702                 return err;
703         }
704
705
706         err = drm_addmap( dev, 0, SAREA_MAX, _DRM_SHM,
707                           _DRM_READ_ONLY | _DRM_LOCKED | _DRM_KERNEL,
708                           & dev_priv->status );
709         if (err) {
710                 DRM_ERROR("Unable to map status region\n");
711                 return err;
712         }
713
714
715         /* The DMA initialization procedure is slightly different for PCI and
716          * AGP cards.  AGP cards just allocate a large block of AGP memory and
717          * carve off portions of it for internal uses.  The remaining memory
718          * is returned to user-mode to be used for AGP textures.
719          */
720         if (is_agp) {
721                 err = mga_do_agp_dma_bootstrap(dev, dma_bs);
722         }
723         
724         /* If we attempted to initialize the card for AGP DMA but failed,
725          * clean-up any mess that may have been created.
726          */
727
728         if (err) {
729                 mga_do_cleanup_dma(dev);
730         }
731
732
733         /* Not only do we want to try and initialized PCI cards for PCI DMA,
734          * but we also try to initialized AGP cards that could not be
735          * initialized for AGP DMA.  This covers the case where we have an AGP
736          * card in a system with an unsupported AGP chipset.  In that case the
737          * card will be detected as AGP, but we won't be able to allocate any
738          * AGP memory, etc.
739          */
740
741         if (!is_agp || err) {
742                 err = mga_do_pci_dma_bootstrap(dev, dma_bs);
743         }
744
745
746         return err;
747 }
748
749 int mga_dma_bootstrap(DRM_IOCTL_ARGS)
750 {
751         DRM_DEVICE;
752         drm_mga_dma_bootstrap_t bootstrap;
753         int err;
754
755
756         DRM_COPY_FROM_USER_IOCTL(bootstrap,
757                                  (drm_mga_dma_bootstrap_t __user *) data,
758                                  sizeof(bootstrap));
759
760         err = mga_do_dma_bootstrap(dev, & bootstrap);
761         if (! err) {
762                 static const int modes[] = { 0, 1, 2, 2, 4, 4, 4, 4 };
763                 const drm_mga_private_t * const dev_priv = 
764                         (drm_mga_private_t *) dev->dev_private;
765
766                 if (dev_priv->agp_textures != NULL) {
767                         bootstrap.texture_handle = dev_priv->agp_textures->offset;
768                         bootstrap.texture_size = dev_priv->agp_textures->size;
769                 }
770                 else {
771                         bootstrap.texture_handle = 0;
772                         bootstrap.texture_size = 0;
773                 }
774
775                 bootstrap.agp_mode = modes[ bootstrap.agp_mode & 0x07 ];
776                 if (DRM_COPY_TO_USER( (void __user *) data, & bootstrap,
777                                      sizeof(bootstrap))) {
778                         err = DRM_ERR(EFAULT);
779                 }
780         }
781         else {
782                 mga_do_cleanup_dma(dev);
783         }
784
785         return err;
786 }
787
788 static int mga_do_init_dma( drm_device_t *dev, drm_mga_init_t *init )
789 {
790         drm_mga_private_t *dev_priv;
791         int ret;
792         DRM_DEBUG( "\n" );
793
794
795         dev_priv = dev->dev_private;
796
797         if (init->sgram) {
798                 dev_priv->clear_cmd = MGA_DWGCTL_CLEAR | MGA_ATYPE_BLK;
799         } else {
800                 dev_priv->clear_cmd = MGA_DWGCTL_CLEAR | MGA_ATYPE_RSTR;
801         }
802         dev_priv->maccess       = init->maccess;
803
804         dev_priv->fb_cpp        = init->fb_cpp;
805         dev_priv->front_offset  = init->front_offset;
806         dev_priv->front_pitch   = init->front_pitch;
807         dev_priv->back_offset   = init->back_offset;
808         dev_priv->back_pitch    = init->back_pitch;
809
810         dev_priv->depth_cpp     = init->depth_cpp;
811         dev_priv->depth_offset  = init->depth_offset;
812         dev_priv->depth_pitch   = init->depth_pitch;
813
814         /* FIXME: Need to support AGP textures...
815          */
816         dev_priv->texture_offset = init->texture_offset[0];
817         dev_priv->texture_size = init->texture_size[0];
818
819         DRM_GETSAREA();
820
821         if (!dev_priv->sarea) {
822                 DRM_ERROR("failed to find sarea!\n");
823                 return DRM_ERR(EINVAL);
824         }
825
826         if (! dev_priv->used_new_dma_init) {
827
828                 dev_priv->dma_access = MGA_PAGPXFER;
829                 dev_priv->wagp_enable = MGA_WAGP_ENABLE;
830
831                 dev_priv->status = drm_core_findmap(dev, init->status_offset);
832                 if (!dev_priv->status) {
833                         DRM_ERROR("failed to find status page!\n");
834                         return DRM_ERR(EINVAL);
835                 }
836                 dev_priv->mmio = drm_core_findmap(dev, init->mmio_offset);
837                 if (!dev_priv->mmio) {
838                         DRM_ERROR("failed to find mmio region!\n");
839                         return DRM_ERR(EINVAL);
840                 }
841                 dev_priv->warp = drm_core_findmap(dev, init->warp_offset);
842                 if (!dev_priv->warp) {
843                         DRM_ERROR("failed to find warp microcode region!\n");
844                         return DRM_ERR(EINVAL);
845                 }
846                 dev_priv->primary = drm_core_findmap(dev, init->primary_offset);
847                 if (!dev_priv->primary) {
848                         DRM_ERROR("failed to find primary dma region!\n");
849                         return DRM_ERR(EINVAL);
850                 }
851                 dev->agp_buffer_token = init->buffers_offset;
852                 dev->agp_buffer_map = drm_core_findmap(dev, init->buffers_offset);
853                 if (!dev->agp_buffer_map) {
854                         DRM_ERROR("failed to find dma buffer region!\n");
855                         return DRM_ERR(EINVAL);
856                 }
857
858                 drm_core_ioremap(dev_priv->warp, dev);
859                 drm_core_ioremap(dev_priv->primary, dev);
860                 drm_core_ioremap(dev->agp_buffer_map, dev);
861         }
862
863         dev_priv->sarea_priv =
864                 (drm_mga_sarea_t *)((u8 *)dev_priv->sarea->handle +
865                                     init->sarea_priv_offset);
866
867         if (!dev_priv->warp->handle ||
868             !dev_priv->primary->handle ||
869             ((dev_priv->dma_access != 0) &&
870              ((dev->agp_buffer_map == NULL) ||
871               (dev->agp_buffer_map->handle == NULL)))) {
872                 DRM_ERROR("failed to ioremap agp regions!\n");
873                 return DRM_ERR(ENOMEM);
874         }
875
876         ret = mga_warp_install_microcode(dev_priv);
877         if (ret < 0) {
878                 DRM_ERROR("failed to install WARP ucode!\n");
879                 return ret;
880         }
881
882         ret = mga_warp_init(dev_priv);
883         if (ret < 0) {
884                 DRM_ERROR("failed to init WARP engine!\n");
885                 return ret;
886         }
887
888         dev_priv->prim.status = (u32 *)dev_priv->status->handle;
889
890         mga_do_wait_for_idle( dev_priv );
891
892         /* Init the primary DMA registers.
893          */
894         MGA_WRITE( MGA_PRIMADDRESS,
895                    dev_priv->primary->offset | MGA_DMA_GENERAL );
896 #if 0
897         MGA_WRITE( MGA_PRIMPTR,
898                    virt_to_bus((void *)dev_priv->prim.status) |
899                    MGA_PRIMPTREN0 |     /* Soft trap, SECEND, SETUPEND */
900                    MGA_PRIMPTREN1 );    /* DWGSYNC */
901 #endif
902
903         dev_priv->prim.start = (u8 *)dev_priv->primary->handle;
904         dev_priv->prim.end = ((u8 *)dev_priv->primary->handle
905                               + dev_priv->primary->size);
906         dev_priv->prim.size = dev_priv->primary->size;
907
908         dev_priv->prim.tail = 0;
909         dev_priv->prim.space = dev_priv->prim.size;
910         dev_priv->prim.wrapped = 0;
911
912         dev_priv->prim.last_flush = 0;
913         dev_priv->prim.last_wrap = 0;
914
915         dev_priv->prim.high_mark = 256 * DMA_BLOCK_SIZE;
916
917         dev_priv->prim.status[0] = dev_priv->primary->offset;
918         dev_priv->prim.status[1] = 0;
919
920         dev_priv->sarea_priv->last_wrap = 0;
921         dev_priv->sarea_priv->last_frame.head = 0;
922         dev_priv->sarea_priv->last_frame.wrap = 0;
923
924         if (mga_freelist_init(dev, dev_priv) < 0) {
925                 DRM_ERROR("could not initialize freelist\n");
926                 return DRM_ERR(ENOMEM);
927         }
928
929         return 0;
930 }
931
932 static int mga_do_cleanup_dma( drm_device_t *dev )
933 {
934         int err = 0;
935         DRM_DEBUG("\n");
936
937         /* Make sure interrupts are disabled here because the uninstall ioctl
938          * may not have been called from userspace and after dev_private
939          * is freed, it's too late.
940          */
941         if ( dev->irq_enabled ) drm_irq_uninstall(dev);
942
943         if ( dev->dev_private ) {
944                 drm_mga_private_t *dev_priv = dev->dev_private;
945
946                 if ((dev_priv->warp != NULL) 
947                     && (dev_priv->warp->type != _DRM_CONSISTENT))
948                         drm_core_ioremapfree(dev_priv->warp, dev);
949
950                 if ((dev_priv->primary != NULL) 
951                     && (dev_priv->primary->type != _DRM_CONSISTENT))
952                         drm_core_ioremapfree(dev_priv->primary, dev);
953
954                 if (dev->agp_buffer_map != NULL)
955                         drm_core_ioremapfree(dev->agp_buffer_map, dev);
956
957                 if (dev_priv->used_new_dma_init) {
958 #if __OS_HAS_AGP
959                         if (dev_priv->agp_mem != NULL) {
960                                 dev_priv->agp_textures = NULL;
961                                 drm_unbind_agp(dev_priv->agp_mem);
962
963                                 drm_free_agp(dev_priv->agp_mem, dev_priv->agp_pages);
964                                 dev_priv->agp_pages = 0;
965                                 dev_priv->agp_mem = NULL;
966                         }
967
968                         if ((dev->agp != NULL) && dev->agp->acquired) {
969                                 err = drm_agp_release(dev);
970                         }
971 #endif
972                         dev_priv->used_new_dma_init = 0;
973                 }
974
975                 dev_priv->warp = NULL;
976                 dev_priv->primary = NULL;
977                 dev_priv->mmio = NULL;
978                 dev_priv->status = NULL;
979                 dev_priv->sarea = NULL;
980                 dev_priv->sarea_priv = NULL;
981                 dev->agp_buffer_map = NULL;
982
983                 memset(&dev_priv->prim, 0, sizeof(dev_priv->prim));
984                 dev_priv->warp_pipe = 0;
985                 memset(dev_priv->warp_pipe_phys, 0, sizeof(dev_priv->warp_pipe_phys));
986
987                 if (dev_priv->head != NULL) {
988                         mga_freelist_cleanup(dev);
989                 }
990         }
991
992         return err;
993 }
994
995 int mga_dma_init( DRM_IOCTL_ARGS )
996 {
997         DRM_DEVICE;
998         drm_mga_init_t init;
999         int err;
1000
1001         LOCK_TEST_WITH_RETURN( dev, filp );
1002
1003         DRM_COPY_FROM_USER_IOCTL(init, (drm_mga_init_t __user *) data,
1004                                  sizeof(init));
1005
1006         switch ( init.func ) {
1007         case MGA_INIT_DMA:
1008                 err = mga_do_init_dma(dev, &init);
1009                 if (err) {
1010                         (void) mga_do_cleanup_dma(dev);
1011                 }
1012                 return err;
1013         case MGA_CLEANUP_DMA:
1014                 return mga_do_cleanup_dma( dev );
1015         }
1016
1017         return DRM_ERR(EINVAL);
1018 }
1019
1020
1021 /* ================================================================
1022  * Primary DMA stream management
1023  */
1024
1025 int mga_dma_flush( DRM_IOCTL_ARGS )
1026 {
1027         DRM_DEVICE;
1028         drm_mga_private_t *dev_priv = (drm_mga_private_t *)dev->dev_private;
1029         drm_lock_t lock;
1030
1031         LOCK_TEST_WITH_RETURN( dev, filp );
1032
1033         DRM_COPY_FROM_USER_IOCTL( lock, (drm_lock_t __user *)data, sizeof(lock) );
1034
1035         DRM_DEBUG( "%s%s%s\n",
1036                    (lock.flags & _DRM_LOCK_FLUSH) ?     "flush, " : "",
1037                    (lock.flags & _DRM_LOCK_FLUSH_ALL) ? "flush all, " : "",
1038                    (lock.flags & _DRM_LOCK_QUIESCENT) ? "idle, " : "" );
1039
1040         WRAP_WAIT_WITH_RETURN( dev_priv );
1041
1042         if ( lock.flags & (_DRM_LOCK_FLUSH | _DRM_LOCK_FLUSH_ALL) ) {
1043                 mga_do_dma_flush( dev_priv );
1044         }
1045
1046         if ( lock.flags & _DRM_LOCK_QUIESCENT ) {
1047 #if MGA_DMA_DEBUG
1048                 int ret = mga_do_wait_for_idle( dev_priv );
1049                 if ( ret < 0 )
1050                         DRM_INFO( "%s: -EBUSY\n", __FUNCTION__ );
1051                 return ret;
1052 #else
1053                 return mga_do_wait_for_idle( dev_priv );
1054 #endif
1055         } else {
1056                 return 0;
1057         }
1058 }
1059
1060 int mga_dma_reset( DRM_IOCTL_ARGS )
1061 {
1062         DRM_DEVICE;
1063         drm_mga_private_t *dev_priv = (drm_mga_private_t *)dev->dev_private;
1064
1065         LOCK_TEST_WITH_RETURN( dev, filp );
1066
1067         return mga_do_dma_reset( dev_priv );
1068 }
1069
1070
1071 /* ================================================================
1072  * DMA buffer management
1073  */
1074
1075 static int mga_dma_get_buffers( DRMFILE filp,
1076                                 drm_device_t *dev, drm_dma_t *d )
1077 {
1078         drm_buf_t *buf;
1079         int i;
1080
1081         for ( i = d->granted_count ; i < d->request_count ; i++ ) {
1082                 buf = mga_freelist_get( dev );
1083                 if ( !buf ) return DRM_ERR(EAGAIN);
1084
1085                 buf->filp = filp;
1086
1087                 if ( DRM_COPY_TO_USER( &d->request_indices[i],
1088                                    &buf->idx, sizeof(buf->idx) ) )
1089                         return DRM_ERR(EFAULT);
1090                 if ( DRM_COPY_TO_USER( &d->request_sizes[i],
1091                                    &buf->total, sizeof(buf->total) ) )
1092                         return DRM_ERR(EFAULT);
1093
1094                 d->granted_count++;
1095         }
1096         return 0;
1097 }
1098
1099 int mga_dma_buffers( DRM_IOCTL_ARGS )
1100 {
1101         DRM_DEVICE;
1102         drm_device_dma_t *dma = dev->dma;
1103         drm_mga_private_t *dev_priv = (drm_mga_private_t *)dev->dev_private;
1104         drm_dma_t __user *argp = (void __user *)data;
1105         drm_dma_t d;
1106         int ret = 0;
1107
1108         LOCK_TEST_WITH_RETURN( dev, filp );
1109
1110         DRM_COPY_FROM_USER_IOCTL( d, argp, sizeof(d) );
1111
1112         /* Please don't send us buffers.
1113          */
1114         if ( d.send_count != 0 ) {
1115                 DRM_ERROR( "Process %d trying to send %d buffers via drmDMA\n",
1116                            DRM_CURRENTPID, d.send_count );
1117                 return DRM_ERR(EINVAL);
1118         }
1119
1120         /* We'll send you buffers.
1121          */
1122         if ( d.request_count < 0 || d.request_count > dma->buf_count ) {
1123                 DRM_ERROR( "Process %d trying to get %d buffers (of %d max)\n",
1124                            DRM_CURRENTPID, d.request_count, dma->buf_count );
1125                 return DRM_ERR(EINVAL);
1126         }
1127
1128         WRAP_TEST_WITH_RETURN( dev_priv );
1129
1130         d.granted_count = 0;
1131
1132         if ( d.request_count ) {
1133                 ret = mga_dma_get_buffers( filp, dev, &d );
1134         }
1135
1136         DRM_COPY_TO_USER_IOCTL( argp, d, sizeof(d) );
1137
1138         return ret;
1139 }
1140
1141 /**
1142  * Called just before the module is unloaded.
1143  */
1144 int mga_driver_postcleanup(drm_device_t * dev)
1145 {
1146         drm_free(dev->dev_private, sizeof(drm_mga_private_t), DRM_MEM_DRIVER);
1147         dev->dev_private = NULL;
1148
1149         return 0;
1150 }
1151
1152 /**
1153  * Called when the last opener of the device is closed.
1154  */
1155 void mga_driver_pretakedown(drm_device_t * dev)
1156 {
1157         mga_do_cleanup_dma( dev );
1158 }
1159
1160 int mga_driver_dma_quiescent(drm_device_t *dev)
1161 {
1162         drm_mga_private_t *dev_priv = dev->dev_private;
1163         return mga_do_wait_for_idle( dev_priv );
1164 }