Merge branch 'master' of git://git.kernel.org/pub/scm/linux/kernel/git/linville/wirel...
[pandora-kernel.git] / drivers / gpu / drm / savage / savage_bci.c
1 /* savage_bci.c -- BCI support for Savage
2  *
3  * Copyright 2004  Felix Kuehling
4  * All Rights Reserved.
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining a
7  * copy of this software and associated documentation files (the "Software"),
8  * to deal in the Software without restriction, including without limitation
9  * the rights to use, copy, modify, merge, publish, distribute, sub license,
10  * and/or sell copies of the Software, and to permit persons to whom the
11  * Software is furnished to do so, subject to the following conditions:
12  *
13  * The above copyright notice and this permission notice (including the
14  * next paragraph) shall be included in all copies or substantial portions
15  * of the Software.
16  *
17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
18  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
19  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
20  * NON-INFRINGEMENT. IN NO EVENT SHALL FELIX KUEHLING BE LIABLE FOR
21  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF
22  * CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
23  * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
24  */
25 #include "drmP.h"
26 #include "savage_drm.h"
27 #include "savage_drv.h"
28
29 /* Need a long timeout for shadow status updates can take a while
30  * and so can waiting for events when the queue is full. */
31 #define SAVAGE_DEFAULT_USEC_TIMEOUT     1000000 /* 1s */
32 #define SAVAGE_EVENT_USEC_TIMEOUT       5000000 /* 5s */
33 #define SAVAGE_FREELIST_DEBUG           0
34
35 static int savage_do_cleanup_bci(struct drm_device *dev);
36
37 static int
38 savage_bci_wait_fifo_shadow(drm_savage_private_t * dev_priv, unsigned int n)
39 {
40         uint32_t mask = dev_priv->status_used_mask;
41         uint32_t threshold = dev_priv->bci_threshold_hi;
42         uint32_t status;
43         int i;
44
45 #if SAVAGE_BCI_DEBUG
46         if (n > dev_priv->cob_size + SAVAGE_BCI_FIFO_SIZE - threshold)
47                 DRM_ERROR("Trying to emit %d words "
48                           "(more than guaranteed space in COB)\n", n);
49 #endif
50
51         for (i = 0; i < SAVAGE_DEFAULT_USEC_TIMEOUT; i++) {
52                 DRM_MEMORYBARRIER();
53                 status = dev_priv->status_ptr[0];
54                 if ((status & mask) < threshold)
55                         return 0;
56                 DRM_UDELAY(1);
57         }
58
59 #if SAVAGE_BCI_DEBUG
60         DRM_ERROR("failed!\n");
61         DRM_INFO("   status=0x%08x, threshold=0x%08x\n", status, threshold);
62 #endif
63         return -EBUSY;
64 }
65
66 static int
67 savage_bci_wait_fifo_s3d(drm_savage_private_t * dev_priv, unsigned int n)
68 {
69         uint32_t maxUsed = dev_priv->cob_size + SAVAGE_BCI_FIFO_SIZE - n;
70         uint32_t status;
71         int i;
72
73         for (i = 0; i < SAVAGE_DEFAULT_USEC_TIMEOUT; i++) {
74                 status = SAVAGE_READ(SAVAGE_STATUS_WORD0);
75                 if ((status & SAVAGE_FIFO_USED_MASK_S3D) <= maxUsed)
76                         return 0;
77                 DRM_UDELAY(1);
78         }
79
80 #if SAVAGE_BCI_DEBUG
81         DRM_ERROR("failed!\n");
82         DRM_INFO("   status=0x%08x\n", status);
83 #endif
84         return -EBUSY;
85 }
86
87 static int
88 savage_bci_wait_fifo_s4(drm_savage_private_t * dev_priv, unsigned int n)
89 {
90         uint32_t maxUsed = dev_priv->cob_size + SAVAGE_BCI_FIFO_SIZE - n;
91         uint32_t status;
92         int i;
93
94         for (i = 0; i < SAVAGE_DEFAULT_USEC_TIMEOUT; i++) {
95                 status = SAVAGE_READ(SAVAGE_ALT_STATUS_WORD0);
96                 if ((status & SAVAGE_FIFO_USED_MASK_S4) <= maxUsed)
97                         return 0;
98                 DRM_UDELAY(1);
99         }
100
101 #if SAVAGE_BCI_DEBUG
102         DRM_ERROR("failed!\n");
103         DRM_INFO("   status=0x%08x\n", status);
104 #endif
105         return -EBUSY;
106 }
107
108 /*
109  * Waiting for events.
110  *
111  * The BIOSresets the event tag to 0 on mode changes. Therefore we
112  * never emit 0 to the event tag. If we find a 0 event tag we know the
113  * BIOS stomped on it and return success assuming that the BIOS waited
114  * for engine idle.
115  *
116  * Note: if the Xserver uses the event tag it has to follow the same
117  * rule. Otherwise there may be glitches every 2^16 events.
118  */
119 static int
120 savage_bci_wait_event_shadow(drm_savage_private_t * dev_priv, uint16_t e)
121 {
122         uint32_t status;
123         int i;
124
125         for (i = 0; i < SAVAGE_EVENT_USEC_TIMEOUT; i++) {
126                 DRM_MEMORYBARRIER();
127                 status = dev_priv->status_ptr[1];
128                 if ((((status & 0xffff) - e) & 0xffff) <= 0x7fff ||
129                     (status & 0xffff) == 0)
130                         return 0;
131                 DRM_UDELAY(1);
132         }
133
134 #if SAVAGE_BCI_DEBUG
135         DRM_ERROR("failed!\n");
136         DRM_INFO("   status=0x%08x, e=0x%04x\n", status, e);
137 #endif
138
139         return -EBUSY;
140 }
141
142 static int
143 savage_bci_wait_event_reg(drm_savage_private_t * dev_priv, uint16_t e)
144 {
145         uint32_t status;
146         int i;
147
148         for (i = 0; i < SAVAGE_EVENT_USEC_TIMEOUT; i++) {
149                 status = SAVAGE_READ(SAVAGE_STATUS_WORD1);
150                 if ((((status & 0xffff) - e) & 0xffff) <= 0x7fff ||
151                     (status & 0xffff) == 0)
152                         return 0;
153                 DRM_UDELAY(1);
154         }
155
156 #if SAVAGE_BCI_DEBUG
157         DRM_ERROR("failed!\n");
158         DRM_INFO("   status=0x%08x, e=0x%04x\n", status, e);
159 #endif
160
161         return -EBUSY;
162 }
163
164 uint16_t savage_bci_emit_event(drm_savage_private_t * dev_priv,
165                                unsigned int flags)
166 {
167         uint16_t count;
168         BCI_LOCALS;
169
170         if (dev_priv->status_ptr) {
171                 /* coordinate with Xserver */
172                 count = dev_priv->status_ptr[1023];
173                 if (count < dev_priv->event_counter)
174                         dev_priv->event_wrap++;
175         } else {
176                 count = dev_priv->event_counter;
177         }
178         count = (count + 1) & 0xffff;
179         if (count == 0) {
180                 count++;        /* See the comment above savage_wait_event_*. */
181                 dev_priv->event_wrap++;
182         }
183         dev_priv->event_counter = count;
184         if (dev_priv->status_ptr)
185                 dev_priv->status_ptr[1023] = (uint32_t) count;
186
187         if ((flags & (SAVAGE_WAIT_2D | SAVAGE_WAIT_3D))) {
188                 unsigned int wait_cmd = BCI_CMD_WAIT;
189                 if ((flags & SAVAGE_WAIT_2D))
190                         wait_cmd |= BCI_CMD_WAIT_2D;
191                 if ((flags & SAVAGE_WAIT_3D))
192                         wait_cmd |= BCI_CMD_WAIT_3D;
193                 BEGIN_BCI(2);
194                 BCI_WRITE(wait_cmd);
195         } else {
196                 BEGIN_BCI(1);
197         }
198         BCI_WRITE(BCI_CMD_UPDATE_EVENT_TAG | (uint32_t) count);
199
200         return count;
201 }
202
203 /*
204  * Freelist management
205  */
206 static int savage_freelist_init(struct drm_device * dev)
207 {
208         drm_savage_private_t *dev_priv = dev->dev_private;
209         struct drm_device_dma *dma = dev->dma;
210         struct drm_buf *buf;
211         drm_savage_buf_priv_t *entry;
212         int i;
213         DRM_DEBUG("count=%d\n", dma->buf_count);
214
215         dev_priv->head.next = &dev_priv->tail;
216         dev_priv->head.prev = NULL;
217         dev_priv->head.buf = NULL;
218
219         dev_priv->tail.next = NULL;
220         dev_priv->tail.prev = &dev_priv->head;
221         dev_priv->tail.buf = NULL;
222
223         for (i = 0; i < dma->buf_count; i++) {
224                 buf = dma->buflist[i];
225                 entry = buf->dev_private;
226
227                 SET_AGE(&entry->age, 0, 0);
228                 entry->buf = buf;
229
230                 entry->next = dev_priv->head.next;
231                 entry->prev = &dev_priv->head;
232                 dev_priv->head.next->prev = entry;
233                 dev_priv->head.next = entry;
234         }
235
236         return 0;
237 }
238
239 static struct drm_buf *savage_freelist_get(struct drm_device * dev)
240 {
241         drm_savage_private_t *dev_priv = dev->dev_private;
242         drm_savage_buf_priv_t *tail = dev_priv->tail.prev;
243         uint16_t event;
244         unsigned int wrap;
245         DRM_DEBUG("\n");
246
247         UPDATE_EVENT_COUNTER();
248         if (dev_priv->status_ptr)
249                 event = dev_priv->status_ptr[1] & 0xffff;
250         else
251                 event = SAVAGE_READ(SAVAGE_STATUS_WORD1) & 0xffff;
252         wrap = dev_priv->event_wrap;
253         if (event > dev_priv->event_counter)
254                 wrap--;         /* hardware hasn't passed the last wrap yet */
255
256         DRM_DEBUG("   tail=0x%04x %d\n", tail->age.event, tail->age.wrap);
257         DRM_DEBUG("   head=0x%04x %d\n", event, wrap);
258
259         if (tail->buf && (TEST_AGE(&tail->age, event, wrap) || event == 0)) {
260                 drm_savage_buf_priv_t *next = tail->next;
261                 drm_savage_buf_priv_t *prev = tail->prev;
262                 prev->next = next;
263                 next->prev = prev;
264                 tail->next = tail->prev = NULL;
265                 return tail->buf;
266         }
267
268         DRM_DEBUG("returning NULL, tail->buf=%p!\n", tail->buf);
269         return NULL;
270 }
271
272 void savage_freelist_put(struct drm_device * dev, struct drm_buf * buf)
273 {
274         drm_savage_private_t *dev_priv = dev->dev_private;
275         drm_savage_buf_priv_t *entry = buf->dev_private, *prev, *next;
276
277         DRM_DEBUG("age=0x%04x wrap=%d\n", entry->age.event, entry->age.wrap);
278
279         if (entry->next != NULL || entry->prev != NULL) {
280                 DRM_ERROR("entry already on freelist.\n");
281                 return;
282         }
283
284         prev = &dev_priv->head;
285         next = prev->next;
286         prev->next = entry;
287         next->prev = entry;
288         entry->prev = prev;
289         entry->next = next;
290 }
291
292 /*
293  * Command DMA
294  */
295 static int savage_dma_init(drm_savage_private_t * dev_priv)
296 {
297         unsigned int i;
298
299         dev_priv->nr_dma_pages = dev_priv->cmd_dma->size /
300             (SAVAGE_DMA_PAGE_SIZE * 4);
301         dev_priv->dma_pages = kmalloc(sizeof(drm_savage_dma_page_t) *
302                                       dev_priv->nr_dma_pages, GFP_KERNEL);
303         if (dev_priv->dma_pages == NULL)
304                 return -ENOMEM;
305
306         for (i = 0; i < dev_priv->nr_dma_pages; ++i) {
307                 SET_AGE(&dev_priv->dma_pages[i].age, 0, 0);
308                 dev_priv->dma_pages[i].used = 0;
309                 dev_priv->dma_pages[i].flushed = 0;
310         }
311         SET_AGE(&dev_priv->last_dma_age, 0, 0);
312
313         dev_priv->first_dma_page = 0;
314         dev_priv->current_dma_page = 0;
315
316         return 0;
317 }
318
319 void savage_dma_reset(drm_savage_private_t * dev_priv)
320 {
321         uint16_t event;
322         unsigned int wrap, i;
323         event = savage_bci_emit_event(dev_priv, 0);
324         wrap = dev_priv->event_wrap;
325         for (i = 0; i < dev_priv->nr_dma_pages; ++i) {
326                 SET_AGE(&dev_priv->dma_pages[i].age, event, wrap);
327                 dev_priv->dma_pages[i].used = 0;
328                 dev_priv->dma_pages[i].flushed = 0;
329         }
330         SET_AGE(&dev_priv->last_dma_age, event, wrap);
331         dev_priv->first_dma_page = dev_priv->current_dma_page = 0;
332 }
333
334 void savage_dma_wait(drm_savage_private_t * dev_priv, unsigned int page)
335 {
336         uint16_t event;
337         unsigned int wrap;
338
339         /* Faked DMA buffer pages don't age. */
340         if (dev_priv->cmd_dma == &dev_priv->fake_dma)
341                 return;
342
343         UPDATE_EVENT_COUNTER();
344         if (dev_priv->status_ptr)
345                 event = dev_priv->status_ptr[1] & 0xffff;
346         else
347                 event = SAVAGE_READ(SAVAGE_STATUS_WORD1) & 0xffff;
348         wrap = dev_priv->event_wrap;
349         if (event > dev_priv->event_counter)
350                 wrap--;         /* hardware hasn't passed the last wrap yet */
351
352         if (dev_priv->dma_pages[page].age.wrap > wrap ||
353             (dev_priv->dma_pages[page].age.wrap == wrap &&
354              dev_priv->dma_pages[page].age.event > event)) {
355                 if (dev_priv->wait_evnt(dev_priv,
356                                         dev_priv->dma_pages[page].age.event)
357                     < 0)
358                         DRM_ERROR("wait_evnt failed!\n");
359         }
360 }
361
362 uint32_t *savage_dma_alloc(drm_savage_private_t * dev_priv, unsigned int n)
363 {
364         unsigned int cur = dev_priv->current_dma_page;
365         unsigned int rest = SAVAGE_DMA_PAGE_SIZE -
366             dev_priv->dma_pages[cur].used;
367         unsigned int nr_pages = (n - rest + SAVAGE_DMA_PAGE_SIZE - 1) /
368             SAVAGE_DMA_PAGE_SIZE;
369         uint32_t *dma_ptr;
370         unsigned int i;
371
372         DRM_DEBUG("cur=%u, cur->used=%u, n=%u, rest=%u, nr_pages=%u\n",
373                   cur, dev_priv->dma_pages[cur].used, n, rest, nr_pages);
374
375         if (cur + nr_pages < dev_priv->nr_dma_pages) {
376                 dma_ptr = (uint32_t *) dev_priv->cmd_dma->handle +
377                     cur * SAVAGE_DMA_PAGE_SIZE + dev_priv->dma_pages[cur].used;
378                 if (n < rest)
379                         rest = n;
380                 dev_priv->dma_pages[cur].used += rest;
381                 n -= rest;
382                 cur++;
383         } else {
384                 dev_priv->dma_flush(dev_priv);
385                 nr_pages =
386                     (n + SAVAGE_DMA_PAGE_SIZE - 1) / SAVAGE_DMA_PAGE_SIZE;
387                 for (i = cur; i < dev_priv->nr_dma_pages; ++i) {
388                         dev_priv->dma_pages[i].age = dev_priv->last_dma_age;
389                         dev_priv->dma_pages[i].used = 0;
390                         dev_priv->dma_pages[i].flushed = 0;
391                 }
392                 dma_ptr = (uint32_t *) dev_priv->cmd_dma->handle;
393                 dev_priv->first_dma_page = cur = 0;
394         }
395         for (i = cur; nr_pages > 0; ++i, --nr_pages) {
396 #if SAVAGE_DMA_DEBUG
397                 if (dev_priv->dma_pages[i].used) {
398                         DRM_ERROR("unflushed page %u: used=%u\n",
399                                   i, dev_priv->dma_pages[i].used);
400                 }
401 #endif
402                 if (n > SAVAGE_DMA_PAGE_SIZE)
403                         dev_priv->dma_pages[i].used = SAVAGE_DMA_PAGE_SIZE;
404                 else
405                         dev_priv->dma_pages[i].used = n;
406                 n -= SAVAGE_DMA_PAGE_SIZE;
407         }
408         dev_priv->current_dma_page = --i;
409
410         DRM_DEBUG("cur=%u, cur->used=%u, n=%u\n",
411                   i, dev_priv->dma_pages[i].used, n);
412
413         savage_dma_wait(dev_priv, dev_priv->current_dma_page);
414
415         return dma_ptr;
416 }
417
418 static void savage_dma_flush(drm_savage_private_t * dev_priv)
419 {
420         unsigned int first = dev_priv->first_dma_page;
421         unsigned int cur = dev_priv->current_dma_page;
422         uint16_t event;
423         unsigned int wrap, pad, align, len, i;
424         unsigned long phys_addr;
425         BCI_LOCALS;
426
427         if (first == cur &&
428             dev_priv->dma_pages[cur].used == dev_priv->dma_pages[cur].flushed)
429                 return;
430
431         /* pad length to multiples of 2 entries
432          * align start of next DMA block to multiles of 8 entries */
433         pad = -dev_priv->dma_pages[cur].used & 1;
434         align = -(dev_priv->dma_pages[cur].used + pad) & 7;
435
436         DRM_DEBUG("first=%u, cur=%u, first->flushed=%u, cur->used=%u, "
437                   "pad=%u, align=%u\n",
438                   first, cur, dev_priv->dma_pages[first].flushed,
439                   dev_priv->dma_pages[cur].used, pad, align);
440
441         /* pad with noops */
442         if (pad) {
443                 uint32_t *dma_ptr = (uint32_t *) dev_priv->cmd_dma->handle +
444                     cur * SAVAGE_DMA_PAGE_SIZE + dev_priv->dma_pages[cur].used;
445                 dev_priv->dma_pages[cur].used += pad;
446                 while (pad != 0) {
447                         *dma_ptr++ = BCI_CMD_WAIT;
448                         pad--;
449                 }
450         }
451
452         DRM_MEMORYBARRIER();
453
454         /* do flush ... */
455         phys_addr = dev_priv->cmd_dma->offset +
456             (first * SAVAGE_DMA_PAGE_SIZE +
457              dev_priv->dma_pages[first].flushed) * 4;
458         len = (cur - first) * SAVAGE_DMA_PAGE_SIZE +
459             dev_priv->dma_pages[cur].used - dev_priv->dma_pages[first].flushed;
460
461         DRM_DEBUG("phys_addr=%lx, len=%u\n",
462                   phys_addr | dev_priv->dma_type, len);
463
464         BEGIN_BCI(3);
465         BCI_SET_REGISTERS(SAVAGE_DMABUFADDR, 1);
466         BCI_WRITE(phys_addr | dev_priv->dma_type);
467         BCI_DMA(len);
468
469         /* fix alignment of the start of the next block */
470         dev_priv->dma_pages[cur].used += align;
471
472         /* age DMA pages */
473         event = savage_bci_emit_event(dev_priv, 0);
474         wrap = dev_priv->event_wrap;
475         for (i = first; i < cur; ++i) {
476                 SET_AGE(&dev_priv->dma_pages[i].age, event, wrap);
477                 dev_priv->dma_pages[i].used = 0;
478                 dev_priv->dma_pages[i].flushed = 0;
479         }
480         /* age the current page only when it's full */
481         if (dev_priv->dma_pages[cur].used == SAVAGE_DMA_PAGE_SIZE) {
482                 SET_AGE(&dev_priv->dma_pages[cur].age, event, wrap);
483                 dev_priv->dma_pages[cur].used = 0;
484                 dev_priv->dma_pages[cur].flushed = 0;
485                 /* advance to next page */
486                 cur++;
487                 if (cur == dev_priv->nr_dma_pages)
488                         cur = 0;
489                 dev_priv->first_dma_page = dev_priv->current_dma_page = cur;
490         } else {
491                 dev_priv->first_dma_page = cur;
492                 dev_priv->dma_pages[cur].flushed = dev_priv->dma_pages[i].used;
493         }
494         SET_AGE(&dev_priv->last_dma_age, event, wrap);
495
496         DRM_DEBUG("first=cur=%u, cur->used=%u, cur->flushed=%u\n", cur,
497                   dev_priv->dma_pages[cur].used,
498                   dev_priv->dma_pages[cur].flushed);
499 }
500
501 static void savage_fake_dma_flush(drm_savage_private_t * dev_priv)
502 {
503         unsigned int i, j;
504         BCI_LOCALS;
505
506         if (dev_priv->first_dma_page == dev_priv->current_dma_page &&
507             dev_priv->dma_pages[dev_priv->current_dma_page].used == 0)
508                 return;
509
510         DRM_DEBUG("first=%u, cur=%u, cur->used=%u\n",
511                   dev_priv->first_dma_page, dev_priv->current_dma_page,
512                   dev_priv->dma_pages[dev_priv->current_dma_page].used);
513
514         for (i = dev_priv->first_dma_page;
515              i <= dev_priv->current_dma_page && dev_priv->dma_pages[i].used;
516              ++i) {
517                 uint32_t *dma_ptr = (uint32_t *) dev_priv->cmd_dma->handle +
518                     i * SAVAGE_DMA_PAGE_SIZE;
519 #if SAVAGE_DMA_DEBUG
520                 /* Sanity check: all pages except the last one must be full. */
521                 if (i < dev_priv->current_dma_page &&
522                     dev_priv->dma_pages[i].used != SAVAGE_DMA_PAGE_SIZE) {
523                         DRM_ERROR("partial DMA page %u: used=%u",
524                                   i, dev_priv->dma_pages[i].used);
525                 }
526 #endif
527                 BEGIN_BCI(dev_priv->dma_pages[i].used);
528                 for (j = 0; j < dev_priv->dma_pages[i].used; ++j) {
529                         BCI_WRITE(dma_ptr[j]);
530                 }
531                 dev_priv->dma_pages[i].used = 0;
532         }
533
534         /* reset to first page */
535         dev_priv->first_dma_page = dev_priv->current_dma_page = 0;
536 }
537
538 int savage_driver_load(struct drm_device *dev, unsigned long chipset)
539 {
540         drm_savage_private_t *dev_priv;
541
542         dev_priv = kzalloc(sizeof(drm_savage_private_t), GFP_KERNEL);
543         if (dev_priv == NULL)
544                 return -ENOMEM;
545
546         dev->dev_private = (void *)dev_priv;
547
548         dev_priv->chipset = (enum savage_family)chipset;
549
550         return 0;
551 }
552
553
554 /*
555  * Initalize mappings. On Savage4 and SavageIX the alignment
556  * and size of the aperture is not suitable for automatic MTRR setup
557  * in drm_addmap. Therefore we add them manually before the maps are
558  * initialized, and tear them down on last close.
559  */
560 int savage_driver_firstopen(struct drm_device *dev)
561 {
562         drm_savage_private_t *dev_priv = dev->dev_private;
563         unsigned long mmio_base, fb_base, fb_size, aperture_base;
564         /* fb_rsrc and aper_rsrc aren't really used currently, but still exist
565          * in case we decide we need information on the BAR for BSD in the
566          * future.
567          */
568         unsigned int fb_rsrc, aper_rsrc;
569         int ret = 0;
570
571         dev_priv->mtrr[0].handle = -1;
572         dev_priv->mtrr[1].handle = -1;
573         dev_priv->mtrr[2].handle = -1;
574         if (S3_SAVAGE3D_SERIES(dev_priv->chipset)) {
575                 fb_rsrc = 0;
576                 fb_base = drm_get_resource_start(dev, 0);
577                 fb_size = SAVAGE_FB_SIZE_S3;
578                 mmio_base = fb_base + SAVAGE_FB_SIZE_S3;
579                 aper_rsrc = 0;
580                 aperture_base = fb_base + SAVAGE_APERTURE_OFFSET;
581                 /* this should always be true */
582                 if (drm_get_resource_len(dev, 0) == 0x08000000) {
583                         /* Don't make MMIO write-cobining! We need 3
584                          * MTRRs. */
585                         dev_priv->mtrr[0].base = fb_base;
586                         dev_priv->mtrr[0].size = 0x01000000;
587                         dev_priv->mtrr[0].handle =
588                             drm_mtrr_add(dev_priv->mtrr[0].base,
589                                          dev_priv->mtrr[0].size, DRM_MTRR_WC);
590                         dev_priv->mtrr[1].base = fb_base + 0x02000000;
591                         dev_priv->mtrr[1].size = 0x02000000;
592                         dev_priv->mtrr[1].handle =
593                             drm_mtrr_add(dev_priv->mtrr[1].base,
594                                          dev_priv->mtrr[1].size, DRM_MTRR_WC);
595                         dev_priv->mtrr[2].base = fb_base + 0x04000000;
596                         dev_priv->mtrr[2].size = 0x04000000;
597                         dev_priv->mtrr[2].handle =
598                             drm_mtrr_add(dev_priv->mtrr[2].base,
599                                          dev_priv->mtrr[2].size, DRM_MTRR_WC);
600                 } else {
601                         DRM_ERROR("strange pci_resource_len %08llx\n",
602                                   (unsigned long long)drm_get_resource_len(dev, 0));
603                 }
604         } else if (dev_priv->chipset != S3_SUPERSAVAGE &&
605                    dev_priv->chipset != S3_SAVAGE2000) {
606                 mmio_base = drm_get_resource_start(dev, 0);
607                 fb_rsrc = 1;
608                 fb_base = drm_get_resource_start(dev, 1);
609                 fb_size = SAVAGE_FB_SIZE_S4;
610                 aper_rsrc = 1;
611                 aperture_base = fb_base + SAVAGE_APERTURE_OFFSET;
612                 /* this should always be true */
613                 if (drm_get_resource_len(dev, 1) == 0x08000000) {
614                         /* Can use one MTRR to cover both fb and
615                          * aperture. */
616                         dev_priv->mtrr[0].base = fb_base;
617                         dev_priv->mtrr[0].size = 0x08000000;
618                         dev_priv->mtrr[0].handle =
619                             drm_mtrr_add(dev_priv->mtrr[0].base,
620                                          dev_priv->mtrr[0].size, DRM_MTRR_WC);
621                 } else {
622                         DRM_ERROR("strange pci_resource_len %08llx\n",
623                                   (unsigned long long)drm_get_resource_len(dev, 1));
624                 }
625         } else {
626                 mmio_base = drm_get_resource_start(dev, 0);
627                 fb_rsrc = 1;
628                 fb_base = drm_get_resource_start(dev, 1);
629                 fb_size = drm_get_resource_len(dev, 1);
630                 aper_rsrc = 2;
631                 aperture_base = drm_get_resource_start(dev, 2);
632                 /* Automatic MTRR setup will do the right thing. */
633         }
634
635         ret = drm_addmap(dev, mmio_base, SAVAGE_MMIO_SIZE, _DRM_REGISTERS,
636                          _DRM_READ_ONLY, &dev_priv->mmio);
637         if (ret)
638                 return ret;
639
640         ret = drm_addmap(dev, fb_base, fb_size, _DRM_FRAME_BUFFER,
641                          _DRM_WRITE_COMBINING, &dev_priv->fb);
642         if (ret)
643                 return ret;
644
645         ret = drm_addmap(dev, aperture_base, SAVAGE_APERTURE_SIZE,
646                          _DRM_FRAME_BUFFER, _DRM_WRITE_COMBINING,
647                          &dev_priv->aperture);
648         if (ret)
649                 return ret;
650
651         return ret;
652 }
653
654 /*
655  * Delete MTRRs and free device-private data.
656  */
657 void savage_driver_lastclose(struct drm_device *dev)
658 {
659         drm_savage_private_t *dev_priv = dev->dev_private;
660         int i;
661
662         for (i = 0; i < 3; ++i)
663                 if (dev_priv->mtrr[i].handle >= 0)
664                         drm_mtrr_del(dev_priv->mtrr[i].handle,
665                                  dev_priv->mtrr[i].base,
666                                  dev_priv->mtrr[i].size, DRM_MTRR_WC);
667 }
668
669 int savage_driver_unload(struct drm_device *dev)
670 {
671         drm_savage_private_t *dev_priv = dev->dev_private;
672
673         kfree(dev_priv);
674
675         return 0;
676 }
677
678 static int savage_do_init_bci(struct drm_device * dev, drm_savage_init_t * init)
679 {
680         drm_savage_private_t *dev_priv = dev->dev_private;
681
682         if (init->fb_bpp != 16 && init->fb_bpp != 32) {
683                 DRM_ERROR("invalid frame buffer bpp %d!\n", init->fb_bpp);
684                 return -EINVAL;
685         }
686         if (init->depth_bpp != 16 && init->depth_bpp != 32) {
687                 DRM_ERROR("invalid depth buffer bpp %d!\n", init->fb_bpp);
688                 return -EINVAL;
689         }
690         if (init->dma_type != SAVAGE_DMA_AGP &&
691             init->dma_type != SAVAGE_DMA_PCI) {
692                 DRM_ERROR("invalid dma memory type %d!\n", init->dma_type);
693                 return -EINVAL;
694         }
695
696         dev_priv->cob_size = init->cob_size;
697         dev_priv->bci_threshold_lo = init->bci_threshold_lo;
698         dev_priv->bci_threshold_hi = init->bci_threshold_hi;
699         dev_priv->dma_type = init->dma_type;
700
701         dev_priv->fb_bpp = init->fb_bpp;
702         dev_priv->front_offset = init->front_offset;
703         dev_priv->front_pitch = init->front_pitch;
704         dev_priv->back_offset = init->back_offset;
705         dev_priv->back_pitch = init->back_pitch;
706         dev_priv->depth_bpp = init->depth_bpp;
707         dev_priv->depth_offset = init->depth_offset;
708         dev_priv->depth_pitch = init->depth_pitch;
709
710         dev_priv->texture_offset = init->texture_offset;
711         dev_priv->texture_size = init->texture_size;
712
713         dev_priv->sarea = drm_getsarea(dev);
714         if (!dev_priv->sarea) {
715                 DRM_ERROR("could not find sarea!\n");
716                 savage_do_cleanup_bci(dev);
717                 return -EINVAL;
718         }
719         if (init->status_offset != 0) {
720                 dev_priv->status = drm_core_findmap(dev, init->status_offset);
721                 if (!dev_priv->status) {
722                         DRM_ERROR("could not find shadow status region!\n");
723                         savage_do_cleanup_bci(dev);
724                         return -EINVAL;
725                 }
726         } else {
727                 dev_priv->status = NULL;
728         }
729         if (dev_priv->dma_type == SAVAGE_DMA_AGP && init->buffers_offset) {
730                 dev->agp_buffer_token = init->buffers_offset;
731                 dev->agp_buffer_map = drm_core_findmap(dev,
732                                                        init->buffers_offset);
733                 if (!dev->agp_buffer_map) {
734                         DRM_ERROR("could not find DMA buffer region!\n");
735                         savage_do_cleanup_bci(dev);
736                         return -EINVAL;
737                 }
738                 drm_core_ioremap(dev->agp_buffer_map, dev);
739                 if (!dev->agp_buffer_map) {
740                         DRM_ERROR("failed to ioremap DMA buffer region!\n");
741                         savage_do_cleanup_bci(dev);
742                         return -ENOMEM;
743                 }
744         }
745         if (init->agp_textures_offset) {
746                 dev_priv->agp_textures =
747                     drm_core_findmap(dev, init->agp_textures_offset);
748                 if (!dev_priv->agp_textures) {
749                         DRM_ERROR("could not find agp texture region!\n");
750                         savage_do_cleanup_bci(dev);
751                         return -EINVAL;
752                 }
753         } else {
754                 dev_priv->agp_textures = NULL;
755         }
756
757         if (init->cmd_dma_offset) {
758                 if (S3_SAVAGE3D_SERIES(dev_priv->chipset)) {
759                         DRM_ERROR("command DMA not supported on "
760                                   "Savage3D/MX/IX.\n");
761                         savage_do_cleanup_bci(dev);
762                         return -EINVAL;
763                 }
764                 if (dev->dma && dev->dma->buflist) {
765                         DRM_ERROR("command and vertex DMA not supported "
766                                   "at the same time.\n");
767                         savage_do_cleanup_bci(dev);
768                         return -EINVAL;
769                 }
770                 dev_priv->cmd_dma = drm_core_findmap(dev, init->cmd_dma_offset);
771                 if (!dev_priv->cmd_dma) {
772                         DRM_ERROR("could not find command DMA region!\n");
773                         savage_do_cleanup_bci(dev);
774                         return -EINVAL;
775                 }
776                 if (dev_priv->dma_type == SAVAGE_DMA_AGP) {
777                         if (dev_priv->cmd_dma->type != _DRM_AGP) {
778                                 DRM_ERROR("AGP command DMA region is not a "
779                                           "_DRM_AGP map!\n");
780                                 savage_do_cleanup_bci(dev);
781                                 return -EINVAL;
782                         }
783                         drm_core_ioremap(dev_priv->cmd_dma, dev);
784                         if (!dev_priv->cmd_dma->handle) {
785                                 DRM_ERROR("failed to ioremap command "
786                                           "DMA region!\n");
787                                 savage_do_cleanup_bci(dev);
788                                 return -ENOMEM;
789                         }
790                 } else if (dev_priv->cmd_dma->type != _DRM_CONSISTENT) {
791                         DRM_ERROR("PCI command DMA region is not a "
792                                   "_DRM_CONSISTENT map!\n");
793                         savage_do_cleanup_bci(dev);
794                         return -EINVAL;
795                 }
796         } else {
797                 dev_priv->cmd_dma = NULL;
798         }
799
800         dev_priv->dma_flush = savage_dma_flush;
801         if (!dev_priv->cmd_dma) {
802                 DRM_DEBUG("falling back to faked command DMA.\n");
803                 dev_priv->fake_dma.offset = 0;
804                 dev_priv->fake_dma.size = SAVAGE_FAKE_DMA_SIZE;
805                 dev_priv->fake_dma.type = _DRM_SHM;
806                 dev_priv->fake_dma.handle = kmalloc(SAVAGE_FAKE_DMA_SIZE,
807                                                     GFP_KERNEL);
808                 if (!dev_priv->fake_dma.handle) {
809                         DRM_ERROR("could not allocate faked DMA buffer!\n");
810                         savage_do_cleanup_bci(dev);
811                         return -ENOMEM;
812                 }
813                 dev_priv->cmd_dma = &dev_priv->fake_dma;
814                 dev_priv->dma_flush = savage_fake_dma_flush;
815         }
816
817         dev_priv->sarea_priv =
818             (drm_savage_sarea_t *) ((uint8_t *) dev_priv->sarea->handle +
819                                     init->sarea_priv_offset);
820
821         /* setup bitmap descriptors */
822         {
823                 unsigned int color_tile_format;
824                 unsigned int depth_tile_format;
825                 unsigned int front_stride, back_stride, depth_stride;
826                 if (dev_priv->chipset <= S3_SAVAGE4) {
827                         color_tile_format = dev_priv->fb_bpp == 16 ?
828                             SAVAGE_BD_TILE_16BPP : SAVAGE_BD_TILE_32BPP;
829                         depth_tile_format = dev_priv->depth_bpp == 16 ?
830                             SAVAGE_BD_TILE_16BPP : SAVAGE_BD_TILE_32BPP;
831                 } else {
832                         color_tile_format = SAVAGE_BD_TILE_DEST;
833                         depth_tile_format = SAVAGE_BD_TILE_DEST;
834                 }
835                 front_stride = dev_priv->front_pitch / (dev_priv->fb_bpp / 8);
836                 back_stride = dev_priv->back_pitch / (dev_priv->fb_bpp / 8);
837                 depth_stride =
838                     dev_priv->depth_pitch / (dev_priv->depth_bpp / 8);
839
840                 dev_priv->front_bd = front_stride | SAVAGE_BD_BW_DISABLE |
841                     (dev_priv->fb_bpp << SAVAGE_BD_BPP_SHIFT) |
842                     (color_tile_format << SAVAGE_BD_TILE_SHIFT);
843
844                 dev_priv->back_bd = back_stride | SAVAGE_BD_BW_DISABLE |
845                     (dev_priv->fb_bpp << SAVAGE_BD_BPP_SHIFT) |
846                     (color_tile_format << SAVAGE_BD_TILE_SHIFT);
847
848                 dev_priv->depth_bd = depth_stride | SAVAGE_BD_BW_DISABLE |
849                     (dev_priv->depth_bpp << SAVAGE_BD_BPP_SHIFT) |
850                     (depth_tile_format << SAVAGE_BD_TILE_SHIFT);
851         }
852
853         /* setup status and bci ptr */
854         dev_priv->event_counter = 0;
855         dev_priv->event_wrap = 0;
856         dev_priv->bci_ptr = (volatile uint32_t *)
857             ((uint8_t *) dev_priv->mmio->handle + SAVAGE_BCI_OFFSET);
858         if (S3_SAVAGE3D_SERIES(dev_priv->chipset)) {
859                 dev_priv->status_used_mask = SAVAGE_FIFO_USED_MASK_S3D;
860         } else {
861                 dev_priv->status_used_mask = SAVAGE_FIFO_USED_MASK_S4;
862         }
863         if (dev_priv->status != NULL) {
864                 dev_priv->status_ptr =
865                     (volatile uint32_t *)dev_priv->status->handle;
866                 dev_priv->wait_fifo = savage_bci_wait_fifo_shadow;
867                 dev_priv->wait_evnt = savage_bci_wait_event_shadow;
868                 dev_priv->status_ptr[1023] = dev_priv->event_counter;
869         } else {
870                 dev_priv->status_ptr = NULL;
871                 if (S3_SAVAGE3D_SERIES(dev_priv->chipset)) {
872                         dev_priv->wait_fifo = savage_bci_wait_fifo_s3d;
873                 } else {
874                         dev_priv->wait_fifo = savage_bci_wait_fifo_s4;
875                 }
876                 dev_priv->wait_evnt = savage_bci_wait_event_reg;
877         }
878
879         /* cliprect functions */
880         if (S3_SAVAGE3D_SERIES(dev_priv->chipset))
881                 dev_priv->emit_clip_rect = savage_emit_clip_rect_s3d;
882         else
883                 dev_priv->emit_clip_rect = savage_emit_clip_rect_s4;
884
885         if (savage_freelist_init(dev) < 0) {
886                 DRM_ERROR("could not initialize freelist\n");
887                 savage_do_cleanup_bci(dev);
888                 return -ENOMEM;
889         }
890
891         if (savage_dma_init(dev_priv) < 0) {
892                 DRM_ERROR("could not initialize command DMA\n");
893                 savage_do_cleanup_bci(dev);
894                 return -ENOMEM;
895         }
896
897         return 0;
898 }
899
900 static int savage_do_cleanup_bci(struct drm_device * dev)
901 {
902         drm_savage_private_t *dev_priv = dev->dev_private;
903
904         if (dev_priv->cmd_dma == &dev_priv->fake_dma) {
905                 kfree(dev_priv->fake_dma.handle);
906         } else if (dev_priv->cmd_dma && dev_priv->cmd_dma->handle &&
907                    dev_priv->cmd_dma->type == _DRM_AGP &&
908                    dev_priv->dma_type == SAVAGE_DMA_AGP)
909                 drm_core_ioremapfree(dev_priv->cmd_dma, dev);
910
911         if (dev_priv->dma_type == SAVAGE_DMA_AGP &&
912             dev->agp_buffer_map && dev->agp_buffer_map->handle) {
913                 drm_core_ioremapfree(dev->agp_buffer_map, dev);
914                 /* make sure the next instance (which may be running
915                  * in PCI mode) doesn't try to use an old
916                  * agp_buffer_map. */
917                 dev->agp_buffer_map = NULL;
918         }
919
920         kfree(dev_priv->dma_pages);
921
922         return 0;
923 }
924
925 static int savage_bci_init(struct drm_device *dev, void *data, struct drm_file *file_priv)
926 {
927         drm_savage_init_t *init = data;
928
929         LOCK_TEST_WITH_RETURN(dev, file_priv);
930
931         switch (init->func) {
932         case SAVAGE_INIT_BCI:
933                 return savage_do_init_bci(dev, init);
934         case SAVAGE_CLEANUP_BCI:
935                 return savage_do_cleanup_bci(dev);
936         }
937
938         return -EINVAL;
939 }
940
941 static int savage_bci_event_emit(struct drm_device *dev, void *data, struct drm_file *file_priv)
942 {
943         drm_savage_private_t *dev_priv = dev->dev_private;
944         drm_savage_event_emit_t *event = data;
945
946         DRM_DEBUG("\n");
947
948         LOCK_TEST_WITH_RETURN(dev, file_priv);
949
950         event->count = savage_bci_emit_event(dev_priv, event->flags);
951         event->count |= dev_priv->event_wrap << 16;
952
953         return 0;
954 }
955
956 static int savage_bci_event_wait(struct drm_device *dev, void *data, struct drm_file *file_priv)
957 {
958         drm_savage_private_t *dev_priv = dev->dev_private;
959         drm_savage_event_wait_t *event = data;
960         unsigned int event_e, hw_e;
961         unsigned int event_w, hw_w;
962
963         DRM_DEBUG("\n");
964
965         UPDATE_EVENT_COUNTER();
966         if (dev_priv->status_ptr)
967                 hw_e = dev_priv->status_ptr[1] & 0xffff;
968         else
969                 hw_e = SAVAGE_READ(SAVAGE_STATUS_WORD1) & 0xffff;
970         hw_w = dev_priv->event_wrap;
971         if (hw_e > dev_priv->event_counter)
972                 hw_w--;         /* hardware hasn't passed the last wrap yet */
973
974         event_e = event->count & 0xffff;
975         event_w = event->count >> 16;
976
977         /* Don't need to wait if
978          * - event counter wrapped since the event was emitted or
979          * - the hardware has advanced up to or over the event to wait for.
980          */
981         if (event_w < hw_w || (event_w == hw_w && event_e <= hw_e))
982                 return 0;
983         else
984                 return dev_priv->wait_evnt(dev_priv, event_e);
985 }
986
987 /*
988  * DMA buffer management
989  */
990
991 static int savage_bci_get_buffers(struct drm_device *dev,
992                                   struct drm_file *file_priv,
993                                   struct drm_dma *d)
994 {
995         struct drm_buf *buf;
996         int i;
997
998         for (i = d->granted_count; i < d->request_count; i++) {
999                 buf = savage_freelist_get(dev);
1000                 if (!buf)
1001                         return -EAGAIN;
1002
1003                 buf->file_priv = file_priv;
1004
1005                 if (DRM_COPY_TO_USER(&d->request_indices[i],
1006                                      &buf->idx, sizeof(buf->idx)))
1007                         return -EFAULT;
1008                 if (DRM_COPY_TO_USER(&d->request_sizes[i],
1009                                      &buf->total, sizeof(buf->total)))
1010                         return -EFAULT;
1011
1012                 d->granted_count++;
1013         }
1014         return 0;
1015 }
1016
1017 int savage_bci_buffers(struct drm_device *dev, void *data, struct drm_file *file_priv)
1018 {
1019         struct drm_device_dma *dma = dev->dma;
1020         struct drm_dma *d = data;
1021         int ret = 0;
1022
1023         LOCK_TEST_WITH_RETURN(dev, file_priv);
1024
1025         /* Please don't send us buffers.
1026          */
1027         if (d->send_count != 0) {
1028                 DRM_ERROR("Process %d trying to send %d buffers via drmDMA\n",
1029                           DRM_CURRENTPID, d->send_count);
1030                 return -EINVAL;
1031         }
1032
1033         /* We'll send you buffers.
1034          */
1035         if (d->request_count < 0 || d->request_count > dma->buf_count) {
1036                 DRM_ERROR("Process %d trying to get %d buffers (of %d max)\n",
1037                           DRM_CURRENTPID, d->request_count, dma->buf_count);
1038                 return -EINVAL;
1039         }
1040
1041         d->granted_count = 0;
1042
1043         if (d->request_count) {
1044                 ret = savage_bci_get_buffers(dev, file_priv, d);
1045         }
1046
1047         return ret;
1048 }
1049
1050 void savage_reclaim_buffers(struct drm_device *dev, struct drm_file *file_priv)
1051 {
1052         struct drm_device_dma *dma = dev->dma;
1053         drm_savage_private_t *dev_priv = dev->dev_private;
1054         int i;
1055
1056         if (!dma)
1057                 return;
1058         if (!dev_priv)
1059                 return;
1060         if (!dma->buflist)
1061                 return;
1062
1063         /*i830_flush_queue(dev); */
1064
1065         for (i = 0; i < dma->buf_count; i++) {
1066                 struct drm_buf *buf = dma->buflist[i];
1067                 drm_savage_buf_priv_t *buf_priv = buf->dev_private;
1068
1069                 if (buf->file_priv == file_priv && buf_priv &&
1070                     buf_priv->next == NULL && buf_priv->prev == NULL) {
1071                         uint16_t event;
1072                         DRM_DEBUG("reclaimed from client\n");
1073                         event = savage_bci_emit_event(dev_priv, SAVAGE_WAIT_3D);
1074                         SET_AGE(&buf_priv->age, event, dev_priv->event_wrap);
1075                         savage_freelist_put(dev, buf);
1076                 }
1077         }
1078
1079         drm_core_reclaim_buffers(dev, file_priv);
1080 }
1081
1082 struct drm_ioctl_desc savage_ioctls[] = {
1083         DRM_IOCTL_DEF(DRM_SAVAGE_BCI_INIT, savage_bci_init, DRM_AUTH|DRM_MASTER|DRM_ROOT_ONLY),
1084         DRM_IOCTL_DEF(DRM_SAVAGE_BCI_CMDBUF, savage_bci_cmdbuf, DRM_AUTH),
1085         DRM_IOCTL_DEF(DRM_SAVAGE_BCI_EVENT_EMIT, savage_bci_event_emit, DRM_AUTH),
1086         DRM_IOCTL_DEF(DRM_SAVAGE_BCI_EVENT_WAIT, savage_bci_event_wait, DRM_AUTH),
1087 };
1088
1089 int savage_max_ioctl = DRM_ARRAY_SIZE(savage_ioctls);